S_0:; do{ sub__icon(NULL,NULL,0); if(!qbevent)break;evnt(13);}while(r); do{ if(!qbevent)break;evnt(24,1,"version.bas");}while(r); do{ if(!qbevent)break;evnt(24,2,"version.bas");}while(r); do{ qbs_set(__STRING_VERSION,qbs_new_txt_len("3.1.0",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24,4,"version.bas");}while(r); S_4:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_new_txt_len("internal/version.txt",20))))||new_error){ if(qbevent){evnt(24,9,"version.bas");if(r)goto S_4;} do{ *__LONG_VERSIONFILE=func_freefile(); if(!qbevent)break;evnt(24,10,"version.bas");}while(r); do{ sub_open(qbs_new_txt_len("internal/version.txt",20), 3 ,NULL,NULL,*__LONG_VERSIONFILE,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24,11,"version.bas");}while(r); do{ tmp_fileno=*__LONG_VERSIONFILE; if (new_error) goto skip1; sub_file_line_input_string(tmp_fileno,__STRING_VERSIONLABEL); if (new_error) goto skip1; skip1: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24,13,"version.bas");}while(r); do{ qbs_set(__STRING_VERSION,qbs_add(__STRING_VERSION,__STRING_VERSIONLABEL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24,14,"version.bas");}while(r); S_9:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_VERSIONLABEL,qbs_new_txt_len("",0)))&(qbs_notequal(__STRING_VERSIONLABEL,qbs_new_txt_len("-UNKNOWN",8)))))||new_error){ if(qbevent){evnt(24,16,"version.bas");if(r)goto S_9;} do{ *__BYTE_ISCIVERSION= -1 ; if(!qbevent)break;evnt(24,17,"version.bas");}while(r); } do{ sub_close(*__LONG_VERSIONFILE,1); if(!qbevent)break;evnt(24,20,"version.bas");}while(r); } do{ if(!qbevent)break;evnt(26,5,"constants.bas");}while(r); do{ qbs_set(__STRING1_SP,func_chr( 13 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,6,"constants.bas");}while(r); do{ qbs_set(__STRING1_SP2,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,6,"constants.bas");}while(r); do{ qbs_set(__STRING1_SP3,func_chr( 26 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,6,"constants.bas");}while(r); do{ if(!qbevent)break;evnt(26,7,"constants.bas");}while(r); do{ *__LONG_SP_ASC=qbs_asc(__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,8,"constants.bas");}while(r); do{ *__LONG_SP2_ASC=qbs_asc(__STRING1_SP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,8,"constants.bas");}while(r); do{ *__LONG_SP3_ASC=qbs_asc(__STRING1_SP3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,8,"constants.bas");}while(r); S_22:; if (( 0 )||new_error){ if(qbevent){evnt(26,9,"constants.bas");if(r)goto S_22;} do{ qbs_set(__STRING1_SP,func_chr( 250 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,9,"constants.bas");}while(r); do{ qbs_set(__STRING1_SP2,func_chr( 249 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,9,"constants.bas");}while(r); do{ qbs_set(__STRING1_SP3,func_chr( 179 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,9,"constants.bas");}while(r); } do{ if(!qbevent)break;evnt(26,59,"constants.bas");}while(r); do{ qbs_set(__STRING_CHR_QUOTE,func_chr( 34 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,59,"constants.bas");}while(r); do{ if(!qbevent)break;evnt(26,60,"constants.bas");}while(r); do{ qbs_set(__STRING_CHR_TAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26,60,"constants.bas");}while(r); do{ if(!qbevent)break;evnt(26,61,"constants.bas");}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(26,61,"constants.bas");}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(27,9,"opengl_global.bas");}while(r); do{ if(!qbevent)break;evnt(27,10,"opengl_global.bas");}while(r); do{ if(!qbevent)break;evnt(27,11,"opengl_global.bas");}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(27,12,"opengl_global.bas");}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(27,13,"opengl_global.bas");}while(r); do{ if(!qbevent)break;evnt(27,14,"opengl_global.bas");}while(r); do{ if(!qbevent)break;evnt(27,15,"opengl_global.bas");}while(r); do{ *__LONG_GL_KIT= 0 ; if(!qbevent)break;evnt(27,15,"opengl_global.bas");}while(r); do{ if(!qbevent)break;evnt(28,8,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,9,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,10,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,11,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,12,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,13,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,14,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,15,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,16,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,17,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,18,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,19,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,20,"ini.bi");}while(r); do{ if(!qbevent)break;evnt(28,21,"ini.bi");}while(r); do{ if (__ARRAY_STRING_SIMPLEBUFFER_ARRAY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SIMPLEBUFFER_ARRAY)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SIMPLEBUFFER_ARRAY[2]&1){ tmp_long=__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0])); } __ARRAY_STRING_SIMPLEBUFFER_ARRAY[4]= 0 ; __ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]=( 10599 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4]+1; __ARRAY_STRING_SIMPLEBUFFER_ARRAY[6]=1; __ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]=(ptrszint)malloc(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]*8); if (!__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]) error(257); __ARRAY_STRING_SIMPLEBUFFER_ARRAY[2]|=1; tmp_long=__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]; if (__ARRAY_STRING_SIMPLEBUFFER_ARRAY[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(29,14,"simplebuffer.bi");}while(r); do{ if (__ARRAY_STRING_SBUFN[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SBUFN)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SBUFN[2]&1){ tmp_long=__ARRAY_STRING_SBUFN[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SBUFN[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SBUFN[0])); } __ARRAY_STRING_SBUFN[4]= 0 ; __ARRAY_STRING_SBUFN[5]=( 99 )-__ARRAY_STRING_SBUFN[4]+1; __ARRAY_STRING_SBUFN[6]=1; __ARRAY_STRING_SBUFN[0]=(ptrszint)malloc(__ARRAY_STRING_SBUFN[5]*8); if (!__ARRAY_STRING_SBUFN[0]) error(257); __ARRAY_STRING_SBUFN[2]|=1; tmp_long=__ARRAY_STRING_SBUFN[5]; if (__ARRAY_STRING_SBUFN[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SBUFN[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SBUFN[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(29,6,"sb_qb64pe_extension.bi");}while(r); do{ sub__controlchr( 2 ); if(!qbevent)break;evnt(34,4,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,1,"wiki_global.bas");}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(34,2,"wiki_global.bas");}while(r); S_60:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)== 0 )))||new_error){ if(qbevent){evnt(34,3,"wiki_global.bas");if(r)goto S_60;} do{ qbs_set(__STRING_CACHE_FOLDER,qbs_new_txt_len("internal/help",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,3,"wiki_global.bas");}while(r); } S_63:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(qbs_new_txt_len("internal",8))== 0 )))||new_error){ if(qbevent){evnt(34,4,"wiki_global.bas");if(r)goto S_63;} do{ goto LABEL_NOINTERNALFOLDER; if(!qbevent)break;evnt(34,4,"wiki_global.bas");}while(r); } S_66:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(__STRING_CACHE_FOLDER)== 0 )))||new_error){ if(qbevent){evnt(34,5,"wiki_global.bas");if(r)goto S_66;} do{ sub_mkdir(__STRING_CACHE_FOLDER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,5,"wiki_global.bas");}while(r); } do{ if(!qbevent)break;evnt(34,6,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,7,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,8,"wiki_global.bas");}while(r); do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(34,9,"wiki_global.bas");}while(r); do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(34,9,"wiki_global.bas");}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(34,9,"wiki_global.bas");}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(34,9,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,10,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,11,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,12,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,13,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,14,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,15,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,16,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,17,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,18,"wiki_global.bas");}while(r); do{ qbs_set(__STRING_HELP_LINK_SEP,func_chr( 13 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,18,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,19,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,23,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,24,"wiki_global.bas");}while(r); do{ *__LONG_HELP_COL_NORMAL= 7 ; if(!qbevent)break;evnt(34,24,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,25,"wiki_global.bas");}while(r); do{ *__LONG_HELP_COL_LINK= 9 ; if(!qbevent)break;evnt(34,25,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,26,"wiki_global.bas");}while(r); do{ *__LONG_HELP_COL_BOLD= 15 ; if(!qbevent)break;evnt(34,26,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,27,"wiki_global.bas");}while(r); do{ *__LONG_HELP_COL_ITALIC= 3 ; if(!qbevent)break;evnt(34,27,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,28,"wiki_global.bas");}while(r); do{ *__LONG_HELP_COL_SECTION= 8 ; if(!qbevent)break;evnt(34,28,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,29,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,30,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,31,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,32,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,33,"wiki_global.bas");}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(34,34,"wiki_global.bas");}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(34,35,"wiki_global.bas");}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(34,36,"wiki_global.bas");}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(34,43,"wiki_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,44,"wiki_global.bas");}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])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,45,"wiki_global.bas");}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(34,46,"wiki_global.bas");}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(34,46,"wiki_global.bas");}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(34,46,"wiki_global.bas");}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(34,46,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,47,"wiki_global.bas");}while(r); do{ *__LONG_HELP_BACK_POS= 1 ; if(!qbevent)break;evnt(34,48,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,49,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,50,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,51,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,52,"wiki_global.bas");}while(r); do{ if (__ARRAY_UDT_WPUTFREPL[2]&2){ error(10); }else{ if (__ARRAY_UDT_WPUTFREPL[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_UDT_WPUTFREPL[4]= 0 ; __ARRAY_UDT_WPUTFREPL[5]=( 50 )-__ARRAY_UDT_WPUTFREPL[4]+1; __ARRAY_UDT_WPUTFREPL[6]=1; if (__ARRAY_UDT_WPUTFREPL[2]&4){ __ARRAY_UDT_WPUTFREPL[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_WPUTFREPL[5]*96/8+1); memset((void*)(__ARRAY_UDT_WPUTFREPL[0]),0,__ARRAY_UDT_WPUTFREPL[5]*96/8+1); }else{ __ARRAY_UDT_WPUTFREPL[0]=(ptrszint)calloc(__ARRAY_UDT_WPUTFREPL[5]*96/8+1,1); if (!__ARRAY_UDT_WPUTFREPL[0]) error(257); } __ARRAY_UDT_WPUTFREPL[2]|=1; } } if(!qbevent)break;evnt(34,59,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,60,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT= -1 ; if(!qbevent)break;evnt(34,60,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,65,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -22078 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,65,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),qbs_new_txt_len("(c)",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,65,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,66,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -22077 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,66,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 130 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,66,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,67,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -23869 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,67,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 131 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,67,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,68,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -24381 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,68,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 133 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,68,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,69,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -23101 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,69,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 134 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,69,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,70,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -22589 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,70,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 135 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,70,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,71,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -21821 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,71,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 136 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,71,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,72,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -21565 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,72,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 137 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,72,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,73,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -22333 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,73,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 138 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,73,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,74,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -20541 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,74,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 139 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,74,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,75,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -20797 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,75,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 140 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,75,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,76,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -23870 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,76,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 155 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,76,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,77,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -16958 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,77,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 171 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,77,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,78,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -17214 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,78,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 172 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,78,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,79,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),i2string( -24382 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,79,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,79,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,81,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 10911970 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,81,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),qbs_new_txt_len("...",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,81,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,82,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9213154 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,82,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 218 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,82,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,83,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9475298 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,83,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 191 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,83,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,84,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9737442 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,84,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 192 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,84,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,85,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9999586 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,85,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 217 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,85,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,86,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 8426722 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,86,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 196 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,86,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,87,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 8557794 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,87,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 179 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,87,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,88,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 11834594 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,88,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 193 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,88,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,89,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 11310306 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,89,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 194 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,89,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,90,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 10786018 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,90,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,90,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,91,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 10261730 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,91,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,91,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,92,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 12358882 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,92,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,92,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,93,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 11704034 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,93,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 30 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,93,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,94,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 12359394 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,94,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 31 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,94,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,95,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 8689634 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,95,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 17 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,95,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,96,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 12228322 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,96,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 16 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,96,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,97,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9537250 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,97,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 24 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,97,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,98,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9668322 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,98,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 25 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,98,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,99,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9471714 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,99,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 27 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,99,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,100,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( 9602786 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,100,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),func_chr( 26 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,100,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,102,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( -2137481232 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,102,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),qbs_new_txt_len(":)",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,102,"wiki_global.bas");}while(r); do{ *__LONG_WPUTFREPLCNT=*__LONG_WPUTFREPLCNT+ 1 ; if(!qbevent)break;evnt(34,103,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),l2string( -2003263504 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,103,"wiki_global.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*__LONG_WPUTFREPLCNT)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1),qbs_new_txt_len(";)",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,103,"wiki_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,8,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,10,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,11,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,12,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,14,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&2){ error(10); }else{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_STRING_VWATCHRECEIVEDDATA[4]= 1 ; __ARRAY_STRING_VWATCHRECEIVEDDATA[5]=( 1000 )-__ARRAY_STRING_VWATCHRECEIVEDDATA[4]+1; __ARRAY_STRING_VWATCHRECEIVEDDATA[6]=1; __ARRAY_STRING_VWATCHRECEIVEDDATA[0]=(ptrszint)malloc(__ARRAY_STRING_VWATCHRECEIVEDDATA[5]*8); if (!__ARRAY_STRING_VWATCHRECEIVEDDATA[0]) error(257); __ARRAY_STRING_VWATCHRECEIVEDDATA[2]|=1; tmp_long=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(34,15,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,16,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,18,"ide_global.bas");}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(34,22,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,24,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,25,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_IDERECENTLINK[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDERECENTLINK[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_STRING_IDERECENTLINK[8]= 1 ; __ARRAY_STRING_IDERECENTLINK[9]=( 6 )-__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(34,27,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,28,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,29,"ide_global.bas");}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(34,37,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,38,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,44,"ide_global.bas");}while(r); do{ if (__ARRAY_UDT_QUICKNAVHISTORY[2]&2){ error(10); }else{ if (__ARRAY_UDT_QUICKNAVHISTORY[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_UDT_QUICKNAVHISTORY[4]= 0 ; __ARRAY_UDT_QUICKNAVHISTORY[5]=( 0 )-__ARRAY_UDT_QUICKNAVHISTORY[4]+1; __ARRAY_UDT_QUICKNAVHISTORY[6]=1; if (__ARRAY_UDT_QUICKNAVHISTORY[2]&4){ __ARRAY_UDT_QUICKNAVHISTORY[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_UDT_QUICKNAVHISTORY[5]*128/8+1); memset((void*)(__ARRAY_UDT_QUICKNAVHISTORY[0]),0,__ARRAY_UDT_QUICKNAVHISTORY[5]*128/8+1); }else{ __ARRAY_UDT_QUICKNAVHISTORY[0]=(ptrszint)calloc(__ARRAY_UDT_QUICKNAVHISTORY[5]*128/8+1,1); if (!__ARRAY_UDT_QUICKNAVHISTORY[0]) error(257); } __ARRAY_UDT_QUICKNAVHISTORY[2]|=1; } } if(!qbevent)break;evnt(34,45,"ide_global.bas");}while(r); do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=( 1 )-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(34,47,"ide_global.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=( 1 )-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(34,48,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,51,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,52,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,53,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,54,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,55,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,56,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,57,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,58,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,59,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,60,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,61,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,62,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,63,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,64,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,65,"ide_global.bas");}while(r); do{ if (__ARRAY_INTEGER_BLOCK_CHR[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_BLOCK_CHR[2]&1){ if (!error_occurred) 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(34,67,"ide_global.bas");}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(34,68,"ide_global.bas");}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(34,69,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,72,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_IDECPNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDECPNAME[2]&1){ if (!error_occurred) 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(34,74,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_IDECP[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDECP[2]&1){ if (!error_occurred) 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(34,75,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,77,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,78,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,79,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,80,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,81,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,82,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,83,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,84,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,85,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,86,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,87,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,88,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,89,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,90,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,91,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,92,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,93,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,94,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,95,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,96,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,97,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,98,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,99,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,100,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,101,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,102,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,103,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,104,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,105,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,106,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,107,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,108,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,109,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,110,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,111,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,112,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,113,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,114,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,115,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,116,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,117,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,118,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,119,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,120,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,121,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,122,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,123,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,124,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,125,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,126,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,127,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,128,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,129,"ide_global.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,130,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,132,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,133,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,134,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,1,"syntax_highlighter_list.bas");}while(r); do{ qbs_set(__STRING_LISTOFKEYWORDS,qbs_new_txt_len("@?@$CHECKING@$ERROR@$CONSOLE@ONLY@$DYNAMIC@$ELSE@$ELSEIF@$END@$ENDIF@$EXEICON@$IF@$INCLUDE@$LET@$RESIZE@$SCREENHIDE@$SCREENSHOW@$STATIC@$VERSIONINFO@$VIRTUALKEYBOARD@ABS@ABSOLUTE@ACCESS@ALIAS@AND@APPEND@AS@ASC@ATN@BASE@BEEP@BINARY@BLOAD@BSAVE@BYVAL@CALL@CALLS@CASE@IS@CDBL@CDECL@CHAIN@CHDIR@CHR$@CINT@CIRCLE@CLEAR@CLNG@CLOSE@CLS@COLOR@COM@COMMAND$@COMMON@CONST@COS@CSNG@CSRLIN@CUSTOMTYPE@CVD@CVDMBF@CVI@CVL@CVS@CVSMBF@DATA@DATE$@DECLARE@DEF@DEFDBL@DEFINT@DEFLNG@DEFSNG@DEFSTR@DIM@DO@DOUBLE@DRAW@DYNAMIC@ELSE@ELSEIF@END@ENDIF@ENVIRON@ENVIRON$@EOF@EQV@ERASE@ERDEV@ERDEV$@ERL@ERR@ERROR@EVERYCASE@EXIT@EXP@FIELD@FILEATTR@FILES@FIX@FN@FOR@FRE@FREE@FREEFILE@FUNCTION@GET@GOSUB@GOTO@HEX$@IF@IMP@INKEY$@INP@INPUT@INPUT$@INSTR@INT@INTEGER@INTERRUPT@INTERRUPTX@IOCTL@IOCTL$@KEY@KILL@LBOUND@LCASE$@LEFT$@LEN@LET@LIBRARY@LINE@LIST@LOC@LOCATE@LOCK@LOF@LOG@LONG@LOOP@LPOS@LPRINT@LSET@LTRIM$@MID$@MKD$@MKDIR@MKDMBF$@MKI$@MKL$@MKS$@MKSMBF$@MOD@NAME@NEXT@NOT@OCT$@OFF@ON@OPEN@OPTION@OR@OUT@OUTPUT@PAINT@PALETTE@PCOPY@PEEK@PEN@PLAY@PMAP@POINT@POKE@POS@PRESET@PRINT@PSET@PUT@RANDOM@RANDOMIZE@READ@REDIM@REM@RESET@RESTORE@RESUME@RETURN@RIGHT$@RMDIR@RND@RSET@RTRIM$@RUN@SADD@SCREEN@SEEK@SEG@SELECT@SETMEM@SGN@SHARED@SHELL@SIGNAL@SIN@SINGLE@SLEEP@SOUND@SPACE$@SPC@SQR@STATIC@STEP@STICK@STOP@STR$@STRIG@STRING@STRING$@SUB@SWAP@SYSTEM@TAB@TAN@THEN@TIME$@TIMER@TO@TROFF@TRON@TYPE@UBOUND@UCASE$@UEVENT@UNLOCK@UNTIL@USING@VAL@VARPTR@VARPTR$@VARSEG@VIEW@WAIT@WEND@WHILE@WIDTH@WINDOW@WRITE@XOR@_ACOS@_ACOSH@_ALPHA@_ALPHA32@_ARCCOT@_ARCCSC@_ARCSEC@_ASIN@_ASINH@_ATAN2@_ATANH@_AUTODISPLAY@_AXIS@_BACKGROUNDCOLOR@_BIN$@_BIT@_BLEND@_BLINK@_BLUE@_BLUE32@_BUTTON@_BUTTONCHANGE@_BYTE@_CEIL@_CLEARCOLOR@_CLIP@_CLIPBOARD$@_CLIPBOARDIMAGE@_COMMANDCOUNT@_CONNECTED@_CONNECTIONADDRESS$@_CONNECTIONADDRESS@_CONSOLE@_CONSOLETITLE@_CONTINUE@_CONTROLCHR@_COPYIMAGE@_COPYPALETTE@_COSH@_COT@_COTH@_CSC@_CSCH@_CV@_CWD$@_D2G@_D2R@_DEFAULTCOLOR@_DEFINE@_DELAY@_DEPTHBUFFER@_DESKTOPHEIGHT@_DESKTOPWIDTH@_DEST@_DEVICE$@_DEVICEINPUT@_DEVICES@_DIR$@_DIREXISTS@_DISPLAY@_DISPLAYORDER@_DONTBLEND@_DONTWAIT@",2050)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,2,"syntax_highlighter_list.bas");}while(r); do{ qbs_set(__STRING_LISTOFKEYWORDS,qbs_add(__STRING_LISTOFKEYWORDS,qbs_new_txt_len("_ERRORLINE@_ERRORMESSAGE$@_EXIT@_EXPLICIT@_EXPLICITARRAY@_FILEEXISTS@_FLOAT@_FONT@_FONTHEIGHT@_FONTWIDTH@_FREEFONT@_FREEIMAGE@_FREETIMER@_FULLSCREEN@_G2D@_G2R@_GLRENDER@_GREEN@_GREEN32@_HEIGHT@_HIDE@_HYPOT@_ICON@_INCLERRORFILE$@_INCLERRORLINE@_INTEGER64@_KEYCLEAR@_KEYDOWN@_KEYHIT@_LASTAXIS@_LASTBUTTON@_LASTWHEEL@_LIMIT@_LOADFONT@_LOADIMAGE@_MAPTRIANGLE@_MAPUNICODE@_MEM@_MEMCOPY@_MEMELEMENT@_MEMEXISTS@_MEMFILL@_MEMFREE@_MEMGET@_MEMIMAGE@_MEMSOUND@_MEMNEW@_MEMPUT@_MIDDLE@_MK$@_MOUSEBUTTON@_MOUSEHIDE@_MOUSEINPUT@_MOUSEMOVE@_MOUSEMOVEMENTX@_MOUSEMOVEMENTY@_MOUSEPIPEOPEN@_MOUSESHOW@_MOUSEWHEEL@_MOUSEX@_MOUSEY@_NEWIMAGE@_OFFSET@_OPENCLIENT@_OPENCONNECTION@_OPENHOST@_OS$@_PALETTECOLOR@_PI@_PIXELSIZE@_PRESERVE@_PRINTIMAGE@_PRINTMODE@_PRINTSTRING@_PRINTWIDTH@_PUTIMAGE@_R2D@_R2G@_RED@_RED32@_RESIZE@_RESIZEHEIGHT@_RESIZEWIDTH@_RGB@_RGB32@_RGBA@_RGBA32@_ROUND@_SCREENCLICK@_SCREENEXISTS@_SCREENHIDE@_SCREENICON@_SCREENIMAGE@_SCREENMOVE@_SCREENPRINT@_SCREENSHOW@_SCREENX@_SCREENY@_SEC@_SECH@_SETALPHA@_SHELLHIDE@_SINH@_SNDBAL@_SNDCLOSE@_SNDCOPY@_SNDGETPOS@_SNDLEN@_SNDLIMIT@_SNDLOOP@_SNDOPEN@_SNDOPENRAW@_SNDPAUSE@_SNDPAUSED@_SNDPLAY@_SNDPLAYCOPY@_SNDPLAYFILE@_SNDPLAYING@_SNDRATE@_SNDRAW@_SNDRAWDONE@_SNDRAWLEN@_SNDSETPOS@_SNDSTOP@_SNDVOL@_SOURCE@_STARTDIR$@_STRCMP@_STRICMP@_TANH@_TITLE@_TITLE$@_UNSIGNED@_WHEEL@_WIDTH@_WINDOWHANDLE@_WINDOWHASFOCUS@_GLACCUM@_GLALPHAFUNC@_GLARETEXTURESRESIDENT@_GLARRAYELEMENT@_GLBEGIN@_GLBINDTEXTURE@_GLBITMAP@_GLBLENDFUNC@_GLCALLLIST@_GLCALLLISTS@_GLCLEAR@_GLCLEARACCUM@_GLCLEARCOLOR@_GLCLEARDEPTH@_GLCLEARINDEX@_GLCLEARSTENCIL@_GLCLIPPLANE@_GLCOLOR3B@_GLCOLOR3BV@_GLCOLOR3D@_GLCOLOR3DV@_GLCOLOR3F@_GLCOLOR3FV@_GLCOLOR3I@_GLCOLOR3IV@_GLCOLOR3S@_GLCOLOR3SV@_GLCOLOR3UB@_GLCOLOR3UBV@_GLCOLOR3UI@_GLCOLOR3UIV@_GLCOLOR3US@_GLCOLOR3USV@_GLCOLOR4B@_GLCOLOR4BV@_GLCOLOR4D@_GLCOLOR4DV@_GLCOLOR4F@_GLCOLOR4FV@_GLCOLOR4I@_GLCOLOR4IV@_GLCOLOR4S@_GLCOLOR4SV@_GLCOLOR4UB@_GLCOLOR4UBV@_GLCOLOR4UI@_GLCOLOR4UIV@_GLCOLOR4US@_GLCOLOR4USV@_GLCOLORMASK@_GLCOLORMATERIAL@_GLCOLORPOINTER@_GLCOPYPIXELS@_GLCOPYTEXIMAGE1D@_GLCOPYTEXIMAGE2D@_GLCOPYTEXSUBIMAGE1D@",2074))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,3,"syntax_highlighter_list.bas");}while(r); do{ qbs_set(__STRING_LISTOFKEYWORDS,qbs_add(__STRING_LISTOFKEYWORDS,qbs_new_txt_len("_GLCOPYTEXSUBIMAGE2D@_GLCULLFACE@_GLDELETELISTS@_GLDELETETEXTURES@_GLDEPTHFUNC@_GLDEPTHMASK@_GLDEPTHRANGE@_GLDISABLE@_GLDISABLECLIENTSTATE@_GLDRAWARRAYS@_GLDRAWBUFFER@_GLDRAWELEMENTS@_GLDRAWPIXELS@_GLEDGEFLAG@_GLEDGEFLAGPOINTER@_GLEDGEFLAGV@_GLENABLE@_GLENABLECLIENTSTATE@_GLEND@_GLENDLIST@_GLEVALCOORD1D@_GLEVALCOORD1DV@_GLEVALCOORD1F@_GLEVALCOORD1FV@_GLEVALCOORD2D@_GLEVALCOORD2DV@_GLEVALCOORD2F@_GLEVALCOORD2FV@_GLEVALMESH1@_GLEVALMESH2@_GLEVALPOINT1@_GLEVALPOINT2@_GLFEEDBACKBUFFER@_GLFINISH@_GLFLUSH@_GLFOGF@_GLFOGFV@_GLFOGI@_GLFOGIV@_GLFRONTFACE@_GLFRUSTUM@_GLGENLISTS@_GLGENTEXTURES@_GLGETBOOLEANV@_GLGETCLIPPLANE@_GLGETDOUBLEV@_GLGETERROR@_GLGETFLOATV@_GLGETINTEGERV@_GLGETLIGHTFV@_GLGETLIGHTIV@_GLGETMAPDV@_GLGETMAPFV@_GLGETMAPIV@_GLGETMATERIALFV@_GLGETMATERIALIV@_GLGETPIXELMAPFV@_GLGETPIXELMAPUIV@_GLGETPIXELMAPUSV@_GLGETPOINTERV@_GLGETPOLYGONSTIPPLE@_GLGETSTRING@_GLGETTEXENVFV@_GLGETTEXENVIV@_GLGETTEXGENDV@_GLGETTEXGENFV@_GLGETTEXGENIV@_GLGETTEXIMAGE@_GLGETTEXLEVELPARAMETERFV@_GLGETTEXLEVELPARAMETERIV@_GLGETTEXPARAMETERFV@_GLGETTEXPARAMETERIV@_GLHINT@_GLINDEXMASK@_GLINDEXPOINTER@_GLINDEXD@_GLINDEXDV@_GLINDEXF@_GLINDEXFV@_GLINDEXI@_GLINDEXIV@_GLINDEXS@_GLINDEXSV@_GLINDEXUB@_GLINDEXUBV@_GLINITNAMES@_GLINTERLEAVEDARRAYS@_GLISENABLED@_GLISLIST@_GLISTEXTURE@_GLLIGHTMODELF@_GLLIGHTMODELFV@_GLLIGHTMODELI@_GLLIGHTMODELIV@_GLLIGHTF@_GLLIGHTFV@_GLLIGHTI@_GLLIGHTIV@_GLLINESTIPPLE@_GLLINEWIDTH@_GLLISTBASE@_GLLOADIDENTITY@_GLLOADMATRIXD@_GLLOADMATRIXF@_GLLOADNAME@_GLLOGICOP@_GLMAP1D@_GLMAP1F@_GLMAP2D@_GLMAP2F@_GLMAPGRID1D@_GLMAPGRID1F@_GLMAPGRID2D@_GLMAPGRID2F@_GLMATERIALF@_GLMATERIALFV@_GLMATERIALI@_GLMATERIALIV@_GLMATRIXMODE@_GLMULTMATRIXD@_GLMULTMATRIXF@_GLNEWLIST@_GLNORMAL3B@_GLNORMAL3BV@_GLNORMAL3D@_GLNORMAL3DV@_GLNORMAL3F@_GLNORMAL3FV@_GLNORMAL3I@_GLNORMAL3IV@_GLNORMAL3S@_GLNORMAL3SV@_GLNORMALPOINTER@_GLORTHO@_GLPASSTHROUGH@_GLPIXELMAPFV@_GLPIXELMAPUIV@_GLPIXELMAPUSV@_GLPIXELSTOREF@_GLPIXELSTOREI@_GLPIXELTRANSFERF@_GLPIXELTRANSFERI@_GLPIXELZOOM@_GLPOINTSIZE@_GLPOLYGONMODE@_GLPOLYGONOFFSET@_GLPOLYGONSTIPPLE@",2035))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,4,"syntax_highlighter_list.bas");}while(r); do{ qbs_set(__STRING_LISTOFKEYWORDS,qbs_add(__STRING_LISTOFKEYWORDS,qbs_new_txt_len("_GLPOPATTRIB@_GLPOPCLIENTATTRIB@_GLPOPMATRIX@_GLPOPNAME@_GLPRIORITIZETEXTURES@_GLPUSHATTRIB@_GLPUSHCLIENTATTRIB@_GLPUSHMATRIX@_GLPUSHNAME@_GLRASTERPOS2D@_GLRASTERPOS2DV@_GLRASTERPOS2F@_GLRASTERPOS2FV@_GLRASTERPOS2I@_GLRASTERPOS2IV@_GLRASTERPOS2S@_GLRASTERPOS2SV@_GLRASTERPOS3D@_GLRASTERPOS3DV@_GLRASTERPOS3F@_GLRASTERPOS3FV@_GLRASTERPOS3I@_GLRASTERPOS3IV@_GLRASTERPOS3S@_GLRASTERPOS3SV@_GLRASTERPOS4D@_GLRASTERPOS4DV@_GLRASTERPOS4F@_GLRASTERPOS4FV@_GLRASTERPOS4I@_GLRASTERPOS4IV@_GLRASTERPOS4S@_GLRASTERPOS4SV@_GLREADBUFFER@_GLREADPIXELS@_GLRECTD@_GLRECTDV@_GLRECTF@_GLRECTFV@_GLRECTI@_GLRECTIV@_GLRECTS@_GLRECTSV@_GLRENDERMODE@_GLROTATED@_GLROTATEF@_GLSCALED@_GLSCALEF@_GLSCISSOR@_GLSELECTBUFFER@_GLSHADEMODEL@_GLSTENCILFUNC@_GLSTENCILMASK@_GLSTENCILOP@_GLTEXCOORD1D@_GLTEXCOORD1DV@_GLTEXCOORD1F@_GLTEXCOORD1FV@_GLTEXCOORD1I@_GLTEXCOORD1IV@_GLTEXCOORD1S@_GLTEXCOORD1SV@_GLTEXCOORD2D@_GLTEXCOORD2DV@_GLTEXCOORD2F@_GLTEXCOORD2FV@_GLTEXCOORD2I@_GLTEXCOORD2IV@_GLTEXCOORD2S@_GLTEXCOORD2SV@_GLTEXCOORD3D@_GLTEXCOORD3DV@_GLTEXCOORD3F@_GLTEXCOORD3FV@_GLTEXCOORD3I@_GLTEXCOORD3IV@_GLTEXCOORD3S@_GLTEXCOORD3SV@_GLTEXCOORD4D@_GLTEXCOORD4DV@_GLTEXCOORD4F@_GLTEXCOORD4FV@_GLTEXCOORD4I@_GLTEXCOORD4IV@_GLTEXCOORD4S@_GLTEXCOORD4SV@_GLTEXCOORDPOINTER@_GLTEXENVF@_GLTEXENVFV@_GLTEXENVI@_GLTEXENVIV@_GLTEXGEND@_GLTEXGENDV@_GLTEXGENF@_GLTEXGENFV@_GLTEXGENI@_GLTEXGENIV@_GLTEXIMAGE1D@_GLTEXIMAGE2D@_GLTEXPARAMETERF@_GLTEXPARAMETERFV@_GLTEXPARAMETERI@_GLTEXPARAMETERIV@_GLTEXSUBIMAGE1D@_GLTEXSUBIMAGE2D@_GLTRANSLATED@_GLTRANSLATEF@_GLVERTEX2D@_GLVERTEX2DV@_GLVERTEX2F@_GLVERTEX2FV@_GLVERTEX2I@_GLVERTEX2IV@_GLVERTEX2S@_GLVERTEX2SV@_GLVERTEX3D@_GLVERTEX3DV@_GLVERTEX3F@_GLVERTEX3FV@_GLVERTEX3I@_GLVERTEX3IV@_GLVERTEX3S@_GLVERTEX3SV@_GLVERTEX4D@_GLVERTEX4DV@_GLVERTEX4F@_GLVERTEX4FV@_GLVERTEX4I@_GLVERTEX4IV@_GLVERTEX4S@_GLVERTEX4SV@_GLVERTEXPOINTER@_GLVIEWPORT@SMOOTH@STRETCH@_ANTICLOCKWISE@_BEHIND@_CLEAR@_FILLBACKGROUND@_GLUPERSPECTIVE@_HARDWARE@_HARDWARE1@_KEEPBACKGROUND@_NONE@_OFF@_ONLY@_ONLYBACKGROUND@_ONTOP@_SEAMLESS@_SMOOTH@_SMOOTHSHRUNK@_SMOOTHSTRETCHED@",2044))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,5,"syntax_highlighter_list.bas");}while(r); do{ qbs_set(__STRING_LISTOFKEYWORDS,qbs_add(__STRING_LISTOFKEYWORDS,qbs_new_txt_len("_SOFTWARE@_SQUAREPIXELS@_STRETCH@_ALLOWFULLSCREEN@_ALL@_ECHO@_INSTRREV@_TRIM$@_ACCEPTFILEDROP@_FINISHDROP@_TOTALDROPPEDFILES@_DROPPEDFILE@_DROPPEDFILE$@_SHR@_SHL@_ROR@_ROL@",172))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,6,"syntax_highlighter_list.bas");}while(r); do{ qbs_set(__STRING_LISTOFKEYWORDS,qbs_add(__STRING_LISTOFKEYWORDS,qbs_new_txt_len("_DEFLATE$@_INFLATE$@_READBIT@_RESETBIT@_SETBIT@_TOGGLEBIT@$ASSERTS@_ASSERT@_CAPSLOCK@_NUMLOCK@_SCROLLLOCK@_TOGGLE@_CONSOLEFONT@_CONSOLECURSOR@_CONSOLEINPUT@_CINP@$NOPREFIX@$COLOR@$DEBUG@_ENVIRONCOUNT@",200))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(34,7,"syntax_highlighter_list.bas");}while(r); do{ if(!qbevent)break;evnt(34,142,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,143,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,144,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,145,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,146,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,147,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,148,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,149,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,150,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,151,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,152,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,153,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_IDETXT[2]&2){ error(10); }else{ if (__ARRAY_STRING_IDETXT[2]&1){ if (!error_occurred) 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(34,154,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,155,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,156,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,157,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,158,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,159,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,160,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,161,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,162,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,163,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,164,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,165,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,166,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,167,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,168,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,169,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_SUBFUNCLIST[2]&2){ error(10); }else{ if (__ARRAY_STRING_SUBFUNCLIST[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_STRING_SUBFUNCLIST[4]= 0 ; __ARRAY_STRING_SUBFUNCLIST[5]=( 0 )-__ARRAY_STRING_SUBFUNCLIST[4]+1; __ARRAY_STRING_SUBFUNCLIST[6]=1; __ARRAY_STRING_SUBFUNCLIST[0]=(ptrszint)malloc(__ARRAY_STRING_SUBFUNCLIST[5]*8); if (!__ARRAY_STRING_SUBFUNCLIST[0]) error(257); __ARRAY_STRING_SUBFUNCLIST[2]|=1; tmp_long=__ARRAY_STRING_SUBFUNCLIST[5]; if (__ARRAY_STRING_SUBFUNCLIST[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(34,170,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,171,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,172,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,173,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,174,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,175,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,176,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,177,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,178,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,211,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,212,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_MENU[2]&2){ error(10); }else{ if (__ARRAY_STRING_MENU[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_STRING_MENU[8]= 1 ; __ARRAY_STRING_MENU[9]=( 11 )-__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(34,213,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_MENUDESC[2]&2){ error(10); }else{ if (__ARRAY_STRING_MENUDESC[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_STRING_MENUDESC[8]= 1 ; __ARRAY_STRING_MENUDESC[9]=( 11 )-__ARRAY_STRING_MENUDESC[8]+1; __ARRAY_STRING_MENUDESC[10]=1; __ARRAY_STRING_MENUDESC[4]= 0 ; __ARRAY_STRING_MENUDESC[5]=( 20 )-__ARRAY_STRING_MENUDESC[4]+1; __ARRAY_STRING_MENUDESC[6]=__ARRAY_STRING_MENUDESC[10]*__ARRAY_STRING_MENUDESC[9]; __ARRAY_STRING_MENUDESC[0]=(ptrszint)malloc(__ARRAY_STRING_MENUDESC[5]*__ARRAY_STRING_MENUDESC[9]*8); if (!__ARRAY_STRING_MENUDESC[0]) error(257); __ARRAY_STRING_MENUDESC[2]|=1; tmp_long=__ARRAY_STRING_MENUDESC[5]*__ARRAY_STRING_MENUDESC[9]; if (__ARRAY_STRING_MENUDESC[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(34,214,"ide_global.bas");}while(r); do{ if (__ARRAY_LONG_MENUSIZE[2]&2){ error(10); }else{ if (__ARRAY_LONG_MENUSIZE[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_LONG_MENUSIZE[4]= 1 ; __ARRAY_LONG_MENUSIZE[5]=( 11 )-__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(34,215,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,216,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,217,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,218,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,219,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,220,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,221,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,222,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,223,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,224,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,225,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,226,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,227,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_COLORSCHEMES[2]&2){ error(10); }else{ if (__ARRAY_STRING_COLORSCHEMES[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_STRING_COLORSCHEMES[4]= 0 ; __ARRAY_STRING_COLORSCHEMES[5]=( 0 )-__ARRAY_STRING_COLORSCHEMES[4]+1; __ARRAY_STRING_COLORSCHEMES[6]=1; __ARRAY_STRING_COLORSCHEMES[0]=(ptrszint)malloc(__ARRAY_STRING_COLORSCHEMES[5]*8); if (!__ARRAY_STRING_COLORSCHEMES[0]) error(257); __ARRAY_STRING_COLORSCHEMES[2]|=1; tmp_long=__ARRAY_STRING_COLORSCHEMES[5]; if (__ARRAY_STRING_COLORSCHEMES[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(34,228,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,229,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,230,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,231,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,232,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,233,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,234,"ide_global.bas");}while(r); do{ if(!qbevent)break;evnt(34,235,"ide_global.bas");}while(r); do{ if (__ARRAY_STRING_ONAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_ONAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_ONAME[2]&1){ tmp_long=__ARRAY_STRING_ONAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_ONAME[0])); } __ARRAY_STRING_ONAME[4]= 0 ; __ARRAY_STRING_ONAME[5]=( 1000 )-__ARRAY_STRING_ONAME[4]+1; __ARRAY_STRING_ONAME[6]=1; __ARRAY_STRING_ONAME[0]=(ptrszint)malloc(__ARRAY_STRING_ONAME[5]*8); if (!__ARRAY_STRING_ONAME[0]) error(257); __ARRAY_STRING_ONAME[2]|=1; tmp_long=__ARRAY_STRING_ONAME[5]; if (__ARRAY_STRING_ONAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(36);}while(r); do{ if (__ARRAY_INTEGER_PL[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_PL)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_PL[2]&1){ if (__ARRAY_INTEGER_PL[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_PL[0])); }else{ free((void*)(__ARRAY_INTEGER_PL[0])); } } __ARRAY_INTEGER_PL[4]= 0 ; __ARRAY_INTEGER_PL[5]=( 1000 )-__ARRAY_INTEGER_PL[4]+1; __ARRAY_INTEGER_PL[6]=1; if (__ARRAY_INTEGER_PL[2]&4){ __ARRAY_INTEGER_PL[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_PL[5]*2); memset((void*)(__ARRAY_INTEGER_PL[0]),0,__ARRAY_INTEGER_PL[5]*2); }else{ __ARRAY_INTEGER_PL[0]=(ptrszint)calloc(__ARRAY_INTEGER_PL[5]*2,1); if (!__ARRAY_INTEGER_PL[0]) error(257); } __ARRAY_INTEGER_PL[2]|=1; } if(!qbevent)break;evnt(37);}while(r); do{ if (__ARRAY_STRING_PP_TYPEMOD[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_PP_TYPEMOD)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_PP_TYPEMOD[2]&1){ tmp_long=__ARRAY_STRING_PP_TYPEMOD[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long]); free((void*)(__ARRAY_STRING_PP_TYPEMOD[0])); } __ARRAY_STRING_PP_TYPEMOD[4]= 0 ; __ARRAY_STRING_PP_TYPEMOD[5]=( 0 )-__ARRAY_STRING_PP_TYPEMOD[4]+1; __ARRAY_STRING_PP_TYPEMOD[6]=1; __ARRAY_STRING_PP_TYPEMOD[0]=(ptrszint)malloc(__ARRAY_STRING_PP_TYPEMOD[5]*8); if (!__ARRAY_STRING_PP_TYPEMOD[0]) error(257); __ARRAY_STRING_PP_TYPEMOD[2]|=1; tmp_long=__ARRAY_STRING_PP_TYPEMOD[5]; if (__ARRAY_STRING_PP_TYPEMOD[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_PP_CONVERTEDMOD)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&1){ tmp_long=__ARRAY_STRING_PP_CONVERTEDMOD[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long]); free((void*)(__ARRAY_STRING_PP_CONVERTEDMOD[0])); } __ARRAY_STRING_PP_CONVERTEDMOD[4]= 0 ; __ARRAY_STRING_PP_CONVERTEDMOD[5]=( 0 )-__ARRAY_STRING_PP_CONVERTEDMOD[4]+1; __ARRAY_STRING_PP_CONVERTEDMOD[6]=1; __ARRAY_STRING_PP_CONVERTEDMOD[0]=(ptrszint)malloc(__ARRAY_STRING_PP_CONVERTEDMOD[5]*8); if (!__ARRAY_STRING_PP_CONVERTEDMOD[0]) error(257); __ARRAY_STRING_PP_CONVERTEDMOD[2]|=1; tmp_long=__ARRAY_STRING_PP_CONVERTEDMOD[5]; if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(38);}while(r); do{ SUB_SET_ORDEROFOPERATIONS(); if(!qbevent)break;evnt(39);}while(r); do{ if(!qbevent)break;evnt(41);}while(r); do{ if(!qbevent)break;evnt(43);}while(r); do{ if(!qbevent)break;evnt(44);}while(r); do{ qbs_set(__STRING_VWATCHERRORCALL,qbs_new_txt_len("if (stop_program) {*__LONG_VWATCH_LINENUMBER=0; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);};if(new_error){bkp_new_error=new_error;new_error=0;*__LONG_VWATCH_LINENUMBER=-1; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);new_error=bkp_new_error;};",298)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(45);}while(r); do{ qbs_set(__STRING_VWATCHVARIABLEEXCLUSIONS,qbs_add(qbs_add(qbs_new_txt_len("@__LONG_VWATCH_LINENUMBER@__LONG_VWATCH_SUBLEVEL@__LONG_VWATCH_GOTO@",68),qbs_new_txt_len("@__STRING_VWATCH_SUBNAME@__STRING_VWATCH_CALLSTACK@__ARRAY_BYTE_VWATCH_BREAKPOINTS",82)),qbs_new_txt_len("@__ARRAY_BYTE_VWATCH_SKIPLINES@__STRING_VWATCH_INTERNALSUBNAME@__ARRAY_STRING_VWATCH_STACK@",91))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(48);}while(r); do{ if(!qbevent)break;evnt(50);}while(r); do{ qbs_set(__STRING_NATIVEDATATYPES,qbs_new_txt_len("@_OFFSET@OFFSET@_UNSIGNED _OFFSET@UNSIGNED OFFSET@_BIT@BIT@_UNSIGNED _BIT@UNSIGNED BIT@_BYTE@_UNSIGNED _BYTE@BYTE@UNSIGNED BYTE@INTEGER@_UNSIGNED INTEGER@UNSIGNED INTEGER@LONG@_UNSIGNED LONG@UNSIGNED LONG@_INTEGER64@INTEGER64@_UNSIGNED _INTEGER64@UNSIGNED INTEGER64@SINGLE@DOUBLE@_FLOAT@FLOAT@STRING@",300)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(51);}while(r); do{ if(!qbevent)break;evnt(53);}while(r); do{ if(!qbevent)break;evnt(54);}while(r); do{ if(!qbevent)break;evnt(55);}while(r); do{ if (__ARRAY_LONG_EVERYCASESET[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_EVERYCASESET)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_EVERYCASESET[2]&1){ if (__ARRAY_LONG_EVERYCASESET[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_EVERYCASESET[0])); }else{ free((void*)(__ARRAY_LONG_EVERYCASESET[0])); } } __ARRAY_LONG_EVERYCASESET[4]= 0 ; __ARRAY_LONG_EVERYCASESET[5]=( 100 )-__ARRAY_LONG_EVERYCASESET[4]+1; __ARRAY_LONG_EVERYCASESET[6]=1; if (__ARRAY_LONG_EVERYCASESET[2]&4){ __ARRAY_LONG_EVERYCASESET[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_EVERYCASESET[5]*4); memset((void*)(__ARRAY_LONG_EVERYCASESET[0]),0,__ARRAY_LONG_EVERYCASESET[5]*4); }else{ __ARRAY_LONG_EVERYCASESET[0]=(ptrszint)calloc(__ARRAY_LONG_EVERYCASESET[5]*4,1); if (!__ARRAY_LONG_EVERYCASESET[0]) error(257); } __ARRAY_LONG_EVERYCASESET[2]|=1; } if(!qbevent)break;evnt(57);}while(r); do{ if (__ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_SELECTCASEHASCASEBLOCK)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]&1){ if (__ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0])); }else{ free((void*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0])); } } __ARRAY_LONG_SELECTCASEHASCASEBLOCK[4]= 0 ; __ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]=( 100 )-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4]+1; __ARRAY_LONG_SELECTCASEHASCASEBLOCK[6]=1; if (__ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]&4){ __ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]*4); memset((void*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]),0,__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]*4); }else{ __ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]=(ptrszint)calloc(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]*4,1); if (!__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]) error(257); } __ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]|=1; } if(!qbevent)break;evnt(58);}while(r); do{ if (__ARRAY_LONG_EXECLEVEL[2]&2){ error(10); }else{ if (__ARRAY_LONG_EXECLEVEL[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_LONG_EXECLEVEL[4]= 0 ; __ARRAY_LONG_EXECLEVEL[5]=( 255 )-__ARRAY_LONG_EXECLEVEL[4]+1; __ARRAY_LONG_EXECLEVEL[6]=1; if (__ARRAY_LONG_EXECLEVEL[2]&4){ __ARRAY_LONG_EXECLEVEL[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_EXECLEVEL[5]*4); memset((void*)(__ARRAY_LONG_EXECLEVEL[0]),0,__ARRAY_LONG_EXECLEVEL[5]*4); }else{ __ARRAY_LONG_EXECLEVEL[0]=(ptrszint)calloc(__ARRAY_LONG_EXECLEVEL[5]*4,1); if (!__ARRAY_LONG_EXECLEVEL[0]) error(257); } __ARRAY_LONG_EXECLEVEL[2]|=1; } } if(!qbevent)break;evnt(59);}while(r); do{ if (__ARRAY_STRING_USERDEFINE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_USERDEFINE)[12])->id=(++mem_lock_id); if (__ARRAY_STRING_USERDEFINE[2]&1){ tmp_long=__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long]); free((void*)(__ARRAY_STRING_USERDEFINE[0])); } __ARRAY_STRING_USERDEFINE[8]= 0 ; __ARRAY_STRING_USERDEFINE[9]=( 1 )-__ARRAY_STRING_USERDEFINE[8]+1; __ARRAY_STRING_USERDEFINE[10]=1; __ARRAY_STRING_USERDEFINE[4]= 0 ; __ARRAY_STRING_USERDEFINE[5]=( 100 )-__ARRAY_STRING_USERDEFINE[4]+1; __ARRAY_STRING_USERDEFINE[6]=__ARRAY_STRING_USERDEFINE[10]*__ARRAY_STRING_USERDEFINE[9]; __ARRAY_STRING_USERDEFINE[0]=(ptrszint)malloc(__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]*8); if (!__ARRAY_STRING_USERDEFINE[0]) error(257); __ARRAY_STRING_USERDEFINE[2]|=1; tmp_long=__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]; if (__ARRAY_STRING_USERDEFINE[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(60);}while(r); do{ if (__ARRAY_BYTE_INVALIDLINE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_INVALIDLINE)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_INVALIDLINE[2]&1){ if (__ARRAY_BYTE_INVALIDLINE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_INVALIDLINE[0])); }else{ free((void*)(__ARRAY_BYTE_INVALIDLINE[0])); } } __ARRAY_BYTE_INVALIDLINE[4]= 0 ; __ARRAY_BYTE_INVALIDLINE[5]=( 10000 )-__ARRAY_BYTE_INVALIDLINE[4]+1; __ARRAY_BYTE_INVALIDLINE[6]=1; if (__ARRAY_BYTE_INVALIDLINE[2]&4){ __ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_INVALIDLINE[5]*1); memset((void*)(__ARRAY_BYTE_INVALIDLINE[0]),0,__ARRAY_BYTE_INVALIDLINE[5]*1); }else{ __ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)calloc(__ARRAY_BYTE_INVALIDLINE[5]*1,1); if (!__ARRAY_BYTE_INVALIDLINE[0]) error(257); } __ARRAY_BYTE_INVALIDLINE[2]|=1; } if(!qbevent)break;evnt(61);}while(r); do{ if (__ARRAY_BYTE_DEFINEELSE[2]&2){ error(10); }else{ if (__ARRAY_BYTE_DEFINEELSE[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_BYTE_DEFINEELSE[4]= 0 ; __ARRAY_BYTE_DEFINEELSE[5]=( 255 )-__ARRAY_BYTE_DEFINEELSE[4]+1; __ARRAY_BYTE_DEFINEELSE[6]=1; if (__ARRAY_BYTE_DEFINEELSE[2]&4){ __ARRAY_BYTE_DEFINEELSE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_DEFINEELSE[5]*1); memset((void*)(__ARRAY_BYTE_DEFINEELSE[0]),0,__ARRAY_BYTE_DEFINEELSE[5]*1); }else{ __ARRAY_BYTE_DEFINEELSE[0]=(ptrszint)calloc(__ARRAY_BYTE_DEFINEELSE[5]*1,1); if (!__ARRAY_BYTE_DEFINEELSE[0]) error(257); } __ARRAY_BYTE_DEFINEELSE[2]|=1; } } if(!qbevent)break;evnt(62);}while(r); do{ if(!qbevent)break;evnt(63);}while(r); do{ qbs_set(__STRING_USERDEFINELIST,qbs_new_txt_len("@DEFINED@UNDEFINED@WINDOWS@WIN@LINUX@MAC@MACOSX@32BIT@64BIT@VERSION@",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(64);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 0 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("WINDOWS",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(65);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 1 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("WIN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(65);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 2 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("LINUX",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(66);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 3 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("MAC",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(67);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 4 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("MACOSX",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(67);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 5 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("32BIT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(68);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 6 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("64BIT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(68);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 7 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("VERSION",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(69);}while(r); S_430:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(70);if(r)goto S_430;} do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 0 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(70);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 1 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(70);}while(r); }else{ do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 0 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(70);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 1 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(70);}while(r); } S_437:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("LINUX",5),0)))||new_error){ if(qbevent){evnt(71);if(r)goto S_437;} do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 2 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(71);}while(r); }else{ do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 2 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(71);}while(r); } S_442:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(72);if(r)goto S_442;} do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 3 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(72);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 4 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(72);}while(r); }else{ do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 3 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(72);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 4 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(72);}while(r); } S_449:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("32BIT",5),0)))||new_error){ if(qbevent){evnt(73);if(r)goto S_449;} do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 5 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(73);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 6 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(73);}while(r); }else{ do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 5 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(73);}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 6 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),qbs_new_txt_len("-1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(73);}while(r); } do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 7 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),__STRING_VERSION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(74);}while(r); do{ if(!qbevent)break;evnt(76);}while(r); do{ *__SINGLE_QB64_UPTIME=func_timer(NULL,0); if(!qbevent)break;evnt(78);}while(r); LABEL_NOINTERNALFOLDER:; if(qbevent){evnt(80);r=0;} S_459:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(qbs_new_txt_len("internal",8))== 0 )))||new_error){ if(qbevent){evnt(81);if(r)goto S_459;} do{ sub__screenshow(); if(!qbevent)break;evnt(82);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("QB64-PE cannot locate the 'internal' folder",43)); if (new_error) goto skip2; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(83);}while(r); do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip3: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(84);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Check that QB64-PE has been extracted properly.",47)); if (new_error) goto skip4; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip4: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(85);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("For MacOSX, launch 'qb64pe_start.command' or enter './qb64pe' in Terminal.",74)); if (new_error) goto skip5; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip5: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(86);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("For Linux, in the console enter './qb64pe'.",43)); if (new_error) goto skip6; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip6: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(87);}while(r); S_466:; do{ if(qbevent){evnt(88);if(r)goto S_466;} do{ sub__limit( 1 ); if(!qbevent)break;evnt(89);}while(r); S_468:; dl_continue_7:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_7:; if(qbevent){evnt(90);if(r)goto S_468;} do{ if(qbevent){evnt(91);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(91);}while(r); } do{ if(!qbevent)break;evnt(94);}while(r); do{ if(!qbevent)break;evnt(96);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(97);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(98);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(99);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(100);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(101);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(102);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(103);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(104);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(105);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(106);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(107);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(108);}while(r); do{ *__LONG_DEPENDENCY_LAST=*__LONG_DEPENDENCY_LAST+ 1 ; if(!qbevent)break;evnt(109);}while(r); do{ if (__ARRAY_LONG_DEPENDENCY[2]&2){ error(10); }else{ if (__ARRAY_LONG_DEPENDENCY[2]&1){ if (!error_occurred) 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(113);}while(r); do{ if(!qbevent)break;evnt(115);}while(r); do{ if(!qbevent)break;evnt(118);}while(r); do{ *__LONG_OS_BITS= 64 ; if(!qbevent)break;evnt(119);}while(r); S_490:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[32BIT]",7),0)))||new_error){ if(qbevent){evnt(119);if(r)goto S_490;} do{ *__LONG_OS_BITS= 32 ; if(!qbevent)break;evnt(119);}while(r); } S_493:; if ((-(*__LONG_OS_BITS== 32 ))||new_error){ if(qbevent){evnt(121);if(r)goto S_493;} do{ qbs_set(__STRING_WINDOWTITLE,qbs_new_txt_len("QB64 Phoenix Edition (x32)",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(121);}while(r); }else{ do{ qbs_set(__STRING_WINDOWTITLE,qbs_new_txt_len("QB64 Phoenix Edition (x64)",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(121);}while(r); } do{ sub__title(__STRING_WINDOWTITLE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(122);}while(r); do{ if(!qbevent)break;evnt(124);}while(r); do{ if(!qbevent)break;evnt(125);}while(r); do{ if(!qbevent)break;evnt(126);}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); } } __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]) error(257); __ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } 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{ 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(144);}while(r); do{ if(!qbevent)break;evnt(145);}while(r); do{ if(!qbevent)break;evnt(148);}while(r); do{ if(!qbevent)break;evnt(149);}while(r); do{ if(!qbevent)break;evnt(150);}while(r); do{ if(!qbevent)break;evnt(151);}while(r); do{ if(!qbevent)break;evnt(153);}while(r); do{ if(!qbevent)break;evnt(155);}while(r); do{ if(!qbevent)break;evnt(156);}while(r); do{ if(!qbevent)break;evnt(157);}while(r); do{ if(!qbevent)break;evnt(158);}while(r); do{ *__LONG_OPTMAX= 256 ; if(!qbevent)break;evnt(159);}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(160);}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(164);}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(168);}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(173);}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(174);}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(175);}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(176);}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(178);}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(179);}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(183);}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(184);}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(185);}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(186);}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(187);}while(r); do{ if(!qbevent)break;evnt(193);}while(r); do{ if(!qbevent)break;evnt(204);}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(205);}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(206);}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(207);}while(r); do{ if(!qbevent)break;evnt(213);}while(r); do{ if(!qbevent)break;evnt(214);}while(r); do{ if(!qbevent)break;evnt(216);}while(r); do{ qbs_set(__STRING_OS,qbs_new_txt_len("WIN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(217);}while(r); S_544:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[LINUX]",7),0)))||new_error){ if(qbevent){evnt(218);if(r)goto S_544;} do{ qbs_set(__STRING_OS,qbs_new_txt_len("LNX",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(218);}while(r); } do{ if(!qbevent)break;evnt(220);}while(r); S_548:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(221);if(r)goto S_548;} do{ *__LONG_MACOSX= 1 ; if(!qbevent)break;evnt(221);}while(r); } do{ if(!qbevent)break;evnt(223);}while(r); S_552:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(224);if(r)goto S_552;} do{ *__LONG_INLINE_DATA= 1 ; if(!qbevent)break;evnt(224);}while(r); } do{ if(!qbevent)break;evnt(226);}while(r); do{ qbs_set(__STRING_BATCHFILE_EXTENSION,qbs_new_txt_len(".bat",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(227);}while(r); S_557:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(228);if(r)goto S_557;} do{ qbs_set(__STRING_BATCHFILE_EXTENSION,qbs_new_txt_len(".sh",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(228);}while(r); } S_560:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(229);if(r)goto S_560;} do{ qbs_set(__STRING_BATCHFILE_EXTENSION,qbs_new_txt_len(".command",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(229);}while(r); } do{ if (__ARRAY_STRING_INLINEDATASTR[2]&2){ error(10); }else{ if (__ARRAY_STRING_INLINEDATASTR[2]&1){ if (!error_occurred) 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(232);}while(r); S_564:; fornext_value9= 0 ; fornext_finalvalue9= 255 ; fornext_step9= 1 ; if (fornext_step9<0) fornext_step_negative9=1; else fornext_step_negative9=0; if (new_error) goto fornext_error9; goto fornext_entrylabel9; while(1){ fornext_value9=fornext_step9+(*__LONG_I); fornext_entrylabel9: *__LONG_I=fornext_value9; if (fornext_step_negative9){ if (fornext_value9fornext_finalvalue9) break; } fornext_error9:; if(qbevent){evnt(233);if(r)goto S_564;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(234);}while(r); fornext_continue_8:; } fornext_exit_8:; do{ if(!qbevent)break;evnt(238);}while(r); do{ if(!qbevent)break;evnt(239);}while(r); do{ qbs_set(__STRING_EXTENSION,qbs_new_txt_len(".exe",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(240);}while(r); S_570:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(241);if(r)goto S_570;} do{ qbs_set(__STRING_EXTENSION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(241);}while(r); } do{ if(!qbevent)break;evnt(243);}while(r); do{ qbs_set(__STRING1_PATHSEP,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(244);}while(r); S_575:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(245);if(r)goto S_575;} do{ qbs_set(__STRING1_PATHSEP,qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(245);}while(r); } do{ error_goto_line=1; if(!qbevent)break;evnt(248);}while(r); do{ if(!qbevent)break;evnt(250);}while(r); S_580:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(251);if(r)goto S_580;} do{ qbs_set(__STRING_TMPDIR,qbs_new_txt_len(".\\internal\\temp\\",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(251);}while(r); do{ qbs_set(__STRING_TMPDIR2,qbs_new_txt_len("..\\\\temp\\\\",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(251);}while(r); } S_584:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(252);if(r)goto S_584;} do{ qbs_set(__STRING_TMPDIR,qbs_new_txt_len("./internal/temp/",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(252);}while(r); do{ qbs_set(__STRING_TMPDIR2,qbs_new_txt_len("../temp/",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(252);}while(r); } S_588:; if ((qbs_cleanup(qbs_tmp_base,~(func__direxists(__STRING_TMPDIR))))||new_error){ if(qbevent){evnt(254);if(r)goto S_588;} do{ sub_mkdir(__STRING_TMPDIR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(254);}while(r); } do{ *__LONG_THISINSTANCEPID=( int32 )getpid(); if(!qbevent)break;evnt(260);}while(r); do{ if(!qbevent)break;evnt(261);}while(r); S_593:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("LINUX",5),0)))||new_error){ if(qbevent){evnt(263);if(r)goto S_593;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(264);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\tempfoldersearch.bin",36), 1 ,NULL,NULL,*__LONG_FH,4,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(265);}while(r); do{ *__LONG_TEMPFOLDERRECORDS=qbr(func_lof(*__LONG_FH)/ ((long double)(4))); if(!qbevent)break;evnt(266);}while(r); do{ *__LONG_I= 1 ; if(!qbevent)break;evnt(267);}while(r); S_598:; if ((-(*__LONG_TEMPFOLDERRECORDS== 0 ))||new_error){ if(qbevent){evnt(268);if(r)goto S_598;} do{ sub_put(*__LONG_FH, 1 ,byte_element((uint64)__LONG_THISINSTANCEPID,4,byte_element_12),1); if(!qbevent)break;evnt(270);}while(r); }else{ S_601:; fornext_value14= 1 ; fornext_finalvalue14=*__LONG_TEMPFOLDERRECORDS; fornext_step14= 1 ; if (fornext_step14<0) fornext_step_negative14=1; else fornext_step_negative14=0; if (new_error) goto fornext_error14; goto fornext_entrylabel14; while(1){ fornext_value14=fornext_step14+(*__LONG_I); fornext_entrylabel14: *__LONG_I=fornext_value14; if (fornext_step_negative14){ if (fornext_value14fornext_finalvalue14) break; } fornext_error14:; if(qbevent){evnt(272);if(r)goto S_601;} do{ sub_get(*__LONG_FH,*__LONG_I,byte_element((uint64)__LONG_TEMPFOLDERSEARCH,4,byte_element_15),1); if(!qbevent)break;evnt(274);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("ps -p ",6),qbs_str((int32)(*__LONG_TEMPFOLDERSEARCH))),qbs_new_txt_len(" > /dev/null 2>&1; echo $? > internal/temp/checkpid.bin",55)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(276);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(277);}while(r); do{ sub_open(qbs_new_txt_len("internal/temp/checkpid.bin",26), 2 ,NULL,NULL,*__LONG_FH2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(278);}while(r); do{ tmp_fileno=*__LONG_FH2; if (new_error) goto skip16; sub_file_line_input_string(tmp_fileno,__STRING_CHECKPID); if (new_error) goto skip16; skip16: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(279);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(280);}while(r); S_608:; if ((qbs_cleanup(qbs_tmp_base,-(func_val(__STRING_CHECKPID)== 1 )))||new_error){ if(qbevent){evnt(281);if(r)goto S_608;} do{ sub_put(*__LONG_FH,*__LONG_I,byte_element((uint64)__LONG_THISINSTANCEPID,4,byte_element_17),1); if(!qbevent)break;evnt(284);}while(r); do{ goto fornext_exit_13; if(!qbevent)break;evnt(285);}while(r); } fornext_continue_13:; } fornext_exit_13:; S_613:; if ((-(*__LONG_I>*__LONG_TEMPFOLDERRECORDS))||new_error){ if(qbevent){evnt(288);if(r)goto S_613;} do{ sub_put(*__LONG_FH,*__LONG_I,byte_element((uint64)__LONG_THISINSTANCEPID,4,byte_element_18),1); if(!qbevent)break;evnt(290);}while(r); } } do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(293);}while(r); S_618:; if ((-(*__LONG_I> 1 ))||new_error){ if(qbevent){evnt(294);if(r)goto S_618;} 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(295);}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(295);}while(r); S_621:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(__STRING_TMPDIR)== 0 )))||new_error){ if(qbevent){evnt(296);if(r)goto S_621;} do{ sub_mkdir(__STRING_TMPDIR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(297);}while(r); } } do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(300);}while(r); }else{ do{ error_goto_line=2; if(!qbevent)break;evnt(302);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(303);}while(r); do{ *__LONG_I= 1 ; if(!qbevent)break;evnt(304);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(305);}while(r); S_631:; while((*__LONG_E)||new_error){ if(qbevent){evnt(306);if(r)goto S_631;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(307);}while(r); S_633:; if ((-(*__LONG_I== 1000 ))||new_error){ if(qbevent){evnt(308);if(r)goto S_633;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Unable to locate the 'internal' folder",38)); if (new_error) goto skip20; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip20: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(308);}while(r); do{ if(qbevent){evnt(308);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(308);}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(309);}while(r); S_638:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(310);if(r)goto S_638;} 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(310);}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(310);}while(r); } S_642:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(311);if(r)goto S_642;} 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(311);}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(311);}while(r); } do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(312);}while(r); do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(313);}while(r); dl_continue_19:; } dl_exit_19:; } do{ *__LONG_TEMPFOLDERINDEX=*__LONG_I; if(!qbevent)break;evnt(319);}while(r); S_651:; if ((-(*__LONG_I> 1 ))||new_error){ if(qbevent){evnt(320);if(r)goto S_651;} 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(322);}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\c\\qbx.cpp",20), 2 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(323);}while(r); S_654:; while((!(func_eof( 1 )))||new_error){ if(qbevent){evnt(324);if(r)goto S_654;} do{ tmp_fileno= 1 ; if (new_error) goto skip22; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip22; skip22: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(325);}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(326);}while(r); S_657:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(326);if(r)goto S_657;} 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(326);}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(327);}while(r); S_661:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(327);if(r)goto S_661;} 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(327);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 2 ; if (new_error) goto skip25; sub_file_print(tmp_fileno,__STRING_A, 0, 0, 1); if (new_error) goto skip25; skip25: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(328);}while(r); dl_continue_21:; } dl_exit_21:; do{ sub_close( 1 ,1); sub_close( 2 ,1); if(!qbevent)break;evnt(330);}while(r); } S_668:; if (( 0 )||new_error){ if(qbevent){evnt(333);if(r)goto S_668;} 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(333);}while(r); } do{ error_goto_line=3; if(!qbevent)break;evnt(335);}while(r); do{ if(!qbevent)break;evnt(339);}while(r); do{ if(!qbevent)break;evnt(340);}while(r); S_674:; if ((-(*__LONG_TEMPFOLDERINDEX!= 1 ))||new_error){ if(qbevent){evnt(341);if(r)goto S_674;} 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(341);}while(r); do{ qbs_set(__STRING_TEMPFOLDERINDEXSTR2,FUNC_STR2(__LONG_TEMPFOLDERINDEX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(341);}while(r); } do{ if(!qbevent)break;evnt(344);}while(r); do{ if(!qbevent)break;evnt(345);}while(r); do{ if(!qbevent)break;evnt(346);}while(r); do{ if(!qbevent)break;evnt(348);}while(r); do{ if(!qbevent)break;evnt(350);}while(r); do{ if(!qbevent)break;evnt(351);}while(r); do{ if(!qbevent)break;evnt(354);}while(r); do{ *__LONG_SYMBOLTYPE_SIZE= 0 ; if(!qbevent)break;evnt(355);}while(r); do{ if(!qbevent)break;evnt(357);}while(r); do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(358);}while(r); do{ if(!qbevent)break;evnt(362);}while(r); do{ if(!qbevent)break;evnt(363);}while(r); do{ if(!qbevent)break;evnt(364);}while(r); do{ if(!qbevent)break;evnt(365);}while(r); do{ if(!qbevent)break;evnt(366);}while(r); do{ if(!qbevent)break;evnt(367);}while(r); do{ if(!qbevent)break;evnt(369);}while(r); do{ if(!qbevent)break;evnt(372);}while(r); do{ if(!qbevent)break;evnt(373);}while(r); do{ if(!qbevent)break;evnt(374);}while(r); do{ if(!qbevent)break;evnt(375);}while(r); do{ if(!qbevent)break;evnt(376);}while(r); do{ if(!qbevent)break;evnt(377);}while(r); do{ if(!qbevent)break;evnt(378);}while(r); do{ if(!qbevent)break;evnt(380,1,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,2,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,3,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,4,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,5,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,6,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,7,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,8,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,9,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,10,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,11,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,12,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,13,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,14,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,15,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,16,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,17,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,18,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,19,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,20,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,21,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,22,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,23,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,24,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,25,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,26,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,27,"IDEsettings.bas");}while(r); do{ if(!qbevent)break;evnt(380,28,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_CONFIGFILE,qbs_new_txt_len("internal/config.ini",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,30,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_INIFOLDERINDEX,qbs_str((int32)(*__LONG_TEMPFOLDERINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,31,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_WINDOWSETTINGSSECTION,qbs_add(qbs_new_txt_len("IDE WINDOW",10),__STRING_INIFOLDERINDEX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,33,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_COLORSETTINGSSECTION,qbs_add(qbs_new_txt_len("IDE COLOR SETTINGS",18),__STRING_INIFOLDERINDEX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,34,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_COLORSCHEMESSECTION,qbs_new_txt_len("IDE COLOR SCHEMES",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,35,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_CUSTOMDICTIONARYSECTION,qbs_new_txt_len("CUSTOM DICTIONARIES",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,36,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_MOUSESETTINGSSECTION,qbs_new_txt_len("MOUSE SETTINGS",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,37,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("GENERAL SETTINGS",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,38,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE DISPLAY SETTINGS",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,39,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("DEBUG SETTINGS",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,40,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("COMPILER SETTINGS",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,41,"IDEsettings.bas");}while(r); do{ SUB_INISETADDQUOTES(&(pass26= 0 )); if(!qbevent)break;evnt(380,43,"IDEsettings.bas");}while(r); do{ SUB_INISETFORCERELOAD(&(pass27= -1 )); if(!qbevent)break;evnt(380,44,"IDEsettings.bas");}while(r); do{ SUB_INISETALLOWBASICCOMMENTS(&(pass28= -1 )); if(!qbevent)break;evnt(380,45,"IDEsettings.bas");}while(r); do{ SUB_INISETAUTOCOMMIT(&(pass29= -1 )); if(!qbevent)break;evnt(380,46,"IDEsettings.bas");}while(r); do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,49,"IDEsettings.bas");}while(r); S_746:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,50,"IDEsettings.bas");if(r)goto S_746;} do{ *__BYTE_DISABLESYNTAXHIGHLIGHTER= -1 ; if(!qbevent)break;evnt(380,51,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,52,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_DISABLESYNTAXHIGHLIGHTER= 0 ; if(!qbevent)break;evnt(380,54,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,55,"IDEsettings.bas");}while(r); } S_753:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("PasteCursorAtEnd",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,58,"IDEsettings.bas");if(r)goto S_753;} S_754:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,59,"IDEsettings.bas");if(r)goto S_754;} do{ *__BYTE_PASTECURSORATEND= -1 ; if(!qbevent)break;evnt(380,60,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_PASTECURSORATEND= 0 ; if(!qbevent)break;evnt(380,62,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("PasteCursorAtEnd",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,63,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_PASTECURSORATEND= -1 ; if(!qbevent)break;evnt(380,66,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("PasteCursorAtEnd",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,67,"IDEsettings.bas");}while(r); } S_764:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ExeToSourceFolderFirstTimeMsg",29),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,70,"IDEsettings.bas");if(r)goto S_764;} S_765:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,71,"IDEsettings.bas");if(r)goto S_765;} do{ *__BYTE_EXETOSOURCEFOLDERFIRSTTIMEMSG= -1 ; if(!qbevent)break;evnt(380,72,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_EXETOSOURCEFOLDERFIRSTTIMEMSG= 0 ; if(!qbevent)break;evnt(380,74,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ExeToSourceFolderFirstTimeMsg",29),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,75,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_EXETOSOURCEFOLDERFIRSTTIMEMSG= 0 ; if(!qbevent)break;evnt(380,78,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ExeToSourceFolderFirstTimeMsg",29),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,79,"IDEsettings.bas");}while(r); } S_775:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("WhiteListQB64FirstTimeMsg",25),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,82,"IDEsettings.bas");if(r)goto S_775;} S_776:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,83,"IDEsettings.bas");if(r)goto S_776;} do{ *__BYTE_WHITELISTQB64FIRSTTIMEMSG= -1 ; if(!qbevent)break;evnt(380,84,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_WHITELISTQB64FIRSTTIMEMSG= 0 ; if(!qbevent)break;evnt(380,86,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("WhiteListQB64FirstTimeMsg",25),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,87,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_WHITELISTQB64FIRSTTIMEMSG= 0 ; if(!qbevent)break;evnt(380,90,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("WhiteListQB64FirstTimeMsg",25),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,91,"IDEsettings.bas");}while(r); } S_786:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,94,"IDEsettings.bas");if(r)goto S_786;} S_787:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,95,"IDEsettings.bas");if(r)goto S_787;} do{ *__BYTE_SAVEEXEWITHSOURCE= -1 ; if(!qbevent)break;evnt(380,96,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_SAVEEXEWITHSOURCE= 0 ; if(!qbevent)break;evnt(380,98,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,99,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_SAVEEXEWITHSOURCE= 0 ; if(!qbevent)break;evnt(380,102,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,103,"IDEsettings.bas");}while(r); } S_797:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("EnableQuickNav",14),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,106,"IDEsettings.bas");if(r)goto S_797;} S_798:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,107,"IDEsettings.bas");if(r)goto S_798;} do{ *__BYTE_ENABLEQUICKNAV= -1 ; if(!qbevent)break;evnt(380,108,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_ENABLEQUICKNAV= 0 ; if(!qbevent)break;evnt(380,110,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("EnableQuickNav",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,111,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_ENABLEQUICKNAV= -1 ; if(!qbevent)break;evnt(380,114,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("EnableQuickNav",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,115,"IDEsettings.bas");}while(r); } S_808:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowErrorsImmediately",21),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,118,"IDEsettings.bas");if(r)goto S_808;} S_809:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,119,"IDEsettings.bas");if(r)goto S_809;} do{ *__BYTE_IDESHOWERRORSIMMEDIATELY= -1 ; if(!qbevent)break;evnt(380,120,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDESHOWERRORSIMMEDIATELY= 0 ; if(!qbevent)break;evnt(380,122,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowErrorsImmediately",21),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,123,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_IDESHOWERRORSIMMEDIATELY= -1 ; if(!qbevent)break;evnt(380,126,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowErrorsImmediately",21),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,127,"IDEsettings.bas");}while(r); } S_819:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbers",15),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,130,"IDEsettings.bas");if(r)goto S_819;} S_820:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,131,"IDEsettings.bas");if(r)goto S_820;} do{ *__BYTE_SHOWLINENUMBERS= -1 ; if(!qbevent)break;evnt(380,132,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_SHOWLINENUMBERS= 0 ; if(!qbevent)break;evnt(380,134,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbers",15),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,135,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_SHOWLINENUMBERS= -1 ; if(!qbevent)break;evnt(380,138,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbers",15),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,139,"IDEsettings.bas");}while(r); } S_830:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersSeparator",24),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,142,"IDEsettings.bas");if(r)goto S_830;} S_831:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,143,"IDEsettings.bas");if(r)goto S_831;} do{ *__BYTE_SHOWLINENUMBERSSEPARATOR= -1 ; if(!qbevent)break;evnt(380,144,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_SHOWLINENUMBERSSEPARATOR= 0 ; if(!qbevent)break;evnt(380,146,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersSeparator",24),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,147,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_SHOWLINENUMBERSSEPARATOR= -1 ; if(!qbevent)break;evnt(380,150,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersSeparator",24),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,151,"IDEsettings.bas");}while(r); } S_841:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersUseBG",20),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,154,"IDEsettings.bas");if(r)goto S_841;} S_842:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,155,"IDEsettings.bas");if(r)goto S_842;} do{ *__BYTE_SHOWLINENUMBERSUSEBG= -1 ; if(!qbevent)break;evnt(380,156,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_SHOWLINENUMBERSUSEBG= 0 ; if(!qbevent)break;evnt(380,158,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersUseBG",20),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,159,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_SHOWLINENUMBERSUSEBG= -1 ; if(!qbevent)break;evnt(380,162,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersUseBG",20),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,163,"IDEsettings.bas");}while(r); } S_852:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BracketHighlight",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,166,"IDEsettings.bas");if(r)goto S_852;} S_853:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,167,"IDEsettings.bas");if(r)goto S_853;} do{ *__INTEGER_BRACKETHIGHLIGHT= -1 ; if(!qbevent)break;evnt(380,168,"IDEsettings.bas");}while(r); }else{ do{ *__INTEGER_BRACKETHIGHLIGHT= 0 ; if(!qbevent)break;evnt(380,170,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BracketHighlight",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,171,"IDEsettings.bas");}while(r); } }else{ do{ *__INTEGER_BRACKETHIGHLIGHT= -1 ; if(!qbevent)break;evnt(380,174,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BracketHighlight",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,175,"IDEsettings.bas");}while(r); } S_863:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("KeywordHighlight",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,178,"IDEsettings.bas");if(r)goto S_863;} S_864:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,179,"IDEsettings.bas");if(r)goto S_864;} do{ *__INTEGER_KEYWORDHIGHLIGHT= -1 ; if(!qbevent)break;evnt(380,180,"IDEsettings.bas");}while(r); }else{ do{ *__INTEGER_KEYWORDHIGHLIGHT= 0 ; if(!qbevent)break;evnt(380,182,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("KeywordHighlight",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,183,"IDEsettings.bas");}while(r); } }else{ do{ *__INTEGER_KEYWORDHIGHLIGHT= -1 ; if(!qbevent)break;evnt(380,186,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("KeywordHighlight",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,187,"IDEsettings.bas");}while(r); } S_874:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("MultiHighlight",14),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,190,"IDEsettings.bas");if(r)goto S_874;} S_875:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,191,"IDEsettings.bas");if(r)goto S_875;} do{ *__INTEGER_MULTIHIGHLIGHT= -1 ; if(!qbevent)break;evnt(380,192,"IDEsettings.bas");}while(r); }else{ do{ *__INTEGER_MULTIHIGHLIGHT= 0 ; if(!qbevent)break;evnt(380,194,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("MultiHighlight",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,195,"IDEsettings.bas");}while(r); } }else{ do{ *__INTEGER_MULTIHIGHLIGHT= -1 ; if(!qbevent)break;evnt(380,198,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("MultiHighlight",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,199,"IDEsettings.bas");}while(r); } S_885:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("IgnoreWarnings",14),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,202,"IDEsettings.bas");if(r)goto S_885;} S_886:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_abs((long double)(func_val(__STRING_VALUE)))== 1 ))))||new_error){ if(qbevent){evnt(380,203,"IDEsettings.bas");if(r)goto S_886;} do{ *__BYTE_IGNOREWARNINGS= -1 ; if(!qbevent)break;evnt(380,204,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IGNOREWARNINGS= 0 ; if(!qbevent)break;evnt(380,206,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("IgnoreWarnings",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,207,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_IGNOREWARNINGS= 0 ; if(!qbevent)break;evnt(380,210,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("IgnoreWarnings",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,211,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BackupSize",10),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,214,"IDEsettings.bas");}while(r); do{ *__LONG_IDEBACKUPSIZE=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,215,"IDEsettings.bas");}while(r); S_898:; if (((-(*__LONG_IDEBACKUPSIZE< 10 ))|(-(*__LONG_IDEBACKUPSIZE> 2000 )))||new_error){ if(qbevent){evnt(380,216,"IDEsettings.bas");if(r)goto S_898;} do{ *__LONG_IDEBACKUPSIZE= 100 ; if(!qbevent)break;evnt(380,216,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BackupSize",10),qbs_new_txt_len("100 'in MB",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,216,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DebugInfo",9),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,218,"IDEsettings.bas");}while(r); do{ *__LONG_IDEDEBUGINFO=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,219,"IDEsettings.bas");}while(r); S_904:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(__STRING_VALUE, 4 )),qbs_new_txt_len("TRUE",4))))||new_error){ if(qbevent){evnt(380,220,"IDEsettings.bas");if(r)goto S_904;} do{ *__LONG_IDEDEBUGINFO= -1 ; if(!qbevent)break;evnt(380,220,"IDEsettings.bas");}while(r); } S_907:; if (((-(*__LONG_RESULT== 0 ))|(-(*__LONG_IDEDEBUGINFO!= -1 )))||new_error){ if(qbevent){evnt(380,221,"IDEsettings.bas");if(r)goto S_907;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DebugInfo",9),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,222,"IDEsettings.bas");}while(r); do{ *__LONG_IDEDEBUGINFO= 0 ; if(!qbevent)break;evnt(380,223,"IDEsettings.bas");}while(r); } do{ *__LONG_INCLUDE_GDB_DEBUGGING_INFO=*__LONG_IDEDEBUGINFO; if(!qbevent)break;evnt(380,225,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_WIKIBASEADDRESS,qbs_new_txt_len("https://qb64phoenix.com/qb64wiki",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,227,"IDEsettings.bas");}while(r); S_913:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("WikiBaseAddress",15),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,228,"IDEsettings.bas");if(r)goto S_913;} do{ qbs_set(__STRING_WIKIBASEADDRESS,__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,229,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("WikiBaseAddress",15),__STRING_WIKIBASEADDRESS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,230,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_MOUSESETTINGSSECTION,qbs_new_txt_len("SwapMouseButton",15),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,235,"IDEsettings.bas");}while(r); S_919:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,236,"IDEsettings.bas");if(r)goto S_919;} do{ *__BYTE_MOUSEBUTTONSWAPPED= -1 ; if(!qbevent)break;evnt(380,237,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_MOUSESETTINGSSECTION,qbs_new_txt_len("SwapMouseButton",15),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,238,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_MOUSEBUTTONSWAPPED= 0 ; if(!qbevent)break;evnt(380,240,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_MOUSESETTINGSSECTION,qbs_new_txt_len("SwapMouseButton",15),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,241,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("BaseTCPPort",11),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,245,"IDEsettings.bas");}while(r); do{ *__LONG_IDEBASETCPPORT=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,246,"IDEsettings.bas");}while(r); S_928:; if ((-(*__LONG_IDEBASETCPPORT== 0 ))||new_error){ if(qbevent){evnt(380,247,"IDEsettings.bas");if(r)goto S_928;} do{ *__LONG_IDEBASETCPPORT= 9000 ; if(!qbevent)break;evnt(380,247,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("BaseTCPPort",11),qbs_new_txt_len("9000",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,247,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("WatchListToConsole",18),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,249,"IDEsettings.bas");}while(r); S_933:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,250,"IDEsettings.bas");if(r)goto S_933;} do{ *__BYTE_WATCHLISTTOCONSOLE= -1 ; if(!qbevent)break;evnt(380,251,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("WatchListToConsole",18),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,252,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_WATCHLISTTOCONSOLE= 0 ; if(!qbevent)break;evnt(380,254,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("WatchListToConsole",18),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,255,"IDEsettings.bas");}while(r); } S_940:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,258,"IDEsettings.bas");if(r)goto S_940;} S_941:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,259,"IDEsettings.bas");if(r)goto S_941;} do{ *__BYTE_AUTOADDDEBUGCOMMAND= -1 ; if(!qbevent)break;evnt(380,260,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_AUTOADDDEBUGCOMMAND= 0 ; if(!qbevent)break;evnt(380,262,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,263,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_AUTOADDDEBUGCOMMAND= -1 ; if(!qbevent)break;evnt(380,266,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,267,"IDEsettings.bas");}while(r); } S_951:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SortSUBs",12),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,271,"IDEsettings.bas");if(r)goto S_951;} S_952:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,272,"IDEsettings.bas");if(r)goto S_952;} do{ *__BYTE_IDESORTSUBS= -1 ; if(!qbevent)break;evnt(380,273,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDESORTSUBS= 0 ; if(!qbevent)break;evnt(380,275,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SortSUBs",12),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,276,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_IDESORTSUBS= 0 ; if(!qbevent)break;evnt(380,279,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SortSUBs",12),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,280,"IDEsettings.bas");}while(r); } S_962:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_KeywordCapital",18),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,283,"IDEsettings.bas");if(r)goto S_962;} S_963:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,284,"IDEsettings.bas");if(r)goto S_963;} do{ *__BYTE_IDEAUTOLAYOUTKWCAPITALS= -1 ; if(!qbevent)break;evnt(380,285,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDEAUTOLAYOUTKWCAPITALS= 0 ; if(!qbevent)break;evnt(380,287,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_KeywordCapital",18),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,288,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_IDEAUTOLAYOUTKWCAPITALS= 0 ; if(!qbevent)break;evnt(380,291,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_KeywordCapital",18),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,292,"IDEsettings.bas");}while(r); } S_973:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SUBsLength",14),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,295,"IDEsettings.bas");if(r)goto S_973;} S_974:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_val(__STRING_VALUE)== -1 ))))||new_error){ if(qbevent){evnt(380,296,"IDEsettings.bas");if(r)goto S_974;} do{ *__BYTE_IDESUBSLENGTH= -1 ; if(!qbevent)break;evnt(380,297,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDESUBSLENGTH= 0 ; if(!qbevent)break;evnt(380,299,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SUBsLength",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,300,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_IDESUBSLENGTH= -1 ; if(!qbevent)break;evnt(380,303,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SUBsLength",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,304,"IDEsettings.bas");}while(r); } S_984:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoPosition",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,307,"IDEsettings.bas");if(r)goto S_984;} S_985:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(func_abs((long double)(func_val(__STRING_VALUE)))== 1 ))))||new_error){ if(qbevent){evnt(380,308,"IDEsettings.bas");if(r)goto S_985;} do{ *__BYTE_IDE_AUTOPOSITION= -1 ; if(!qbevent)break;evnt(380,309,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDE_AUTOPOSITION= 0 ; if(!qbevent)break;evnt(380,311,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoPosition",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,312,"IDEsettings.bas");}while(r); } }else{ do{ *__BYTE_IDE_AUTOPOSITION= -1 ; if(!qbevent)break;evnt(380,315,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoPosition",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,316,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_NormalCursorStart",21),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,319,"IDEsettings.bas");}while(r); do{ *__LONG_IDENORMALCURSORSTART=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,320,"IDEsettings.bas");}while(r); S_997:; if (((-(*__LONG_IDENORMALCURSORSTART< 0 ))|(-(*__LONG_IDENORMALCURSORSTART> 31 ))|(-(*__LONG_RESULT== 0 )))||new_error){ if(qbevent){evnt(380,321,"IDEsettings.bas");if(r)goto S_997;} do{ *__LONG_IDENORMALCURSORSTART= 6 ; if(!qbevent)break;evnt(380,322,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_NormalCursorStart",21),qbs_new_txt_len("6",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,323,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_NormalCursorEnd",19),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,326,"IDEsettings.bas");}while(r); do{ *__LONG_IDENORMALCURSOREND=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,327,"IDEsettings.bas");}while(r); S_1003:; if (((-(*__LONG_IDENORMALCURSOREND< 0 ))|(-(*__LONG_IDENORMALCURSOREND> 31 ))|(-(*__LONG_RESULT== 0 )))||new_error){ if(qbevent){evnt(380,328,"IDEsettings.bas");if(r)goto S_1003;} do{ *__LONG_IDENORMALCURSOREND= 8 ; if(!qbevent)break;evnt(380,329,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_NormalCursorEnd",19),qbs_new_txt_len("8",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,330,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoFormat",14),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,333,"IDEsettings.bas");}while(r); do{ *__LONG_IDEAUTOLAYOUT=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,334,"IDEsettings.bas");}while(r); S_1009:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(*__LONG_IDEAUTOLAYOUT!= 0 ))))||new_error){ if(qbevent){evnt(380,335,"IDEsettings.bas");if(r)goto S_1009;} do{ *__LONG_IDEAUTOLAYOUT= 1 ; if(!qbevent)break;evnt(380,336,"IDEsettings.bas");}while(r); }else{ S_1012:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("FALSE",5)))&(qbs_notequal(__STRING_VALUE,qbs_new_txt_len("0",1)))))||new_error){ if(qbevent){evnt(380,338,"IDEsettings.bas");if(r)goto S_1012;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoFormat",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,339,"IDEsettings.bas");}while(r); do{ *__LONG_IDEAUTOLAYOUT= 1 ; if(!qbevent)break;evnt(380,340,"IDEsettings.bas");}while(r); }else{ do{ *__LONG_IDEAUTOLAYOUT= 0 ; if(!qbevent)break;evnt(380,342,"IDEsettings.bas");}while(r); } } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoIndent",14),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,346,"IDEsettings.bas");}while(r); do{ *__LONG_IDEAUTOINDENT=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,347,"IDEsettings.bas");}while(r); S_1021:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(*__LONG_IDEAUTOINDENT!= 0 ))))||new_error){ if(qbevent){evnt(380,348,"IDEsettings.bas");if(r)goto S_1021;} do{ *__LONG_IDEAUTOINDENT= 1 ; if(!qbevent)break;evnt(380,349,"IDEsettings.bas");}while(r); }else{ S_1024:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("FALSE",5)))&(qbs_notequal(__STRING_VALUE,qbs_new_txt_len("0",1)))))||new_error){ if(qbevent){evnt(380,351,"IDEsettings.bas");if(r)goto S_1024;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoIndent",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,352,"IDEsettings.bas");}while(r); do{ *__LONG_IDEAUTOINDENT= 1 ; if(!qbevent)break;evnt(380,353,"IDEsettings.bas");}while(r); }else{ do{ *__LONG_IDEAUTOINDENT= 0 ; if(!qbevent)break;evnt(380,355,"IDEsettings.bas");}while(r); } } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSUBs",14),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,359,"IDEsettings.bas");}while(r); do{ *__LONG_IDEINDENTSUBS=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,360,"IDEsettings.bas");}while(r); S_1033:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(*__LONG_IDEINDENTSUBS!= 0 ))))||new_error){ if(qbevent){evnt(380,361,"IDEsettings.bas");if(r)goto S_1033;} do{ *__LONG_IDEINDENTSUBS= 1 ; if(!qbevent)break;evnt(380,362,"IDEsettings.bas");}while(r); }else{ S_1036:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("FALSE",5)))&(qbs_notequal(__STRING_VALUE,qbs_new_txt_len("0",1)))))||new_error){ if(qbevent){evnt(380,364,"IDEsettings.bas");if(r)goto S_1036;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSUBs",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,365,"IDEsettings.bas");}while(r); do{ *__LONG_IDEINDENTSUBS= 1 ; if(!qbevent)break;evnt(380,366,"IDEsettings.bas");}while(r); }else{ do{ *__LONG_IDEINDENTSUBS= 0 ; if(!qbevent)break;evnt(380,368,"IDEsettings.bas");}while(r); } } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSize",14),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,372,"IDEsettings.bas");}while(r); do{ *__LONG_IDEAUTOINDENTSIZE=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,373,"IDEsettings.bas");}while(r); S_1045:; if (((-(*__LONG_IDEAUTOINDENTSIZE< 1 ))|(-(*__LONG_IDEAUTOINDENTSIZE> 64 )))||new_error){ if(qbevent){evnt(380,374,"IDEsettings.bas");if(r)goto S_1045;} do{ *__LONG_IDEAUTOINDENTSIZE= 4 ; if(!qbevent)break;evnt(380,375,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSize",14),qbs_new_txt_len("4",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,376,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont",14),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,379,"IDEsettings.bas");}while(r); do{ *__LONG_IDECUSTOMFONT=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,380,"IDEsettings.bas");}while(r); S_1051:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4)))|(-(*__LONG_IDECUSTOMFONT!= 0 ))))||new_error){ if(qbevent){evnt(380,381,"IDEsettings.bas");if(r)goto S_1051;} do{ *__LONG_IDECUSTOMFONT= 1 ; if(!qbevent)break;evnt(380,382,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,384,"IDEsettings.bas");}while(r); do{ *__LONG_IDECUSTOMFONT= 0 ; if(!qbevent)break;evnt(380,385,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_UseFont8",12),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,388,"IDEsettings.bas");}while(r); S_1058:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_VALUE),qbs_new_txt_len("TRUE",4))))||new_error){ if(qbevent){evnt(380,389,"IDEsettings.bas");if(r)goto S_1058;} do{ *__BYTE_IDE_USEFONT8= 1 ; if(!qbevent)break;evnt(380,390,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_UseFont8",12),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,392,"IDEsettings.bas");}while(r); do{ *__BYTE_IDE_USEFONT8= 0 ; if(!qbevent)break;evnt(380,393,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont$",15),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,396,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_IDECUSTOMFONTFILE,__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,397,"IDEsettings.bas");}while(r); S_1066:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_RESULT== 0 ))|(qbs_equal(__STRING_IDECUSTOMFONTFILE,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(380,398,"IDEsettings.bas");if(r)goto S_1066;} 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(380,399,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont$",15),__STRING_IDECUSTOMFONTFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,400,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFontSize",18),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,403,"IDEsettings.bas");}while(r); do{ *__LONG_IDECUSTOMFONTHEIGHT=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,404,"IDEsettings.bas");}while(r); S_1072:; if (((-(*__LONG_IDECUSTOMFONTHEIGHT< 8 ))|(-(*__LONG_IDECUSTOMFONTHEIGHT> 100 )))||new_error){ if(qbevent){evnt(380,405,"IDEsettings.bas");if(r)goto S_1072;} do{ *__LONG_IDECUSTOMFONTHEIGHT= 21 ; if(!qbevent)break;evnt(380,405,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFontSize",18),qbs_new_txt_len("21",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,405,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CodePage",12),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,407,"IDEsettings.bas");}while(r); do{ *__LONG_IDECPINDEX=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,408,"IDEsettings.bas");}while(r); S_1078:; if (((-(*__LONG_IDECPINDEX< 0 ))|(-(*__LONG_IDECPINDEX> 27 )))||new_error){ if(qbevent){evnt(380,409,"IDEsettings.bas");if(r)goto S_1078;} do{ *__LONG_IDECPINDEX= 0 ; if(!qbevent)break;evnt(380,409,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CodePage",12),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,409,"IDEsettings.bas");}while(r); } S_1082:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_CUSTOMDICTIONARYSECTION,qbs_new_txt_len("CustomKeywords$",15),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,412,"IDEsettings.bas");if(r)goto S_1082;} do{ qbs_set(__STRING_TEMPLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,413,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),qbs_ucase(__STRING_VALUE)),qbs_new_txt_len("@",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,414,"IDEsettings.bas");}while(r); S_1085:; fornext_value31= 1 ; fornext_finalvalue31=__STRING_LISTOFCUSTOMKEYWORDS->len; fornext_step31= 1 ; if (fornext_step31<0) fornext_step_negative31=1; else fornext_step_negative31=0; if (new_error) goto fornext_error31; goto fornext_entrylabel31; while(1){ fornext_value31=fornext_step31+(*__LONG_I); fornext_entrylabel31: *__LONG_I=fornext_value31; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative31){ if (fornext_value31fornext_finalvalue31) break; } fornext_error31:; if(qbevent){evnt(380,415,"IDEsettings.bas");if(r)goto S_1085;} do{ *__LONG_CHECKCHAR=qbs_asc(__STRING_LISTOFCUSTOMKEYWORDS,*__LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,416,"IDEsettings.bas");}while(r); S_1087:; if ((-(*__LONG_CHECKCHAR== 64 ))||new_error){ if(qbevent){evnt(380,417,"IDEsettings.bas");if(r)goto S_1087;} S_1088:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_TEMPLIST, 1 ),qbs_new_txt_len("@",1))))||new_error){ if(qbevent){evnt(380,418,"IDEsettings.bas");if(r)goto S_1088;} do{ qbs_set(__STRING_TEMPLIST,qbs_add(__STRING_TEMPLIST,qbs_new_txt_len("@",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,418,"IDEsettings.bas");}while(r); } }else{ do{ qbs_set(__STRING_TEMPLIST,qbs_add(__STRING_TEMPLIST,func_chr(*__LONG_CHECKCHAR))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,420,"IDEsettings.bas");}while(r); } fornext_continue_30:; } fornext_exit_30:; do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,__STRING_TEMPLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,423,"IDEsettings.bas");}while(r); do{ *__LONG_CUSTOMKEYWORDSLENGTH=__STRING_LISTOFCUSTOMKEYWORDS->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,424,"IDEsettings.bas");}while(r); }else{ do{ SUB_INISETADDQUOTES(&(pass34= -1 )); if(!qbevent)break;evnt(380,426,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_CUSTOMDICTIONARYSECTION,qbs_new_txt_len("Instructions1",13),qbs_new_txt_len("Add custom keywords separated by the 'at' sign.",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,427,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_CUSTOMDICTIONARYSECTION,qbs_new_txt_len("Instructions2",13),qbs_new_txt_len("Useful to colorize constants (eg @true@false@).",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,428,"IDEsettings.bas");}while(r); do{ SUB_INISETADDQUOTES(&(pass35= 0 )); if(!qbevent)break;evnt(380,429,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_CUSTOMDICTIONARYSECTION,qbs_new_txt_len("CustomKeywords$",15),qbs_new_txt_len("@",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,430,"IDEsettings.bas");}while(r); } do{ SUB_INISETADDQUOTES(&(pass36= -1 )); if(!qbevent)break;evnt(380,434,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_new_txt_len("Instructions1",13),qbs_new_txt_len("Create custom color schemes in the IDE (Options->IDE Colors).",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,435,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_new_txt_len("Instructions2",13),qbs_new_txt_len("Custom color schemes will be stored in this section.",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,436,"IDEsettings.bas");}while(r); do{ SUB_INISETADDQUOTES(&(pass37= 0 )); if(!qbevent)break;evnt(380,437,"IDEsettings.bas");}while(r); S_1108:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_TopPosition",15),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,440,"IDEsettings.bas");if(r)goto S_1108;} do{ *__INTEGER_IDE_TOPPOSITION=qbr_float_to_long(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,441,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDE_BYPASSAUTOPOSITION= -1 ; if(!qbevent)break;evnt(380,443,"IDEsettings.bas");}while(r); do{ *__INTEGER_IDE_TOPPOSITION= 0 ; if(!qbevent)break;evnt(380,444,"IDEsettings.bas");}while(r); } S_1114:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_LeftPosition",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,447,"IDEsettings.bas");if(r)goto S_1114;} do{ *__INTEGER_IDE_LEFTPOSITION=qbr_float_to_long(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,448,"IDEsettings.bas");}while(r); }else{ do{ *__BYTE_IDE_BYPASSAUTOPOSITION= -1 ; if(!qbevent)break;evnt(380,450,"IDEsettings.bas");}while(r); do{ *__INTEGER_IDE_LEFTPOSITION= 0 ; if(!qbevent)break;evnt(380,451,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Width",9),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,454,"IDEsettings.bas");}while(r); do{ *__LONG_IDEWX=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,455,"IDEsettings.bas");}while(r); S_1122:; if (((-(*__LONG_IDEWX< 80 ))|(-(*__LONG_IDEWX> 1000 )))||new_error){ if(qbevent){evnt(380,456,"IDEsettings.bas");if(r)goto S_1122;} do{ *__LONG_IDEWX= 80 ; if(!qbevent)break;evnt(380,456,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Width",9),qbs_new_txt_len("80",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,456,"IDEsettings.bas");}while(r); } do{ *__LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Height",10),__STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,458,"IDEsettings.bas");}while(r); do{ *__LONG_IDEWY=qbr(func_val(__STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,459,"IDEsettings.bas");}while(r); S_1128:; if (((-(*__LONG_IDEWY< 25 ))|(-(*__LONG_IDEWY> 1000 )))||new_error){ if(qbevent){evnt(380,460,"IDEsettings.bas");if(r)goto S_1128;} do{ *__LONG_IDEWY= 25 ; if(!qbevent)break;evnt(380,460,"IDEsettings.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Height",10),qbs_new_txt_len("25",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,460,"IDEsettings.bas");}while(r); } do{ *__ULONG_IDETEXTCOLOR=func__rgb32( 216 , 216 , 216 ); if(!qbevent)break;evnt(380,464,"IDEsettings.bas");}while(r); do{ *__ULONG_IDEKEYWORDCOLOR=func__rgb32( 69 , 118 , 147 ); if(!qbevent)break;evnt(380,465,"IDEsettings.bas");}while(r); do{ *__ULONG_IDENUMBERSCOLOR=func__rgb32( 216 , 98 , 78 ); if(!qbevent)break;evnt(380,466,"IDEsettings.bas");}while(r); do{ *__ULONG_IDEQUOTECOLOR=func__rgb32( 255 , 167 , 0 ); if(!qbevent)break;evnt(380,467,"IDEsettings.bas");}while(r); do{ *__ULONG_IDEMETACOMMANDCOLOR=func__rgb32( 85 , 206 , 85 ); if(!qbevent)break;evnt(380,468,"IDEsettings.bas");}while(r); do{ *__ULONG_IDECOMMENTCOLOR=func__rgb32( 98 , 98 , 98 ); if(!qbevent)break;evnt(380,469,"IDEsettings.bas");}while(r); do{ *__ULONG_IDECHROMACOLOR=func__rgb32( 170 , 170 , 170 ); if(!qbevent)break;evnt(380,470,"IDEsettings.bas");}while(r); do{ *__ULONG_IDEBACKGROUNDCOLOR=func__rgb32( 0 , 0 , 39 ); if(!qbevent)break;evnt(380,471,"IDEsettings.bas");}while(r); do{ *__ULONG_IDEBACKGROUNDCOLOR2=func__rgb32( 0 , 49 , 78 ); if(!qbevent)break;evnt(380,472,"IDEsettings.bas");}while(r); do{ *__ULONG_IDEBRACKETHIGHLIGHTCOLOR=func__rgb32( 0 , 88 , 108 ); if(!qbevent)break;evnt(380,473,"IDEsettings.bas");}while(r); S_1142:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("SchemeID",8),__STRING_VALUE)== 0 )))||new_error){ if(qbevent){evnt(380,476,"IDEsettings.bas");if(r)goto S_1142;} do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("SchemeID",8),qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,477,"IDEsettings.bas");}while(r); } S_1145:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("TextColor",9),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,480,"IDEsettings.bas");if(r)goto S_1145;} do{ *__ULONG_IDETEXTCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDETEXTCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,481,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("TextColor",9),FUNC_RGBS(__ULONG_IDETEXTCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,482,"IDEsettings.bas");}while(r); } S_1150:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("KeywordColor",12),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,485,"IDEsettings.bas");if(r)goto S_1150;} do{ *__ULONG_IDEKEYWORDCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDEKEYWORDCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,486,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("KeywordColor",12),FUNC_RGBS(__ULONG_IDEKEYWORDCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,487,"IDEsettings.bas");}while(r); } S_1155:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("NumbersColor",12),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,490,"IDEsettings.bas");if(r)goto S_1155;} do{ *__ULONG_IDENUMBERSCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDENUMBERSCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,491,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("NumbersColor",12),FUNC_RGBS(__ULONG_IDENUMBERSCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,492,"IDEsettings.bas");}while(r); } S_1160:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("QuoteColor",10),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,495,"IDEsettings.bas");if(r)goto S_1160;} do{ *__ULONG_IDEQUOTECOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDEQUOTECOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,496,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("QuoteColor",10),FUNC_RGBS(__ULONG_IDEQUOTECOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,497,"IDEsettings.bas");}while(r); } S_1165:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("CommentColor",12),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,500,"IDEsettings.bas");if(r)goto S_1165;} do{ *__ULONG_IDECOMMENTCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDECOMMENTCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,501,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("CommentColor",12),FUNC_RGBS(__ULONG_IDECOMMENTCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,502,"IDEsettings.bas");}while(r); } S_1170:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("ChromaColor",11),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,505,"IDEsettings.bas");if(r)goto S_1170;} do{ *__ULONG_IDECHROMACOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDECHROMACOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,506,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("ChromaColor",11),FUNC_RGBS(__ULONG_IDECHROMACOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,507,"IDEsettings.bas");}while(r); } S_1175:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("MetaCommandColor",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,510,"IDEsettings.bas");if(r)goto S_1175;} do{ *__ULONG_IDEMETACOMMANDCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDEMETACOMMANDCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,511,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("MetaCommandColor",16),FUNC_RGBS(__ULONG_IDEMETACOMMANDCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,512,"IDEsettings.bas");}while(r); } S_1180:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("HighlightColor",14),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,515,"IDEsettings.bas");if(r)goto S_1180;} do{ *__ULONG_IDEBRACKETHIGHLIGHTCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDEBRACKETHIGHLIGHTCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,516,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("HighlightColor",14),FUNC_RGBS(__ULONG_IDEBRACKETHIGHLIGHTCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,517,"IDEsettings.bas");}while(r); } S_1185:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("BackgroundColor",15),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,520,"IDEsettings.bas");if(r)goto S_1185;} do{ *__ULONG_IDEBACKGROUNDCOLOR=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDEBACKGROUNDCOLOR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,521,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("BackgroundColor",15),FUNC_RGBS(__ULONG_IDEBACKGROUNDCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,522,"IDEsettings.bas");}while(r); } S_1190:; if ((qbs_cleanup(qbs_tmp_base,FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("BackgroundColor2",16),__STRING_VALUE)))||new_error){ if(qbevent){evnt(380,525,"IDEsettings.bas");if(r)goto S_1190;} do{ *__ULONG_IDEBACKGROUNDCOLOR2=FUNC_VRGBS(__STRING_VALUE,__ULONG_IDEBACKGROUNDCOLOR2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,526,"IDEsettings.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("BackgroundColor2",16),FUNC_RGBS(__ULONG_IDEBACKGROUNDCOLOR2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,527,"IDEsettings.bas");}while(r); } do{ *__ULONG_OPTIMIZECPPPROGRAM=FUNC_READWRITEBOOLEANSETTINGVALUE(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("OptimizeCppProgram",18),&(pass38= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,531,"IDEsettings.bas");}while(r); do{ *__ULONG_STRIPDEBUGSYMBOLS=FUNC_READWRITEBOOLEANSETTINGVALUE(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("StripDebugSymbols",17),&(pass39= -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,532,"IDEsettings.bas");}while(r); do{ *__ULONG_MAXPARALLELPROCESSES=FUNC_READWRITELONGSETTINGVALUE(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("MaxParallelProcesses",20),&(pass40= 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,534,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_EXTRACPPFLAGS,FUNC_READWRITESTRINGSETTINGVALUE(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("ExtraCppFlags",13),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,536,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_EXTRALINKERFLAGS,FUNC_READWRITESTRINGSETTINGVALUE(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("ExtraLinkerFlags",16),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,537,"IDEsettings.bas");}while(r); do{ *__ULONG_USEMINIAUDIOBACKEND=FUNC_READWRITEBOOLEANSETTINGVALUE(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("UseMiniaudioBackend",19),&(pass41= -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(380,539,"IDEsettings.bas");}while(r); do{ qbs_set(__STRING_CMDLINEFILE,FUNC_PARSECMDLINEARGS()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(382);}while(r); S_1202:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(384);if(r)goto S_1202;} do{ sub__dest(func__console()); if(!qbevent)break;evnt(385);}while(r); }else{ do{ sub__console( 2 ); if(!qbevent)break;evnt(387);}while(r); do{ sub__screenshow(); if(!qbevent)break;evnt(388);}while(r); do{ sub__icon(NULL,NULL,0); if(!qbevent)break;evnt(389);}while(r); } do{ if(!qbevent)break;evnt(446);}while(r); do{ if(!qbevent)break;evnt(447);}while(r); do{ if(!qbevent)break;evnt(448);}while(r); do{ if(!qbevent)break;evnt(449);}while(r); do{ if(!qbevent)break;evnt(450);}while(r); do{ if(!qbevent)break;evnt(451);}while(r); do{ if(!qbevent)break;evnt(452);}while(r); do{ if(!qbevent)break;evnt(453);}while(r); do{ if(!qbevent)break;evnt(454);}while(r); do{ if (__ARRAY_INTEGER_HASH1CHAR[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_HASH1CHAR[2]&1){ if (!error_occurred) 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(456);}while(r); do{ if (__ARRAY_INTEGER_HASH2CHAR[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_HASH2CHAR[2]&1){ if (!error_occurred) 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(457);}while(r); S_1220:; fornext_value43= 1 ; fornext_finalvalue43= 26 ; fornext_step43= 1 ; if (fornext_step43<0) fornext_step_negative43=1; else fornext_step_negative43=0; if (new_error) goto fornext_error43; goto fornext_entrylabel43; while(1){ fornext_value43=fornext_step43+(*__LONG_X); fornext_entrylabel43: *__LONG_X=fornext_value43; if (fornext_step_negative43){ if (fornext_value43fornext_finalvalue43) break; } fornext_error43:; if(qbevent){evnt(458);if(r)goto S_1220;} 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(459);}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(460);}while(r); fornext_continue_42:; } fornext_exit_42:; 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(462);}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(463);}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(464);}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(465);}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(466);}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(467);}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(468);}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(469);}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(470);}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(471);}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(472);}while(r); S_1235:; fornext_value45= 0 ; fornext_finalvalue45= 255 ; fornext_step45= 1 ; if (fornext_step45<0) fornext_step_negative45=1; else fornext_step_negative45=0; if (new_error) goto fornext_error45; goto fornext_entrylabel45; while(1){ fornext_value45=fornext_step45+(*__LONG_C1); fornext_entrylabel45: *__LONG_C1=fornext_value45; if (fornext_step_negative45){ if (fornext_value45fornext_finalvalue45) break; } fornext_error45:; if(qbevent){evnt(473);if(r)goto S_1235;} S_1236:; fornext_value47= 0 ; fornext_finalvalue47= 255 ; fornext_step47= 1 ; if (fornext_step47<0) fornext_step_negative47=1; else fornext_step_negative47=0; if (new_error) goto fornext_error47; goto fornext_entrylabel47; while(1){ fornext_value47=fornext_step47+(*__LONG_C2); fornext_entrylabel47: *__LONG_C2=fornext_value47; if (fornext_step_negative47){ if (fornext_value47fornext_finalvalue47) break; } fornext_error47:; if(qbevent){evnt(474);if(r)goto S_1236;} 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(475);}while(r); fornext_continue_46:; } fornext_exit_46:; fornext_continue_44:; } fornext_exit_44:; do{ *__LONG_HASHLISTSIZE= 65536 ; if(!qbevent)break;evnt(479);}while(r); do{ *__LONG_HASHLISTNEXT= 1 ; if(!qbevent)break;evnt(480);}while(r); do{ *__LONG_HASHLISTFREESIZE= 1024 ; if(!qbevent)break;evnt(481);}while(r); do{ *__LONG_HASHLISTFREELAST= 0 ; if(!qbevent)break;evnt(482);}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(483);}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(484);}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(485);}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(486);}while(r); do{ if(!qbevent)break;evnt(513);}while(r); do{ *__LONG_LABELS_UBOUND= 100 ; if(!qbevent)break;evnt(514);}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]*2256/8+1); memset((void*)(__ARRAY_UDT_LABELS[0]),0,__ARRAY_UDT_LABELS[5]*2256/8+1); }else{ __ARRAY_UDT_LABELS[0]=(ptrszint)calloc(__ARRAY_UDT_LABELS[5]*2256/8+1,1); if (!__ARRAY_UDT_LABELS[0]) error(257); } __ARRAY_UDT_LABELS[2]|=1; } if(!qbevent)break;evnt(515);}while(r); do{ if(!qbevent)break;evnt(516);}while(r); do{ if(!qbevent)break;evnt(518);}while(r); do{ if(!qbevent)break;evnt(519);}while(r); do{ if(!qbevent)break;evnt(520);}while(r); do{ if(!qbevent)break;evnt(522);}while(r); do{ if(!qbevent)break;evnt(524);}while(r); do{ if(!qbevent)break;evnt(526);}while(r); do{ if(!qbevent)break;evnt(529);}while(r); do{ if(!qbevent)break;evnt(531);}while(r); do{ if (__ARRAY_LONG_REVERTMAYMUSTHAVE[2]&2){ error(10); }else{ if (__ARRAY_LONG_REVERTMAYMUSTHAVE[2]&1){ if (!error_occurred) 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(533);}while(r); do{ if(!qbevent)break;evnt(534);}while(r); do{ if(!qbevent)break;evnt(536);}while(r); do{ if(!qbevent)break;evnt(538);}while(r); do{ if(!qbevent)break;evnt(541);}while(r); do{ if (__ARRAY_STRING_INCNAME[2]&2){ error(10); }else{ if (__ARRAY_STRING_INCNAME[2]&1){ if (!error_occurred) 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(542);}while(r); do{ if (__ARRAY_LONG_INCLINENUMBER[2]&2){ error(10); }else{ if (__ARRAY_LONG_INCLINENUMBER[2]&1){ if (!error_occurred) 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(543);}while(r); do{ if(!qbevent)break;evnt(544);}while(r); do{ if(!qbevent)break;evnt(547);}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(548);}while(r); do{ if(!qbevent)break;evnt(550);}while(r); do{ if(!qbevent)break;evnt(551);}while(r); do{ if(!qbevent)break;evnt(553);}while(r); do{ if(!qbevent)break;evnt(555);}while(r); do{ if(!qbevent)break;evnt(556);}while(r); do{ if(!qbevent)break;evnt(559);}while(r); do{ if (__ARRAY_LONG_ALPHANUMERIC[2]&2){ error(10); }else{ if (__ARRAY_LONG_ALPHANUMERIC[2]&1){ if (!error_occurred) 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(561);}while(r); S_1277:; fornext_value49= 48 ; fornext_finalvalue49= 57 ; fornext_step49= 1 ; if (fornext_step49<0) fornext_step_negative49=1; else fornext_step_negative49=0; if (new_error) goto fornext_error49; goto fornext_entrylabel49; while(1){ fornext_value49=fornext_step49+(*__LONG_I); fornext_entrylabel49: *__LONG_I=fornext_value49; if (fornext_step_negative49){ if (fornext_value49fornext_finalvalue49) break; } fornext_error49:; if(qbevent){evnt(562);if(r)goto S_1277;} 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(563);}while(r); fornext_continue_48:; } fornext_exit_48:; S_1280:; fornext_value51= 65 ; fornext_finalvalue51= 90 ; fornext_step51= 1 ; if (fornext_step51<0) fornext_step_negative51=1; else fornext_step_negative51=0; if (new_error) goto fornext_error51; goto fornext_entrylabel51; while(1){ fornext_value51=fornext_step51+(*__LONG_I); fornext_entrylabel51: *__LONG_I=fornext_value51; if (fornext_step_negative51){ if (fornext_value51fornext_finalvalue51) break; } fornext_error51:; if(qbevent){evnt(565);if(r)goto S_1280;} 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(566);}while(r); fornext_continue_50:; } fornext_exit_50:; S_1283:; fornext_value53= 97 ; fornext_finalvalue53= 122 ; fornext_step53= 1 ; if (fornext_step53<0) fornext_step_negative53=1; else fornext_step_negative53=0; if (new_error) goto fornext_error53; goto fornext_entrylabel53; while(1){ fornext_value53=fornext_step53+(*__LONG_I); fornext_entrylabel53: *__LONG_I=fornext_value53; if (fornext_step_negative53){ if (fornext_value53fornext_finalvalue53) break; } fornext_error53:; if(qbevent){evnt(568);if(r)goto S_1283;} 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(569);}while(r); fornext_continue_52:; } fornext_exit_52:; 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(572);}while(r); do{ if (__ARRAY_LONG_ISALPHA[2]&2){ error(10); }else{ if (__ARRAY_LONG_ISALPHA[2]&1){ if (!error_occurred) 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(574);}while(r); S_1288:; fornext_value55= 65 ; fornext_finalvalue55= 90 ; fornext_step55= 1 ; if (fornext_step55<0) fornext_step_negative55=1; else fornext_step_negative55=0; if (new_error) goto fornext_error55; goto fornext_entrylabel55; while(1){ fornext_value55=fornext_step55+(*__LONG_I); fornext_entrylabel55: *__LONG_I=fornext_value55; if (fornext_step_negative55){ if (fornext_value55fornext_finalvalue55) break; } fornext_error55:; if(qbevent){evnt(575);if(r)goto S_1288;} 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(576);}while(r); fornext_continue_54:; } fornext_exit_54:; S_1291:; fornext_value57= 97 ; fornext_finalvalue57= 122 ; fornext_step57= 1 ; if (fornext_step57<0) fornext_step_negative57=1; else fornext_step_negative57=0; if (new_error) goto fornext_error57; goto fornext_entrylabel57; while(1){ fornext_value57=fornext_step57+(*__LONG_I); fornext_entrylabel57: *__LONG_I=fornext_value57; if (fornext_step_negative57){ if (fornext_value57fornext_finalvalue57) break; } fornext_error57:; if(qbevent){evnt(578);if(r)goto S_1291;} 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(579);}while(r); fornext_continue_56:; } fornext_exit_56:; 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(582);}while(r); do{ if (__ARRAY_LONG_ISNUMERIC[2]&2){ error(10); }else{ if (__ARRAY_LONG_ISNUMERIC[2]&1){ if (!error_occurred) 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(584);}while(r); S_1296:; fornext_value59= 48 ; fornext_finalvalue59= 57 ; fornext_step59= 1 ; if (fornext_step59<0) fornext_step_negative59=1; else fornext_step_negative59=0; if (new_error) goto fornext_error59; goto fornext_entrylabel59; while(1){ fornext_value59=fornext_step59+(*__LONG_I); fornext_entrylabel59: *__LONG_I=fornext_value59; if (fornext_step_negative59){ if (fornext_value59fornext_finalvalue59) break; } fornext_error59:; if(qbevent){evnt(585);if(r)goto S_1296;} 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(586);}while(r); fornext_continue_58:; } fornext_exit_58:; do{ if (__ARRAY_LONG_LFSINGLECHAR[2]&2){ error(10); }else{ if (__ARRAY_LONG_LFSINGLECHAR[2]&1){ if (!error_occurred) 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(590);}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(591);}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(592);}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(593);}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(594);}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(595);}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(596);}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(597);}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(598);}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(599);}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(600);}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(601);}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(603);}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(604);}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(605);}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(606);}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(608);}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(609);}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(610);}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(611);}while(r); do{ if(!qbevent)break;evnt(622);}while(r); do{ if(!qbevent)break;evnt(624);}while(r); do{ if(!qbevent)break;evnt(625);}while(r); do{ if(!qbevent)break;evnt(627);}while(r); do{ if(!qbevent)break;evnt(629);}while(r); do{ if(!qbevent)break;evnt(630);}while(r); do{ if(!qbevent)break;evnt(631);}while(r); do{ if(!qbevent)break;evnt(632);}while(r); do{ if(!qbevent)break;evnt(635);}while(r); do{ *__LONG_CONSTMAX= 100 ; if(!qbevent)break;evnt(636);}while(r); do{ if(!qbevent)break;evnt(637);}while(r); do{ *__LONG_CONSTLAST= -1 ; if(!qbevent)break;evnt(638);}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(639);}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(640);}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(641);}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(645);}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(647);}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(648);}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(649);}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(650);}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(651);}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(652);}while(r); do{ if(!qbevent)break;evnt(656);}while(r); do{ if(!qbevent)break;evnt(657);}while(r); do{ if(!qbevent)break;evnt(707);}while(r); do{ if(!qbevent)break;evnt(709);}while(r); do{ if(!qbevent)break;evnt(710);}while(r); do{ *__LONG_IDS_MAX= 1024 ; if(!qbevent)break;evnt(711);}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){ tmp_long=__ARRAY_UDT_IDS[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_IDS[0]+(22952/8+1-1)*tmp_long+ 2861));} 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; __ARRAY_UDT_IDS[0]=(ptrszint)malloc(__ARRAY_UDT_IDS[5]*22952/8+1); if (!__ARRAY_UDT_IDS[0]) error(257); __ARRAY_UDT_IDS[2]|=1; tmp_long=__ARRAY_UDT_IDS[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_IDS[0]+(22952/8+1-1)*tmp_long+ 2861)=qbs_new(0,0);} } if(!qbevent)break;evnt(712);}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(713);}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(714);}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(715);}while(r); do{ if(!qbevent)break;evnt(719);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(256)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(720);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(0)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(721);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(520)),8,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(722);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(528)),8,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(723);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(724);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(813)),400,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(725);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(1213)),400,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(726);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(1613)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(727);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(1869)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(728);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2125)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(729);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2385)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(730);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2647)),100,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(731);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_CLEARIDDATA)+(2747)),100,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(732);}while(r); do{ if(!qbevent)break;evnt(734);}while(r); do{ if(!qbevent)break;evnt(735);}while(r); do{ if(!qbevent)break;evnt(736);}while(r); do{ if(!qbevent)break;evnt(737);}while(r); do{ if(!qbevent)break;evnt(738);}while(r); do{ if(!qbevent)break;evnt(739);}while(r); do{ if(!qbevent)break;evnt(740);}while(r); do{ if(!qbevent)break;evnt(741);}while(r); do{ if(!qbevent)break;evnt(742);}while(r); do{ if(!qbevent)break;evnt(743);}while(r); do{ if(!qbevent)break;evnt(744);}while(r); do{ if(!qbevent)break;evnt(746);}while(r); do{ if(!qbevent)break;evnt(747);}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(!qbevent)break;evnt(757);}while(r); do{ if(!qbevent)break;evnt(758);}while(r); do{ if(!qbevent)break;evnt(759);}while(r); do{ if(!qbevent)break;evnt(760);}while(r); do{ if(!qbevent)break;evnt(761);}while(r); do{ if(!qbevent)break;evnt(762);}while(r); do{ if(!qbevent)break;evnt(764);}while(r); do{ if(!qbevent)break;evnt(765);}while(r); do{ if(!qbevent)break;evnt(766);}while(r); do{ if(!qbevent)break;evnt(767);}while(r); do{ if(!qbevent)break;evnt(768);}while(r); do{ if(!qbevent)break;evnt(769);}while(r); do{ if(!qbevent)break;evnt(770);}while(r); do{ if(!qbevent)break;evnt(774);}while(r); do{ if(!qbevent)break;evnt(775);}while(r); do{ if(!qbevent)break;evnt(779);}while(r); do{ if(!qbevent)break;evnt(780);}while(r); do{ if(!qbevent)break;evnt(781);}while(r); do{ if(!qbevent)break;evnt(782);}while(r); do{ if(!qbevent)break;evnt(783);}while(r); do{ if(!qbevent)break;evnt(784);}while(r); do{ if(!qbevent)break;evnt(785);}while(r); do{ if(!qbevent)break;evnt(786);}while(r); do{ if(!qbevent)break;evnt(787);}while(r); do{ if(!qbevent)break;evnt(788);}while(r); do{ if(!qbevent)break;evnt(789);}while(r); do{ if(!qbevent)break;evnt(793);}while(r); do{ if(!qbevent)break;evnt(794);}while(r); do{ if(!qbevent)break;evnt(795);}while(r); do{ if(!qbevent)break;evnt(796);}while(r); do{ if(!qbevent)break;evnt(797);}while(r); do{ if(!qbevent)break;evnt(799);}while(r); do{ if(!qbevent)break;evnt(801);}while(r); do{ if(!qbevent)break;evnt(802);}while(r); do{ if(!qbevent)break;evnt(803);}while(r); do{ if(!qbevent)break;evnt(805);}while(r); do{ if(!qbevent)break;evnt(806);}while(r); do{ if(!qbevent)break;evnt(808);}while(r); do{ if(!qbevent)break;evnt(809);}while(r); do{ if(!qbevent)break;evnt(810);}while(r); do{ if(!qbevent)break;evnt(811);}while(r); do{ if(!qbevent)break;evnt(813);}while(r); do{ if(!qbevent)break;evnt(814);}while(r); do{ if(!qbevent)break;evnt(815);}while(r); do{ if(!qbevent)break;evnt(818);}while(r); do{ if(!qbevent)break;evnt(822);}while(r); do{ if(!qbevent)break;evnt(823);}while(r); do{ if(!qbevent)break;evnt(824);}while(r); do{ if(!qbevent)break;evnt(825);}while(r); do{ if (__ARRAY_INTEGER64_BITMASK[2]&2){ error(10); }else{ if (__ARRAY_INTEGER64_BITMASK[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_INTEGER64_BITMASK[4]= 1 ; __ARRAY_INTEGER64_BITMASK[5]=( 64 )-__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(830);}while(r); do{ if (__ARRAY_INTEGER64_BITMASKINV[2]&2){ error(10); }else{ if (__ARRAY_INTEGER64_BITMASKINV[2]&1){ if (!error_occurred) error(10); }else{ __ARRAY_INTEGER64_BITMASKINV[4]= 1 ; __ARRAY_INTEGER64_BITMASKINV[5]=( 64 )-__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(831);}while(r); do{ if (__ARRAY_STRING_DEFINEEXTAZ[2]&2){ error(10); }else{ if (__ARRAY_STRING_DEFINEEXTAZ[2]&1){ if (!error_occurred) 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(833);}while(r); do{ if (__ARRAY_STRING_DEFINEAZ[2]&2){ error(10); }else{ if (__ARRAY_STRING_DEFINEAZ[2]&1){ if (!error_occurred) 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(834);}while(r); do{ *__LONG_ISSTRING= 1073741824 ; if(!qbevent)break;evnt(836);}while(r); do{ *__LONG_ISFLOAT= 536870912 ; if(!qbevent)break;evnt(837);}while(r); do{ *__LONG_ISUNSIGNED= 268435456 ; if(!qbevent)break;evnt(838);}while(r); do{ *__LONG_ISPOINTER= 134217728 ; if(!qbevent)break;evnt(839);}while(r); do{ *__LONG_ISFIXEDLENGTH= 67108864 ; if(!qbevent)break;evnt(840);}while(r); do{ *__LONG_ISINCONVENTIONALMEMORY= 33554432 ; if(!qbevent)break;evnt(841);}while(r); do{ *__LONG_ISOFFSETINBITS= 16777216 ; if(!qbevent)break;evnt(842);}while(r); do{ *__LONG_ISARRAY= 8388608 ; if(!qbevent)break;evnt(843);}while(r); do{ *__LONG_ISREFERENCE= 4194304 ; if(!qbevent)break;evnt(844);}while(r); do{ *__LONG_ISUDT= 2097152 ; if(!qbevent)break;evnt(845);}while(r); do{ *__LONG_ISOFFSET= 1048576 ; if(!qbevent)break;evnt(846);}while(r); do{ *__LONG_STRINGTYPE=*__LONG_ISSTRING+*__LONG_ISPOINTER; if(!qbevent)break;evnt(848);}while(r); do{ *__LONG_BITTYPE= 1 +*__LONG_ISPOINTER+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(849);}while(r); do{ *__LONG_UBITTYPE= 1 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(850);}while(r); do{ *__LONG_BYTETYPE= 8 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(851);}while(r); do{ *__LONG_UBYTETYPE= 8 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(852);}while(r); do{ *__LONG_INTEGERTYPE= 16 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(853);}while(r); do{ *__LONG_UINTEGERTYPE= 16 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(854);}while(r); do{ *__LONG_LONGTYPE= 32 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(855);}while(r); do{ *__LONG_ULONGTYPE= 32 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(856);}while(r); do{ *__LONG_INTEGER64TYPE= 64 +*__LONG_ISPOINTER; if(!qbevent)break;evnt(857);}while(r); do{ *__LONG_UINTEGER64TYPE= 64 +*__LONG_ISPOINTER+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(858);}while(r); do{ *__LONG_SINGLETYPE= 32 +*__LONG_ISFLOAT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(859);}while(r); do{ *__LONG_DOUBLETYPE= 64 +*__LONG_ISFLOAT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(860);}while(r); do{ *__LONG_FLOATTYPE= 256 +*__LONG_ISFLOAT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(861);}while(r); do{ *__LONG_OFFSETTYPE= 64 +*__LONG_ISOFFSET+*__LONG_ISPOINTER; if(!qbevent)break;evnt(862);}while(r); S_1466:; if ((-(*__LONG_OS_BITS== 32 ))||new_error){ if(qbevent){evnt(862);if(r)goto S_1466;} do{ *__LONG_OFFSETTYPE= 32 +*__LONG_ISOFFSET+*__LONG_ISPOINTER; if(!qbevent)break;evnt(862);}while(r); } do{ *__LONG_UOFFSETTYPE= 64 +*__LONG_ISOFFSET+*__LONG_ISUNSIGNED+*__LONG_ISPOINTER; if(!qbevent)break;evnt(863);}while(r); S_1470:; if ((-(*__LONG_OS_BITS== 32 ))||new_error){ if(qbevent){evnt(863);if(r)goto S_1470;} do{ *__LONG_UOFFSETTYPE= 32 +*__LONG_ISOFFSET+*__LONG_ISUNSIGNED+*__LONG_ISPOINTER; if(!qbevent)break;evnt(863);}while(r); } do{ *__LONG_UDTTYPE=*__LONG_ISUDT+*__LONG_ISPOINTER; if(!qbevent)break;evnt(864);}while(r); do{ if(!qbevent)break;evnt(871);}while(r); do{ if(!qbevent)break;evnt(872);}while(r); do{ if(!qbevent)break;evnt(877);}while(r); do{ if (__ARRAY_INTEGER_CONTROLTYPE[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_CONTROLTYPE[2]&1){ if (!error_occurred) 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(878);}while(r); do{ if (__ARRAY_LONG_CONTROLID[2]&2){ error(10); }else{ if (__ARRAY_LONG_CONTROLID[2]&1){ if (!error_occurred) 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(896);}while(r); do{ if (__ARRAY_LONG_CONTROLVALUE[2]&2){ error(10); }else{ if (__ARRAY_LONG_CONTROLVALUE[2]&1){ if (!error_occurred) 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(897);}while(r); do{ if (__ARRAY_INTEGER_CONTROLSTATE[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_CONTROLSTATE[2]&1){ if (!error_occurred) 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(898);}while(r); do{ if (__ARRAY_LONG_CONTROLREF[2]&2){ error(10); }else{ if (__ARRAY_LONG_CONTROLREF[2]&1){ if (!error_occurred) 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(899);}while(r); do{ error_goto_line=4; if(!qbevent)break;evnt(905);}while(r); do{ *__INTEGER64_I2= 1 ; if(!qbevent)break;evnt(907);}while(r); S_1484:; fornext_value61= 1 ; fornext_finalvalue61= 64 ; fornext_step61= 1 ; if (fornext_step61<0) fornext_step_negative61=1; else fornext_step_negative61=0; if (new_error) goto fornext_error61; goto fornext_entrylabel61; while(1){ fornext_value61=fornext_step61+(*__INTEGER64_I); fornext_entrylabel61: *__INTEGER64_I=fornext_value61; if (fornext_step_negative61){ if (fornext_value61fornext_finalvalue61) break; } fornext_error61:; if(qbevent){evnt(908);if(r)goto S_1484;} 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(909);}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(910);}while(r); do{ *__INTEGER64_I2=qbr(*__INTEGER64_I2+(pow2( 2 ,*__INTEGER64_I))); if(!qbevent)break;evnt(911);}while(r); fornext_continue_60:; } fornext_exit_60:; do{ if(!qbevent)break;evnt(914);}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(916);}while(r); do{ if (__ARRAY_LONG_SFIDLIST[2]&2){ error(10); }else{ if (__ARRAY_LONG_SFIDLIST[2]&1){ if (!error_occurred) 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(918);}while(r); do{ if (__ARRAY_INTEGER_SFARGLIST[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_SFARGLIST[2]&1){ if (!error_occurred) 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(919);}while(r); do{ if (__ARRAY_INTEGER_SFELELIST[2]&2){ error(10); }else{ if (__ARRAY_INTEGER_SFELELIST[2]&1){ if (!error_occurred) 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(920);}while(r); do{ SUB_GL_SCAN_HEADER(); if(!qbevent)break;evnt(937);}while(r); S_1495:; if ((*__LONG_NOIDEMODE)||new_error){ if(qbevent){evnt(948);if(r)goto S_1495;} do{ *__BYTE_IDE_AUTOPOSITION= 0 ; if(!qbevent)break;evnt(948);}while(r); do{ goto LABEL_NOIDE; if(!qbevent)break;evnt(948);}while(r); } do{ if(!qbevent)break;evnt(949);}while(r); S_1500:; if ((-(*__BYTE_FILEDROPENABLED== 0 ))||new_error){ if(qbevent){evnt(950);if(r)goto S_1500;} do{ *__BYTE_FILEDROPENABLED= -1 ; if(!qbevent)break;evnt(950);}while(r); do{ sub__filedrop(NULL); if(!qbevent)break;evnt(950);}while(r); } S_1504:; if ((*__BYTE_IDE_AUTOPOSITION&(~(*__BYTE_IDE_BYPASSAUTOPOSITION)))||new_error){ if(qbevent){evnt(952);if(r)goto S_1504;} do{ sub__screenmove(*__INTEGER_IDE_LEFTPOSITION,*__INTEGER_IDE_TOPPOSITION,2); if(!qbevent)break;evnt(952);}while(r); } do{ *__LONG_IDEMODE= 1 ; if(!qbevent)break;evnt(953);}while(r); do{ qbs_set(__STRING_SENDC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(954);}while(r); S_1509:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_CMDLINEFILE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(955);if(r)goto S_1509;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 1 ),__STRING_CMDLINEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(955);}while(r); } LABEL_SENDCOMMAND:; if(qbevent){evnt(956);r=0;} do{ qbs_set(__STRING_IDECOMMAND,__STRING_SENDC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(957);}while(r); do{ *__LONG_C=FUNC_IDE(&(pass62= 0 )); if(!qbevent)break;evnt(958);}while(r); do{ *__LONG_IDEERROR= 0 ; if(!qbevent)break;evnt(959);}while(r); S_1515:; if ((-(*__LONG_C== 0 ))||new_error){ if(qbevent){evnt(960);if(r)goto S_1515;} do{ *__LONG_IDEMODE= 0 ; if(!qbevent)break;evnt(960);}while(r); do{ goto LABEL_NOIDE; if(!qbevent)break;evnt(960);}while(r); } do{ qbs_set(__STRING_C,__STRING_IDERETURN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(961);}while(r); S_1520:; if ((-(*__LONG_C== 2 ))||new_error){ if(qbevent){evnt(963);if(r)goto S_1520;} do{ *__LONG_IDEERRORLINE= 0 ; if(!qbevent)break;evnt(964);}while(r); do{ *__LONG_IDEPASS= 1 ; if(!qbevent)break;evnt(965);}while(r); do{ goto LABEL_FULLRECOMPILE; if(!qbevent)break;evnt(966);}while(r); LABEL_IDERET1:; if(qbevent){evnt(967);r=0;} do{ qbs_set(__STRING_WHOLELINE,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(968);}while(r); do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(969);}while(r); LABEL_IDERET2:; if(qbevent){evnt(970);r=0;} S_1526:; if ((*__LONG_LASTLINERETURN)||new_error){ if(qbevent){evnt(971);if(r)goto S_1526;} do{ goto LABEL_LASTLINERETURN; if(!qbevent)break;evnt(971);}while(r); } do{ qbs_set(__STRING_SENDC,func_chr( 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(972);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(973);}while(r); } S_1532:; if ((-(*__LONG_C== 4 ))||new_error){ if(qbevent){evnt(976);if(r)goto S_1532;} S_1533:; if ((-(*__LONG_IDEPASS== 1 ))||new_error){ if(qbevent){evnt(977);if(r)goto S_1533;} do{ qbs_set(__STRING_WHOLELINE,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(978);}while(r); do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(979);}while(r); } do{ qbs_set(__STRING_A3,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(983);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(984);}while(r); do{ goto LABEL_IDE4; if(!qbevent)break;evnt(985);}while(r); LABEL_IDERET4:; if(qbevent){evnt(986);r=0;} S_1540:; if ((*__LONG_LASTLINERETURN)||new_error){ if(qbevent){evnt(987);if(r)goto S_1540;} do{ goto LABEL_LASTLINERETURN; if(!qbevent)break;evnt(987);}while(r); } do{ qbs_set(__STRING_SENDC,func_chr( 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(988);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(989);}while(r); } S_1546:; if ((-(*__LONG_C== 5 ))||new_error){ if(qbevent){evnt(992);if(r)goto S_1546;} do{ *__LONG_LASTLINE= 1 ; if(!qbevent)break;evnt(994);}while(r); do{ *__LONG_LASTLINERETURN= 1 ; if(!qbevent)break;evnt(995);}while(r); S_1549:; if ((-(*__LONG_IDEPASS== 1 ))||new_error){ if(qbevent){evnt(996);if(r)goto S_1549;} do{ qbs_set(__STRING_WHOLELINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(997);}while(r); do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(998);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1002);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(1003);}while(r); do{ goto LABEL_IDE4; if(!qbevent)break;evnt(1004);}while(r); LABEL_LASTLINERETURN:; if(qbevent){evnt(1005);r=0;} do{ *__LONG_LASTLINERETURN= 0 ; if(!qbevent)break;evnt(1006);}while(r); do{ *__LONG_LASTLINE= 0 ; if(!qbevent)break;evnt(1007);}while(r); S_1558:; if ((-(*__LONG_IDEPASS== 1 ))||new_error){ if(qbevent){evnt(1009);if(r)goto S_1558;} do{ *__LONG_IDEPASS= 2 ; if(!qbevent)break;evnt(1011);}while(r); do{ goto LABEL_IDE3; if(!qbevent)break;evnt(1012);}while(r); LABEL_IDERET3:; if(qbevent){evnt(1013);r=0;} do{ qbs_set(__STRING_SENDC,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1014);}while(r); do{ *__LONG_FIRSTLINE= 1 ; if(!qbevent)break;evnt(1015);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1016);}while(r); } do{ goto LABEL_IDE5; if(!qbevent)break;evnt(1020);}while(r); LABEL_IDERET5:; if(qbevent){evnt(1021);r=0;} do{ qbs_set(__STRING_SENDC,func_chr( 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1022);}while(r); do{ *__LONG_IDECOMPILED= 0 ; if(!qbevent)break;evnt(1023);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1024);}while(r); } S_1570:; if ((-(*__LONG_C== 9 ))||new_error){ if(qbevent){evnt(1027);if(r)goto S_1570;} S_1571:; if ((-(*__LONG_IDECOMPILED== 0 ))||new_error){ if(qbevent){evnt(1029);if(r)goto S_1571;} do{ qbs_set(__STRING_FILE,__STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1030);}while(r); do{ qbs_set(__STRING_F,__STRING_FILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1033);}while(r); do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1035);}while(r); S_1575:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(1036);if(r)goto S_1575;} S_1576:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEPROGNAME->len))||new_error){ if(qbevent){evnt(1037);if(r)goto S_1576;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1037);}while(r); } } do{ *__LONG_I= 1 ; if(!qbevent)break;evnt(1040);}while(r); LABEL_NEXTEXEINDEX:; if(qbevent){evnt(1041);r=0;} S_1581:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION))))||new_error){ if(qbevent){evnt(1042);if(r)goto S_1581;} do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(1043);}while(r); do{ error_goto_line=5; if(!qbevent)break;evnt(1044);}while(r); do{ sub_kill(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1045);}while(r); do{ error_goto_line=6; if(!qbevent)break;evnt(1046);}while(r); S_1586:; if ((-(*__LONG_E== 1 ))||new_error){ if(qbevent){evnt(1047);if(r)goto S_1586;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(1048);}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(1049);}while(r); do{ goto LABEL_NEXTEXEINDEX; if(!qbevent)break;evnt(1050);}while(r); } } S_1592:; if ((-(*__LONG_I!= 1 ))||new_error){ if(qbevent){evnt(1055);if(r)goto S_1592;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 12 ),__STRING_FILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1056);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1057);}while(r); } do{ *__LONG_IDEERRORLINE= 0 ; if(!qbevent)break;evnt(1060);}while(r); do{ goto LABEL_IDE6; if(!qbevent)break;evnt(1061);}while(r); LABEL_IDERET6:; if(qbevent){evnt(1062);r=0;} do{ *__LONG_IDECOMPILED= 1 ; if(!qbevent)break;evnt(1063);}while(r); } S_1600:; if ((-(*__LONG_IDERUNMODE== 2 ))||new_error){ if(qbevent){evnt(1066);if(r)goto S_1600;} do{ qbs_set(__STRING_SENDC,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1067);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1068);}while(r); } S_1604:; if ((-(*__LONG_IDERUNMODE== 1 ))||new_error){ if(qbevent){evnt(1076);if(r)goto S_1604;} S_1605:; if ((*__INTEGER_NOEXESAVED)||new_error){ if(qbevent){evnt(1077);if(r)goto S_1605;} S_1606:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(1082);if(r)goto S_1606;} do{ sub_shell(qbs_add(FUNC_QUOTEDFILENAME(qbs_add(qbs_add(func_chr( 34 ),__STRING_LASTBINARYGENERATED),func_chr( 34 ))),__STRING_MODIFYCOMMAND),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1083);}while(r); do{ sub_shell2(qbs_add(qbs_new_txt_len("del ",4),FUNC_QUOTEDFILENAME(qbs_add(qbs_add(func_chr( 34 ),__STRING_LASTBINARYGENERATED),func_chr( 34 )))),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1084);}while(r); } S_1610:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1086);if(r)goto S_1610;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1086);}while(r); } S_1613:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(1087);if(r)goto S_1613;} S_1614:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_LASTBINARYGENERATED,__STRING_PATH__ASCII_CHR_046__EXE->len),__STRING_PATH__ASCII_CHR_046__EXE)))||new_error){ if(qbevent){evnt(1088);if(r)goto S_1614;} do{ sub_shell(qbs_add(FUNC_QUOTEDFILENAME(__STRING_LASTBINARYGENERATED),__STRING_MODIFYCOMMAND),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1089);}while(r); do{ sub_kill(__STRING_LASTBINARYGENERATED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1090);}while(r); }else{ do{ sub_shell(qbs_add(FUNC_QUOTEDFILENAME(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_LASTBINARYGENERATED)),__STRING_MODIFYCOMMAND),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1092);}while(r); do{ sub_kill(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_LASTBINARYGENERATED)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1093);}while(r); } } S_1622:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2))))||new_error){ if(qbevent){evnt(1096);if(r)goto S_1622;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1096);}while(r); } do{ *__INTEGER_NOEXESAVED= 0 ; if(!qbevent)break;evnt(1097);}while(r); do{ qbs_set(__STRING_SENDC,func_chr( 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1098);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1099);}while(r); } S_1629:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(1104);if(r)goto S_1629;} do{ sub_shell3(qbs_add(FUNC_QUOTEDFILENAME(qbs_add(qbs_add(func_chr( 34 ),__STRING_LASTBINARYGENERATED),func_chr( 34 ))),__STRING_MODIFYCOMMAND),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1104);}while(r); } S_1632:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1105);if(r)goto S_1632;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1105);}while(r); } S_1635:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(1106);if(r)goto S_1635;} S_1636:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_LASTBINARYGENERATED,__STRING_PATH__ASCII_CHR_046__EXE->len),__STRING_PATH__ASCII_CHR_046__EXE)))||new_error){ if(qbevent){evnt(1107);if(r)goto S_1636;} do{ sub_shell3(qbs_add(FUNC_QUOTEDFILENAME(__STRING_LASTBINARYGENERATED),__STRING_MODIFYCOMMAND),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1108);}while(r); }else{ do{ sub_shell3(qbs_add(FUNC_QUOTEDFILENAME(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_LASTBINARYGENERATED)),__STRING_MODIFYCOMMAND),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1110);}while(r); } } S_1642:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2))))||new_error){ if(qbevent){evnt(1113);if(r)goto S_1642;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1113);}while(r); } }else{ S_1646:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(1115);if(r)goto S_1646;} do{ sub_shell(qbs_add(FUNC_QUOTEDFILENAME(qbs_add(qbs_add(func_chr( 34 ),__STRING_LASTBINARYGENERATED),func_chr( 34 ))),__STRING_MODIFYCOMMAND),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1115);}while(r); } S_1649:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1116);if(r)goto S_1649;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1116);}while(r); } S_1652:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(1117);if(r)goto S_1652;} S_1653:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_LASTBINARYGENERATED,__STRING_PATH__ASCII_CHR_046__EXE->len),__STRING_PATH__ASCII_CHR_046__EXE)))||new_error){ if(qbevent){evnt(1118);if(r)goto S_1653;} do{ sub_shell(qbs_add(FUNC_QUOTEDFILENAME(__STRING_LASTBINARYGENERATED),__STRING_MODIFYCOMMAND),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1119);}while(r); }else{ do{ sub_shell(qbs_add(FUNC_QUOTEDFILENAME(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_LASTBINARYGENERATED)),__STRING_MODIFYCOMMAND),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1121);}while(r); } } S_1659:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2))))||new_error){ if(qbevent){evnt(1124);if(r)goto S_1659;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1124);}while(r); } S_1662:; do{ if(qbevent){evnt(1125);if(r)goto S_1662;} S_1663:; dl_continue_67:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_67:; if(qbevent){evnt(1125);if(r)goto S_1663;} S_1664:; do{ if(qbevent){evnt(1126);if(r)goto S_1664;} S_1665:; dl_continue_68:; }while((!(-(func__keyhit()== 0 )))&&(!new_error)); dl_exit_68:; if(qbevent){evnt(1126);if(r)goto S_1665;} } S_1667:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(1129);if(r)goto S_1667;} do{ *__LONG_DUMMY=FUNC_DARKENFGBG(&(pass69= 0 )); if(!qbevent)break;evnt(1131);}while(r); } S_1670:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(1134);if(r)goto S_1670;} do{ qbs_set(__STRING_SENDC,func_chr( 254 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1135);}while(r); }else{ do{ qbs_set(__STRING_SENDC,func_chr( 6 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1137);}while(r); } do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1139);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Invalid IDE message",19)); if (new_error) goto skip70; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip70: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1142);}while(r); do{ sub_end(); if(!qbevent)break;evnt(1142);}while(r); LABEL_IDEERROR:; if(qbevent){evnt(1144);r=0;} S_1679:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_IDEMESSAGE,__STRING1_SP,0)))||new_error){ if(qbevent){evnt(1145);if(r)goto S_1679;} do{ qbs_set(__STRING_TERRMSG,func__errormessage(NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1148);}while(r); S_1681:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TERRMSG,qbs_new_txt_len("No error",8))))||new_error){ if(qbevent){evnt(1149);if(r)goto S_1681;} do{ qbs_set(__STRING_TERRMSG,qbs_new_txt_len("Internal error",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1149);}while(r); } do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(qbs_new_txt_len("Compiler error (check for syntax errors) (",42),__STRING_TERRMSG),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1150);}while(r); S_1685:; if ((get_error_err())||new_error){ if(qbevent){evnt(1151);if(r)goto S_1685;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(__STRING_IDEMESSAGE,FUNC_STR2(&(pass71=get_error_err()))),qbs_new_txt_len("-",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1151);}while(r); } S_1688:; if ((func__errorline())||new_error){ if(qbevent){evnt(1152);if(r)goto S_1688;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,FUNC_STR2(&(pass72=func__errorline())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1152);}while(r); } S_1691:; if ((func__inclerrorline())||new_error){ if(qbevent){evnt(1153);if(r)goto S_1691;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_IDEMESSAGE,qbs_new_txt_len("-",1)),func__inclerrorfile()),qbs_new_txt_len("-",1)),FUNC_STR2(&(pass73=func__inclerrorline())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1153);}while(r); } do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1154);}while(r); S_1695:; if ((-(*__LONG_INCLEVEL> 0 ))||new_error){ if(qbevent){evnt(1155);if(r)goto S_1695;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,__STRING_INCERROR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1155);}while(r); } } 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(1158);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1159);}while(r); LABEL_NOIDE:; if(qbevent){evnt(1162);r=0;} S_1701:; if (((((-(*__BYTE_QB64VERSIONPRINTED== 0 ))|(-(*__LONG_CONSOLEMODE== 0 ))))&(~(*__BYTE_QUIETMODE)))||new_error){ if(qbevent){evnt(1163);if(r)goto S_1701;} do{ *__BYTE_QB64VERSIONPRINTED= -1 ; if(!qbevent)break;evnt(1164);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("QB64-PE Compiler V",18),__STRING_VERSION)); if (new_error) goto skip74; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip74: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1165);}while(r); } S_1705:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CMDLINEFILE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1168);if(r)goto S_1705;} 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(1169);}while(r); }else{ do{ qbs_set(__STRING_F,__STRING_CMDLINEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1171);}while(r); } do{ qbs_set(__STRING_F,qbs_ltrim(qbs_rtrim(__STRING_F))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1174);}while(r); S_1711:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(__STRING_F)== 0 )))||new_error){ if(qbevent){evnt(1176);if(r)goto S_1711;} 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(1176);}while(r); } do{ qbs_set(__STRING_SOURCEFILE,__STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1178);}while(r); do{ qbs_set(__STRING_CMDLINEFILE,__STRING_SOURCEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1179);}while(r); do{ qbs_set(__STRING_F,FUNC_REMOVEFILEEXTENSION(__STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1181);}while(r); do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1183);}while(r); do{ qbs_set(__STRING_CURRENTDIR,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1184);}while(r); do{ qbs_set(__STRING_PATH__ASCII_CHR_046__SOURCE,FUNC_GETFILEPATH(__STRING_SOURCEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1185);}while(r); S_1720:; if ((qbs_cleanup(qbs_tmp_base,__STRING_PATH__ASCII_CHR_046__SOURCE->len))||new_error){ if(qbevent){evnt(1186);if(r)goto S_1720;} S_1721:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(__STRING_PATH__ASCII_CHR_046__SOURCE)== 0 )))||new_error){ if(qbevent){evnt(1187);if(r)goto S_1721;} do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip76: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1188);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("Cannot locate source file: ",27),__STRING_SOURCEFILE)); if (new_error) goto skip77; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip77: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1189);}while(r); S_1724:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(1190);if(r)goto S_1724;} do{ if(qbevent){evnt(1190);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(1190);}while(r); } do{ if(qbevent){evnt(1191);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(1191);}while(r); } do{ sub_chdir(__STRING_PATH__ASCII_CHR_046__SOURCE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1193);}while(r); do{ qbs_set(__STRING_PATH__ASCII_CHR_046__SOURCE,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1194);}while(r); S_1731:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_PATH__ASCII_CHR_046__SOURCE, 1 ),__STRING1_PATHSEP)))||new_error){ if(qbevent){evnt(1195);if(r)goto S_1731;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__SOURCE,qbs_add(__STRING_PATH__ASCII_CHR_046__SOURCE,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1195);}while(r); } do{ sub_chdir(__STRING_CURRENTDIR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1196);}while(r); } S_1736:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(1198);if(r)goto S_1736;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_PATH__ASCII_CHR_046__SOURCE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1198);}while(r); } S_1739:; fornext_value79=__STRING_F->len; fornext_finalvalue79= 1 ; fornext_step79= -1 ; if (fornext_step79<0) fornext_step_negative79=1; else fornext_step_negative79=0; if (new_error) goto fornext_error79; goto fornext_entrylabel79; while(1){ fornext_value79=fornext_step79+(*__LONG_X); fornext_entrylabel79: *__LONG_X=fornext_value79; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative79){ if (fornext_value79fornext_finalvalue79) break; } fornext_error79:; if(qbevent){evnt(1200);if(r)goto S_1739;} do{ qbs_set(__STRING_A,func_mid(__STRING_F,*__LONG_X, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1201);}while(r); S_1741:; 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(1202);if(r)goto S_1741;} do{ qbs_set(__STRING_F,qbs_right(__STRING_F,__STRING_F->len-*__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1203);}while(r); do{ goto fornext_exit_78; if(!qbevent)break;evnt(1204);}while(r); } fornext_continue_78:; } fornext_exit_78:; do{ qbs_set(__STRING_FILE,__STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1207);}while(r); LABEL_FULLRECOMPILE:; if(qbevent){evnt(1212);r=0;} do{ *__LONG_BU_DEPENDENCY_CONSOLE_ONLY=((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 7 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])]; if(!qbevent)break;evnt(1214);}while(r); S_1748:; fornext_value83= 1 ; fornext_finalvalue83=func_ubound(__ARRAY_LONG_DEPENDENCY,1,1); fornext_step83= 1 ; if (fornext_step83<0) fornext_step_negative83=1; else fornext_step_negative83=0; if (new_error) goto fornext_error83; goto fornext_entrylabel83; while(1){ fornext_value83=fornext_step83+(*__LONG_I); fornext_entrylabel83: *__LONG_I=fornext_value83; if (fornext_step_negative83){ if (fornext_value83fornext_finalvalue83) break; } fornext_error83:; if(qbevent){evnt(1215);if(r)goto S_1748;} 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(1215);}while(r); fornext_continue_82:; } fornext_exit_82:; do{ tmp_long=array_check(( 7 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]=*__LONG_BU_DEPENDENCY_CONSOLE_ONLY& 2 ; if(!qbevent)break;evnt(1216);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(1218);}while(r); S_1753:; fornext_value85= 1 ; fornext_finalvalue85= 255 ; fornext_step85= 1 ; if (fornext_step85<0) fornext_step_negative85=1; else fornext_step_negative85=0; if (new_error) goto fornext_error85; goto fornext_entrylabel85; while(1){ fornext_value85=fornext_step85+(*__LONG_CLOSEALL); fornext_entrylabel85: *__LONG_CLOSEALL=fornext_value85; if (fornext_step_negative85){ if (fornext_value85fornext_finalvalue85) break; } fornext_error85:; if(qbevent){evnt(1220);if(r)goto S_1753;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(1220);}while(r); fornext_continue_84:; } fornext_exit_84:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1222);}while(r); do{ *__LONG_BH=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("dyninfo.txt",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1224);}while(r); S_1758:; if (( 0 )||new_error){ if(qbevent){evnt(1226);if(r)goto S_1758;} do{ sub_close( 9 ,1); if(!qbevent)break;evnt(1226);}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(1226);}while(r); } S_1762:; fornext_value87= 1 ; fornext_finalvalue87=*__LONG_IDS_MAX+ 1 ; fornext_step87= 1 ; if (fornext_step87<0) fornext_step_negative87=1; else fornext_step_negative87=0; if (new_error) goto fornext_error87; goto fornext_entrylabel87; while(1){ fornext_value87=fornext_step87+(*__LONG_I); fornext_entrylabel87: *__LONG_I=fornext_value87; if (fornext_step_negative87){ if (fornext_value87fornext_finalvalue87) break; } fornext_error87:; if(qbevent){evnt(1228);if(r)goto S_1762;} 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(1229);}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(1230);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1231);}while(r); fornext_continue_86:; } fornext_exit_86:; do{ *__LONG_LASTUNRESOLVED= -1 ; if(!qbevent)break;evnt(1237);}while(r); do{ *__INTEGER_SFLISTN= -1 ; if(!qbevent)break;evnt(1238);}while(r); do{ qbs_set(__STRING_SUBNAMELABELS,__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1240);}while(r); do{ *__LONG_VWATCHDESIREDSTATE= 0 ; if(!qbevent)break;evnt(1242);}while(r); do{ *__LONG_VWATCHRECOMPILEATTEMPTS= 0 ; if(!qbevent)break;evnt(1243);}while(r); do{ *__LONG_QB64PREFIX_SET_DESIREDSTATE= 0 ; if(!qbevent)break;evnt(1245);}while(r); do{ *__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS= 0 ; if(!qbevent)break;evnt(1246);}while(r); do{ *__LONG_OPEX_DESIREDSTATE= 0 ; if(!qbevent)break;evnt(1248);}while(r); do{ *__LONG_OPEX_RECOMPILEATTEMPTS= 0 ; if(!qbevent)break;evnt(1249);}while(r); do{ *__LONG_OPEXARRAY_DESIREDSTATE= 0 ; if(!qbevent)break;evnt(1251);}while(r); do{ *__LONG_OPEXARRAY_RECOMPILEATTEMPTS= 0 ; if(!qbevent)break;evnt(1252);}while(r); LABEL_RECOMPILE:; if(qbevent){evnt(1254);r=0;} do{ *__LONG_VWATCHON=*__LONG_VWATCHDESIREDSTATE; if(!qbevent)break;evnt(1255);}while(r); do{ SUB_VWATCHVARIABLE(qbs_new_txt_len("",0),&(pass88= -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1256);}while(r); do{ *__LONG_QB64PREFIX_SET=*__LONG_QB64PREFIX_SET_DESIREDSTATE; if(!qbevent)break;evnt(1258);}while(r); do{ qbs_set(__STRING_QB64PREFIX,qbs_new_txt_len("_",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1259);}while(r); do{ *__BYTE_OPTIONEXPLICIT=*__LONG_OPEX_DESIREDSTATE; if(!qbevent)break;evnt(1261);}while(r); S_1783:; if (((-(*__BYTE_OPTIONEXPLICIT_CMD== -1 ))&(-(*__LONG_NOIDEMODE== 1 )))||new_error){ if(qbevent){evnt(1262);if(r)goto S_1783;} do{ *__BYTE_OPTIONEXPLICIT= -1 ; if(!qbevent)break;evnt(1262);}while(r); } do{ *__BYTE_OPTIONEXPLICITARRAY=*__LONG_OPEXARRAY_DESIREDSTATE; if(!qbevent)break;evnt(1263);}while(r); do{ *__LONG_LASTLINERETURN= 0 ; if(!qbevent)break;evnt(1265);}while(r); do{ *__LONG_LASTLINE= 0 ; if(!qbevent)break;evnt(1266);}while(r); do{ *__LONG_FIRSTLINE= 1 ; if(!qbevent)break;evnt(1267);}while(r); do{ *__LONG_RESIZE= 0 ; if(!qbevent)break;evnt(1269);}while(r); do{ *__LONG_RESIZE_SCALE= 0 ; if(!qbevent)break;evnt(1270);}while(r); do{ *__LONG_USEGL= 0 ; if(!qbevent)break;evnt(1272);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(1274);}while(r); do{ SUB_HASHCLEAR(); if(!qbevent)break;evnt(1276);}while(r); do{ *__LONG_F= 4 + 8 ; if(!qbevent)break;evnt(1280);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_UNSIGNED",9),__LONG_F,&(pass89= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1281);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_BIT",4),__LONG_F,&(pass90= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1282);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_BYTE",5),__LONG_F,&(pass91= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1283);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("INTEGER",7),__LONG_F,&(pass92= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1284);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LONG",4),__LONG_F,&(pass93= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1285);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_INTEGER64",10),__LONG_F,&(pass94= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1286);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_OFFSET",7),__LONG_F,&(pass95= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1287);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SINGLE",6),__LONG_F,&(pass96= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1288);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DOUBLE",6),__LONG_F,&(pass97= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1289);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_FLOAT",6),__LONG_F,&(pass98= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1290);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STRING",6),__LONG_F,&(pass99= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1291);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ANY",3),__LONG_F,&(pass100= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1292);}while(r); do{ *__LONG_F= 16 + 8 ; if(!qbevent)break;evnt(1294);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("NOT",3),__LONG_F,&(pass101= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1295);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("IMP",3),__LONG_F,&(pass102= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1296);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("EQV",3),__LONG_F,&(pass103= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1297);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("AND",3),__LONG_F,&(pass104= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1298);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OR",2),__LONG_F,&(pass105= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1299);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("XOR",3),__LONG_F,&(pass106= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1300);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("MOD",3),__LONG_F,&(pass107= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1301);}while(r); do{ *__LONG_F= 8 + 32 ; if(!qbevent)break;evnt(1303);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LIST",4),__LONG_F,&(pass108= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1304);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("BASE",4),__LONG_F,&(pass109= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1305);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("_EXPLICIT",9),__LONG_F,&(pass110= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1306);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("AS",2),__LONG_F,&(pass111= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1307);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("IS",2),__LONG_F,&(pass112= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1308);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OFF",3),__LONG_F,&(pass113= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1309);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ON",2),__LONG_F,&(pass114= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1310);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STOP",4),__LONG_F,&(pass115= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1311);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("TO",2),__LONG_F,&(pass116= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1312);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("USING",5),__LONG_F,&(pass117= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1313);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PRESET",6),__LONG_F,&(pass118= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1315);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PSET",4),__LONG_F,&(pass119= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1316);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FOR",3),__LONG_F,&(pass120= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1318);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OUTPUT",6),__LONG_F,&(pass121= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1319);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RANDOM",6),__LONG_F,&(pass122= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1320);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("BINARY",6),__LONG_F,&(pass123= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1321);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("APPEND",6),__LONG_F,&(pass124= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1322);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SHARED",6),__LONG_F,&(pass125= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1323);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ACCESS",6),__LONG_F,&(pass126= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1324);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LOCK",4),__LONG_F,&(pass127= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1325);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("READ",4),__LONG_F,&(pass128= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1326);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("WRITE",5),__LONG_F,&(pass129= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1327);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STEP",4),__LONG_F,&(pass130= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1329);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LPRINT",6),__LONG_F,&(pass131= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1331);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PRINT",5),__LONG_F,&(pass132= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1333);}while(r); do{ *__LONG_F= 8 + 8192 + 16384 ; if(!qbevent)break;evnt(1335);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("COMMON",6),__LONG_F,&(pass133= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1339);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("CALL",4),__LONG_F,&(pass134= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1340);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("CASE",4),&(pass135=*__LONG_F- 8192 ),&(pass136= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1341);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("COM",3),__LONG_F,&(pass137= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1342);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("CONST",5),__LONG_F,&(pass138= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1343);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DATA",4),__LONG_F,&(pass139= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1345);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DECLARE",7),__LONG_F,&(pass140= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1346);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEF",3),__LONG_F,&(pass141= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1347);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFDBL",6),__LONG_F,&(pass142= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1348);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFINT",6),__LONG_F,&(pass143= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1349);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFLNG",6),__LONG_F,&(pass144= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1350);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFSNG",6),__LONG_F,&(pass145= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1351);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DEFSTR",6),__LONG_F,&(pass146= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1352);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DIM",3),__LONG_F,&(pass147= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1353);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("DO",2),&(pass148=*__LONG_F- 8192 ),&(pass149= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1354);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ERROR",5),&(pass150=*__LONG_F- 8192 ),&(pass151= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1356);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ELSE",4),__LONG_F,&(pass152= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1357);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ELSEIF",6),__LONG_F,&(pass153= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1358);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("ENDIF",5),__LONG_F,&(pass154= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1359);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("EXIT",4),&(pass155=*__LONG_F- 8192 ),&(pass156= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1360);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FIELD",5),&(pass157=*__LONG_F- 8192 ),&(pass158= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1362);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FUNCTION",8),__LONG_F,&(pass159= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1363);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("GOSUB",5),__LONG_F,&(pass160= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1365);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("GOTO",4),__LONG_F,&(pass161= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1366);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("INPUT",5),&(pass162=*__LONG_F- 8192 - 16384 ),&(pass163= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1369);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("IF",2),__LONG_F,&(pass164= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1370);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("KEY",3),&(pass165=*__LONG_F- 8192 - 16384 ),&(pass166= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1372);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LET",3),&(pass167=*__LONG_F- 8192 ),&(pass168= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1374);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LOOP",4),&(pass169=*__LONG_F- 8192 ),&(pass170= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1375);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("LEN",3),&(pass171=*__LONG_F- 8192 ),&(pass172= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1376);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("NEXT",4),&(pass173=*__LONG_F- 8192 ),&(pass174= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1379);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PLAY",4),&(pass175=*__LONG_F- 8192 - 16384 ),&(pass176= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1382);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("PEN",3),&(pass177=*__LONG_F- 8192 - 16384 ),&(pass178= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1383);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("REDIM",5),__LONG_F,&(pass179= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1386);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("REM",3),__LONG_F,&(pass180= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1387);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RESTORE",7),&(pass181=*__LONG_F- 8192 ),&(pass182= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1388);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RESUME",6),&(pass183=*__LONG_F- 8192 ),&(pass184= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1389);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RETURN",6),&(pass185=*__LONG_F- 8192 ),&(pass186= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1390);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("RUN",3),&(pass187=*__LONG_F- 8192 ),&(pass188= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1391);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STATIC",6),__LONG_F,&(pass189= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1393);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("STRIG",5),__LONG_F,&(pass190= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1394);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SEG",3),__LONG_F,&(pass191= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1395);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SELECT",6),&(pass192=*__LONG_F- 8192 - 16384 ),&(pass193= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1396);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SUB",3),__LONG_F,&(pass194= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1397);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("SCREEN",6),&(pass195=*__LONG_F- 8192 - 16384 ),&(pass196= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1398);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("THEN",4),__LONG_F,&(pass197= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1400);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("TIMER",5),&(pass198=*__LONG_F- 8192 - 16384 ),&(pass199= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1401);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("TYPE",4),&(pass200=*__LONG_F- 8192 ),&(pass201= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1402);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("UNTIL",5),__LONG_F,&(pass202= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1404);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("UEVENT",6),__LONG_F,&(pass203= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1405);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("WEND",4),__LONG_F,&(pass204= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1408);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("WHILE",5),__LONG_F,&(pass205= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1409);}while(r); do{ *__LONG_CONSOLE= 0 ; if(!qbevent)break;evnt(1421);}while(r); do{ *__LONG_SCREENHIDE= 0 ; if(!qbevent)break;evnt(1422);}while(r); do{ *__LONG_ASSERTS= 0 ; if(!qbevent)break;evnt(1423);}while(r); do{ *__LONG_RESOLVESTATICFUNCTIONS= 0 ; if(!qbevent)break;evnt(1424);}while(r); do{ *__LONG_DYNAMICLIBRARY= 0 ; if(!qbevent)break;evnt(1425);}while(r); do{ *__INTEGER_DIMSFARRAY= 0 ; if(!qbevent)break;evnt(1426);}while(r); do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(1427);}while(r); do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(1428);}while(r); do{ qbs_set(__STRING_POSSIBLESUBNAMELABELS,__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1429);}while(r); do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(1430);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(1431);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(1431);}while(r); do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(1431);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(1431);}while(r); do{ *__LONG_COMMONOPTION= 0 ; if(!qbevent)break;evnt(1431);}while(r); do{ qbs_set(__STRING_MYLIB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1432);}while(r); do{ qbs_set(__STRING_MYLIBOPT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1432);}while(r); do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(1433);}while(r); do{ *__LONG_NLABELS= 0 ; if(!qbevent)break;evnt(1434);}while(r); do{ *__LONG_DYNSCOPE= 0 ; if(!qbevent)break;evnt(1435);}while(r); do{ *__LONG_ELSEFOLLOWUP= 0 ; if(!qbevent)break;evnt(1436);}while(r); do{ *__LONG_ONTIMERID= 0 ; if(!qbevent)break;evnt(1437);}while(r); do{ *__LONG_ONKEYID= 0 ; if(!qbevent)break;evnt(1437);}while(r); do{ *__LONG_ONSTRIGID= 0 ; if(!qbevent)break;evnt(1437);}while(r); do{ qbs_set(__STRING_COMMONARRAYLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1438);}while(r); do{ *__LONG_COMMONARRAYLISTN= 0 ; if(!qbevent)break;evnt(1438);}while(r); do{ qbs_set(__STRING_STATICARRAYLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1439);}while(r); do{ *__LONG_STATICARRAYLISTN= 0 ; if(!qbevent)break;evnt(1439);}while(r); do{ *__LONG_FOOINDWEL= 0 ; if(!qbevent)break;evnt(1440);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1441);}while(r); do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(1442);}while(r); do{ *__LONG_NOCHECKS= 0 ; if(!qbevent)break;evnt(1443);}while(r); do{ *__LONG_INCLEVEL= 0 ; if(!qbevent)break;evnt(1444);}while(r); do{ *__LONG_ERRORLINEININCLUDE= 0 ; if(!qbevent)break;evnt(1445);}while(r); do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1446);}while(r); do{ *__LONG_NEXTRUNLINEINDEX= 1 ; if(!qbevent)break;evnt(1447);}while(r); do{ *__LONG_LASTTYPE= 0 ; if(!qbevent)break;evnt(1448);}while(r); do{ *__LONG_LASTTYPEELEMENT= 0 ; if(!qbevent)break;evnt(1449);}while(r); do{ if (__ARRAY_STRING256_UDTXNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_UDTXNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING256_UDTXNAME[2]&1){ if (__ARRAY_STRING256_UDTXNAME[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTXNAME[0])); }else{ free((void*)(__ARRAY_STRING256_UDTXNAME[0])); } } __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(1450);}while(r); do{ if (__ARRAY_STRING256_UDTXCNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_UDTXCNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING256_UDTXCNAME[2]&1){ if (__ARRAY_STRING256_UDTXCNAME[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTXCNAME[0])); }else{ free((void*)(__ARRAY_STRING256_UDTXCNAME[0])); } } __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(1451);}while(r); do{ if (__ARRAY_LONG_UDTXSIZE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTXSIZE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTXSIZE[2]&1){ if (__ARRAY_LONG_UDTXSIZE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTXSIZE[0])); }else{ free((void*)(__ARRAY_LONG_UDTXSIZE[0])); } } __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(1452);}while(r); do{ if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_UDTXBYTEALIGN)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&1){ if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0])); }else{ free((void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0])); } } __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(1453);}while(r); do{ if (__ARRAY_LONG_UDTXNEXT[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTXNEXT)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTXNEXT[2]&1){ if (__ARRAY_LONG_UDTXNEXT[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTXNEXT[0])); }else{ free((void*)(__ARRAY_LONG_UDTXNEXT[0])); } } __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(1454);}while(r); do{ if (__ARRAY_INTEGER_UDTXVARIABLE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_UDTXVARIABLE)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_UDTXVARIABLE[2]&1){ if (__ARRAY_INTEGER_UDTXVARIABLE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTXVARIABLE[0])); }else{ free((void*)(__ARRAY_INTEGER_UDTXVARIABLE[0])); } } __ARRAY_INTEGER_UDTXVARIABLE[4]= 0 ; __ARRAY_INTEGER_UDTXVARIABLE[5]=( 1000 )-__ARRAY_INTEGER_UDTXVARIABLE[4]+1; __ARRAY_INTEGER_UDTXVARIABLE[6]=1; if (__ARRAY_INTEGER_UDTXVARIABLE[2]&4){ __ARRAY_INTEGER_UDTXVARIABLE[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_UDTXVARIABLE[5]*2); memset((void*)(__ARRAY_INTEGER_UDTXVARIABLE[0]),0,__ARRAY_INTEGER_UDTXVARIABLE[5]*2); }else{ __ARRAY_INTEGER_UDTXVARIABLE[0]=(ptrszint)calloc(__ARRAY_INTEGER_UDTXVARIABLE[5]*2,1); if (!__ARRAY_INTEGER_UDTXVARIABLE[0]) error(257); } __ARRAY_INTEGER_UDTXVARIABLE[2]|=1; } if(!qbevent)break;evnt(1455);}while(r); do{ if (__ARRAY_STRING256_UDTENAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_UDTENAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING256_UDTENAME[2]&1){ if (__ARRAY_STRING256_UDTENAME[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTENAME[0])); }else{ free((void*)(__ARRAY_STRING256_UDTENAME[0])); } } __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(1457);}while(r); do{ if (__ARRAY_STRING256_UDTECNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_UDTECNAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING256_UDTECNAME[2]&1){ if (__ARRAY_STRING256_UDTECNAME[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTECNAME[0])); }else{ free((void*)(__ARRAY_STRING256_UDTECNAME[0])); } } __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(1458);}while(r); do{ if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_UDTEBYTEALIGN)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&1){ if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0])); }else{ free((void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0])); } } __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(1459);}while(r); do{ if (__ARRAY_LONG_UDTESIZE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTESIZE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTESIZE[2]&1){ if (__ARRAY_LONG_UDTESIZE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTESIZE[0])); }else{ free((void*)(__ARRAY_LONG_UDTESIZE[0])); } } __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(1460);}while(r); do{ if (__ARRAY_LONG_UDTETYPE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTETYPE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTETYPE[2]&1){ if (__ARRAY_LONG_UDTETYPE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTETYPE[0])); }else{ free((void*)(__ARRAY_LONG_UDTETYPE[0])); } } __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(1461);}while(r); do{ if (__ARRAY_LONG_UDTETYPESIZE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTETYPESIZE)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTETYPESIZE[2]&1){ if (__ARRAY_LONG_UDTETYPESIZE[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTETYPESIZE[0])); }else{ free((void*)(__ARRAY_LONG_UDTETYPESIZE[0])); } } __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(1462);}while(r); do{ if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTEARRAYELEMENTS)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&1){ if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0])); }else{ free((void*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0])); } } __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(1463);}while(r); do{ if (__ARRAY_LONG_UDTENEXT[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_UDTENEXT)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_UDTENEXT[2]&1){ if (__ARRAY_LONG_UDTENEXT[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTENEXT[0])); }else{ free((void*)(__ARRAY_LONG_UDTENEXT[0])); } } __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(1464);}while(r); do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(1465);}while(r); do{ *__LONG_DEFININGTYPEERROR= 0 ; if(!qbevent)break;evnt(1466);}while(r); do{ *__LONG_CONSTLAST= -1 ; if(!qbevent)break;evnt(1467);}while(r); do{ *__INTEGER_CLOSEDMAIN= 0 ; if(!qbevent)break;evnt(1469);}while(r); do{ *__INTEGER_ADDMETASTATIC= 0 ; if(!qbevent)break;evnt(1470);}while(r); do{ *__INTEGER_ADDMETADYNAMIC= 0 ; if(!qbevent)break;evnt(1471);}while(r); do{ *__INTEGER_DYNAMICMODE= 0 ; if(!qbevent)break;evnt(1472);}while(r); do{ *__INTEGER_OPTIONBASE= 0 ; if(!qbevent)break;evnt(1473);}while(r); do{ *__LONG_EXEICONSET= 0 ; if(!qbevent)break;evnt(1474);}while(r); do{ *__BYTE_VERSIONINFOSET= 0 ; if(!qbevent)break;evnt(1475);}while(r); do{ qbs_set(__STRING_VIFILEVERSIONNUM,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1476);}while(r); do{ qbs_set(__STRING_VIPRODUCTVERSIONNUM,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1476);}while(r); do{ qbs_set(__STRING_VICOMPANYNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1476);}while(r); do{ qbs_set(__STRING_VIFILEDESCRIPTION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1477);}while(r); do{ qbs_set(__STRING_VIFILEVERSION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1477);}while(r); do{ qbs_set(__STRING_VIINTERNALNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1477);}while(r); do{ qbs_set(__STRING_VILEGALCOPYRIGHT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1478);}while(r); do{ qbs_set(__STRING_VILEGALTRADEMARKS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1478);}while(r); do{ qbs_set(__STRING_VIORIGINALFILENAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1478);}while(r); do{ qbs_set(__STRING_VIPRODUCTNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1479);}while(r); do{ qbs_set(__STRING_VIPRODUCTVERSION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1479);}while(r); do{ qbs_set(__STRING_VICOMMENTS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1479);}while(r); do{ qbs_set(__STRING_VIWEB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1479);}while(r); do{ *__LONG_DATAOFFSET= 0 ; if(!qbevent)break;evnt(1480);}while(r); do{ *__LONG_STATEMENTN= 0 ; if(!qbevent)break;evnt(1481);}while(r); do{ *__LONG_EVERYCASENEWCASE= 0 ; if(!qbevent)break;evnt(1482);}while(r); do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(1483);}while(r); do{ *__INTEGER_QBERRORCODE= 0 ; if(!qbevent)break;evnt(1483);}while(r); do{ *__INTEGER_QBERRORLINE= 0 ; if(!qbevent)break;evnt(1483);}while(r); S_1976:; fornext_value207= 1 ; fornext_finalvalue207= 27 ; fornext_step207= 1 ; if (fornext_step207<0) fornext_step_negative207=1; else fornext_step_negative207=0; if (new_error) goto fornext_error207; goto fornext_entrylabel207; while(1){ fornext_value207=fornext_step207+(*__LONG_I); fornext_entrylabel207: *__LONG_I=fornext_value207; if (fornext_step_negative207){ if (fornext_value207fornext_finalvalue207) break; } fornext_error207:; if(qbevent){evnt(1484);if(r)goto S_1976;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1484);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1484);}while(r); fornext_continue_206:; } fornext_exit_206:; do{ *__INTEGER_CONTROLLEVEL= 0 ; if(!qbevent)break;evnt(1485);}while(r); do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1486);}while(r); do{ *__INTEGER_FINDANOTHERID= 0 ; if(!qbevent)break;evnt(1486);}while(r); do{ *__LONG_FINDIDINTERNAL= 0 ; if(!qbevent)break;evnt(1486);}while(r); do{ *__LONG_CURRENTID= 0 ; if(!qbevent)break;evnt(1486);}while(r); do{ *__LONG_LINENUMBER= 0 ; if(!qbevent)break;evnt(1487);}while(r); do{ qbs_set(__STRING_WHOLELINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1488);}while(r); do{ qbs_set(__STRING_LINEFRAGMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1489);}while(r); do{ *__LONG_IDN= 0 ; if(!qbevent)break;evnt(1490);}while(r); do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(1491);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(1492);}while(r); do{ *__BYTE_INPUTFUNCTIONCALLED= 0 ; if(!qbevent)break;evnt(1493);}while(r); do{ *__LONG_SUBFUNCN= 0 ; if(!qbevent)break;evnt(1494);}while(r); do{ *__BYTE_CLOSEDSUBFUNC= 0 ; if(!qbevent)break;evnt(1495);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1496);}while(r); do{ *__ULONG_SELECTCASECOUNTER= 0 ; if(!qbevent)break;evnt(1497);}while(r); do{ *__INTEGER_EXECCOUNTER= 0 ; if(!qbevent)break;evnt(1498);}while(r); do{ *__INTEGER_USERDEFINECOUNT= 7 ; if(!qbevent)break;evnt(1499);}while(r); do{ *__LONG_TOTALVARIABLESCREATED= 0 ; if(!qbevent)break;evnt(1500);}while(r); do{ qbs_set(__STRING_TYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1501);}while(r); do{ *__LONG_TOTALMAINVARIABLESCREATED= 0 ; if(!qbevent)break;evnt(1502);}while(r); do{ if (__ARRAY_UDT_USEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_USEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_USEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_USEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_USEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_USEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_USEDVARIABLELIST[0])); } } __ARRAY_UDT_USEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_USEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_USEDVARIABLELIST[4]+1; __ARRAY_UDT_USEDVARIABLELIST[6]=1; __ARRAY_UDT_USEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_USEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_USEDVARIABLELIST[0]) error(257); __ARRAY_UDT_USEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_USEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_USEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } if(!qbevent)break;evnt(1503);}while(r); do{ *__LONG_TOTALWARNINGS= 0 ; if(!qbevent)break;evnt(1504);}while(r); do{ *__BYTE_DUPLICATECONSTWARNING= 0 ; if(!qbevent)break;evnt(1505);}while(r); do{ *__BYTE_EMPTYSCWARNING= 0 ; if(!qbevent)break;evnt(1506);}while(r); do{ *__LONG_WARNINGLISTITEMS= 0 ; if(!qbevent)break;evnt(1507);}while(r); do{ qbs_set(__STRING_LASTWARNINGHEADER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1508);}while(r); do{ qbs_set(__STRING_VWATCHUSEDLABELS,func_space( 1000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1509);}while(r); do{ qbs_set(__STRING_VWATCHUSEDSKIPLABELS,func_space( 1000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1510);}while(r); do{ *__LONG_FIRSTLINENUMBERLABELVWATCH= 0 ; if(!qbevent)break;evnt(1511);}while(r); do{ if (__ARRAY_STRING_WARNING[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_WARNING)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_WARNING[2]&1){ tmp_long=__ARRAY_STRING_WARNING[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_WARNING[0]))[tmp_long]); free((void*)(__ARRAY_STRING_WARNING[0])); } __ARRAY_STRING_WARNING[4]= 0 ; __ARRAY_STRING_WARNING[5]=( 1000 )-__ARRAY_STRING_WARNING[4]+1; __ARRAY_STRING_WARNING[6]=1; __ARRAY_STRING_WARNING[0]=(ptrszint)malloc(__ARRAY_STRING_WARNING[5]*8); if (!__ARRAY_STRING_WARNING[0]) error(257); __ARRAY_STRING_WARNING[2]|=1; tmp_long=__ARRAY_STRING_WARNING[5]; if (__ARRAY_STRING_WARNING[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_WARNING[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_WARNING[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(1512);}while(r); do{ if (__ARRAY_LONG_WARNINGLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_WARNINGLINES)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_WARNINGLINES[2]&1){ if (__ARRAY_LONG_WARNINGLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_WARNINGLINES[0])); }else{ free((void*)(__ARRAY_LONG_WARNINGLINES[0])); } } __ARRAY_LONG_WARNINGLINES[4]= 0 ; __ARRAY_LONG_WARNINGLINES[5]=( 1000 )-__ARRAY_LONG_WARNINGLINES[4]+1; __ARRAY_LONG_WARNINGLINES[6]=1; if (__ARRAY_LONG_WARNINGLINES[2]&4){ __ARRAY_LONG_WARNINGLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_WARNINGLINES[5]*4); memset((void*)(__ARRAY_LONG_WARNINGLINES[0]),0,__ARRAY_LONG_WARNINGLINES[5]*4); }else{ __ARRAY_LONG_WARNINGLINES[0]=(ptrszint)calloc(__ARRAY_LONG_WARNINGLINES[5]*4,1); if (!__ARRAY_LONG_WARNINGLINES[0]) error(257); } __ARRAY_LONG_WARNINGLINES[2]|=1; } if(!qbevent)break;evnt(1513);}while(r); do{ if (__ARRAY_LONG_WARNINGINCLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_WARNINGINCLINES)[8])->id=(++mem_lock_id); if (__ARRAY_LONG_WARNINGINCLINES[2]&1){ if (__ARRAY_LONG_WARNINGINCLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_LONG_WARNINGINCLINES[0])); }else{ free((void*)(__ARRAY_LONG_WARNINGINCLINES[0])); } } __ARRAY_LONG_WARNINGINCLINES[4]= 0 ; __ARRAY_LONG_WARNINGINCLINES[5]=( 1000 )-__ARRAY_LONG_WARNINGINCLINES[4]+1; __ARRAY_LONG_WARNINGINCLINES[6]=1; if (__ARRAY_LONG_WARNINGINCLINES[2]&4){ __ARRAY_LONG_WARNINGINCLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_WARNINGINCLINES[5]*4); memset((void*)(__ARRAY_LONG_WARNINGINCLINES[0]),0,__ARRAY_LONG_WARNINGINCLINES[5]*4); }else{ __ARRAY_LONG_WARNINGINCLINES[0]=(ptrszint)calloc(__ARRAY_LONG_WARNINGINCLINES[5]*4,1); if (!__ARRAY_LONG_WARNINGINCLINES[0]) error(257); } __ARRAY_LONG_WARNINGINCLINES[2]|=1; } if(!qbevent)break;evnt(1514);}while(r); do{ if (__ARRAY_STRING_WARNINGINCFILES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_WARNINGINCFILES)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_WARNINGINCFILES[2]&1){ tmp_long=__ARRAY_STRING_WARNINGINCFILES[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[tmp_long]); free((void*)(__ARRAY_STRING_WARNINGINCFILES[0])); } __ARRAY_STRING_WARNINGINCFILES[4]= 0 ; __ARRAY_STRING_WARNINGINCFILES[5]=( 1000 )-__ARRAY_STRING_WARNINGINCFILES[4]+1; __ARRAY_STRING_WARNINGINCFILES[6]=1; __ARRAY_STRING_WARNINGINCFILES[0]=(ptrszint)malloc(__ARRAY_STRING_WARNINGINCFILES[5]*8); if (!__ARRAY_STRING_WARNINGINCFILES[0]) error(257); __ARRAY_STRING_WARNINGINCFILES[2]|=1; tmp_long=__ARRAY_STRING_WARNINGINCFILES[5]; if (__ARRAY_STRING_WARNINGINCFILES[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(1515);}while(r); do{ *__LONG_MAXLINENUMBER= 0 ; if(!qbevent)break;evnt(1516);}while(r); do{ *__LONG_UNIQUENUMBERN= 0 ; if(!qbevent)break;evnt(1517);}while(r); do{ *__LONG_PTRSZ=*__LONG_OS_BITS/ 8 ; if(!qbevent)break;evnt(1541);}while(r); do{ *__LONG_LASTTYPE=*__LONG_LASTTYPE+ 1 ; if(!qbevent)break;evnt(1543);}while(r); do{ *__LONG_I=*__LONG_LASTTYPE; if(!qbevent)break;evnt(1543);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1544);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1545);}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* 5 )+(( 4 )* 2 )+(( 8 )* 1 ))* 8 ; if(!qbevent)break;evnt(1546);}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(1547);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1548);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1548);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1549);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1550);}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(1551);}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(1552);}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(1552);}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(1553);}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(1554);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1555);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1556);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1556);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1557);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1558);}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(1559);}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(1560);}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(1560);}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(1561);}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(1562);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1563);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1564);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1564);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1565);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1566);}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(1567);}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(1568);}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(1568);}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(1569);}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(1570);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1571);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1572);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1572);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1573);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1574);}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(1575);}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(1576);}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(1576);}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(1577);}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(1578);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1579);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1580);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1580);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1581);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1582);}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(1583);}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(1584);}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(1584);}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(1585);}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(1586);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1587);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1588);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1588);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1589);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1590);}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(1591);}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(1592);}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(1592);}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(1593);}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(1594);}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(1595);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1596);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1597);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1597);}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("IMAGE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1598);}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("IMAGE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1599);}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(1600);}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(1601);}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(1601);}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(1602);}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(1603);}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(1604);}while(r); do{ *__LONG_I3=*__LONG_I2; if(!qbevent)break;evnt(1605);}while(r); do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1606);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1606);}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("SOUND",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1607);}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("SOUND",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1608);}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(1609);}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(1610);}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(1610);}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(1611);}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(1612);}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(1613);}while(r); S_2105:; fornext_value209= 1 ; fornext_finalvalue209= 255 ; fornext_step209= 1 ; if (fornext_step209<0) fornext_step_negative209=1; else fornext_step_negative209=0; if (new_error) goto fornext_error209; goto fornext_entrylabel209; while(1){ fornext_value209=fornext_step209+(*__LONG_CLOSEALL); fornext_entrylabel209: *__LONG_CLOSEALL=fornext_value209; if (fornext_step_negative209){ if (fornext_value209fornext_finalvalue209) break; } fornext_error209:; if(qbevent){evnt(1625);if(r)goto S_2105;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(1625);}while(r); fornext_continue_208:; } fornext_exit_208:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1626);}while(r); do{ *__LONG_BH=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("icon.rc",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1628);}while(r); S_2110:; if (( 0 )||new_error){ if(qbevent){evnt(1630);if(r)goto S_2110;} do{ sub_close( 9 ,1); if(!qbevent)break;evnt(1630);}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(1630);}while(r); } S_2114:; if ((-(*__LONG_IDEMODE== 0 ))||new_error){ if(qbevent){evnt(1632);if(r)goto S_2114;} do{ *__INTEGER_QBERRORHAPPENED= -1 ; if(!qbevent)break;evnt(1633);}while(r); do{ sub_open(__STRING_SOURCEFILE, 3 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1634);}while(r); LABEL_QBERRORHAPPENED1:; if(qbevent){evnt(1635);r=0;} S_2117:; if ((-(*__INTEGER_QBERRORHAPPENED== 1 ))||new_error){ if(qbevent){evnt(1636);if(r)goto S_2117;} do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip210: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1637);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("Cannot locate source file: ",27),__STRING_SOURCEFILE)); if (new_error) goto skip211; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip211: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1638);}while(r); S_2120:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(1639);if(r)goto S_2120;} do{ if(qbevent){evnt(1639);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(1639);}while(r); } do{ if(qbevent){evnt(1640);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(1640);}while(r); }else{ do{ sub_close( 1 ,1); if(!qbevent)break;evnt(1642);}while(r); } do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(1644);}while(r); } do{ SUB_REGINTERNAL(); if(!qbevent)break;evnt(1647);}while(r); S_2130:; if ((*__LONG_QB64PREFIX_SET)||new_error){ if(qbevent){evnt(1649);if(r)goto S_2130;} do{ qbs_set(__STRING_QB64PREFIX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1650);}while(r); do{ SUB_REGINTERNAL(); if(!qbevent)break;evnt(1653);}while(r); do{ *__LONG_F= 4 + 8 ; if(!qbevent)break;evnt(1655);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("UNSIGNED",8),__LONG_F,&(pass212= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1656);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("BIT",3),__LONG_F,&(pass213= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1657);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("BYTE",4),__LONG_F,&(pass214= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1658);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("INTEGER64",9),__LONG_F,&(pass215= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1659);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("OFFSET",6),__LONG_F,&(pass216= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1660);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("FLOAT",5),__LONG_F,&(pass217= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1661);}while(r); do{ *__LONG_F= 8 + 32 ; if(!qbevent)break;evnt(1663);}while(r); do{ SUB_HASHADD(qbs_new_txt_len("EXPLICIT",8),__LONG_F,&(pass218= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1664);}while(r); } do{ if(!qbevent)break;evnt(1667);}while(r); do{ *__LONG_GLOBTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("global.txt",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1667);}while(r); do{ *__INTEGER_DEFDATAHANDLE=*__LONG_GLOBTXTBUF; if(!qbevent)break;evnt(1668);}while(r); S_2146:; if ((*__LONG_IDERECOMPILE)||new_error){ if(qbevent){evnt(1670);if(r)goto S_2146;} do{ *__LONG_IDERECOMPILE= 0 ; if(!qbevent)break;evnt(1671);}while(r); do{ *__LONG_IDEPASS= 1 ; if(!qbevent)break;evnt(1672);}while(r); do{ qbs_set(__STRING_SENDC,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1673);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(1674);}while(r); } S_2152:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(1677);if(r)goto S_2152;} do{ goto LABEL_IDERET1; if(!qbevent)break;evnt(1677);}while(r); } S_2155:; if ((~(*__BYTE_QUIETMODE))||new_error){ if(qbevent){evnt(1679);if(r)goto S_2155;} do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip219: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1680);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Beginning C++ output from QB64 code... ",39)); if (new_error) goto skip220; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip220: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1681);}while(r); } do{ SUB_LINEINPUT3LOAD(__STRING_SOURCEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1684);}while(r); S_2160:; do{ if(qbevent){evnt(1686);if(r)goto S_2160;} do{ qbs_set(__STRING_WHOLELINE,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1690);}while(r); S_2162:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_WHOLELINE,func_chr( 13 ))))||new_error){ if(qbevent){evnt(1691);if(r)goto S_2162;} do{ goto dl_exit_221; if(!qbevent)break;evnt(1691);}while(r); } LABEL_IDEPREPASS:; if(qbevent){evnt(1693);r=0;} LABEL_PREPASSLASTLINE:; if(qbevent){evnt(1694);r=0;} S_2165:; if (((-(*__LONG_LASTLINE!= 0 ))|(-(*__LONG_FIRSTLINE!= 0 )))||new_error){ if(qbevent){evnt(1696);if(r)goto S_2165;} do{ qbs_set(__STRING_LINEBACKUP,__STRING_WHOLELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1697);}while(r); do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1698);}while(r); S_2168:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(1699);if(r)goto S_2168;} do{ *__LONG_ADDINGVWATCH= 1 ; if(!qbevent)break;evnt(1700);}while(r); S_2170:; if ((-(*__LONG_FIRSTLINE!= 0 ))||new_error){ if(qbevent){evnt(1701);if(r)goto S_2170;} do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("internal\\support\\vwatch\\vwatch.bi",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1701);}while(r); } S_2173:; if ((-(*__LONG_LASTLINE!= 0 ))||new_error){ if(qbevent){evnt(1702);if(r)goto S_2173;} do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("internal\\support\\vwatch\\vwatch.bm",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1702);}while(r); } }else{ S_2177:; if ((-(*__LONG_LASTLINE!= 0 ))||new_error){ if(qbevent){evnt(1705);if(r)goto S_2177;} do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("internal\\support\\vwatch\\vwatch_stub.bm",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1705);}while(r); } } do{ *__LONG_FIRSTLINE= 0 ; if(!qbevent)break;evnt(1707);}while(r); do{ *__LONG_LASTLINE= 0 ; if(!qbevent)break;evnt(1707);}while(r); S_2183:; if ((qbs_cleanup(qbs_tmp_base,__STRING_FORCEINCLUDEFROMROOT->len))||new_error){ if(qbevent){evnt(1708);if(r)goto S_2183;} do{ goto LABEL_FORCEINCLUDE_PREPASS; if(!qbevent)break;evnt(1708);}while(r); } LABEL_FORCEINCLUDECOMPLETED_PREPASS:; if(qbevent){evnt(1709);r=0;} do{ *__LONG_ADDINGVWATCH= 0 ; if(!qbevent)break;evnt(1710);}while(r); do{ qbs_set(__STRING_WHOLELINE,__STRING_LINEBACKUP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1711);}while(r); } do{ qbs_set(__STRING_WHOLESTV,__STRING_WHOLELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1714);}while(r); do{ *__LONG_PREPASS= 1 ; if(!qbevent)break;evnt(1716);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1717);}while(r); do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(1718);}while(r); do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER+ 1 ; if(!qbevent)break;evnt(1720);}while(r); do{ *__LONG_REALLINENUMBER=*__LONG_REALLINENUMBER+ 1 ; if(!qbevent)break;evnt(1721);}while(r); S_2195:; while((!(-(*__LONG_LINENUMBERid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_INVALIDLINE[2]&1){ preserved_elements=__ARRAY_BYTE_INVALIDLINE[5]; } else preserved_elements=0; __ARRAY_BYTE_INVALIDLINE[4]= 0 ; __ARRAY_BYTE_INVALIDLINE[5]=(func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1)+ 1000 )-__ARRAY_BYTE_INVALIDLINE[4]+1; __ARRAY_BYTE_INVALIDLINE[6]=1; if (__ARRAY_BYTE_INVALIDLINE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_INVALIDLINE[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_INVALIDLINE[0])); tmp_long=__ARRAY_BYTE_INVALIDLINE[5]; __ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_INVALIDLINE[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(1728);if(r)goto S_2199;} S_2200:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs__trim(__STRING_WHOLELINE)),qbs_new_txt_len("$NOPREFIX",9))))||new_error){ if(qbevent){evnt(1730);if(r)goto S_2200;} do{ *__LONG_QB64PREFIX_SET_DESIREDSTATE= 1 ; if(!qbevent)break;evnt(1731);}while(r); S_2202:; if ((-(*__LONG_QB64PREFIX_SET== 0 ))||new_error){ if(qbevent){evnt(1732);if(r)goto S_2202;} S_2203:; if ((-(*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS== 0 ))||new_error){ if(qbevent){evnt(1733);if(r)goto S_2203;} do{ *__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS=*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS+ 1 ; if(!qbevent)break;evnt(1734);}while(r); do{ goto LABEL_DO_RECOMPILE; if(!qbevent)break;evnt(1735);}while(r); } } } do{ qbs_set(__STRING_WHOLELINE,FUNC_LINEFORMAT(__STRING_WHOLELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1740);}while(r); S_2210:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(1741);if(r)goto S_2210;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1741);}while(r); } do{ qbs_set(__STRING_TEMP,qbs_ltrim(qbs_rtrim(qbs_ucase(__STRING_WHOLESTV)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1744);}while(r); S_2214:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$COLOR:0",8))))||new_error){ if(qbevent){evnt(1746);if(r)goto S_2214;} S_2215:; if ((*__LONG_QB64PREFIX_SET)||new_error){ if(qbevent){evnt(1747);if(r)goto S_2215;} do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color0_noprefix.bi",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1748);}while(r); }else{ do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color0.bi",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1750);}while(r); } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1752);}while(r); } S_2222:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$COLOR:32",9))))||new_error){ if(qbevent){evnt(1755);if(r)goto S_2222;} S_2223:; if ((*__LONG_QB64PREFIX_SET)||new_error){ if(qbevent){evnt(1756);if(r)goto S_2223;} do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color32_noprefix.bi",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1757);}while(r); }else{ do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color32.bi",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1759);}while(r); } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1761);}while(r); } S_2230:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$DEBUG",6))))||new_error){ if(qbevent){evnt(1764);if(r)goto S_2230;} do{ *__LONG_VWATCHDESIREDSTATE= 1 ; if(!qbevent)break;evnt(1765);}while(r); S_2232:; if ((-(*__LONG_VWATCHON== 0 ))||new_error){ if(qbevent){evnt(1766);if(r)goto S_2232;} S_2233:; if ((-(*__LONG_VWATCHRECOMPILEATTEMPTS== 0 ))||new_error){ if(qbevent){evnt(1767);if(r)goto S_2233;} do{ *__LONG_VWATCHRECOMPILEATTEMPTS=*__LONG_VWATCHRECOMPILEATTEMPTS+ 1 ; if(!qbevent)break;evnt(1769);}while(r); do{ goto LABEL_DO_RECOMPILE; if(!qbevent)break;evnt(1770);}while(r); }else{ } } } S_2240:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 4 ),qbs_new_txt_len("$IF ",4))))||new_error){ if(qbevent){evnt(1777);if(r)goto S_2240;} S_2241:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_TEMP, 5 ),qbs_new_txt_len(" THEN",5))))||new_error){ if(qbevent){evnt(1778);if(r)goto S_2241;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$IF without THEN",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1778);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1778);}while(r); } do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 4 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1779);}while(r); do{ qbs_set(__STRING_TEMP,qbs_rtrim(qbs_left(__STRING_TEMP,__STRING_TEMP->len- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1780);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,qbs_new_txt_len("=",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1781);}while(r); do{ *__INTEGER_EXECCOUNTER=*__INTEGER_EXECCOUNTER+ 1 ; if(!qbevent)break;evnt(1782);}while(r); do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(1783);}while(r); do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(1784);}while(r); do{ *__LONG_RESULT=FUNC_EVALPREIF(__STRING_TEMP,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1785);}while(r); S_2252:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1786);if(r)goto S_2252;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1786);}while(r); } S_2255:; if ((-(*__LONG_RESULT!= 0 ))||new_error){ if(qbevent){evnt(1787);if(r)goto S_2255;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]; if(!qbevent)break;evnt(1788);}while(r); S_2257:; if ((-(((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]== 0 ))||new_error){ if(qbevent){evnt(1789);if(r)goto S_2257;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 4 ; if(!qbevent)break;evnt(1789);}while(r); } } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1791);}while(r); } S_2263:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$ELSE",5))))||new_error){ if(qbevent){evnt(1794);if(r)goto S_2263;} S_2264:; if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){ if(qbevent){evnt(1795);if(r)goto S_2264;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE without $IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1795);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1795);}while(r); } S_2268:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 2 )||new_error){ if(qbevent){evnt(1796);if(r)goto S_2268;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$IF block already has $ELSE statement in it",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1796);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1796);}while(r); } do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 2 ; if(!qbevent)break;evnt(1797);}while(r); S_2273:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 4 )||new_error){ if(qbevent){evnt(1798);if(r)goto S_2273;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(1799);}while(r); }else{ do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]; if(!qbevent)break;evnt(1801);}while(r); } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1803);}while(r); } S_2280:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 5 ),qbs_new_txt_len("$ELSE",5))))||new_error){ if(qbevent){evnt(1806);if(r)goto S_2280;} do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 6 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1807);}while(r); S_2282:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 3 ),qbs_new_txt_len("IF ",3))))||new_error){ if(qbevent){evnt(1808);if(r)goto S_2282;} S_2283:; if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){ if(qbevent){evnt(1809);if(r)goto S_2283;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF without $IF",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1809);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1809);}while(r); } S_2287:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 2 )||new_error){ if(qbevent){evnt(1810);if(r)goto S_2287;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF cannot follow $ELSE",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1810);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1810);}while(r); } S_2291:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_TEMP, 5 ),qbs_new_txt_len(" THEN",5))))||new_error){ if(qbevent){evnt(1811);if(r)goto S_2291;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF without THEN",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1811);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1811);}while(r); } S_2295:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 4 )||new_error){ if(qbevent){evnt(1812);if(r)goto S_2295;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(1813);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1814);}while(r); } do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1816);}while(r); do{ qbs_set(__STRING_TEMP,qbs_rtrim(qbs_left(__STRING_TEMP,__STRING_TEMP->len- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1817);}while(r); do{ *__LONG_RESULT=FUNC_EVALPREIF(__STRING_TEMP,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1818);}while(r); S_2302:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(1819);if(r)goto S_2302;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1819);}while(r); } S_2305:; if ((-(*__LONG_RESULT!= 0 ))||new_error){ if(qbevent){evnt(1820);if(r)goto S_2305;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]; if(!qbevent)break;evnt(1821);}while(r); S_2307:; if ((-(((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]== 0 ))||new_error){ if(qbevent){evnt(1822);if(r)goto S_2307;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 4 ; if(!qbevent)break;evnt(1822);}while(r); } } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1824);}while(r); } } S_2314:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_TEMP,qbs_new_txt_len("$END IF",7)))|(qbs_equal(__STRING_TEMP,qbs_new_txt_len("$ENDIF",6)))))||new_error){ if(qbevent){evnt(1828);if(r)goto S_2314;} S_2315:; if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){ if(qbevent){evnt(1829);if(r)goto S_2315;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$END IF without $IF",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1829);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1829);}while(r); } do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(1830);}while(r); do{ *__INTEGER_EXECCOUNTER=*__INTEGER_EXECCOUNTER- 1 ; if(!qbevent)break;evnt(1831);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1832);}while(r); } S_2323:; if ((((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])])||new_error){ if(qbevent){evnt(1835);if(r)goto S_2323;} S_2324:; while((!(-(*__LONG_LINENUMBERid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_INVALIDLINE[2]&1){ preserved_elements=__ARRAY_BYTE_INVALIDLINE[5]; } else preserved_elements=0; __ARRAY_BYTE_INVALIDLINE[4]= 0 ; __ARRAY_BYTE_INVALIDLINE[5]=(func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1)+ 1000 )-__ARRAY_BYTE_INVALIDLINE[4]+1; __ARRAY_BYTE_INVALIDLINE[6]=1; if (__ARRAY_BYTE_INVALIDLINE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_INVALIDLINE[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_INVALIDLINE[0])); tmp_long=__ARRAY_BYTE_INVALIDLINE[5]; __ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_INVALIDLINE[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elements = ",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1854);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1854);}while(r); } do{ qbs_set(__STRING_L,qbs_rtrim(qbs_left(__STRING_TEMP,*__LONG_TEMP- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1855);}while(r); do{ qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_TEMP,*__LONG_TEMP+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1855);}while(r); S_2344:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_L)== 0 )))||new_error){ if(qbevent){evnt(1857);if(r)goto S_2344;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid flag name",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1857);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1857);}while(r); } S_2348:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_R, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(1858);if(r)goto S_2348;} do{ qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_R, 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1858);}while(r); } S_2351:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_R, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(1859);if(r)goto S_2351;} do{ qbs_set(__STRING_R,qbs_rtrim(qbs_left(__STRING_R,__STRING_R->len- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1859);}while(r); } S_2354:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_R, 1 ),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(1860);if(r)goto S_2354;} do{ qbs_set(__STRING_R1,qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1861);}while(r); do{ qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_R, 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1862);}while(r); }else{ do{ qbs_set(__STRING_R1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1864);}while(r); } S_2360:; fornext_value230= 1 ; fornext_finalvalue230=__STRING_R->len; fornext_step230= 1 ; if (fornext_step230<0) fornext_step_negative230=1; else fornext_step_negative230=0; if (new_error) goto fornext_error230; goto fornext_entrylabel230; while(1){ fornext_value230=fornext_step230+(*__LONG_I); fornext_entrylabel230: *__LONG_I=fornext_value230; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative230){ if (fornext_value230fornext_finalvalue230) break; } fornext_error230:; if(qbevent){evnt(1867);if(r)goto S_2360;} do{ *__LONG_A=qbs_asc(__STRING_R,*__LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1868);}while(r); S_2362:; if(qbevent){evnt(1869);if(r)goto S_2362;} S_2363:; if (((*__LONG_A==( 32 )))||new_error){ if(qbevent){evnt(1870);if(r)goto S_2363;} sc_ec_1_end:; goto sc_232_end; } S_2364:; if (((*__LONG_A==( 46 )))||new_error){ if(qbevent){evnt(1871);if(r)goto S_2364;} do{ qbs_set(__STRING_R1,qbs_add(__STRING_R1,qbs_new_txt_len(".",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1872);}while(r); sc_ec_2_end:; goto sc_232_end; } S_2366:; if (((*__LONG_A<( 48 ))||(*__LONG_A>( 90 )))||new_error){ if(qbevent){evnt(1873);if(r)goto S_2366;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid value",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1874);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1874);}while(r); sc_ec_3_end:; goto sc_232_end; } do{ qbs_set(__STRING_R1,qbs_add(__STRING_R1,func_chr(*__LONG_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1876);}while(r); sc_232_end:; fornext_continue_229:; } fornext_exit_229:; do{ qbs_set(__STRING_R,__STRING_R1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1879);}while(r); S_2374:; fornext_value234= 8 ; fornext_finalvalue234=*__INTEGER_USERDEFINECOUNT; fornext_step234= 1 ; if (fornext_step234<0) fornext_step_negative234=1; else fornext_step_negative234=0; if (new_error) goto fornext_error234; goto fornext_entrylabel234; while(1){ fornext_value234=fornext_step234+(*__LONG_I); fornext_entrylabel234: *__LONG_I=fornext_value234; if (fornext_step_negative234){ if (fornext_value234fornext_finalvalue234) break; } fornext_error234:; if(qbevent){evnt(1881);if(r)goto S_2374;} S_2375:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),__STRING_L)))||new_error){ if(qbevent){evnt(1882);if(r)goto S_2375;} do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),__STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1882);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1882);}while(r); } fornext_continue_233:; } fornext_exit_233:; do{ *__INTEGER_USERDEFINECOUNT=*__INTEGER_USERDEFINECOUNT+ 1 ; if(!qbevent)break;evnt(1885);}while(r); S_2381:; if ((qbs_cleanup(qbs_tmp_base,-(*__INTEGER_USERDEFINECOUNT>func_ubound(__ARRAY_STRING_USERDEFINE, 2 ,2))))||new_error){ if(qbevent){evnt(1886);if(r)goto S_2381;} do{ if (__ARRAY_STRING_USERDEFINE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_USERDEFINE)[12])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_USERDEFINE[2]&1){ preserved_elements=__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]; } else preserved_elements=0; __ARRAY_STRING_USERDEFINE[8]= 0 ; __ARRAY_STRING_USERDEFINE[9]=( 1 )-__ARRAY_STRING_USERDEFINE[8]+1; __ARRAY_STRING_USERDEFINE[10]=1; __ARRAY_STRING_USERDEFINE[4]= 0 ; __ARRAY_STRING_USERDEFINE[5]=(func_ubound(__ARRAY_STRING_USERDEFINE, 2 ,2)+ 10 )-__ARRAY_STRING_USERDEFINE[4]+1; __ARRAY_STRING_USERDEFINE[6]=__ARRAY_STRING_USERDEFINE[10]*__ARRAY_STRING_USERDEFINE[9]; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]; if (tmp_long2= 48 ))&(-(qbs_asc(__STRING_E)<= 59 ))))|(-(qbs_asc(__STRING_E)== 46 ))))||new_error){ if(qbevent){evnt(1908);if(r)goto S_2396;} do{ *__LONG_WHOLELINEI= 2 ; if(!qbevent)break;evnt(1908);}while(r); do{ goto LABEL_PPSKPL; if(!qbevent)break;evnt(1908);}while(r); } S_2400:; if ((-(*__LONG_WHOLELINEN>= 2 ))||new_error){ if(qbevent){evnt(1911);if(r)goto S_2400;} 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(1912);}while(r); do{ *__LONG_X3=*__LONG_X2+ 2 ; if(!qbevent)break;evnt(1912);}while(r); S_2403:; if ((-(*__LONG_X2== 0 ))||new_error){ if(qbevent){evnt(1913);if(r)goto S_2403;} S_2404:; 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(1914);if(r)goto S_2404;} do{ *__LONG_X2=__STRING_WHOLELINE->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1914);}while(r); do{ *__LONG_X3=*__LONG_X2+ 1 ; if(!qbevent)break;evnt(1914);}while(r); } } S_2409:; if ((*__LONG_X2)||new_error){ if(qbevent){evnt(1917);if(r)goto S_2409;} do{ qbs_set(__STRING_E,qbs_left(__STRING_WHOLELINE,*__LONG_X2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1918);}while(r); S_2411:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDLABEL(__STRING_E)))||new_error){ if(qbevent){evnt(1919);if(r)goto S_2411;} do{ qbs_set(__STRING_WHOLELINE,qbs_right(__STRING_WHOLELINE,__STRING_WHOLELINE->len-*__LONG_X3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1920);}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(1921);}while(r); do{ *__LONG_WHOLELINEN=FUNC_NUMELEMENTS(__STRING_WHOLELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1922);}while(r); do{ goto LABEL_PPSKPL; if(!qbevent)break;evnt(1923);}while(r); } } } LABEL_PPSKPL:; if(qbevent){evnt(1928);r=0;} S_2419:; if ((-(*__LONG_WHOLELINEI<=*__LONG_WHOLELINEN))||new_error){ if(qbevent){evnt(1929);if(r)goto S_2419;} do{ qbs_set(__STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1931);}while(r); do{ qbs_set(__STRING_CA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1932);}while(r); LABEL_PPBLDA:; if(qbevent){evnt(1933);r=0;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_WHOLELINE,__LONG_WHOLELINEI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1934);}while(r); do{ qbs_set(__STRING_CE,FUNC_GETELEMENT(__STRING_CWHOLELINE,__LONG_WHOLELINEI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1935);}while(r); S_2424:; 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(1936);if(r)goto S_2424;} S_2425:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(1937);if(r)goto S_2425;} S_2426:; if (( 0 )||new_error){ if(qbevent){evnt(1938);if(r)goto S_2426;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip240; 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 skip240; skip240: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(1938);}while(r); } do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1939);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass241= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1940);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass242= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1941);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass243= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1942);}while(r); S_2433:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N== 2 ))&(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3)))&(((qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("SUB",3)))|(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("FUNCTION",8)))))))||new_error){ if(qbevent){evnt(1945);if(r)goto S_2433;} do{ *__BYTE_CLOSEDSUBFUNC= -1 ; if(!qbevent)break;evnt(1946);}while(r); } S_2436:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(1950);if(r)goto S_2436;} S_2437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(1952);if(r)goto S_2437;} S_2438:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("DECLARE",7)))))||new_error){ if(qbevent){evnt(1953);if(r)goto S_2438;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END DECLARE",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1953);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1953);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(1954);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1955);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 2 ; if(!qbevent)break;evnt(1958);}while(r); S_2446:; 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(1960);if(r)goto S_2446;} do{ *__LONG_SUBFUNCN=*__LONG_SUBFUNCN- 1 ; if(!qbevent)break;evnt(1960);}while(r); do{ goto LABEL_DECLARESUBFUNC; if(!qbevent)break;evnt(1960);}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(1962);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1962);}while(r); } S_2453:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(1966);if(r)goto S_2453;} do{ *__LONG_I=*__LONG_DEFININGTYPE; if(!qbevent)break;evnt(1967);}while(r); S_2455:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(1969);if(r)goto S_2455;} S_2456:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(1970);if(r)goto S_2456;} S_2457:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("TYPE",4)))))||new_error){ if(qbevent){evnt(1971);if(r)goto S_2457;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END TYPE",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1971);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1971);}while(r); } S_2461:; if ((-(((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]== 0 ))||new_error){ if(qbevent){evnt(1972);if(r)goto S_2461;} 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(1972);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1972);}while(r); } do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(1973);}while(r); do{ qbs_set(__STRING_SIZ,FUNC_STR2(&(pass244=((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(1976);}while(r); do{ SUB_WRITEBUFLINE(&(pass245=*__LONG_GLOBTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1977);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(1980);}while(r); } } S_2471:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(1984);if(r)goto S_2471;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name AS type, AS type element-list, or END TYPE",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1984);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1984);}while(r); } do{ qbs_set(__STRING_N,__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1985);}while(r); S_2476:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_N,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(1987);if(r)goto S_2476;} do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(1989);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(1990);}while(r); S_2479:; while((-(*__LONG_I2>func_ubound(__ARRAY_LONG_UDTENEXT,1,1)))||new_error){ if(qbevent){evnt(1991);if(r)goto S_2479;} do{ SUB_INCREASEUDTARRAYS(); if(!qbevent)break;evnt(1991);}while(r); ww_continue_246:; } ww_exit_246:; 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(1992);}while(r); do{ *__LONG_II= 2 ; if(!qbevent)break;evnt(1994);}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(1996);}while(r); S_2485:; 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(1998);if(r)goto S_2485;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name AS type, AS type element-list, or END TYPE",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1998);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(1998);}while(r); } do{ qbs_set(__STRING_T,FUNC_GETELEMENTS(__STRING_A,&(pass247=*__LONG_II+ 1 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(1999);}while(r); S_2490:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*__LONG_DEFININGTYPE)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1)))))||new_error){ if(qbevent){evnt(2001);if(r)goto S_2490;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid self-reference",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2001);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2001);}while(r); } do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2002);}while(r); S_2495:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2003);if(r)goto S_2495;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2003);}while(r); } S_2498:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(2004);if(r)goto S_2498;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2004);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2004);}while(r); } do{ *__LONG_TYPSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(2005);}while(r); S_2503:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N)== 0 )))||new_error){ if(qbevent){evnt(2007);if(r)goto S_2503;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2007);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2007);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2008);}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,&(pass248= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2009);}while(r); LABEL_NORMALTYPEBLOCK:; if(qbevent){evnt(2010);r=0;} do{ qbs_set(__STRING_TYPEDEFINITIONS,qbs_add(qbs_add(qbs_add(__STRING_TYPEDEFINITIONS,l2string(*__LONG_I2)),l2string(__STRING_N->len)),__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2011);}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(2012);}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(2013);}while(r); do{ qbs_set(__STRING_HASHNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2015);}while(r); do{ *__LONG_HASHCHKFLAGS= 8 + 512 ; if(!qbevent)break;evnt(2018);}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(2019);}while(r); S_2515:; while((*__LONG_HASHRES)||new_error){ if(qbevent){evnt(2020);if(r)goto S_2515;} S_2516:; if ((*__LONG_HASHRESFLAGS& 512 )||new_error){ if(qbevent){evnt(2021);if(r)goto S_2516;} S_2517:; if ((-(*__LONG_HASHRESREF==*__LONG_I))||new_error){ if(qbevent){evnt(2022);if(r)goto S_2517;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_HASHNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2022);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2022);}while(r); } } S_2522:; if ((*__LONG_HASHRESFLAGS& 8 )||new_error){ if(qbevent){evnt(2024);if(r)goto S_2522;} S_2523:; if ((*__LONG_HASHRESFLAGS&( 4 + 32 + 16 + 8192 ))||new_error){ if(qbevent){evnt(2025);if(r)goto S_2523;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_HASHNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2025);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2025);}while(r); } } S_2528:; if ((-(*__LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(2027);if(r)goto S_2528;} do{ *__LONG_HASHRES=FUNC_HASHFINDCONT(__LONG_HASHRESFLAGS,__LONG_HASHRESREF); if(!qbevent)break;evnt(2027);}while(r); }else{ do{ *__LONG_HASHRES= 0 ; if(!qbevent)break;evnt(2027);}while(r); } dl_continue_250:; } dl_exit_250:; do{ SUB_HASHADD(__STRING_HASHNAME,&(pass251= 512 ),__LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2030);}while(r); S_2535:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(2033);if(r)goto S_2535;} do{ *__LONG_U=*__LONG_TYP& 511 ; if(!qbevent)break;evnt(2034);}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(2035);}while(r); S_2538:; if ((((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*__LONG_U)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])||new_error){ if(qbevent){evnt(2036);if(r)goto S_2538;} 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(2036);}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(2036);}while(r); } S_2542:; if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*__LONG_U)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||new_error){ if(qbevent){evnt(2037);if(r)goto S_2542;} do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(2037);}while(r); } }else{ S_2546:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(2039);if(r)goto S_2546;} S_2547:; if ((-((*__LONG_TYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(2040);if(r)goto S_2547;} 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_OFFSETTYPE& 511 ; if(!qbevent)break;evnt(2041);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(2042);}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_TYPSIZE* 8 ; if(!qbevent)break;evnt(2044);}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(2046);}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(2046);}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(2048);}while(r); S_2557:; if ((-((*__LONG_TYP&*__LONG_ISOFFSETINBITS)== 0 ))||new_error){ if(qbevent){evnt(2049);if(r)goto S_2557;} 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(2049);}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(2049);}while(r); } } } S_2563:; if ((((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[array_check((*__LONG_I2)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5])])||new_error){ if(qbevent){evnt(2054);if(r)goto S_2563;} S_2564:; if ((((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]% 8 )||new_error){ if(qbevent){evnt(2055);if(r)goto S_2564;} 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(2056);}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(2059);}while(r); S_2569:; if ((-(((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*__LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]== 0 ))||new_error){ if(qbevent){evnt(2062);if(r)goto S_2569;} 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(2063);}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(2065);}while(r); } S_2574:; if ((*__LONG_NEWASTYPEBLOCKSYNTAX)||new_error){ if(qbevent){evnt(2069);if(r)goto S_2574;} do{ #include "ret0.txt" if(!qbevent)break;evnt(2069);}while(r); } do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(2070);}while(r); }else{ do{ *__LONG_II= 2 ; if(!qbevent)break;evnt(2073);}while(r); S_2580:; if ((-(*__LONG_II>=*__LONG_N))||new_error){ if(qbevent){evnt(2075);if(r)goto S_2580;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name AS type, AS type element-list, or END TYPE",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2075);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2075);}while(r); } do{ qbs_set(__STRING_PREVIOUSELEMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2076);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2077);}while(r); do{ qbs_set(__STRING_LASTELEMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2078);}while(r); LABEL_BUILDTYPENAME:; if(qbevent){evnt(2079);r=0;} do{ qbs_set(__STRING_LASTELEMENT,FUNC_GETELEMENT(__STRING_A,__LONG_II)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2080);}while(r); S_2588:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_LASTELEMENT,qbs_new_txt_len(",",1)))&(qbs_notequal(__STRING_LASTELEMENT,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(2081);if(r)goto S_2588;} do{ qbs_set(__STRING_N,__STRING_LASTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2082);}while(r); do{ qbs_set(__STRING_CN,FUNC_GETELEMENT(__STRING_CA,__LONG_II)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2083);}while(r); S_2591:; if ((qbs_cleanup(qbs_tmp_base,__STRING_PREVIOUSELEMENT->len))||new_error){ if(qbevent){evnt(2084);if(r)goto S_2591;} do{ qbs_set(__STRING_T,qbs_add(qbs_add(__STRING_T,__STRING_PREVIOUSELEMENT),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2084);}while(r); } do{ qbs_set(__STRING_PREVIOUSELEMENT,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2085);}while(r); do{ qbs_set(__STRING_LASTELEMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2086);}while(r); do{ *__LONG_II=*__LONG_II+ 1 ; if(!qbevent)break;evnt(2087);}while(r); do{ goto LABEL_BUILDTYPENAME; if(!qbevent)break;evnt(2088);}while(r); } do{ qbs_set(__STRING_T,qbs_rtrim(__STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2091);}while(r); S_2600:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*__LONG_DEFININGTYPE)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1)))))||new_error){ if(qbevent){evnt(2092);if(r)goto S_2600;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid self-reference",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2092);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2092);}while(r); } do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2093);}while(r); S_2605:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2094);if(r)goto S_2605;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2094);}while(r); } S_2608:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(2095);if(r)goto S_2608;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2095);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2095);}while(r); } do{ *__LONG_TYPSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(2096);}while(r); do{ qbs_set(__STRING_PREVIOUSELEMENT,__STRING_LASTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2098);}while(r); LABEL_NEXTTYPEELEMENT:; if(qbevent){evnt(2099);r=0;} do{ *__LONG_LASTTYPEELEMENT=*__LONG_LASTTYPEELEMENT+ 1 ; if(!qbevent)break;evnt(2100);}while(r); do{ *__LONG_I2=*__LONG_LASTTYPEELEMENT; if(!qbevent)break;evnt(2101);}while(r); S_2616:; while((-(*__LONG_I2>func_ubound(__ARRAY_LONG_UDTENEXT,1,1)))||new_error){ if(qbevent){evnt(2102);if(r)goto S_2616;} do{ SUB_INCREASEUDTARRAYS(); if(!qbevent)break;evnt(2102);}while(r); ww_continue_253:; } ww_exit_253:; 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(2103);}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(2104);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2106);}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),__STRING_CN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2107);}while(r); S_2623:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N)== 0 )))||new_error){ if(qbevent){evnt(2109);if(r)goto S_2623;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2109);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2109);}while(r); } do{ *__LONG_NEWASTYPEBLOCKSYNTAX= -1 ; if(!qbevent)break;evnt(2111);}while(r); do{ return_point[next_return_point++]=1; if (next_return_point>=return_points) more_return_points(); goto LABEL_NORMALTYPEBLOCK; RETURN_1:; if(!qbevent)break;evnt(2112);}while(r); do{ *__LONG_NEWASTYPEBLOCKSYNTAX= 0 ; if(!qbevent)break;evnt(2113);}while(r); LABEL_GETNEXTELEMENT:; if(qbevent){evnt(2115);r=0;} do{ *__LONG_II=*__LONG_II+ 1 ; if(!qbevent)break;evnt(2116);}while(r); do{ qbs_set(__STRING_LASTELEMENT,FUNC_GETELEMENT(__STRING_A,__LONG_II)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2117);}while(r); S_2632:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_LASTELEMENT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2118);if(r)goto S_2632;} do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(2118);}while(r); } S_2635:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_II==*__LONG_N))&(qbs_equal(__STRING_LASTELEMENT,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(2119);if(r)goto S_2635;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2119);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2119);}while(r); } S_2639:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_LASTELEMENT,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(2120);if(r)goto S_2639;} S_2640:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PREVIOUSELEMENT,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(2121);if(r)goto S_2640;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2121);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2121);}while(r); } do{ qbs_set(__STRING_PREVIOUSELEMENT,__STRING_LASTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2122);}while(r); do{ goto LABEL_GETNEXTELEMENT; if(!qbevent)break;evnt(2123);}while(r); } do{ qbs_set(__STRING_N,__STRING_LASTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2125);}while(r); S_2648:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_PREVIOUSELEMENT,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(2126);if(r)goto S_2648;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2126);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2126);}while(r); } do{ qbs_set(__STRING_PREVIOUSELEMENT,__STRING_LASTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2127);}while(r); do{ qbs_set(__STRING_CN,FUNC_GETELEMENT(__STRING_CA,__LONG_II)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2128);}while(r); do{ goto LABEL_NEXTTYPEELEMENT; if(!qbevent)break;evnt(2129);}while(r); } } S_2657:; if ((*__LONG_DEFININGTYPE&(-(*__LONG_N>= 1 )))||new_error){ if(qbevent){evnt(2133);if(r)goto S_2657;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END TYPE",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2133);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2133);}while(r); } S_2661:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(2135);if(r)goto S_2661;} S_2662:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("TYPE",4))))||new_error){ if(qbevent){evnt(2136);if(r)goto S_2662;} S_2663:; if ((-(*__LONG_N!= 2 ))||new_error){ if(qbevent){evnt(2137);if(r)goto S_2663;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected TYPE typename",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2137);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2137);}while(r); } do{ *__LONG_LASTTYPE=*__LONG_LASTTYPE+ 1 ; if(!qbevent)break;evnt(2138);}while(r); do{ qbs_set(__STRING_TYPEDEFINITIONS,qbs_add(qbs_add(__STRING_TYPEDEFINITIONS,l2string( -1 )),l2string(*__LONG_LASTTYPE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2139);}while(r); do{ *__LONG_DEFININGTYPE=*__LONG_LASTTYPE; if(!qbevent)break;evnt(2140);}while(r); do{ *__LONG_I=*__LONG_DEFININGTYPE; if(!qbevent)break;evnt(2141);}while(r); S_2671:; while((-(*__LONG_I>func_ubound(__ARRAY_LONG_UDTENEXT,1,1)))||new_error){ if(qbevent){evnt(2142);if(r)goto S_2671;} do{ SUB_INCREASEUDTARRAYS(); if(!qbevent)break;evnt(2142);}while(r); ww_continue_254:; } ww_exit_254:; S_2674:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_SECONDELEMENT)== 0 )))||new_error){ if(qbevent){evnt(2143);if(r)goto S_2674;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2143);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2143);}while(r); } do{ qbs_set(__STRING_TYPEDEFINITIONS,qbs_add(qbs_add(__STRING_TYPEDEFINITIONS,l2string(__STRING_SECONDELEMENT->len)),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2144);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2145);}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,&(pass256= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2146);}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(2147);}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(2148);}while(r); do{ tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(2149);}while(r); do{ qbs_set(__STRING_HASHNAME,__STRING_SECONDELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2151);}while(r); do{ *__LONG_HASHFLAGS= 256 ; if(!qbevent)break;evnt(2152);}while(r); do{ *__LONG_HASHCHKFLAGS= 8 + 64 + 128 + 256 ; if(!qbevent)break;evnt(2154);}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(2155);}while(r); S_2688:; while((*__LONG_HASHRES)||new_error){ if(qbevent){evnt(2156);if(r)goto S_2688;} do{ *__LONG_ALLOW= 0 ; if(!qbevent)break;evnt(2157);}while(r); S_2690:; if ((*__LONG_HASHRESFLAGS&( 64 + 128 ))||new_error){ if(qbevent){evnt(2158);if(r)goto S_2690;} do{ *__LONG_ALLOW= 1 ; if(!qbevent)break;evnt(2159);}while(r); } S_2693:; if ((*__LONG_HASHRESFLAGS& 8 )||new_error){ if(qbevent){evnt(2161);if(r)goto S_2693;} S_2694:; if ((-((*__LONG_HASHRESFLAGS&( 4 + 16 + 32 + 16384 ))== 0 ))||new_error){ if(qbevent){evnt(2162);if(r)goto S_2694;} do{ *__LONG_ALLOW= 1 ; if(!qbevent)break;evnt(2162);}while(r); } } S_2698:; if ((-(*__LONG_ALLOW== 0 ))||new_error){ if(qbevent){evnt(2164);if(r)goto S_2698;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_HASHNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2164);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2164);}while(r); } S_2702:; if ((-(*__LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(2165);if(r)goto S_2702;} do{ *__LONG_HASHRES=FUNC_HASHFINDCONT(__LONG_HASHRESFLAGS,__LONG_HASHRESREF); if(!qbevent)break;evnt(2165);}while(r); }else{ do{ *__LONG_HASHRES= 0 ; if(!qbevent)break;evnt(2165);}while(r); } dl_continue_257:; } dl_exit_257:; do{ SUB_HASHADD(__STRING_HASHNAME,__LONG_HASHFLAGS,__LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2169);}while(r); do{ goto LABEL_FINISHEDLINEPP; if(!qbevent)break;evnt(2171);}while(r); } } S_2712:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N>= 1 ))&(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CONST",5)))))||new_error){ if(qbevent){evnt(2179);if(r)goto S_2712;} S_2713:; if (((-(*__LONG_SUBFUNCN> 0 ))&(-(*__BYTE_CLOSEDSUBFUNC!= 0 )))||new_error){ if(qbevent){evnt(2184);if(r)goto S_2713;} 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(2184);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2184);}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(2187);}while(r); S_2718:; if ((*__LONG_I2)||new_error){ if(qbevent){evnt(2188);if(r)goto S_2718;} S_2719:; do{ if(qbevent){evnt(2189);if(r)goto S_2719;} 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(2190);}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(2191);}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(2192);}while(r); S_2723:; dl_continue_258:; }while((!(-(*__LONG_I2== 0 )))&&(!new_error)); dl_exit_258:; if(qbevent){evnt(2193);if(r)goto S_2723;} do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2194);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass261= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2195);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass262= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2195);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass263= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2195);}while(r); } S_2729:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(2198);if(r)goto S_2729;} 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(2198);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2198);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(2199);}while(r); LABEL_CONSTDEFPENDINGPP:; if(qbevent){evnt(2200);r=0;} do{ *__LONG_PENDING= 0 ; if(!qbevent)break;evnt(2201);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2203);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2203);}while(r); do{ *__LONG_TYPEOVERRIDE= 0 ; if(!qbevent)break;evnt(2204);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2205);}while(r); S_2739:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2206);if(r)goto S_2739;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2206);}while(r); } S_2742:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2207);if(r)goto S_2742;} do{ *__LONG_TYPEOVERRIDE=FUNC_TYPNAME2TYP(__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2208);}while(r); S_2744:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2209);if(r)goto S_2744;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2209);}while(r); } S_2747:; if ((*__LONG_TYPEOVERRIDE&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(2210);if(r)goto S_2747;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2210);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2210);}while(r); } S_2751:; if ((-(*__LONG_TYPEOVERRIDE== 0 ))||new_error){ if(qbevent){evnt(2211);if(r)goto S_2751;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2211);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2211);}while(r); } } S_2756:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(2214);if(r)goto S_2756;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2214);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2214);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(2215);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2218);}while(r); do{ qbs_set(__STRING_READABLE_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2219);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(2220);}while(r); S_2764:; fornext_value265=*__LONG_I; fornext_finalvalue265=*__LONG_N; fornext_step265= 1 ; if (fornext_step265<0) fornext_step_negative265=1; else fornext_step_negative265=0; if (new_error) goto fornext_error265; goto fornext_entrylabel265; while(1){ fornext_value265=fornext_step265+(*__LONG_I2); fornext_entrylabel265: *__LONG_I2=fornext_value265; if (fornext_step_negative265){ if (fornext_value265fornext_finalvalue265) break; } fornext_error265:; if(qbevent){evnt(2221);if(r)goto S_2764;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2222);}while(r); S_2766:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2223);if(r)goto S_2766;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(2223);}while(r); } S_2769:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2224);if(r)goto S_2769;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(2224);}while(r); } S_2772:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(2225);if(r)goto S_2772;} do{ *__LONG_PENDING= 1 ; if(!qbevent)break;evnt(2226);}while(r); do{ *__LONG_I=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(2227);}while(r); S_2775:; if ((-(*__LONG_I>(*__LONG_N- 2 )))||new_error){ if(qbevent){evnt(2228);if(r)goto S_2775;} 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(2228);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2228);}while(r); } do{ goto fornext_exit_264; if(!qbevent)break;evnt(2229);}while(r); } S_2781:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(2231);if(r)goto S_2781;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2231);}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(2231);}while(r); } do{ qbs_set(__STRING_E3,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2233);}while(r); S_2787:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E2->len> 1 )))||new_error){ if(qbevent){evnt(2234);if(r)goto S_2787;} S_2788:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_E2, 1 )== 34 )))||new_error){ if(qbevent){evnt(2235);if(r)goto S_2788;} do{ *__LONG_REMOVECOMMA=func__instrrev(NULL,__STRING_E2,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2236);}while(r); do{ qbs_set(__STRING_E3,qbs_left(__STRING_E2,*__LONG_REMOVECOMMA- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2237);}while(r); }else{ do{ *__LONG_REMOVECOMMA=func_instr(NULL,__STRING_E2,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2239);}while(r); do{ qbs_set(__STRING_E3,func_mid(__STRING_E2,*__LONG_REMOVECOMMA+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2240);}while(r); } } S_2796:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_READABLE_E->len== 0 )))||new_error){ if(qbevent){evnt(2244);if(r)goto S_2796;} do{ qbs_set(__STRING_READABLE_E,__STRING_E3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2245);}while(r); }else{ do{ qbs_set(__STRING_READABLE_E,qbs_add(qbs_add(__STRING_READABLE_E,qbs_new_txt_len(" ",1)),__STRING_E3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2247);}while(r); } fornext_continue_264:; } fornext_exit_264:; S_2802:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_READABLE_E, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(2253);if(r)goto S_2802;} do{ qbs_set(__STRING_TEMP1,qbs__trim(FUNC_EVALUATE_EXPRESSION(__STRING_READABLE_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2254);}while(r); S_2804:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_left(__STRING_TEMP1, 5 ),qbs_new_txt_len("ERROR",5)))&(qbs_notequal(__STRING_E,__STRING_TEMP1))))||new_error){ if(qbevent){evnt(2255);if(r)goto S_2804;} do{ qbs_set(__STRING_E,FUNC_LINEFORMAT(__STRING_TEMP1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2256);}while(r); }else{ S_2807:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP1,qbs_new_txt_len("ERROR - Division By Zero",24))))||new_error){ if(qbevent){evnt(2258);if(r)goto S_2807;} do{ qbs_set(__STRING_A,__STRING_TEMP1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2258);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2258);}while(r); } S_2811:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_TEMP1,qbs_new_txt_len("Improper operations",19),0)))||new_error){ if(qbevent){evnt(2259);if(r)goto S_2811;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid CONST expression.14",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2260);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2260);}while(r); } } } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2266);}while(r); S_2818:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2267);if(r)goto S_2818;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2267);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATECONST(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2269);}while(r); S_2822:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2270);if(r)goto S_2822;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2270);}while(r); } S_2825:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(2272);if(r)goto S_2825;} S_2826:; if ((*__LONG_TYPEOVERRIDE)||new_error){ if(qbevent){evnt(2274);if(r)goto S_2826;} S_2827:; if ((-((*__LONG_TYPEOVERRIDE&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(2275);if(r)goto S_2827;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2275);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2275);}while(r); } } }else{ S_2833:; if ((*__LONG_TYPEOVERRIDE)||new_error){ if(qbevent){evnt(2280);if(r)goto S_2833;} S_2834:; if ((*__LONG_TYPEOVERRIDE&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(2281);if(r)goto S_2834;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2281);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2281);}while(r); } } S_2839:; if ((*__LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(2284);if(r)goto S_2839;} do{ *__FLOAT_CONSTVAL=string2f(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2285);}while(r); do{ *__INTEGER64_CONSTVAL=qbr(*__FLOAT_CONSTVAL); if(!qbevent)break;evnt(2286);}while(r); do{ *__UINTEGER64_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2287);}while(r); }else{ S_2844:; if ((((*__LONG_T&*__LONG_ISUNSIGNED))&(-((*__LONG_T& 511 )== 64 )))||new_error){ if(qbevent){evnt(2289);if(r)goto S_2844;} do{ *__UINTEGER64_CONSTVAL=string2ui64(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2290);}while(r); do{ *__INTEGER64_CONSTVAL=*__UINTEGER64_CONSTVAL; if(!qbevent)break;evnt(2291);}while(r); do{ *__FLOAT_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2292);}while(r); }else{ do{ *__INTEGER64_CONSTVAL=string2i64(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2294);}while(r); do{ *__FLOAT_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2295);}while(r); do{ *__UINTEGER64_CONSTVAL=*__INTEGER64_CONSTVAL; if(!qbevent)break;evnt(2296);}while(r); } } S_2854:; if ((*__LONG_TYPEOVERRIDE)||new_error){ if(qbevent){evnt(2301);if(r)goto S_2854;} do{ *__LONG_T=*__LONG_TYPEOVERRIDE; if(!qbevent)break;evnt(2303);}while(r); } } do{ *__LONG_CONSTLAST=*__LONG_CONSTLAST+ 1 ; if(!qbevent)break;evnt(2308);}while(r); S_2859:; if ((-(*__LONG_CONSTLAST>*__LONG_CONSTMAX))||new_error){ if(qbevent){evnt(2309);if(r)goto S_2859;} do{ *__LONG_CONSTMAX=*__LONG_CONSTMAX* 2 ; if(!qbevent)break;evnt(2310);}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_long2=__ARRAY_STRING_CONSTNAME[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_CONSTCNAME[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_CONSTNAMESYMBOL[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_CONSTSTRING[5]; if (tmp_long2id=(++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(2458);}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(2459);}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(2460);}while(r); S_3026:; dl_continue_272:; }while((!(-(*__LONG_I2== 0 )))&&(!new_error)); dl_exit_272:; if(qbevent){evnt(2461);if(r)goto S_3026;} do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2462);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass275= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2463);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass276= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2463);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass277= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2463);}while(r); } do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,&(pass278= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2466);}while(r); do{ qbs_set(__STRING_SYMBOL,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2467);}while(r); S_3034:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2468);if(r)goto S_3034;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2468);}while(r); } S_3037:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_SF== 2 ))&(qbs_notequal(__STRING_SYMBOL,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(2469);if(r)goto S_3037;} 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(2469);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2469);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2472);}while(r); S_3042:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(2472);if(r)goto S_3042;} do{ qbs_set(__STRING_A,qbs_left(__STRING_A,__STRING_A->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2472);}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(2472);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(2472);}while(r); } do{ qbs_set(__STRING_ALIASNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2475);}while(r); S_3048:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(2476);if(r)goto S_3048;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass281= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2477);}while(r); S_3050:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("ALIAS",5))))||new_error){ if(qbevent){evnt(2478);if(r)goto S_3050;} S_3051:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2479);if(r)goto S_3051;} 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(2479);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2479);}while(r); } S_3055:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(2480);if(r)goto S_3055;} 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(2480);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2480);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,&(pass282= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2481);}while(r); S_3060:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_E, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(2483);if(r)goto S_3060;} do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2484);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_E,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2485);}while(r); S_3063:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(2485);if(r)goto S_3063;} 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(2485);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2485);}while(r); } do{ qbs_set(__STRING_E,qbs_left(__STRING_E,*__LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2486);}while(r); } S_3069:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_E,__STRING_FIX046,0)))||new_error){ if(qbevent){evnt(2489);if(r)goto S_3069;} do{ *__LONG_X=func_instr(NULL,__STRING_E,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2490);}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(2490);}while(r); dl_continue_284:; } dl_exit_284:; S_3073:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(2493);if(r)goto S_3073;} 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(2493);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2493);}while(r); } S_3077:; fornext_value289= 1 ; fornext_finalvalue289=__STRING_E->len; fornext_step289= 1 ; if (fornext_step289<0) fornext_step_negative289=1; else fornext_step_negative289=0; if (new_error) goto fornext_error289; goto fornext_entrylabel289; while(1){ fornext_value289=fornext_step289+(*__LONG_X); fornext_entrylabel289: *__LONG_X=fornext_value289; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative289){ if (fornext_value289fornext_finalvalue289) break; } fornext_error289:; if(qbevent){evnt(2494);if(r)goto S_3077;} do{ *__LONG_A=qbs_asc(__STRING_E,*__LONG_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2495);}while(r); S_3079:; 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(2496);if(r)goto S_3079;} 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(2496);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2496);}while(r); } fornext_continue_288:; } fornext_exit_288:; do{ qbs_set(__STRING_ALIASNAME,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2498);}while(r); S_3085:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(2500);if(r)goto S_3085;} do{ qbs_set(__STRING_A,FUNC_GETELEMENTS(__STRING_A,&(pass291= 1 ),&(pass292= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2500);}while(r); } S_3088:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(2501);if(r)goto S_3088;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_A,&(pass293= 1 ),&(pass294= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass295= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2501);}while(r); } S_3091:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(2502);if(r)goto S_3091;} do{ qbs_set(__STRING_CA,FUNC_GETELEMENTS(__STRING_CA,&(pass296= 1 ),&(pass297= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2502);}while(r); } S_3094:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(2503);if(r)goto S_3094;} do{ qbs_set(__STRING_CA,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_CA,&(pass298= 1 ),&(pass299= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass300= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2503);}while(r); } do{ *__LONG_N=*__LONG_N- 2 ; if(!qbevent)break;evnt(2504);}while(r); } } S_3100:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2508);if(r)goto S_3100;} S_3101:; if ((*__LONG_INDIRECTLIBRARY)||new_error){ if(qbevent){evnt(2509);if(r)goto S_3101;} do{ qbs_set(__STRING_ALIASNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2510);}while(r); } } do{ *__LONG_PARAMS= 0 ; if(!qbevent)break;evnt(2514);}while(r); do{ qbs_set(__STRING_PARAMS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2515);}while(r); do{ qbs_set(__STRING_PARAMSIZE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2516);}while(r); do{ qbs_set(__STRING_NELE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2517);}while(r); do{ qbs_set(__STRING_NELEREQ,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2518);}while(r); S_3110:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(2519);if(r)goto S_3110;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass301= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2520);}while(r); S_3112:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2521);if(r)goto S_3112;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2521);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2521);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2522);}while(r); S_3117:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2523);if(r)goto S_3117;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2523);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2523);}while(r); } S_3121:; if ((-(*__LONG_N< 4 ))||new_error){ if(qbevent){evnt(2524);if(r)goto S_3121;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2524);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2524);}while(r); } S_3125:; if ((-(*__LONG_N== 4 ))||new_error){ if(qbevent){evnt(2525);if(r)goto S_3125;} do{ goto LABEL_NOSFPARAMS; if(!qbevent)break;evnt(2525);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(2526);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2527);}while(r); S_3130:; fornext_value303= 4 ; fornext_finalvalue303=*__LONG_N- 1 ; fornext_step303= 1 ; if (fornext_step303<0) fornext_step_negative303=1; else fornext_step_negative303=0; if (new_error) goto fornext_error303; goto fornext_entrylabel303; while(1){ fornext_value303=fornext_step303+(*__LONG_I); fornext_entrylabel303: *__LONG_I=fornext_value303; if (fornext_step_negative303){ if (fornext_value303fornext_finalvalue303) break; } fornext_error303:; if(qbevent){evnt(2528);if(r)goto S_3130;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2529);}while(r); S_3132:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2530);if(r)goto S_3132;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(2530);}while(r); } S_3135:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2531);if(r)goto S_3135;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(2531);}while(r); } S_3138:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(2532);if(r)goto S_3138;} S_3139:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(2533);if(r)goto S_3139;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2533);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2533);}while(r); } LABEL_GETLASTPARAM:; if(qbevent){evnt(2534);r=0;} S_3143:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2535);if(r)goto S_3143;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2535);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2535);}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(2536);}while(r); do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2538);}while(r); do{ *__LONG_ARRAY= 0 ; if(!qbevent)break;evnt(2539);}while(r); do{ qbs_set(__STRING_T2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2540);}while(r); do{ *__LONG_I2= 1 ; if(!qbevent)break;evnt(2542);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2543);}while(r); do{ *__LONG_I2=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(2543);}while(r); do{ *__LONG_BYVALUE= 0 ; if(!qbevent)break;evnt(2545);}while(r); S_3155:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("BYVAL",5))))||new_error){ if(qbevent){evnt(2546);if(r)goto S_3155;} S_3156:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2547);if(r)goto S_3156;} 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(2547);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2547);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2548);}while(r); do{ *__LONG_I2=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(2548);}while(r); do{ *__LONG_BYVALUE= 1 ; if(!qbevent)break;evnt(2548);}while(r); } do{ qbs_set(__STRING_N2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2551);}while(r); do{ qbs_set(__STRING_SYMBOL2,FUNC_REMOVESYMBOL(__STRING_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2552);}while(r); S_3166:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N2)== 0 )))||new_error){ if(qbevent){evnt(2553);if(r)goto S_3166;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2553);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2553);}while(r); } S_3170:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2555);if(r)goto S_3170;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2555);}while(r); } do{ *__LONG_M= 0 ; if(!qbevent)break;evnt(2556);}while(r); S_3174:; fornext_value306=*__LONG_I2; fornext_finalvalue306=*__LONG_N2; fornext_step306= 1 ; if (fornext_step306<0) fornext_step_negative306=1; else fornext_step_negative306=0; if (new_error) goto fornext_error306; goto fornext_entrylabel306; while(1){ fornext_value306=fornext_step306+(*__LONG_I2); fornext_entrylabel306: *__LONG_I2=fornext_value306; if (fornext_step_negative306){ if (fornext_value306fornext_finalvalue306) break; } fornext_error306:; if(qbevent){evnt(2557);if(r)goto S_3174;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2558);}while(r); S_3176:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(2559);if(r)goto S_3176;} S_3177:; if ((-(*__LONG_M!= 0 ))||new_error){ if(qbevent){evnt(2560);if(r)goto S_3177;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - too many opening brackets",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2560);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2560);}while(r); } do{ *__LONG_M= 1 ; if(!qbevent)break;evnt(2561);}while(r); do{ *__LONG_ARRAY= 1 ; if(!qbevent)break;evnt(2562);}while(r); do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2563);}while(r); } S_3185:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(2565);if(r)goto S_3185;} S_3186:; if ((-(*__LONG_M!= 1 ))||new_error){ if(qbevent){evnt(2566);if(r)goto S_3186;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - closing bracket without opening bracket",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2566);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2566);}while(r); } do{ *__LONG_M= 2 ; if(!qbevent)break;evnt(2567);}while(r); do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2568);}while(r); } S_3193:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(2570);if(r)goto S_3193;} S_3194:; if (((-(*__LONG_M!= 0 ))&(-(*__LONG_M!= 2 )))||new_error){ if(qbevent){evnt(2571);if(r)goto S_3194;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check your brackets",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2571);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2571);}while(r); } do{ *__LONG_M= 3 ; if(!qbevent)break;evnt(2572);}while(r); do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2573);}while(r); } S_3201:; if ((-(*__LONG_M== 1 ))||new_error){ if(qbevent){evnt(2575);if(r)goto S_3201;} do{ goto LABEL_GOTAA; if(!qbevent)break;evnt(2575);}while(r); } S_3204:; if ((-(*__LONG_M!= 3 ))||new_error){ if(qbevent){evnt(2576);if(r)goto S_3204;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check your brackets",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2576);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2576);}while(r); } S_3208:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2577);if(r)goto S_3208;} do{ qbs_set(__STRING_T2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2577);}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(2577);}while(r); } LABEL_GOTAA:; if(qbevent){evnt(2578);r=0;} fornext_continue_305:; } fornext_exit_305:; do{ *__LONG_PARAMS=*__LONG_PARAMS+ 1 ; if(!qbevent)break;evnt(2581);}while(r); S_3215:; if ((-(*__LONG_PARAMS> 100 ))||new_error){ if(qbevent){evnt(2581);if(r)goto S_3215;} 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(2581);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2581);}while(r); } do{ *__LONG_ARGNELEREQ= 0 ; if(!qbevent)break;evnt(2583);}while(r); S_3220:; 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(2585);if(r)goto S_3220;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check parameter types",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2585);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2585);}while(r); } S_3224:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_T2,qbs_new_txt_len("",0)))&(qbs_equal(__STRING_E,qbs_new_txt_len("AS",2)))))||new_error){ if(qbevent){evnt(2586);if(r)goto S_3224;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected AS type",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2586);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2586);}while(r); } S_3228:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2587);if(r)goto S_3228;} do{ qbs_set(__STRING_T2,__STRING_SYMBOL2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2587);}while(r); } S_3231:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2588);if(r)goto S_3231;} S_3232:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N2, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(2589);if(r)goto S_3232;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(2589);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N2))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2589);}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(2590);}while(r); } do{ *__LONG_PARAMSIZE= 0 ; if(!qbevent)break;evnt(2593);}while(r); S_3240:; if ((-(*__LONG_ARRAY== 1 ))||new_error){ if(qbevent){evnt(2594);if(r)goto S_3240;} do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2595);}while(r); S_3242:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2596);if(r)goto S_3242;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2596);}while(r); } S_3245:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(2597);if(r)goto S_3245;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Illegal SUB/FUNCTION parameter",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2597);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2597);}while(r); } S_3249:; if (((*__LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(2598);if(r)goto S_3249;} do{ *__LONG_PARAMSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(2598);}while(r); } do{ *__LONG_T=*__LONG_T+*__LONG_ISARRAY; if(!qbevent)break;evnt(2599);}while(r); S_3253:; fornext_value308= 0 ; fornext_finalvalue308=*__INTEGER_SFLISTN; fornext_step308= 1 ; if (fornext_step308<0) fornext_step_negative308=1; else fornext_step_negative308=0; if (new_error) goto fornext_error308; goto fornext_entrylabel308; while(1){ fornext_value308=fornext_step308+(*__LONG_I10); fornext_entrylabel308: *__LONG_I10=fornext_value308; if (fornext_step_negative308){ if (fornext_value308fornext_finalvalue308) break; } fornext_error308:; if(qbevent){evnt(2601);if(r)goto S_3253;} S_3254:; 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(2602);if(r)goto S_3254;} S_3255:; 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(2603);if(r)goto S_3255;} do{ *__LONG_ARGNELEREQ=((int16*)(__ARRAY_INTEGER_SFELELIST[0]))[array_check((*__LONG_I10)-__ARRAY_INTEGER_SFELELIST[4],__ARRAY_INTEGER_SFELELIST[5])]; if(!qbevent)break;evnt(2604);}while(r); } } fornext_continue_307:; } fornext_exit_307:; }else{ do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2609);}while(r); S_3262:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2610);if(r)goto S_3262;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2610);}while(r); } S_3265:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(2611);if(r)goto S_3265;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Illegal SUB/FUNCTION parameter",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2611);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2611);}while(r); } S_3269:; if (((*__LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(2612);if(r)goto S_3269;} do{ *__LONG_PARAMSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(2612);}while(r); } S_3272:; if ((*__LONG_BYVALUE)||new_error){ if(qbevent){evnt(2614);if(r)goto S_3272;} S_3273:; if ((*__LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(2615);if(r)goto S_3273;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(2615);}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(2619);}while(r); do{ qbs_set(__STRING_NELE,qbs_add(__STRING_NELE,func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2622);}while(r); do{ qbs_set(__STRING_PARAMSIZE,qbs_add(__STRING_PARAMSIZE,l2string(*__LONG_PARAMSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2624);}while(r); do{ qbs_set(__STRING_PARAMS,qbs_add(__STRING_PARAMS,l2string(*__LONG_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2625);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2626);}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(2628);}while(r); S_3285:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(2629);if(r)goto S_3285;} do{ goto LABEL_GETLASTPARAM; if(!qbevent)break;evnt(2629);}while(r); } } fornext_continue_302:; } fornext_exit_302:; } LABEL_NOSFPARAMS:; if(qbevent){evnt(2633);r=0;} S_3291:; if ((-(*__LONG_SF== 1 ))||new_error){ if(qbevent){evnt(2635);if(r)goto S_3291;} do{ SUB_CLEARID(); if(!qbevent)break;evnt(2637);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2638);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(2639);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2641);}while(r); S_3296:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2642);if(r)goto S_3296;} do{ *(int16*)(((char*)__UDT_ID)+(806))= 1 ; if(!qbevent)break;evnt(2643);}while(r); S_3298:; if ((-(*__LONG_INDIRECTLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2644);if(r)goto S_3298;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),__STRING_ALIASNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2644);}while(r); } } do{ *(int16*)(((char*)__UDT_ID)+(809))=*__LONG_PARAMS; if(!qbevent)break;evnt(2646);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),__STRING_PARAMS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2647);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1213)),400,1),__STRING_PARAMSIZE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2648);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2647)),100,1),__STRING_NELE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2649);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2747)),100,1),__STRING_NELEREQ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2650);}while(r); S_3307:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SYMBOL,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2651);if(r)goto S_3307;} do{ *(int32*)(((char*)__UDT_ID)+(2381))=FUNC_TYPNAME2TYP(__STRING_SYMBOL); if(!qbevent)break;evnt(2652);}while(r); S_3309:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2653);if(r)goto S_3309;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2653);}while(r); } }else{ S_3313:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(2655);if(r)goto S_3313;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(2655);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2655);}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(2656);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=FUNC_TYPNAME2TYP(__STRING_SYMBOL); if(!qbevent)break;evnt(2657);}while(r); S_3320:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2658);if(r)goto S_3320;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2658);}while(r); } } S_3324:; if ((-(*(int32*)(((char*)__UDT_ID)+(2381))== 0 ))||new_error){ if(qbevent){evnt(2660);if(r)goto S_3324;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid FUNCTION return type",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2660);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2660);}while(r); } S_3328:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2662);if(r)goto S_3328;} do{ qbs_set(__STRING_CTYPE,FUNC_TYP2CTYP((int32*)(void*)( ((char*)(__UDT_ID)) + (2381) ),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2664);}while(r); S_3330:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2665);if(r)goto S_3330;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2665);}while(r); } S_3333:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CTYPE,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(2666);if(r)goto S_3333;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("char*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2666);}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)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2667);}while(r); } do{ qbs_set(__STRING_S,qbs_left(__STRING_SYMBOL, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2671);}while(r); S_3339:; 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(2672);if(r)goto S_3339;} do{ qbs_set(__STRING_SYMBOL,FUNC_TYPE2SYMBOL(__STRING_SYMBOL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2673);}while(r); S_3341:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2674);if(r)goto S_3341;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2674);}while(r); } } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),__STRING_SYMBOL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2676);}while(r); S_3346:; if ((*(int32*)(((char*)__UDT_ID)+(2381))&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(2677);if(r)goto S_3346;} S_3347:; if ((-((*(int32*)(((char*)__UDT_ID)+(2381))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(2678);if(r)goto S_3347;} do{ *(int32*)(((char*)__UDT_ID)+(2381))=*(int32*)(((char*)__UDT_ID)+(2381))-*__LONG_ISPOINTER; if(!qbevent)break;evnt(2678);}while(r); } } do{ SUB_REGID(); if(!qbevent)break;evnt(2680);}while(r); S_3352:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2681);if(r)goto S_3352;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2681);}while(r); } }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(2684);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2685);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(2686);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2687);}while(r); S_3360:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2688);if(r)goto S_3360;} do{ *(int16*)(((char*)__UDT_ID)+(806))= 1 ; if(!qbevent)break;evnt(2689);}while(r); S_3362:; if ((-(*__LONG_INDIRECTLIBRARY== 0 ))||new_error){ if(qbevent){evnt(2690);if(r)goto S_3362;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),__STRING_ALIASNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2690);}while(r); } } do{ *(int16*)(((char*)__UDT_ID)+(809))=*__LONG_PARAMS; if(!qbevent)break;evnt(2692);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),__STRING_PARAMS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2693);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1213)),400,1),__STRING_PARAMSIZE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2694);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2647)),100,1),__STRING_NELE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2695);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2747)),100,1),__STRING_NELEREQ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2696);}while(r); S_3371:; 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(2698);if(r)goto S_3371;} do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(2698);}while(r); do{ *__LONG_USEGL= 1 ; if(!qbevent)break;evnt(2698);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("_GL",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2698);}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(2698);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(2699);}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(2700);}while(r); S_3379:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(2702);if(r)goto S_3379;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2702);}while(r); } } } LABEL_FINISHEDLINEPP:; if(qbevent){evnt(2709);r=0;} do{ *__LONG_FIRSTLINE= 0 ; if(!qbevent)break;evnt(2710);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2712);}while(r); do{ qbs_set(__STRING_CA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2713);}while(r); }else{ S_3389:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2715);if(r)goto S_3389;} do{ qbs_set(__STRING_A,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2715);}while(r); do{ qbs_set(__STRING_CA,__STRING_CE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2715);}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(2715);}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(2715);}while(r); } } S_3397:; if ((-(*__LONG_WHOLELINEI<=*__LONG_WHOLELINEN))||new_error){ if(qbevent){evnt(2717);if(r)goto S_3397;} do{ *__LONG_WHOLELINEI=*__LONG_WHOLELINEI+ 1 ; if(!qbevent)break;evnt(2717);}while(r); do{ goto LABEL_PPBLDA; if(!qbevent)break;evnt(2717);}while(r); } } } } S_3404:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ADDMETAINCLUDE->len))||new_error){ if(qbevent){evnt(2727);if(r)goto S_3404;} S_3405:; if (( 0 )||new_error){ if(qbevent){evnt(2728);if(r)goto S_3405;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip310; 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 skip310; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_LINENUMBER)), 1, 0, 1); if (new_error) goto skip310; skip310: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2728);}while(r); } do{ qbs_set(__STRING_A,__STRING_ADDMETAINCLUDE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2729);}while(r); do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2729);}while(r); S_3410:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(2731);if(r)goto S_3410;} do{ *__LONG_INCLUDINGFROMROOT= 0 ; if(!qbevent)break;evnt(2732);}while(r); do{ *__LONG_FORCEINCLUDINGFILE= 0 ; if(!qbevent)break;evnt(2733);}while(r); LABEL_FORCEINCLUDE_PREPASS:; if(qbevent){evnt(2734);r=0;} S_3413:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(2735);if(r)goto S_3413;} do{ qbs_set(__STRING_A,__STRING_FORCEINCLUDEFROMROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2736);}while(r); do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2737);}while(r); do{ *__LONG_FORCEINCLUDINGFILE= 1 ; if(!qbevent)break;evnt(2738);}while(r); do{ *__LONG_INCLUDINGFROMROOT= 1 ; if(!qbevent)break;evnt(2739);}while(r); } } S_3420:; if ((-(*__LONG_INCLEVEL== 100 ))||new_error){ if(qbevent){evnt(2743);if(r)goto S_3420;} 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(2743);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2743);}while(r); } do{ *__LONG_FH= 99 +*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(2745);}while(r); do{ *__LONG_FIRSTTRYMETHOD= 1 ; if(!qbevent)break;evnt(2747);}while(r); S_3426:; if (((-(*__LONG_INCLUDINGFROMROOT!= 0 ))&(-(*__LONG_INCLEVEL== 0 )))||new_error){ if(qbevent){evnt(2748);if(r)goto S_3426;} do{ *__LONG_FIRSTTRYMETHOD= 2 ; if(!qbevent)break;evnt(2748);}while(r); } S_3429:; fornext_value312=*__LONG_FIRSTTRYMETHOD; fornext_finalvalue312= 2 ; fornext_step312= 1 ; if (fornext_step312<0) fornext_step_negative312=1; else fornext_step_negative312=0; if (new_error) goto fornext_error312; goto fornext_entrylabel312; while(1){ fornext_value312=fornext_step312+(*__LONG_TRY); fornext_entrylabel312: *__LONG_TRY=fornext_value312; if (fornext_step_negative312){ if (fornext_value312fornext_finalvalue312) break; } fornext_error312:; if(qbevent){evnt(2749);if(r)goto S_3429;} S_3430:; if ((-(*__LONG_TRY== 1 ))||new_error){ if(qbevent){evnt(2750);if(r)goto S_3430;} S_3431:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(2751);if(r)goto S_3431;} S_3432:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2752);if(r)goto S_3432;} do{ qbs_set(__STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2752);}while(r); }else{ do{ qbs_set(__STRING_P,FUNC_GETFILEPATH(__STRING_SOURCEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2752);}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(2754);}while(r); } do{ qbs_set(__STRING_F,qbs_add(__STRING_P,__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2756);}while(r); } S_3442:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(2758);if(r)goto S_3442;} do{ qbs_set(__STRING_F,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2758);}while(r); } S_3445:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(__STRING_F)))||new_error){ if(qbevent){evnt(2759);if(r)goto S_3445;} do{ *__INTEGER_QBERRORHAPPENED= -3 ; if(!qbevent)break;evnt(2760);}while(r); do{ sub_open(__STRING_F, 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2762);}while(r); LABEL_QBERRORHAPPENED3:; if(qbevent){evnt(2764);r=0;} S_3448:; if ((-(*__INTEGER_QBERRORHAPPENED== -3 ))||new_error){ if(qbevent){evnt(2765);if(r)goto S_3448;} do{ goto fornext_exit_311; if(!qbevent)break;evnt(2765);}while(r); } } do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(2767);}while(r); fornext_continue_311:; } fornext_exit_311:; S_3454:; if ((-(*__INTEGER_QBERRORHAPPENED!= -3 ))||new_error){ if(qbevent){evnt(2769);if(r)goto S_3454;} do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(2769);}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(2769);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(2769);}while(r); } do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(2770);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2770);}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(2770);}while(r); } S_3463:; while((*__LONG_INCLEVEL)||new_error){ if(qbevent){evnt(2773);if(r)goto S_3463;} do{ *__LONG_FH= 99 +*__LONG_INCLEVEL; if(!qbevent)break;evnt(2775);}while(r); S_3465:; if ((-(func_eof(*__LONG_FH)== 0 ))||new_error){ if(qbevent){evnt(2777);if(r)goto S_3465;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip314; sub_file_line_input_string(tmp_fileno,__STRING_X); if (new_error) goto skip314; skip314: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2778);}while(r); do{ qbs_set(__STRING_WHOLELINE,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2780);}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(2781);}while(r); do{ *__LONG_ERRORLINEININCLUDE=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]; if(!qbevent)break;evnt(2783);}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(2784);}while(r); S_3471:; if ((-(*__LONG_INCLEVEL> 1 ))||new_error){ if(qbevent){evnt(2785);if(r)goto S_3471;} 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(2786);}while(r); S_3473:; fornext_value316= 1 ; fornext_finalvalue316=*__LONG_INCLEVEL- 1 ; fornext_step316= 1 ; if (fornext_step316<0) fornext_step_negative316=1; else fornext_step_negative316=0; if (new_error) goto fornext_error316; goto fornext_entrylabel316; while(1){ fornext_value316=fornext_step316+(*__LONG_X); fornext_entrylabel316: *__LONG_X=fornext_value316; if (fornext_step_negative316){ if (fornext_value316fornext_finalvalue316) break; } fornext_error316:; if(qbevent){evnt(2787);if(r)goto S_3473;} 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(2788);}while(r); S_3475:; if ((-(*__LONG_X<(*__LONG_INCLEVEL- 1 )))||new_error){ if(qbevent){evnt(2789);if(r)goto S_3475;} S_3476:; if ((-(*__LONG_X==(*__LONG_INCLEVEL- 2 )))||new_error){ if(qbevent){evnt(2790);if(r)goto S_3476;} 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(2791);}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(2793);}while(r); } } fornext_continue_315:; } fornext_exit_315:; do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2797);}while(r); } do{ qbs_set(__STRING_INCERROR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2799);}while(r); do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER- 1 ; if(!qbevent)break;evnt(2800);}while(r); S_3487:; if (( 0 )||new_error){ if(qbevent){evnt(2802);if(r)goto S_3487;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip317; 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 skip317; skip317: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(2802);}while(r); } S_3490:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2804);if(r)goto S_3490;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 10 ),__STRING_WHOLELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2804);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(2804);}while(r); } do{ goto LABEL_IDEPREPASS; if(!qbevent)break;evnt(2805);}while(r); } do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(2808);}while(r); do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL- 1 ; if(!qbevent)break;evnt(2809);}while(r); S_3498:; if (((-(*__LONG_FORCEINCLUDINGFILE== 1 ))&(-(*__LONG_INCLEVEL== 0 )))||new_error){ if(qbevent){evnt(2810);if(r)goto S_3498;} do{ *__LONG_FORCEINCLUDINGFILE= 0 ; if(!qbevent)break;evnt(2811);}while(r); do{ goto LABEL_FORCEINCLUDECOMPLETED_PREPASS; if(!qbevent)break;evnt(2812);}while(r); } dl_continue_313:; } dl_exit_313:; S_3503:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2817);if(r)goto S_3503;} do{ goto LABEL_IDERET2; if(!qbevent)break;evnt(2817);}while(r); } dl_continue_221:; }while(1); dl_exit_221:; S_3507:; if ((-(*__LONG_LASTLINERETURN== 0 ))||new_error){ if(qbevent){evnt(2821);if(r)goto S_3507;} do{ *__LONG_LASTLINERETURN= 1 ; if(!qbevent)break;evnt(2822);}while(r); do{ *__LONG_LASTLINE= 1 ; if(!qbevent)break;evnt(2823);}while(r); do{ qbs_set(__STRING_WHOLELINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2824);}while(r); do{ goto LABEL_PREPASSLASTLINE; if(!qbevent)break;evnt(2825);}while(r); } S_3513:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(2828);if(r)goto S_3513;} do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(2828);}while(r); } S_3516:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(2829);if(r)goto S_3516;} do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(2829);}while(r); } do{ *__LONG_TOTALLINENUMBER=*__LONG_REALLINENUMBER; if(!qbevent)break;evnt(2831);}while(r); do{ *__LONG_LINEINPUT3INDEX= 1 ; if(!qbevent)break;evnt(2837);}while(r); LABEL_IDE3:; if(qbevent){evnt(2840);r=0;} do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2842);}while(r); do{ *__LONG_DATAOFFSET= 0 ; if(!qbevent)break;evnt(2845);}while(r); do{ *__LONG_INCLEVEL= 0 ; if(!qbevent)break;evnt(2846);}while(r); do{ *__LONG_SUBFUNCN= 0 ; if(!qbevent)break;evnt(2847);}while(r); do{ *__LONG_LASTLINERETURN= 0 ; if(!qbevent)break;evnt(2848);}while(r); do{ *__LONG_LASTLINE= 0 ; if(!qbevent)break;evnt(2849);}while(r); do{ *__LONG_FIRSTLINE= 1 ; if(!qbevent)break;evnt(2850);}while(r); do{ *__INTEGER_USERDEFINECOUNT= 7 ; if(!qbevent)break;evnt(2851);}while(r); S_3529:; fornext_value319= 0 ; fornext_finalvalue319=*__LONG_CONSTLAST; fornext_step319= 1 ; if (fornext_step319<0) fornext_step_negative319=1; else fornext_step_negative319=0; if (new_error) goto fornext_error319; goto fornext_entrylabel319; while(1){ fornext_value319=fornext_step319+(*__LONG_I); fornext_entrylabel319: *__LONG_I=fornext_value319; if (fornext_step_negative319){ if (fornext_value319fornext_finalvalue319) break; } fornext_error319:; if(qbevent){evnt(2853);if(r)goto S_3529;} 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(2853);}while(r); fornext_continue_318:; } fornext_exit_318:; S_3532:; fornext_value321= 1 ; fornext_finalvalue321= 27 ; fornext_step321= 1 ; if (fornext_step321<0) fornext_step_negative321=1; else fornext_step_negative321=0; if (new_error) goto fornext_error321; goto fornext_entrylabel321; while(1){ fornext_value321=fornext_step321+(*__LONG_I); fornext_entrylabel321: *__LONG_I=fornext_value321; if (fornext_step_negative321){ if (fornext_value321fornext_finalvalue321) break; } fornext_error321:; if(qbevent){evnt(2855);if(r)goto S_3532;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2855);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2855);}while(r); fornext_continue_320:; } fornext_exit_320:; do{ if(!qbevent)break;evnt(2857);}while(r); do{ *__LONG_DATABINBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data.bin",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2857);}while(r); do{ if(!qbevent)break;evnt(2859);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("main.txt",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2859);}while(r); do{ if(!qbevent)break;evnt(2860);}while(r); do{ *__LONG_DATATXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2860);}while(r); do{ if(!qbevent)break;evnt(2862);}while(r); do{ *__LONG_REGTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("regsf.txt",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2862);}while(r); do{ if(!qbevent)break;evnt(2864);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2864);}while(r); do{ if(!qbevent)break;evnt(2865);}while(r); do{ *__LONG_RUNTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("runline.txt",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2865);}while(r); do{ if(!qbevent)break;evnt(2867);}while(r); do{ *__LONG_ERRTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainerr.txt",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2867);}while(r); do{ *__LONG_ERRORLABELS= 0 ; if(!qbevent)break;evnt(2870);}while(r); do{ SUB_WRITEBUFLINE(&(pass322=*__LONG_ERRTXTBUF),qbs_new_txt_len("if (error_occurred){ error_occurred=0;",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2871);}while(r); do{ if(!qbevent)break;evnt(2873);}while(r); do{ *__LONG_CHAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain.txt",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2873);}while(r); do{ if(!qbevent)break;evnt(2874);}while(r); do{ *__LONG_INPCHAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2874);}while(r); do{ if(!qbevent)break;evnt(2876);}while(r); do{ *__LONG_TIMETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ontimer.txt",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2876);}while(r); do{ if(!qbevent)break;evnt(2877);}while(r); do{ *__LONG_TIMEJTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ontimerj.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2877);}while(r); do{ if(!qbevent)break;evnt(2881);}while(r); do{ *__LONG_KEYTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onkey.txt",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2881);}while(r); do{ if(!qbevent)break;evnt(2882);}while(r); do{ *__LONG_KEYJTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onkeyj.txt",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2882);}while(r); do{ if(!qbevent)break;evnt(2884);}while(r); do{ *__LONG_STRIGTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onstrig.txt",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2884);}while(r); do{ if(!qbevent)break;evnt(2885);}while(r); do{ *__LONG_STRIGJTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("onstrigj.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2885);}while(r); do{ *__LONG_GOSUBID= 1 ; if(!qbevent)break;evnt(2887);}while(r); do{ if(!qbevent)break;evnt(2895);}while(r); do{ *__LONG_RETTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ret0.txt",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2895);}while(r); do{ SUB_WRITEBUFLINE(&(pass323=*__LONG_RETTXTBUF),qbs_new_txt_len("if (next_return_point){",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2896);}while(r); do{ SUB_WRITEBUFLINE(&(pass324=*__LONG_RETTXTBUF),qbs_new_txt_len("next_return_point--;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2897);}while(r); do{ SUB_WRITEBUFLINE(&(pass325=*__LONG_RETTXTBUF),qbs_new_txt_len("switch(return_point[next_return_point]){",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2898);}while(r); do{ SUB_WRITEBUFLINE(&(pass326=*__LONG_RETTXTBUF),qbs_new_txt_len("case 0:",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2899);}while(r); do{ SUB_WRITEBUFLINE(&(pass327=*__LONG_RETTXTBUF),qbs_new_txt_len("return;",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2901);}while(r); do{ SUB_WRITEBUFLINE(&(pass328=*__LONG_RETTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2903);}while(r); do{ *__LONG_CONTINUELINE= 0 ; if(!qbevent)break;evnt(2905);}while(r); do{ *__LONG_ENDIFS= 0 ; if(!qbevent)break;evnt(2906);}while(r); do{ *__LONG_LINEELSEUSED= 0 ; if(!qbevent)break;evnt(2907);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(2908);}while(r); do{ *__LONG_LINENUMBER= 0 ; if(!qbevent)break;evnt(2909);}while(r); do{ *__LONG_REALLINENUMBER= 0 ; if(!qbevent)break;evnt(2910);}while(r); do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(2911);}while(r); do{ SUB_WRITEBUFLINE(&(pass329=*__LONG_MAINTXTBUF),qbs_new_txt_len("S_0:;",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2913);}while(r); S_3585:; if ((*__LONG_USEGL)||new_error){ if(qbevent){evnt(2915);if(r)goto S_3585;} do{ SUB_GL_INCLUDE_CONTENT(); if(!qbevent)break;evnt(2915);}while(r); } S_3588:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2919);if(r)goto S_3588;} do{ goto LABEL_IDERET3; if(!qbevent)break;evnt(2919);}while(r); } S_3591:; do{ if(qbevent){evnt(2921);if(r)goto S_3591;} LABEL_IDE4:; if(qbevent){evnt(2922);r=0;} LABEL_INCLUDELINE:; if(qbevent){evnt(2923);r=0;} LABEL_MAINPASSLASTLINE:; if(qbevent){evnt(2924);r=0;} S_3592:; if (((-(*__LONG_LASTLINE!= 0 ))|(-(*__LONG_FIRSTLINE!= 0 )))||new_error){ if(qbevent){evnt(2926);if(r)goto S_3592;} do{ qbs_set(__STRING_LINEBACKUP,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2927);}while(r); do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2928);}while(r); S_3595:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(2929);if(r)goto S_3595;} do{ *__LONG_ADDINGVWATCH= 1 ; if(!qbevent)break;evnt(2930);}while(r); S_3597:; if ((-(*__LONG_FIRSTLINE!= 0 ))||new_error){ if(qbevent){evnt(2931);if(r)goto S_3597;} do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("internal\\support\\vwatch\\vwatch.bi",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2931);}while(r); } S_3600:; if ((-(*__LONG_LASTLINE!= 0 ))||new_error){ if(qbevent){evnt(2932);if(r)goto S_3600;} do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("internal\\support\\vwatch\\vwatch.bm",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2932);}while(r); } }else{ S_3604:; if ((-(*__LONG_LASTLINE!= 0 ))||new_error){ if(qbevent){evnt(2935);if(r)goto S_3604;} do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("internal\\support\\vwatch\\vwatch_stub.bm",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2935);}while(r); } } do{ *__LONG_FIRSTLINE= 0 ; if(!qbevent)break;evnt(2937);}while(r); do{ *__LONG_LASTLINE= 0 ; if(!qbevent)break;evnt(2937);}while(r); S_3610:; if ((qbs_cleanup(qbs_tmp_base,__STRING_FORCEINCLUDEFROMROOT->len))||new_error){ if(qbevent){evnt(2938);if(r)goto S_3610;} do{ goto LABEL_FORCEINCLUDE; if(!qbevent)break;evnt(2938);}while(r); } LABEL_FORCEINCLUDECOMPLETED:; if(qbevent){evnt(2939);r=0;} do{ *__LONG_ADDINGVWATCH= 0 ; if(!qbevent)break;evnt(2940);}while(r); do{ qbs_set(__STRING_A3,__STRING_LINEBACKUP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2941);}while(r); } do{ *__LONG_PREPASS= 0 ; if(!qbevent)break;evnt(2944);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(2946);}while(r); S_3618:; if ((*__LONG_CONTINUELINEFROM)||new_error){ if(qbevent){evnt(2948);if(r)goto S_3618;} do{ *__LONG_START=*__LONG_CONTINUELINEFROM; if(!qbevent)break;evnt(2949);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(2950);}while(r); do{ goto LABEL_CONTLINE; if(!qbevent)break;evnt(2951);}while(r); } do{ *__LONG_IMPLIEDENDIF= 0 ; if(!qbevent)break;evnt(2956);}while(r); do{ *__LONG_THENGOTO= 0 ; if(!qbevent)break;evnt(2957);}while(r); do{ *__LONG_CONTINUELINE= 0 ; if(!qbevent)break;evnt(2958);}while(r); do{ *__LONG_ENDIFS= 0 ; if(!qbevent)break;evnt(2959);}while(r); do{ *__LONG_LINEELSEUSED= 0 ; if(!qbevent)break;evnt(2960);}while(r); do{ *__LONG_NEWIF= 0 ; if(!qbevent)break;evnt(2961);}while(r); S_3629:; if ((-(*__INTEGER_ADDMETADYNAMIC== 1 ))||new_error){ if(qbevent){evnt(2964);if(r)goto S_3629;} do{ *__INTEGER_ADDMETADYNAMIC= 0 ; if(!qbevent)break;evnt(2964);}while(r); do{ *__INTEGER_DYNAMICMODE= 1 ; if(!qbevent)break;evnt(2964);}while(r); } S_3633:; if ((-(*__INTEGER_ADDMETASTATIC== 1 ))||new_error){ if(qbevent){evnt(2965);if(r)goto S_3633;} do{ *__INTEGER_ADDMETASTATIC= 0 ; if(!qbevent)break;evnt(2965);}while(r); do{ *__INTEGER_DYNAMICMODE= 0 ; if(!qbevent)break;evnt(2965);}while(r); } S_3637:; if (((-(*__LONG_IDEMODE== 0 ))&(-(*__LONG_INCLEVEL== 0 )))||new_error){ if(qbevent){evnt(2968);if(r)goto S_3637;} do{ qbs_set(__STRING_A3,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2968);}while(r); } S_3640:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,func_chr( 13 ))))||new_error){ if(qbevent){evnt(2969);if(r)goto S_3640;} do{ goto dl_exit_330; if(!qbevent)break;evnt(2969);}while(r); } do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER+ 1 ; if(!qbevent)break;evnt(2970);}while(r); do{ *__LONG_REALLINENUMBER=*__LONG_REALLINENUMBER+ 1 ; if(!qbevent)break;evnt(2971);}while(r); S_3645:; if ((((int8*)(__ARRAY_BYTE_INVALIDLINE[0]))[array_check((*__LONG_LINENUMBER)-__ARRAY_BYTE_INVALIDLINE[4],__ARRAY_BYTE_INVALIDLINE[5])])||new_error){ if(qbevent){evnt(2973);if(r)goto S_3645;} do{ *__LONG_LAYOUTOK= 1 ; if(!qbevent)break;evnt(2974);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(func_space(*__INTEGER_CONTROLLEVEL+ 1 ),qbs_ltrim(qbs_rtrim(__STRING_A3)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2975);}while(r); S_3648:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(2976);if(r)goto S_3648;} do{ goto LABEL_IDERET4; if(!qbevent)break;evnt(2976);}while(r); }else{ do{ goto LABEL_SKIPIDE4; if(!qbevent)break;evnt(2976);}while(r); } } do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2979);}while(r); do{ *__LONG_LAYOUTOK= 1 ; if(!qbevent)break;evnt(2980);}while(r); S_3656:; if (((-(*__LONG_IDEMODE== 0 ))&(~(*__BYTE_QUIETMODE)))||new_error){ if(qbevent){evnt(2982);if(r)goto S_3656;} do{ *__LONG_MAXPROGRESSWIDTH= 50 ; if(!qbevent)break;evnt(2986);}while(r); do{ *__LONG_PERCENTAGE=qbr(floor(*__LONG_REALLINENUMBER/ ((long double)(*__LONG_TOTALLINENUMBER))* 100 )); if(!qbevent)break;evnt(2987);}while(r); do{ *__LONG_PERCENTAGECHARS=qbr(floor(*__LONG_MAXPROGRESSWIDTH**__LONG_REALLINENUMBER/ ((long double)(*__LONG_TOTALLINENUMBER)))); if(!qbevent)break;evnt(2988);}while(r); S_3660:; if (((-(*__LONG_PERCENTAGE!=*__LONG_PREVPERCENTAGE))&(-(*__LONG_PERCENTAGECHARS!=*__LONG_PREVPERCENTAGECHARS)))||new_error){ if(qbevent){evnt(2989);if(r)goto S_3660;} do{ *__LONG_PREVPERCENTAGE=*__LONG_PERCENTAGE; if(!qbevent)break;evnt(2990);}while(r); do{ *__LONG_PREVPERCENTAGECHARS=*__LONG_PERCENTAGECHARS; if(!qbevent)break;evnt(2991);}while(r); S_3663:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(2992);if(r)goto S_3663;} 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_string(*__LONG_PERCENTAGECHARS,(qbs_new_txt_len(".",1)->chr[0]))),func_space(*__LONG_MAXPROGRESSWIDTH-*__LONG_PERCENTAGECHARS)),qbs_new_txt_len("]",1)),qbs_str((int32)(*__LONG_PERCENTAGE))),qbs_new_txt_len("%",1))); if (new_error) goto skip332; makefit(tqbs); qbs_print(tqbs,0); skip332: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2993);}while(r); S_3665:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(2994);if(r)goto S_3665;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(func_chr( 27 ),qbs_new_txt_len("[A",2))); if (new_error) goto skip333; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip333: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2995);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 13 )); if (new_error) goto skip334; makefit(tqbs); qbs_print(tqbs,0); skip334: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(2997);}while(r); } }else{ do{ qbg_sub_locate(NULL, 1 ,NULL,NULL,NULL,2); if(!qbevent)break;evnt(3000);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_add(func_string(*__LONG_PERCENTAGECHARS, 219 ),func_string(*__LONG_MAXPROGRESSWIDTH-*__LONG_PERCENTAGECHARS, 176 )),qbs_str((int32)(*__LONG_PERCENTAGE))),qbs_new_txt_len("%",1))); if (new_error) goto skip335; makefit(tqbs); qbs_print(tqbs,0); skip335: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3001);}while(r); } } } do{ qbs_set(__STRING_A3,qbs_ltrim(qbs_rtrim(__STRING_A3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3006);}while(r); do{ qbs_set(__STRING_WHOLELINE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3007);}while(r); do{ qbs_set(__STRING_LAYOUTORIGINAL,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3009);}while(r); do{ qbs_set(__STRING_LAYOUTCOMMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3010);}while(r); do{ *__LONG_LHSCONTROLLEVEL=*__INTEGER_CONTROLLEVEL; if(!qbevent)break;evnt(3011);}while(r); do{ qbs_set(__STRING_LINEFRAGMENT,qbs_new_txt_len("[INFORMATION UNAVAILABLE]",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3013);}while(r); S_3682:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_A3->len== 0 )))||new_error){ if(qbevent){evnt(3014);if(r)goto S_3682;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3014);}while(r); } S_3685:; if (( 0 )||new_error){ if(qbevent){evnt(3015);if(r)goto S_3685;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip337; 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 skip337; skip337: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3015);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3017);}while(r); do{ qbs_set(__STRING_A3U,qbs_ucase(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3023);}while(r); S_3690:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_A3)== 36 )))||new_error){ if(qbevent){evnt(3026);if(r)goto S_3690;} S_3691:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A3U,qbs_new_txt_len("$END IF",7)))|(qbs_equal(__STRING_A3U,qbs_new_txt_len("$ENDIF",6)))))||new_error){ if(qbevent){evnt(3029);if(r)goto S_3691;} S_3692:; if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){ if(qbevent){evnt(3030);if(r)goto S_3692;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$END IF without $IF",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3030);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3030);}while(r); } do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(3031);}while(r); do{ *__INTEGER_EXECCOUNTER=*__INTEGER_EXECCOUNTER- 1 ; if(!qbevent)break;evnt(3032);}while(r); do{ qbs_set(__STRING_LAYOUT,FUNC_SCASE(qbs_new_txt_len("$End If",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3033);}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]= 0 ; if(!qbevent)break;evnt(3034);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(3035);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3036);}while(r); } S_3703:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_A3U, 4 ),qbs_new_txt_len("$IF ",4))))||new_error){ if(qbevent){evnt(3039);if(r)goto S_3703;} S_3704:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(3041);if(r)goto S_3704;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3042);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3042);}while(r); } do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_A3U, 4 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3045);}while(r); do{ qbs_set(__STRING_TEMP,qbs_rtrim(qbs_left(__STRING_TEMP,__STRING_TEMP->len- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3046);}while(r); do{ *__LONG_TEMP= 0 ; if(!qbevent)break;evnt(3047);}while(r); S_3711:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3048);if(r)goto S_3711;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("<=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3048);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3048);}while(r); } S_3715:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3049);if(r)goto S_3715;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("=<",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3049);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3049);}while(r); do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("<=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3049);}while(r); } S_3720:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3050);if(r)goto S_3720;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3050);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3050);}while(r); } S_3724:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3051);if(r)goto S_3724;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("=>",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3051);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3051);}while(r); do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3051);}while(r); } S_3729:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3052);if(r)goto S_3729;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("<>",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3052);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3052);}while(r); } S_3733:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3053);if(r)goto S_3733;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("><",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3053);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3053);}while(r); do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("<>",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3053);}while(r); } S_3738:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3054);if(r)goto S_3738;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("=",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3054);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3054);}while(r); } S_3742:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3055);if(r)goto S_3742;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3055);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3055);}while(r); } S_3746:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3056);if(r)goto S_3746;} do{ qbs_set(__STRING_TEMPOP,qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3056);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,__STRING_TEMPOP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3056);}while(r); } do{ *__INTEGER_EXECCOUNTER=*__INTEGER_EXECCOUNTER+ 1 ; if(!qbevent)break;evnt(3058);}while(r); do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(3059);}while(r); do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(3060);}while(r); do{ *__LONG_RESULT=FUNC_EVALPREIF(__STRING_TEMP,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3061);}while(r); S_3754:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(3062);if(r)goto S_3754;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3062);}while(r); } S_3757:; if ((-(*__LONG_RESULT!= 0 ))||new_error){ if(qbevent){evnt(3063);if(r)goto S_3757;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]; if(!qbevent)break;evnt(3064);}while(r); S_3759:; if ((-(((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]== 0 ))||new_error){ if(qbevent){evnt(3065);if(r)goto S_3759;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 4 ; if(!qbevent)break;evnt(3065);}while(r); } } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(3068);}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]= 6 ; if(!qbevent)break;evnt(3069);}while(r); S_3765:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3070);if(r)goto S_3765;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$If ",4)),__STRING_TEMP),FUNC_SCASE(qbs_new_txt_len(" Then",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3070);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3070);}while(r); } do{ qbs_set(__STRING_L,qbs_rtrim(qbs_left(__STRING_TEMP,*__LONG_TEMP- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3071);}while(r); do{ qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_TEMP,*__LONG_TEMP+__STRING_TEMPOP->len,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3071);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$If ",4)),__STRING_L),qbs_new_txt_len(" ",1)),__STRING_TEMPOP),qbs_new_txt_len(" ",1)),__STRING_R),FUNC_SCASE(qbs_new_txt_len(" Then",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3072);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3073);}while(r); } S_3774:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3U,qbs_new_txt_len("$ELSE",5))))||new_error){ if(qbevent){evnt(3076);if(r)goto S_3774;} S_3775:; if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){ if(qbevent){evnt(3077);if(r)goto S_3775;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE without $IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3077);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3077);}while(r); } S_3779:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 2 )||new_error){ if(qbevent){evnt(3078);if(r)goto S_3779;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$IF block already has $ELSE statement in it",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3078);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3078);}while(r); } do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 2 ; if(!qbevent)break;evnt(3079);}while(r); S_3784:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 4 )||new_error){ if(qbevent){evnt(3080);if(r)goto S_3784;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(3081);}while(r); }else{ do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]; if(!qbevent)break;evnt(3083);}while(r); } do{ qbs_set(__STRING_LAYOUT,FUNC_SCASE(qbs_new_txt_len("$Else",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3085);}while(r); do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(3086);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3087);}while(r); } S_3793:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_A3U, 5 ),qbs_new_txt_len("$ELSE",5))))||new_error){ if(qbevent){evnt(3090);if(r)goto S_3793;} do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_A3U, 6 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3091);}while(r); S_3795:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 3 ),qbs_new_txt_len("IF ",3))))||new_error){ if(qbevent){evnt(3092);if(r)goto S_3795;} S_3796:; if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){ if(qbevent){evnt(3093);if(r)goto S_3796;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF without $IF",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3093);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3093);}while(r); } S_3800:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 2 )||new_error){ if(qbevent){evnt(3094);if(r)goto S_3800;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF cannot follow $ELSE",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3094);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3094);}while(r); } S_3804:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_TEMP, 5 ),qbs_new_txt_len(" THEN",5))))||new_error){ if(qbevent){evnt(3095);if(r)goto S_3804;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF without THEN",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3095);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3095);}while(r); } do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3096);}while(r); do{ qbs_set(__STRING_TEMP,qbs_rtrim(qbs_left(__STRING_TEMP,__STRING_TEMP->len- 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3097);}while(r); S_3810:; if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 4 )||new_error){ if(qbevent){evnt(3098);if(r)goto S_3810;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(3099);}while(r); }else{ do{ *__LONG_RESULT=FUNC_EVALPREIF(__STRING_TEMP,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3101);}while(r); S_3814:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(3102);if(r)goto S_3814;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3102);}while(r); } S_3817:; if ((-(*__LONG_RESULT!= 0 ))||new_error){ if(qbevent){evnt(3103);if(r)goto S_3817;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]); if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]; if(!qbevent)break;evnt(3104);}while(r); S_3819:; if ((-(((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]== 0 ))||new_error){ if(qbevent){evnt(3105);if(r)goto S_3819;} do{ tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 4 ; if(!qbevent)break;evnt(3105);}while(r); } } } do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(3110);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,qbs_new_txt_len("=",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3111);}while(r); S_3826:; if ((-(*__LONG_TEMP== 0 ))||new_error){ if(qbevent){evnt(3112);if(r)goto S_3826;} do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$ElseIf ",8)),__STRING_TEMP),FUNC_SCASE(qbs_new_txt_len(" Then",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3112);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3112);}while(r); } do{ qbs_set(__STRING_L,qbs_rtrim(qbs_left(__STRING_TEMP,*__LONG_TEMP- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3113);}while(r); do{ qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_TEMP,*__LONG_TEMP+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3113);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$ElseIf ",8)),__STRING_L),qbs_new_txt_len(" = ",3)),__STRING_R),FUNC_SCASE(qbs_new_txt_len(" Then",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3114);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3115);}while(r); } } S_3836:; if ((((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])])||new_error){ if(qbevent){evnt(3119);if(r)goto S_3836;} do{ *__LONG_LAYOUTDONE= 0 ; if(!qbevent)break;evnt(3120);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3121);}while(r); } S_3840:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_A3U, 5 ),qbs_new_txt_len("$LET ",5))))||new_error){ if(qbevent){evnt(3124);if(r)goto S_3840;} do{ qbs_set(__STRING_TEMP,__STRING_A3U); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3125);}while(r); do{ qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 5 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3126);}while(r); do{ *__LONG_TEMP=func_instr(NULL,__STRING_TEMP,qbs_new_txt_len("=",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3128);}while(r); do{ qbs_set(__STRING_L,qbs_rtrim(qbs_left(__STRING_TEMP,*__LONG_TEMP- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3129);}while(r); do{ qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_TEMP,*__LONG_TEMP+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3129);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$Let ",5)),__STRING_L),qbs_new_txt_len(" = ",3)),__STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3130);}while(r); S_3847:; fornext_value342= 7 ; fornext_finalvalue342=*__INTEGER_USERDEFINECOUNT; fornext_step342= 1 ; if (fornext_step342<0) fornext_step_negative342=1; else fornext_step_negative342=0; if (new_error) goto fornext_error342; goto fornext_entrylabel342; while(1){ fornext_value342=fornext_step342+(*__LONG_I); fornext_entrylabel342: *__LONG_I=fornext_value342; if (fornext_step_negative342){ if (fornext_value342fornext_finalvalue342) break; } fornext_error342:; if(qbevent){evnt(3132);if(r)goto S_3847;} S_3848:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),__STRING_L)))||new_error){ if(qbevent){evnt(3133);if(r)goto S_3848;} do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),__STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3133);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3133);}while(r); } fornext_continue_341:; } fornext_exit_341:; do{ *__INTEGER_USERDEFINECOUNT=*__INTEGER_USERDEFINECOUNT+ 1 ; if(!qbevent)break;evnt(3136);}while(r); S_3854:; if ((qbs_cleanup(qbs_tmp_base,-(*__INTEGER_USERDEFINECOUNT>func_ubound(__ARRAY_STRING_USERDEFINE, 2 ,2))))||new_error){ if(qbevent){evnt(3137);if(r)goto S_3854;} do{ if (__ARRAY_STRING_USERDEFINE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_USERDEFINE)[12])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_USERDEFINE[2]&1){ preserved_elements=__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]; } else preserved_elements=0; __ARRAY_STRING_USERDEFINE[8]= 0 ; __ARRAY_STRING_USERDEFINE[9]=( 1 )-__ARRAY_STRING_USERDEFINE[8]+1; __ARRAY_STRING_USERDEFINE[10]=1; __ARRAY_STRING_USERDEFINE[4]= 0 ; __ARRAY_STRING_USERDEFINE[5]=(func_ubound(__ARRAY_STRING_USERDEFINE, 2 ,2)+ 10 )-__ARRAY_STRING_USERDEFINE[4]+1; __ARRAY_STRING_USERDEFINE[6]=__ARRAY_STRING_USERDEFINE[10]*__ARRAY_STRING_USERDEFINE[9]; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_USERDEFINE[5]*__ARRAY_STRING_USERDEFINE[9]; if (tmp_long2=return_points) more_return_points(); goto LABEL_VALIDATEVERSION; RETURN_2:; if(!qbevent)break;evnt(3289);}while(r); do{ qbs_set(__STRING_VIFILEVERSIONNUM,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3290);}while(r); S_3993:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VIFILEVERSION,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(3291);if(r)goto S_3993;} do{ qbs_set(__STRING_VIFILEVERSION,__STRING_VIFILEVERSIONNUM); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3291);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:FILEVERSION#=",26)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3292);}while(r); sc_ec_4_end:; goto sc_346_end; } S_3997:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("PRODUCTVERSION#",15))))||new_error){ if(qbevent){evnt(3293);if(r)goto S_3997;} do{ return_point[next_return_point++]=3; if (next_return_point>=return_points) more_return_points(); goto LABEL_VALIDATEVERSION; RETURN_3:; if(!qbevent)break;evnt(3294);}while(r); do{ qbs_set(__STRING_VIPRODUCTVERSIONNUM,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3295);}while(r); S_4000:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VIPRODUCTVERSION,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(3296);if(r)goto S_4000;} do{ qbs_set(__STRING_VIPRODUCTVERSION,__STRING_VIPRODUCTVERSIONNUM); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3296);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:PRODUCTVERSION#=",29)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3297);}while(r); sc_ec_5_end:; goto sc_346_end; } S_4004:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("COMPANYNAME",11))))||new_error){ if(qbevent){evnt(3298);if(r)goto S_4004;} do{ qbs_set(__STRING_VICOMPANYNAME,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3299);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("CompanyName=",12)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3300);}while(r); sc_ec_6_end:; goto sc_346_end; } S_4007:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("FILEDESCRIPTION",15))))||new_error){ if(qbevent){evnt(3301);if(r)goto S_4007;} do{ qbs_set(__STRING_VIFILEDESCRIPTION,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3302);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("FileDescription=",16)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3303);}while(r); sc_ec_7_end:; goto sc_346_end; } S_4010:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("FILEVERSION",11))))||new_error){ if(qbevent){evnt(3304);if(r)goto S_4010;} do{ qbs_set(__STRING_VIFILEVERSION,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3305);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("FileVersion=",12)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3306);}while(r); sc_ec_8_end:; goto sc_346_end; } S_4013:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("INTERNALNAME",12))))||new_error){ if(qbevent){evnt(3307);if(r)goto S_4013;} do{ qbs_set(__STRING_VIINTERNALNAME,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3308);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("InternalName=",13)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3309);}while(r); sc_ec_9_end:; goto sc_346_end; } S_4016:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("LEGALCOPYRIGHT",14))))||new_error){ if(qbevent){evnt(3310);if(r)goto S_4016;} do{ qbs_set(__STRING_VILEGALCOPYRIGHT,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3311);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("LegalCopyright=",15)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3312);}while(r); sc_ec_10_end:; goto sc_346_end; } S_4019:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("LEGALTRADEMARKS",15))))||new_error){ if(qbevent){evnt(3313);if(r)goto S_4019;} do{ qbs_set(__STRING_VILEGALTRADEMARKS,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3314);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("LegalTrademarks=",16)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3315);}while(r); sc_ec_11_end:; goto sc_346_end; } S_4022:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("ORIGINALFILENAME",16))))||new_error){ if(qbevent){evnt(3316);if(r)goto S_4022;} do{ qbs_set(__STRING_VIORIGINALFILENAME,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3317);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("OriginalFilename=",17)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3318);}while(r); sc_ec_12_end:; goto sc_346_end; } S_4025:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("PRODUCTNAME",11))))||new_error){ if(qbevent){evnt(3319);if(r)goto S_4025;} do{ qbs_set(__STRING_VIPRODUCTNAME,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3320);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("ProductName=",12)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3321);}while(r); sc_ec_13_end:; goto sc_346_end; } S_4028:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("PRODUCTVERSION",14))))||new_error){ if(qbevent){evnt(3322);if(r)goto S_4028;} do{ qbs_set(__STRING_VIPRODUCTVERSION,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3323);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("ProductVersion=",15)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3324);}while(r); sc_ec_14_end:; goto sc_346_end; } S_4031:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("COMMENTS",8))))||new_error){ if(qbevent){evnt(3325);if(r)goto S_4031;} do{ qbs_set(__STRING_VICOMMENTS,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3326);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("Comments=",9)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3327);}while(r); sc_ec_15_end:; goto sc_346_end; } S_4034:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VERSIONINFOKEY,qbs_new_txt_len("WEB",3))))||new_error){ if(qbevent){evnt(3328);if(r)goto S_4034;} do{ qbs_set(__STRING_VIWEB,__STRING_VERSIONINFOVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3329);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$VersionInfo:",13)),qbs_new_txt_len("Web=",4)),__STRING_VERSIONINFOVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3330);}while(r); sc_ec_16_end:; goto sc_346_end; } do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid key. (Use FILEVERSION#, PRODUCTVERSION#, CompanyName, FileDescription, FileVersion, InternalName, LegalCopyright, LegalTrademarks, OriginalFilename, ProductName, ProductVersion, Comments or Web)",202)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3332);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3333);}while(r); sc_346_end:; do{ *__BYTE_VERSIONINFOSET= -1 ; if(!qbevent)break;evnt(3336);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3338);}while(r); LABEL_VALIDATEVERSION:; if(qbevent){evnt(3340);r=0;} S_4043:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_VERSIONINFOVALUE->len== 0 )))||new_error){ if(qbevent){evnt(3342);if(r)goto S_4043;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected $VERSIONINFO:",22),__STRING_VERSIONINFOKEY),qbs_new_txt_len("=#,#,#,# (4 comma-separated numeric values: major, minor, revision and build)",77))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3342);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3342);}while(r); } do{ *__LONG_VICOMMAS= 0 ; if(!qbevent)break;evnt(3343);}while(r); S_4048:; fornext_value349= 1 ; fornext_finalvalue349=__STRING_VERSIONINFOVALUE->len; fornext_step349= 1 ; if (fornext_step349<0) fornext_step_negative349=1; else fornext_step_negative349=0; if (new_error) goto fornext_error349; goto fornext_entrylabel349; while(1){ fornext_value349=fornext_step349+(*__LONG_I); fornext_entrylabel349: *__LONG_I=fornext_value349; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative349){ if (fornext_value349fornext_finalvalue349) break; } fornext_error349:; if(qbevent){evnt(3344);if(r)goto S_4048;} S_4049:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_VERSIONINFOVALUE,*__LONG_I)== 44 )))||new_error){ if(qbevent){evnt(3345);if(r)goto S_4049;} do{ *__LONG_VICOMMAS=*__LONG_VICOMMAS+ 1 ; if(!qbevent)break;evnt(3345);}while(r); } S_4052:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,qbs_new_txt_len("0123456789,",11),func_mid(__STRING_VERSIONINFOVALUE,*__LONG_I, 1 ,1),0)== 0 ))|(((-(*__LONG_I==__STRING_VERSIONINFOVALUE->len))&(-(*__LONG_VICOMMAS!= 3 ))))|(qbs_equal(qbs_right(__STRING_VERSIONINFOVALUE, 1 ),qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(3346);if(r)goto S_4052;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected $VERSIONINFO:",22),__STRING_VERSIONINFOKEY),qbs_new_txt_len("=#,#,#,# (4 comma-separated numeric values: major, minor, revision and build)",77))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3347);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3347);}while(r); } fornext_continue_348:; } fornext_exit_348:; do{ #include "ret0.txt" if(!qbevent)break;evnt(3350);}while(r); } S_4059:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_A3U, 8 ),qbs_new_txt_len("$EXEICON",8))))||new_error){ if(qbevent){evnt(3353);if(r)goto S_4059;} S_4060:; if ((*__LONG_EXEICONSET)||new_error){ if(qbevent){evnt(3355);if(r)goto S_4060;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$EXEICON already defined",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3355);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3355);}while(r); } do{ *__LONG_FIRSTDELIMITER=func_instr(NULL,__STRING_A3U,qbs_new_txt_len("'",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3356);}while(r); S_4065:; if ((-(*__LONG_FIRSTDELIMITER== 0 ))||new_error){ if(qbevent){evnt(3357);if(r)goto S_4065;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected $EXEICON:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3358);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3358);}while(r); }else{ do{ *__LONG_SECONDDELIMITER=func_instr(*__LONG_FIRSTDELIMITER+ 1 ,__STRING_A3U,qbs_new_txt_len("'",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3360);}while(r); S_4070:; if ((-(*__LONG_SECONDDELIMITER== 0 ))||new_error){ if(qbevent){evnt(3361);if(r)goto S_4070;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected $EXEICON:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3361);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3361);}while(r); } } do{ qbs_set(__STRING_EXEICONFILE,qbs_rtrim(qbs_ltrim(func_mid(__STRING_A3,*__LONG_FIRSTDELIMITER+ 1 ,*__LONG_SECONDDELIMITER-*__LONG_FIRSTDELIMITER- 1 ,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3363);}while(r); S_4076:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_EXEICONFILE->len== 0 )))||new_error){ if(qbevent){evnt(3364);if(r)goto S_4076;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected $EXEICON:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3364);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3364);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("$ExeIcon:'",10)),__STRING_EXEICONFILE),qbs_new_txt_len("'",1)),func_mid(__STRING_A3,*__LONG_SECONDDELIMITER+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3365);}while(r); do{ qbs_set(__STRING_ICONPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3367);}while(r); S_4082:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(__STRING_EXEICONFILE, 2 ),qbs_new_txt_len("./",2)))|(qbs_equal(qbs_left(__STRING_EXEICONFILE, 2 ),qbs_new_txt_len(".\\",2)))))||new_error){ if(qbevent){evnt(3368);if(r)goto S_4082;} S_4083:; if ((*__LONG_NOIDEMODE)||new_error){ if(qbevent){evnt(3370);if(r)goto S_4083;} do{ qbs_set(__STRING_ICONPATH,__STRING_PATH__ASCII_CHR_046__SOURCE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3371);}while(r); S_4085:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_ICONPATH->len> 0 ))&(qbs_notequal(qbs_right(__STRING_ICONPATH, 1 ),__STRING1_PATHSEP))))||new_error){ if(qbevent){evnt(3372);if(r)goto S_4085;} do{ qbs_set(__STRING_ICONPATH,qbs_add(__STRING_ICONPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3372);}while(r); } }else{ S_4089:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEPROGNAME->len))||new_error){ if(qbevent){evnt(3374);if(r)goto S_4089;} do{ qbs_set(__STRING_ICONPATH,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3374);}while(r); } } do{ qbs_set(__STRING_EXEICONFILE,qbs_add(__STRING_ICONPATH,func_mid(__STRING_EXEICONFILE, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3377);}while(r); S_4094:; }else{ if (qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_EXEICONFILE,qbs_new_txt_len("/",1),0)|func_instr(NULL,__STRING_EXEICONFILE,qbs_new_txt_len("\\",1),0))){ if(qbevent){evnt(3378);if(r)goto S_4094;} S_4095:; fornext_value356=__STRING_EXEICONFILE->len; fornext_finalvalue356= 1 ; fornext_step356= -1 ; if (fornext_step356<0) fornext_step_negative356=1; else fornext_step_negative356=0; if (new_error) goto fornext_error356; goto fornext_entrylabel356; while(1){ fornext_value356=fornext_step356+(*__LONG_I); fornext_entrylabel356: *__LONG_I=fornext_value356; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative356){ if (fornext_value356fornext_finalvalue356) break; } fornext_error356:; if(qbevent){evnt(3379);if(r)goto S_4095;} S_4096:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(__STRING_EXEICONFILE,*__LONG_I, 1 ,1),qbs_new_txt_len("/",1)))|(qbs_equal(func_mid(__STRING_EXEICONFILE,*__LONG_I, 1 ,1),qbs_new_txt_len("\\",1)))))||new_error){ if(qbevent){evnt(3380);if(r)goto S_4096;} do{ qbs_set(__STRING_ICONPATH,qbs_left(__STRING_EXEICONFILE,*__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3381);}while(r); do{ qbs_set(__STRING_EXEICONFILEONLY,func_mid(__STRING_EXEICONFILE,*__LONG_I+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3382);}while(r); S_4099:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(__STRING_ICONPATH)== 0 )))||new_error){ if(qbevent){evnt(3384);if(r)goto S_4099;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("File '",6),__STRING_EXEICONFILEONLY),qbs_new_txt_len("' not found",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3384);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3384);}while(r); } do{ qbs_set(__STRING_CURRENTDIR,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3386);}while(r); do{ sub_chdir(__STRING_ICONPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3387);}while(r); do{ qbs_set(__STRING_ICONPATH,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3388);}while(r); do{ sub_chdir(__STRING_CURRENTDIR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3389);}while(r); do{ qbs_set(__STRING_EXEICONFILE,qbs_add(qbs_add(__STRING_ICONPATH,__STRING1_PATHSEP),__STRING_EXEICONFILEONLY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3391);}while(r); do{ goto fornext_exit_355; if(!qbevent)break;evnt(3392);}while(r); } fornext_continue_355:; } fornext_exit_355:; } } S_4112:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(__STRING_EXEICONFILE)== 0 )))||new_error){ if(qbevent){evnt(3397);if(r)goto S_4112;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("File '",6),__STRING_EXEICONFILE),qbs_new_txt_len("' not found",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3397);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3397);}while(r); } do{ *__LONG_EXEICONSET=*__LONG_LINENUMBER; if(!qbevent)break;evnt(3399);}while(r); do{ SUB_SETDEPENDENCY(&(pass358= 10 )); if(!qbevent)break;evnt(3400);}while(r); S_4118:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(3401);if(r)goto S_4118;} do{ SUB_WRITEBUFLINE(&(pass359=*__LONG_MAINTXTBUF),qbs_new_txt_len("do{",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3401);}while(r); } do{ SUB_WRITEBUFLINE(&(pass360=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub__icon(NULL,NULL,0);",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3402);}while(r); do{ goto LABEL_FINISHEDLINE2; if(!qbevent)break;evnt(3403);}while(r); } } S_4125:; if ((((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])])||new_error){ if(qbevent){evnt(3408);if(r)goto S_4125;} do{ *__LONG_LAYOUTDONE= 0 ; if(!qbevent)break;evnt(3409);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3410);}while(r); } do{ *__LONG_LINEDATAOFFSET=*__LONG_DATAOFFSET; if(!qbevent)break;evnt(3414);}while(r); do{ qbs_set(__STRING_ENTIRELINE,FUNC_LINEFORMAT(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3416);}while(r); S_4131:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_ENTIRELINE->len== 0 )))||new_error){ if(qbevent){evnt(3416);if(r)goto S_4131;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3416);}while(r); } S_4134:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3417);if(r)goto S_4134;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3417);}while(r); } do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3418);}while(r); do{ *__LONG_NEWIF= 0 ; if(!qbevent)break;evnt(3420);}while(r); do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(3424);}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(3425);}while(r); S_4141:; while((*__LONG_I)||new_error){ if(qbevent){evnt(3426);if(r)goto S_4141;} do{ *__LONG_SKIP= 0 ; if(!qbevent)break;evnt(3427);}while(r); S_4143:; if ((-(*__LONG_I!= 1 ))||new_error){ if(qbevent){evnt(3428);if(r)goto S_4143;} S_4144:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(__STRING_U,*__LONG_I- 1 , 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(3429);if(r)goto S_4144;} do{ *__LONG_SKIP= 1 ; if(!qbevent)break;evnt(3429);}while(r); } } S_4148:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_I!=(__STRING_U->len- 8 ))))||new_error){ if(qbevent){evnt(3431);if(r)goto S_4148;} S_4149:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(__STRING_U,*__LONG_I+ 9 , 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(3432);if(r)goto S_4149;} do{ *__LONG_SKIP= 1 ; if(!qbevent)break;evnt(3432);}while(r); } } S_4153:; if ((-(*__LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(3434);if(r)goto S_4153;} 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(3435);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3436);}while(r); } do{ *__LONG_S=*__LONG_I+ 9 ; if(!qbevent)break;evnt(3438);}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(3439);}while(r); dl_continue_362:; } dl_exit_362:; do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3442);}while(r); do{ *__LONG_A=qbs_asc(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3445);}while(r); S_4162:; if (((((-(*__LONG_A>= 48 ))&(-(*__LONG_A<= 57 ))))|(-(*__LONG_A== 46 )))||new_error){ if(qbevent){evnt(3446);if(r)goto S_4162;} do{ qbs_set(__STRING_LABEL,FUNC_GETELEMENT(__STRING_ENTIRELINE,&(pass364= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3447);}while(r); S_4164:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDLABEL(__STRING_LABEL)))||new_error){ if(qbevent){evnt(3448);if(r)goto S_4164;} S_4165:; if ((qbs_cleanup(qbs_tmp_base,(-(*__INTEGER_CLOSEDMAIN!= 0 ))&(qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(3450);if(r)goto S_4165;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Labels cannot be placed between SUB/FUNCTIONs",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3450);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3450);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LABEL,&(pass365= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3452);}while(r); LABEL_ADDLABCHK100:; if(qbevent){evnt(3453);r=0;} S_4170:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(3454);if(r)goto S_4170;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(3455);}while(r); S_4172:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(3456);if(r)goto S_4172;} S_4173:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(3457);if(r)goto S_4173;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(3457);}while(r); } S_4176:; if ((-(*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282))== 1 ))||new_error){ if(qbevent){evnt(3458);if(r)goto S_4176;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Duplicate label (",17),qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+1)),256,1))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3458);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3458);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3460);}while(r); do{ goto LABEL_ADDLABAQ100; if(!qbevent)break;evnt(3461);}while(r); } S_4183:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(3463);if(r)goto S_4183;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(3463);}while(r); do{ goto LABEL_ADDLABCHK100; if(!qbevent)break;evnt(3463);}while(r); } } do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(3467);}while(r); S_4189:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(3467);if(r)goto S_4189;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(3467);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3482);}while(r); } do{ SUB_WRITEBUFLINE(&(pass369=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("last_line=",10),__STRING_LABEL),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3483);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3484);}while(r); S_4210:; if ((((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])||new_error){ if(qbevent){evnt(3485);if(r)goto S_4210;} do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_new_txt_len(",",1),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3486);}while(r); do{ qbs_set(__STRING_THISINCNAME,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(3487);}while(r); do{ qbs_set(__STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),__STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3488);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_INCLINENUMP,qbs_new_txt_len(",",1)),func_chr( 34 )),__STRING_THISINCNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3489);}while(r); } S_4216:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(3491);if(r)goto S_4216;} S_4217:; if ((*__LONG_VWATCHON&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(3492);if(r)goto S_4217;} do{ qbs_set(__STRING_TEMP,__STRING_VWATCHERRORCALL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3492);}while(r); }else{ do{ qbs_set(__STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3492);}while(r); } do{ SUB_WRITEBUFLINE(&(pass371=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){",12),__STRING_TEMP),qbs_new_txt_len("evnt(",5)),FUNC_STR2(__LONG_LINENUMBER)),__STRING_INCLINENUMP),qbs_new_txt_len(");r=0;}",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3493);}while(r); } S_4224:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(3495);if(r)goto S_4224;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3495);}while(r); } do{ qbs_set(__STRING_ENTIRELINE,FUNC_GETELEMENTS(__STRING_ENTIRELINE,&(pass372= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3496);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3496);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(3496);}while(r); } } S_4232:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(3504);if(r)goto S_4232;} 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(3505);}while(r); S_4234:; if ((*__LONG_X2)||new_error){ if(qbevent){evnt(3506);if(r)goto S_4234;} S_4235:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_X2==(__STRING_ENTIRELINE->len- 1 ))))||new_error){ if(qbevent){evnt(3507);if(r)goto S_4235;} do{ *__LONG_X3=*__LONG_X2+ 1 ; if(!qbevent)break;evnt(3507);}while(r); }else{ do{ *__LONG_X3=*__LONG_X2+ 2 ; if(!qbevent)break;evnt(3507);}while(r); } do{ qbs_set(__STRING_A,qbs_left(__STRING_ENTIRELINE,*__LONG_X2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3508);}while(r); do{ *__LONG_CREATINGLABEL= 1 ; if(!qbevent)break;evnt(3510);}while(r); S_4242:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDLABEL(__STRING_A)))||new_error){ if(qbevent){evnt(3511);if(r)goto S_4242;} S_4243:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_A)== 0 )))||new_error){ if(qbevent){evnt(3513);if(r)goto S_4243;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3513);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3513);}while(r); } S_4247:; if ((qbs_cleanup(qbs_tmp_base,(-(*__INTEGER_CLOSEDMAIN!= 0 ))&(qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(3515);if(r)goto S_4247;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Labels cannot be placed between SUB/FUNCTIONs",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3515);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3515);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A,&(pass374= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3517);}while(r); LABEL_ADDLABCHK:; if(qbevent){evnt(3518);r=0;} S_4252:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(3519);if(r)goto S_4252;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(3520);}while(r); S_4254:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(3521);if(r)goto S_4254;} S_4255:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(3522);if(r)goto S_4255;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(3522);}while(r); } S_4258:; if ((-(*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282))== 1 ))||new_error){ if(qbevent){evnt(3523);if(r)goto S_4258;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Duplicate label (",17),qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+1)),256,1))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3523);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3523);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3525);}while(r); do{ goto LABEL_ADDLABAQ; if(!qbevent)break;evnt(3526);}while(r); } S_4265:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(3528);if(r)goto S_4265;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(3528);}while(r); do{ goto LABEL_ADDLABCHK; if(!qbevent)break;evnt(3528);}while(r); } } do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(3531);}while(r); S_4271:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(3531);if(r)goto S_4271;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(3531);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(3542);if(r)goto S_4283;} 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(3542);}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(3542);}while(r); } do{ SUB_WRITEBUFLINE(&(pass377=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("LABEL_",6),__STRING_A),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3544);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3545);}while(r); S_4290:; if ((((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])||new_error){ if(qbevent){evnt(3546);if(r)goto S_4290;} do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_new_txt_len(",",1),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3547);}while(r); do{ qbs_set(__STRING_THISINCNAME,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(3548);}while(r); do{ qbs_set(__STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),__STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3549);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_INCLINENUMP,qbs_new_txt_len(",",1)),func_chr( 34 )),__STRING_THISINCNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3550);}while(r); } S_4296:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(3552);if(r)goto S_4296;} S_4297:; if ((*__LONG_VWATCHON&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(3553);if(r)goto S_4297;} do{ qbs_set(__STRING_TEMP,__STRING_VWATCHERRORCALL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3553);}while(r); }else{ do{ qbs_set(__STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3553);}while(r); } do{ SUB_WRITEBUFLINE(&(pass379=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){",12),__STRING_TEMP),qbs_new_txt_len("evnt(",5)),FUNC_STR2(__LONG_LINENUMBER)),__STRING_INCLINENUMP),qbs_new_txt_len(");r=0;}",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3554);}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(3556);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3556);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3557);}while(r); S_4307:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(3557);if(r)goto S_4307;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3557);}while(r); } } } } S_4313:; while((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_U)== 58 )))||new_error){ if(qbevent){evnt(3563);if(r)goto S_4313;} S_4314:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3564);if(r)goto S_4314;} 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(3564);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len(":",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3564);}while(r); } S_4319:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_U->len== 1 )))||new_error){ if(qbevent){evnt(3565);if(r)goto S_4319;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3565);}while(r); } do{ qbs_set(__STRING_ENTIRELINE,FUNC_GETELEMENTS(__STRING_ENTIRELINE,&(pass384= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3566);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3566);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(3566);}while(r); dl_continue_381:; } dl_exit_381:; S_4326:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_U)== 69 )))||new_error){ if(qbevent){evnt(3570);if(r)goto S_4326;} do{ qbs_set(__STRING_E1,FUNC_GETELEMENT(__STRING_U,&(pass385= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3572);}while(r); S_4328:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E1,qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(3574);if(r)goto S_4328;} do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3575);}while(r); S_4330:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(3576);if(r)goto S_4330;} do{ *__LONG_CONTINUELINEFROM= 2 ; if(!qbevent)break;evnt(3576);}while(r); } do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3577);}while(r); } S_4335:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E1,qbs_new_txt_len("ELSEIF",6))))||new_error){ if(qbevent){evnt(3580);if(r)goto S_4335;} S_4336:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(3581);if(r)goto S_4336;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... THEN",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3581);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3581);}while(r); } S_4340:; 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(3582);if(r)goto S_4340;} do{ qbs_set(__STRING_A,__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3582);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3582);}while(r); } S_4344:; fornext_value387= 3 ; fornext_finalvalue387=*__LONG_N- 1 ; fornext_step387= 1 ; if (fornext_step387<0) fornext_step_negative387=1; else fornext_step_negative387=0; if (new_error) goto fornext_error387; goto fornext_entrylabel387; while(1){ fornext_value387=fornext_step387+(*__LONG_I); fornext_entrylabel387: *__LONG_I=fornext_value387; if (fornext_step_negative387){ if (fornext_value387fornext_finalvalue387) break; } fornext_error387:; if(qbevent){evnt(3583);if(r)goto S_4344;} S_4345:; 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(3584);if(r)goto S_4345;} do{ qbs_set(__STRING_A,FUNC_GETELEMENTS(__STRING_ENTIRELINE,&(pass388= 1 ),__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3585);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(3586);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3587);}while(r); } fornext_continue_386:; } fornext_exit_386:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected THEN",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3590);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3590);}while(r); } } do{ *__LONG_START= 1 ; if(!qbevent)break;evnt(3595);}while(r); do{ goto LABEL_SKIPCONTINIT; if(!qbevent)break;evnt(3597);}while(r); LABEL_CONTLINE:; if(qbevent){evnt(3599);r=0;} do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_ENTIRELINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3601);}while(r); do{ qbs_set(__STRING_U,qbs_ucase(__STRING_ENTIRELINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3602);}while(r); LABEL_SKIPCONTINIT:; if(qbevent){evnt(3604);r=0;} do{ qbs_set(__STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3612);}while(r); S_4360:; fornext_value390=*__LONG_START; fornext_finalvalue390=*__LONG_N; fornext_step390= 1 ; if (fornext_step390<0) fornext_step_negative390=1; else fornext_step_negative390=0; if (new_error) goto fornext_error390; goto fornext_entrylabel390; while(1){ fornext_value390=fornext_step390+(*__LONG_I); fornext_entrylabel390: *__LONG_I=fornext_value390; if (fornext_step_negative390){ if (fornext_value390fornext_finalvalue390) break; } fornext_error390:; if(qbevent){evnt(3614);if(r)goto S_4360;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_U,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3615);}while(r); S_4362:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(3618);if(r)goto S_4362;} S_4363:; if ((-(*__LONG_I==*__LONG_START))||new_error){ if(qbevent){evnt(3619);if(r)goto S_4363;} do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3620);}while(r); S_4365:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3620);if(r)goto S_4365;} 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(3620);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len(":",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3620);}while(r); } S_4370:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(3621);if(r)goto S_4370;} do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(3621);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3622);}while(r); } S_4375:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(3624);if(r)goto S_4375;} do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(3624);}while(r); } do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3625);}while(r); } S_4380:; 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(3630);if(r)goto S_4380;} do{ *__LONG_NEWIF= 1 ; if(!qbevent)break;evnt(3630);}while(r); } S_4383:; 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(3633);if(r)goto S_4383;} S_4384:; if ((-(*__LONG_NEWIF== 0 ))||new_error){ if(qbevent){evnt(3634);if(r)goto S_4384;} do{ qbs_set(__STRING_A,qbs_new_txt_len("THEN without IF",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3634);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3634);}while(r); } do{ *__LONG_NEWIF= 0 ; if(!qbevent)break;evnt(3635);}while(r); S_4389:; if ((-(*__LONG_LINEELSEUSED> 0 ))||new_error){ if(qbevent){evnt(3636);if(r)goto S_4389;} do{ *__LONG_LINEELSEUSED=*__LONG_LINEELSEUSED- 1 ; if(!qbevent)break;evnt(3636);}while(r); } S_4392:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("GOTO",4))))||new_error){ if(qbevent){evnt(3637);if(r)goto S_4392;} S_4393:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(3638);if(r)goto S_4393;} 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(3638);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3638);}while(r); } do{ *__LONG_I=*__LONG_I- 1 ; if(!qbevent)break;evnt(3639);}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(3641);}while(r); S_4400:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(3642);if(r)goto S_4400;} do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(3642);}while(r); do{ *__LONG_ENDIFS=*__LONG_ENDIFS+ 1 ; if(!qbevent)break;evnt(3642);}while(r); } do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3643);}while(r); } S_4406:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(3647);if(r)goto S_4406;} S_4407:; if ((-(*__LONG_START==*__LONG_I))||new_error){ if(qbevent){evnt(3649);if(r)goto S_4407;} S_4408:; if ((-(*__LONG_LINEELSEUSED>= 1 ))||new_error){ if(qbevent){evnt(3650);if(r)goto S_4408;} do{ *__LONG_IMPLIEDENDIF= 1 ; if(!qbevent)break;evnt(3655);}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(3655);}while(r); do{ *__LONG_ENDIFS=*__LONG_ENDIFS- 1 ; if(!qbevent)break;evnt(3656);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(3657);}while(r); do{ *__LONG_LINEELSEUSED=*__LONG_LINEELSEUSED- 1 ; if(!qbevent)break;evnt(3658);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3659);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3662);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I+ 1 ; if(!qbevent)break;evnt(3662);}while(r); do{ *__LONG_LINEELSEUSED=*__LONG_LINEELSEUSED+ 1 ; if(!qbevent)break;evnt(3663);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3664);}while(r); } do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(3668);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3669);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_ENTIRELINE,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3673);}while(r); S_4425:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(3673);if(r)goto S_4425;} do{ qbs_set(__STRING_A,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3673);}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(3673);}while(r); } fornext_continue_389:; } fornext_exit_389:; S_4431:; if ((-(*__LONG_ENDIFS> 0 ))||new_error){ if(qbevent){evnt(3678);if(r)goto S_4431;} do{ *__LONG_ENDIFS=*__LONG_ENDIFS- 1 ; if(!qbevent)break;evnt(3679);}while(r); do{ *__LONG_IMPLIEDENDIF= 1 ; if(!qbevent)break;evnt(3680);}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(3680);}while(r); do{ *__LONG_N=*__LONG_N+ 3 ; if(!qbevent)break;evnt(3680);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(3681);}while(r); do{ *__LONG_CONTINUELINEFROM=*__LONG_I; if(!qbevent)break;evnt(3682);}while(r); do{ goto LABEL_GOTCOMMAND; if(!qbevent)break;evnt(3683);}while(r); } LABEL_GOTCOMMAND:; if(qbevent){evnt(3687);r=0;} do{ *__LONG_DYNSCOPE= 0 ; if(!qbevent)break;evnt(3689);}while(r); do{ qbs_set(__STRING_CA,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3691);}while(r); do{ qbs_set(__STRING_A,FUNC_ELEUCASE(__STRING_CA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3692);}while(r); do{ *__LONG_LAYOUTDONE= 0 ; if(!qbevent)break;evnt(3695);}while(r); do{ qbs_set(__STRING_LINEFRAGMENT,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3697);}while(r); S_4445:; if (( 0 )||new_error){ if(qbevent){evnt(3698);if(r)goto S_4445;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip392; sub_file_print(tmp_fileno,__STRING_A, 0, 0, 1); if (new_error) goto skip392; skip392: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(3698);}while(r); } do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3699);}while(r); S_4449:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(3700);if(r)goto S_4449;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3700);}while(r); } S_4452:; 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(3703);if(r)goto S_4452;} do{ qbs_set(__STRING_A3,FUNC_GETELEMENT(__STRING_CA,&(pass393= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3704);}while(r); do{ *__LONG_EXCEPT= 0 ; if(!qbevent)break;evnt(3705);}while(r); do{ qbs_set(__STRING_AA,qbs_add(__STRING_A3,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3706);}while(r); do{ *__LONG_LASTFUSE= -1 ; if(!qbevent)break;evnt(3707);}while(r); S_4457:; fornext_value395= 2 ; fornext_finalvalue395=*__LONG_N; fornext_step395= 1 ; if (fornext_step395<0) fornext_step_negative395=1; else fornext_step_negative395=0; if (new_error) goto fornext_error395; goto fornext_entrylabel395; while(1){ fornext_value395=fornext_step395+(*__LONG_X); fornext_entrylabel395: *__LONG_X=fornext_value395; if (fornext_step_negative395){ if (fornext_value395fornext_finalvalue395) break; } fornext_error395:; if(qbevent){evnt(3708);if(r)goto S_4457;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3709);}while(r); S_4459:; if ((-(*__LONG_EXCEPT== 1 ))||new_error){ if(qbevent){evnt(3710);if(r)goto S_4459;} do{ *__LONG_EXCEPT= 2 ; if(!qbevent)break;evnt(3710);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3710);}while(r); } S_4463:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(".",1)))&(-(*__LONG_X!=*__LONG_N))))||new_error){ if(qbevent){evnt(3711);if(r)goto S_4463;} S_4464:; if ((-(*__LONG_EXCEPT== 2 ))||new_error){ if(qbevent){evnt(3712);if(r)goto S_4464;} do{ *__LONG_EXCEPT= 1 ; if(!qbevent)break;evnt(3712);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3712);}while(r); } S_4468:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(3714);if(r)goto S_4468;} do{ *__LONG_EXCEPT= 1 ; if(!qbevent)break;evnt(3716);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3717);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(qbs_ucase(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3721);}while(r); S_4473:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3722);if(r)goto S_4473;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3722);}while(r); } S_4476:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(3723);if(r)goto S_4476;} S_4477:; if (((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)!= 0 ))|(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISUDT)!= 0 )))||new_error){ if(qbevent){evnt(3724);if(r)goto S_4477;} do{ *__LONG_EXCEPT= 1 ; if(!qbevent)break;evnt(3725);}while(r); do{ goto LABEL_UDTPERIOD; if(!qbevent)break;evnt(3726);}while(r); } S_4481:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(3728);if(r)goto S_4481;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(3728);}while(r); do{ *__LONG_TRY=FUNC_FINDID(qbs_ucase(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3728);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(3728);}while(r); } S_4487:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3729);if(r)goto S_4487;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3729);}while(r); } dl_continue_396:; } dl_exit_396:; S_4491:; 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(3732);if(r)goto S_4491;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid '.'",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3732);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3732);}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(3733);}while(r); do{ *__LONG_LASTFUSE=*__LONG_X; if(!qbevent)break;evnt(3734);}while(r); do{ goto LABEL_PERIODFUSED; if(!qbevent)break;evnt(3735);}while(r); } do{ *__LONG_EXCEPT= 0 ; if(!qbevent)break;evnt(3737);}while(r); LABEL_UDTPERIOD:; if(qbevent){evnt(3738);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(3739);}while(r); LABEL_PERIODFUSED:; if(qbevent){evnt(3740);r=0;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3741);}while(r); fornext_continue_394:; } fornext_exit_394:; do{ qbs_set(__STRING_A,qbs_left(__STRING_AA,__STRING_AA->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3743);}while(r); do{ qbs_set(__STRING_CA,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3744);}while(r); do{ qbs_set(__STRING_A,FUNC_ELEUCASE(__STRING_CA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3745);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3746);}while(r); } do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(3749);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass399= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3751);}while(r); do{ qbs_set(__STRING_SECONDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass400= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3752);}while(r); do{ qbs_set(__STRING_THIRDELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass401= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3753);}while(r); S_4512:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(3757);if(r)goto S_4512;} S_4513:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("'",1))))||new_error){ if(qbevent){evnt(3758);if(r)goto S_4513;} do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3758);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3758);}while(r); } } S_4518:; if ((-(*__LONG_N<= 2 ))||new_error){ if(qbevent){evnt(3761);if(r)goto S_4518;} S_4519:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DATA",4))))||new_error){ if(qbevent){evnt(3762);if(r)goto S_4519;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Data",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3763);}while(r); S_4521:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(3764);if(r)goto S_4521;} do{ qbs_set(__STRING_E,func_space((__STRING_SECONDELEMENT->len- 1 )/ 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3766);}while(r); S_4523:; fornext_value404= 1 ; fornext_finalvalue404=__STRING_E->len; fornext_step404= 1 ; if (fornext_step404<0) fornext_step_negative404=1; else fornext_step_negative404=0; if (new_error) goto fornext_error404; goto fornext_entrylabel404; while(1){ fornext_value404=fornext_step404+(*__LONG_X); fornext_entrylabel404: *__LONG_X=fornext_value404; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative404){ if (fornext_value404fornext_finalvalue404) break; } fornext_error404:; if(qbevent){evnt(3767);if(r)goto S_4523;} do{ *__LONG_V1=qbs_asc(__STRING_SECONDELEMENT,*__LONG_X* 2 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3768);}while(r); do{ *__LONG_V2=qbs_asc(__STRING_SECONDELEMENT,(*__LONG_X* 2 )+( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3769);}while(r); S_4526:; if ((-(*__LONG_V1< 65 ))||new_error){ if(qbevent){evnt(3770);if(r)goto S_4526;} do{ *__LONG_V1=*__LONG_V1- 48 ; if(!qbevent)break;evnt(3770);}while(r); }else{ do{ *__LONG_V1=*__LONG_V1- 55 ; if(!qbevent)break;evnt(3770);}while(r); } S_4531:; if ((-(*__LONG_V2< 65 ))||new_error){ if(qbevent){evnt(3771);if(r)goto S_4531;} do{ *__LONG_V2=*__LONG_V2- 48 ; if(!qbevent)break;evnt(3771);}while(r); }else{ do{ *__LONG_V2=*__LONG_V2- 55 ; if(!qbevent)break;evnt(3771);}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(3772);}while(r); fornext_continue_403:; } fornext_exit_403:; 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(3774);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3777);}while(r); S_4541:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3777);if(r)goto S_4541;} 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(3777);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3777);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3779);}while(r); } } S_4549:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(3786);if(r)goto S_4549;} S_4550:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(3788);if(r)goto S_4550;} S_4551:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("DECLARE",7)))))||new_error){ if(qbevent){evnt(3789);if(r)goto S_4551;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END DECLARE",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3789);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3789);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 0 ; if(!qbevent)break;evnt(3790);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(3791);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3792);}while(r); S_4558:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3792);if(r)goto S_4558;} 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(3792);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3792);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3793);}while(r); } do{ *__LONG_DECLARINGLIBRARY= 2 ; if(!qbevent)break;evnt(3796);}while(r); S_4566:; 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(3798);if(r)goto S_4566;} do{ goto LABEL_DECLARESUBFUNC2; if(!qbevent)break;evnt(3799);}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(3802);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3802);}while(r); } S_4572:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(3806);if(r)goto S_4572;} S_4573:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(3808);if(r)goto S_4573;} S_4574:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N!= 2 ))|(qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("TYPE",4)))))||new_error){ if(qbevent){evnt(3809);if(r)goto S_4574;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END TYPE",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3809);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3809);}while(r); } do{ *__LONG_DEFININGTYPE= 0 ; if(!qbevent)break;evnt(3810);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(3811);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3812);}while(r); S_4581:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3812);if(r)goto S_4581;} 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(3812);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3812);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3813);}while(r); } S_4588:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(3817);if(r)goto S_4588;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected element-name AS type or AS type element-list",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3817);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3817);}while(r); } do{ *__LONG_DEFININGTYPE= 2 ; if(!qbevent)break;evnt(3818);}while(r); S_4593:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(3819);if(r)goto S_4593;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("As",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3820);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3821);}while(r); do{ *__LONG_WORDSINTYPENAME= 0 ; if(!qbevent)break;evnt(3822);}while(r); S_4597:; do{ if(qbevent){evnt(3823);if(r)goto S_4597;} do{ qbs_set(__STRING_NEXTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass410= 2 +*__LONG_WORDSINTYPENAME))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3824);}while(r); S_4599:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_NEXTELEMENT,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(3825);if(r)goto S_4599;} do{ *__LONG_WORDSINTYPENAME=*__LONG_WORDSINTYPENAME- 2 ; if(!qbevent)break;evnt(3827);}while(r); do{ goto dl_exit_409; if(!qbevent)break;evnt(3828);}while(r); } do{ *__LONG_WORDSINTYPENAME=*__LONG_WORDSINTYPENAME+ 1 ; if(!qbevent)break;evnt(3831);}while(r); S_4604:; if ((-(*__LONG_WORDSINTYPENAME==(*__LONG_N- 2 )))||new_error){ if(qbevent){evnt(3832);if(r)goto S_4604;} do{ *__LONG_WORDSINTYPENAME=*__LONG_WORDSINTYPENAME- 1 ; if(!qbevent)break;evnt(3834);}while(r); do{ goto dl_exit_409; if(!qbevent)break;evnt(3835);}while(r); } dl_continue_409:; }while(1); dl_exit_409:; do{ qbs_set(__STRING_T,FUNC_GETELEMENTS(__STRING_A,&(pass411= 2 ),&(pass412= 2 +*__LONG_WORDSINTYPENAME))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3839);}while(r); do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3840);}while(r); S_4611:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3841);if(r)goto S_4611;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3841);}while(r); } S_4614:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(3842);if(r)goto S_4614;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3842);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3842);}while(r); } S_4618:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(3843);if(r)goto S_4618;} S_4619:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(qbs_rtrim(__STRING_T)),qbs_new_txt_len("MEM",3)))&(qbs_equal(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_new_txt_len("_MEM",4)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(3844);if(r)goto S_4619;} do{ qbs_set(__STRING_T,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3845);}while(r); }else{ 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(3847);}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(3849);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE2(__STRING_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3851);}while(r); } S_4628:; fornext_value414= 3 +*__LONG_WORDSINTYPENAME; fornext_finalvalue414=*__LONG_N; fornext_step414= 1 ; if (fornext_step414<0) fornext_step_negative414=1; else fornext_step_negative414=0; if (new_error) goto fornext_error414; goto fornext_entrylabel414; while(1){ fornext_value414=fornext_step414+(*__LONG_I); fornext_entrylabel414: *__LONG_I=fornext_value414; if (fornext_step_negative414){ if (fornext_value414fornext_finalvalue414) break; } fornext_error414:; if(qbevent){evnt(3855);if(r)goto S_4628;} do{ qbs_set(__STRING_THISELEMENT,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3856);}while(r); S_4630:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_THISELEMENT,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(3857);if(r)goto S_4630;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_THISELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3858);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),__STRING_THISELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3860);}while(r); } fornext_continue_413:; } fornext_exit_413:; do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3863);}while(r); S_4637:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3863);if(r)goto S_4637;} 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(3863);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3863);}while(r); } }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_GETELEMENT(__STRING_CA,&(pass416= 1 )),__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("As",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3865);}while(r); do{ qbs_set(__STRING_T,FUNC_GETELEMENTS(__STRING_A,&(pass417= 3 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3866);}while(r); do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3867);}while(r); S_4646:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(3868);if(r)goto S_4646;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3868);}while(r); } S_4649:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(3869);if(r)goto S_4649;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3869);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3869);}while(r); } S_4653:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(3870);if(r)goto S_4653;} S_4654:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(qbs_rtrim(__STRING_T)),qbs_new_txt_len("MEM",3)))&(qbs_equal(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_new_txt_len("_MEM",4)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(3871);if(r)goto S_4654;} do{ qbs_set(__STRING_T,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3872);}while(r); }else{ 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(3874);}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(3876);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE2(__STRING_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3878);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3880);}while(r); S_4664:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3880);if(r)goto S_4664;} 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(3880);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3880);}while(r); } } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3882);}while(r); } S_4672:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("TYPE",4))))||new_error){ if(qbevent){evnt(3886);if(r)goto S_4672;} S_4673:; if ((-(*__LONG_N!= 2 ))||new_error){ if(qbevent){evnt(3887);if(r)goto S_4673;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected TYPE type-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3887);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3887);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Type",4)),__STRING1_SP),FUNC_GETELEMENT(__STRING_CA,&(pass419= 2 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3888);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(3889);}while(r); S_4679:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(3889);if(r)goto S_4679;} 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(3889);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3889);}while(r); } do{ *__LONG_DEFININGTYPE= 1 ; if(!qbevent)break;evnt(3890);}while(r); do{ *__LONG_DEFININGTYPEERROR=*__LONG_LINENUMBER; if(!qbevent)break;evnt(3891);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(3892);}while(r); } S_4688:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(3896);if(r)goto S_4688;} S_4689:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DECLARE",7))))||new_error){ if(qbevent){evnt(3897);if(r)goto S_4689;} S_4690:; 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(3899);if(r)goto S_4690;} do{ *__LONG_DECLARINGLIBRARY= 1 ; if(!qbevent)break;evnt(3901);}while(r); do{ *__LONG_DYNAMICLIBRARY= 0 ; if(!qbevent)break;evnt(3902);}while(r); do{ *__LONG_CUSTOMTYPELIBRARY= 0 ; if(!qbevent)break;evnt(3903);}while(r); do{ *__LONG_INDIRECTLIBRARY= 0 ; if(!qbevent)break;evnt(3904);}while(r); do{ *__LONG_STATICLINKEDLIBRARY= 0 ; if(!qbevent)break;evnt(3905);}while(r); do{ *__LONG_X= 3 ; if(!qbevent)break;evnt(3907);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(3908);}while(r); S_4698:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("DYNAMIC",7))))||new_error){ if(qbevent){evnt(3910);if(r)goto S_4698;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass421= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3911);}while(r); S_4700:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("LIBRARY",7))))||new_error){ if(qbevent){evnt(3911);if(r)goto S_4700;} 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(3911);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3911);}while(r); } do{ *__LONG_DYNAMICLIBRARY= 1 ; if(!qbevent)break;evnt(3912);}while(r); do{ *__LONG_X= 4 ; if(!qbevent)break;evnt(3913);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(3914);}while(r); S_4707:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(3915);if(r)goto S_4707;} 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(3915);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3915);}while(r); } do{ *__LONG_INDIRECTLIBRARY= 1 ; if(!qbevent)break;evnt(3916);}while(r); } S_4713:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("CUSTOMTYPE",10))))||new_error){ if(qbevent){evnt(3919);if(r)goto S_4713;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass422= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3920);}while(r); S_4715:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("LIBRARY",7))))||new_error){ if(qbevent){evnt(3920);if(r)goto S_4715;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CUSTOMTYPE LIBRARY",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3920);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3920);}while(r); } do{ *__LONG_CUSTOMTYPELIBRARY= 1 ; if(!qbevent)break;evnt(3921);}while(r); do{ *__LONG_X= 4 ; if(!qbevent)break;evnt(3922);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(3923);}while(r); do{ *__LONG_INDIRECTLIBRARY= 1 ; if(!qbevent)break;evnt(3924);}while(r); } S_4724:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(3927);if(r)goto S_4724;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass423= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3928);}while(r); S_4726:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("LIBRARY",7))))||new_error){ if(qbevent){evnt(3928);if(r)goto S_4726;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected STATIC LIBRARY",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3928);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3928);}while(r); } do{ *__LONG_X= 4 ; if(!qbevent)break;evnt(3929);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(3930);}while(r); do{ *__LONG_STATICLINKEDLIBRARY= 1 ; if(!qbevent)break;evnt(3931);}while(r); } do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(3934);}while(r); do{ *__LONG_SFHEADER= 0 ; if(!qbevent)break;evnt(3934);}while(r); S_4736:; if ((-(*__LONG_N>=*__LONG_X))||new_error){ if(qbevent){evnt(3936);if(r)goto S_4736;} do{ *__LONG_SFDECLARE= 1 ; if(!qbevent)break;evnt(3938);}while(r); LABEL_ADDLIBRARY:; if(qbevent){evnt(3940);r=0;} do{ qbs_set(__STRING_LIBNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3942);}while(r); do{ qbs_set(__STRING_HEADERNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3943);}while(r); do{ qbs_set(__STRING_X,FUNC_GETELEMENT(__STRING_CA,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3948);}while(r); S_4741:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_X)!= 34 )))||new_error){ if(qbevent){evnt(3949);if(r)goto S_4741;} 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(3949);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3949);}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(3950);}while(r); do{ *__LONG_Z=func_instr(NULL,__STRING_X,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3951);}while(r); S_4747:; if ((-(*__LONG_Z== 0 ))||new_error){ if(qbevent){evnt(3952);if(r)goto S_4747;} 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(3952);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3952);}while(r); } do{ qbs_set(__STRING_X,qbs_left(__STRING_X,*__LONG_Z- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3953);}while(r); S_4752:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_DYNAMICLIBRARY!= 0 ))&(-(__STRING_X->len== 0 ))))||new_error){ if(qbevent){evnt(3955);if(r)goto S_4752;} 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(3955);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3955);}while(r); } S_4756:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_CUSTOMTYPELIBRARY!= 0 ))&(-(__STRING_X->len== 0 ))))||new_error){ if(qbevent){evnt(3956);if(r)goto S_4756;} 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(3956);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(3956);}while(r); } S_4760:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_X,qbs_new_txt_len("\\\\",2),0)))||new_error){ if(qbevent){evnt(3971);if(r)goto S_4760;} do{ *__LONG_Z=func_instr(NULL,__STRING_X,qbs_new_txt_len("\\\\",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3972);}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(3973);}while(r); ww_continue_427:; } ww_exit_427:; do{ qbs_set(__STRING_AUTOFORMAT_X,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3976);}while(r); do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3980);}while(r); LABEL_STRIPLIBVER:; if(qbevent){evnt(3981);r=0;} S_4766:; fornext_value430=__STRING_X->len; fornext_finalvalue430= 1 ; fornext_step430= -1 ; if (fornext_step430<0) fornext_step_negative430=1; else fornext_step_negative430=0; if (new_error) goto fornext_error430; goto fornext_entrylabel430; while(1){ fornext_value430=fornext_step430+(*__LONG_Z); fornext_entrylabel430: *__LONG_Z=fornext_value430; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative430){ if (fornext_value430fornext_finalvalue430) break; } fornext_error430:; if(qbevent){evnt(3982);if(r)goto S_4766;} do{ *__LONG_A=qbs_asc(__STRING_X,*__LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3983);}while(r); S_4768:; if (((-(*__LONG_A== 92 ))|(-(*__LONG_A== 47 )))||new_error){ if(qbevent){evnt(3984);if(r)goto S_4768;} do{ goto fornext_exit_429; if(!qbevent)break;evnt(3984);}while(r); } S_4771:; if (((-(*__LONG_A== 46 ))|(-(*__LONG_A== 58 )))||new_error){ if(qbevent){evnt(3985);if(r)goto S_4771;} S_4772:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(__STRING_X,__STRING_X->len-*__LONG_Z))))||new_error){ if(qbevent){evnt(3986);if(r)goto S_4772;} S_4773:; if ((qbs_cleanup(qbs_tmp_base,__STRING_V->len))||new_error){ if(qbevent){evnt(3987);if(r)goto S_4773;} 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(3987);}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(3987);}while(r); } do{ qbs_set(__STRING_X,qbs_left(__STRING_X,*__LONG_Z- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3988);}while(r); S_4779:; if ((-(*__LONG_A== 58 ))||new_error){ if(qbevent){evnt(3989);if(r)goto S_4779;} do{ goto fornext_exit_429; if(!qbevent)break;evnt(3989);}while(r); } do{ goto LABEL_STRIPLIBVER; if(!qbevent)break;evnt(3990);}while(r); }else{ do{ goto fornext_exit_429; if(!qbevent)break;evnt(3992);}while(r); } } fornext_continue_429:; } fornext_exit_429:; do{ qbs_set(__STRING_LIBVER,__STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(3996);}while(r); S_4789:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(3999);if(r)goto S_4789;} S_4790:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_X,qbs_new_txt_len("/",1),0)))||new_error){ if(qbevent){evnt(4001);if(r)goto S_4790;} do{ *__LONG_Z=func_instr(NULL,__STRING_X,qbs_new_txt_len("/",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4002);}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(4003);}while(r); dl_continue_436:; } dl_exit_436:; } S_4795:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4007);if(r)goto S_4795;} S_4796:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_X,qbs_new_txt_len("\\",1),0)))||new_error){ if(qbevent){evnt(4009);if(r)goto S_4796;} do{ *__LONG_Z=func_instr(NULL,__STRING_X,qbs_new_txt_len("\\",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4010);}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(4011);}while(r); dl_continue_438:; } dl_exit_438:; } do{ qbs_set(__STRING_LIBPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4016);}while(r); S_4802:; fornext_value441=__STRING_X->len; fornext_finalvalue441= 1 ; fornext_step441= -1 ; if (fornext_step441<0) fornext_step_negative441=1; else fornext_step_negative441=0; if (new_error) goto fornext_error441; goto fornext_entrylabel441; while(1){ fornext_value441=fornext_step441+(*__LONG_Z); fornext_entrylabel441: *__LONG_Z=fornext_value441; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative441){ if (fornext_value441fornext_finalvalue441) break; } fornext_error441:; if(qbevent){evnt(4017);if(r)goto S_4802;} do{ *__LONG_A=qbs_asc(__STRING_X,*__LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4018);}while(r); S_4804:; if (((-(*__LONG_A== 47 ))|(-(*__LONG_A== 92 )))||new_error){ if(qbevent){evnt(4019);if(r)goto S_4804;} do{ qbs_set(__STRING_LIBPATH,qbs_left(__STRING_X,*__LONG_Z)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4020);}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(4021);}while(r); do{ goto fornext_exit_440; if(!qbevent)break;evnt(4022);}while(r); } fornext_continue_440:; } fornext_exit_440:; S_4810:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_LIBPATH,qbs_new_txt_len("./",2)))|(qbs_equal(__STRING_LIBPATH,qbs_new_txt_len(".\\",2)))))||new_error){ if(qbevent){evnt(4028);if(r)goto S_4810;} do{ qbs_set(__STRING_LIBPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4029);}while(r); S_4812:; if ((*__LONG_NOIDEMODE)||new_error){ if(qbevent){evnt(4030);if(r)goto S_4812;} do{ qbs_set(__STRING_LIBPATH,__STRING_PATH__ASCII_CHR_046__SOURCE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4031);}while(r); S_4814:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_LIBPATH->len> 0 ))&(qbs_notequal(qbs_right(__STRING_LIBPATH, 1 ),__STRING1_PATHSEP))))||new_error){ if(qbevent){evnt(4032);if(r)goto S_4814;} do{ qbs_set(__STRING_LIBPATH,qbs_add(__STRING_LIBPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4032);}while(r); } }else{ S_4818:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEPROGNAME->len))||new_error){ if(qbevent){evnt(4034);if(r)goto S_4818;} do{ qbs_set(__STRING_LIBPATH,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4034);}while(r); } } } do{ qbs_set(__STRING_LIBPATH_INLINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4039);}while(r); S_4824:; fornext_value447= 1 ; fornext_finalvalue447=__STRING_LIBPATH->len; fornext_step447= 1 ; if (fornext_step447<0) fornext_step_negative447=1; else fornext_step_negative447=0; if (new_error) goto fornext_error447; goto fornext_entrylabel447; while(1){ fornext_value447=fornext_step447+(*__LONG_Z); fornext_entrylabel447: *__LONG_Z=fornext_value447; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative447){ if (fornext_value447fornext_finalvalue447) break; } fornext_error447:; if(qbevent){evnt(4040);if(r)goto S_4824;} do{ *__LONG_A=qbs_asc(__STRING_LIBPATH,*__LONG_Z); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4041);}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(4042);}while(r); S_4827:; if ((-(*__LONG_A== 92 ))||new_error){ if(qbevent){evnt(4043);if(r)goto S_4827;} 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(4043);}while(r); } fornext_continue_446:; } fornext_exit_446:; S_4831:; if ((qbs_cleanup(qbs_tmp_base,__STRING_X->len))||new_error){ if(qbevent){evnt(4046);if(r)goto S_4831;} S_4832:; if ((-(*__LONG_DYNAMICLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4047);if(r)goto S_4832;} S_4833:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4050);if(r)goto S_4833;} S_4834:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4052);if(r)goto S_4834;} S_4835:; 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(4053);if(r)goto S_4835;} 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(4054);}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(4055);}while(r); } } S_4840:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4059);if(r)goto S_4840;} S_4841:; 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(4060);if(r)goto S_4841;} 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(4061);}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(4062);}while(r); } } S_4846:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4066);if(r)goto S_4846;} S_4847:; 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(4067);if(r)goto S_4847;} 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(4068);}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(4069);}while(r); } } S_4852:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4073);if(r)goto S_4852;} S_4853:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".lib",4)))))||new_error){ if(qbevent){evnt(4074);if(r)goto S_4853;} 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(4075);}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(4076);}while(r); } } S_4858:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4080);if(r)goto S_4858;} S_4859:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".a",2)))))||new_error){ if(qbevent){evnt(4081);if(r)goto S_4859;} 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(4082);}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(4083);}while(r); } } S_4864:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4087);if(r)goto S_4864;} S_4865:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".o",2)))))||new_error){ if(qbevent){evnt(4088);if(r)goto S_4865;} 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(4089);}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(4090);}while(r); } } } S_4871:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4095);if(r)goto S_4871;} S_4872:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4096);if(r)goto S_4872;} S_4873:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4098);if(r)goto S_4873;} S_4874:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4100);if(r)goto S_4874;} S_4875:; 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(4101);if(r)goto S_4875;} 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(4102);}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(4103);}while(r); S_4878:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4104);if(r)goto S_4878;} 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(4104);}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(4104);}while(r); } } } S_4885:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4107);if(r)goto S_4885;} S_4886:; 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(4108);if(r)goto S_4886;} 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(4109);}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(4110);}while(r); S_4889:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4111);if(r)goto S_4889;} 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(4111);}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(4111);}while(r); } } } } S_4897:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4117);if(r)goto S_4897;} S_4898:; 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(4118);if(r)goto S_4898;} 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(4119);}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(4120);}while(r); S_4901:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4121);if(r)goto S_4901;} 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(4121);}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(4121);}while(r); } } } S_4908:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4124);if(r)goto S_4908;} S_4909:; 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(4125);if(r)goto S_4909;} 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(4126);}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(4127);}while(r); S_4912:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4128);if(r)goto S_4912;} 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(4128);}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(4128);}while(r); } } } } S_4920:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4133);if(r)goto S_4920;} S_4921:; 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(4134);if(r)goto S_4921;} 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(4135);}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(4136);}while(r); } } S_4926:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4140);if(r)goto S_4926;} S_4927:; 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(4141);if(r)goto S_4927;} 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(4142);}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(4143);}while(r); } } S_4932:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4146);if(r)goto S_4932;} S_4933:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4148);if(r)goto S_4933;} S_4934:; 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(4149);if(r)goto S_4934;} 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(4150);}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(4151);}while(r); S_4937:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4152);if(r)goto S_4937;} 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(4152);}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(4152);}while(r); } } } S_4944:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4155);if(r)goto S_4944;} S_4945:; 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(4156);if(r)goto S_4945;} 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(4157);}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(4158);}while(r); S_4948:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4159);if(r)goto S_4948;} 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(4159);}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(4159);}while(r); } } } } S_4956:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4164);if(r)goto S_4956;} S_4957:; 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(4165);if(r)goto S_4957;} 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(4166);}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(4167);}while(r); } } S_4962:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4170);if(r)goto S_4962;} S_4963:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4172);if(r)goto S_4963;} S_4964:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4174);if(r)goto S_4964;} S_4965:; 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(4175);if(r)goto S_4965;} 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(4176);}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(4177);}while(r); S_4968:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4178);if(r)goto S_4968;} 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(4178);}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(4178);}while(r); } } } S_4975:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4181);if(r)goto S_4975;} S_4976:; 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(4182);if(r)goto S_4976;} 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(4183);}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(4184);}while(r); S_4979:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4185);if(r)goto S_4979;} 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(4185);}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(4185);}while(r); } } } } S_4987:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4191);if(r)goto S_4987;} S_4988:; 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(4192);if(r)goto S_4988;} 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(4193);}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(4194);}while(r); S_4991:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4195);if(r)goto S_4991;} 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(4195);}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(4195);}while(r); } } } S_4998:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4198);if(r)goto S_4998;} S_4999:; 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(4199);if(r)goto S_4999;} 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(4200);}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(4201);}while(r); S_5002:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBPATH->len))||new_error){ if(qbevent){evnt(4202);if(r)goto S_5002;} 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(4202);}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(4202);}while(r); } } } } S_5010:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4207);if(r)goto S_5010;} S_5011:; 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(4208);if(r)goto S_5011;} 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(4209);}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(4210);}while(r); } } S_5016:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4214);if(r)goto S_5016;} S_5017:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4216);if(r)goto S_5017;} S_5018:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4218);if(r)goto S_5018;} S_5019:; 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(4219);if(r)goto S_5019;} 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(4220);}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(4221);}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(4222);}while(r); } } S_5025:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4225);if(r)goto S_5025;} S_5026:; 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(4226);if(r)goto S_5026;} 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(4227);}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(4228);}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(4229);}while(r); } } } S_5033:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4235);if(r)goto S_5033;} S_5034:; 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(4236);if(r)goto S_5034;} 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(4237);}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(4238);}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(4239);}while(r); } } S_5040:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4242);if(r)goto S_5040;} S_5041:; 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(4243);if(r)goto S_5041;} 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(4244);}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(4245);}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(4246);}while(r); } } } S_5048:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4251);if(r)goto S_5048;} S_5049:; 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(4252);if(r)goto S_5049;} 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(4253);}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(4254);}while(r); } } S_5054:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4258);if(r)goto S_5054;} S_5055:; 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(4259);if(r)goto S_5055;} 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(4260);}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(4261);}while(r); } } S_5060:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4264);if(r)goto S_5060;} S_5061:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4266);if(r)goto S_5061;} S_5062:; 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(4267);if(r)goto S_5062;} 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(4268);}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(4269);}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(4270);}while(r); } } S_5068:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4273);if(r)goto S_5068;} S_5069:; 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(4274);if(r)goto S_5069;} 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(4275);}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(4276);}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(4277);}while(r); } } } S_5076:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4282);if(r)goto S_5076;} S_5077:; 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(4283);if(r)goto S_5077;} 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(4284);}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(4285);}while(r); } } S_5082:; if ((-(*__LONG_STATICLINKEDLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4288);if(r)goto S_5082;} S_5083:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4290);if(r)goto S_5083;} S_5084:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4292);if(r)goto S_5084;} S_5085:; 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(4293);if(r)goto S_5085;} 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(4294);}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(4295);}while(r); } } S_5090:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4298);if(r)goto S_5090;} S_5091:; 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(4299);if(r)goto S_5091;} 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(4300);}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(4301);}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(4302);}while(r); } } } S_5098:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4308);if(r)goto S_5098;} S_5099:; 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(4309);if(r)goto S_5099;} 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(4310);}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(4311);}while(r); } } S_5104:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4314);if(r)goto S_5104;} S_5105:; 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(4315);if(r)goto S_5105;} 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(4316);}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(4317);}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(4318);}while(r); } } } S_5112:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4323);if(r)goto S_5112;} S_5113:; 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(4324);if(r)goto S_5113;} 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(4325);}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(4326);}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(4327);}while(r); } } } S_5120:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_HEADERNAME->len== 0 )))||new_error){ if(qbevent){evnt(4334);if(r)goto S_5120;} S_5121:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4335);if(r)goto S_5121;} S_5122:; 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(4336);if(r)goto S_5122;} 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(4337);}while(r); S_5124:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4338);if(r)goto S_5124;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4338);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4339);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4340);}while(r); } S_5130:; 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(4342);if(r)goto S_5130;} 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(4343);}while(r); S_5132:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4344);if(r)goto S_5132;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4344);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4345);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4346);}while(r); } S_5138:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(4349);if(r)goto S_5138;} 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(4350);}while(r); S_5140:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4351);if(r)goto S_5140;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4351);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4352);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4353);}while(r); } S_5146:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(4355);if(r)goto S_5146;} 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(4356);}while(r); S_5148:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4357);if(r)goto S_5148;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4357);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4358);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4359);}while(r); } } S_5155:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4363);if(r)goto S_5155;} S_5156:; 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(4364);if(r)goto S_5156;} 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(4365);}while(r); S_5158:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4366);if(r)goto S_5158;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4366);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4367);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4368);}while(r); } S_5164:; 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(4370);if(r)goto S_5164;} 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(4371);}while(r); S_5166:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4372);if(r)goto S_5166;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4372);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4373);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4374);}while(r); } S_5172:; 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(4376);if(r)goto S_5172;} 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(4377);}while(r); S_5174:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4378);if(r)goto S_5174;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4378);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4379);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4380);}while(r); } S_5180:; 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(4382);if(r)goto S_5180;} 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(4383);}while(r); S_5182:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4384);if(r)goto S_5182;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4384);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4385);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4386);}while(r); } S_5188:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".h",2)))))||new_error){ if(qbevent){evnt(4389);if(r)goto S_5188;} 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(4390);}while(r); S_5190:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4391);if(r)goto S_5190;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4391);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4392);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4393);}while(r); } S_5196:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".hpp",4)))))||new_error){ if(qbevent){evnt(4395);if(r)goto S_5196;} 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(4396);}while(r); S_5198:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4397);if(r)goto S_5198;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4397);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4398);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4399);}while(r); } S_5204:; 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(4401);if(r)goto S_5204;} 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(4402);}while(r); S_5206:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4403);if(r)goto S_5206;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4403);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4404);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4405);}while(r); } S_5212:; 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(4407);if(r)goto S_5212;} 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(4408);}while(r); S_5214:; if ((-(*__LONG_CUSTOMTYPELIBRARY== 0 ))||new_error){ if(qbevent){evnt(4409);if(r)goto S_5214;} do{ *__LONG_SFDECLARE= 0 ; if(!qbevent)break;evnt(4409);}while(r); } do{ *__LONG_SFHEADER= 1 ; if(!qbevent)break;evnt(4410);}while(r); do{ goto LABEL_GOTHEADER; if(!qbevent)break;evnt(4411);}while(r); } } LABEL_GOTHEADER:; if(qbevent){evnt(4415);r=0;} } }else{ S_5223:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4421);if(r)goto S_5223;} S_5224:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4423);if(r)goto S_5224;} S_5225:; 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(4424);if(r)goto S_5225;} 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(4425);}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(4426);}while(r); } } S_5230:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4430);if(r)goto S_5230;} S_5231:; 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(4431);if(r)goto S_5231;} 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(4432);}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(4433);}while(r); } } S_5236:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4438);if(r)goto S_5236;} S_5237:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(__STRING_X,qbs_new_txt_len(".dll",4)))))||new_error){ if(qbevent){evnt(4439);if(r)goto S_5237;} 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(4440);}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(4441);}while(r); } } S_5242:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4445);if(r)goto S_5242;} S_5243:; 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(4446);if(r)goto S_5243;} 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(4447);}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(4448);}while(r); } } } S_5249:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4453);if(r)goto S_5249;} S_5250:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4457);if(r)goto S_5250;} S_5251:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4459);if(r)goto S_5251;} S_5252:; 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(4460);if(r)goto S_5252;} 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(4461);}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(4462);}while(r); S_5255:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(4463);if(r)goto S_5255;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4463);}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(4463);}while(r); } } } S_5261:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4466);if(r)goto S_5261;} S_5262:; 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(4467);if(r)goto S_5262;} 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(4468);}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(4469);}while(r); S_5265:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(4470);if(r)goto S_5265;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4470);}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(4470);}while(r); } } } } S_5272:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4476);if(r)goto S_5272;} S_5273:; 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(4477);if(r)goto S_5273;} 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(4478);}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(4479);}while(r); S_5276:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(4480);if(r)goto S_5276;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4480);}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(4480);}while(r); } } } S_5282:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4483);if(r)goto S_5282;} S_5283:; 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(4484);if(r)goto S_5283;} 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(4485);}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(4486);}while(r); S_5286:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_LIBPATH, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(4487);if(r)goto S_5286;} do{ qbs_set(__STRING_LIBNAME,qbs_add(qbs_new_txt_len("./",2),__STRING_LIBNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4487);}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(4487);}while(r); } } } S_5292:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4491);if(r)goto S_5292;} S_5293:; 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(4492);if(r)goto S_5293;} 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(4493);}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(4494);}while(r); } } S_5298:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4497);if(r)goto S_5298;} S_5299:; 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(4498);if(r)goto S_5299;} 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(4499);}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(4500);}while(r); } } S_5304:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4504);if(r)goto S_5304;} S_5305:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4506);if(r)goto S_5305;} S_5306:; 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(4507);if(r)goto S_5306;} 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(4508);}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(4509);}while(r); } } S_5311:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4512);if(r)goto S_5311;} S_5312:; 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(4513);if(r)goto S_5312;} 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(4514);}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(4515);}while(r); } } } S_5318:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4521);if(r)goto S_5318;} S_5319:; 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(4522);if(r)goto S_5319;} 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(4523);}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(4524);}while(r); } } S_5324:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4527);if(r)goto S_5324;} S_5325:; 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(4528);if(r)goto S_5325;} 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(4529);}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(4530);}while(r); } } S_5330:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4534);if(r)goto S_5330;} S_5331:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4536);if(r)goto S_5331;} S_5332:; 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(4537);if(r)goto S_5332;} 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(4538);}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(4539);}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(4540);}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(4540);}while(r); } } S_5339:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4543);if(r)goto S_5339;} S_5340:; 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(4544);if(r)goto S_5340;} 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(4545);}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(4546);}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(4547);}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(4547);}while(r); } } } S_5348:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4553);if(r)goto S_5348;} S_5349:; 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(4554);if(r)goto S_5349;} 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(4555);}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(4556);}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(4557);}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(4557);}while(r); } } S_5356:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4560);if(r)goto S_5356;} S_5357:; 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(4561);if(r)goto S_5357;} 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(4562);}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(4563);}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(4564);}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(4564);}while(r); } } S_5364:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4568);if(r)goto S_5364;} S_5365:; 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(4569);if(r)goto S_5365;} 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(4570);}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(4571);}while(r); } } S_5370:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4574);if(r)goto S_5370;} S_5371:; 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(4575);if(r)goto S_5371;} 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(4576);}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(4577);}while(r); } } S_5376:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(4581);if(r)goto S_5376;} S_5377:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4583);if(r)goto S_5377;} S_5378:; 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(4584);if(r)goto S_5378;} 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(4585);}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(4586);}while(r); } } S_5383:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4589);if(r)goto S_5383;} S_5384:; 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(4590);if(r)goto S_5384;} 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(4591);}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(4592);}while(r); } } } S_5390:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4598);if(r)goto S_5390;} S_5391:; 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(4599);if(r)goto S_5391;} 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(4600);}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(4601);}while(r); } } S_5396:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LIBNAME->len== 0 )))||new_error){ if(qbevent){evnt(4604);if(r)goto S_5396;} S_5397:; 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(4605);if(r)goto S_5397;} 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(4606);}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(4607);}while(r); } } } } S_5404:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_DYNAMICLIBRARY!= 0 ))&(-(__STRING_LIBNAME->len== 0 ))))||new_error){ if(qbevent){evnt(4615);if(r)goto S_5404;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DYNAMIC LIBRARY not found",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4615);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4615);}while(r); } S_5408:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_LIBNAME->len== 0 ))&(-(__STRING_HEADERNAME->len== 0 ))))||new_error){ if(qbevent){evnt(4616);if(r)goto S_5408;} do{ qbs_set(__STRING_A,qbs_new_txt_len("LIBRARY not found",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4616);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4616);}while(r); } S_5412:; if ((-(*__LONG_DYNAMICLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4620);if(r)goto S_5412;} S_5413:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LIBNAME->len))||new_error){ if(qbevent){evnt(4623);if(r)goto S_5413;} S_5414:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4624);if(r)goto S_5414;} S_5415:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(__STRING_LIBNAME, 2 , 1 ,1),qbs_new_txt_len(":",1)))|(qbs_equal(qbs_left(__STRING_LIBNAME, 1 ),qbs_new_txt_len("\\",1)))))||new_error){ if(qbevent){evnt(4625);if(r)goto S_5415;} 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(4626);}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(4628);}while(r); } } S_5421:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4631);if(r)goto S_5421;} S_5422:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_LIBNAME, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(4632);if(r)goto S_5422;} 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(4633);}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(4635);}while(r); } } } }else{ S_5430:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_HEADERNAME->len== 0 )))||new_error){ if(qbevent){evnt(4644);if(r)goto S_5430;} S_5431:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(4646);if(r)goto S_5431;} do{ *__LONG_F=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4647);}while(r); }else{ do{ *__LONG_F=*__LONG_DATATXTBUF; if(!qbevent)break;evnt(4649);}while(r); } do{ qbs_set(__STRING_X2,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4655);}while(r); S_5437:; fornext_value525= 1 ; fornext_finalvalue525=__STRING_X2->len; fornext_step525= 1 ; if (fornext_step525<0) fornext_step_negative525=1; else fornext_step_negative525=0; if (new_error) goto fornext_error525; goto fornext_entrylabel525; while(1){ fornext_value525=fornext_step525+(*__LONG_X2); fornext_entrylabel525: *__LONG_X2=fornext_value525; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative525){ if (fornext_value525fornext_finalvalue525) break; } fornext_error525:; if(qbevent){evnt(4656);if(r)goto S_5437;} S_5438:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_X2,*__LONG_X2)< 48 )))||new_error){ if(qbevent){evnt(4657);if(r)goto S_5438;} 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(4657);}while(r); } S_5441:; 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(4658);if(r)goto S_5441;} 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(4658);}while(r); } S_5444:; 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(4659);if(r)goto S_5444;} 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(4659);}while(r); } S_5447:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_X2,*__LONG_X2)> 122 )))||new_error){ if(qbevent){evnt(4660);if(r)goto S_5447;} 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(4660);}while(r); } fornext_continue_524:; } fornext_exit_524:; do{ qbs_set(__STRING_DLLNAME,__STRING_X2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4662);}while(r); S_5452:; if ((*__LONG_SFDECLARE)||new_error){ if(qbevent){evnt(4664);if(r)goto S_5452;} S_5453:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4666);if(r)goto S_5453;} do{ SUB_WRITEBUFLINE(&(pass527=*__LONG_REGTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("HINSTANCE DLL_",14),__STRING_X2),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4667);}while(r); do{ SUB_WRITEBUFLINE(&(pass528=*__LONG_F),qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4668);}while(r); do{ SUB_WRITEBUFLINE(&(pass529=*__LONG_F),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4669);}while(r); do{ SUB_WRITEBUFLINE(&(pass530=*__LONG_F),qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len(") error(259);",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4670);}while(r); do{ SUB_WRITEBUFLINE(&(pass531=*__LONG_F),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4671);}while(r); } S_5460:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4674);if(r)goto S_5460;} do{ SUB_WRITEBUFLINE(&(pass532=*__LONG_REGTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("void *DLL_",10),__STRING_X2),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4675);}while(r); do{ SUB_WRITEBUFLINE(&(pass533=*__LONG_F),qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4676);}while(r); do{ SUB_WRITEBUFLINE(&(pass534=*__LONG_F),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4677);}while(r); do{ SUB_WRITEBUFLINE(&(pass535=*__LONG_F),qbs_add(qbs_add(qbs_new_txt_len("if (!DLL_",9),__STRING_X2),qbs_new_txt_len(") error(259);",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4678);}while(r); do{ SUB_WRITEBUFLINE(&(pass536=*__LONG_F),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4679);}while(r); } } } } S_5470:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HEADERNAME->len))||new_error){ if(qbevent){evnt(4689);if(r)goto S_5470;} S_5471:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4690);if(r)goto S_5471;} S_5472:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(__STRING_HEADERNAME, 2 , 1 ,1),qbs_new_txt_len(":",1)))|(qbs_equal(qbs_left(__STRING_HEADERNAME, 1 ),qbs_new_txt_len("\\",1)))))||new_error){ if(qbevent){evnt(4691);if(r)goto S_5472;} do{ SUB_WRITEBUFLINE(&(pass538=*__LONG_REGTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),__STRING_HEADERNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4692);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass539=*__LONG_REGTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4694);}while(r); } } S_5478:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4697);if(r)goto S_5478;} S_5479:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_HEADERNAME, 1 ),qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(4699);if(r)goto S_5479;} do{ SUB_WRITEBUFLINE(&(pass540=*__LONG_REGTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#include ",9),func_chr( 34 )),__STRING_HEADERNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4700);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass541=*__LONG_REGTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4702);}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(4710);}while(r); S_5488:; if ((-(*__LONG_N>*__LONG_X))||new_error){ if(qbevent){evnt(4712);if(r)goto S_5488;} S_5489:; if ((*__LONG_DYNAMICLIBRARY)||new_error){ if(qbevent){evnt(4713);if(r)goto S_5489;} 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(4713);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4713);}while(r); } do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(4714);}while(r); do{ qbs_set(__STRING_X2,FUNC_GETELEMENT(__STRING_A,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4714);}while(r); S_5495:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_X2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(4714);if(r)goto S_5495;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4714);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4714);}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(4715);}while(r); do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(4716);}while(r); S_5501:; if ((-(*__LONG_X>*__LONG_N))||new_error){ if(qbevent){evnt(4716);if(r)goto S_5501;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4716);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4716);}while(r); } do{ goto LABEL_ADDLIBRARY; if(!qbevent)break;evnt(4717);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(4722);}while(r); S_5509:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(4722);if(r)goto S_5509;} 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(4722);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4722);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4723);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(4726);}while(r); } } S_5519:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(4731);if(r)goto S_5519;} do{ *__LONG_DYNAMICLIBRARY= 0 ; if(!qbevent)break;evnt(4732);}while(r); LABEL_DECLARESUBFUNC2:; if(qbevent){evnt(4733);r=0;} do{ *__LONG_SF= 0 ; if(!qbevent)break;evnt(4734);}while(r); S_5522:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FUNCTION",8))))||new_error){ if(qbevent){evnt(4735);if(r)goto S_5522;} do{ *__LONG_SF= 1 ; if(!qbevent)break;evnt(4735);}while(r); } S_5525:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SUB",3))))||new_error){ if(qbevent){evnt(4736);if(r)goto S_5525;} do{ *__LONG_SF= 2 ; if(!qbevent)break;evnt(4736);}while(r); } S_5528:; if ((*__LONG_SF)||new_error){ if(qbevent){evnt(4737);if(r)goto S_5528;} S_5529:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4739);if(r)goto S_5529;} S_5530:; if ((qbs_cleanup(qbs_tmp_base,__STRING_SUBFUNC->len))||new_error){ if(qbevent){evnt(4740);if(r)goto S_5530;} 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(4740);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4740);}while(r); } } S_5535:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(4743);if(r)goto S_5535;} 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(4743);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4743);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,&(pass544= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4744);}while(r); do{ qbs_set(__STRING_SYMBOL,FUNC_REMOVESYMBOL(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4745);}while(r); S_5541:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4746);if(r)goto S_5541;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4746);}while(r); } S_5544:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_SF== 2 ))&(qbs_notequal(__STRING_SYMBOL,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(4747);if(r)goto S_5544;} 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(4747);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4747);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4748);}while(r); S_5549:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4749);if(r)goto S_5549;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4749);}while(r); } S_5552:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(4750);if(r)goto S_5552;} S_5553:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))==*__LONG_SF))||new_error){ if(qbevent){evnt(4751);if(r)goto S_5553;} do{ goto LABEL_CREATESF; if(!qbevent)break;evnt(4751);}while(r); } S_5556:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(4752);if(r)goto S_5556;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(4752);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4752);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(4752);}while(r); } S_5562:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4753);if(r)goto S_5562;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4753);}while(r); } dl_continue_545:; } dl_exit_545:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Unregistered SUB/FUNCTION encountered",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4755);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4755);}while(r); LABEL_CREATESF:; if(qbevent){evnt(4756);r=0;} S_5568:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_E),qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(4757);if(r)goto S_5568;} do{ qbs_set(__STRING_E,qbs_new_txt_len("_GL",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4757);}while(r); } S_5571:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SUB",3))))||new_error){ if(qbevent){evnt(4758);if(r)goto S_5571;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Sub",3)),__STRING1_SP),__STRING_E),__STRING_SYMBOL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4759);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Function",8)),__STRING1_SP),__STRING_E),__STRING_SYMBOL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4761);}while(r); } do{ memcpy((((char*)__UDT_ID2)+(0)+ 0),(((char*)__UDT_ID)+(0)+ 0), 256); memcpy((((char*)__UDT_ID2)+(0)+ 256),(((char*)__UDT_ID)+(0)+ 256), 256); memcpy((((char*)__UDT_ID2)+(0)+ 512),(((char*)__UDT_ID)+(0)+ 512), 4); memcpy((((char*)__UDT_ID2)+(0)+ 516),(((char*)__UDT_ID)+(0)+ 516), 2); memcpy((((char*)__UDT_ID2)+(0)+ 518),(((char*)__UDT_ID)+(0)+ 518), 2); memcpy((((char*)__UDT_ID2)+(0)+ 520),(((char*)__UDT_ID)+(0)+ 520), 8); memcpy((((char*)__UDT_ID2)+(0)+ 528),(((char*)__UDT_ID)+(0)+ 528), 8); memcpy((((char*)__UDT_ID2)+(0)+ 536),(((char*)__UDT_ID)+(0)+ 536), 4); memcpy((((char*)__UDT_ID2)+(0)+ 540),(((char*)__UDT_ID)+(0)+ 540), 4); memcpy((((char*)__UDT_ID2)+(0)+ 544),(((char*)__UDT_ID)+(0)+ 544), 2); memcpy((((char*)__UDT_ID2)+(0)+ 546),(((char*)__UDT_ID)+(0)+ 546), 2); memcpy((((char*)__UDT_ID2)+(0)+ 548),(((char*)__UDT_ID)+(0)+ 548), 2); memcpy((((char*)__UDT_ID2)+(0)+ 550),(((char*)__UDT_ID)+(0)+ 550), 256); memcpy((((char*)__UDT_ID2)+(0)+ 806),(((char*)__UDT_ID)+(0)+ 806), 2); memcpy((((char*)__UDT_ID2)+(0)+ 808),(((char*)__UDT_ID)+(0)+ 808), 1); memcpy((((char*)__UDT_ID2)+(0)+ 809),(((char*)__UDT_ID)+(0)+ 809), 2); memcpy((((char*)__UDT_ID2)+(0)+ 811),(((char*)__UDT_ID)+(0)+ 811), 2); memcpy((((char*)__UDT_ID2)+(0)+ 813),(((char*)__UDT_ID)+(0)+ 813), 400); memcpy((((char*)__UDT_ID2)+(0)+ 1213),(((char*)__UDT_ID)+(0)+ 1213), 400); memcpy((((char*)__UDT_ID2)+(0)+ 1613),(((char*)__UDT_ID)+(0)+ 1613), 256); memcpy((((char*)__UDT_ID2)+(0)+ 1869),(((char*)__UDT_ID)+(0)+ 1869), 256); memcpy((((char*)__UDT_ID2)+(0)+ 2125),(((char*)__UDT_ID)+(0)+ 2125), 256); memcpy((((char*)__UDT_ID2)+(0)+ 2381),(((char*)__UDT_ID)+(0)+ 2381), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2385),(((char*)__UDT_ID)+(0)+ 2385), 256); memcpy((((char*)__UDT_ID2)+(0)+ 2641),(((char*)__UDT_ID)+(0)+ 2641), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2645),(((char*)__UDT_ID)+(0)+ 2645), 2); memcpy((((char*)__UDT_ID2)+(0)+ 2647),(((char*)__UDT_ID)+(0)+ 2647), 100); memcpy((((char*)__UDT_ID2)+(0)+ 2747),(((char*)__UDT_ID)+(0)+ 2747), 100); memcpy((((char*)__UDT_ID2)+(0)+ 2847),(((char*)__UDT_ID)+(0)+ 2847), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2851),(((char*)__UDT_ID)+(0)+ 2851), 2); memcpy((((char*)__UDT_ID2)+(0)+ 2853),(((char*)__UDT_ID)+(0)+ 2853), 2); memcpy((((char*)__UDT_ID2)+(0)+ 2855),(((char*)__UDT_ID)+(0)+ 2855), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2859),(((char*)__UDT_ID)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__UDT_ID2)+(0)+ 2861), *(qbs**)(((char*)__UDT_ID)+(0)+ 2861)); if(!qbevent)break;evnt(4763);}while(r); do{ *__LONG_TARGETID=*__LONG_CURRENTID; if(!qbevent)break;evnt(4764);}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(4767);}while(r); S_5579:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(4768);if(r)goto S_5579;} do{ qbs_set(__STRING_EE,FUNC_GETELEMENT(__STRING_A,&(pass546= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4769);}while(r); S_5581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_EE,qbs_new_txt_len("ALIAS",5))))||new_error){ if(qbevent){evnt(4770);if(r)goto S_5581;} S_5582:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4771);if(r)goto S_5582;} 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(4771);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4771);}while(r); } S_5586:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(4772);if(r)goto S_5586;} 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(4772);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4772);}while(r); } do{ qbs_set(__STRING_EE,FUNC_GETELEMENT(__STRING_CA,&(pass547= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4773);}while(r); S_5591:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_EE, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(4776);if(r)goto S_5591;} do{ qbs_set(__STRING_EE,qbs_right(__STRING_EE,__STRING_EE->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4777);}while(r); do{ *__LONG_X=func_instr(NULL,__STRING_EE,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4778);}while(r); S_5594:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(4778);if(r)goto S_5594;} 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(4778);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4778);}while(r); } do{ qbs_set(__STRING_EE,qbs_left(__STRING_EE,*__LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4779);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(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(4780);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Alias",5))),__STRING1_SP),__STRING_EE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4782);}while(r); } S_5603:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_EE,__STRING_FIX046,0)))||new_error){ if(qbevent){evnt(4786);if(r)goto S_5603;} do{ *__LONG_X=func_instr(NULL,__STRING_EE,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4787);}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(4787);}while(r); dl_continue_549:; } dl_exit_549:; do{ qbs_set(__STRING_ALIASNAME,__STRING_EE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4789);}while(r); S_5608:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(4791);if(r)goto S_5608;} do{ qbs_set(__STRING_A,FUNC_GETELEMENTS(__STRING_A,&(pass552= 1 ),&(pass553= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4791);}while(r); } S_5611:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(4792);if(r)goto S_5611;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_A,&(pass554= 1 ),&(pass555= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass556= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4792);}while(r); } S_5614:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(4793);if(r)goto S_5614;} do{ qbs_set(__STRING_CA,FUNC_GETELEMENTS(__STRING_CA,&(pass557= 1 ),&(pass558= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4793);}while(r); } S_5617:; if ((-(*__LONG_N>= 5 ))||new_error){ if(qbevent){evnt(4794);if(r)goto S_5617;} do{ qbs_set(__STRING_CA,qbs_add(qbs_add(FUNC_GETELEMENTS(__STRING_CA,&(pass559= 1 ),&(pass560= 2 )),__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass561= 5 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4794);}while(r); } do{ *__LONG_N=*__LONG_N- 2 ; if(!qbevent)break;evnt(4795);}while(r); } } S_5623:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4799);if(r)goto S_5623;} do{ goto LABEL_DECLIBJMP1; if(!qbevent)break;evnt(4799);}while(r); } S_5626:; if ((-(*__INTEGER_CLOSEDMAIN== 0 ))||new_error){ if(qbevent){evnt(4802);if(r)goto S_5626;} do{ SUB_CLOSEMAIN(); if(!qbevent)break;evnt(4802);}while(r); } S_5629:; if (((-(*__INTEGER_CONTROLLEVEL!= 0 ))&(-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 6 )))||new_error){ if(qbevent){evnt(4805);if(r)goto S_5629;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Unidentified open control block",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4806);}while(r); S_5631:; sc_562=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(qbevent){evnt(4807);if(r)goto S_5631;} S_5632:; if (((sc_562==( 1 )))||new_error){ if(qbevent){evnt(4808);if(r)goto S_5632;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF without END IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4808);}while(r); sc_ec_17_end:; goto sc_562_end; } S_5634:; if (((sc_562==( 2 )))||new_error){ if(qbevent){evnt(4809);if(r)goto S_5634;} do{ qbs_set(__STRING_A,qbs_new_txt_len("FOR without NEXT",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4809);}while(r); sc_ec_18_end:; goto sc_562_end; } S_5636:; if (((sc_562==( 3 ))||(sc_562==( 4 )))||new_error){ if(qbevent){evnt(4810);if(r)goto S_5636;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO without LOOP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4810);}while(r); sc_ec_19_end:; goto sc_562_end; } S_5638:; if (((sc_562==( 5 )))||new_error){ if(qbevent){evnt(4811);if(r)goto S_5638;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE without WEND",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4811);}while(r); sc_ec_20_end:; goto sc_562_end; } S_5640:; if ((((sc_562>=( 10 ))&&(sc_562<=( 19 ))))||new_error){ if(qbevent){evnt(4812);if(r)goto S_5640;} 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(4812);}while(r); sc_ec_21_end:; goto sc_562_end; } sc_562_end:; do{ *__LONG_LINENUMBER=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(4814);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4815);}while(r); } S_5646:; if ((*__LONG_IDEINDENTSUBS)||new_error){ if(qbevent){evnt(4818);if(r)goto S_5646;} do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(4819);}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]= 32 ; if(!qbevent)break;evnt(4820);}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(4821);}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(4824);}while(r); S_5652:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 1 ))||new_error){ if(qbevent){evnt(4825);if(r)goto S_5652;} do{ qbs_set(__STRING_SUBFUNCORIGINALNAME,qbs_new_txt_len("FUNCTION ",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4825);}while(r); }else{ do{ qbs_set(__STRING_SUBFUNCORIGINALNAME,qbs_new_txt_len("SUB ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4825);}while(r); } do{ qbs_set(__STRING_SUBFUNCORIGINALNAME,qbs_add(__STRING_SUBFUNCORIGINALNAME,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4826);}while(r); do{ *__LONG_SUBFUNCN=*__LONG_SUBFUNCN+ 1 ; if(!qbevent)break;evnt(4827);}while(r); do{ *__BYTE_CLOSEDSUBFUNC= 0 ; if(!qbevent)break;evnt(4828);}while(r); do{ *__LONG_SUBFUNCID=*__LONG_TARGETID; if(!qbevent)break;evnt(4829);}while(r); do{ qbs_set(__STRING_SUBFUNCRET,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4831);}while(r); do{ *__LONG_DATATXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4833);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4834);}while(r); do{ *__LONG_RETTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("ret",3)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4835);}while(r); do{ *__INTEGER_DEFDATAHANDLE=*__LONG_DATATXTBUF; if(!qbevent)break;evnt(4836);}while(r); do{ SUB_WRITEBUFLINE(&(pass563=*__LONG_RETTXTBUF),qbs_new_txt_len("if (next_return_point){",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4837);}while(r); do{ SUB_WRITEBUFLINE(&(pass564=*__LONG_RETTXTBUF),qbs_new_txt_len("next_return_point--;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4838);}while(r); do{ SUB_WRITEBUFLINE(&(pass565=*__LONG_RETTXTBUF),qbs_new_txt_len("switch(return_point[next_return_point]){",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4839);}while(r); do{ SUB_WRITEBUFLINE(&(pass566=*__LONG_RETTXTBUF),qbs_new_txt_len("case 0:",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4840);}while(r); do{ SUB_WRITEBUFLINE(&(pass567=*__LONG_RETTXTBUF),qbs_new_txt_len("error(3);",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4841);}while(r); do{ SUB_WRITEBUFLINE(&(pass568=*__LONG_RETTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4842);}while(r); LABEL_DECLIBJMP1:; if(qbevent){evnt(4844);r=0;} S_5672:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4846);if(r)goto S_5672;} S_5673:; if (((-(*__LONG_SFDECLARE== 0 ))&(-(*__LONG_INDIRECTLIBRARY== 0 )))||new_error){ if(qbevent){evnt(4847);if(r)goto S_5673;} do{ *__LONG_REGTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("regsf_ignore.txt",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4848);}while(r); } S_5676:; if (((-(*__LONG_SFDECLARE== 1 ))&(-(*__LONG_CUSTOMTYPELIBRARY== 0 ))&(-(*__LONG_DYNAMICLIBRARY== 0 ))&(-(*__LONG_INDIRECTLIBRARY== 0 )))||new_error){ if(qbevent){evnt(4850);if(r)goto S_5676;} do{ SUB_WRITEBUFLINE(&(pass569=*__LONG_REGTXTBUF),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(&(pass570=*__LONG_RESOLVESTATICFUNCTIONS+ 1 ))),qbs_new_txt_len(".txt",4)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4851);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(4852);}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("externtype",10)),FUNC_STR2(&(pass571=*__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(4852);}while(r); do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(4852);}while(r); } } S_5683:; if ((-(*__LONG_SF== 1 ))||new_error){ if(qbevent){evnt(4859);if(r)goto S_5683;} do{ *__LONG_RETTYP=*(int32*)(((char*)__UDT_ID)+(2381)); if(!qbevent)break;evnt(4860);}while(r); do{ qbs_set(__STRING_T,FUNC_TYP2CTYP((int32*)(void*)( ((char*)(__UDT_ID)) + (2381) ),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4861);}while(r); S_5686:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4862);if(r)goto S_5686;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4862);}while(r); } S_5689:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(4863);if(r)goto S_5689;} do{ qbs_set(__STRING_T,qbs_new_txt_len("qbs*",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4863);}while(r); } S_5692:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4865);if(r)goto S_5692;} S_5693:; if ((*__LONG_RETTYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(4866);if(r)goto S_5693;} do{ qbs_set(__STRING_T,qbs_new_txt_len("char*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4867);}while(r); } } S_5697:; if (((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_DYNAMICLIBRARY!= 0 )))||new_error){ if(qbevent){evnt(4871);if(r)goto S_5697;} S_5698:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4872);if(r)goto S_5698;} do{ SUB_WRITEBUFRAWDATA(&(pass572=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4873);}while(r); } S_5701:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4875);if(r)goto S_5701;} do{ SUB_WRITEBUFRAWDATA(&(pass573=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4876);}while(r); } S_5704:; }else{ if ((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_CUSTOMTYPELIBRARY!= 0 ))){ if(qbevent){evnt(4878);if(r)goto S_5704;} do{ SUB_WRITEBUFRAWDATA(&(pass574=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4879);}while(r); }else{ do{ SUB_WRITEBUFRAWDATA(&(pass575=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4881);}while(r); } } S_5709:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4883);if(r)goto S_5709;} do{ goto LABEL_DECLIBJMP2; if(!qbevent)break;evnt(4883);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass576=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4884);}while(r); S_5713:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SYMBOL,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4888);if(r)goto S_5713;} do{ *__LONG_A=qbs_asc(qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4889);}while(r); S_5715:; if ((-(*__LONG_A== 95 ))||new_error){ if(qbevent){evnt(4889);if(r)goto S_5715;} do{ *__LONG_A= 91 ; if(!qbevent)break;evnt(4889);}while(r); } do{ *__LONG_A=*__LONG_A- 64 ; if(!qbevent)break;evnt(4890);}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(4891);}while(r); } do{ *__LONG_REGINTERNALVARIABLE= 1 ; if(!qbevent)break;evnt(4893);}while(r); do{ *__LONG_IGNORE=FUNC_DIM2(__STRING_E,__STRING_SYMBOL,&(pass577= 0 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4894);}while(r); S_5723:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4895);if(r)goto S_5723;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4895);}while(r); } do{ *__LONG_REGINTERNALVARIABLE= 0 ; if(!qbevent)break;evnt(4896);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4898);}while(r); S_5728:; if (((*__LONG_RETTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(4900);if(r)goto S_5728;} do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass578= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4901);}while(r); S_5730:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4902);if(r)goto S_5730;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4902);}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(4903);}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(4904);}while(r); }else{ do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass579= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4906);}while(r); S_5737:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4907);if(r)goto S_5737;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4907);}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(4908);}while(r); } }else{ S_5743:; if (((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_DYNAMICLIBRARY!= 0 )))||new_error){ if(qbevent){evnt(4912);if(r)goto S_5743;} S_5744:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(4913);if(r)goto S_5744;} do{ SUB_WRITEBUFRAWDATA(&(pass580=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4914);}while(r); } S_5747:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(4916);if(r)goto S_5747;} do{ SUB_WRITEBUFRAWDATA(&(pass581=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4917);}while(r); } S_5750:; }else{ if ((-(*__LONG_DECLARINGLIBRARY!= 0 ))&(-(*__LONG_CUSTOMTYPELIBRARY!= 0 ))){ if(qbevent){evnt(4919);if(r)goto S_5750;} do{ SUB_WRITEBUFRAWDATA(&(pass582=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4920);}while(r); }else{ do{ SUB_WRITEBUFRAWDATA(&(pass583=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4922);}while(r); } } S_5755:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4924);if(r)goto S_5755;} do{ goto LABEL_DECLIBJMP2; if(!qbevent)break;evnt(4924);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass584=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4925);}while(r); } LABEL_DECLIBJMP2:; if(qbevent){evnt(4927);r=0;} do{ *__LONG_ADDSTATIC2LAYOUT= 0 ; if(!qbevent)break;evnt(4929);}while(r); do{ *__LONG_STATICSF= 0 ; if(!qbevent)break;evnt(4930);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4931);}while(r); S_5763:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(4932);if(r)goto S_5763;} S_5764:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(4933);if(r)goto S_5764;} 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(4933);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4933);}while(r); } do{ *__LONG_ADDSTATIC2LAYOUT= 1 ; if(!qbevent)break;evnt(4934);}while(r); do{ *__LONG_STATICSF= 2 ; if(!qbevent)break;evnt(4935);}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(4936);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(4936);}while(r); } do{ *__LONG_PARAMS= 0 ; if(!qbevent)break;evnt(4940);}while(r); do{ *__LONG_ALLOWLOCALNAME= 1 ; if(!qbevent)break;evnt(4941);}while(r); S_5775:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(4942);if(r)goto S_5775;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass586= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4943);}while(r); S_5777:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4944);if(r)goto S_5777;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4944);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4944);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4945);}while(r); S_5782:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(4946);if(r)goto S_5782;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4946);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4946);}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(4947);}while(r); S_5787:; if ((-(*__LONG_N== 4 ))||new_error){ if(qbevent){evnt(4948);if(r)goto S_5787;} do{ goto LABEL_NOSFPARAMS2; if(!qbevent)break;evnt(4948);}while(r); } S_5790:; if ((-(*__LONG_N< 4 ))||new_error){ if(qbevent){evnt(4949);if(r)goto S_5790;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4949);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4949);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(4950);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4951);}while(r); S_5796:; fornext_value588= 4 ; fornext_finalvalue588=*__LONG_N- 1 ; fornext_step588= 1 ; if (fornext_step588<0) fornext_step_negative588=1; else fornext_step_negative588=0; if (new_error) goto fornext_error588; goto fornext_entrylabel588; while(1){ fornext_value588=fornext_step588+(*__LONG_I); fornext_entrylabel588: *__LONG_I=fornext_value588; if (fornext_step_negative588){ if (fornext_value588fornext_finalvalue588) break; } fornext_error588:; if(qbevent){evnt(4952);if(r)goto S_5796;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4953);}while(r); S_5798:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4954);if(r)goto S_5798;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(4954);}while(r); } S_5801:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(4955);if(r)goto S_5801;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(4955);}while(r); } S_5804:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(4956);if(r)goto S_5804;} S_5805:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(4957);if(r)goto S_5805;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ... )",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4957);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4957);}while(r); } LABEL_GETLASTPARAM2:; if(qbevent){evnt(4958);r=0;} S_5809:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4959);if(r)goto S_5809;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4959);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4959);}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(4960);}while(r); do{ *__LONG_PARAMS=*__LONG_PARAMS+ 1 ; if(!qbevent)break;evnt(4962);}while(r); do{ *__LONG_GLINKID=*__LONG_TARGETID; if(!qbevent)break;evnt(4963);}while(r); do{ *__INTEGER_GLINKARG=*__LONG_PARAMS; if(!qbevent)break;evnt(4964);}while(r); S_5817:; if ((-(*__LONG_PARAMS> 1 ))||new_error){ if(qbevent){evnt(4968);if(r)goto S_5817;} do{ SUB_WRITEBUFRAWDATA(&(pass590=*__LONG_REGTXTBUF),qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4969);}while(r); S_5819:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4971);if(r)goto S_5819;} do{ SUB_WRITEBUFRAWDATA(&(pass591=*__LONG_MAINTXTBUF),qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4972);}while(r); } } do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4976);}while(r); do{ *__LONG_ARRAY= 0 ; if(!qbevent)break;evnt(4977);}while(r); do{ qbs_set(__STRING_T2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4978);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,&(pass592= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4979);}while(r); do{ *__LONG_BYVALUE= 0 ; if(!qbevent)break;evnt(4981);}while(r); S_5828:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_E),qbs_new_txt_len("BYVAL",5))))||new_error){ if(qbevent){evnt(4982);if(r)goto S_5828;} S_5829:; if ((-(*__LONG_DECLARINGLIBRARY== 0 ))||new_error){ if(qbevent){evnt(4983);if(r)goto S_5829;} do{ qbs_set(__STRING_A,qbs_new_txt_len("BYVAL can only be used with DECLARE LIBRARY",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4983);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4983);}while(r); } do{ *__LONG_BYVALUE= 1 ; if(!qbevent)break;evnt(4984);}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(4984);}while(r); S_5835:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_L, 1 ),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4985);if(r)goto S_5835;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),FUNC_SCASE(qbs_new_txt_len("ByVal",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4985);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Byval",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4985);}while(r); } do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4986);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,&(pass594= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4986);}while(r); } S_5843:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_L, 1 ),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(4989);if(r)goto S_5843;} 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(4989);}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(4989);}while(r); } do{ qbs_set(__STRING_N2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4991);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(4992);}while(r); do{ qbs_set(__STRING_SYMBOL2,FUNC_REMOVESYMBOL(__STRING_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4995);}while(r); S_5851:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_N2)== 0 )))||new_error){ if(qbevent){evnt(4996);if(r)goto S_5851;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid name",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(4996);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4996);}while(r); } S_5855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(4998);if(r)goto S_5855;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(4998);}while(r); } S_5858:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SYMBOL2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(4999);if(r)goto S_5858;} do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(4999);}while(r); } do{ *__LONG_M= 0 ; if(!qbevent)break;evnt(5000);}while(r); S_5862:; fornext_value596= 2 ; fornext_finalvalue596=*__LONG_N2; 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_I2); fornext_entrylabel596: *__LONG_I2=fornext_value596; if (fornext_step_negative596){ if (fornext_value596fornext_finalvalue596) break; } fornext_error596:; if(qbevent){evnt(5001);if(r)goto S_5862;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A2,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5002);}while(r); S_5864:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5003);if(r)goto S_5864;} S_5865:; if ((-(*__LONG_M!= 0 ))||new_error){ if(qbevent){evnt(5004);if(r)goto S_5865;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - too many opening brackets",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5004);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5004);}while(r); } do{ *__LONG_M= 1 ; if(!qbevent)break;evnt(5005);}while(r); do{ *__LONG_ARRAY= 1 ; if(!qbevent)break;evnt(5006);}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(5007);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(5008);}while(r); } S_5874:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5010);if(r)goto S_5874;} S_5875:; if ((-(*__LONG_M!= 1 ))||new_error){ if(qbevent){evnt(5011);if(r)goto S_5875;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - closing bracket without opening bracket",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5011);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5011);}while(r); } do{ *__LONG_M= 2 ; if(!qbevent)break;evnt(5012);}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(5013);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(5014);}while(r); } S_5883:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_E),qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(5016);if(r)goto S_5883;} S_5884:; if (((-(*__LONG_M!= 0 ))&(-(*__LONG_M!= 2 )))||new_error){ if(qbevent){evnt(5017);if(r)goto S_5884;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check your brackets",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5017);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5017);}while(r); } do{ *__LONG_M= 3 ; if(!qbevent)break;evnt(5018);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("As",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5019);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(5020);}while(r); } S_5892:; if ((-(*__LONG_M== 1 ))||new_error){ if(qbevent){evnt(5022);if(r)goto S_5892;} 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(5022);}while(r); do{ goto LABEL_GOTAA2; if(!qbevent)break;evnt(5022);}while(r); } S_5896:; if ((-(*__LONG_M!= 3 ))||new_error){ if(qbevent){evnt(5023);if(r)goto S_5896;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check your brackets",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5023);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5023);}while(r); } S_5900:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5024);if(r)goto S_5900;} do{ qbs_set(__STRING_T2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5024);}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(5024);}while(r); } LABEL_GOTAA2:; if(qbevent){evnt(5025);r=0;} fornext_continue_595:; } fornext_exit_595:; S_5906:; if ((-(*__LONG_M== 1 ))||new_error){ if(qbevent){evnt(5027);if(r)goto S_5906;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check your brackets",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5027);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5027);}while(r); } S_5910:; 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(5028);if(r)goto S_5910;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - check parameter types",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5028);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5028);}while(r); } S_5914:; if ((qbs_cleanup(qbs_tmp_base,__STRING_T2->len))||new_error){ if(qbevent){evnt(5031);if(r)goto S_5914;} do{ qbs_set(__STRING_T2,qbs_ucase(__STRING_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5032);}while(r); do{ qbs_set(__STRING_T3,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5033);}while(r); do{ *__LONG_TYP=FUNC_TYPNAME2TYP(__STRING_T3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5034);}while(r); S_5918:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5035);if(r)goto S_5918;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5035);}while(r); } S_5921:; if ((-(*__LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(5036);if(r)goto S_5921;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Undefined type",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5036);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5036);}while(r); } S_5925:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(5037);if(r)goto S_5925;} S_5926:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(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_new_txt_len("_MEM",4)))&(qbs_equal(qbs_ucase(__STRING_T3),qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(5038);if(r)goto S_5926;} do{ qbs_set(__STRING_T3,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5039);}while(r); }else{ 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(5041);}while(r); } 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(5043);}while(r); }else{ S_5933:; fornext_value599= 1 ; fornext_finalvalue599=__STRING_T3->len; fornext_step599= 1 ; if (fornext_step599<0) fornext_step_negative599=1; else fornext_step_negative599=0; if (new_error) goto fornext_error599; goto fornext_entrylabel599; while(1){ fornext_value599=fornext_step599+(*__LONG_T3I); fornext_entrylabel599: *__LONG_T3I=fornext_value599; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative599){ if (fornext_value599fornext_finalvalue599) break; } fornext_error599:; if(qbevent){evnt(5045);if(r)goto S_5933;} S_5934:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_T3,*__LONG_T3I)== 32 )))||new_error){ if(qbevent){evnt(5046);if(r)goto S_5934;} 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(5046);}while(r); } fornext_continue_598:; } fornext_exit_598:; do{ qbs_set(__STRING_T3,FUNC_SCASE2(__STRING_T3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5048);}while(r); 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(5049);}while(r); } } S_5942:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5053);if(r)goto S_5942;} do{ qbs_set(__STRING_T2,__STRING_SYMBOL2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5053);}while(r); } S_5945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5054);if(r)goto S_5945;} S_5946:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N2, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(5055);if(r)goto S_5946;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(5055);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N2))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5055);}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(5056);}while(r); do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(5057);}while(r); } S_5954:; if ((-(*__LONG_ARRAY== 1 ))||new_error){ if(qbevent){evnt(5063);if(r)goto S_5954;} S_5955:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(5064);if(r)goto S_5955;} 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(5064);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5064);}while(r); } do{ *__INTEGER_DIMSFARRAY= 1 ; if(!qbevent)break;evnt(5065);}while(r); do{ *__LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2747)),100,1),*__LONG_PARAMS, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5067);}while(r); S_5961:; if ((*__LONG_NELEREQ)||new_error){ if(qbevent){evnt(5068);if(r)goto S_5961;} do{ *__LONG_NELE=*__LONG_NELEREQ; if(!qbevent)break;evnt(5069);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2647)),100,1),*__LONG_PARAMS, 1 ,func_chr(*__LONG_NELE),1); if(!qbevent)break;evnt(5070);}while(r); do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 0),(((char*)__UDT_ID2)+(0)+ 0), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 256),(((char*)__UDT_ID2)+(0)+ 256), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 512),(((char*)__UDT_ID2)+(0)+ 512), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 516),(((char*)__UDT_ID2)+(0)+ 516), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 518),(((char*)__UDT_ID2)+(0)+ 518), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 520),(((char*)__UDT_ID2)+(0)+ 520), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 528),(((char*)__UDT_ID2)+(0)+ 528), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 536),(((char*)__UDT_ID2)+(0)+ 536), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 540),(((char*)__UDT_ID2)+(0)+ 540), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 544),(((char*)__UDT_ID2)+(0)+ 544), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 546),(((char*)__UDT_ID2)+(0)+ 546), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 548),(((char*)__UDT_ID2)+(0)+ 548), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 550),(((char*)__UDT_ID2)+(0)+ 550), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 806),(((char*)__UDT_ID2)+(0)+ 806), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 808),(((char*)__UDT_ID2)+(0)+ 808), 1); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 809),(((char*)__UDT_ID2)+(0)+ 809), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 811),(((char*)__UDT_ID2)+(0)+ 811), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 813),(((char*)__UDT_ID2)+(0)+ 813), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1213),(((char*)__UDT_ID2)+(0)+ 1213), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1613),(((char*)__UDT_ID2)+(0)+ 1613), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1869),(((char*)__UDT_ID2)+(0)+ 1869), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2125),(((char*)__UDT_ID2)+(0)+ 2125), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2381),(((char*)__UDT_ID2)+(0)+ 2381), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2385),(((char*)__UDT_ID2)+(0)+ 2385), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2641),(((char*)__UDT_ID2)+(0)+ 2641), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2645),(((char*)__UDT_ID2)+(0)+ 2645), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2647),(((char*)__UDT_ID2)+(0)+ 2647), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2747),(((char*)__UDT_ID2)+(0)+ 2747), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2847),(((char*)__UDT_ID2)+(0)+ 2847), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2851),(((char*)__UDT_ID2)+(0)+ 2851), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2853),(((char*)__UDT_ID2)+(0)+ 2853), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2855),(((char*)__UDT_ID2)+(0)+ 2855), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2859),(((char*)__UDT_ID2)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2861), *(qbs**)(((char*)__UDT_ID2)+(0)+ 2861)); if(!qbevent)break;evnt(5072);}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(5074);}while(r); S_5966:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5075);if(r)goto S_5966;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5075);}while(r); } }else{ do{ *__LONG_NELE= 1 ; if(!qbevent)break;evnt(5077);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2647)),100,1),*__LONG_PARAMS, 1 ,func_chr(*__LONG_NELE),1); if(!qbevent)break;evnt(5078);}while(r); do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 0),(((char*)__UDT_ID2)+(0)+ 0), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 256),(((char*)__UDT_ID2)+(0)+ 256), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 512),(((char*)__UDT_ID2)+(0)+ 512), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 516),(((char*)__UDT_ID2)+(0)+ 516), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 518),(((char*)__UDT_ID2)+(0)+ 518), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 520),(((char*)__UDT_ID2)+(0)+ 520), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 528),(((char*)__UDT_ID2)+(0)+ 528), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 536),(((char*)__UDT_ID2)+(0)+ 536), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 540),(((char*)__UDT_ID2)+(0)+ 540), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 544),(((char*)__UDT_ID2)+(0)+ 544), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 546),(((char*)__UDT_ID2)+(0)+ 546), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 548),(((char*)__UDT_ID2)+(0)+ 548), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 550),(((char*)__UDT_ID2)+(0)+ 550), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 806),(((char*)__UDT_ID2)+(0)+ 806), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 808),(((char*)__UDT_ID2)+(0)+ 808), 1); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 809),(((char*)__UDT_ID2)+(0)+ 809), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 811),(((char*)__UDT_ID2)+(0)+ 811), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 813),(((char*)__UDT_ID2)+(0)+ 813), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1213),(((char*)__UDT_ID2)+(0)+ 1213), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1613),(((char*)__UDT_ID2)+(0)+ 1613), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1869),(((char*)__UDT_ID2)+(0)+ 1869), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2125),(((char*)__UDT_ID2)+(0)+ 2125), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2381),(((char*)__UDT_ID2)+(0)+ 2381), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2385),(((char*)__UDT_ID2)+(0)+ 2385), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2641),(((char*)__UDT_ID2)+(0)+ 2641), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2645),(((char*)__UDT_ID2)+(0)+ 2645), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2647),(((char*)__UDT_ID2)+(0)+ 2647), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2747),(((char*)__UDT_ID2)+(0)+ 2747), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2847),(((char*)__UDT_ID2)+(0)+ 2847), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2851),(((char*)__UDT_ID2)+(0)+ 2851), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2853),(((char*)__UDT_ID2)+(0)+ 2853), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2855),(((char*)__UDT_ID2)+(0)+ 2855), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2859),(((char*)__UDT_ID2)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2861), *(qbs**)(((char*)__UDT_ID2)+(0)+ 2861)); if(!qbevent)break;evnt(5080);}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(5082);}while(r); S_5974:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5083);if(r)goto S_5974;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5083);}while(r); } } do{ *__INTEGER_DIMSFARRAY= 0 ; if(!qbevent)break;evnt(5086);}while(r); do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass601= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5087);}while(r); S_5980:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5088);if(r)goto S_5980;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5088);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass602=*__LONG_REGTXTBUF),qbs_add(qbs_new_txt_len("ptrszint*",9),__STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5089);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass603=*__LONG_MAINTXTBUF),qbs_add(qbs_new_txt_len("ptrszint*",9),__STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5090);}while(r); }else{ S_5986:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(5093);if(r)goto S_5986;} S_5987:; fornext_value605= 1 ; fornext_finalvalue605=*__LONG_LASTTYPE; 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_XX); fornext_entrylabel605: *__LONG_XX=fornext_value605; if (fornext_step_negative605){ if (fornext_value605fornext_finalvalue605) break; } fornext_error605:; if(qbevent){evnt(5095);if(r)goto S_5987;} S_5988:; 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(5096);if(r)goto S_5988;} do{ SUB_WRITEBUFLINE(&(pass606=*__LONG_REGTXTBUF),qbs_new_txt_len("void*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5097);}while(r); do{ goto LABEL_DECUDT; if(!qbevent)break;evnt(5098);}while(r); S_5991:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(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)),qbs_new_txt_len("_MEM",4)))&(qbs_equal(__STRING_T2,qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 )))){ if(qbevent){evnt(5099);if(r)goto S_5991;} do{ SUB_WRITEBUFLINE(&(pass607=*__LONG_REGTXTBUF),qbs_new_txt_len("void*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5100);}while(r); do{ goto LABEL_DECUDT; if(!qbevent)break;evnt(5101);}while(r); } } fornext_continue_604:; } fornext_exit_604:; do{ qbs_set(__STRING_T,FUNC_TYP2CTYP(&(pass608= 0 ),__STRING_T2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5104);}while(r); S_5997:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5106);if(r)goto S_5997;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5106);}while(r); } S_6000:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(5107);if(r)goto S_6000;} do{ qbs_set(__STRING_T,qbs_new_txt_len("char*",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5108);}while(r); S_6002:; if ((-(*__LONG_BYVALUE== 1 ))||new_error){ if(qbevent){evnt(5109);if(r)goto S_6002;} 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(5109);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5109);}while(r); } do{ *__LONG_BYVALUE= 1 ; if(!qbevent)break;evnt(5110);}while(r); } S_6008:; if ((*__LONG_BYVALUE)||new_error){ if(qbevent){evnt(5112);if(r)goto S_6008;} do{ SUB_WRITEBUFRAWDATA(&(pass609=*__LONG_REGTXTBUF),__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5112);}while(r); }else{ do{ SUB_WRITEBUFRAWDATA(&(pass610=*__LONG_REGTXTBUF),qbs_add(__STRING_T,qbs_new_txt_len("*",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5112);}while(r); } LABEL_DECUDT:; if(qbevent){evnt(5113);r=0;} do{ goto LABEL_DECLIBJMP3; if(!qbevent)break;evnt(5114);}while(r); } do{ *__INTEGER_DIMSFARRAY= 1 ; if(!qbevent)break;evnt(5117);}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(5118);}while(r); S_6017:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5119);if(r)goto S_6017;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5119);}while(r); } do{ *__INTEGER_DIMSFARRAY= 0 ; if(!qbevent)break;evnt(5122);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5123);}while(r); do{ *__LONG_TYP=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(5124);}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(5126);}while(r); S_6024:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5127);if(r)goto S_6024;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5127);}while(r); } S_6027:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5131);if(r)goto S_6027;} 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(5131);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5131);}while(r); } do{ qbs_set(__STRING_R,FUNC_REFER(FUNC_STR2(__LONG_CURRENTID),(int32*)(void*)( ((char*)(__UDT_ID)) + (536) ),&(pass611= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5134);}while(r); S_6032:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5135);if(r)goto S_6032;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5135);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass612=*__LONG_REGTXTBUF),qbs_add(qbs_add(__STRING_T,qbs_new_txt_len("*",1)),__STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5136);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass613=*__LONG_MAINTXTBUF),qbs_add(qbs_add(__STRING_T,qbs_new_txt_len("*",1)),__STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5137);}while(r); S_6037:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("qbs",3))))||new_error){ if(qbevent){evnt(5138);if(r)goto S_6037;} do{ qbs_set(__STRING_U,FUNC_STR2(&(pass614=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5139);}while(r); do{ SUB_WRITEBUFLINE(&(pass615=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs*oldstr",10),__STRING_U),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5140);}while(r); do{ SUB_WRITEBUFLINE(&(pass616=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5141);}while(r); do{ SUB_WRITEBUFLINE(&(pass617=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5142);}while(r); do{ SUB_WRITEBUFLINE(&(pass618=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (oldstr",10),__STRING_U),qbs_new_txt_len("->cmem_descriptor){",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5144);}while(r); do{ SUB_WRITEBUFLINE(&(pass619=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5145);}while(r); do{ SUB_WRITEBUFLINE(&(pass620=*__LONG_DATATXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5146);}while(r); do{ SUB_WRITEBUFLINE(&(pass621=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5147);}while(r); do{ SUB_WRITEBUFLINE(&(pass622=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5148);}while(r); do{ SUB_WRITEBUFLINE(&(pass623=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5150);}while(r); do{ SUB_WRITEBUFLINE(&(pass624=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5151);}while(r); do{ SUB_WRITEBUFLINE(&(pass625=*__LONG_FREETXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(oldstr",9),__STRING_U),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5153);}while(r); do{ SUB_WRITEBUFLINE(&(pass626=*__LONG_FREETXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5154);}while(r); do{ SUB_WRITEBUFLINE(&(pass627=*__LONG_FREETXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),__STRING_R),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5155);}while(r); do{ SUB_WRITEBUFLINE(&(pass628=*__LONG_FREETXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5156);}while(r); } } LABEL_DECLIBJMP3:; if(qbevent){evnt(5159);r=0;} S_6055:; if ((-(*__LONG_I!=(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(5160);if(r)goto S_6055;} 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(5160);}while(r); } do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5162);}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(5164);}while(r); S_6061:; if ((-(*__LONG_I==(*__LONG_N- 1 )))||new_error){ if(qbevent){evnt(5165);if(r)goto S_6061;} do{ goto LABEL_GETLASTPARAM2; if(!qbevent)break;evnt(5165);}while(r); } } fornext_continue_587:; } fornext_exit_587:; LABEL_NOSFPARAMS2:; if(qbevent){evnt(5168);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(5169);}while(r); } do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(5171);}while(r); S_6069:; if ((*__LONG_ADDSTATIC2LAYOUT)||new_error){ if(qbevent){evnt(5173);if(r)goto S_6069;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Static",6)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5173);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5174);}while(r); S_6073:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5174);if(r)goto S_6073;} 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(5174);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5174);}while(r); } do{ SUB_WRITEBUFLINE(&(pass630=*__LONG_REGTXTBUF),qbs_new_txt_len(");",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5176);}while(r); S_6079:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(5178);if(r)goto S_6079;} do{ goto LABEL_DECLIBJMP4; if(!qbevent)break;evnt(5178);}while(r); } do{ SUB_WRITEBUFLINE(&(pass631=*__LONG_MAINTXTBUF),qbs_new_txt_len("){",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5180);}while(r); do{ SUB_WRITEBUFLINE(&(pass632=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs *tqbs;",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5181);}while(r); do{ SUB_WRITEBUFLINE(&(pass633=*__LONG_MAINTXTBUF),qbs_new_txt_len("ptrszint tmp_long;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5182);}while(r); do{ SUB_WRITEBUFLINE(&(pass634=*__LONG_MAINTXTBUF),qbs_new_txt_len("int32 tmp_fileno;",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5183);}while(r); do{ SUB_WRITEBUFLINE(&(pass635=*__LONG_MAINTXTBUF),qbs_new_txt_len("uint32 qbs_tmp_base=qbs_tmp_list_nexti;",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5184);}while(r); do{ SUB_WRITEBUFLINE(&(pass636=*__LONG_MAINTXTBUF),qbs_new_txt_len("uint8 *tmp_mem_static_pointer=mem_static_pointer;",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5185);}while(r); do{ SUB_WRITEBUFLINE(&(pass637=*__LONG_MAINTXTBUF),qbs_new_txt_len("uint32 tmp_cmem_sp=cmem_sp;",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5186);}while(r); do{ SUB_WRITEBUFLINE(&(pass638=*__LONG_MAINTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5187);}while(r); do{ SUB_WRITEBUFLINE(&(pass639=*__LONG_MAINTXTBUF),qbs_new_txt_len("mem_lock *sf_mem_lock;",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5190);}while(r); do{ SUB_WRITEBUFLINE(&(pass640=*__LONG_MAINTXTBUF),qbs_new_txt_len("new_mem_lock();",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5191);}while(r); do{ SUB_WRITEBUFLINE(&(pass641=*__LONG_MAINTXTBUF),qbs_new_txt_len("sf_mem_lock=mem_lock_tmp;",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5192);}while(r); do{ SUB_WRITEBUFLINE(&(pass642=*__LONG_MAINTXTBUF),qbs_new_txt_len("sf_mem_lock->type=3;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5193);}while(r); S_6094:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(5195);if(r)goto S_6094;} do{ SUB_WRITEBUFLINE(&(pass643=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_SUBLEVEL=*__LONG_VWATCH_SUBLEVEL+ 1 ;",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5196);}while(r); S_6096:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SUBFUNC,qbs_new_txt_len("SUB_VWATCH",10))))||new_error){ if(qbevent){evnt(5197);if(r)goto S_6096;} do{ qbs_set(__STRING_INCLINENUMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5198);}while(r); S_6098:; if ((((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])||new_error){ if(qbevent){evnt(5199);if(r)goto S_6098;} do{ qbs_set(__STRING_THISINCNAME,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(5200);}while(r); do{ qbs_set(__STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),__STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5201);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_THISINCNAME),qbs_new_txt_len(",",1)),qbs_str((int32)(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]))),qbs_new_txt_len(") ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5202);}while(r); } do{ SUB_WRITEBUFLINE(&(pass645=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(__STRING_VWATCH_SUBNAME,qbs_new_txt_len(",48),func_chr( 34 )),__STRING_INCLINENUMP),__STRING_SUBFUNCORIGINALNAME),func_chr( 34 )),qbs_new_txt_len(",",1)),FUNC_STR2(&(pass646=((int32)(qbs_add(__STRING_INCLINENUMP,__STRING_SUBFUNCORIGINALNAME))->len)))),qbs_new_txt_len("));",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5205);}while(r); do{ SUB_WRITEBUFLINE(&(pass647=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_cleanup(qbs_tmp_base,0);",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5206);}while(r); do{ SUB_WRITEBUFLINE(&(pass648=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(__STRING_VWATCH_INTERNALSUBNAME,qbs_new_txt_len(",56),func_chr( 34 )),__STRING_SUBFUNC),func_chr( 34 )),qbs_new_txt_len(",",1)),FUNC_STR2(&(pass650=__STRING_SUBFUNC->len))),qbs_new_txt_len("));",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5207);}while(r); do{ SUB_WRITEBUFLINE(&(pass651=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_cleanup(qbs_tmp_base,0);",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5208);}while(r); do{ SUB_WRITEBUFLINE(&(pass652=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER=-2; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",101)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5209);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass653=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (new_error) goto exit_subfunc;",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5213);}while(r); do{ *__LONG_DIMSTATIC=*__LONG_STATICSF; if(!qbevent)break;evnt(5218);}while(r); LABEL_DECLIBJMP4:; if(qbevent){evnt(5220);r=0;} S_6112:; if ((*__LONG_DECLARINGLIBRARY)||new_error){ if(qbevent){evnt(5222);if(r)goto S_6112;} S_6113:; if ((*__LONG_CUSTOMTYPELIBRARY)||new_error){ if(qbevent){evnt(5224);if(r)goto S_6113;} 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(5226);}while(r); do{ SUB_WRITEBUFLINE(&(pass654=*__LONG_REGTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5228);}while(r); S_6116:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(5230);if(r)goto S_6116;} do{ *__LONG_F=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5231);}while(r); }else{ do{ *__LONG_F=*__LONG_DATATXTBUF; if(!qbevent)break;evnt(5233);}while(r); } do{ SUB_WRITEBUFLINE(&(pass655=*__LONG_F),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5236);}while(r); S_6122:; if (((-(*__LONG_SFHEADER== 0 ))&(-(*__LONG_SFDECLARE!= 0 )))||new_error){ if(qbevent){evnt(5239);if(r)goto S_6122;} do{ *__LONG_RESOLVESTATICFUNCTIONS=*__LONG_RESOLVESTATICFUNCTIONS+ 1 ; if(!qbevent)break;evnt(5240);}while(r); S_6124:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_RESOLVESTATICFUNCTIONS>func_ubound(__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME,1,1))))||new_error){ if(qbevent){evnt(5242);if(r)goto S_6124;} 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_long2=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; if (tmp_long2id=(++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(5282);if(r)goto S_6156;} 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_long2=__ARRAY_STRING_RESOLVESTATICFUNCTION_NAME[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_RESOLVESTATICFUNCTION_FILE[5]; if (tmp_long2id=(++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(5310);if(r)goto S_6182;} 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(5310);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5310);}while(r); } S_6186:; if (((-(*__INTEGER_CONTROLLEVEL!= 0 ))&(-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 6 ))&(-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 32 )))||new_error){ if(qbevent){evnt(5313);if(r)goto S_6186;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Unidentified open control block",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5314);}while(r); S_6188:; sc_664=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(qbevent){evnt(5315);if(r)goto S_6188;} S_6189:; if (((sc_664==( 1 )))||new_error){ if(qbevent){evnt(5316);if(r)goto S_6189;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF without END IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5316);}while(r); sc_ec_22_end:; goto sc_664_end; } S_6191:; if (((sc_664==( 2 )))||new_error){ if(qbevent){evnt(5317);if(r)goto S_6191;} do{ qbs_set(__STRING_A,qbs_new_txt_len("FOR without NEXT",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5317);}while(r); sc_ec_23_end:; goto sc_664_end; } S_6193:; if (((sc_664==( 3 ))||(sc_664==( 4 )))||new_error){ if(qbevent){evnt(5318);if(r)goto S_6193;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO without LOOP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5318);}while(r); sc_ec_24_end:; goto sc_664_end; } S_6195:; if (((sc_664==( 5 )))||new_error){ if(qbevent){evnt(5319);if(r)goto S_6195;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE without WEND",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5319);}while(r); sc_ec_25_end:; goto sc_664_end; } S_6197:; if ((((sc_664>=( 10 ))&&(sc_664<=( 19 ))))||new_error){ if(qbevent){evnt(5320);if(r)goto S_6197;} 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(5320);}while(r); sc_ec_26_end:; goto sc_664_end; } sc_664_end:; do{ *__LONG_LINENUMBER=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(5322);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5323);}while(r); } S_6203:; if (((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 32 ))&*__LONG_IDEINDENTSUBS)||new_error){ if(qbevent){evnt(5326);if(r)goto S_6203;} 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]= 0 ; if(!qbevent)break;evnt(5327);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5328);}while(r); } S_6207:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_SUBFUNC, 4 ),qbs_new_txt_len("SUB_",4))))||new_error){ if(qbevent){evnt(5331);if(r)goto S_6207;} do{ qbs_set(__STRING_SECONDELEMENT,FUNC_SCASE(qbs_new_txt_len("Sub",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5331);}while(r); }else{ do{ qbs_set(__STRING_SECONDELEMENT,FUNC_SCASE(qbs_new_txt_len("Function",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5331);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("End",3)),__STRING1_SP),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5332);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5333);}while(r); S_6214:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5333);if(r)goto S_6214;} 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(5333);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5333);}while(r); } S_6219:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(5335);if(r)goto S_6219;} do{ SUB_VWATCHVARIABLE(qbs_new_txt_len("",0),&(pass666= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5336);}while(r); } do{ qbs_set(__STRING_STATICARRAYLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5339);}while(r); do{ *__LONG_STATICARRAYLISTN= 0 ; if(!qbevent)break;evnt(5339);}while(r); do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(5340);}while(r); do{ SUB_WRITEBUFLINE(&(pass667=*__LONG_MAINTXTBUF),qbs_new_txt_len("exit_subfunc:;",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5341);}while(r); S_6226:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(5342);if(r)goto S_6226;} S_6227:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(5343);if(r)goto S_6227;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass668= 0 )); if(!qbevent)break;evnt(5344);}while(r); do{ SUB_WRITEBUFLINE(&(pass669=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5345);}while(r); do{ SUB_VWATCHADDLABEL(&(pass670= 0 ),&(pass671= -1 )); if(!qbevent)break;evnt(5346);}while(r); } do{ SUB_WRITEBUFLINE(&(pass672=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_SUBLEVEL=*__LONG_VWATCH_SUBLEVEL- 1 ;",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5348);}while(r); S_6233:; if (((-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 ))&(-(*__LONG_FIRSTLINENUMBERLABELVWATCH> 0 )))||new_error){ if(qbevent){evnt(5350);if(r)goto S_6233;} do{ SUB_WRITEBUFLINE(&(pass673=*__LONG_MAINTXTBUF),qbs_new_txt_len("goto VWATCH_SKIPSETNEXTLINE;",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5351);}while(r); do{ SUB_WRITEBUFLINE(&(pass674=*__LONG_MAINTXTBUF),qbs_new_txt_len("VWATCH_SETNEXTLINE:;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5352);}while(r); do{ SUB_WRITEBUFLINE(&(pass675=*__LONG_MAINTXTBUF),qbs_new_txt_len("switch (*__LONG_VWATCH_GOTO) {",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5353);}while(r); S_6237:; fornext_value677=*__LONG_FIRSTLINENUMBERLABELVWATCH; fornext_finalvalue677=*__LONG_LASTLINENUMBERLABELVWATCH; fornext_step677= 1 ; if (fornext_step677<0) fornext_step_negative677=1; else fornext_step_negative677=0; if (new_error) goto fornext_error677; goto fornext_entrylabel677; while(1){ fornext_value677=fornext_step677+(*__LONG_I); fornext_entrylabel677: *__LONG_I=fornext_value677; if (fornext_step_negative677){ if (fornext_value677fornext_finalvalue677) break; } fornext_error677:; if(qbevent){evnt(5354);if(r)goto S_6237;} S_6238:; while((qbs_cleanup(qbs_tmp_base,-(*__LONG_I>__STRING_VWATCHUSEDLABELS->len)))||new_error){ if(qbevent){evnt(5355);if(r)goto S_6238;} do{ qbs_set(__STRING_VWATCHUSEDLABELS,qbs_add(__STRING_VWATCHUSEDLABELS,func_space( 1000 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5356);}while(r); do{ qbs_set(__STRING_VWATCHUSEDSKIPLABELS,qbs_add(__STRING_VWATCHUSEDSKIPLABELS,func_space( 1000 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5357);}while(r); ww_continue_678:; } ww_exit_678:; S_6242:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_VWATCHUSEDLABELS,*__LONG_I)== 1 )))||new_error){ if(qbevent){evnt(5359);if(r)goto S_6242;} do{ SUB_WRITEBUFLINE(&(pass680=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" case ",9),FUNC_STR2(__LONG_I)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5360);}while(r); do{ SUB_WRITEBUFLINE(&(pass681=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" goto VWATCH_LABEL_",26),FUNC_STR2(__LONG_I)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5361);}while(r); do{ SUB_WRITEBUFLINE(&(pass682=*__LONG_MAINTXTBUF),qbs_new_txt_len(" break;",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5362);}while(r); } fornext_continue_676:; } fornext_exit_676:; do{ SUB_WRITEBUFLINE(&(pass683=*__LONG_MAINTXTBUF),qbs_new_txt_len(" default:",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5365);}while(r); do{ SUB_WRITEBUFLINE(&(pass684=*__LONG_MAINTXTBUF),qbs_new_txt_len(" *__LONG_VWATCH_GOTO=*__LONG_VWATCH_LINENUMBER;",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5366);}while(r); do{ SUB_WRITEBUFLINE(&(pass685=*__LONG_MAINTXTBUF),qbs_new_txt_len(" goto VWATCH_SETNEXTLINE;",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5367);}while(r); do{ SUB_WRITEBUFLINE(&(pass686=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5368);}while(r); do{ SUB_WRITEBUFLINE(&(pass687=*__LONG_MAINTXTBUF),qbs_new_txt_len("VWATCH_SKIPLINE:;",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5370);}while(r); do{ SUB_WRITEBUFLINE(&(pass688=*__LONG_MAINTXTBUF),qbs_new_txt_len("switch (*__LONG_VWATCH_GOTO) {",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5371);}while(r); S_6254:; fornext_value690=*__LONG_FIRSTLINENUMBERLABELVWATCH; fornext_finalvalue690=*__LONG_LASTLINENUMBERLABELVWATCH; fornext_step690= 1 ; if (fornext_step690<0) fornext_step_negative690=1; else fornext_step_negative690=0; if (new_error) goto fornext_error690; goto fornext_entrylabel690; while(1){ fornext_value690=fornext_step690+(*__LONG_I); fornext_entrylabel690: *__LONG_I=fornext_value690; if (fornext_step_negative690){ if (fornext_value690fornext_finalvalue690) break; } fornext_error690:; if(qbevent){evnt(5372);if(r)goto S_6254;} S_6255:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_VWATCHUSEDSKIPLABELS,*__LONG_I)== 1 )))||new_error){ if(qbevent){evnt(5373);if(r)goto S_6255;} do{ SUB_WRITEBUFLINE(&(pass691=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" case -",10),FUNC_STR2(__LONG_I)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5374);}while(r); do{ SUB_WRITEBUFLINE(&(pass692=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" goto VWATCH_SKIPLABEL_",30),FUNC_STR2(__LONG_I)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5375);}while(r); do{ SUB_WRITEBUFLINE(&(pass693=*__LONG_MAINTXTBUF),qbs_new_txt_len(" break;",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5376);}while(r); } fornext_continue_689:; } fornext_exit_689:; do{ SUB_WRITEBUFLINE(&(pass694=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5379);}while(r); do{ SUB_WRITEBUFLINE(&(pass695=*__LONG_MAINTXTBUF),qbs_new_txt_len("VWATCH_SKIPSETNEXTLINE:;",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5381);}while(r); } do{ *__LONG_FIRSTLINENUMBERLABELVWATCH= 0 ; if(!qbevent)break;evnt(5383);}while(r); } do{ SUB_WRITEBUFLINE(&(pass696=*__LONG_MAINTXTBUF),qbs_new_txt_len("free_mem_lock(sf_mem_lock);",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5387);}while(r); do{ SUB_WRITEBUFLINE(&(pass697=*__LONG_MAINTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5389);}while(r); do{ SUB_WRITEBUFLINE(&(pass698=*__LONG_MAINTXTBUF),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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5390);}while(r); do{ SUB_WRITEBUFLINE(&(pass699=*__LONG_MAINTXTBUF),qbs_new_txt_len("cmem_sp=tmp_cmem_sp;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5391);}while(r); S_6270:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SUBFUNCRET,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5392);if(r)goto S_6270;} do{ SUB_WRITEBUFLINE(&(pass700=*__LONG_MAINTXTBUF),__STRING_SUBFUNCRET); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5392);}while(r); } do{ SUB_WRITEBUFLINE(&(pass701=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5394);}while(r); do{ SUB_WRITEBUFLINE(&(pass702=*__LONG_RETTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5396);}while(r); do{ SUB_WRITEBUFLINE(&(pass703=*__LONG_RETTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5397);}while(r); do{ SUB_WRITEBUFLINE(&(pass704=*__LONG_RETTXTBUF),qbs_new_txt_len("error(3);",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5398);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5399);}while(r); do{ *__BYTE_CLOSEDSUBFUNC= -1 ; if(!qbevent)break;evnt(5400);}while(r); S_6279:; fornext_value706= 1 ; fornext_finalvalue706=*__LONG_IDN; fornext_step706= 1 ; if (fornext_step706<0) fornext_step_negative706=1; else fornext_step_negative706=0; if (new_error) goto fornext_error706; goto fornext_entrylabel706; while(1){ fornext_value706=fornext_step706+(*__LONG_I); fornext_entrylabel706: *__LONG_I=fornext_value706; if (fornext_step_negative706){ if (fornext_value706fornext_finalvalue706) break; } fornext_error706:; if(qbevent){evnt(5403);if(r)goto S_6279;} S_6280:; if ((*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))& 2 )||new_error){ if(qbevent){evnt(5404);if(r)goto S_6280;} do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))=*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))- 2 ; if(!qbevent)break;evnt(5404);}while(r); } fornext_continue_705:; } fornext_exit_705:; S_6284:; fornext_value708= 1 ; fornext_finalvalue708=*__LONG_REVERTMAYMUSTHAVEN; fornext_step708= 1 ; if (fornext_step708<0) fornext_step_negative708=1; else fornext_step_negative708=0; if (new_error) goto fornext_error708; goto fornext_entrylabel708; while(1){ fornext_value708=fornext_step708+(*__LONG_I); fornext_entrylabel708: *__LONG_I=fornext_value708; if (fornext_step_negative708){ if (fornext_value708fornext_finalvalue708) break; } fornext_error708:; if(qbevent){evnt(5407);if(r)goto S_6284;} do{ *__LONG_X=((int32*)(__ARRAY_LONG_REVERTMAYMUSTHAVE[0]))[array_check((*__LONG_I)-__ARRAY_LONG_REVERTMAYMUSTHAVE[4],__ARRAY_LONG_REVERTMAYMUSTHAVE[5])]; if(!qbevent)break;evnt(5408);}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]))*2869+528)),8,1),qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_X)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+520)),8,1)); if(!qbevent)break;evnt(5409);}while(r); fornext_continue_707:; } fornext_exit_707:; do{ *__LONG_REVERTMAYMUSTHAVEN= 0 ; if(!qbevent)break;evnt(5411);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5415);}while(r); } } } S_6293:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N>= 1 ))&(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CONST",5)))))||new_error){ if(qbevent){evnt(5423);if(r)goto S_6293;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Const",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5424);}while(r); S_6295:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(5427);if(r)goto S_6295;} 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(5427);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5427);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(5428);}while(r); LABEL_CONSTDEFPENDING:; if(qbevent){evnt(5430);r=0;} do{ *__LONG_PENDING= 0 ; if(!qbevent)break;evnt(5431);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5433);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5433);}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(5434);}while(r); do{ *__LONG_TYPEOVERRIDE= 0 ; if(!qbevent)break;evnt(5435);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5436);}while(r); S_6306:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5437);if(r)goto S_6306;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5437);}while(r); } S_6309:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5438);if(r)goto S_6309;} do{ *__LONG_TYPEOVERRIDE=FUNC_TYPNAME2TYP(__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5439);}while(r); S_6311:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5440);if(r)goto S_6311;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5440);}while(r); } S_6314:; if ((*__LONG_TYPEOVERRIDE&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(5441);if(r)goto S_6314;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5441);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5441);}while(r); } S_6318:; if ((-(*__LONG_TYPEOVERRIDE== 0 ))||new_error){ if(qbevent){evnt(5442);if(r)goto S_6318;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid constant type",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5442);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5442);}while(r); } } S_6323:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(5445);if(r)goto S_6323;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5445);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5445);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5446);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5449);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(5450);}while(r); S_6330:; fornext_value710=*__LONG_I; fornext_finalvalue710=*__LONG_N; fornext_step710= 1 ; if (fornext_step710<0) fornext_step_negative710=1; else fornext_step_negative710=0; if (new_error) goto fornext_error710; goto fornext_entrylabel710; while(1){ fornext_value710=fornext_step710+(*__LONG_I2); fornext_entrylabel710: *__LONG_I2=fornext_value710; if (fornext_step_negative710){ if (fornext_value710fornext_finalvalue710) break; } fornext_error710:; if(qbevent){evnt(5451);if(r)goto S_6330;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5452);}while(r); S_6332:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(5453);if(r)goto S_6332;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(5453);}while(r); } S_6335:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(5454);if(r)goto S_6335;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(5454);}while(r); } S_6338:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(5455);if(r)goto S_6338;} do{ *__LONG_PENDING= 1 ; if(!qbevent)break;evnt(5456);}while(r); do{ *__LONG_I=*__LONG_I2+ 1 ; if(!qbevent)break;evnt(5457);}while(r); S_6341:; if ((-(*__LONG_I>(*__LONG_N- 2 )))||new_error){ if(qbevent){evnt(5458);if(r)goto S_6341;} 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(5458);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5458);}while(r); } do{ goto fornext_exit_709; if(!qbevent)break;evnt(5459);}while(r); } S_6347:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(5461);if(r)goto S_6347;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5461);}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(5461);}while(r); } fornext_continue_709:; } fornext_exit_709:; do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5464);}while(r); S_6354:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5465);if(r)goto S_6354;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5465);}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(5466);}while(r); do{ qbs_set(__STRING_HASHNAME,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5471);}while(r); do{ *__LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(5472);}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(5473);}while(r); S_6361:; while((*__LONG_HASHRES)||new_error){ if(qbevent){evnt(5474);if(r)goto S_6361;} S_6362:; 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(5475);if(r)goto S_6362;} 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(5475);}while(r); do{ goto dl_exit_712; if(!qbevent)break;evnt(5475);}while(r); } S_6366:; if ((-(*__LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(5476);if(r)goto S_6366;} do{ *__LONG_HASHRES=FUNC_HASHFINDCONT(__LONG_HASHRESFLAGS,__LONG_HASHRESREF); if(!qbevent)break;evnt(5476);}while(r); }else{ do{ *__LONG_HASHRES= 0 ; if(!qbevent)break;evnt(5476);}while(r); } dl_continue_712:; } dl_exit_712:; S_6372:; if ((*__LONG_PENDING)||new_error){ if(qbevent){evnt(5479);if(r)goto S_6372;} 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(5479);}while(r); do{ goto LABEL_CONSTDEFPENDING; if(!qbevent)break;evnt(5479);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5481);}while(r); S_6377:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5481);if(r)goto S_6377;} 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(5481);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5481);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5483);}while(r); } LABEL_PREDEFINE:; if(qbevent){evnt(5486);r=0;} S_6384:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(5487);if(r)goto S_6384;} do{ *__LONG_ASREQ= 0 ; if(!qbevent)break;evnt(5488);}while(r); S_6386:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFINT",6))))||new_error){ if(qbevent){evnt(5489);if(r)goto S_6386;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("DefInt",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5489);}while(r); 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(5489);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(5489);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(5489);}while(r); } S_6392:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFLNG",6))))||new_error){ if(qbevent){evnt(5490);if(r)goto S_6392;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("DefLng",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5490);}while(r); 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(5490);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(5490);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(5490);}while(r); } S_6398:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFSNG",6))))||new_error){ if(qbevent){evnt(5491);if(r)goto S_6398;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("DefSng",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5491);}while(r); 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(5491);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(5491);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(5491);}while(r); } S_6404:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFDBL",6))))||new_error){ if(qbevent){evnt(5492);if(r)goto S_6404;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("DefDbl",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5492);}while(r); 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(5492);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(5492);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(5492);}while(r); } S_6410:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFSTR",6))))||new_error){ if(qbevent){evnt(5493);if(r)goto S_6410;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("DefStr",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5493);}while(r); 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(5493);}while(r); do{ *__LONG_N=*__LONG_N+ 2 ; if(!qbevent)break;evnt(5493);}while(r); do{ goto LABEL_DEFINETYPE; if(!qbevent)break;evnt(5493);}while(r); } S_6416:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_DEFINE",7)))|(((qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DEFINE",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(5494);if(r)goto S_6416;} do{ *__LONG_ASREQ= 1 ; if(!qbevent)break;evnt(5495);}while(r); S_6418:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_DEFINE",7))))||new_error){ if(qbevent){evnt(5496);if(r)goto S_6418;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("_Define",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5496);}while(r); }else{ do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Define",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5496);}while(r); } LABEL_DEFINETYPE:; if(qbevent){evnt(5497);r=0;} do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5499);}while(r); do{ qbs_set(__STRING_TYP2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5500);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5501);}while(r); S_6426:; fornext_value715=*__LONG_N; fornext_finalvalue715= 2 ; fornext_step715= -1 ; if (fornext_step715<0) fornext_step_negative715=1; else fornext_step_negative715=0; if (new_error) goto fornext_error715; goto fornext_entrylabel715; while(1){ fornext_value715=fornext_step715+(*__LONG_I); fornext_entrylabel715: *__LONG_I=fornext_value715; if (fornext_step_negative715){ if (fornext_value715fornext_finalvalue715) break; } fornext_error715:; if(qbevent){evnt(5502);if(r)goto S_6426;} do{ qbs_set(__STRING_T,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5503);}while(r); S_6428:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(5504);if(r)goto S_6428;} do{ goto fornext_exit_714; if(!qbevent)break;evnt(5504);}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(5505);}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(5506);}while(r); fornext_continue_714:; } fornext_exit_714:; do{ qbs_set(__STRING_TYP,qbs_rtrim(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5508);}while(r); S_6435:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_T,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(5509);if(r)goto S_6435;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected ... AS ...",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5509);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5509);}while(r); } S_6439:; if (((-(*__LONG_I==*__LONG_N))|(-(*__LONG_I== 2 )))||new_error){ if(qbevent){evnt(5510);if(r)goto S_6439;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected ... AS ...",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); } do{ *__LONG_N=*__LONG_I- 1 ; if(!qbevent)break;evnt(5513);}while(r); do{ *__LONG_I= 2 - 1 ; if(!qbevent)break;evnt(5515);}while(r); LABEL_DEFINENEXT:; if(qbevent){evnt(5516);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5518);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5518);}while(r); do{ *__LONG_E=qbs_asc(qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5518);}while(r); S_6448:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len> 1 )))||new_error){ if(qbevent){evnt(5519);if(r)goto S_6448;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected an alphabet letter or the underscore character (_)",67))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5519);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5519);}while(r); } S_6452:; if (((-(*__LONG_E!= 95 ))&(((-(*__LONG_E> 90 ))|(-(*__LONG_E< 65 )))))||new_error){ if(qbevent){evnt(5520);if(r)goto S_6452;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected an alphabet letter or the underscore character (_)",67))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5520);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5520);}while(r); } S_6456:; if ((-(*__LONG_E== 95 ))||new_error){ if(qbevent){evnt(5521);if(r)goto S_6456;} do{ *__LONG_E= 27 ; if(!qbevent)break;evnt(5521);}while(r); }else{ do{ *__LONG_E=*__LONG_E- 64 ; if(!qbevent)break;evnt(5521);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5522);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5523);}while(r); S_6463:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5524);if(r)goto S_6463;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5524);}while(r); } do{ *__LONG_FIRSTE=*__LONG_E; if(!qbevent)break;evnt(5525);}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(5526);}while(r); S_6468:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(5528);if(r)goto S_6468;} S_6469:; if ((-(*__LONG_PREDEFINING== 1 ))||new_error){ if(qbevent){evnt(5529);if(r)goto S_6469;} do{ goto LABEL_PREDEFINED; if(!qbevent)break;evnt(5529);}while(r); } S_6472:; if ((*__LONG_ASREQ)||new_error){ if(qbevent){evnt(5530);if(r)goto S_6472;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP),__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5530);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5531);}while(r); S_6476:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5531);if(r)goto S_6476;} 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(5531);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5531);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5532);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5536);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5536);}while(r); S_6485:; 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(5537);if(r)goto S_6485;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected - or ,",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5537);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5537);}while(r); } S_6489:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(5538);if(r)goto S_6489;} 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(5539);}while(r); S_6491:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(5540);if(r)goto S_6491;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Syntax incomplete",25))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5540);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5540);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5542);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5542);}while(r); do{ *__LONG_E=qbs_asc(qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5542);}while(r); S_6498:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len> 1 )))||new_error){ if(qbevent){evnt(5543);if(r)goto S_6498;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected an alphabet letter or the underscore character (_)",67))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5543);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5543);}while(r); } S_6502:; if (((-(*__LONG_E!= 95 ))&(((-(*__LONG_E> 90 ))|(-(*__LONG_E< 65 )))))||new_error){ if(qbevent){evnt(5544);if(r)goto S_6502;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected an alphabet letter or the underscore character (_)",67))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5544);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5544);}while(r); } S_6506:; if ((-(*__LONG_E== 95 ))||new_error){ if(qbevent){evnt(5545);if(r)goto S_6506;} do{ *__LONG_E= 27 ; if(!qbevent)break;evnt(5545);}while(r); }else{ do{ *__LONG_E=*__LONG_E- 64 ; if(!qbevent)break;evnt(5545);}while(r); } S_6511:; if ((-(*__LONG_FIRSTE>*__LONG_E))||new_error){ if(qbevent){evnt(5546);if(r)goto S_6511;} do{ swap_32(&*__LONG_E,&*__LONG_FIRSTE); if(!qbevent)break;evnt(5546);}while(r); } S_6514:; fornext_value720=*__LONG_FIRSTE; fornext_finalvalue720=*__LONG_E; fornext_step720= 1 ; if (fornext_step720<0) fornext_step_negative720=1; else fornext_step_negative720=0; if (new_error) goto fornext_error720; goto fornext_entrylabel720; while(1){ fornext_value720=fornext_step720+(*__LONG_E2); fornext_entrylabel720: *__LONG_E2=fornext_value720; if (fornext_step_negative720){ if (fornext_value720fornext_finalvalue720) break; } fornext_error720:; if(qbevent){evnt(5547);if(r)goto S_6514;} 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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5548);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5549);}while(r); S_6517:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5550);if(r)goto S_6517;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5550);}while(r); } fornext_continue_719:; } fornext_exit_719:; 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(5552);}while(r); S_6522:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(5553);if(r)goto S_6522;} S_6523:; if ((-(*__LONG_PREDEFINING== 1 ))||new_error){ if(qbevent){evnt(5554);if(r)goto S_6523;} do{ goto LABEL_PREDEFINED; if(!qbevent)break;evnt(5554);}while(r); } S_6526:; if ((*__LONG_ASREQ)||new_error){ if(qbevent){evnt(5555);if(r)goto S_6526;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP),__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5555);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5556);}while(r); S_6530:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5556);if(r)goto S_6530;} 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(5556);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5556);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5557);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(5560);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5560);}while(r); S_6539:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(5561);if(r)goto S_6539;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DEFINE: Expected ,",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5561);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5561);}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(5563);}while(r); do{ goto LABEL_DEFINENEXT; if(!qbevent)break;evnt(5564);}while(r); } } S_6548:; if ((-(*__LONG_PREDEFINING== 1 ))||new_error){ if(qbevent){evnt(5567);if(r)goto S_6548;} do{ goto LABEL_PREDEFINED; if(!qbevent)break;evnt(5567);}while(r); } S_6551:; if ((qbs_cleanup(qbs_tmp_base,(-(*__INTEGER_CLOSEDMAIN!= 0 ))&(qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(5569);if(r)goto S_6551;} 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(5569);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5569);}while(r); } do{ *__LONG_STATEMENTN=*__LONG_STATEMENTN+ 1 ; if(!qbevent)break;evnt(5573);}while(r); S_6556:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5576);if(r)goto S_6556;} S_6557:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("NEXT",4))))||new_error){ if(qbevent){evnt(5577);if(r)goto S_6557;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Next",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5579);}while(r); S_6559:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5580);if(r)goto S_6559;} do{ goto LABEL_SIMPLENEXT; if(!qbevent)break;evnt(5580);}while(r); } do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5581);}while(r); S_6563:; fornext_value723= 2 ; fornext_finalvalue723=*__LONG_N; fornext_step723= 1 ; if (fornext_step723<0) fornext_step_negative723=1; else fornext_step_negative723=0; if (new_error) goto fornext_error723; goto fornext_entrylabel723; while(1){ fornext_value723=fornext_step723+(*__LONG_I); fornext_entrylabel723: *__LONG_I=fornext_value723; if (fornext_step_negative723){ if (fornext_value723fornext_finalvalue723) break; } fornext_error723:; if(qbevent){evnt(5582);if(r)goto S_6563;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5583);}while(r); S_6565:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(5585);if(r)goto S_6565;} LABEL_LASTNEXTELE:; if(qbevent){evnt(5587);r=0;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5588);}while(r); S_6567:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5589);if(r)goto S_6567;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5589);}while(r); } S_6570:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_L->len== 4 )))||new_error){ if(qbevent){evnt(5590);if(r)goto S_6570;} 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(5590);}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(5590);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5591);}while(r); S_6576:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5592);if(r)goto S_6576;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5592);}while(r); } S_6579:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5593);if(r)goto S_6579;} do{ SUB_GETID(&(pass725=qbr(func_val(__STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5594);}while(r); S_6581:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5595);if(r)goto S_6581;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5595);}while(r); } S_6584:; if (((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(5596);if(r)goto S_6584;} S_6585:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(5597);if(r)goto S_6585;} S_6586:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISOFFSETINBITS)== 0 ))||new_error){ if(qbevent){evnt(5598);if(r)goto S_6586;} S_6587:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(5599);if(r)goto S_6587;} do{ goto LABEL_FORNEXTFOUNDVAR2; if(!qbevent)break;evnt(5600);}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(5606);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5606);}while(r); LABEL_FORNEXTFOUNDVAR2:; if(qbevent){evnt(5607);r=0;} LABEL_SIMPLENEXT:; if(qbevent){evnt(5608);r=0;} S_6596:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 2 ))||new_error){ if(qbevent){evnt(5609);if(r)goto S_6596;} do{ qbs_set(__STRING_A,qbs_new_txt_len("NEXT without FOR",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5609);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5609);}while(r); } S_6600:; 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(5610);if(r)goto S_6600;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Incorrect variable after NEXT",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5610);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5610);}while(r); } do{ SUB_WRITEBUFLINE(&(pass726=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("fornext_continue_",17),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5611);}while(r); S_6605:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 ))&(-(*__LONG_NOCHECKS== 0 )))||new_error){ if(qbevent){evnt(5612);if(r)goto S_6605;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass727= 0 )); if(!qbevent)break;evnt(5613);}while(r); do{ SUB_WRITEBUFLINE(&(pass728=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5614);}while(r); } do{ SUB_WRITEBUFLINE(&(pass729=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5616);}while(r); do{ SUB_WRITEBUFLINE(&(pass730=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5617);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5618);}while(r); S_6612:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5619);if(r)goto S_6612;} do{ goto fornext_exit_722; if(!qbevent)break;evnt(5619);}while(r); } do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5620);}while(r); }else{ S_6617:; if ((qbs_cleanup(qbs_tmp_base,__STRING_V->len))||new_error){ if(qbevent){evnt(5624);if(r)goto S_6617;} 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(5624);}while(r); }else{ do{ qbs_set(__STRING_V,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5624);}while(r); } S_6622:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(5625);if(r)goto S_6622;} do{ goto LABEL_LASTNEXTELE; if(!qbevent)break;evnt(5625);}while(r); } } fornext_continue_722:; } fornext_exit_722:; do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5631);}while(r); S_6628:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5631);if(r)goto S_6628;} 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(5631);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5631);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5632);}while(r); } } S_6636:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5638);if(r)goto S_6636;} S_6637:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(5639);if(r)goto S_6637;} S_6638:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5640);if(r)goto S_6638;} do{ SUB_WRITEBUFLINE(&(pass733=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5640);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5640);}while(r); } S_6642:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(5643);if(r)goto S_6642;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5644);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5644);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5647);}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(5648);}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(5649);}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(5650);}while(r); S_6650:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(5651);if(r)goto S_6650;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass734= 2 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5652);}while(r); S_6652:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5653);if(r)goto S_6652;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5653);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("While",5)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5654);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5655);}while(r); S_6657:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5655);if(r)goto S_6657;} 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(5655);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5655);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5656);}while(r); S_6663:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5657);if(r)goto S_6663;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5657);}while(r); } S_6666:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5658);if(r)goto S_6666;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass736= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5658);}while(r); } S_6669:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5659);if(r)goto S_6669;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5659);}while(r); } S_6672:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5660);if(r)goto S_6672;} 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(5660);}while(r); } S_6675:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(5661);if(r)goto S_6675;} 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(5661);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5661);}while(r); } S_6679:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(5662);if(r)goto S_6679;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass737= 0 )); if(!qbevent)break;evnt(5663);}while(r); do{ SUB_WRITEBUFLINE(&(pass738=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5664);}while(r); } do{ SUB_WRITEBUFLINE(&(pass739=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("while((",7),__STRING_E),qbs_new_txt_len(")||new_error){",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5666);}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(5668);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5668);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5671);}while(r); } } S_6691:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5675);if(r)goto S_6691;} S_6692:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WEND",4))))||new_error){ if(qbevent){evnt(5676);if(r)goto S_6692;} S_6693:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 5 ))||new_error){ if(qbevent){evnt(5679);if(r)goto S_6693;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WEND without WHILE",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5679);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5679);}while(r); } do{ SUB_WRITEBUFLINE(&(pass740=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("ww_continue_",12),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5680);}while(r); do{ SUB_WRITEBUFLINE(&(pass741=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5681);}while(r); do{ SUB_WRITEBUFLINE(&(pass742=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5682);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5683);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Wend",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5684);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5685);}while(r); S_6703:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5685);if(r)goto S_6703;} 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(5685);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5685);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5686);}while(r); } } S_6711:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5694);if(r)goto S_6711;} S_6712:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DO",2))))||new_error){ if(qbevent){evnt(5695);if(r)goto S_6712;} S_6713:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5696);if(r)goto S_6713;} do{ SUB_WRITEBUFLINE(&(pass744=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5696);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5696);}while(r); } S_6717:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(5699);if(r)goto S_6717;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5700);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5700);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5703);}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(5704);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Do",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5705);}while(r); S_6724:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(5706);if(r)goto S_6724;} do{ *__LONG_WHILEUNTIL= 0 ; if(!qbevent)break;evnt(5707);}while(r); S_6726:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(5708);if(r)goto S_6726;} do{ *__LONG_WHILEUNTIL= 1 ; if(!qbevent)break;evnt(5708);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("While",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5708);}while(r); } S_6730:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("UNTIL",5))))||new_error){ if(qbevent){evnt(5709);if(r)goto S_6730;} do{ *__LONG_WHILEUNTIL= 2 ; if(!qbevent)break;evnt(5709);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Until",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5709);}while(r); } S_6734:; if ((-(*__LONG_WHILEUNTIL== 0 ))||new_error){ if(qbevent){evnt(5710);if(r)goto S_6734;} 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(5710);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5710);}while(r); } S_6738:; if (((-(*__LONG_WHILEUNTIL> 0 ))&(-(*__LONG_N== 2 )))||new_error){ if(qbevent){evnt(5711);if(r)goto S_6738;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Condition expected after WHILE/UNTIL",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5711);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5711);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass745= 3 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5712);}while(r); S_6743:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5713);if(r)goto S_6743;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5713);}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(5714);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5715);}while(r); S_6748:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5716);if(r)goto S_6748;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5716);}while(r); } S_6751:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5717);if(r)goto S_6751;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass746= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5717);}while(r); } S_6754:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5718);if(r)goto S_6754;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5718);}while(r); } S_6757:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5719);if(r)goto S_6757;} 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(5719);}while(r); } S_6760:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(5720);if(r)goto S_6760;} 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(5720);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5720);}while(r); } S_6764:; if ((-(*__LONG_WHILEUNTIL== 1 ))||new_error){ if(qbevent){evnt(5721);if(r)goto S_6764;} do{ SUB_WRITEBUFLINE(&(pass747=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("while((",7),__STRING_E),qbs_new_txt_len(")||new_error){",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5721);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass748=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("while((!(",9),__STRING_E),qbs_new_txt_len("))||new_error){",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5721);}while(r); } S_6769:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(5722);if(r)goto S_6769;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass749= 0 )); if(!qbevent)break;evnt(5723);}while(r); do{ SUB_WRITEBUFLINE(&(pass750=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5724);}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(5726);}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(5728);}while(r); S_6776:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 ))&(-(*__LONG_NOCHECKS== 0 )))||new_error){ if(qbevent){evnt(5729);if(r)goto S_6776;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass751= 0 )); if(!qbevent)break;evnt(5730);}while(r); do{ SUB_WRITEBUFLINE(&(pass752=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("do{*__LONG_VWATCH_LINENUMBER= ",30),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5731);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass753=*__LONG_MAINTXTBUF),qbs_new_txt_len("do{",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5733);}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(5736);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5737);}while(r); S_6785:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5737);if(r)goto S_6785;} 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(5737);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5737);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5738);}while(r); } } S_6793:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5742);if(r)goto S_6793;} S_6794:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LOOP",4))))||new_error){ if(qbevent){evnt(5743);if(r)goto S_6794;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Loop",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5744);}while(r); S_6796:; 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(5745);if(r)goto S_6796;} do{ qbs_set(__STRING_A,qbs_new_txt_len("PROGRAM FLOW ERROR!",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5745);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5745);}while(r); } S_6800:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(5746);if(r)goto S_6800;} S_6801:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5747);if(r)goto S_6801;} do{ SUB_WRITEBUFLINE(&(pass755=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5747);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5747);}while(r); } S_6805:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 4 ))||new_error){ if(qbevent){evnt(5748);if(r)goto S_6805;} do{ qbs_set(__STRING_A,qbs_new_txt_len("PROGRAM FLOW ERROR!",19)); 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{ *__LONG_WHILEUNTIL= 0 ; if(!qbevent)break;evnt(5749);}while(r); S_6810:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(5750);if(r)goto S_6810;} do{ *__LONG_WHILEUNTIL= 1 ; if(!qbevent)break;evnt(5750);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("While",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5750);}while(r); } S_6814:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("UNTIL",5))))||new_error){ if(qbevent){evnt(5751);if(r)goto S_6814;} do{ *__LONG_WHILEUNTIL= 2 ; if(!qbevent)break;evnt(5751);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Until",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5751);}while(r); } S_6818:; if ((-(*__LONG_WHILEUNTIL== 0 ))||new_error){ if(qbevent){evnt(5752);if(r)goto S_6818;} 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(5752);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5752);}while(r); } S_6822:; if (((-(*__LONG_WHILEUNTIL> 0 ))&(-(*__LONG_N== 2 )))||new_error){ if(qbevent){evnt(5753);if(r)goto S_6822;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Condition expected after WHILE/UNTIL",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5753);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5753);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass756= 3 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5754);}while(r); S_6827:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5755);if(r)goto S_6827;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5755);}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(5756);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5757);}while(r); S_6832:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5758);if(r)goto S_6832;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5758);}while(r); } S_6835:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5759);if(r)goto S_6835;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass757= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5759);}while(r); } S_6838:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5760);if(r)goto S_6838;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5760);}while(r); } S_6841:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(5761);if(r)goto S_6841;} 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(5761);}while(r); } S_6844:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(5762);if(r)goto S_6844;} 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(5762);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5762);}while(r); } do{ SUB_WRITEBUFLINE(&(pass758=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("dl_continue_",12),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5763);}while(r); S_6849:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(5764);if(r)goto S_6849;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass759= 0 )); if(!qbevent)break;evnt(5765);}while(r); do{ SUB_WRITEBUFLINE(&(pass760=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5766);}while(r); } S_6853:; if ((-(*__LONG_WHILEUNTIL== 1 ))||new_error){ if(qbevent){evnt(5768);if(r)goto S_6853;} do{ SUB_WRITEBUFLINE(&(pass761=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("}while((",8),__STRING_E),qbs_new_txt_len(")&&(!new_error));",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5768);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass762=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("}while((!(",10),__STRING_E),qbs_new_txt_len("))&&(!new_error));",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5768);}while(r); } }else{ do{ SUB_WRITEBUFLINE(&(pass763=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("dl_continue_",12),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5770);}while(r); S_6860:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(5772);if(r)goto S_6860;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass764= 0 )); if(!qbevent)break;evnt(5773);}while(r); do{ SUB_WRITEBUFLINE(&(pass765=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5774);}while(r); } S_6864:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 4 ))||new_error){ if(qbevent){evnt(5777);if(r)goto S_6864;} do{ SUB_WRITEBUFLINE(&(pass766=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5778);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass767=*__LONG_MAINTXTBUF),qbs_new_txt_len("}while(1);",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5780);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass768=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5783);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(5784);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5785);}while(r); S_6873:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5785);if(r)goto S_6873;} 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(5785);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5785);}while(r); } S_6878:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5786);if(r)goto S_6878;} do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(5786);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5787);}while(r); } } S_6884:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(5799);if(r)goto S_6884;} S_6885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FOR",3))))||new_error){ if(qbevent){evnt(5800);if(r)goto S_6885;} S_6886:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(5801);if(r)goto S_6886;} do{ SUB_WRITEBUFLINE(&(pass770=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5801);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(5801);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("For",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5803);}while(r); S_6891:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(5806);if(r)goto S_6891;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5807);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5807);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(5810);}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(5811);}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(5812);}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(5813);}while(r); do{ qbs_set(__STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5815);}while(r); do{ qbs_set(__STRING_STARTVALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5816);}while(r); do{ qbs_set(__STRING_P3,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5817);}while(r); do{ *__LONG_STEPUSED= 0 ; if(!qbevent)break;evnt(5817);}while(r); do{ qbs_set(__STRING_P2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5818);}while(r); do{ *__LONG_MODE= 0 ; if(!qbevent)break;evnt(5819);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(5820);}while(r); S_6906:; fornext_value772= 2 ; fornext_finalvalue772=*__LONG_N; fornext_step772= 1 ; if (fornext_step772<0) fornext_step_negative772=1; else fornext_step_negative772=0; if (new_error) goto fornext_error772; goto fornext_entrylabel772; while(1){ fornext_value772=fornext_step772+(*__LONG_I); fornext_entrylabel772: *__LONG_I=fornext_value772; if (fornext_step_negative772){ if (fornext_value772fornext_finalvalue772) break; } fornext_error772:; if(qbevent){evnt(5821);if(r)goto S_6906;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5822);}while(r); S_6908:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(5823);if(r)goto S_6908;} S_6909:; if ((-(*__LONG_MODE!= 0 ))||new_error){ if(qbevent){evnt(5824);if(r)goto S_6909;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(5824);}while(r); do{ goto fornext_exit_771; if(!qbevent)break;evnt(5824);}while(r); } do{ *__LONG_MODE= 1 ; if(!qbevent)break;evnt(5825);}while(r); do{ qbs_set(__STRING_V,FUNC_GETELEMENTS(__STRING_CA,&(pass773= 2 ),&(pass774=*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5826);}while(r); do{ *__LONG_EQUPOS=*__LONG_I; if(!qbevent)break;evnt(5827);}while(r); } S_6917:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("TO",2))))||new_error){ if(qbevent){evnt(5829);if(r)goto S_6917;} S_6918:; if ((-(*__LONG_MODE!= 1 ))||new_error){ if(qbevent){evnt(5830);if(r)goto S_6918;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(5830);}while(r); do{ goto fornext_exit_771; if(!qbevent)break;evnt(5830);}while(r); } do{ *__LONG_MODE= 2 ; if(!qbevent)break;evnt(5831);}while(r); do{ qbs_set(__STRING_STARTVALUE,FUNC_GETELEMENTS(__STRING_CA,&(pass775=*__LONG_EQUPOS+ 1 ),&(pass776=*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5832);}while(r); do{ *__LONG_TOPOS=*__LONG_I; if(!qbevent)break;evnt(5833);}while(r); } S_6926:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("STEP",4))))||new_error){ if(qbevent){evnt(5835);if(r)goto S_6926;} S_6927:; if ((-(*__LONG_MODE!= 2 ))||new_error){ if(qbevent){evnt(5836);if(r)goto S_6927;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(5836);}while(r); do{ goto fornext_exit_771; if(!qbevent)break;evnt(5836);}while(r); } do{ *__LONG_MODE= 3 ; if(!qbevent)break;evnt(5837);}while(r); do{ *__LONG_STEPUSED= 1 ; if(!qbevent)break;evnt(5838);}while(r); do{ qbs_set(__STRING_P2,FUNC_GETELEMENTS(__STRING_CA,&(pass777=*__LONG_TOPOS+ 1 ),&(pass778=*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5839);}while(r); do{ qbs_set(__STRING_P3,FUNC_GETELEMENTS(__STRING_CA,&(pass779=*__LONG_I+ 1 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5840);}while(r); do{ goto fornext_exit_771; if(!qbevent)break;evnt(5841);}while(r); } fornext_continue_771:; } fornext_exit_771:; S_6938:; if ((-(*__LONG_MODE< 2 ))||new_error){ if(qbevent){evnt(5844);if(r)goto S_6938;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(5844);}while(r); } S_6941:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_P2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5845);if(r)goto S_6941;} do{ qbs_set(__STRING_P2,FUNC_GETELEMENTS(__STRING_CA,&(pass780=*__LONG_TOPOS+ 1 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5845);}while(r); } S_6944:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_V->len== 0 ))|(-(__STRING_STARTVALUE->len== 0 ))|(-(__STRING_P2->len== 0 ))))||new_error){ if(qbevent){evnt(5846);if(r)goto S_6944;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(5846);}while(r); } S_6947:; if (((-(*__LONG_E!= 0 ))&(-(*__LONG_MODE< 3 )))||new_error){ if(qbevent){evnt(5847);if(r)goto S_6947;} 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(5847);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5847);}while(r); } S_6951:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(5848);if(r)goto S_6951;} 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(5848);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5848);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5850);}while(r); S_6956:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5851);if(r)goto S_6956;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5851);}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(5852);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5853);}while(r); S_6961:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5854);if(r)goto S_6961;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5854);}while(r); } S_6964:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(5855);if(r)goto S_6964;} do{ SUB_GETID(&(pass784=qbr(func_val(__STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5856);}while(r); S_6966:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5857);if(r)goto S_6966;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5857);}while(r); } S_6969:; if (((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(5858);if(r)goto S_6969;} S_6970:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(5859);if(r)goto S_6970;} S_6971:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISOFFSETINBITS)== 0 ))||new_error){ if(qbevent){evnt(5860);if(r)goto S_6971;} S_6972:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(5861);if(r)goto S_6972;} do{ goto LABEL_FORNEXTFOUNDVAR; if(!qbevent)break;evnt(5862);}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(5868);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5868);}while(r); LABEL_FORNEXTFOUNDVAR:; if(qbevent){evnt(5869);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(5870);}while(r); do{ qbs_set(__STRING_V,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5871);}while(r); do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5875);}while(r); do{ *__LONG_CTYP=*__LONG_TYP-*__LONG_ISPOINTER; if(!qbevent)break;evnt(5876);}while(r); do{ *__LONG_BITS=*__LONG_TYP& 511 ; if(!qbevent)break;evnt(5877);}while(r); S_6986:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(5878);if(r)goto S_6986;} S_6987:; if ((-(*__LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(5879);if(r)goto S_6987;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5879);}while(r); do{ *__LONG_CTYP= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(5879);}while(r); } S_6991:; if ((-(*__LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(5880);if(r)goto S_6991;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5880);}while(r); do{ *__LONG_CTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(5880);}while(r); } S_6995:; if ((-(*__LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(5881);if(r)goto S_6995;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5881);}while(r); do{ *__LONG_CTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(5881);}while(r); } }else{ S_7000:; if ((-(*__LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(5883);if(r)goto S_7000;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5883);}while(r); do{ *__LONG_CTYP= 16 ; if(!qbevent)break;evnt(5883);}while(r); } S_7004:; if ((-(*__LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(5884);if(r)goto S_7004;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5884);}while(r); do{ *__LONG_CTYP= 32 ; if(!qbevent)break;evnt(5884);}while(r); } S_7008:; if ((-(*__LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(5885);if(r)goto S_7008;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5885);}while(r); do{ *__LONG_CTYP= 64 ; if(!qbevent)break;evnt(5885);}while(r); } S_7012:; if ((-(*__LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(5886);if(r)goto S_7012;} do{ qbs_set(__STRING_CTYPE,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5886);}while(r); do{ *__LONG_CTYP= 64 ; if(!qbevent)break;evnt(5886);}while(r); } } S_7017:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CTYPE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5888);if(r)goto S_7017;} 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(5888);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5888);}while(r); } do{ qbs_set(__STRING_U,FUNC_STR2(&(pass785=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5889);}while(r); S_7022:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(5891);if(r)goto S_7022;} do{ SUB_WRITEBUFLINE(&(pass786=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5892);}while(r); do{ SUB_WRITEBUFLINE(&(pass787=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5893);}while(r); do{ SUB_WRITEBUFLINE(&(pass788=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5894);}while(r); do{ SUB_WRITEBUFLINE(&(pass789=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static uint8 fornext_step_negative",34),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5895);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass790=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(__STRING_CTYPE,qbs_new_txt_len(" fornext_value",14)),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5897);}while(r); do{ SUB_WRITEBUFLINE(&(pass791=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(__STRING_CTYPE,qbs_new_txt_len(" fornext_finalvalue",19)),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5898);}while(r); do{ SUB_WRITEBUFLINE(&(pass792=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(__STRING_CTYPE,qbs_new_txt_len(" fornext_step",13)),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5899);}while(r); do{ SUB_WRITEBUFLINE(&(pass793=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("uint8 fornext_step_negative",27),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5900);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_STARTVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5904);}while(r); S_7034:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5905);if(r)goto S_7034;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5905);}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(5906);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5907);}while(r); S_7039:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5908);if(r)goto S_7039;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5908);}while(r); } do{ SUB_WRITEBUFLINE(&(pass794=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5909);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_P2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5912);}while(r); S_7044:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5913);if(r)goto S_7044;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5913);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("To",2))),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5914);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5915);}while(r); S_7049:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5916);if(r)goto S_7049;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5916);}while(r); } do{ SUB_WRITEBUFLINE(&(pass795=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5917);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_P3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5920);}while(r); S_7054:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5921);if(r)goto S_7054;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5921);}while(r); } S_7057:; if ((-(*__LONG_STEPUSED== 1 ))||new_error){ if(qbevent){evnt(5922);if(r)goto S_7057;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Step",4))),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5922);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_CTYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5923);}while(r); S_7061:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5924);if(r)goto S_7061;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5924);}while(r); } S_7064:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(5926);if(r)goto S_7064;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass796= 0 )); if(!qbevent)break;evnt(5927);}while(r); do{ SUB_WRITEBUFLINE(&(pass797=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5928);}while(r); } do{ SUB_WRITEBUFLINE(&(pass798=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5931);}while(r); do{ SUB_WRITEBUFLINE(&(pass799=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5932);}while(r); do{ SUB_WRITEBUFLINE(&(pass800=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto fornext_error",33),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5934);}while(r); do{ SUB_WRITEBUFLINE(&(pass801=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto fornext_entrylabel",23),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5935);}while(r); do{ SUB_WRITEBUFLINE(&(pass802=*__LONG_MAINTXTBUF),qbs_new_txt_len("while(1){",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5936);}while(r); do{ *__LONG_TYPBAK=*__LONG_TYP; if(!qbevent)break;evnt(5937);}while(r); do{ SUB_WRITEBUFLINE(&(pass803=*__LONG_MAINTXTBUF),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,&(pass804= 0 ))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5938);}while(r); S_7075:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5939);if(r)goto S_7075;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5939);}while(r); } do{ *__LONG_TYP=*__LONG_TYPBAK; if(!qbevent)break;evnt(5940);}while(r); do{ SUB_WRITEBUFLINE(&(pass805=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("fornext_entrylabel",18),__STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5941);}while(r); do{ SUB_SETREFER(__STRING_V,__LONG_TYP,qbs_add(qbs_new_txt_len("fornext_value",13),__STRING_U),&(pass806= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5942);}while(r); S_7081:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(5943);if(r)goto S_7081;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5943);}while(r); } do{ SUB_WRITEBUFLINE(&(pass807=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (fornext_step_negative",25),__STRING_U),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5944);}while(r); do{ SUB_WRITEBUFLINE(&(pass808=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5947);}while(r); do{ SUB_WRITEBUFLINE(&(pass811=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5948);}while(r); do{ SUB_WRITEBUFLINE(&(pass812=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("fornext_error",13),__STRING_U),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5949);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(5951);}while(r); S_7091:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(5951);if(r)goto S_7091;} 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(5951);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5951);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(5953);}while(r); } } S_7099:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(5958);if(r)goto S_7099;} S_7100:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(5959);if(r)goto S_7100;} do{ qbs_set(__STRING_TEMP,qbs_ucase(qbs_ltrim(qbs_rtrim(__STRING_WHOLELINE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5968);}while(r); S_7102:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_TEMP,func_chr( 9 ),0)))||new_error){ if(qbevent){evnt(5970);if(r)goto S_7102;} do{ tqbs=__STRING_TEMP; if (!new_error){ tmp_fileno=func_instr(NULL,__STRING_TEMP,func_chr( 9 ),0); 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(5971);}while(r); dl_continue_814:; } dl_exit_814:; do{ *__LONG_GOODELSE= 0 ; if(!qbevent)break;evnt(5974);}while(r); S_7106:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 2 ),qbs_new_txt_len("IF",2))))||new_error){ if(qbevent){evnt(5975);if(r)goto S_7106;} do{ *__LONG_GOODELSE= -1 ; if(!qbevent)break;evnt(5975);}while(r); do{ goto LABEL_SKIPELSECHECK; if(!qbevent)break;evnt(5975);}while(r); } S_7110:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 4 ),qbs_new_txt_len("ELSE",4))))||new_error){ if(qbevent){evnt(5976);if(r)goto S_7110;} do{ *__LONG_GOODELSE= -1 ; if(!qbevent)break;evnt(5976);}while(r); do{ goto LABEL_SKIPELSECHECK; if(!qbevent)break;evnt(5976);}while(r); } S_7114:; do{ if(qbevent){evnt(5977);if(r)goto S_7114;} do{ *__LONG_SPACELOCATION=func_instr(NULL,__STRING_TEMP,qbs_new_txt_len(" ",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5978);}while(r); S_7116:; if ((*__LONG_SPACELOCATION)||new_error){ if(qbevent){evnt(5979);if(r)goto S_7116;} do{ qbs_set(__STRING_TEMP,qbs_add(qbs_left(__STRING_TEMP,*__LONG_SPACELOCATION- 1 ),func_mid(__STRING_TEMP,*__LONG_SPACELOCATION+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5979);}while(r); } S_7119:; dl_continue_815:; }while((!(-(*__LONG_SPACELOCATION== 0 )))&&(!new_error)); dl_exit_815:; if(qbevent){evnt(5980);if(r)goto S_7119;} S_7120:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_TEMP,qbs_new_txt_len(":ELSE",5),0)|func_instr(NULL,__STRING_TEMP,qbs_new_txt_len(":IF",3),0)))||new_error){ if(qbevent){evnt(5981);if(r)goto S_7120;} do{ *__LONG_GOODELSE= -1 ; if(!qbevent)break;evnt(5981);}while(r); do{ goto LABEL_SKIPELSECHECK; if(!qbevent)break;evnt(5981);}while(r); } do{ *__LONG_COUNT= 0 ; if(!qbevent)break;evnt(5982);}while(r); S_7125:; do{ if(qbevent){evnt(5983);if(r)goto S_7125;} do{ *__LONG_COUNT=*__LONG_COUNT+ 1 ; if(!qbevent)break;evnt(5984);}while(r); S_7127:; qbs_set(sc_817,func_mid(__STRING_TEMP,*__LONG_COUNT, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(5985);if(r)goto S_7127;} S_7128:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_817,qbs_new_txt_len("1",1))||qbs_equal(sc_817,qbs_new_txt_len("2",1))||qbs_equal(sc_817,qbs_new_txt_len("3",1))||qbs_equal(sc_817,qbs_new_txt_len("4",1))||qbs_equal(sc_817,qbs_new_txt_len("5",1))||qbs_equal(sc_817,qbs_new_txt_len("6",1))||qbs_equal(sc_817,qbs_new_txt_len("7",1))||qbs_equal(sc_817,qbs_new_txt_len("8",1))||qbs_equal(sc_817,qbs_new_txt_len("9",1))||qbs_equal(sc_817,qbs_new_txt_len("0",1))||qbs_equal(sc_817,qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(5986);if(r)goto S_7128;} sc_ec_27_end:; goto sc_817_end; } do{ goto dl_exit_816; if(!qbevent)break;evnt(5987);}while(r); sc_817_end:; S_7132:; dl_continue_816:; }while((!(qbs_cleanup(qbs_tmp_base,-(*__LONG_COUNT>=__STRING_TEMP->len))))&&(!new_error)); dl_exit_816:; if(qbevent){evnt(5989);if(r)goto S_7132;} S_7133:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(__STRING_TEMP,*__LONG_COUNT, 4 ,1),qbs_new_txt_len("ELSE",4)))|(qbs_equal(func_mid(__STRING_TEMP,*__LONG_COUNT, 2 ,1),qbs_new_txt_len("IF",2)))))||new_error){ if(qbevent){evnt(5990);if(r)goto S_7133;} do{ *__LONG_GOODELSE= -1 ; if(!qbevent)break;evnt(5990);}while(r); } S_7136:; if ((~(*__LONG_GOODELSE))||new_error){ if(qbevent){evnt(5991);if(r)goto S_7136;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid Syntax for ELSE",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5991);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5991);}while(r); } LABEL_SKIPELSECHECK:; if(qbevent){evnt(5992);r=0;} S_7140:; fornext_value820=*__INTEGER_CONTROLLEVEL; fornext_finalvalue820= 1 ; fornext_step820= -1 ; if (fornext_step820<0) fornext_step_negative820=1; else fornext_step_negative820=0; if (new_error) goto fornext_error820; goto fornext_entrylabel820; while(1){ fornext_value820=fornext_step820+(*__LONG_I); fornext_entrylabel820: *__LONG_I=fornext_value820; if (fornext_step_negative820){ if (fornext_value820fornext_finalvalue820) break; } fornext_error820:; if(qbevent){evnt(5994);if(r)goto S_7140;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(5995);}while(r); S_7142:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(5996);if(r)goto S_7142;} S_7143:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5])]== 2 ))||new_error){ if(qbevent){evnt(5997);if(r)goto S_7143;} 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(5997);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(5997);}while(r); } do{ SUB_WRITEBUFLINE(&(pass821=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(5998);}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(5999);}while(r); S_7149:; if ((-(*__LONG_LINEELSEUSED== 0 ))||new_error){ if(qbevent){evnt(6000);if(r)goto S_7149;} do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6000);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Else",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6001);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6002);}while(r); S_7154:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6002);if(r)goto S_7154;} 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(6002);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6002);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(6003);}while(r); } fornext_continue_819:; } fornext_exit_819:; do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSE without IF",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6006);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6006);}while(r); } } S_7166:; if ((-(*__LONG_N>= 3 ))||new_error){ if(qbevent){evnt(6010);if(r)goto S_7166;} S_7167:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ELSEIF",6))))||new_error){ if(qbevent){evnt(6011);if(r)goto S_7167;} S_7168:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(6012);if(r)goto S_7168;} do{ SUB_WRITEBUFLINE(&(pass823=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6013);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(6013);}while(r); S_7171:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6014);if(r)goto S_7171;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass824= 0 )); if(!qbevent)break;evnt(6015);}while(r); do{ SUB_WRITEBUFLINE(&(pass825=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6016);}while(r); } } S_7176:; fornext_value827=*__INTEGER_CONTROLLEVEL; fornext_finalvalue827= 1 ; fornext_step827= -1 ; if (fornext_step827<0) fornext_step_negative827=1; else fornext_step_negative827=0; if (new_error) goto fornext_error827; goto fornext_entrylabel827; while(1){ fornext_value827=fornext_step827+(*__LONG_I); fornext_entrylabel827: *__LONG_I=fornext_value827; if (fornext_step_negative827){ if (fornext_value827fornext_finalvalue827) break; } fornext_error827:; if(qbevent){evnt(6019);if(r)goto S_7176;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(6020);}while(r); S_7178:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(6021);if(r)goto S_7178;} S_7179:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLSTATE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLSTATE[4],__ARRAY_INTEGER_CONTROLSTATE[5])]== 2 ))||new_error){ if(qbevent){evnt(6022);if(r)goto S_7179;} do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSEIF invalid after ELSE",25)); 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{ 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(6023);}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(6024);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6025);}while(r); S_7186:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("THEN",4))))||new_error){ if(qbevent){evnt(6026);if(r)goto S_7186;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ELSEIF expression THEN",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6026);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6026);}while(r); } do{ SUB_WRITEBUFLINE(&(pass828=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6027);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass829= 2 ),&(pass830=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6028);}while(r); S_7192:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6029);if(r)goto S_7192;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6029);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("ElseIf",6)),__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Then",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6030);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6031);}while(r); S_7197:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6031);if(r)goto S_7197;} 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(6031);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6031);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6032);}while(r); S_7203:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6033);if(r)goto S_7203;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6033);}while(r); } S_7206:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6034);if(r)goto S_7206;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass832= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6034);}while(r); } S_7209:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6035);if(r)goto S_7209;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6035);}while(r); } S_7212:; if ((*__LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(6036);if(r)goto S_7212;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ELSEIF LEN(stringexpression) THEN",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6037);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6037);}while(r); } S_7216:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(6039);if(r)goto S_7216;} do{ SUB_WRITEBUFLINE(&(pass833=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_CLEANUPSTRINGPROCESSINGCALL),__STRING_E),qbs_new_txt_len(")){",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6040);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass834=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_E),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6042);}while(r); } do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6044);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6045);}while(r); } fornext_continue_826:; } fornext_exit_826:; do{ qbs_set(__STRING_A,qbs_new_txt_len("ELSEIF without IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6048);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6048);}while(r); } } S_7229:; if ((-(*__LONG_N>= 3 ))||new_error){ if(qbevent){evnt(6052);if(r)goto S_7229;} S_7230:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("IF",2))))||new_error){ if(qbevent){evnt(6053);if(r)goto S_7230;} S_7231:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(6054);if(r)goto S_7231;} do{ SUB_WRITEBUFLINE(&(pass835=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6055);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(6055);}while(r); S_7234:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6056);if(r)goto S_7234;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass836= 0 )); if(!qbevent)break;evnt(6057);}while(r); do{ SUB_WRITEBUFLINE(&(pass837=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6058);}while(r); } } S_7239:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(6063);if(r)goto S_7239;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6064);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6064);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6067);}while(r); do{ *__LONG_IFTYPE= 0 ; if(!qbevent)break;evnt(6068);}while(r); S_7245:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("THEN",4))))||new_error){ if(qbevent){evnt(6069);if(r)goto S_7245;} do{ *__LONG_IFTYPE= 1 ; if(!qbevent)break;evnt(6069);}while(r); } S_7248:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("GOTO",4))))||new_error){ if(qbevent){evnt(6070);if(r)goto S_7248;} do{ *__LONG_IFTYPE= 2 ; if(!qbevent)break;evnt(6070);}while(r); } S_7251:; if ((-(*__LONG_IFTYPE== 0 ))||new_error){ if(qbevent){evnt(6071);if(r)goto S_7251;} 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(6071);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6071);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(6073);}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(6074);}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(6075);}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(6076);}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(6077);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(__STRING_CA,&(pass838= 2 ),&(pass839=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6079);}while(r); S_7261:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6080);if(r)goto S_7261;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6080);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("If",2)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6081);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6082);}while(r); S_7266:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6083);if(r)goto S_7266;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6083);}while(r); } S_7269:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6084);if(r)goto S_7269;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass840= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6084);}while(r); } S_7272:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6085);if(r)goto S_7272;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6085);}while(r); } S_7275:; if ((*__LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(6087);if(r)goto S_7275;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IF LEN(stringexpression) THEN",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6088);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6088);}while(r); } S_7279:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(6091);if(r)goto S_7279;} do{ SUB_WRITEBUFLINE(&(pass841=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_CLEANUPSTRINGPROCESSINGCALL),__STRING_E),qbs_new_txt_len("))||new_error){",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6092);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass842=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_E),qbs_new_txt_len(")||new_error){",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6094);}while(r); } S_7284:; if ((-(*__LONG_IFTYPE== 1 ))||new_error){ if(qbevent){evnt(6097);if(r)goto S_7284;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Then",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6097);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6098);}while(r); S_7288:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6098);if(r)goto S_7288;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6098);}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(6098);}while(r); } S_7293:; if ((-(*__LONG_IFTYPE== 2 ))||new_error){ if(qbevent){evnt(6100);if(r)goto S_7293;} do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6101);}while(r); } do{ *__LONG_THENGOTO= 1 ; if(!qbevent)break;evnt(6104);}while(r); do{ goto LABEL_FINISHEDLINE2; if(!qbevent)break;evnt(6105);}while(r); } } S_7300:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N== 1 ))&(qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass844= 1 )),qbs_new_txt_len("ENDIF",5)))))||new_error){ if(qbevent){evnt(6110);if(r)goto S_7300;} S_7301:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 1 ))||new_error){ if(qbevent){evnt(6111);if(r)goto S_7301;} do{ qbs_set(__STRING_A,qbs_new_txt_len("END IF without IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6111);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6111);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6112);}while(r); S_7306:; if ((-(*__LONG_IMPLIEDENDIF== 0 ))||new_error){ if(qbevent){evnt(6113);if(r)goto S_7306;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("End If",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6114);}while(r); S_7308:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6115);if(r)goto S_7308;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6115);}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(6115);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass846=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6118);}while(r); S_7315:; fornext_value848= 1 ; fornext_finalvalue848=((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5])]; fornext_step848= 1 ; if (fornext_step848<0) fornext_step_negative848=1; else fornext_step_negative848=0; if (new_error) goto fornext_error848; goto fornext_entrylabel848; while(1){ fornext_value848=fornext_step848+(*__LONG_I); fornext_entrylabel848: *__LONG_I=fornext_value848; if (fornext_step_negative848){ if (fornext_value848fornext_finalvalue848) break; } fornext_error848:; if(qbevent){evnt(6119);if(r)goto S_7315;} do{ SUB_WRITEBUFLINE(&(pass849=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6120);}while(r); fornext_continue_847:; } fornext_exit_847:; do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6122);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(6123);}while(r); } S_7321:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(6128);if(r)goto S_7321;} S_7322:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass850= 1 )),qbs_new_txt_len("END",3)))&(qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass851= 2 )),qbs_new_txt_len("IF",2)))))||new_error){ if(qbevent){evnt(6129);if(r)goto S_7322;} S_7323:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 1 ))||new_error){ if(qbevent){evnt(6132);if(r)goto S_7323;} do{ qbs_set(__STRING_A,qbs_new_txt_len("END IF without IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6132);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6132);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6133);}while(r); S_7328:; if ((-(*__LONG_IMPLIEDENDIF== 0 ))||new_error){ if(qbevent){evnt(6134);if(r)goto S_7328;} do{ qbs_set(__STRING_L,FUNC_SCASE(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(6135);}while(r); S_7330:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(6136);if(r)goto S_7330;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6136);}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(6136);}while(r); } } S_7336:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6139);if(r)goto S_7336;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass853= 0 )); if(!qbevent)break;evnt(6140);}while(r); do{ SUB_WRITEBUFLINE(&(pass854=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6141);}while(r); } do{ SUB_WRITEBUFLINE(&(pass855=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6144);}while(r); S_7341:; fornext_value857= 1 ; fornext_finalvalue857=((int32*)(__ARRAY_LONG_CONTROLVALUE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLVALUE[4],__ARRAY_LONG_CONTROLVALUE[5])]; fornext_step857= 1 ; if (fornext_step857<0) fornext_step_negative857=1; else fornext_step_negative857=0; if (new_error) goto fornext_error857; goto fornext_entrylabel857; while(1){ fornext_value857=fornext_step857+(*__LONG_I); fornext_entrylabel857: *__LONG_I=fornext_value857; if (fornext_step_negative857){ if (fornext_value857fornext_finalvalue857) break; } fornext_error857:; if(qbevent){evnt(6145);if(r)goto S_7341;} do{ SUB_WRITEBUFLINE(&(pass858=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6146);}while(r); fornext_continue_856:; } fornext_exit_856:; do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6148);}while(r); do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(6149);}while(r); } } S_7348:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(6156);if(r)goto S_7348;} S_7349:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SELECT",6))))||new_error){ if(qbevent){evnt(6157);if(r)goto S_7349;} S_7350:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(6158);if(r)goto S_7350;} do{ SUB_WRITEBUFLINE(&(pass859=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6159);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(6159);}while(r); S_7353:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6160);if(r)goto S_7353;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass860= 0 )); if(!qbevent)break;evnt(6161);}while(r); do{ SUB_WRITEBUFLINE(&(pass861=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6162);}while(r); } } S_7358:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(6167);if(r)goto S_7358;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6168);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6168);}while(r); } do{ *__ULONG_SELECTCASECOUNTER=*__ULONG_SELECTCASECOUNTER+ 1 ; if(!qbevent)break;evnt(6171);}while(r); S_7363:; if ((-(func_ubound(__ARRAY_LONG_EVERYCASESET,1,1)<=*__ULONG_SELECTCASECOUNTER))||new_error){ if(qbevent){evnt(6172);if(r)goto S_7363;} do{ if (__ARRAY_LONG_EVERYCASESET[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_LONG_EVERYCASESET)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_EVERYCASESET[2]&1){ preserved_elements=__ARRAY_LONG_EVERYCASESET[5]; } else preserved_elements=0; __ARRAY_LONG_EVERYCASESET[4]= 0 ; __ARRAY_LONG_EVERYCASESET[5]=(*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4]+1; __ARRAY_LONG_EVERYCASESET[6]=1; if (__ARRAY_LONG_EVERYCASESET[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_EVERYCASESET[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_EVERYCASESET[0])); tmp_long=__ARRAY_LONG_EVERYCASESET[5]; __ARRAY_LONG_EVERYCASESET[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_EVERYCASESET[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]&1){ preserved_elements=__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]; } else preserved_elements=0; __ARRAY_LONG_SELECTCASEHASCASEBLOCK[4]= 0 ; __ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]=(*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4]+1; __ARRAY_LONG_SELECTCASEHASCASEBLOCK[6]=1; if (__ARRAY_LONG_SELECTCASEHASCASEBLOCK[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0])); tmp_long=__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]; __ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementslen))||new_error){ if(qbevent){evnt(6190);if(r)goto S_7398;} 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(6190);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6190);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6191);}while(r); S_7404:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6192);if(r)goto S_7404;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6192);}while(r); } do{ *__LONG_U=FUNC_UNIQUENUMBER(); if(!qbevent)break;evnt(6193);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(6195);}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(6196);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6198);}while(r); S_7411:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(6199);if(r)goto S_7411;} do{ *__LONG_T= 0 ; if(!qbevent)break;evnt(6200);}while(r); S_7413:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))&(-((*__LONG_TYP&*__LONG_ISARRAY)== 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(6201);if(r)goto S_7413;} 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(6202);}while(r); }else{ S_7416:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6204);if(r)goto S_7416;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass865= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6204);}while(r); } S_7419:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6205);if(r)goto S_7419;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6205);}while(r); } do{ SUB_WRITEBUFLINE(&(pass866=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6206);}while(r); do{ SUB_WRITEBUFLINE(&(pass867=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6207);}while(r); S_7424:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(6208);if(r)goto S_7424;} do{ SUB_WRITEBUFLINE(&(pass868=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6208);}while(r); } } }else{ S_7429:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(6213);if(r)goto S_7429;} S_7430:; if ((-((*__LONG_TYP& 511 )> 64 ))||new_error){ if(qbevent){evnt(6215);if(r)goto S_7430;} do{ *__LONG_T= 3 ; if(!qbevent)break;evnt(6215);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6215);}while(r); } S_7434:; if ((-((*__LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(6216);if(r)goto S_7434;} do{ *__LONG_T= 4 ; if(!qbevent)break;evnt(6216);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6216);}while(r); } S_7438:; if ((-((*__LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(6217);if(r)goto S_7438;} do{ *__LONG_T= 5 ; if(!qbevent)break;evnt(6217);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6217);}while(r); } S_7442:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))&(-((*__LONG_TYP&*__LONG_ISARRAY)== 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(6218);if(r)goto S_7442;} 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(6219);}while(r); }else{ S_7445:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6221);if(r)goto S_7445;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass869= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6221);}while(r); } S_7448:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6222);if(r)goto S_7448;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6222);}while(r); } do{ SUB_WRITEBUFLINE(&(pass870=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6224);}while(r); do{ SUB_WRITEBUFLINE(&(pass871=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6225);}while(r); S_7453:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(6226);if(r)goto S_7453;} do{ SUB_WRITEBUFLINE(&(pass872=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6226);}while(r); } } }else{ do{ *__LONG_T= 1 ; if(!qbevent)break;evnt(6232);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6232);}while(r); S_7460:; if (((*__LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(6233);if(r)goto S_7460;} S_7461:; if ((-((*__LONG_TYP& 511 )<= 32 ))||new_error){ if(qbevent){evnt(6234);if(r)goto S_7461;} do{ *__LONG_T= 7 ; if(!qbevent)break;evnt(6234);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6234);}while(r); } S_7465:; if ((-((*__LONG_TYP& 511 )> 32 ))||new_error){ if(qbevent){evnt(6235);if(r)goto S_7465;} do{ *__LONG_T= 2 ; if(!qbevent)break;evnt(6235);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("uint64",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6235);}while(r); } }else{ S_7470:; if ((-((*__LONG_TYP& 511 )<= 32 ))||new_error){ if(qbevent){evnt(6237);if(r)goto S_7470;} do{ *__LONG_T= 6 ; if(!qbevent)break;evnt(6237);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6237);}while(r); } S_7474:; if ((-((*__LONG_TYP& 511 )> 32 ))||new_error){ if(qbevent){evnt(6238);if(r)goto S_7474;} do{ *__LONG_T= 1 ; if(!qbevent)break;evnt(6238);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6238);}while(r); } } S_7479:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))&(-((*__LONG_TYP&*__LONG_ISARRAY)== 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(6240);if(r)goto S_7479;} 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(6241);}while(r); }else{ S_7482:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6243);if(r)goto S_7482;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass873= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6243);}while(r); } S_7485:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6244);if(r)goto S_7485;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6244);}while(r); } do{ SUB_WRITEBUFLINE(&(pass874=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6245);}while(r); do{ SUB_WRITEBUFLINE(&(pass875=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6246);}while(r); S_7490:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(6247);if(r)goto S_7490;} do{ SUB_WRITEBUFLINE(&(pass876=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6247);}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(6255);}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(6256);}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(6257);}while(r); S_7499:; if ((((int32*)(__ARRAY_LONG_EVERYCASESET[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4],__ARRAY_LONG_EVERYCASESET[5])])||new_error){ if(qbevent){evnt(6258);if(r)goto S_7499;} do{ SUB_WRITEBUFLINE(&(pass877=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int32 sc_",9),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_var;",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6258);}while(r); } S_7502:; if ((((int32*)(__ARRAY_LONG_EVERYCASESET[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4],__ARRAY_LONG_EVERYCASESET[5])])||new_error){ if(qbevent){evnt(6259);if(r)goto S_7502;} do{ SUB_WRITEBUFLINE(&(pass878=*__LONG_MAINTXTBUF),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("_var=0;",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6259);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6260);}while(r); } } S_7508:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(6266);if(r)goto S_7508;} S_7509:; 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(6267);if(r)goto S_7509;} S_7510:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 18 ))||new_error){ if(qbevent){evnt(6271);if(r)goto S_7510;} do{ *__LONG_EVERYCASENEWCASE=*__LONG_EVERYCASENEWCASE+ 1 ; if(!qbevent)break;evnt(6272);}while(r); do{ SUB_WRITEBUFLINE(&(pass879=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sc_ec_",6),FUNC_STR2(__LONG_EVERYCASENEWCASE)),qbs_new_txt_len("_end:;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6273);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6274);}while(r); S_7514:; if ((-(((int32*)(__ARRAY_LONG_EVERYCASESET[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4],__ARRAY_LONG_EVERYCASESET[5])]== 0 ))||new_error){ if(qbevent){evnt(6275);if(r)goto S_7514;} do{ SUB_WRITEBUFLINE(&(pass880=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6275);}while(r); } do{ SUB_WRITEBUFLINE(&(pass881=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6276);}while(r); } S_7519:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 19 ))||new_error){ if(qbevent){evnt(6278);if(r)goto S_7519;} do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6279);}while(r); S_7521:; if ((((int32*)(__ARRAY_LONG_EVERYCASESET[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4],__ARRAY_LONG_EVERYCASESET[5])])||new_error){ if(qbevent){evnt(6280);if(r)goto S_7521;} do{ SUB_WRITEBUFLINE(&(pass882=*__LONG_MAINTXTBUF),qbs_new_txt_len("} /* End of SELECT EVERYCASE ELSE */",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6280);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass883=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6283);}while(r); S_7526:; 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(6284);if(r)goto S_7526;} 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(6284);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6284);}while(r); } S_7530:; if (((-(*__LONG_NOCHECKS== 0 ))&(-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6286);if(r)goto S_7530;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass884= 0 )); if(!qbevent)break;evnt(6287);}while(r); do{ SUB_WRITEBUFLINE(&(pass885=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6288);}while(r); } S_7534:; if (((-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 )))||new_error){ if(qbevent){evnt(6291);if(r)goto S_7534;} S_7535:; if ((~(*__BYTE_IGNOREWARNINGS))||new_error){ if(qbevent){evnt(6293);if(r)goto S_7535;} do{ SUB_ADDWARNING(__LONG_LINENUMBER,__LONG_INCLEVEL,(&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),qbs_new_txt_len("empty SELECT CASE block",23),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6294);}while(r); } } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6298);}while(r); do{ *__ULONG_SELECTCASECOUNTER=*__ULONG_SELECTCASECOUNTER- 1 ; if(!qbevent)break;evnt(6299);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(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(6300);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6301);}while(r); S_7543:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6301);if(r)goto S_7543;} 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(6301);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6301);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(6302);}while(r); } } S_7551:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N>= 1 ))&(qbs_notequal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CASE",4)))&(-(*__ULONG_SELECTCASECOUNTER> 0 ))&(-(((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5])]== 0 ))))||new_error){ if(qbevent){evnt(6307);if(r)goto S_7551;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6308);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6308);}while(r); } S_7555:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(6313);if(r)goto S_7555;} S_7556:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CASE",4))))||new_error){ if(qbevent){evnt(6314);if(r)goto S_7556;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Case",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6316);}while(r); S_7558:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 19 ))||new_error){ if(qbevent){evnt(6320);if(r)goto S_7558;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected END SELECT",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6320);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6320);}while(r); } S_7562:; if ((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]== 18 ))||new_error){ if(qbevent){evnt(6321);if(r)goto S_7562;} do{ *__LONG_LHSCONTROLLEVEL=*__LONG_LHSCONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6322);}while(r); do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL- 1 ; if(!qbevent)break;evnt(6323);}while(r); do{ *__LONG_EVERYCASENEWCASE=*__LONG_EVERYCASENEWCASE+ 1 ; if(!qbevent)break;evnt(6324);}while(r); do{ SUB_WRITEBUFLINE(&(pass887=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sc_ec_",6),FUNC_STR2(__LONG_EVERYCASENEWCASE)),qbs_new_txt_len("_end:;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6325);}while(r); S_7567:; if ((-(((int32*)(__ARRAY_LONG_EVERYCASESET[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4],__ARRAY_LONG_EVERYCASESET[5])]== 0 ))||new_error){ if(qbevent){evnt(6326);if(r)goto S_7567;} do{ SUB_WRITEBUFLINE(&(pass888=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6327);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass889=*__LONG_MAINTXTBUF),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("_var=-1;",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6329);}while(r); } do{ SUB_WRITEBUFLINE(&(pass890=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6331);}while(r); } S_7574:; if (((-(((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]!= 6 ))&(((-(((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(6337);if(r)goto S_7574;} do{ qbs_set(__STRING_A,qbs_new_txt_len("CASE without SELECT CASE",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6337);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6337);}while(r); } S_7578:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(6338);if(r)goto S_7578;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CASE expression",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6338);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6338);}while(r); } do{ tmp_long=array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_SELECTCASEHASCASEBLOCK[4],__ARRAY_LONG_SELECTCASEHASCASEBLOCK[5]); if (!new_error) ((int32*)(__ARRAY_LONG_SELECTCASEHASCASEBLOCK[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(6339);}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(6372);}while(r); do{ *__LONG_FLT= 0 ; if(!qbevent)break;evnt(6374);}while(r); S_7585:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(6375);if(r)goto S_7585;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6375);}while(r); } S_7588:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(6376);if(r)goto S_7588;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6376);}while(r); } S_7591:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(6377);if(r)goto S_7591;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6377);}while(r); } S_7594:; if ((-(*__LONG_T== 3 ))||new_error){ if(qbevent){evnt(6378);if(r)goto S_7594;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6378);}while(r); do{ *__LONG_FLT= 1 ; if(!qbevent)break;evnt(6378);}while(r); } S_7598:; if ((-(*__LONG_T== 4 ))||new_error){ if(qbevent){evnt(6379);if(r)goto S_7598;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("(float)",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6379);}while(r); do{ *__LONG_FLT= 1 ; if(!qbevent)break;evnt(6379);}while(r); } S_7602:; if ((-(*__LONG_T== 5 ))||new_error){ if(qbevent){evnt(6380);if(r)goto S_7602;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("(double)",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6380);}while(r); do{ *__LONG_FLT= 1 ; if(!qbevent)break;evnt(6380);}while(r); } S_7606:; if ((-(*__LONG_T== 6 ))||new_error){ if(qbevent){evnt(6381);if(r)goto S_7606;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6381);}while(r); } S_7609:; if ((-(*__LONG_T== 7 ))||new_error){ if(qbevent){evnt(6382);if(r)goto S_7609;} do{ qbs_set(__STRING_TC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6382);}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(6384);}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(6385);}while(r); S_7614:; if ((*__LONG_CV)||new_error){ if(qbevent){evnt(6386);if(r)goto S_7614;} do{ qbs_set(__STRING_N,FUNC_REFER(FUNC_STR2(__LONG_CV),&(pass891= 0 ),&(pass892= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6387);}while(r); S_7616:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6388);if(r)goto S_7616;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6388);}while(r); } } S_7620:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(6392);if(r)goto S_7620;} S_7621:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass893= 2 )),qbs_new_txt_len("C-EL",4))))||new_error){ if(qbevent){evnt(6393);if(r)goto S_7621;} S_7622:; if ((((int32*)(__ARRAY_LONG_EVERYCASESET[0]))[array_check((*__ULONG_SELECTCASECOUNTER)-__ARRAY_LONG_EVERYCASESET[4],__ARRAY_LONG_EVERYCASESET[5])])||new_error){ if(qbevent){evnt(6394);if(r)goto S_7622;} do{ SUB_WRITEBUFLINE(&(pass894=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (sc_",7),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_var==0) {",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6394);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(6395);}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(6395);}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(6396);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Else",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6397);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6398);}while(r); S_7630:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6398);if(r)goto S_7630;} 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(6398);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6398);}while(r); } do{ goto LABEL_FINISHEDNONEXEC; if(!qbevent)break;evnt(6399);}while(r); } } S_7638:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(6403);if(r)goto S_7638;} do{ SUB_WRITEBUFLINE(&(pass896=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("S_",2),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6404);}while(r); do{ *__LONG_DYNSCOPE= 1 ; if(!qbevent)break;evnt(6404);}while(r); S_7641:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6405);if(r)goto S_7641;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass897= 0 )); if(!qbevent)break;evnt(6406);}while(r); do{ SUB_WRITEBUFLINE(&(pass898=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= ",27),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6407);}while(r); } } do{ qbs_set(__STRING_F12,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6413);}while(r); do{ *__LONG_NEXP= 0 ; if(!qbevent)break;evnt(6415);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6416);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6417);}while(r); S_7650:; fornext_value900= 2 ; fornext_finalvalue900=*__LONG_N; fornext_step900= 1 ; if (fornext_step900<0) fornext_step_negative900=1; else fornext_step_negative900=0; if (new_error) goto fornext_error900; goto fornext_entrylabel900; while(1){ fornext_value900=fornext_step900+(*__LONG_I); fornext_entrylabel900: *__LONG_I=fornext_value900; if (fornext_step_negative900){ if (fornext_value900fornext_finalvalue900) break; } fornext_error900:; if(qbevent){evnt(6418);if(r)goto S_7650;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6419);}while(r); S_7652:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6420);if(r)goto S_7652;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6420);}while(r); } S_7655:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6421);if(r)goto S_7655;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6421);}while(r); } S_7658:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(6422);if(r)goto S_7658;} 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(6422);}while(r); } S_7661:; 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(6423);if(r)goto S_7661;} S_7662:; if ((-(*__LONG_NEXP!= 0 ))||new_error){ if(qbevent){evnt(6424);if(r)goto S_7662;} 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(6424);}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(6424);}while(r); } S_7666:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6425);if(r)goto S_7666;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6425);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6425);}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(6426);}while(r); do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6431);}while(r); do{ *__LONG_B2= 0 ; if(!qbevent)break;evnt(6432);}while(r); do{ qbs_set(__STRING_EL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6433);}while(r); do{ qbs_set(__STRING_ER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6433);}while(r); do{ *__LONG_USEDTO= 0 ; if(!qbevent)break;evnt(6434);}while(r); S_7676:; fornext_value903= 1 ; fornext_finalvalue903=*__LONG_N2; fornext_step903= 1 ; if (fornext_step903<0) fornext_step_negative903=1; else fornext_step_negative903=0; if (new_error) goto fornext_error903; goto fornext_entrylabel903; while(1){ fornext_value903=fornext_step903+(*__LONG_I2); fornext_entrylabel903: *__LONG_I2=fornext_value903; if (fornext_step_negative903){ if (fornext_value903fornext_finalvalue903) break; } fornext_error903:; if(qbevent){evnt(6435);if(r)goto S_7676;} do{ qbs_set(__STRING_E3,FUNC_GETELEMENT(__STRING_E,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6436);}while(r); S_7678:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E3,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6437);if(r)goto S_7678;} do{ *__LONG_B2=*__LONG_B2+ 1 ; if(!qbevent)break;evnt(6437);}while(r); } S_7681:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E3,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6438);if(r)goto S_7681;} do{ *__LONG_B2=*__LONG_B2- 1 ; if(!qbevent)break;evnt(6438);}while(r); } S_7684:; 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(6439);if(r)goto S_7684;} do{ *__LONG_USEDTO= 1 ; if(!qbevent)break;evnt(6440);}while(r); }else{ S_7687:; if ((-(*__LONG_USEDTO== 0 ))||new_error){ if(qbevent){evnt(6442);if(r)goto S_7687;} 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(6442);}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(6442);}while(r); } } fornext_continue_902:; } fornext_exit_902:; S_7694:; if ((-(*__LONG_USEDTO== 1 ))||new_error){ if(qbevent){evnt(6445);if(r)goto S_7694;} S_7695:; 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(6446);if(r)goto S_7695;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression TO expression",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6446);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6446);}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(6447);}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(6447);}while(r); S_7701:; fornext_value907= 1 ; fornext_finalvalue907= 2 ; fornext_step907= 1 ; if (fornext_step907<0) fornext_step_negative907=1; else fornext_step_negative907=0; if (new_error) goto fornext_error907; goto fornext_entrylabel907; while(1){ fornext_value907=fornext_step907+(*__LONG_I2); fornext_entrylabel907: *__LONG_I2=fornext_value907; if (fornext_step_negative907){ if (fornext_value907fornext_finalvalue907) break; } fornext_error907:; if(qbevent){evnt(6449);if(r)goto S_7701;} S_7702:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(6450);if(r)goto S_7702;} do{ qbs_set(__STRING_E,__STRING_EL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6450);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_ER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6450);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6451);}while(r); S_7708:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6452);if(r)goto S_7708;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6452);}while(r); } S_7711:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(6453);if(r)goto S_7711;} 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(6453);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("To",2))),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6453);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6454);}while(r); S_7717:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6455);if(r)goto S_7717;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6455);}while(r); } S_7720:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6456);if(r)goto S_7720;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass908= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6456);}while(r); } S_7723:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6457);if(r)goto S_7723;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6457);}while(r); } S_7726:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(6458);if(r)goto S_7726;} S_7727:; if ((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(6459);if(r)goto S_7727;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string expression",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6459);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6459);}while(r); } S_7731:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(6460);if(r)goto S_7731;} 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(6460);}while(r); } S_7734:; if ((-(*__LONG_I2== 2 ))||new_error){ if(qbevent){evnt(6461);if(r)goto S_7734;} 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(6461);}while(r); } }else{ S_7738:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(6463);if(r)goto S_7738;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected numeric expression",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6463);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6463);}while(r); } S_7742:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(6465);if(r)goto S_7742;} S_7743:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(6466);if(r)goto S_7743;} 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(6466);}while(r); } S_7746:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(6467);if(r)goto S_7746;} 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(6467);}while(r); } S_7749:; if (((-(*__LONG_T== 6 ))|(-(*__LONG_T== 7 )))||new_error){ if(qbevent){evnt(6468);if(r)goto S_7749;} 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(6468);}while(r); } } S_7753:; if ((qbs_cleanup(qbs_tmp_base,__STRING_TC->len))||new_error){ if(qbevent){evnt(6471);if(r)goto S_7753;} 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(6471);}while(r); } S_7756:; if ((-(*__LONG_I2== 1 ))||new_error){ if(qbevent){evnt(6472);if(r)goto S_7756;} 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(6472);}while(r); } S_7759:; if ((-(*__LONG_I2== 2 ))||new_error){ if(qbevent){evnt(6473);if(r)goto S_7759;} 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(6473);}while(r); } } fornext_continue_906:; } fornext_exit_906:; do{ goto LABEL_ADDEDEXP; if(!qbevent)break;evnt(6476);}while(r); } do{ qbs_set(__STRING_O,qbs_new_txt_len("==",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6498);}while(r); do{ qbs_set(__STRING_X,FUNC_GETELEMENT(__STRING_E,&(pass910= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6501);}while(r); S_7768:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(__STRING_X)))||new_error){ if(qbevent){evnt(6502);if(r)goto S_7768;} S_7769:; 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(6503);if(r)goto S_7769;} 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(6504);}while(r); do{ qbs_set(__STRING_X,qbs_new_txt_len("IS",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6505);}while(r); } } S_7774:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_X),qbs_new_txt_len("IS",2))))||new_error){ if(qbevent){evnt(6508);if(r)goto S_7774;} do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6509);}while(r); S_7776:; if ((-(*__LONG_N2< 3 ))||new_error){ if(qbevent){evnt(6510);if(r)goto S_7776;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IS =,<>,>,<,>=,<= expression",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6510);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6510);}while(r); } do{ qbs_set(__STRING_O,FUNC_GETELEMENT(__STRING_E,&(pass911= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6511);}while(r); do{ qbs_set(__STRING_O2,__STRING_O); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6512);}while(r); do{ *__LONG_O= 0 ; if(!qbevent)break;evnt(6513);}while(r); S_7783:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(6514);if(r)goto S_7783;} do{ qbs_set(__STRING_O,qbs_new_txt_len("==",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6514);}while(r); do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(6514);}while(r); } S_7787:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(6515);if(r)goto S_7787;} do{ qbs_set(__STRING_O,qbs_new_txt_len("!=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6515);}while(r); do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(6515);}while(r); } S_7791:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(6516);if(r)goto S_7791;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(6516);}while(r); } S_7794:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(6517);if(r)goto S_7794;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(6517);}while(r); } S_7797:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(6518);if(r)goto S_7797;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(6518);}while(r); } S_7800:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(6519);if(r)goto S_7800;} do{ *__LONG_O= 1 ; if(!qbevent)break;evnt(6519);}while(r); } S_7803:; if ((-(*__LONG_O!= 1 ))||new_error){ if(qbevent){evnt(6520);if(r)goto S_7803;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected IS =,<>,>,<,>=,<= expression",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6520);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6520);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Is",2))),__STRING1_SP),__STRING_O2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6521);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_E,&(pass912= 3 ),__LONG_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6522);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6527);}while(r); S_7811:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6528);if(r)goto S_7811;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6528);}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(6529);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6530);}while(r); S_7816:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6531);if(r)goto S_7816;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6531);}while(r); } S_7819:; if (((*__LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(6532);if(r)goto S_7819;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass913= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6532);}while(r); } S_7822:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6533);if(r)goto S_7822;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6533);}while(r); } S_7825:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(6534);if(r)goto S_7825;} S_7826:; if ((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(6536);if(r)goto S_7826;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string expression",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6536);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6536);}while(r); } S_7830:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("==",2))))||new_error){ if(qbevent){evnt(6537);if(r)goto S_7830;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_equal",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6537);}while(r); } S_7833:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("!=",2))))||new_error){ if(qbevent){evnt(6538);if(r)goto S_7833;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_notequal",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6538);}while(r); } S_7836:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(6539);if(r)goto S_7836;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_greaterthan",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6539);}while(r); } S_7839:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(6540);if(r)goto S_7839;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_lessthan",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6540);}while(r); } S_7842:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(6541);if(r)goto S_7842;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_greaterorequal",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6541);}while(r); } S_7845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(6542);if(r)goto S_7845;} do{ qbs_set(__STRING_O,qbs_new_txt_len("qbs_lessorequal",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6542);}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(6543);}while(r); }else{ S_7850:; if (((*__LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(6546);if(r)goto S_7850;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected numeric expression",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6546);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6546);}while(r); } S_7854:; if (((*__LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(6548);if(r)goto S_7854;} S_7855:; if ((-(*__LONG_T== 1 ))||new_error){ if(qbevent){evnt(6549);if(r)goto S_7855;} 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(6549);}while(r); } S_7858:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(6550);if(r)goto S_7858;} 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(6550);}while(r); } S_7861:; if (((-(*__LONG_T== 6 ))|(-(*__LONG_T== 7 )))||new_error){ if(qbevent){evnt(6551);if(r)goto S_7861;} 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(6551);}while(r); } } S_7865:; if ((qbs_cleanup(qbs_tmp_base,__STRING_TC->len))||new_error){ if(qbevent){evnt(6554);if(r)goto S_7865;} 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(6554);}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(6555);}while(r); } LABEL_ADDEDEXP:; if(qbevent){evnt(6558);r=0;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6559);}while(r); do{ *__LONG_NEXP=*__LONG_NEXP+ 1 ; if(!qbevent)break;evnt(6560);}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(6562);}while(r); } fornext_continue_899:; } fornext_exit_899:; S_7876:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(6566);if(r)goto S_7876;} do{ SUB_WRITEBUFLINE(&(pass915=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_CLEANUPSTRINGPROCESSINGCALL),__STRING_F12),qbs_new_txt_len("))||new_error){",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6567);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass916=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if ((",5),__STRING_F12),qbs_new_txt_len(")||new_error){",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6569);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6572);}while(r); S_7882:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6572);if(r)goto S_7882;} 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(6572);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6572);}while(r); } do{ *__INTEGER_CONTROLLEVEL=*__INTEGER_CONTROLLEVEL+ 1 ; if(!qbevent)break;evnt(6573);}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(6574);}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(6575);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6576);}while(r); } } S_7893:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(6593);if(r)goto S_7893;} S_7894:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(6594);if(r)goto S_7894;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass918= 0 )); if(!qbevent)break;evnt(6595);}while(r); do{ SUB_WRITEBUFLINE(&(pass919=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("do{*__LONG_VWATCH_LINENUMBER= ",30),FUNC_STR2(__LONG_LINENUMBER)),qbs_new_txt_len("; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",174))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6596);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass920=*__LONG_MAINTXTBUF),qbs_new_txt_len("do{",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6598);}while(r); } } S_7901:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(6604);if(r)goto S_7901;} S_7902:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PALETTE",7))))||new_error){ if(qbevent){evnt(6605);if(r)goto S_7902;} S_7903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(6606);if(r)goto S_7903;} do{ qbs_set(__STRING_L,FUNC_SCASE(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(6607);}while(r); S_7905:; if ((-(*__LONG_N< 3 ))||new_error){ if(qbevent){evnt(6608);if(r)goto S_7905;} 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(6608);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6608);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,&(pass921= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6610);}while(r); S_7910:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_E)))||new_error){ if(qbevent){evnt(6611);if(r)goto S_7910;} S_7911:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6612);if(r)goto S_7911;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6612);}while(r); } do{ *__LONG_Z= 1 ; if(!qbevent)break;evnt(6613);}while(r); do{ *__LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(6614);}while(r); S_7916:; if (((-((*__LONG_T& 511 )!= 16 ))&(-((*__LONG_T& 511 )!= 32 )))||new_error){ if(qbevent){evnt(6615);if(r)goto S_7916;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(6615);}while(r); } S_7919:; if ((*__LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(6616);if(r)goto S_7919;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(6616);}while(r); } S_7922:; if ((*__LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(6617);if(r)goto S_7922;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(6617);}while(r); } S_7925:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(6618);if(r)goto S_7925;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(6618);}while(r); } S_7928:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(6619);if(r)goto S_7928;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(6619);}while(r); } S_7931:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(6620);if(r)goto S_7931;} do{ *__LONG_Z= 0 ; if(!qbevent)break;evnt(6620);}while(r); } S_7934:; if ((-(*__LONG_Z== 0 ))||new_error){ if(qbevent){evnt(6621);if(r)goto S_7934;} 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(6621);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6621);}while(r); } do{ *__LONG_BITS=*__LONG_T& 511 ; if(!qbevent)break;evnt(6622);}while(r); do{ goto LABEL_PU_GOTARRAY; if(!qbevent)break;evnt(6623);}while(r); } S_7941:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6625);if(r)goto S_7941;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6625);}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(6626);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6626);}while(r); LABEL_PU_GOTARRAY:; if(qbevent){evnt(6627);r=0;} S_7946:; if ((-(*__LONG_N== 3 ))||new_error){ if(qbevent){evnt(6629);if(r)goto S_7946;} 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(6630);}while(r); }else{ S_7949:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_N== 4 ))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass922= 4 )),qbs_new_txt_len("(",1)))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_N),qbs_new_txt_len(")",1)))))||new_error){ if(qbevent){evnt(6632);if(r)goto S_7949;} 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(6632);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6632);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(__STRING_E,__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass923= 4 ),__LONG_N))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6633);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6635);}while(r); S_7956:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6636);if(r)goto S_7956;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6636);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6637);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass924= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6638);}while(r); S_7961:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6639);if(r)goto S_7961;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6639);}while(r); } do{ SUB_WRITEBUFLINE(&(pass925=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6640);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6641);}while(r); S_7966:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6641);if(r)goto S_7966;} 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(6641);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6641);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6642);}while(r); } } } S_7975:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("KEY",3))))||new_error){ if(qbevent){evnt(6648);if(r)goto S_7975;} S_7976:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(6649);if(r)goto S_7976;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY ...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6649);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6649);}while(r); } do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("KEY",3)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6650);}while(r); S_7981:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("OFF",3))))||new_error){ if(qbevent){evnt(6651);if(r)goto S_7981;} S_7982:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(6652);if(r)goto S_7982;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY OFF only",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6652);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6652);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Off",3)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6653);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6653);}while(r); S_7988:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6653);if(r)goto S_7988;} 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(6653);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6653);}while(r); } do{ SUB_WRITEBUFLINE(&(pass928=*__LONG_MAINTXTBUF),qbs_new_txt_len("key_off();",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6654);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6655);}while(r); } S_7996:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("ON",2))))||new_error){ if(qbevent){evnt(6657);if(r)goto S_7996;} S_7997:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(6658);if(r)goto S_7997;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY ON only",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6658);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6658);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("On",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6659);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6659);}while(r); S_8003:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6659);if(r)goto S_8003;} 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(6659);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6659);}while(r); } do{ SUB_WRITEBUFLINE(&(pass930=*__LONG_MAINTXTBUF),qbs_new_txt_len("key_on();",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6660);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6661);}while(r); } S_8011:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("LIST",4))))||new_error){ if(qbevent){evnt(6663);if(r)goto S_8011;} S_8012:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(6664);if(r)goto S_8012;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected KEY LIST only",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6664);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6664);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("List",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6665);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6665);}while(r); S_8018:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6665);if(r)goto S_8018;} 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(6665);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6665);}while(r); } do{ SUB_WRITEBUFLINE(&(pass932=*__LONG_MAINTXTBUF),qbs_new_txt_len("key_list();",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6666);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6667);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6670);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6670);}while(r); S_8028:; fornext_value934= 2 ; fornext_finalvalue934=*__LONG_N; fornext_step934= 1 ; if (fornext_step934<0) fornext_step_negative934=1; else fornext_step_negative934=0; if (new_error) goto fornext_error934; goto fornext_entrylabel934; while(1){ fornext_value934=fornext_step934+(*__LONG_I); fornext_entrylabel934: *__LONG_I=fornext_value934; if (fornext_step_negative934){ if (fornext_value934fornext_finalvalue934) break; } fornext_error934:; if(qbevent){evnt(6671);if(r)goto S_8028;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6672);}while(r); S_8030:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6673);if(r)goto S_8030;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6673);}while(r); } S_8033:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6674);if(r)goto S_8033;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6674);}while(r); } S_8036:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(6675);if(r)goto S_8036;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6676);}while(r); do{ goto LABEL_KEY_ASSIGNMENT; if(!qbevent)break;evnt(6676);}while(r); } S_8040:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(6678);if(r)goto S_8040;} 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(6678);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6678);}while(r); } fornext_continue_933:; } fornext_exit_933:; do{ goto LABEL_KEY_FALLTHROUGH; if(!qbevent)break;evnt(6681);}while(r); LABEL_KEY_ASSIGNMENT:; if(qbevent){evnt(6682);r=0;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6685);}while(r); S_8048:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6686);if(r)goto S_8048;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6686);}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(6687);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass936= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6688);}while(r); S_8053:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6689);if(r)goto S_8053;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6689);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass937=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("key_assign(",11),__STRING_E),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6690);}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(6692);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6693);}while(r); S_8059:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6694);if(r)goto S_8059;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6694);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6695);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6696);}while(r); S_8064:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6697);if(r)goto S_8064;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6697);}while(r); } do{ SUB_WRITEBUFLINE(&(pass938=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6698);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6699);}while(r); S_8069:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6699);if(r)goto S_8069;} 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(6699);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6699);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6700);}while(r); } LABEL_KEY_FALLTHROUGH:; if(qbevent){evnt(6702);r=0;} S_8076:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("FIELD",5))))||new_error){ if(qbevent){evnt(6707);if(r)goto S_8076;} do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6710);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6710);}while(r); S_8079:; fornext_value941= 2 ; fornext_finalvalue941=*__LONG_N; fornext_step941= 1 ; if (fornext_step941<0) fornext_step_negative941=1; else fornext_step_negative941=0; if (new_error) goto fornext_error941; goto fornext_entrylabel941; while(1){ fornext_value941=fornext_step941+(*__LONG_I); fornext_entrylabel941: *__LONG_I=fornext_value941; if (fornext_step_negative941){ if (fornext_value941fornext_finalvalue941) break; } fornext_error941:; if(qbevent){evnt(6711);if(r)goto S_8079;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6712);}while(r); S_8081:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6713);if(r)goto S_8081;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6713);}while(r); } S_8084:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6714);if(r)goto S_8084;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6714);}while(r); } S_8087:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(6715);if(r)goto S_8087;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6716);}while(r); do{ goto LABEL_FIELDGOTFN; if(!qbevent)break;evnt(6716);}while(r); } S_8091:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(6718);if(r)goto S_8091;} 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(6718);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6718);}while(r); } fornext_continue_940:; } fornext_exit_940:; do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6720);}while(r); LABEL_FIELDGOTFN:; if(qbevent){evnt(6721);r=0;} S_8098:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("#",1)))|(-(__STRING_E->len== 0 ))))||new_error){ if(qbevent){evnt(6722);if(r)goto S_8098;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6722);}while(r); } S_8101:; 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(6723);if(r)goto S_8101;} do{ qbs_set(__STRING_E,qbs_right(__STRING_E,__STRING_E->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6723);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(6723);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("Field",5)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6723);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6724);}while(r); S_8108:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6725);if(r)goto S_8108;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6725);}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(6726);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass945= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6727);}while(r); S_8113:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6728);if(r)goto S_8113;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6728);}while(r); } do{ SUB_WRITEBUFLINE(&(pass946=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("field_new(",10),__STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6729);}while(r); LABEL_FIELDNEXT:; if(qbevent){evnt(6731);r=0;} S_8117:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6734);if(r)goto S_8117;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6734);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6735);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6735);}while(r); S_8122:; fornext_value948=*__LONG_I; fornext_finalvalue948=*__LONG_N; fornext_step948= 1 ; if (fornext_step948<0) fornext_step_negative948=1; else fornext_step_negative948=0; if (new_error) goto fornext_error948; goto fornext_entrylabel948; while(1){ fornext_value948=fornext_step948+(*__LONG_I); fornext_entrylabel948: *__LONG_I=fornext_value948; if (fornext_step_negative948){ if (fornext_value948fornext_finalvalue948) break; } fornext_error948:; if(qbevent){evnt(6736);if(r)goto S_8122;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6737);}while(r); S_8124:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6738);if(r)goto S_8124;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6738);}while(r); } S_8127:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6739);if(r)goto S_8127;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6739);}while(r); } S_8130:; 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(6740);if(r)goto S_8130;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6741);}while(r); do{ goto LABEL_FIELDGOTFW; if(!qbevent)break;evnt(6741);}while(r); } S_8134:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(6743);if(r)goto S_8134;} 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(6743);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6743);}while(r); } fornext_continue_947:; } fornext_exit_947:; do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6745);}while(r); LABEL_FIELDGOTFW:; if(qbevent){evnt(6746);r=0;} S_8141:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(6747);if(r)goto S_8141;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6747);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6748);}while(r); S_8145:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6749);if(r)goto S_8145;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6749);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_TLAYOUT),__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6750);}while(r); do{ qbs_set(__STRING_SIZEE,FUNC_EVALUATETOTYP(__STRING_E,&(pass951= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6751);}while(r); S_8150:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6752);if(r)goto S_8150;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6752);}while(r); } S_8153:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6755);if(r)goto S_8153;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6755);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6756);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6756);}while(r); S_8158:; fornext_value953=*__LONG_I; fornext_finalvalue953=*__LONG_N; fornext_step953= 1 ; if (fornext_step953<0) fornext_step_negative953=1; else fornext_step_negative953=0; if (new_error) goto fornext_error953; goto fornext_entrylabel953; while(1){ fornext_value953=fornext_step953+(*__LONG_I); fornext_entrylabel953: *__LONG_I=fornext_value953; if (fornext_step_negative953){ if (fornext_value953fornext_finalvalue953) break; } fornext_error953:; if(qbevent){evnt(6757);if(r)goto S_8158;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6758);}while(r); S_8160:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6759);if(r)goto S_8160;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6759);}while(r); } S_8163:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(6760);if(r)goto S_8163;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6760);}while(r); } S_8166:; 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(6761);if(r)goto S_8166;} S_8167:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(6762);if(r)goto S_8167;} do{ *__LONG_I=*__LONG_I- 1 ; if(!qbevent)break;evnt(6762);}while(r); } S_8170:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(6763);if(r)goto S_8170;} S_8171:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(6764);if(r)goto S_8171;} 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(6764);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6764);}while(r); } } do{ goto LABEL_FIELDGOTFNAME; if(!qbevent)break;evnt(6766);}while(r); } S_8179:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E->len))||new_error){ if(qbevent){evnt(6768);if(r)goto S_8179;} 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(6768);}while(r); }else{ do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6768);}while(r); } fornext_continue_952:; } fornext_exit_952:; do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6770);}while(r); LABEL_FIELDGOTFNAME:; if(qbevent){evnt(6771);r=0;} S_8186:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(6772);if(r)goto S_8186;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6772);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6774);}while(r); S_8190:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6775);if(r)goto S_8190;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6775);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6776);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6777);}while(r); S_8195:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6778);if(r)goto S_8195;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6778);}while(r); } S_8198:; if ((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(6779);if(r)goto S_8198;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6779);}while(r); } S_8201:; if ((*__LONG_TYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(6780);if(r)goto S_8201;} 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(6780);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6780);}while(r); } S_8205:; if ((-((*__LONG_TYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(6781);if(r)goto S_8205;} do{ goto LABEL_FIELDERROR; if(!qbevent)break;evnt(6781);}while(r); } do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass957= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6782);}while(r); S_8209:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6783);if(r)goto S_8209;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6783);}while(r); } do{ SUB_WRITEBUFLINE(&(pass958=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6784);}while(r); S_8213:; if ((-(*__LONG_I<*__LONG_N))||new_error){ if(qbevent){evnt(6786);if(r)goto S_8213;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6787);}while(r); do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6788);}while(r); S_8216:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(6789);if(r)goto S_8216;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6789);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6789);}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(6790);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6791);}while(r); do{ goto LABEL_FIELDNEXT; if(!qbevent)break;evnt(6792);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6795);}while(r); S_8225:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6795);if(r)goto S_8225;} 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(6795);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6795);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6796);}while(r); LABEL_FIELDERROR:; if(qbevent){evnt(6798);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(6798);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6798);}while(r); } S_8234:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(6811);if(r)goto S_8234;} S_8235:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("EXIT",4))))||new_error){ if(qbevent){evnt(6812);if(r)goto S_8235;} do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("Exit",4)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6814);}while(r); S_8237:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("DO",2))))||new_error){ if(qbevent){evnt(6816);if(r)goto S_8237;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Do",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6818);}while(r); S_8239:; fornext_value961=*__INTEGER_CONTROLLEVEL; fornext_finalvalue961= 1 ; fornext_step961= -1 ; if (fornext_step961<0) fornext_step_negative961=1; else fornext_step_negative961=0; if (new_error) goto fornext_error961; goto fornext_entrylabel961; while(1){ fornext_value961=fornext_step961+(*__LONG_I); fornext_entrylabel961: *__LONG_I=fornext_value961; if (fornext_step_negative961){ if (fornext_value961fornext_finalvalue961) break; } fornext_error961:; if(qbevent){evnt(6819);if(r)goto S_8239;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(6820);}while(r); S_8241:; if (((-(*__LONG_T== 3 ))|(-(*__LONG_T== 4 )))||new_error){ if(qbevent){evnt(6821);if(r)goto S_8241;} do{ SUB_WRITEBUFLINE(&(pass962=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6822);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6823);}while(r); S_8244:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6823);if(r)goto S_8244;} 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(6823);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6823);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6824);}while(r); } fornext_continue_960:; } fornext_exit_960:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT DO without DO",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6827);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6827);}while(r); } S_8255:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("FOR",3))))||new_error){ if(qbevent){evnt(6830);if(r)goto S_8255;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("For",3)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6832);}while(r); S_8257:; fornext_value965=*__INTEGER_CONTROLLEVEL; fornext_finalvalue965= 1 ; fornext_step965= -1 ; if (fornext_step965<0) fornext_step_negative965=1; else fornext_step_negative965=0; if (new_error) goto fornext_error965; goto fornext_entrylabel965; while(1){ fornext_value965=fornext_step965+(*__LONG_I); fornext_entrylabel965: *__LONG_I=fornext_value965; if (fornext_step_negative965){ if (fornext_value965fornext_finalvalue965) break; } fornext_error965:; if(qbevent){evnt(6833);if(r)goto S_8257;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(6834);}while(r); S_8259:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(6835);if(r)goto S_8259;} do{ SUB_WRITEBUFLINE(&(pass966=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6836);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6837);}while(r); S_8262:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6837);if(r)goto S_8262;} 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(6837);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6837);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6838);}while(r); } fornext_continue_964:; } fornext_exit_964:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT FOR without FOR",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6841);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6841);}while(r); } S_8273:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("WHILE",5))))||new_error){ if(qbevent){evnt(6844);if(r)goto S_8273;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("While",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6846);}while(r); S_8275:; fornext_value969=*__INTEGER_CONTROLLEVEL; fornext_finalvalue969= 1 ; fornext_step969= -1 ; if (fornext_step969<0) fornext_step_negative969=1; else fornext_step_negative969=0; if (new_error) goto fornext_error969; goto fornext_entrylabel969; while(1){ fornext_value969=fornext_step969+(*__LONG_I); fornext_entrylabel969: *__LONG_I=fornext_value969; if (fornext_step_negative969){ if (fornext_value969fornext_finalvalue969) break; } fornext_error969:; if(qbevent){evnt(6847);if(r)goto S_8275;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(6848);}while(r); S_8277:; if ((-(*__LONG_T== 5 ))||new_error){ if(qbevent){evnt(6849);if(r)goto S_8277;} do{ SUB_WRITEBUFLINE(&(pass970=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6850);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6851);}while(r); S_8280:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6851);if(r)goto S_8280;} 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(6851);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6851);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6852);}while(r); } fornext_continue_968:; } fornext_exit_968:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT WHILE without WHILE",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6855);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6855);}while(r); } S_8291:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("SELECT",6))))||new_error){ if(qbevent){evnt(6858);if(r)goto S_8291;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Select",6)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6860);}while(r); S_8293:; fornext_value973=*__INTEGER_CONTROLLEVEL; fornext_finalvalue973= 1 ; fornext_step973= -1 ; if (fornext_step973<0) fornext_step_negative973=1; else fornext_step_negative973=0; if (new_error) goto fornext_error973; goto fornext_entrylabel973; while(1){ fornext_value973=fornext_step973+(*__LONG_I); fornext_entrylabel973: *__LONG_I=fornext_value973; if (fornext_step_negative973){ if (fornext_value973fornext_finalvalue973) break; } fornext_error973:; if(qbevent){evnt(6861);if(r)goto S_8293;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(6862);}while(r); S_8295:; if (((-(*__LONG_T== 18 ))|(-(*__LONG_T== 19 )))||new_error){ if(qbevent){evnt(6863);if(r)goto S_8295;} do{ SUB_WRITEBUFLINE(&(pass974=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto sc_",8),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I- 1 )-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_end;",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6864);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6865);}while(r); S_8298:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6865);if(r)goto S_8298;} 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(6865);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6865);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6866);}while(r); } fornext_continue_972:; } fornext_exit_972:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT SELECT without SELECT",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6869);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6869);}while(r); } S_8309:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("CASE",4))))||new_error){ if(qbevent){evnt(6872);if(r)goto S_8309;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Case",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6874);}while(r); S_8311:; fornext_value977=*__INTEGER_CONTROLLEVEL; fornext_finalvalue977= 1 ; fornext_step977= -1 ; if (fornext_step977<0) fornext_step_negative977=1; else fornext_step_negative977=0; if (new_error) goto fornext_error977; goto fornext_entrylabel977; while(1){ fornext_value977=fornext_step977+(*__LONG_I); fornext_entrylabel977: *__LONG_I=fornext_value977; if (fornext_step_negative977){ if (fornext_value977fornext_finalvalue977) break; } fornext_error977:; if(qbevent){evnt(6875);if(r)goto S_8311;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(6876);}while(r); S_8313:; if ((-(*__LONG_T== 18 ))||new_error){ if(qbevent){evnt(6877);if(r)goto S_8313;} do{ SUB_WRITEBUFLINE(&(pass978=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto sc_ec_",11),FUNC_STR2(&(pass979=*__LONG_EVERYCASENEWCASE+ 1 ))),qbs_new_txt_len("_end;",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6878);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6879);}while(r); S_8316:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6879);if(r)goto S_8316;} 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(6879);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6879);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6880);}while(r); S_8322:; }else{ if (-(*__LONG_T== 19 )){ if(qbevent){evnt(6881);if(r)goto S_8322;} do{ SUB_WRITEBUFLINE(&(pass981=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto sc_",8),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I- 1 )-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len("_end;",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6882);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(6883);}while(r); S_8325:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(6883);if(r)goto S_8325;} 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(6883);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6883);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(6884);}while(r); } } fornext_continue_976:; } fornext_exit_976:; do{ qbs_set(__STRING_A,qbs_new_txt_len("EXIT CASE without CASE",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6887);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6887);}while(r); } } } S_8338:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(6900);if(r)goto S_8338;} S_8339:; 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(6901);if(r)goto S_8339;} do{ tmp_long=array_check(( 12 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(6902);}while(r); do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(6903);}while(r); S_8342:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6904);if(r)goto S_8342;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6904);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6904);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6905);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6905);}while(r); S_8348:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(6906);if(r)goto S_8348;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6906);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6906);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(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(6907);}while(r); S_8353:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6908);if(r)goto S_8353;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6908);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6908);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(6909);}while(r); do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6910);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6911);}while(r); do{ qbs_set(__STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6912);}while(r); S_8361:; fornext_value984=*__LONG_I; fornext_finalvalue984=*__LONG_N; fornext_step984= 1 ; if (fornext_step984<0) fornext_step_negative984=1; else fornext_step_negative984=0; if (new_error) goto fornext_error984; goto fornext_entrylabel984; while(1){ fornext_value984=fornext_step984+(*__LONG_I); fornext_entrylabel984: *__LONG_I=fornext_value984; if (fornext_step_negative984){ if (fornext_value984fornext_finalvalue984) break; } fornext_error984:; if(qbevent){evnt(6913);if(r)goto S_8361;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6914);}while(r); do{ *__LONG_A=qbs_asc(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6915);}while(r); S_8364:; if ((-(*__LONG_A== 40 ))||new_error){ if(qbevent){evnt(6916);if(r)goto S_8364;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(6916);}while(r); } S_8367:; if ((-(*__LONG_A== 41 ))||new_error){ if(qbevent){evnt(6917);if(r)goto S_8367;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(6917);}while(r); } S_8370:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(6918);if(r)goto S_8370;} do{ goto LABEL_ONSTRIGGOTARG; if(!qbevent)break;evnt(6918);}while(r); } S_8373:; if (((-(*__LONG_A== 44 ))&(-(*__LONG_B== 0 )))||new_error){ if(qbevent){evnt(6919);if(r)goto S_8373;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(6920);}while(r); S_8375:; if ((-(*__LONG_X> 1 ))||new_error){ if(qbevent){evnt(6921);if(r)goto S_8375;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6921);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6921);}while(r); } S_8379:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6922);if(r)goto S_8379;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6922);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6922);}while(r); } do{ qbs_set(__STRING_E3,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6923);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6924);}while(r); }else{ S_8386:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E2->len))||new_error){ if(qbevent){evnt(6926);if(r)goto S_8386;} 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(6926);}while(r); }else{ do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6926);}while(r); } } fornext_continue_983:; } fornext_exit_983:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6929);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6929);}while(r); LABEL_ONSTRIGGOTARG:; if(qbevent){evnt(6930);r=0;} S_8395:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(6931);if(r)goto S_8395;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... )",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6931);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6931);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass986=*__LONG_MAINTXTBUF),qbs_new_txt_len("onstrig_setup(",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6932);}while(r); S_8400:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E3->len))||new_error){ if(qbevent){evnt(6935);if(r)goto S_8400;} do{ qbs_set(__STRING_OPTI,__STRING_E3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6936);}while(r); do{ qbs_set(__STRING_OPTCONTROLLER,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6937);}while(r); do{ qbs_set(__STRING_OPTPASSED,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6938);}while(r); }else{ do{ qbs_set(__STRING_OPTI,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6940);}while(r); do{ qbs_set(__STRING_OPTCONTROLLER,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6941);}while(r); do{ qbs_set(__STRING_OPTPASSED,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6942);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OPTI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6946);}while(r); S_8410:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6946);if(r)goto S_8410;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6946);}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(6947);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass988= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6948);}while(r); S_8415:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6948);if(r)goto S_8415;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6948);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass989=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6949);}while(r); S_8419:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OPTPASSED,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(6952);if(r)goto S_8419;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OPTCONTROLLER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6953);}while(r); S_8421:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6953);if(r)goto S_8421;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6953);}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(6954);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass990= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6955);}while(r); S_8426:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(6955);if(r)goto S_8426;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6955);}while(r); } }else{ do{ qbs_set(__STRING_E,__STRING_OPTCONTROLLER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6957);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass991=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len(",",1)),__STRING_OPTPASSED),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6959);}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(6961);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6963);}while(r); S_8435:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6964);if(r)goto S_8435;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6964);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6964);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6965);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6965);}while(r); do{ *__LONG_ONSTRIGID=*__LONG_ONSTRIGID+ 1 ; if(!qbevent)break;evnt(6966);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass992=*__LONG_MAINTXTBUF),qbs_add(FUNC_STR2(__LONG_ONSTRIGID),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6967);}while(r); S_8443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(6969);if(r)goto S_8443;} S_8444:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(6970);if(r)goto S_8444;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linenumber/label",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6970);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6970);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6971);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(6971);}while(r); do{ SUB_WRITEBUFLINE(&(pass993=*__LONG_MAINTXTBUF),qbs_new_txt_len("0);",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6973);}while(r); S_8451:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(6975);if(r)goto S_8451;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6975);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(6975);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass994= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6977);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(6978);}while(r); LABEL_LABCHK60Z:; if(qbevent){evnt(6979);r=0;} S_8457:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(6980);if(r)goto S_8457;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(6981);}while(r); S_8459:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(6982);if(r)goto S_8459;} S_8460:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(6983);if(r)goto S_8460;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))= 0 ; if(!qbevent)break;evnt(6983);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(6984);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(6985);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(6986);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(6987);}while(r); }else{ S_8468:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(6989);if(r)goto S_8468;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(6989);}while(r); do{ goto LABEL_LABCHK60Z; if(!qbevent)break;evnt(6989);}while(r); } } } S_8474:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(6992);if(r)goto S_8474;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(6994);}while(r); S_8476:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(6994);if(r)goto S_8476;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(6994);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elements=return_points) more_return_points();",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7013);}while(r); do{ SUB_WRITEBUFLINE(&(pass1003=*__LONG_STRIGTXTBUF),qbs_new_txt_len("QBMAIN(NULL);",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7014);}while(r); do{ SUB_WRITEBUFLINE(&(pass1004=*__LONG_STRIGTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7015);}while(r); S_8499:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7017);if(r)goto S_8499;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7017);}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(7017);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7018);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7019);}while(r); }else{ do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7024);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7025);}while(r); S_8509:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7026);if(r)goto S_8509;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7026);}while(r); } S_8512:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(7027);if(r)goto S_8512;} S_8513:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(7028);if(r)goto S_8513;} do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7028);}while(r); do{ goto dl_exit_1006; if(!qbevent)break;evnt(7028);}while(r); } S_8517:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(7029);if(r)goto S_8517;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(7029);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7029);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(7029);}while(r); } S_8523:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7030);if(r)goto S_8523;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7030);}while(r); } dl_continue_1006:; } dl_exit_1006:; S_8527:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(7032);if(r)goto S_8527;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7032);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7032);}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(7034);}while(r); do{ SUB_WRITEBUFLINE(&(pass1007=*__LONG_STRIGTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_ONSTRIGID)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7036);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1008=*__LONG_STRIGTXTBUF),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(7037);}while(r); S_8534:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))> 1 ))||new_error){ if(qbevent){evnt(7039);if(r)goto S_8534;} 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(7039);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7039);}while(r); } S_8538:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7041);if(r)goto S_8538;} S_8539:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))== 1 ))||new_error){ if(qbevent){evnt(7043);if(r)goto S_8539;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected argument after SUB",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7043);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7043);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1009=*__LONG_MAINTXTBUF),qbs_new_txt_len("0);",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7044);}while(r); do{ SUB_WRITEBUFLINE(&(pass1010=*__LONG_STRIGTXTBUF),qbs_new_txt_len(");",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7045);}while(r); }else{ S_8546:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))== 0 ))||new_error){ if(qbevent){evnt(7049);if(r)goto S_8546;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB has no arguments",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7049);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7049);}while(r); } do{ *__LONG_T=string2l(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7051);}while(r); do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(7052);}while(r); S_8552:; 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(7053);if(r)goto S_8552;} 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(7053);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7053);}while(r); } S_8556:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(7054);if(r)goto S_8556;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7054);}while(r); } S_8559:; if ((-(*__LONG_B== 16 ))||new_error){ if(qbevent){evnt(7055);if(r)goto S_8559;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7055);}while(r); } S_8562:; if ((-(*__LONG_B== 32 ))||new_error){ if(qbevent){evnt(7056);if(r)goto S_8562;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7056);}while(r); } S_8565:; if ((-(*__LONG_B== 64 ))||new_error){ if(qbevent){evnt(7057);if(r)goto S_8565;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7057);}while(r); } S_8568:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(7058);if(r)goto S_8568;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7058);}while(r); } S_8571:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(7059);if(r)goto S_8571;} 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(7059);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1011=*__LONG_STRIGTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_CT),qbs_new_txt_len("*)&i64);",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7060);}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(7062);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7063);}while(r); S_8577:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7064);if(r)goto S_8577;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7064);}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(7065);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1012=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7066);}while(r); S_8582:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7067);if(r)goto S_8582;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7067);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1013=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7068);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1014=*__LONG_STRIGTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7072);}while(r); S_8588:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7073);if(r)goto S_8588;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7073);}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(7073);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7074);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7075);}while(r); } } } S_8598:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(7092);if(r)goto S_8598;} S_8599:; 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(7093);if(r)goto S_8599;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(7094);}while(r); S_8601:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7095);if(r)goto S_8601;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7095);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7095);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7096);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7096);}while(r); S_8607:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7097);if(r)goto S_8607;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7097);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7097);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(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(7098);}while(r); S_8612:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7099);if(r)goto S_8612;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7099);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7099);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(7100);}while(r); do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7101);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7102);}while(r); do{ qbs_set(__STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7103);}while(r); S_8620:; fornext_value1017=*__LONG_I; fornext_finalvalue1017=*__LONG_N; 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_I); fornext_entrylabel1017: *__LONG_I=fornext_value1017; if (fornext_step_negative1017){ if (fornext_value1017fornext_finalvalue1017) break; } fornext_error1017:; if(qbevent){evnt(7104);if(r)goto S_8620;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7105);}while(r); do{ *__LONG_A=qbs_asc(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7106);}while(r); S_8623:; if ((-(*__LONG_A== 40 ))||new_error){ if(qbevent){evnt(7107);if(r)goto S_8623;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(7107);}while(r); } S_8626:; if ((-(*__LONG_A== 41 ))||new_error){ if(qbevent){evnt(7108);if(r)goto S_8626;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(7108);}while(r); } S_8629:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(7109);if(r)goto S_8629;} do{ goto LABEL_ONTIMGOTARG; if(!qbevent)break;evnt(7109);}while(r); } S_8632:; if (((-(*__LONG_A== 44 ))&(-(*__LONG_B== 0 )))||new_error){ if(qbevent){evnt(7110);if(r)goto S_8632;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(7111);}while(r); S_8634:; if ((-(*__LONG_X> 1 ))||new_error){ if(qbevent){evnt(7112);if(r)goto S_8634;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7112);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7112);}while(r); } S_8638:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7113);if(r)goto S_8638;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... ,",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7113);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7113);}while(r); } do{ qbs_set(__STRING_E3,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7114);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7115);}while(r); }else{ S_8645:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E2->len))||new_error){ if(qbevent){evnt(7117);if(r)goto S_8645;} 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(7117);}while(r); }else{ do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7117);}while(r); } } fornext_continue_1016:; } fornext_exit_1016:; do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7120);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7120);}while(r); LABEL_ONTIMGOTARG:; if(qbevent){evnt(7121);r=0;} S_8654:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7122);if(r)goto S_8654;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... )",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7122);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7122);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1019=*__LONG_MAINTXTBUF),qbs_new_txt_len("ontimer_setup(",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7123);}while(r); S_8659:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E3->len))||new_error){ if(qbevent){evnt(7125);if(r)goto S_8659;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7126);}while(r); S_8661:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7127);if(r)goto S_8661;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7127);}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(7128);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1021= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7129);}while(r); S_8666:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7130);if(r)goto S_8666;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7130);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1022=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7131);}while(r); }else{ do{ SUB_WRITEBUFRAWDATA(&(pass1023=*__LONG_MAINTXTBUF),qbs_new_txt_len("0,",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7133);}while(r); do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7134);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7137);}while(r); S_8675:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7138);if(r)goto S_8675;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7138);}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(7139);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1024=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7140);}while(r); S_8680:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7141);if(r)goto S_8680;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7141);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1025=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7142);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7143);}while(r); S_8685:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7144);if(r)goto S_8685;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7144);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7144);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7145);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7145);}while(r); do{ *__LONG_ONTIMERID=*__LONG_ONTIMERID+ 1 ; if(!qbevent)break;evnt(7146);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1026=*__LONG_MAINTXTBUF),qbs_add(FUNC_STR2(__LONG_ONTIMERID),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7147);}while(r); S_8693:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(7149);if(r)goto S_8693;} S_8694:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7150);if(r)goto S_8694;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linenumber/label",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7150);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7150);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7151);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7151);}while(r); do{ SUB_WRITEBUFLINE(&(pass1027=*__LONG_MAINTXTBUF),qbs_new_txt_len("0);",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7153);}while(r); S_8701:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(7155);if(r)goto S_8701;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7155);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7155);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass1028= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7157);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7158);}while(r); LABEL_LABCHK60:; if(qbevent){evnt(7159);r=0;} S_8707:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7160);if(r)goto S_8707;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(7161);}while(r); S_8709:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7162);if(r)goto S_8709;} S_8710:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7163);if(r)goto S_8710;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))= 0 ; if(!qbevent)break;evnt(7163);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7164);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7165);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7166);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(7167);}while(r); }else{ S_8718:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7169);if(r)goto S_8718;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7169);}while(r); do{ goto LABEL_LABCHK60; if(!qbevent)break;evnt(7169);}while(r); } } } S_8724:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7172);if(r)goto S_8724;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7174);}while(r); S_8726:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7174);if(r)goto S_8726;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7174);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elements=return_points) more_return_points();",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7193);}while(r); do{ SUB_WRITEBUFLINE(&(pass1037=*__LONG_TIMETXTBUF),qbs_new_txt_len("QBMAIN(NULL);",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7194);}while(r); do{ SUB_WRITEBUFLINE(&(pass1038=*__LONG_TIMETXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7195);}while(r); S_8749:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7205);if(r)goto S_8749;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7205);}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(7205);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7206);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7207);}while(r); }else{ do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7211);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7212);}while(r); S_8759:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7213);if(r)goto S_8759;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7213);}while(r); } S_8762:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(7214);if(r)goto S_8762;} S_8763:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(7215);if(r)goto S_8763;} do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7215);}while(r); do{ goto dl_exit_1040; if(!qbevent)break;evnt(7215);}while(r); } S_8767:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(7216);if(r)goto S_8767;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(7216);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7216);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(7216);}while(r); } S_8773:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7217);if(r)goto S_8773;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7217);}while(r); } dl_continue_1040:; } dl_exit_1040:; S_8777:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(7219);if(r)goto S_8777;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7219);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7219);}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(7221);}while(r); do{ SUB_WRITEBUFLINE(&(pass1041=*__LONG_TIMETXTBUF),qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_ONTIMERID)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7223);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1042=*__LONG_TIMETXTBUF),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(7224);}while(r); S_8784:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))> 1 ))||new_error){ if(qbevent){evnt(7226);if(r)goto S_8784;} 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(7226);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7226);}while(r); } S_8788:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7228);if(r)goto S_8788;} S_8789:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))== 1 ))||new_error){ if(qbevent){evnt(7230);if(r)goto S_8789;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected argument after SUB",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7230);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7230);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1043=*__LONG_MAINTXTBUF),qbs_new_txt_len("0);",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7231);}while(r); do{ SUB_WRITEBUFLINE(&(pass1044=*__LONG_TIMETXTBUF),qbs_new_txt_len(");",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7232);}while(r); }else{ S_8796:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))== 0 ))||new_error){ if(qbevent){evnt(7236);if(r)goto S_8796;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB has no arguments",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7236);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7236);}while(r); } do{ *__LONG_T=string2l(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7238);}while(r); do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(7239);}while(r); S_8802:; 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(7240);if(r)goto S_8802;} 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(7240);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7240);}while(r); } S_8806:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(7241);if(r)goto S_8806;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7241);}while(r); } S_8809:; if ((-(*__LONG_B== 16 ))||new_error){ if(qbevent){evnt(7242);if(r)goto S_8809;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7242);}while(r); } S_8812:; if ((-(*__LONG_B== 32 ))||new_error){ if(qbevent){evnt(7243);if(r)goto S_8812;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7243);}while(r); } S_8815:; if ((-(*__LONG_B== 64 ))||new_error){ if(qbevent){evnt(7244);if(r)goto S_8815;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7244);}while(r); } S_8818:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(7245);if(r)goto S_8818;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7245);}while(r); } S_8821:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(7246);if(r)goto S_8821;} 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(7246);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1045=*__LONG_TIMETXTBUF),qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_CT),qbs_new_txt_len("*)&i64);",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7247);}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(7249);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7250);}while(r); S_8827:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7251);if(r)goto S_8827;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7251);}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(7252);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1046=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7253);}while(r); S_8832:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7254);if(r)goto S_8832;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7254);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1047=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7255);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1048=*__LONG_TIMETXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7259);}while(r); S_8838:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7260);if(r)goto S_8838;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7260);}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(7260);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7261);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7262);}while(r); } } } S_8848:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(7271);if(r)goto S_8848;} S_8849:; 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(7272);if(r)goto S_8849;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(7273);}while(r); S_8851:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7274);if(r)goto S_8851;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7274);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7274);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7275);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7275);}while(r); S_8857:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7276);if(r)goto S_8857;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected (",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7276);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7276);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(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(7277);}while(r); S_8862:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7278);if(r)goto S_8862;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7278);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7278);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(7279);}while(r); do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7280);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7281);}while(r); S_8869:; fornext_value1051=*__LONG_I; fornext_finalvalue1051=*__LONG_N; fornext_step1051= 1 ; if (fornext_step1051<0) fornext_step_negative1051=1; else fornext_step_negative1051=0; if (new_error) goto fornext_error1051; goto fornext_entrylabel1051; while(1){ fornext_value1051=fornext_step1051+(*__LONG_I); fornext_entrylabel1051: *__LONG_I=fornext_value1051; if (fornext_step_negative1051){ if (fornext_value1051fornext_finalvalue1051) break; } fornext_error1051:; if(qbevent){evnt(7282);if(r)goto S_8869;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7283);}while(r); do{ *__LONG_A=qbs_asc(__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7284);}while(r); S_8872:; if ((-(*__LONG_A== 40 ))||new_error){ if(qbevent){evnt(7287);if(r)goto S_8872;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(7287);}while(r); } S_8875:; if ((-(*__LONG_A== 41 ))||new_error){ if(qbevent){evnt(7288);if(r)goto S_8875;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(7288);}while(r); } S_8878:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(7289);if(r)goto S_8878;} do{ goto fornext_exit_1050; if(!qbevent)break;evnt(7289);}while(r); } S_8881:; if ((qbs_cleanup(qbs_tmp_base,__STRING_E2->len))||new_error){ if(qbevent){evnt(7290);if(r)goto S_8881;} 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(7290);}while(r); }else{ do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7290);}while(r); } fornext_continue_1050:; } fornext_exit_1050:; S_8887:; if ((-(*__LONG_I==(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(7292);if(r)goto S_8887;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7292);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7292);}while(r); } S_8891:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7293);if(r)goto S_8891;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... )",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7293);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7293);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7295);}while(r); S_8896:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7296);if(r)goto S_8896;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7296);}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(7297);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1053=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7298);}while(r); S_8901:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7299);if(r)goto S_8901;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7299);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1054=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("onkey_setup(",12),__STRING_E),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7300);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7302);}while(r); S_8906:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7303);if(r)goto S_8906;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub-name",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7303);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7303);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7304);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7304);}while(r); do{ *__LONG_ONKEYID=*__LONG_ONKEYID+ 1 ; if(!qbevent)break;evnt(7305);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1055=*__LONG_MAINTXTBUF),qbs_add(FUNC_STR2(__LONG_ONKEYID),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7306);}while(r); S_8914:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(7308);if(r)goto S_8914;} S_8915:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7309);if(r)goto S_8915;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected linenumber/label",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7309);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7309);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7310);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7310);}while(r); do{ SUB_WRITEBUFLINE(&(pass1056=*__LONG_MAINTXTBUF),qbs_new_txt_len("0);",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7312);}while(r); S_8922:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(7314);if(r)goto S_8922;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7314);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7314);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass1057= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7316);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7317);}while(r); LABEL_LABCHK61:; if(qbevent){evnt(7318);r=0;} S_8928:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(7319);if(r)goto S_8928;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(7320);}while(r); S_8930:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(7321);if(r)goto S_8930;} S_8931:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(7322);if(r)goto S_8931;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))= 0 ; if(!qbevent)break;evnt(7322);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7323);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7324);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(7325);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(7326);}while(r); }else{ S_8939:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(7328);if(r)goto S_8939;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(7328);}while(r); do{ goto LABEL_LABCHK61; if(!qbevent)break;evnt(7328);}while(r); } } } S_8945:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(7331);if(r)goto S_8945;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(7333);}while(r); S_8947:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(7333);if(r)goto S_8947;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(7333);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elements=return_points) more_return_points();",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7352);}while(r); do{ SUB_WRITEBUFLINE(&(pass1066=*__LONG_KEYTXTBUF),qbs_new_txt_len("QBMAIN(NULL);",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7353);}while(r); do{ SUB_WRITEBUFLINE(&(pass1067=*__LONG_KEYTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7354);}while(r); S_8970:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7356);if(r)goto S_8970;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7356);}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(7356);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7357);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7358);}while(r); }else{ do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(7362);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7363);}while(r); S_8980:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7364);if(r)goto S_8980;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7364);}while(r); } S_8983:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(7365);if(r)goto S_8983;} S_8984:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(7366);if(r)goto S_8984;} do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(7366);}while(r); do{ goto dl_exit_1069; if(!qbevent)break;evnt(7366);}while(r); } S_8988:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(7367);if(r)goto S_8988;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(7367);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7367);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(7367);}while(r); } S_8994:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7368);if(r)goto S_8994;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7368);}while(r); } dl_continue_1069:; } dl_exit_1069:; S_8998:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(7370);if(r)goto S_8998;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected GOSUB/sub",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7370);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7370);}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(7372);}while(r); do{ SUB_WRITEBUFLINE(&(pass1070=*__LONG_KEYTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_ONKEYID)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7374);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1071=*__LONG_KEYTXTBUF),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(7375);}while(r); S_9005:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))> 1 ))||new_error){ if(qbevent){evnt(7377);if(r)goto S_9005;} 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(7377);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7377);}while(r); } S_9009:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7379);if(r)goto S_9009;} S_9010:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))== 1 ))||new_error){ if(qbevent){evnt(7381);if(r)goto S_9010;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected argument after SUB",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7381);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7381);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1072=*__LONG_MAINTXTBUF),qbs_new_txt_len("0);",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7382);}while(r); do{ SUB_WRITEBUFLINE(&(pass1073=*__LONG_KEYTXTBUF),qbs_new_txt_len(");",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7383);}while(r); }else{ S_9017:; if ((-(*(int16*)(((char*)__UDT_ID)+(809))== 0 ))||new_error){ if(qbevent){evnt(7387);if(r)goto S_9017;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB has no arguments",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7387);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7387);}while(r); } do{ *__LONG_T=string2l(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7389);}while(r); do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(7390);}while(r); S_9023:; 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(7391);if(r)goto S_9023;} 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(7391);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7391);}while(r); } S_9027:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(7392);if(r)goto S_9027;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7392);}while(r); } S_9030:; if ((-(*__LONG_B== 16 ))||new_error){ if(qbevent){evnt(7393);if(r)goto S_9030;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7393);}while(r); } S_9033:; if ((-(*__LONG_B== 32 ))||new_error){ if(qbevent){evnt(7394);if(r)goto S_9033;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7394);}while(r); } S_9036:; if ((-(*__LONG_B== 64 ))||new_error){ if(qbevent){evnt(7395);if(r)goto S_9036;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7395);}while(r); } S_9039:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(7396);if(r)goto S_9039;} do{ qbs_set(__STRING_CT,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7396);}while(r); } S_9042:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(7397);if(r)goto S_9042;} 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(7397);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1074=*__LONG_KEYTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("(",1),__STRING_CT),qbs_new_txt_len("*)&i64);",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7398);}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(7400);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7401);}while(r); S_9048:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7402);if(r)goto S_9048;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7402);}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(7403);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1075=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7404);}while(r); S_9053:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7405);if(r)goto S_9053;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7405);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1076=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7406);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1077=*__LONG_KEYTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7410);}while(r); S_9059:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(7411);if(r)goto S_9059;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7411);}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(7411);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7412);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7413);}while(r); } } } S_9069:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7446);if(r)goto S_9069;} S_9070:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SHARED",6))))||new_error){ if(qbevent){evnt(7447);if(r)goto S_9070;} S_9071:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(7448);if(r)goto S_9071;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SHARED ...",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7448);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7448);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(7449);}while(r); S_9076:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(7450);if(r)goto S_9076;} 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(7450);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7450);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Shared",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7454);}while(r); LABEL_SUBFUNCSHR:; if(qbevent){evnt(7455);r=0;} do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7458);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7458);}while(r); S_9083:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7460);if(r)goto S_9083;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SHARED variable-name or SHARED AS type variable-list",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7460);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7460);}while(r); } S_9087:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_ucase(__STRING_N),qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(7462);if(r)goto S_9087;} do{ *__LONG_NEWSHAREDSYNTAX= 0 ; if(!qbevent)break;evnt(7464);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7465);}while(r); S_9090:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7466);if(r)goto S_9090;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7466);}while(r); } do{ qbs_set(__STRING_L2,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7467);}while(r); do{ *__LONG_A= 0 ; if(!qbevent)break;evnt(7470);}while(r); S_9095:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7471);if(r)goto S_9095;} S_9096:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1079=*__LONG_I+ 1 )),qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(7472);if(r)goto S_9096;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ()",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7472);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7472);}while(r); } do{ *__LONG_I=*__LONG_I+ 2 ; if(!qbevent)break;evnt(7473);}while(r); do{ *__LONG_A= 1 ; if(!qbevent)break;evnt(7474);}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(7475);}while(r); } do{ *__LONG_METHOD= 1 ; if(!qbevent)break;evnt(7478);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7481);}while(r); do{ qbs_set(__STRING_TS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7482);}while(r); do{ qbs_set(__STRING_T3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7483);}while(r); S_9108:; 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(7484);if(r)goto S_9108;} do{ qbs_set(__STRING_L2,qbs_add(qbs_add(__STRING_L2,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("As",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7485);}while(r); LABEL_GETSHRTYP:; if(qbevent){evnt(7486);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7487);}while(r); do{ qbs_set(__STRING_T2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7488);}while(r); S_9112:; 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(7489);if(r)goto S_9112;} S_9113:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7490);if(r)goto S_9113;} do{ qbs_set(__STRING_T,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7490);}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(7490);}while(r); } S_9118:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7491);if(r)goto S_9118;} do{ qbs_set(__STRING_T3,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7491);}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(7491);}while(r); } do{ goto LABEL_GETSHRTYP; if(!qbevent)break;evnt(7492);}while(r); } S_9125:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7494);if(r)goto S_9125;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected AS type",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7494);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7494);}while(r); } do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7496);}while(r); S_9130:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7497);if(r)goto S_9130;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7497);}while(r); } S_9133:; if ((*__LONG_T&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(7498);if(r)goto S_9133;} do{ *__LONG_T=*__LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(7498);}while(r); } S_9136:; if ((*__LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(7499);if(r)goto S_9136;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(7499);}while(r); } S_9139:; if ((*__LONG_T&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(7500);if(r)goto S_9139;} do{ *__LONG_T=*__LONG_T-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(7500);}while(r); } do{ *__LONG_TSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(7501);}while(r); do{ *__LONG_METHOD= 0 ; if(!qbevent)break;evnt(7502);}while(r); S_9144:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(7503);if(r)goto S_9144;} do{ qbs_set(__STRING_TS,FUNC_TYPE2SYMBOL(__STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7504);}while(r); do{ qbs_set(__STRING_L2,qbs_add(qbs_add(__STRING_L2,__STRING1_SP),FUNC_SCASE2(__STRING_T3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7505);}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(7507);}while(r); S_9149:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(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_new_txt_len("_MEM",4)))&(qbs_equal(qbs_ucase(__STRING_T),qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(7508);if(r)goto S_9149;} do{ qbs_set(__STRING_T3,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7509);}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(7511);}while(r); } S_9154:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7513);if(r)goto S_9154;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7513);}while(r); } } S_9158:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_S->len!= 0 ))&(-(__STRING_T->len!= 0 ))))||new_error){ if(qbevent){evnt(7517);if(r)goto S_9158;} 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(7517);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7517);}while(r); } S_9162:; 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(7520);if(r)goto S_9162;} S_9163:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_N, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(7521);if(r)goto S_9163;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(7521);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_N))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7521);}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(7522);}while(r); } LABEL_NORMALSHAREDBLOCK:; if(qbevent){evnt(7525);r=0;} do{ qbs_set(__STRING_OLDSUBFUNC,__STRING_SUBFUNC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7527);}while(r); do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7528);}while(r); do{ *__INTEGER_DEFDATAHANDLE=*__LONG_GLOBTXTBUF; if(!qbevent)break;evnt(7529);}while(r); do{ *__LONG_DATATXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7530);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7531);}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(7534);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7535);}while(r); S_9177:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7536);if(r)goto S_9177;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7536);}while(r); } S_9180:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(7537);if(r)goto S_9180;} S_9181:; if ((*__LONG_A)||new_error){ if(qbevent){evnt(7538);if(r)goto S_9181;} S_9182:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(7541);if(r)goto S_9182;} S_9183:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_T->len== 0 )))||new_error){ if(qbevent){evnt(7542);if(r)goto S_9183;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(7542);}while(r); } do{ *__LONG_T2=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(7543);}while(r); do{ *__LONG_T2SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(7543);}while(r); S_9188:; if ((*__LONG_T2&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(7544);if(r)goto S_9188;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(7544);}while(r); } S_9191:; if ((*__LONG_T2&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(7545);if(r)goto S_9191;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISPOINTER; if(!qbevent)break;evnt(7545);}while(r); } S_9194:; if ((*__LONG_T2&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(7546);if(r)goto S_9194;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(7546);}while(r); } S_9197:; if (((-(*__LONG_T==*__LONG_T2))&(-(*__LONG_TSIZE==*__LONG_T2SIZE)))||new_error){ if(qbevent){evnt(7547);if(r)goto S_9197;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(7547);}while(r); } } }else{ S_9202:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(7553);if(r)goto S_9202;} S_9203:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_T->len== 0 )))||new_error){ if(qbevent){evnt(7554);if(r)goto S_9203;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(7554);}while(r); } do{ *__LONG_T2=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(7555);}while(r); do{ *__LONG_T2SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(7555);}while(r); S_9208:; if ((*__LONG_T2&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(7556);if(r)goto S_9208;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(7556);}while(r); } S_9211:; if ((*__LONG_T2&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(7557);if(r)goto S_9211;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISPOINTER; if(!qbevent)break;evnt(7557);}while(r); } S_9214:; if ((*__LONG_T2&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(7558);if(r)goto S_9214;} do{ *__LONG_T2=*__LONG_T2-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(7558);}while(r); } S_9217:; if (( 0 )||new_error){ if(qbevent){evnt(7560);if(r)goto S_9217;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1085; sub_file_print(tmp_fileno,qbs_new_txt_len("SHARED:comparing:",17), 0, 0, 0); if (new_error) goto skip1085; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_T)), 1, 0, 0); if (new_error) goto skip1085; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_T2)), 1, 1, 0); if (new_error) goto skip1085; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_TSIZE)), 1, 0, 0); if (new_error) goto skip1085; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_T2SIZE)), 1, 0, 1); if (new_error) goto skip1085; skip1085: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(7560);}while(r); } S_9220:; if (((-(*__LONG_T==*__LONG_T2))&(-(*__LONG_TSIZE==*__LONG_T2SIZE)))||new_error){ if(qbevent){evnt(7562);if(r)goto S_9220;} do{ goto LABEL_SHRFOUND; if(!qbevent)break;evnt(7562);}while(r); } } } S_9225:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(7567);if(r)goto S_9225;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(7567);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7567);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(7567);}while(r); } S_9231:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7568);if(r)goto S_9231;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7568);}while(r); } dl_continue_1082:; } dl_exit_1082:; S_9235:; if ((*__LONG_A)||new_error){ if(qbevent){evnt(7571);if(r)goto S_9235;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Array '",7),__STRING_N),qbs_new_txt_len("' not defined",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7571);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7571);}while(r); } S_9239:; if ((qbs_cleanup(qbs_tmp_base,__STRING_S->len))||new_error){ if(qbevent){evnt(7573);if(r)goto S_9239;} do{ qbs_set(__STRING_TYP,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7573);}while(r); }else{ do{ qbs_set(__STRING_TYP,__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7573);}while(r); } S_9244:; if ((*__BYTE_OPTIONEXPLICIT)||new_error){ if(qbevent){evnt(7574);if(r)goto S_9244;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Variable '",10),__STRING_N),qbs_new_txt_len("' (",3)),FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)),qbs_new_txt_len(") not defined",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7574);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7574);}while(r); } do{ *__BYTE_BYPASSNEXTVARIABLE= -1 ; if(!qbevent)break;evnt(7575);}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(7576);}while(r); do{ SUB_MANAGEVARIABLELIST(qbs_new_txt_len("",0),__STRING_VWATCHNEWVARIABLE,&(pass1087= 0 ),&(pass1088= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7577);}while(r); S_9251:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7578);if(r)goto S_9251;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7578);}while(r); } LABEL_SHRFOUND:; if(qbevent){evnt(7581);r=0;} S_9254:; if ((-(*__LONG_NEWSHAREDSYNTAX== 0 ))||new_error){ if(qbevent){evnt(7582);if(r)goto S_9254;} 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(7583);}while(r); }else{ S_9257:; if ((-(*__LONG_SHAREDASLAYOUTADDED== 0 ))||new_error){ if(qbevent){evnt(7585);if(r)goto S_9257;} do{ *__LONG_SHAREDASLAYOUTADDED= -1 ; if(!qbevent)break;evnt(7586);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_L,__STRING_L2),__STRING1_SP),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1))),__STRING_L3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7587);}while(r); }else{ 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_L3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7589);}while(r); } } do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))=*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))| 2 ; if(!qbevent)break;evnt(7593);}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(7596);}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(7596);}while(r); S_9267:; if (((-(*__LONG_LMAY!= 0 ))|(-(*__LONG_LMUST!= 0 )))||new_error){ if(qbevent){evnt(7597);if(r)goto S_9267;} S_9268:; if ((((-(*__LONG_METHOD== 1 ))&(-(*__LONG_LMUST== 0 )))|((-(*__LONG_METHOD== 0 ))&(-(*__LONG_LMAY== 0 ))))||new_error){ if(qbevent){evnt(7598);if(r)goto S_9268;} do{ *__LONG_REVERTMAYMUSTHAVEN=*__LONG_REVERTMAYMUSTHAVEN+ 1 ; if(!qbevent)break;evnt(7599);}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(7600);}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]))*2869+528)),8,1),qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+520)),8,1)); if(!qbevent)break;evnt(7601);}while(r); } } do{ qbs_set(__STRING_SUBFUNC,__STRING_OLDSUBFUNC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7606);}while(r); do{ *__LONG_DATATXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7607);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("free",4)),FUNC_STR2(__LONG_SUBFUNCN)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7608);}while(r); do{ *__INTEGER_DEFDATAHANDLE=*__LONG_DATATXTBUF; if(!qbevent)break;evnt(7609);}while(r); S_9278:; if ((*__LONG_NEWSHAREDSYNTAX)||new_error){ if(qbevent){evnt(7611);if(r)goto S_9278;} do{ #include "ret0.txt" if(!qbevent)break;evnt(7611);}while(r); } S_9281:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(7613);if(r)goto S_9281;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7613);}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(7613);}while(r); do{ goto LABEL_SUBFUNCSHR; if(!qbevent)break;evnt(7613);}while(r); } S_9286:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7614);if(r)goto S_9286;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7614);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7614);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7616);}while(r); S_9291:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7616);if(r)goto S_9291;} 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(7616);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7616);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7617);}while(r); }else{ do{ *__LONG_I=*__LONG_I- 1 ; if(!qbevent)break;evnt(7620);}while(r); do{ qbs_set(__STRING_T,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7623);}while(r); do{ qbs_set(__STRING_TS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7624);}while(r); do{ qbs_set(__STRING_T3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7625);}while(r); do{ qbs_set(__STRING_N,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7626);}while(r); do{ qbs_set(__STRING_PREVIOUSELEMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7627);}while(r); do{ qbs_set(__STRING_L2,qbs_add(__STRING1_SP,FUNC_SCASE(qbs_new_txt_len("As",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7628);}while(r); do{ *__LONG_SHAREDASLAYOUTADDED= 0 ; if(!qbevent)break;evnt(7629);}while(r); LABEL_GETSHRTYP2:; if(qbevent){evnt(7630);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7631);}while(r); do{ qbs_set(__STRING_T2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7632);}while(r); S_9308:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_T2,qbs_new_txt_len(",",1)))&(qbs_notequal(__STRING_T2,qbs_new_txt_len("(",1)))&(qbs_notequal(__STRING_T2,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(7633);if(r)goto S_9308;} do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7635);}while(r); S_9310:; if ((qbs_cleanup(qbs_tmp_base,__STRING_PREVIOUSELEMENT->len))||new_error){ if(qbevent){evnt(7637);if(r)goto S_9310;} S_9311:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7638);if(r)goto S_9311;} do{ qbs_set(__STRING_T,__STRING_PREVIOUSELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7638);}while(r); }else{ do{ qbs_set(__STRING_T,qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" ",1)),__STRING_PREVIOUSELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7638);}while(r); } S_9316:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7639);if(r)goto S_9316;} do{ qbs_set(__STRING_T3,__STRING_PREVIOUSELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7639);}while(r); }else{ do{ qbs_set(__STRING_T3,qbs_add(qbs_add(__STRING_T3,__STRING1_SP),__STRING_PREVIOUSELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7639);}while(r); } } do{ qbs_set(__STRING_PREVIOUSELEMENT,__STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7641);}while(r); do{ goto LABEL_GETSHRTYP2; if(!qbevent)break;evnt(7642);}while(r); } S_9325:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7644);if(r)goto S_9325;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SHARED AS type variable-list or SHARED variable-name AS type",69)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7644);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7644);}while(r); } do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7646);}while(r); S_9330:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7647);if(r)goto S_9330;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7647);}while(r); } S_9333:; if ((*__LONG_T&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(7648);if(r)goto S_9333;} do{ *__LONG_T=*__LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(7648);}while(r); } S_9336:; if ((*__LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(7649);if(r)goto S_9336;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(7649);}while(r); } S_9339:; if ((*__LONG_T&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(7650);if(r)goto S_9339;} do{ *__LONG_T=*__LONG_T-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(7650);}while(r); } do{ *__LONG_TSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(7651);}while(r); do{ *__LONG_METHOD= 0 ; if(!qbevent)break;evnt(7652);}while(r); S_9344:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(7653);if(r)goto S_9344;} do{ qbs_set(__STRING_TS,FUNC_TYPE2SYMBOL(__STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7654);}while(r); do{ qbs_set(__STRING_L2,qbs_add(qbs_add(__STRING_L2,__STRING1_SP),FUNC_SCASE2(__STRING_T3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7655);}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(7657);}while(r); S_9349:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(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_new_txt_len("_MEM",4)))&(qbs_equal(qbs_ucase(__STRING_T),qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(7658);if(r)goto S_9349;} do{ qbs_set(__STRING_T3,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7659);}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(7661);}while(r); } S_9354:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7663);if(r)goto S_9354;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7663);}while(r); } LABEL_SUBFUNCSHR2:; if(qbevent){evnt(7665);r=0;} do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7666);}while(r); S_9358:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7667);if(r)goto S_9358;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7667);}while(r); } S_9361:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7668);if(r)goto S_9361;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Cannot use type symbol with SHARED AS type variable-list (",58),__STRING_S),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7669);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7670);}while(r); } do{ *__LONG_A= 0 ; if(!qbevent)break;evnt(7674);}while(r); do{ qbs_set(__STRING_L3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7675);}while(r); S_9367:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7676);if(r)goto S_9367;} S_9368:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1091=*__LONG_I+ 1 )),qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(7677);if(r)goto S_9368;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ()",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7677);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7677);}while(r); } do{ *__LONG_I=*__LONG_I+ 2 ; if(!qbevent)break;evnt(7678);}while(r); do{ *__LONG_A= 1 ; if(!qbevent)break;evnt(7679);}while(r); do{ qbs_set(__STRING_L3,qbs_add(qbs_add(qbs_add(__STRING1_SP2,qbs_new_txt_len("(",1)),__STRING1_SP2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7680);}while(r); } do{ *__LONG_NEWSHAREDSYNTAX= -1 ; if(!qbevent)break;evnt(7683);}while(r); do{ return_point[next_return_point++]=4; if (next_return_point>=return_points) more_return_points(); goto LABEL_NORMALSHAREDBLOCK; RETURN_4:; if(!qbevent)break;evnt(7684);}while(r); do{ *__LONG_NEWSHAREDSYNTAX= 0 ; if(!qbevent)break;evnt(7685);}while(r); S_9379:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(7687);if(r)goto S_9379;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7688);}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(7689);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7692);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7692);}while(r); do{ goto LABEL_SUBFUNCSHR2; if(!qbevent)break;evnt(7693);}while(r); } S_9386:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7695);if(r)goto S_9386;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7695);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7695);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7697);}while(r); S_9391:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7697);if(r)goto S_9391;} 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(7697);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7697);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7698);}while(r); } } } S_9400:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(7704);if(r)goto S_9400;} S_9401:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("EXIT",4))))||new_error){ if(qbevent){evnt(7705);if(r)goto S_9401;} do{ *__LONG_SF= 0 ; if(!qbevent)break;evnt(7706);}while(r); S_9403:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("FUNCTION",8))))||new_error){ if(qbevent){evnt(7707);if(r)goto S_9403;} do{ *__LONG_SF= 1 ; if(!qbevent)break;evnt(7707);}while(r); } S_9406:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("SUB",3))))||new_error){ if(qbevent){evnt(7708);if(r)goto S_9406;} do{ *__LONG_SF= 2 ; if(!qbevent)break;evnt(7708);}while(r); } S_9409:; if ((*__LONG_SF)||new_error){ if(qbevent){evnt(7709);if(r)goto S_9409;} S_9410:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_SUBFUNC->len== 0 )))||new_error){ if(qbevent){evnt(7711);if(r)goto S_9410;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("EXIT ",5),__STRING_SECONDELEMENT),qbs_new_txt_len(" must be used within a ",23)),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7711);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7711);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1094=*__LONG_MAINTXTBUF),qbs_new_txt_len("goto exit_subfunc;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7713);}while(r); S_9415:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_SUBFUNC, 4 ),qbs_new_txt_len("SUB_",4))))||new_error){ if(qbevent){evnt(7714);if(r)goto S_9415;} do{ qbs_set(__STRING_SECONDELEMENT,FUNC_SCASE(qbs_new_txt_len("Sub",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7714);}while(r); }else{ do{ qbs_set(__STRING_SECONDELEMENT,FUNC_SCASE(qbs_new_txt_len("Function",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7714);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Exit",4)),__STRING1_SP),__STRING_SECONDELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7715);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7716);}while(r); S_9422:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7716);if(r)goto S_9422;} 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(7716);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7716);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7717);}while(r); } } } S_9431:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_ECHO",5)))|(((qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ECHO",4)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(7724);if(r)goto S_9431;} S_9432:; if ((-(*__LONG_CONSOLE== 0 ))||new_error){ if(qbevent){evnt(7725);if(r)goto S_9432;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ECHO requires $CONSOLE or $CONSOLE:ONLY to be set first",55))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7726);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7726);}while(r); } } S_9437:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7732);if(r)goto S_9437;} S_9438:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ASC",3))))||new_error){ if(qbevent){evnt(7733);if(r)goto S_9438;} S_9439:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1096= 2 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7734);if(r)goto S_9439;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( after ASC",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7734);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7734);}while(r); } do{ *__LONG_USEPOSITION= 0 ; if(!qbevent)break;evnt(7737);}while(r); do{ *__LONG_PART= 1 ; if(!qbevent)break;evnt(7738);}while(r); do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(7739);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7740);}while(r); do{ qbs_set(__STRING_STRINGVARIABLE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7741);}while(r); do{ qbs_set(__STRING_POSITION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7742);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(7743);}while(r); S_9450:; do{ if(qbevent){evnt(7744);if(r)goto S_9450;} S_9451:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7746);if(r)goto S_9451;} S_9452:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_PART!= 3 ))|(-(__STRING_A3->len== 0 ))))||new_error){ if(qbevent){evnt(7747);if(r)goto S_9452;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ASC ( ... , ... ) = ...",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7747);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7747);}while(r); } do{ qbs_set(__STRING_EXPRESSION,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7748);}while(r); do{ goto dl_exit_1097; if(!qbevent)break;evnt(7749);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7752);}while(r); S_9460:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7753);if(r)goto S_9460;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(7753);}while(r); } S_9463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(7754);if(r)goto S_9463;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(7754);}while(r); } S_9466:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(7756);if(r)goto S_9466;} S_9467:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(7758);if(r)goto S_9467;} S_9468:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1099=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(7759);if(r)goto S_9468;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7759);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7759);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7760);}while(r); do{ qbs_set(__STRING_POSITION,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7761);}while(r); do{ *__LONG_PART= 3 ; if(!qbevent)break;evnt(7762);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7762);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7762);}while(r); do{ goto LABEL_ASCGOTPART; if(!qbevent)break;evnt(7762);}while(r); } S_9479:; if ((-(*__LONG_PART== 2 ))||new_error){ if(qbevent){evnt(7765);if(r)goto S_9479;} S_9480:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1100=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(7766);if(r)goto S_9480;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7766);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7766);}while(r); } do{ *__LONG_USEPOSITION= 1 ; if(!qbevent)break;evnt(7767);}while(r); do{ qbs_set(__STRING_POSITION,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7768);}while(r); do{ *__LONG_PART= 3 ; if(!qbevent)break;evnt(7769);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7769);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7769);}while(r); do{ goto LABEL_ASCGOTPART; if(!qbevent)break;evnt(7769);}while(r); } } S_9492:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(7776);if(r)goto S_9492;} S_9493:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(7777);if(r)goto S_9493;} do{ qbs_set(__STRING_STRINGVARIABLE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7777);}while(r); do{ *__LONG_PART= 2 ; if(!qbevent)break;evnt(7777);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7777);}while(r); do{ goto LABEL_ASCGOTPART; if(!qbevent)break;evnt(7777);}while(r); } } S_9500:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(7780);if(r)goto S_9500;} 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(7780);}while(r); }else{ do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7780);}while(r); } LABEL_ASCGOTPART:; if(qbevent){evnt(7781);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7782);}while(r); dl_continue_1097:; }while(1); dl_exit_1097:; S_9507:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_STRINGVARIABLE->len== 0 ))|(-(__STRING_POSITION->len== 0 ))))||new_error){ if(qbevent){evnt(7784);if(r)goto S_9507;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ASC ( ... , ... ) = ...",32)); 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{ qbs_set(__STRING_STRINGVARIABLE,FUNC_FIXOPERATIONORDER(__STRING_STRINGVARIABLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7787);}while(r); S_9512:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7788);if(r)goto S_9512;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7788);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(7789);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_STRINGVARIABLE,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7791);}while(r); S_9517:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7792);if(r)goto S_9517;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7792);}while(r); } S_9520:; if (((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(7793);if(r)goto S_9520;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ASC ( string-variable , ...",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7793);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7793);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_EVALUATETOTYP(__STRING_STRINGVARIABLE,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7794);}while(r); S_9525:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7795);if(r)goto S_9525;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7795);}while(r); } S_9528:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_POSITION,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(7799);if(r)goto S_9528;} S_9529:; if ((*__LONG_USEPOSITION)||new_error){ if(qbevent){evnt(7800);if(r)goto S_9529;} 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(7800);}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(7800);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1104=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tqbs=",5),__STRING_STRINGVARIABLE),qbs_new_txt_len("; if (!new_error){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7802);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_EXPRESSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7803);}while(r); S_9536:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7804);if(r)goto S_9536;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7804);}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(7805);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1105= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7806);}while(r); S_9541:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7807);if(r)goto S_9541;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7807);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1106=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_E),qbs_new_txt_len("; if (!new_error){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7808);}while(r); do{ SUB_WRITEBUFLINE(&(pass1107=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (tqbs->len){tqbs->chr[0]=tmp_long;}else{error(5);}",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7809);}while(r); do{ SUB_WRITEBUFLINE(&(pass1108=*__LONG_MAINTXTBUF),qbs_new_txt_len("}}",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7810);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1109=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tqbs=",5),__STRING_STRINGVARIABLE),qbs_new_txt_len("; if (!new_error){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7814);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_POSITION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7815);}while(r); S_9550:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7816);if(r)goto S_9550;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7816);}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(7817);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1110= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7818);}while(r); S_9555:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7819);if(r)goto S_9555;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7819);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1111=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_fileno=",11),__STRING_E),qbs_new_txt_len("; if (!new_error){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7820);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_EXPRESSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7821);}while(r); S_9560:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7822);if(r)goto S_9560;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7822);}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(7823);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1112= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7824);}while(r); S_9565:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7825);if(r)goto S_9565;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7825);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1113=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_E),qbs_new_txt_len("; if (!new_error){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7826);}while(r); do{ SUB_WRITEBUFLINE(&(pass1114=*__LONG_MAINTXTBUF),qbs_new_txt_len("if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);}",94)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7827);}while(r); do{ SUB_WRITEBUFLINE(&(pass1115=*__LONG_MAINTXTBUF),qbs_new_txt_len("}}}",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7828);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7831);}while(r); S_9573:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7831);if(r)goto S_9573;} 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(7831);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7831);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7832);}while(r); } } S_9581:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(7840);if(r)goto S_9581;} S_9582:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("MID$",4))))||new_error){ if(qbevent){evnt(7841);if(r)goto S_9582;} S_9583:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1117= 2 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7842);if(r)goto S_9583;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ( after MID$",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7842);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7842);}while(r); } do{ qbs_set(__STRING_LENGTH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7844);}while(r); do{ *__LONG_PART= 1 ; if(!qbevent)break;evnt(7845);}while(r); do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(7846);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7847);}while(r); do{ qbs_set(__STRING_STRINGVARIABLE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7848);}while(r); do{ qbs_set(__STRING_START,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7849);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(7850);}while(r); S_9594:; do{ if(qbevent){evnt(7851);if(r)goto S_9594;} S_9595:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(7852);if(r)goto S_9595;} S_9596:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_PART!= 4 ))|(qbs_equal(__STRING_A3,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(7853);if(r)goto S_9596;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected MID$(...)=...",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7853);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7853);}while(r); } do{ qbs_set(__STRING_STRINGEXPRESSION,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7854);}while(r); do{ goto dl_exit_1118; if(!qbevent)break;evnt(7855);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7857);}while(r); S_9604:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(7858);if(r)goto S_9604;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(7858);}while(r); } S_9607:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(7859);if(r)goto S_9607;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(7859);}while(r); } S_9610:; if ((-(*__LONG_B== -1 ))||new_error){ if(qbevent){evnt(7860);if(r)goto S_9610;} S_9611:; if ((-(*__LONG_PART== 2 ))||new_error){ if(qbevent){evnt(7861);if(r)goto S_9611;} S_9612:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1119=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(7862);if(r)goto S_9612;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected = after )",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7862);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7862);}while(r); } do{ qbs_set(__STRING_START,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7863);}while(r); do{ *__LONG_PART= 4 ; if(!qbevent)break;evnt(7863);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7863);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7863);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(7863);}while(r); } S_9622:; if ((-(*__LONG_PART== 3 ))||new_error){ if(qbevent){evnt(7865);if(r)goto S_9622;} S_9623:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1120=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(7866);if(r)goto S_9623;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected = after )",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7866);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7866);}while(r); } S_9627:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7867);if(r)goto S_9627;} 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(7867);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7867);}while(r); } do{ qbs_set(__STRING_LENGTH,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7868);}while(r); do{ *__LONG_PART= 4 ; if(!qbevent)break;evnt(7868);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7868);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7868);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(7868);}while(r); } } S_9638:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(7871);if(r)goto S_9638;} S_9639:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(7872);if(r)goto S_9639;} do{ qbs_set(__STRING_STRINGVARIABLE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7872);}while(r); do{ *__LONG_PART= 2 ; if(!qbevent)break;evnt(7872);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7872);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(7872);}while(r); } S_9645:; if ((-(*__LONG_PART== 2 ))||new_error){ if(qbevent){evnt(7873);if(r)goto S_9645;} do{ qbs_set(__STRING_START,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7873);}while(r); do{ *__LONG_PART= 3 ; if(!qbevent)break;evnt(7873);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7873);}while(r); do{ goto LABEL_MIDGOTPART; if(!qbevent)break;evnt(7873);}while(r); } } S_9652:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(7875);if(r)goto S_9652;} 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(7875);}while(r); }else{ do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7875);}while(r); } LABEL_MIDGOTPART:; if(qbevent){evnt(7876);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(7877);}while(r); dl_continue_1118:; }while(1); dl_exit_1118:; S_9659:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_STRINGVARIABLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7879);if(r)goto S_9659;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - first parameter must be a string variable/array-element",70)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7879);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7879);}while(r); } S_9663:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_START,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(7880);if(r)goto S_9663;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - second parameter not optional",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7880);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7880);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_FIXOPERATIONORDER(__STRING_STRINGVARIABLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7882);}while(r); S_9668:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7883);if(r)goto S_9668;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7883);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(7884);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_STRINGVARIABLE,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7885);}while(r); S_9673:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7886);if(r)goto S_9673;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7886);}while(r); } S_9676:; if (((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(7887);if(r)goto S_9676;} 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(7887);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7887);}while(r); } do{ qbs_set(__STRING_STRINGVARIABLE,FUNC_EVALUATETOTYP(__STRING_STRINGVARIABLE,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7888);}while(r); S_9681:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7889);if(r)goto S_9681;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7889);}while(r); } do{ qbs_set(__STRING_START,FUNC_FIXOPERATIONORDER(__STRING_START)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7891);}while(r); S_9685:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7892);if(r)goto S_9685;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7892);}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(7893);}while(r); do{ qbs_set(__STRING_START,FUNC_EVALUATETOTYP(__STRING_START,&(pass1122= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7894);}while(r); do{ qbs_set(__STRING_STRINGEXPRESSION,FUNC_FIXOPERATIONORDER(__STRING_STRINGEXPRESSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7896);}while(r); S_9691:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7897);if(r)goto S_9691;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7897);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7898);}while(r); do{ qbs_set(__STRING_STRINGEXPRESSION,FUNC_EVALUATETOTYP(__STRING_STRINGEXPRESSION,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7899);}while(r); S_9696:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7900);if(r)goto S_9696;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7900);}while(r); } S_9699:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LENGTH->len))||new_error){ if(qbevent){evnt(7902);if(r)goto S_9699;} do{ qbs_set(__STRING_LENGTH,FUNC_FIXOPERATIONORDER(__STRING_LENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7903);}while(r); S_9701:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7904);if(r)goto S_9701;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7904);}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(7905);}while(r); do{ qbs_set(__STRING_LENGTH,FUNC_EVALUATETOTYP(__STRING_LENGTH,&(pass1124= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7906);}while(r); S_9706:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7907);if(r)goto S_9706;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7907);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1125=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7908);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1126=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7910);}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(7913);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(7914);}while(r); S_9715:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(7914);if(r)goto S_9715;} 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(7914);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7914);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(7915);}while(r); } } S_9723:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(7920);if(r)goto S_9723;} S_9724:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ERASE",5))))||new_error){ if(qbevent){evnt(7921);if(r)goto S_9724;} do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(7922);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Erase",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7923);}while(r); LABEL_ERASENEXTARRAY:; if(qbevent){evnt(7924);r=0;} do{ qbs_set(__STRING_VAR,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7925);}while(r); do{ qbs_set(__STRING_X,__STRING_VAR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7926);}while(r); do{ qbs_set(__STRING_LS,FUNC_REMOVESYMBOL(__STRING_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7926);}while(r); S_9730:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7927);if(r)goto S_9730;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7927);}while(r); } S_9733:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VAR)))||new_error){ if(qbevent){evnt(7929);if(r)goto S_9733;} S_9734:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(7930);if(r)goto S_9734;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(7930);}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(7931);}while(r); LABEL_CLEARERASE:; if(qbevent){evnt(7933);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(7934);}while(r); do{ qbs_set(__STRING_BYTESPERELEMENT,FUNC_STR2(&(pass1128=(*(int32*)(((char*)__UDT_ID)+(512))& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7935);}while(r); S_9740:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(7936);if(r)goto S_9740;} do{ qbs_set(__STRING_BYTESPERELEMENT,FUNC_STR2((int32*)(void*)( ((char*)(__UDT_ID)) + (540) ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7936);}while(r); } S_9743:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(7937);if(r)goto S_9743;} do{ qbs_set(__STRING_BYTESPERELEMENT,qbs_add(FUNC_STR2(&(pass1129=(*(int32*)(((char*)__UDT_ID)+(512))& 511 ))),qbs_new_txt_len("/8+1",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7937);}while(r); } S_9746:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(7938);if(r)goto S_9746;} do{ qbs_set(__STRING_BYTESPERELEMENT,FUNC_STR2(&(pass1130=((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(7939);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1131=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N),qbs_new_txt_len("[2]&1){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7941);}while(r); do{ SUB_WRITEBUFLINE(&(pass1132=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N),qbs_new_txt_len("[2]&2){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7942);}while(r); S_9751:; if (((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(7943);if(r)goto S_9751;} do{ SUB_WRITEBUFRAWDATA(&(pass1133=*__LONG_MAINTXTBUF),qbs_new_txt_len("tmp_long=",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7944);}while(r); S_9753:; fornext_value1135= 1 ; fornext_finalvalue1135=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step1135= 1 ; if (fornext_step1135<0) fornext_step_negative1135=1; else fornext_step_negative1135=0; if (new_error) goto fornext_error1135; goto fornext_entrylabel1135; while(1){ fornext_value1135=fornext_step1135+(*__LONG_I2); fornext_entrylabel1135: *__LONG_I2=fornext_value1135; if (fornext_step_negative1135){ if (fornext_value1135fornext_finalvalue1135) break; } fornext_error1135:; if(qbevent){evnt(7945);if(r)goto S_9753;} S_9754:; if ((-(*__LONG_I2!= 1 ))||new_error){ if(qbevent){evnt(7946);if(r)goto S_9754;} do{ SUB_WRITEBUFRAWDATA(&(pass1136=*__LONG_MAINTXTBUF),qbs_new_txt_len("*",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7946);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1137=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass1138=(*__LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7947);}while(r); fornext_continue_1134:; } fornext_exit_1134:; do{ SUB_WRITEBUFLINE(&(pass1139=*__LONG_MAINTXTBUF),qbs_new_txt_len(";",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7949);}while(r); do{ SUB_WRITEBUFLINE(&(pass1140=*__LONG_MAINTXTBUF),qbs_new_txt_len("while(tmp_long--){",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7950);}while(r); do{ SUB_WRITEBUFLINE(&(pass1141=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("((qbs*)(((uint64*)(",19),__STRING_N),qbs_new_txt_len("[0]))[tmp_long]))->len=0;",25))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7951);}while(r); do{ SUB_WRITEBUFLINE(&(pass1142=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7952);}while(r); }else{ do{ SUB_WRITEBUFRAWDATA(&(pass1143=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("memset((void*)(",15),__STRING_N),qbs_new_txt_len("[0]),0,",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7956);}while(r); S_9765:; fornext_value1145= 1 ; fornext_finalvalue1145=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step1145= 1 ; if (fornext_step1145<0) fornext_step_negative1145=1; else fornext_step_negative1145=0; if (new_error) goto fornext_error1145; goto fornext_entrylabel1145; while(1){ fornext_value1145=fornext_step1145+(*__LONG_I2); fornext_entrylabel1145: *__LONG_I2=fornext_value1145; if (fornext_step_negative1145){ if (fornext_value1145fornext_finalvalue1145) break; } fornext_error1145:; if(qbevent){evnt(7957);if(r)goto S_9765;} S_9766:; if ((-(*__LONG_I2!= 1 ))||new_error){ if(qbevent){evnt(7958);if(r)goto S_9766;} do{ SUB_WRITEBUFRAWDATA(&(pass1146=*__LONG_MAINTXTBUF),qbs_new_txt_len("*",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7958);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1147=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass1148=(*__LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7959);}while(r); fornext_continue_1144:; } fornext_exit_1144:; do{ SUB_WRITEBUFLINE(&(pass1149=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*",1),__STRING_BYTESPERELEMENT),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7961);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1150=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7963);}while(r); S_9774:; if (((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(7965);if(r)goto S_9774;} do{ SUB_WRITEBUFRAWDATA(&(pass1151=*__LONG_MAINTXTBUF),qbs_new_txt_len("tmp_long=",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7967);}while(r); S_9776:; fornext_value1153= 1 ; fornext_finalvalue1153=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); 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(7968);if(r)goto S_9776;} S_9777:; if ((-(*__LONG_I2!= 1 ))||new_error){ if(qbevent){evnt(7969);if(r)goto S_9777;} do{ SUB_WRITEBUFRAWDATA(&(pass1154=*__LONG_MAINTXTBUF),qbs_new_txt_len("*",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7969);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1155=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass1156=(*__LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7970);}while(r); fornext_continue_1152:; } fornext_exit_1152:; do{ SUB_WRITEBUFLINE(&(pass1157=*__LONG_MAINTXTBUF),qbs_new_txt_len(";",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7972);}while(r); do{ SUB_WRITEBUFLINE(&(pass1158=*__LONG_MAINTXTBUF),qbs_new_txt_len("while(tmp_long--){",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7973);}while(r); do{ SUB_WRITEBUFLINE(&(pass1159=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free((qbs*)(((uint64*)(",27),__STRING_N),qbs_new_txt_len("[0]))[tmp_long]));",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7974);}while(r); do{ SUB_WRITEBUFLINE(&(pass1160=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7975);}while(r); do{ SUB_WRITEBUFLINE(&(pass1161=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("free((void*)(",13),__STRING_N),qbs_new_txt_len("[0]));",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7977);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1162=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N),qbs_new_txt_len("[2]&4){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7980);}while(r); do{ SUB_WRITEBUFLINE(&(pass1163=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("cmem_dynamic_free((uint8*)(",27),__STRING_N),qbs_new_txt_len("[0]));",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7981);}while(r); do{ SUB_WRITEBUFLINE(&(pass1164=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7982);}while(r); do{ SUB_WRITEBUFLINE(&(pass1165=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("free((void*)(",13),__STRING_N),qbs_new_txt_len("[0]));",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7983);}while(r); do{ SUB_WRITEBUFLINE(&(pass1166=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7984);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1167=*__LONG_MAINTXTBUF),qbs_add(__STRING_N,qbs_new_txt_len("[2]^=1;",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7987);}while(r); S_9795:; fornext_value1169= 1 ; fornext_finalvalue1169=func_abs((int16)(*(int16*)(((char*)__UDT_ID)+(516)))); fornext_step1169= 1 ; if (fornext_step1169<0) fornext_step_negative1169=1; else fornext_step_negative1169=0; if (new_error) goto fornext_error1169; goto fornext_entrylabel1169; while(1){ fornext_value1169=fornext_step1169+(*__LONG_I2); fornext_entrylabel1169: *__LONG_I2=fornext_value1169; if (fornext_step_negative1169){ if (fornext_value1169fornext_finalvalue1169) break; } fornext_error1169:; if(qbevent){evnt(7989);if(r)goto S_9795;} do{ *__LONG_B=*__LONG_I2* 4 ; if(!qbevent)break;evnt(7990);}while(r); do{ SUB_WRITEBUFLINE(&(pass1170=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(__LONG_B)),qbs_new_txt_len("]=2147483647;",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7991);}while(r); do{ SUB_WRITEBUFLINE(&(pass1171=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass1172=*__LONG_B+ 1 ))),qbs_new_txt_len("]=0;",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7992);}while(r); do{ SUB_WRITEBUFLINE(&(pass1173=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(__STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass1174=*__LONG_B+ 2 ))),qbs_new_txt_len("]=0;",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7993);}while(r); fornext_continue_1168:; } fornext_exit_1168:; S_9801:; if (((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(7995);if(r)goto S_9801;} do{ SUB_WRITEBUFLINE(&(pass1175=*__LONG_MAINTXTBUF),qbs_add(__STRING_N,qbs_new_txt_len("[0]=(ptrszint)¬hingstring;",29))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7996);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1176=*__LONG_MAINTXTBUF),qbs_add(__STRING_N,qbs_new_txt_len("[0]=(ptrszint)nothingvalue;",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(7998);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1177=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8000);}while(r); do{ SUB_WRITEBUFLINE(&(pass1178=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8001);}while(r); S_9808:; if ((-(*__LONG_CLEARERASERETURN== 1 ))||new_error){ if(qbevent){evnt(8002);if(r)goto S_9808;} do{ *__LONG_CLEARERASERETURN= 0 ; if(!qbevent)break;evnt(8002);}while(r); do{ goto LABEL_CLEARERASERETURNED; if(!qbevent)break;evnt(8002);}while(r); } do{ goto LABEL_ERASEDARRAY; if(!qbevent)break;evnt(8003);}while(r); } S_9814:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8005);if(r)goto S_9814;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8005);}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(8006);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8006);}while(r); LABEL_ERASEDARRAY:; if(qbevent){evnt(8008);r=0;} S_9819:; if ((-(*__LONG_I<*__LONG_N))||new_error){ if(qbevent){evnt(8009);if(r)goto S_9819;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8010);}while(r); do{ qbs_set(__STRING_N,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8010);}while(r); S_9822:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_N,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(8010);if(r)goto S_9822;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8010);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8010);}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(8011);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8012);}while(r); S_9828:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(8012);if(r)goto S_9828;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8012);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8012);}while(r); } do{ goto LABEL_ERASENEXTARRAY; if(!qbevent)break;evnt(8013);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8016);}while(r); S_9835:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8016);if(r)goto S_9835;} 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(8016);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8016);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8017);}while(r); } } S_9843:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(8023);if(r)goto S_9843;} do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(8024);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(8024);}while(r); do{ *__LONG_COMMONOPTION= 0 ; if(!qbevent)break;evnt(8024);}while(r); S_9847:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("DIM",3))))||new_error){ if(qbevent){evnt(8025);if(r)goto S_9847;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Dim",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8025);}while(r); do{ *__INTEGER_DIMOPTION= 1 ; if(!qbevent)break;evnt(8025);}while(r); } S_9851:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("REDIM",5))))||new_error){ if(qbevent){evnt(8026);if(r)goto S_9851;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("ReDim",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8027);}while(r); do{ *__INTEGER_DIMOPTION= 2 ; if(!qbevent)break;evnt(8028);}while(r); do{ *__INTEGER_REDIMOPTION= 1 ; if(!qbevent)break;evnt(8028);}while(r); S_9855:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("_PRESERVE",9)))|(((qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("PRESERVE",8)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(8029);if(r)goto S_9855;} do{ *__INTEGER_REDIMOPTION= 2 ; if(!qbevent)break;evnt(8030);}while(r); S_9857:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SECONDELEMENT,qbs_new_txt_len("_PRESERVE",9))))||new_error){ if(qbevent){evnt(8031);if(r)goto S_9857;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("_Preserve",9)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8032);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Preserve",8)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8034);}while(r); } S_9862:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(8036);if(r)goto S_9862;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected REDIM ",15),__STRING_QB64PREFIX),qbs_new_txt_len("PRESERVE ...",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8036);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8036);}while(r); } } } S_9868:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("STATIC",6))))||new_error){ if(qbevent){evnt(8039);if(r)goto S_9868;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Static",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8039);}while(r); do{ *__INTEGER_DIMOPTION= 3 ; if(!qbevent)break;evnt(8039);}while(r); } S_9872:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("COMMON",6))))||new_error){ if(qbevent){evnt(8040);if(r)goto S_9872;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Common",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8040);}while(r); do{ *__INTEGER_DIMOPTION= 1 ; if(!qbevent)break;evnt(8040);}while(r); do{ *__LONG_COMMONOPTION= 1 ; if(!qbevent)break;evnt(8040);}while(r); } S_9877:; if ((*__INTEGER_DIMOPTION)||new_error){ if(qbevent){evnt(8041);if(r)goto S_9877;} S_9878:; if (((-(*__INTEGER_DIMOPTION== 3 ))&(-(*__LONG_SUBFUNCN== 0 )))||new_error){ if(qbevent){evnt(8043);if(r)goto S_9878;} 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(8043);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8043);}while(r); } S_9882:; if (((-(*__LONG_COMMONOPTION== 1 ))&(-(*__LONG_SUBFUNCN!= 0 )))||new_error){ if(qbevent){evnt(8044);if(r)goto S_9882;} 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(8044);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8044);}while(r); } do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(8046);}while(r); S_9887:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(8047);if(r)goto S_9887;} do{ *__LONG_I= 3 ; if(!qbevent)break;evnt(8047);}while(r); } S_9890:; if ((-(*__INTEGER_DIMOPTION!= 3 ))||new_error){ if(qbevent){evnt(8049);if(r)goto S_9890;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8050);}while(r); S_9892:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("SHARED",6))))||new_error){ if(qbevent){evnt(8051);if(r)goto S_9892;} S_9893:; if ((-(*__LONG_SUBFUNCN!= 0 ))||new_error){ if(qbevent){evnt(8052);if(r)goto S_9893;} 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(8052);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8052);}while(r); } do{ *__INTEGER_DIMSHARED= 1 ; if(!qbevent)break;evnt(8053);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8054);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Shared",6)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8055);}while(r); } } S_9902:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(8059);if(r)goto S_9902;} do{ *__LONG_DIMSTATIC= 1 ; if(!qbevent)break;evnt(8059);}while(r); do{ *__LONG_ALLOWLOCALNAME= 1 ; if(!qbevent)break;evnt(8059);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8062);}while(r); S_9907:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_E,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(8063);if(r)goto S_9907;} LABEL_DIMNEXT:; if(qbevent){evnt(8065);r=0;} do{ *__LONG_NEWDIMSYNTAX= 0 ; if(!qbevent)break;evnt(8066);}while(r); do{ *__LONG_NOTYPE= 0 ; if(!qbevent)break;evnt(8067);}while(r); do{ *__LONG_LISTARRAY= 0 ; if(!qbevent)break;evnt(8068);}while(r); do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8074);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8074);}while(r); S_9913:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8075);if(r)goto S_9913;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_FIRSTELEMENT),qbs_new_txt_len(" variable-name or ",18)),__STRING_FIRSTELEMENT),qbs_new_txt_len(" AS type variable-list",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8075);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8075);}while(r); } S_9917:; if ((-(*__LONG_I>=(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(8078);if(r)goto S_9917;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8078);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8078);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8078);}while(r); } do{ qbs_set(__STRING_ELEMENTS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8081);}while(r); S_9924:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8083);if(r)goto S_9924;} do{ *__LONG_B= 1 ; if(!qbevent)break;evnt(8084);}while(r); S_9926:; fornext_value1181=*__LONG_I; fornext_finalvalue1181=*__LONG_N; fornext_step1181= 1 ; if (fornext_step1181<0) fornext_step_negative1181=1; else fornext_step_negative1181=0; if (new_error) goto fornext_error1181; goto fornext_entrylabel1181; while(1){ fornext_value1181=fornext_step1181+(*__LONG_I); fornext_entrylabel1181: *__LONG_I=fornext_value1181; if (fornext_step_negative1181){ if (fornext_value1181fornext_finalvalue1181) break; } fornext_error1181:; if(qbevent){evnt(8085);if(r)goto S_9926;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8086);}while(r); S_9928:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8087);if(r)goto S_9928;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8087);}while(r); } S_9931:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8088);if(r)goto S_9931;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8088);}while(r); } S_9934:; if ((-(*__LONG_B== 0 ))||new_error){ if(qbevent){evnt(8089);if(r)goto S_9934;} do{ goto fornext_exit_1180; if(!qbevent)break;evnt(8089);}while(r); } S_9937:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(8090);if(r)goto S_9937;} 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(8090);}while(r); }else{ do{ qbs_set(__STRING_ELEMENTS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8090);}while(r); } fornext_continue_1180:; } fornext_exit_1180:; S_9943:; if ((-(*__LONG_B!= 0 ))||new_error){ if(qbevent){evnt(8092);if(r)goto S_9943;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8092);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8092);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8093);}while(r); S_9948:; if ((*__LONG_COMMONOPTION)||new_error){ if(qbevent){evnt(8095);if(r)goto S_9948;} do{ qbs_set(__STRING_ELEMENTS,qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8095);}while(r); } S_9951:; if (( 0 )||new_error){ if(qbevent){evnt(8098);if(r)goto S_9951;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1183; 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 skip1183; skip1183: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8098);}while(r); } S_9954:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(8103);if(r)goto S_9954;} S_9955:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_ELEMENTS->len== 0 )))||new_error){ if(qbevent){evnt(8104);if(r)goto S_9955;} do{ *__LONG_LISTARRAY= 1 ; if(!qbevent)break;evnt(8105);}while(r); } } S_9959:; if ((-(*__LONG_I>=(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(8111);if(r)goto S_9959;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8111);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8111);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8111);}while(r); } } do{ qbs_set(__STRING_D,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8113);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(8115);}while(r); do{ qbs_set(__STRING_APPENDNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8117);}while(r); do{ qbs_set(__STRING_APPENDTYPE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8118);}while(r); do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8119);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8122);}while(r); S_9972:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8123);if(r)goto S_9972;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8123);}while(r); } S_9975:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_VARNAME)== 0 )))||new_error){ if(qbevent){evnt(8124);if(r)goto S_9975;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid variable name",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8124);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8124);}while(r); } S_9979:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8126);if(r)goto S_9979;} do{ qbs_set(__STRING_TYP,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8127);}while(r); do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(8128);}while(r); do{ qbs_set(__STRING_APPENDNAME,__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8129);}while(r); do{ goto LABEL_DIMGOTTYP; if(!qbevent)break;evnt(8130);}while(r); } S_9985:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len("AS",2))))||new_error){ if(qbevent){evnt(8133);if(r)goto S_9985;} do{ qbs_set(__STRING_APPENDTYPE,qbs_add(__STRING1_SP,FUNC_SCASE(qbs_new_txt_len("As",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8134);}while(r); do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8135);}while(r); S_9988:; fornext_value1186=*__LONG_I; fornext_finalvalue1186=*__LONG_N; fornext_step1186= 1 ; if (fornext_step1186<0) fornext_step_negative1186=1; else fornext_step_negative1186=0; if (new_error) goto fornext_error1186; goto fornext_entrylabel1186; while(1){ fornext_value1186=fornext_step1186+(*__LONG_I); fornext_entrylabel1186: *__LONG_I=fornext_value1186; if (fornext_step_negative1186){ if (fornext_value1186fornext_finalvalue1186) break; } fornext_error1186:; if(qbevent){evnt(8136);if(r)goto S_9988;} do{ qbs_set(__STRING_D,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8137);}while(r); S_9990:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(8138);if(r)goto S_9990;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8138);}while(r); do{ goto fornext_exit_1185; if(!qbevent)break;evnt(8138);}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(8139);}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(8140);}while(r); do{ qbs_set(__STRING_D,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8141);}while(r); fornext_continue_1185:; } fornext_exit_1185:; do{ qbs_set(__STRING_APPENDTYPE,FUNC_SCASE2(__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8143);}while(r); do{ qbs_set(__STRING_TYP,qbs_rtrim(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8144);}while(r); do{ goto LABEL_DIMGOTTYP; if(!qbevent)break;evnt(8145);}while(r); } do{ *__LONG_NOTYPE= 1 ; if(!qbevent)break;evnt(8149);}while(r); S_10003:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_VARNAME, 1 ),qbs_new_txt_len("_",1))))||new_error){ if(qbevent){evnt(8150);if(r)goto S_10003;} do{ *__LONG_V= 27 ; if(!qbevent)break;evnt(8150);}while(r); }else{ do{ *__LONG_V=qbs_asc(qbs_ucase(__STRING_VARNAME))- 64 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8150);}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(8151);}while(r); do{ *__LONG_DIMMETHOD= 1 ; if(!qbevent)break;evnt(8152);}while(r); do{ goto LABEL_DIMGOTTYP; if(!qbevent)break;evnt(8153);}while(r); LABEL_DIMGOTTYP:; if(qbevent){evnt(8155);r=0;} S_10011:; 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(8156);if(r)goto S_10011;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DIM: Expected ,",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8156);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8156);}while(r); } S_10015:; if (((-(*__LONG_NOTYPE!= 0 ))&(-(*__INTEGER_DIMOPTION!= 3 ))&(-(*__INTEGER_DIMOPTION!= 1 )))||new_error){ if(qbevent){evnt(8159);if(r)goto S_10015;} S_10016:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(8160);if(r)goto S_10016;} S_10017:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VARNAME)))||new_error){ if(qbevent){evnt(8161);if(r)goto S_10017;} S_10018:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1)))->len)))||new_error){ if(qbevent){evnt(8162);if(r)goto S_10018;} do{ qbs_set(__STRING_TYP,FUNC_ID2FULLTYPENAME()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8163);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(8164);}while(r); } } } } LABEL_NORMALDIMBLOCK:; if(qbevent){evnt(8170);r=0;} S_10025:; if ((qbs_cleanup(qbs_tmp_base,(-(*__INTEGER_DIMOPTION== 3 ))&(__STRING_ELEMENTS->len)))||new_error){ if(qbevent){evnt(8171);if(r)goto S_10025;} do{ qbs_set(__STRING_TYP2,FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8173);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8174);}while(r); do{ *__LONG_TS=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(8174);}while(r); S_10029:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VARNAME)))||new_error){ if(qbevent){evnt(8176);if(r)goto S_10029;} S_10030:; if ((-(*(int32*)(((char*)__UDT_ID)+(2641))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(8177);if(r)goto S_10030;} S_10031:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(8178);if(r)goto S_10031;} S_10032:; 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(8180);if(r)goto S_10032;} S_10033:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8181);if(r)goto S_10033;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8182);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8182);}while(r); } } }else{ S_10039:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8186);if(r)goto S_10039;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8187);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8187);}while(r); }else{ S_10043:; 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(8190);if(r)goto S_10043;} S_10044:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8191);if(r)goto S_10044;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8192);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8192);}while(r); } } } } } } S_10053:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(8200);if(r)goto S_10053;} do{ qbs_set(__STRING_S2,FUNC_TYPE2SYMBOL(__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8201);}while(r); S_10055:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8202);if(r)goto S_10055;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8202);}while(r); } S_10058:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(qbs_add(__STRING_VARNAME,__STRING_S2))))||new_error){ if(qbevent){evnt(8203);if(r)goto S_10058;} S_10059:; if ((-(*(int32*)(((char*)__UDT_ID)+(2641))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(8204);if(r)goto S_10059;} S_10060:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(8205);if(r)goto S_10060;} S_10061:; 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(8207);if(r)goto S_10061;} S_10062:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8208);if(r)goto S_10062;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),__STRING_S2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8209);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8209);}while(r); } } }else{ S_10068:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8213);if(r)goto S_10068;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),__STRING_S2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8214);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8214);}while(r); }else{ S_10072:; 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(8217);if(r)goto S_10072;} S_10073:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8218);if(r)goto S_10073;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),__STRING_S2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8219);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8219);}while(r); } } } } } } } } S_10084:; if ((*__LONG_LISTARRAY)||new_error){ if(qbevent){evnt(8229);if(r)goto S_10084;} do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(8234);}while(r); S_10086:; fornext_value1190= 1 ; fornext_finalvalue1190=*__LONG_STATICARRAYLISTN; fornext_step1190= 1 ; if (fornext_step1190<0) fornext_step_negative1190=1; else fornext_step_negative1190=0; if (new_error) goto fornext_error1190; goto fornext_entrylabel1190; while(1){ fornext_value1190=fornext_step1190+(*__LONG_X); fornext_entrylabel1190: *__LONG_X=fornext_value1190; if (fornext_step_negative1190){ if (fornext_value1190fornext_finalvalue1190) break; } fornext_error1190:; if(qbevent){evnt(8235);if(r)goto S_10086;} do{ qbs_set(__STRING_VARNAME2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8236);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8236);}while(r); do{ qbs_set(__STRING_TYP2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8237);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8237);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8238);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8238);}while(r); S_10093:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_VARNAME),qbs_ucase(__STRING_VARNAME2))))||new_error){ if(qbevent){evnt(8240);if(r)goto S_10093;} S_10094:; if ((-(*__LONG_DIMMETHOD2== 1 ))||new_error){ if(qbevent){evnt(8241);if(r)goto S_10094;} S_10095:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(8243);if(r)goto S_10095;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8243);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8243);}while(r); } }else{ S_10100:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8246);if(r)goto S_10100;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8247);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8247);}while(r); }else{ S_10104:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(8249);if(r)goto S_10104;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8249);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8249);}while(r); } } } } fornext_continue_1189:; } fornext_exit_1189:; do{ qbs_set(__STRING_TYP2,FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8256);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8257);}while(r); do{ *__LONG_TS=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(8257);}while(r); S_10115:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(__STRING_VARNAME)))||new_error){ if(qbevent){evnt(8259);if(r)goto S_10115;} S_10116:; if ((-(*(int32*)(((char*)__UDT_ID)+(2641))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(8260);if(r)goto S_10116;} S_10117:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(8261);if(r)goto S_10117;} S_10118:; 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(8263);if(r)goto S_10118;} S_10119:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8264);if(r)goto S_10119;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8265);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8265);}while(r); } } }else{ S_10125:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8269);if(r)goto S_10125;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8270);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8270);}while(r); }else{ S_10129:; 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(8273);if(r)goto S_10129;} S_10130:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8274);if(r)goto S_10130;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8275);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8275);}while(r); } } } } } } S_10139:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(8283);if(r)goto S_10139;} do{ qbs_set(__STRING_S2,FUNC_TYPE2SYMBOL(__STRING_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8284);}while(r); S_10141:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8285);if(r)goto S_10141;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8285);}while(r); } S_10144:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FINDARRAY(qbs_add(__STRING_VARNAME,__STRING_S2))))||new_error){ if(qbevent){evnt(8286);if(r)goto S_10144;} S_10145:; if ((-(*(int32*)(((char*)__UDT_ID)+(2641))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(8287);if(r)goto S_10145;} S_10146:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(8288);if(r)goto S_10146;} S_10147:; 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(8290);if(r)goto S_10147;} S_10148:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8291);if(r)goto S_10148;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),__STRING_S2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8292);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8292);}while(r); } } }else{ S_10154:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8296);if(r)goto S_10154;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),__STRING_S2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8297);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8297);}while(r); }else{ S_10158:; 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(8300);if(r)goto S_10158;} S_10159:; if ((-(*__LONG_TS==*(int32*)(((char*)__UDT_ID)+(540))))||new_error){ if(qbevent){evnt(8301);if(r)goto S_10159;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),__STRING_VARNAME),__STRING_S2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8302);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8302);}while(r); } } } } } } } S_10169:; if ((qbs_cleanup(qbs_tmp_base,__STRING_STATICARRAYLIST->len))||new_error){ if(qbevent){evnt(8312);if(r)goto S_10169;} do{ qbs_set(__STRING_STATICARRAYLIST,qbs_add(__STRING_STATICARRAYLIST,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8312);}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(8313);}while(r); S_10173:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8314);if(r)goto S_10173;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8314);}while(r); } do{ *__LONG_STATICARRAYLISTN=*__LONG_STATICARRAYLISTN+ 1 ; if(!qbevent)break;evnt(8315);}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(8316);}while(r); }else{ do{ *__LONG_OLDDIMSTATIC=*__LONG_DIMSTATIC; if(!qbevent)break;evnt(8321);}while(r); S_10180:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(8324);if(r)goto S_10180;} S_10181:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(8325);if(r)goto S_10181;} do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(8326);}while(r); S_10183:; fornext_value1194= 1 ; fornext_finalvalue1194=*__LONG_STATICARRAYLISTN; fornext_step1194= 1 ; if (fornext_step1194<0) fornext_step_negative1194=1; else fornext_step_negative1194=0; if (new_error) goto fornext_error1194; goto fornext_entrylabel1194; while(1){ fornext_value1194=fornext_step1194+(*__LONG_X); fornext_entrylabel1194: *__LONG_X=fornext_value1194; if (fornext_step_negative1194){ if (fornext_value1194fornext_finalvalue1194) break; } fornext_error1194:; if(qbevent){evnt(8327);if(r)goto S_10183;} do{ qbs_set(__STRING_VARNAME2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8328);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8328);}while(r); do{ qbs_set(__STRING_TYP2,FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8329);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8329);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_STATICARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8330);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8330);}while(r); S_10190:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_VARNAME),qbs_ucase(__STRING_VARNAME2))))||new_error){ if(qbevent){evnt(8332);if(r)goto S_10190;} S_10191:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(8333);if(r)goto S_10191;} S_10192:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8334);if(r)goto S_10192;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8334);}while(r); } S_10195:; if ((-(*__LONG_DIMMETHOD==*__LONG_DIMMETHOD2))||new_error){ if(qbevent){evnt(8335);if(r)goto S_10195;} do{ qbs_set(__STRING_VARNAME,__STRING_VARNAME2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8337);}while(r); do{ *__LONG_DIMSTATIC= 3 ; if(!qbevent)break;evnt(8338);}while(r); S_10198:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(8339);if(r)goto S_10198;} 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(8339);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8339);}while(r); } } } } fornext_continue_1193:; } fornext_exit_1193:; } } S_10208:; if ((*__LONG_COMMONOPTION)||new_error){ if(qbevent){evnt(8350);if(r)goto S_10208;} S_10209:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(8351);if(r)goto S_10209;} S_10210:; if ((qbs_cleanup(qbs_tmp_base,__STRING_COMMONARRAYLIST->len))||new_error){ if(qbevent){evnt(8354);if(r)goto S_10210;} do{ qbs_set(__STRING_COMMONARRAYLIST,qbs_add(__STRING_COMMONARRAYLIST,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8354);}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(&(pass1197=*__INTEGER_DIMSHARED)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8356);}while(r); S_10214:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8357);if(r)goto S_10214;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8357);}while(r); } do{ *__LONG_COMMONARRAYLISTN=*__LONG_COMMONARRAYLISTN+ 1 ; if(!qbevent)break;evnt(8358);}while(r); S_10218:; if (( 0 )||new_error){ if(qbevent){evnt(8359);if(r)goto S_10218;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; 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_new_txt_len("common listed:",14),__STRING_VARNAME),__STRING1_SP),FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP)),__STRING1_SP),FUNC_STR2(__LONG_DIMMETHOD)),__STRING1_SP),FUNC_STR2(&(pass1199=*__INTEGER_DIMSHARED))), 0, 0, 1); if (new_error) goto skip1198; skip1198: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8359);}while(r); } S_10221:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8360);if(r)goto S_10221;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8360);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(8362);}while(r); do{ qbs_set(__STRING_V,__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8364);}while(r); S_10226:; if ((-(*__LONG_DIMMETHOD== 1 ))||new_error){ if(qbevent){evnt(8365);if(r)goto S_10226;} do{ qbs_set(__STRING_V,qbs_add(__STRING_V,__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8365);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8366);}while(r); S_10230:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8367);if(r)goto S_10230;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8367);}while(r); } S_10233:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(8368);if(r)goto S_10233;} S_10234:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(8369);if(r)goto S_10234;} do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8371);}while(r); S_10236:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8372);if(r)goto S_10236;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8372);}while(r); } do{ *__LONG_S=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(8373);}while(r); do{ *__LONG_MATCH= 1 ; if(!qbevent)break;evnt(8374);}while(r); S_10241:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8376);if(r)goto S_10241;} do{ *__LONG_T2=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(8377);}while(r); do{ *__LONG_S2=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(8378);}while(r); S_10244:; if ((-((*__LONG_T&*__LONG_ISFLOAT)!=(*__LONG_T2&*__LONG_ISFLOAT)))||new_error){ if(qbevent){evnt(8379);if(r)goto S_10244;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8379);}while(r); } S_10247:; if ((-((*__LONG_T&*__LONG_ISUNSIGNED)!=(*__LONG_T2&*__LONG_ISUNSIGNED)))||new_error){ if(qbevent){evnt(8380);if(r)goto S_10247;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8380);}while(r); } S_10250:; if ((-((*__LONG_T&*__LONG_ISSTRING)!=(*__LONG_T2&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(8381);if(r)goto S_10250;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8381);}while(r); } S_10253:; if ((-((*__LONG_T&*__LONG_ISFIXEDLENGTH)!=(*__LONG_T2&*__LONG_ISFIXEDLENGTH)))||new_error){ if(qbevent){evnt(8382);if(r)goto S_10253;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8382);}while(r); } S_10256:; if ((-((*__LONG_T&*__LONG_ISOFFSETINBITS)!=(*__LONG_T2&*__LONG_ISOFFSETINBITS)))||new_error){ if(qbevent){evnt(8383);if(r)goto S_10256;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8383);}while(r); } S_10259:; if ((-((*__LONG_T&*__LONG_ISUDT)!=(*__LONG_T2&*__LONG_ISUDT)))||new_error){ if(qbevent){evnt(8384);if(r)goto S_10259;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8384);}while(r); } S_10262:; if ((-((*__LONG_T& 511 )!=(*__LONG_T2& 511 )))||new_error){ if(qbevent){evnt(8385);if(r)goto S_10262;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8385);}while(r); } S_10265:; if ((-(*__LONG_S!=*__LONG_S2))||new_error){ if(qbevent){evnt(8386);if(r)goto S_10265;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8386);}while(r); } do{ *__LONG_OLDMETHOD= 0 ; if(!qbevent)break;evnt(8388);}while(r); S_10269:; if ((qbs_cleanup(qbs_tmp_base,((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)))||new_error){ if(qbevent){evnt(8388);if(r)goto S_10269;} do{ *__LONG_OLDMETHOD= 1 ; if(!qbevent)break;evnt(8388);}while(r); } S_10272:; if ((-(*__LONG_OLDMETHOD!=*__LONG_DIMMETHOD))||new_error){ if(qbevent){evnt(8389);if(r)goto S_10272;} do{ *__LONG_MATCH= 0 ; if(!qbevent)break;evnt(8389);}while(r); } } S_10276:; if ((*__LONG_MATCH)||new_error){ if(qbevent){evnt(8392);if(r)goto S_10276;} do{ *__LONG_X=*__LONG_CURRENTID; if(!qbevent)break;evnt(8393);}while(r); S_10278:; if ((*__INTEGER_DIMSHARED)||new_error){ if(qbevent){evnt(8394);if(r)goto S_10278;} do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_X)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))= 1 ; if(!qbevent)break;evnt(8394);}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(8395);}while(r); S_10282:; if ((-(*__LONG_DIMMETHOD== 0 ))||new_error){ if(qbevent){evnt(8397);if(r)goto S_10282;} S_10283:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(8398);if(r)goto S_10283;} 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(8399);}while(r); S_10285:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(__STRING_TYP),qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(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_new_txt_len("_MEM",4)))))||new_error){ if(qbevent){evnt(8400);if(r)goto S_10285;} do{ qbs_set(__STRING_DIM2TYPEPASSBACK,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8401);}while(r); } }else{ do{ qbs_set(__STRING_DIM2TYPEPASSBACK,__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8404);}while(r); S_10290:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_DIM2TYPEPASSBACK,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(8405);if(r)goto S_10290;} 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(8406);}while(r); dl_continue_1201:; } dl_exit_1201:; do{ qbs_set(__STRING_DIM2TYPEPASSBACK,FUNC_SCASE2(__STRING_DIM2TYPEPASSBACK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8408);}while(r); } } do{ goto dl_exit_1200; if(!qbevent)break;evnt(8412);}while(r); } } S_10299:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(8416);if(r)goto S_10299;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(8416);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8416);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(8416);}while(r); } S_10305:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8417);if(r)goto S_10305;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8417);}while(r); } dl_continue_1200:; } dl_exit_1200:; S_10309:; if ((-(*__LONG_X== 0 ))||new_error){ if(qbevent){evnt(8420);if(r)goto S_10309;} do{ *__LONG_X=*__LONG_IDN+ 1 ; if(!qbevent)break;evnt(8420);}while(r); } do{ *__LONG_CHAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain.txt",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8423);}while(r); do{ SUB_WRITEBUFLINE(&(pass1202=*__LONG_CHAINTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8425);}while(r); do{ *__LONG_CHAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8427);}while(r); do{ *__LONG_CHAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8429);}while(r); do{ SUB_WRITEBUFLINE(&(pass1203=*__LONG_CHAINTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8431);}while(r); do{ *__LONG_CHAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_X)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8433);}while(r); S_10318:; if ((-(*__LONG_X!=(*__LONG_IDN+ 1 )))||new_error){ if(qbevent){evnt(8436);if(r)goto S_10318;} do{ goto LABEL_SKIPDIM; if(!qbevent)break;evnt(8436);}while(r); } do{ goto LABEL_DIMCOMMONARRAY; if(!qbevent)break;evnt(8437);}while(r); } } S_10324:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(8444);if(r)goto S_10324;} S_10325:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(8445);if(r)goto S_10325;} S_10326:; if (( 0 )||new_error){ if(qbevent){evnt(8447);if(r)goto S_10326;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1205; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("common checking:",16),__STRING_VARNAME), 0, 0, 1); if (new_error) goto skip1205; skip1205: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8447);}while(r); } do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(8449);}while(r); S_10330:; fornext_value1207= 1 ; fornext_finalvalue1207=*__LONG_COMMONARRAYLISTN; fornext_step1207= 1 ; if (fornext_step1207<0) fornext_step_negative1207=1; else fornext_step_negative1207=0; if (new_error) goto fornext_error1207; goto fornext_entrylabel1207; while(1){ fornext_value1207=fornext_step1207+(*__LONG_X); fornext_entrylabel1207: *__LONG_X=fornext_value1207; if (fornext_step_negative1207){ if (fornext_value1207fornext_finalvalue1207) break; } fornext_error1207:; if(qbevent){evnt(8450);if(r)goto S_10330;} do{ qbs_set(__STRING_VARNAME2,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8451);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8451);}while(r); do{ qbs_set(__STRING_TYP2,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8452);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8452);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8453);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8453);}while(r); do{ *__LONG_DIMSHARED2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8454);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(8454);}while(r); S_10339:; if (( 0 )||new_error){ if(qbevent){evnt(8455);if(r)goto S_10339;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1208; 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 skip1208; skip1208: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8455);}while(r); } S_10342:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARNAME,__STRING_VARNAME2)))||new_error){ if(qbevent){evnt(8457);if(r)goto S_10342;} S_10343:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_SYMBOL2FULLTYPENAME(__STRING_TYP),__STRING_TYP2)))||new_error){ if(qbevent){evnt(8458);if(r)goto S_10343;} S_10344:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8459);if(r)goto S_10344;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8459);}while(r); } S_10347:; if ((-(*__LONG_DIMMETHOD==*__LONG_DIMMETHOD2))||new_error){ if(qbevent){evnt(8460);if(r)goto S_10347;} S_10348:; if ((*__LONG_DIMSHARED2)||new_error){ if(qbevent){evnt(8464);if(r)goto S_10348;} do{ *__INTEGER_DIMSHARED=*__INTEGER_DIMSHARED| 2 ; if(!qbevent)break;evnt(8464);}while(r); } } } } fornext_continue_1206:; } fornext_exit_1206:; } } LABEL_DIMCOMMONARRAY:; if(qbevent){evnt(8476);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(8477);}while(r); S_10358:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8478);if(r)goto S_10358;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8478);}while(r); } LABEL_SKIPDIM:; if(qbevent){evnt(8479);r=0;} S_10361:; if ((-(*__INTEGER_DIMSHARED>= 2 ))||new_error){ if(qbevent){evnt(8480);if(r)goto S_10361;} do{ *__INTEGER_DIMSHARED=*__INTEGER_DIMSHARED- 2 ; if(!qbevent)break;evnt(8480);}while(r); } S_10364:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_COMMONOPTION!= 0 ))&(-(__STRING_ELEMENTS->len== 0 ))))||new_error){ if(qbevent){evnt(8483);if(r)goto S_10364;} do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 1 ; if(!qbevent)break;evnt(8487);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain.txt",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8490);}while(r); do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8491);}while(r); do{ SUB_WRITEBUFLINE(&(pass1210=*__LONG_MAINTXTBUF),qbs_new_txt_len("int32val=1;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8493);}while(r); do{ SUB_WRITEBUFLINE(&(pass1211=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8494);}while(r); do{ *__LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(8496);}while(r); do{ *__LONG_BITS=*__LONG_T& 511 ; if(!qbevent)break;evnt(8497);}while(r); S_10372:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(8498);if(r)goto S_10372;} 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(8498);}while(r); } S_10375:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(8499);if(r)goto S_10375;} S_10376:; if ((*__LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(8500);if(r)goto S_10376;} do{ *__LONG_BITS=*(int32*)(((char*)__UDT_ID)+(540))* 8 ; if(!qbevent)break;evnt(8501);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1212=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8503);}while(r); do{ *__LONG_BITS= 0 ; if(!qbevent)break;evnt(8504);}while(r); } } S_10383:; if ((*__LONG_BITS)||new_error){ if(qbevent){evnt(8508);if(r)goto S_10383;} do{ SUB_WRITEBUFLINE(&(pass1213=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),FUNC_STR2(__LONG_BITS)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8509);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1214=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8511);}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(8514);}while(r); S_10388:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(8516);if(r)goto S_10388;} S_10389:; if ((*__LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(8517);if(r)goto S_10389;} 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(8518);}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(8520);}while(r); S_10393:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8521);if(r)goto S_10393;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8521);}while(r); } } } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1215= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8524);}while(r); S_10399:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8525);if(r)goto S_10399;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8525);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1216=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8527);}while(r); do{ qbs_set(__STRING_TLAYOUT,__STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8529);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("main.txt",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8531);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8537);}while(r); do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8538);}while(r); do{ SUB_WRITEBUFLINE(&(pass1217=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==1){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8541);}while(r); do{ SUB_WRITEBUFLINE(&(pass1218=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8543);}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(8546);}while(r); do{ *__LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(8547);}while(r); S_10411:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(8548);if(r)goto S_10411;} S_10412:; if ((*__LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(8549);if(r)goto S_10412;} 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(8550);}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(8552);}while(r); S_10416:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8553);if(r)goto S_10416;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8553);}while(r); } } } S_10421:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(8557);if(r)goto S_10421;} S_10422:; if ((-((*__LONG_T&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(8558);if(r)goto S_10422;} do{ SUB_WRITEBUFLINE(&(pass1219=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(int64val>>3,1);",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8559);}while(r); do{ SUB_WRITEBUFLINE(&(pass1220=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8560);}while(r); } } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1221= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8565);}while(r); S_10428:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8566);if(r)goto S_10428;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8566);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1222=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8567);}while(r); do{ SUB_WRITEBUFLINE(&(pass1223=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8569);}while(r); do{ SUB_WRITEBUFLINE(&(pass1224=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8570);}while(r); do{ qbs_set(__STRING_TLAYOUT,__STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8572);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("main.txt",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8574);}while(r); do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(8576);}while(r); } LABEL_COMMONARRAYLISTED:; if(qbevent){evnt(8580);r=0;} S_10438:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_APPENDTYPE->len> 0 ))&(-(*__LONG_NEWDIMSYNTAX== -1 ))))||new_error){ if(qbevent){evnt(8582);if(r)goto S_10438;} S_10439:; if ((qbs_cleanup(qbs_tmp_base,__STRING_DIM2TYPEPASSBACK->len))||new_error){ if(qbevent){evnt(8583);if(r)goto S_10439;} do{ qbs_set(__STRING_APPENDTYPE,qbs_add(qbs_add(qbs_add(__STRING1_SP,FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP),__STRING_DIM2TYPEPASSBACK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8583);}while(r); } S_10442:; if ((-(*__LONG_NEWDIMSYNTAXTYPEPASSBACK== 0 ))||new_error){ if(qbevent){evnt(8584);if(r)goto S_10442;} do{ *__LONG_NEWDIMSYNTAXTYPEPASSBACK= -1 ; if(!qbevent)break;evnt(8585);}while(r); do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8586);}while(r); } } do{ *__LONG_N2=FUNC_NUMELEMENTS(__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8590);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_GETELEMENT(__STRING_TLAYOUT,&(pass1227= 1 ))),__STRING_APPENDNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8591);}while(r); S_10449:; if ((-(*__LONG_N2> 1 ))||new_error){ if(qbevent){evnt(8592);if(r)goto S_10449;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP2),FUNC_GETELEMENTS(__STRING_TLAYOUT,&(pass1228= 2 ),__LONG_N2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8593);}while(r); } S_10452:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_APPENDTYPE->len> 0 ))&(-(*__LONG_NEWDIMSYNTAX== 0 ))))||new_error){ if(qbevent){evnt(8596);if(r)goto S_10452;} S_10453:; if ((qbs_cleanup(qbs_tmp_base,__STRING_DIM2TYPEPASSBACK->len))||new_error){ if(qbevent){evnt(8597);if(r)goto S_10453;} do{ qbs_set(__STRING_APPENDTYPE,qbs_add(qbs_add(qbs_add(__STRING1_SP,FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP),__STRING_DIM2TYPEPASSBACK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8597);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8598);}while(r); } do{ *__LONG_DIMSTATIC=*__LONG_OLDDIMSTATIC; if(!qbevent)break;evnt(8603);}while(r); } S_10460:; if ((*__LONG_NEWDIMSYNTAX)||new_error){ if(qbevent){evnt(8607);if(r)goto S_10460;} do{ #include "ret0.txt" if(!qbevent)break;evnt(8607);}while(r); } S_10463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(8609);if(r)goto S_10463;} 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(8609);}while(r); do{ goto LABEL_DIMNEXT; if(!qbevent)break;evnt(8609);}while(r); } do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(8611);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(8612);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(8613);}while(r); S_10470:; if ((-(*__LONG_DIMSTATIC== 1 ))||new_error){ if(qbevent){evnt(8614);if(r)goto S_10470;} do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(8614);}while(r); } do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(8615);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8617);}while(r); S_10475:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(8618);if(r)goto S_10475;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8618);}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(8618);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8620);}while(r); }else{ do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8623);}while(r); do{ *__LONG_NEWDIMSYNTAXTYPEPASSBACK= 0 ; if(!qbevent)break;evnt(8624);}while(r); do{ qbs_set(__STRING_APPENDNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8627);}while(r); do{ qbs_set(__STRING_APPENDTYPE,qbs_add(__STRING1_SP,FUNC_SCASE(qbs_new_txt_len("As",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8628);}while(r); do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8629);}while(r); do{ qbs_set(__STRING_VARNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8630);}while(r); do{ qbs_set(__STRING_PREVIOUSELEMENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8631);}while(r); S_10489:; fornext_value1233=*__LONG_I; fornext_finalvalue1233=*__LONG_N; fornext_step1233= 1 ; if (fornext_step1233<0) fornext_step_negative1233=1; else fornext_step_negative1233=0; if (new_error) goto fornext_error1233; goto fornext_entrylabel1233; while(1){ fornext_value1233=fornext_step1233+(*__LONG_I); fornext_entrylabel1233: *__LONG_I=fornext_value1233; if (fornext_step_negative1233){ if (fornext_value1233fornext_finalvalue1233) break; } fornext_error1233:; if(qbevent){evnt(8632);if(r)goto S_10489;} do{ qbs_set(__STRING_D,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8633);}while(r); S_10491:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_D,qbs_new_txt_len(",",1)))|(qbs_equal(__STRING_D,qbs_new_txt_len("(",1)))))||new_error){ if(qbevent){evnt(8634);if(r)goto S_10491;} do{ goto fornext_exit_1232; if(!qbevent)break;evnt(8634);}while(r); } do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8635);}while(r); S_10495:; if ((qbs_cleanup(qbs_tmp_base,__STRING_PREVIOUSELEMENT->len))||new_error){ if(qbevent){evnt(8636);if(r)goto S_10495;} do{ qbs_set(__STRING_TYP,qbs_add(qbs_add(__STRING_TYP,__STRING_PREVIOUSELEMENT),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8637);}while(r); do{ qbs_set(__STRING_APPENDTYPE,qbs_add(qbs_add(__STRING_APPENDTYPE,__STRING1_SP),__STRING_PREVIOUSELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8638);}while(r); } do{ qbs_set(__STRING_PREVIOUSELEMENT,__STRING_D); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8640);}while(r); do{ qbs_set(__STRING_D,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8641);}while(r); fornext_continue_1232:; } fornext_exit_1232:; do{ qbs_set(__STRING_APPENDTYPE,FUNC_SCASE2(__STRING_APPENDTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8643);}while(r); do{ qbs_set(__STRING_TYP,qbs_rtrim(__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8644);}while(r); LABEL_DIMNEXT2:; if(qbevent){evnt(8646);r=0;} do{ *__LONG_NOTYPE= 0 ; if(!qbevent)break;evnt(8647);}while(r); do{ *__LONG_LISTARRAY= 0 ; if(!qbevent)break;evnt(8648);}while(r); S_10506:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_TYP,qbs_new_txt_len("",0)))|(qbs_equal(__STRING_VARNAME,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(8650);if(r)goto S_10506;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_FIRSTELEMENT),qbs_new_txt_len(" AS type variable-list or ",26)),__STRING_FIRSTELEMENT),qbs_new_txt_len(" variable-name AS type",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8650);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8650);}while(r); } S_10510:; if ((-(*__LONG_I>=(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(8653);if(r)goto S_10510;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8653);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8653);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8653);}while(r); } do{ qbs_set(__STRING_ELEMENTS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8656);}while(r); S_10517:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8658);if(r)goto S_10517;} do{ *__LONG_B= 1 ; if(!qbevent)break;evnt(8659);}while(r); S_10519:; fornext_value1236=*__LONG_I; fornext_finalvalue1236=*__LONG_N; fornext_step1236= 1 ; if (fornext_step1236<0) fornext_step_negative1236=1; else fornext_step_negative1236=0; if (new_error) goto fornext_error1236; goto fornext_entrylabel1236; while(1){ fornext_value1236=fornext_step1236+(*__LONG_I); fornext_entrylabel1236: *__LONG_I=fornext_value1236; if (fornext_step_negative1236){ if (fornext_value1236fornext_finalvalue1236) break; } fornext_error1236:; if(qbevent){evnt(8660);if(r)goto S_10519;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8661);}while(r); S_10521:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(8662);if(r)goto S_10521;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(8662);}while(r); } S_10524:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(8663);if(r)goto S_10524;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(8663);}while(r); } S_10527:; if ((-(*__LONG_B== 0 ))||new_error){ if(qbevent){evnt(8664);if(r)goto S_10527;} do{ goto fornext_exit_1235; if(!qbevent)break;evnt(8664);}while(r); } S_10530:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ELEMENTS->len))||new_error){ if(qbevent){evnt(8665);if(r)goto S_10530;} 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(8665);}while(r); }else{ do{ qbs_set(__STRING_ELEMENTS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8665);}while(r); } fornext_continue_1235:; } fornext_exit_1235:; S_10536:; if ((-(*__LONG_B!= 0 ))||new_error){ if(qbevent){evnt(8667);if(r)goto S_10536;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected )",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8667);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8667);}while(r); } do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8668);}while(r); S_10541:; if ((*__LONG_COMMONOPTION)||new_error){ if(qbevent){evnt(8670);if(r)goto S_10541;} do{ qbs_set(__STRING_ELEMENTS,qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8670);}while(r); } S_10544:; if (( 0 )||new_error){ if(qbevent){evnt(8673);if(r)goto S_10544;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1238; 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 skip1238; skip1238: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(8673);}while(r); } S_10547:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(8678);if(r)goto S_10547;} S_10548:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_ELEMENTS->len== 0 )))||new_error){ if(qbevent){evnt(8679);if(r)goto S_10548;} do{ *__LONG_LISTARRAY= 1 ; if(!qbevent)break;evnt(8680);}while(r); } } S_10552:; if ((-(*__LONG_I>=(*__LONG_N+ 1 )))||new_error){ if(qbevent){evnt(8686);if(r)goto S_10552;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8686);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8686);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8686);}while(r); } } do{ qbs_set(__STRING_D,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8688);}while(r); do{ *__LONG_DIMMETHOD= 0 ; if(!qbevent)break;evnt(8690);}while(r); do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8692);}while(r); do{ qbs_set(__STRING_S,FUNC_REMOVESYMBOL(__STRING_VARNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8695);}while(r); S_10563:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8696);if(r)goto S_10563;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8696);}while(r); } S_10566:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_VARNAME)== 0 )))||new_error){ if(qbevent){evnt(8697);if(r)goto S_10566;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid variable name",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8697);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8697);}while(r); } S_10570:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(8699);if(r)goto S_10570;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Cannot use type symbol with ",28),__STRING_FIRSTELEMENT),qbs_new_txt_len(" AS type variable-list (",24)),__STRING_S),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8700);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8701);}while(r); } S_10574:; 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(8704);if(r)goto S_10574;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DIM: Expected ,",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8704);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8704);}while(r); } do{ *__LONG_NEWDIMSYNTAX= -1 ; if(!qbevent)break;evnt(8706);}while(r); do{ return_point[next_return_point++]=5; if (next_return_point>=return_points) more_return_points(); goto LABEL_NORMALDIMBLOCK; RETURN_5:; if(!qbevent)break;evnt(8707);}while(r); do{ *__LONG_NEWDIMSYNTAX= 0 ; if(!qbevent)break;evnt(8708);}while(r); S_10581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_D,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(8710);if(r)goto S_10581;} 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(8711);}while(r); do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8712);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(8712);}while(r); do{ goto LABEL_DIMNEXT2; if(!qbevent)break;evnt(8713);}while(r); } do{ *__INTEGER_DIMOPTION= 0 ; if(!qbevent)break;evnt(8716);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(8717);}while(r); do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(8718);}while(r); S_10590:; if ((-(*__LONG_DIMSTATIC== 1 ))||new_error){ if(qbevent){evnt(8719);if(r)goto S_10590;} do{ *__LONG_DIMSTATIC= 0 ; if(!qbevent)break;evnt(8719);}while(r); } do{ *__LONG_ALLOWLOCALNAME= 0 ; if(!qbevent)break;evnt(8720);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8722);}while(r); S_10595:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(8723);if(r)goto S_10595;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8723);}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(8723);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8725);}while(r); } } } S_10604:; if ((-(*__LONG_THENGOTO== 1 ))||new_error){ if(qbevent){evnt(8741);if(r)goto S_10604;} S_10605:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8742);if(r)goto S_10605;} do{ qbs_set(__STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8743);}while(r); do{ *__LONG_A=qbs_asc(qbs_left(__STRING_FIRSTELEMENT, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8744);}while(r); S_10608:; if (((-(*__LONG_A== 46 ))|(((-(*__LONG_A>= 48 ))&(-(*__LONG_A<= 57 )))))||new_error){ if(qbevent){evnt(8745);if(r)goto S_10608;} do{ qbs_set(__STRING_A2,__STRING_CA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8745);}while(r); do{ goto LABEL_THENGOTO; if(!qbevent)break;evnt(8745);}while(r); } } } S_10614:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(8750);if(r)goto S_10614;} S_10615:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1241= 1 )),qbs_new_txt_len("GOTO",4))))||new_error){ if(qbevent){evnt(8751);if(r)goto S_10615;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("GoTo",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8752);}while(r); do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,&(pass1242= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8753);}while(r); LABEL_THENGOTO:; if(qbevent){evnt(8754);r=0;} S_10618:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(8755);if(r)goto S_10618;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8755);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8755);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass1243= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8757);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(8758);}while(r); LABEL_LABCHK2:; if(qbevent){evnt(8759);r=0;} S_10624:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(8760);if(r)goto S_10624;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(8761);}while(r); S_10626:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(8762);if(r)goto S_10626;} S_10627:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(8763);if(r)goto S_10627;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(8763);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(8764);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8765);}while(r); }else{ S_10633:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(8767);if(r)goto S_10633;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(8767);}while(r); do{ goto LABEL_LABCHK2; if(!qbevent)break;evnt(8767);}while(r); } } } S_10639:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(8770);if(r)goto S_10639;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(8772);}while(r); S_10641:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(8772);if(r)goto S_10641;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(8772);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(8782);if(r)goto S_10653;} 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(8782);}while(r); }else{ do{ qbs_set(__STRING_L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8782);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8783);}while(r); S_10659:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8783);if(r)goto S_10659;} 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(8783);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8783);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1247=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),__STRING_A2),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8784);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8785);}while(r); } } S_10668:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8789);if(r)goto S_10668;} S_10669:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_CONTINUE",9)))|(((qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CONTINUE",8)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(8790);if(r)goto S_10669;} S_10670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_CONTINUE",9))))||new_error){ if(qbevent){evnt(8791);if(r)goto S_10670;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("_Continue",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8791);}while(r); }else{ do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Continue",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8791);}while(r); } S_10675:; fornext_value1249=*__INTEGER_CONTROLLEVEL; fornext_finalvalue1249= 1 ; fornext_step1249= -1 ; if (fornext_step1249<0) fornext_step_negative1249=1; else fornext_step_negative1249=0; if (new_error) goto fornext_error1249; goto fornext_entrylabel1249; while(1){ fornext_value1249=fornext_step1249+(*__LONG_I); fornext_entrylabel1249: *__LONG_I=fornext_value1249; if (fornext_step_negative1249){ if (fornext_value1249fornext_finalvalue1249) break; } fornext_error1249:; if(qbevent){evnt(8793);if(r)goto S_10675;} do{ *__LONG_T=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(!qbevent)break;evnt(8794);}while(r); S_10677:; if ((-(*__LONG_T== 2 ))||new_error){ if(qbevent){evnt(8795);if(r)goto S_10677;} do{ SUB_WRITEBUFLINE(&(pass1250=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto fornext_continue_",22),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8796);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8797);}while(r); S_10680:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8797);if(r)goto S_10680;} 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(8797);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8797);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8798);}while(r); S_10686:; }else{ if ((-(*__LONG_T== 3 ))|(-(*__LONG_T== 4 ))){ if(qbevent){evnt(8799);if(r)goto S_10686;} do{ SUB_WRITEBUFLINE(&(pass1252=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto dl_continue_",17),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8800);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8801);}while(r); S_10689:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8801);if(r)goto S_10689;} 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(8801);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8801);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8802);}while(r); S_10695:; }else{ if (-(*__LONG_T== 5 )){ if(qbevent){evnt(8803);if(r)goto S_10695;} do{ SUB_WRITEBUFLINE(&(pass1254=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto ww_continue_",17),FUNC_STR2((&(((int32*)(__ARRAY_LONG_CONTROLID[0]))[array_check((*__LONG_I)-__ARRAY_LONG_CONTROLID[4],__ARRAY_LONG_CONTROLID[5])])))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8804);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8805);}while(r); S_10698:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8805);if(r)goto S_10698;} 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(8805);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8805);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8806);}while(r); } } } fornext_continue_1248:; } fornext_exit_1248:; do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CONTINUE outside DO..LOOP/FOR..NEXT/WHILE..WEND block",53))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8809);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8809);}while(r); } } S_10710:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CHAIN",5))))||new_error){ if(qbevent){evnt(8813);if(r)goto S_10710;} S_10711:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(8814);if(r)goto S_10711;} do{ SUB_ADDWARNING(__LONG_LINENUMBER,__LONG_INCLEVEL,(&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),qbs_new_txt_len("Feature incompatible with $Debug mode",37),qbs_new_txt_len("CHAIN",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8815);}while(r); } } S_10715:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RUN",3))))||new_error){ if(qbevent){evnt(8819);if(r)goto S_10715;} S_10716:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(8820);if(r)goto S_10716;} do{ SUB_ADDWARNING(__LONG_LINENUMBER,__LONG_INCLEVEL,(&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),qbs_new_txt_len("Feature incompatible with $Debug mode",37),qbs_new_txt_len("RUN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8821);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Run",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8823);}while(r); S_10720:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8824);if(r)goto S_10720;} do{ SUB_WRITEBUFLINE(&(pass1256=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_run_init();",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8826);}while(r); do{ SUB_WRITEBUFLINE(&(pass1257=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_clear(NULL,NULL,NULL,NULL);",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8827);}while(r); S_10723:; if ((qbs_cleanup(qbs_tmp_base,__STRING_SUBFUNC->len))||new_error){ if(qbevent){evnt(8828);if(r)goto S_10723;} do{ SUB_WRITEBUFLINE(&(pass1259=*__LONG_MAINTXTBUF),qbs_new_txt_len("QBMAIN(NULL);",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8829);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1260=*__LONG_MAINTXTBUF),qbs_new_txt_len("goto S_0;",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8831);}while(r); } }else{ do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1261= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8835);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8836);}while(r); S_10731:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8837);if(r)goto S_10731;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8837);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8838);}while(r); do{ qbs_set(__STRING_IGNORE,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8839);}while(r); S_10736:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8840);if(r)goto S_10736;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8840);}while(r); } S_10739:; if (((-(*__LONG_N== 2 ))&((-((*__LONG_TYP&*__LONG_ISSTRING)== 0 ))))||new_error){ if(qbevent){evnt(8841);if(r)goto S_10739;} do{ qbs_set(__STRING_LBL,FUNC_GETELEMENT(__STRING_CA,&(pass1262= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8843);}while(r); S_10741:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_LBL)== 0 )))||new_error){ if(qbevent){evnt(8844);if(r)goto S_10741;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8844);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8844);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LBL,&(pass1263= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8846);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(8847);}while(r); LABEL_LABCHK501:; if(qbevent){evnt(8848);r=0;} S_10747:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(8849);if(r)goto S_10747;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(8850);}while(r); S_10749:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(8851);if(r)goto S_10749;} S_10750:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(8852);if(r)goto S_10750;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))= 0 ; if(!qbevent)break;evnt(8852);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(8853);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8854);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(8855);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(8856);}while(r); }else{ S_10758:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(8858);if(r)goto S_10758;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(8858);}while(r); do{ goto LABEL_LABCHK501; if(!qbevent)break;evnt(8858);}while(r); } } } S_10764:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(8861);if(r)goto S_10764;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(8863);}while(r); S_10766:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(8863);if(r)goto S_10766;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(8863);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(8877);if(r)goto S_10782;} do{ SUB_WRITEBUFLINE(&(pass1268=*__LONG_RUNTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8878);}while(r); do{ SUB_WRITEBUFLINE(&(pass1269=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("run_from_line=",14),FUNC_STR2(__LONG_NEXTRUNLINEINDEX)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8879);}while(r); do{ *__LONG_NEXTRUNLINEINDEX=*__LONG_NEXTRUNLINEINDEX+ 1 ; if(!qbevent)break;evnt(8880);}while(r); do{ SUB_WRITEBUFLINE(&(pass1270=*__LONG_MAINTXTBUF),qbs_new_txt_len("QBMAIN(NULL);",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8881);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1271=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),__STRING_LBL),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8883);}while(r); } }else{ do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8887);}while(r); S_10792:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8888);if(r)goto S_10792;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8888);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1272=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_run(",8),__STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8889);}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(8890);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8893);}while(r); S_10800:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8893);if(r)goto S_10800;} 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(8893);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8893);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8894);}while(r); } S_10807:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("END",3))))||new_error){ if(qbevent){evnt(8901);if(r)goto S_10807;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("End",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8902);}while(r); S_10809:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8903);if(r)goto S_10809;} do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1274= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8904);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8905);}while(r); S_10812:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8905);if(r)goto S_10812;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8905);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8906);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISINTEGER64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8907);}while(r); S_10817:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8907);if(r)goto S_10817;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8907);}while(r); } do{ qbs_set(__STRING_INCLINENUMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8908);}while(r); S_10821:; if ((((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])||new_error){ if(qbevent){evnt(8909);if(r)goto S_10821;} do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_new_txt_len(",",1),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8910);}while(r); do{ qbs_set(__STRING_THISINCNAME,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(8911);}while(r); do{ qbs_set(__STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),__STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8912);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_INCLINENUMP,qbs_new_txt_len(",",1)),func_chr( 34 )),__STRING_THISINCNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8913);}while(r); } S_10827:; if ((*__LONG_VWATCHON&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(8915);if(r)goto S_10827;} do{ qbs_set(__STRING_TEMP,__STRING_VWATCHERRORCALL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8915);}while(r); }else{ do{ qbs_set(__STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8915);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1276=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){",12),__STRING_TEMP),qbs_new_txt_len("evnt(",5)),FUNC_STR2(__LONG_LINENUMBER)),__STRING_INCLINENUMP),qbs_new_txt_len(");}",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8916);}while(r); do{ SUB_WRITEBUFLINE(&(pass1277=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("exit_code=",10),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8917);}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(8918);}while(r); } do{ SUB_XEND(); if(!qbevent)break;evnt(8920);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8921);}while(r); S_10838:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8921);if(r)goto S_10838;} 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(8921);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8921);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8922);}while(r); } S_10845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SYSTEM",6))))||new_error){ if(qbevent){evnt(8925);if(r)goto S_10845;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("System",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8926);}while(r); S_10847:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8927);if(r)goto S_10847;} do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1279= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8928);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8929);}while(r); S_10850:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8929);if(r)goto S_10850;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8929);}while(r); } do{ qbs_set(__STRING_L2,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8930);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_ISINTEGER64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8931);}while(r); S_10855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8931);if(r)goto S_10855;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8931);}while(r); } do{ qbs_set(__STRING_INCLINENUMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8932);}while(r); S_10859:; if ((((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])||new_error){ if(qbevent){evnt(8933);if(r)goto S_10859;} do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_new_txt_len(",",1),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8934);}while(r); do{ qbs_set(__STRING_THISINCNAME,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(8935);}while(r); do{ qbs_set(__STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),__STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8936);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_INCLINENUMP,qbs_new_txt_len(",",1)),func_chr( 34 )),__STRING_THISINCNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8937);}while(r); } S_10865:; if (((-(*__LONG_VWATCHON== 1 ))&(-(*__LONG_NOCHECKS== 0 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(8939);if(r)goto S_10865;} do{ qbs_set(__STRING_TEMP,__STRING_VWATCHERRORCALL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8939);}while(r); }else{ do{ qbs_set(__STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8939);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1281=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){",12),__STRING_TEMP),qbs_new_txt_len("evnt(",5)),FUNC_STR2(__LONG_LINENUMBER)),__STRING_INCLINENUMP),qbs_new_txt_len(");}",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8940);}while(r); do{ SUB_WRITEBUFLINE(&(pass1282=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("exit_code=",10),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8941);}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(8942);}while(r); } S_10874:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(8946);if(r)goto S_10874;} S_10875:; if ((-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 ))||new_error){ if(qbevent){evnt(8947);if(r)goto S_10875;} do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass1283= 0 )); if(!qbevent)break;evnt(8948);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1284=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= 0; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",101)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8950);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1285=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (sub_gl_called) error(271);",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8952);}while(r); do{ SUB_WRITEBUFLINE(&(pass1286=*__LONG_MAINTXTBUF),qbs_new_txt_len("close_program=1;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8953);}while(r); do{ SUB_WRITEBUFLINE(&(pass1287=*__LONG_MAINTXTBUF),qbs_new_txt_len("end();",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8954);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8955);}while(r); S_10884:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8955);if(r)goto S_10884;} 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(8955);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8955);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8956);}while(r); } S_10891:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(8959);if(r)goto S_10891;} S_10892:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("STOP",4))))||new_error){ if(qbevent){evnt(8960);if(r)goto S_10892;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Stop",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8961);}while(r); S_10894:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(8962);if(r)goto S_10894;} do{ qbs_set(__STRING_E,FUNC_GETELEMENTS(__STRING_CA,&(pass1289= 2 ),__LONG_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8963);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8964);}while(r); S_10897:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8965);if(r)goto S_10897;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8965);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Stop",4)),__STRING1_SP),__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8966);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1290= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8967);}while(r); S_10902:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8968);if(r)goto S_10902;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8968);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8971);}while(r); S_10907:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8971);if(r)goto S_10907;} 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(8971);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8971);}while(r); } S_10912:; if (((-(*__LONG_VWATCHON== 1 ))&(-(*__LONG_NOCHECKS== 0 ))&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(8972);if(r)goto S_10912;} do{ SUB_WRITEBUFLINE(&(pass1292=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER=-3; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars); if (*__LONG_VWATCH_GOTO>0) goto VWATCH_SETNEXTLINE; if (*__LONG_VWATCH_GOTO<0) goto VWATCH_SKIPLINE;",202)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8973);}while(r); do{ SUB_VWATCHADDLABEL(__LONG_LINENUMBER,&(pass1293= 0 )); if(!qbevent)break;evnt(8974);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1294=*__LONG_MAINTXTBUF),qbs_new_txt_len("close_program=1;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8976);}while(r); do{ SUB_WRITEBUFLINE(&(pass1295=*__LONG_MAINTXTBUF),qbs_new_txt_len("end();",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8977);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8979);}while(r); } } S_10922:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(8983);if(r)goto S_10922;} S_10923:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(8984);if(r)goto S_10923;} do{ SUB_XGOSUB(__STRING_CA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8985);}while(r); S_10925:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(8986);if(r)goto S_10925;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(8986);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8988);}while(r); } } S_10931:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(8992);if(r)goto S_10931;} S_10932:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RETURN",6))))||new_error){ if(qbevent){evnt(8993);if(r)goto S_10932;} S_10933:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(8994);if(r)goto S_10933;} do{ SUB_WRITEBUFLINE(&(pass1296=*__LONG_MAINTXTBUF),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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8995);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Return",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8996);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(8997);}while(r); S_10937:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(8997);if(r)goto S_10937;} 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(8997);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(8997);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(8998);}while(r); }else{ S_10944:; if ((-(*__LONG_SUBFUNCN!= 0 ))||new_error){ if(qbevent){evnt(9001);if(r)goto S_10944;} 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(9001);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9001);}while(r); } S_10948:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(9002);if(r)goto S_10948;} 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(9002);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9002);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1298=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (!next_return_point) error(3);",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9003);}while(r); do{ SUB_WRITEBUFLINE(&(pass1299=*__LONG_MAINTXTBUF),qbs_new_txt_len("next_return_point--;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9004);}while(r); do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,&(pass1300= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9005);}while(r); S_10955:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(9006);if(r)goto S_10955;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9006);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9006);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_A2,&(pass1301= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9008);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(9009);}while(r); LABEL_LABCHK505:; if(qbevent){evnt(9010);r=0;} S_10961:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(9011);if(r)goto S_10961;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(9012);}while(r); S_10963:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(9013);if(r)goto S_10963;} S_10964:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(9014);if(r)goto S_10964;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(9014);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(9015);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9016);}while(r); }else{ S_10970:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(9018);if(r)goto S_10970;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(9018);}while(r); do{ goto LABEL_LABCHK505; if(!qbevent)break;evnt(9018);}while(r); } } } S_10976:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(9021);if(r)goto S_10976;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(9023);}while(r); S_10978:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(9023);if(r)goto S_10978;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(9023);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(9035);if(r)goto S_10993;} 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(9035);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9035);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9036);}while(r); } } } S_11002:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9041);if(r)goto S_11002;} S_11003:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESUME",6))))||new_error){ if(qbevent){evnt(9042);if(r)goto S_11003;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Resume",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9043);}while(r); S_11005:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(9044);if(r)goto S_11005;} LABEL_RESUMEPREV:; if(qbevent){evnt(9045);r=0;} do{ SUB_WRITEBUFLINE(&(pass1305=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (!error_handling){error(20);}else{error_retry=1; qbevent=1; error_handling=0; error_err=0; return;}",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9048);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9050);}while(r); S_11008:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9050);if(r)goto S_11008;} 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(9050);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9050);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9051);}while(r); } S_11015:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(9053);if(r)goto S_11015;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many parameters",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9053);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9053);}while(r); } do{ qbs_set(__STRING_S,FUNC_GETELEMENT(__STRING_CA,&(pass1307= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9054);}while(r); S_11020:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_S),qbs_new_txt_len("NEXT",4))))||new_error){ if(qbevent){evnt(9055);if(r)goto S_11020;} do{ SUB_WRITEBUFLINE(&(pass1308=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (!error_handling){error(20);}else{error_handling=0; error_err=0; return;}",76)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9058);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(__STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Next",4)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9060);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9061);}while(r); S_11024:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9061);if(r)goto S_11024;} 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(9061);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9061);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9062);}while(r); } S_11031:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_S,qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(9064);if(r)goto S_11031;} 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(9064);}while(r); do{ goto LABEL_RESUMEPREV; if(!qbevent)break;evnt(9064);}while(r); } S_11035:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_S)== 0 )))||new_error){ if(qbevent){evnt(9065);if(r)goto S_11035;} 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(9065);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9065);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_S,&(pass1310= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9067);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(9068);}while(r); LABEL_LABCHK506:; if(qbevent){evnt(9069);r=0;} S_11041:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(9070);if(r)goto S_11041;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(9071);}while(r); S_11043:; if (((-(*__LONG_S==*__LONG_SUBFUNCN))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(9072);if(r)goto S_11043;} S_11044:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(9073);if(r)goto S_11044;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(9073);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(9074);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9075);}while(r); }else{ S_11050:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(9077);if(r)goto S_11050;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(9077);}while(r); do{ goto LABEL_LABCHK506; if(!qbevent)break;evnt(9077);}while(r); } } } S_11056:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(9080);if(r)goto S_11056;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(9082);}while(r); S_11058:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(9082);if(r)goto S_11058;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(9082);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(9093);if(r)goto S_11072;} 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(9093);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9093);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1313=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9094);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9095);}while(r); } } S_11081:; if ((-(*__LONG_N== 4 ))||new_error){ if(qbevent){evnt(9099);if(r)goto S_11081;} S_11082:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENTS(__STRING_A,&(pass1314= 1 ),&(pass1315= 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(9100);if(r)goto S_11082;} do{ qbs_set(__STRING_L,FUNC_SCASE(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(9101);}while(r); do{ qbs_set(__STRING_LBL,FUNC_GETELEMENT(__STRING_CA,&(pass1316= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9102);}while(r); S_11085:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_LBL,qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(9103);if(r)goto S_11085;} do{ SUB_WRITEBUFLINE(&(pass1317=*__LONG_MAINTXTBUF),qbs_new_txt_len("error_goto_line=0;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9104);}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(9105);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9106);}while(r); S_11089:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9106);if(r)goto S_11089;} 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(9106);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9106);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9107);}while(r); } S_11096:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_LBL)== 0 )))||new_error){ if(qbevent){evnt(9109);if(r)goto S_11096;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9109);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9109);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LBL,&(pass1319= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9111);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(9112);}while(r); LABEL_LABCHK6:; if(qbevent){evnt(9113);r=0;} S_11102:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(9114);if(r)goto S_11102;} do{ *__LONG_S=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257)); if(!qbevent)break;evnt(9115);}while(r); S_11104:; if (((-(*__LONG_S== 0 ))|(-(*__LONG_S== -1 )))||new_error){ if(qbevent){evnt(9116);if(r)goto S_11104;} S_11105:; if ((-(*__LONG_S== -1 ))||new_error){ if(qbevent){evnt(9117);if(r)goto S_11105;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))= 0 ; if(!qbevent)break;evnt(9117);}while(r); } do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(9118);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9119);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(9120);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(9121);}while(r); }else{ S_11113:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(9123);if(r)goto S_11113;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R); if(!qbevent)break;evnt(9123);}while(r); do{ goto LABEL_LABCHK6; if(!qbevent)break;evnt(9123);}while(r); } } } S_11119:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(9126);if(r)goto S_11119;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(9128);}while(r); S_11121:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(9128);if(r)goto S_11121;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(9128);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(9141);if(r)goto S_11136;} 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(9141);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9141);}while(r); } do{ *__LONG_ERRORLABELS=*__LONG_ERRORLABELS+ 1 ; if(!qbevent)break;evnt(9142);}while(r); do{ SUB_WRITEBUFLINE(&(pass1322=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("error_goto_line=",16),FUNC_STR2(__LONG_ERRORLABELS)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9143);}while(r); do{ SUB_WRITEBUFLINE(&(pass1323=*__LONG_ERRTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9144);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9145);}while(r); } } S_11147:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9149);if(r)goto S_11147;} S_11148:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESTORE",7))))||new_error){ if(qbevent){evnt(9150);if(r)goto S_11148;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Restore",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9151);}while(r); S_11150:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(9152);if(r)goto S_11150;} do{ SUB_WRITEBUFLINE(&(pass1324=*__LONG_MAINTXTBUF),qbs_new_txt_len("data_offset=0;",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9153);}while(r); }else{ S_11153:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(9155);if(r)goto S_11153;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - too many parameters (expected RESTORE label/line number)",71)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9155);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9155);}while(r); } do{ qbs_set(__STRING_LBL,FUNC_GETELEMENT(__STRING_CA,&(pass1325= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9156);}while(r); S_11158:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(__STRING_LBL)== 0 )))||new_error){ if(qbevent){evnt(9157);if(r)goto S_11158;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9157);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9157);}while(r); } do{ *__LONG_V=FUNC_HASHFIND(__STRING_LBL,&(pass1326= 2 ),__LONG_IGNORE,__LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9161);}while(r); do{ *__LONG_X= 1 ; if(!qbevent)break;evnt(9162);}while(r); S_11164:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(9163);if(r)goto S_11164;} do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(9164);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9165);}while(r); do{ *(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+269))= 1 ; if(!qbevent)break;evnt(9166);}while(r); S_11168:; if ((-(*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))== 0 ))||new_error){ if(qbevent){evnt(9167);if(r)goto S_11168;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270))=*__LONG_LINENUMBER; if(!qbevent)break;evnt(9167);}while(r); } } S_11172:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(9169);if(r)goto S_11172;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(9170);}while(r); S_11174:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(9170);if(r)goto S_11174;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(9170);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(9184);if(r)goto S_11191;} 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(9184);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9184);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9185);}while(r); } } S_11199:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9192);if(r)goto S_11199;} S_11200:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("ON",2))))||new_error){ if(qbevent){evnt(9193);if(r)goto S_11200;} do{ SUB_XONGOTOGOSUB(__STRING_A,__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9194);}while(r); S_11202:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9195);if(r)goto S_11202;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9195);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9196);}while(r); } } S_11208:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9202);if(r)goto S_11208;} S_11209:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMGET",7)))|(((qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("MEMGET",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(9203);if(r)goto S_11209;} do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9205);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9206);}while(r); do{ *__LONG_NE= 0 ; if(!qbevent)break;evnt(9207);}while(r); S_11213:; fornext_value1331= 2 ; fornext_finalvalue1331=*__LONG_N; fornext_step1331= 1 ; if (fornext_step1331<0) fornext_step_negative1331=1; else fornext_step_negative1331=0; if (new_error) goto fornext_error1331; goto fornext_entrylabel1331; while(1){ fornext_value1331=fornext_step1331+(*__LONG_I2); fornext_entrylabel1331: *__LONG_I2=fornext_value1331; if (fornext_step_negative1331){ if (fornext_value1331fornext_finalvalue1331) break; } fornext_error1331:; if(qbevent){evnt(9208);if(r)goto S_11213;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9209);}while(r); S_11215:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9210);if(r)goto S_11215;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9210);}while(r); } S_11218:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9211);if(r)goto S_11218;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9211);}while(r); } S_11221:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(9212);if(r)goto S_11221;} do{ *__LONG_NE=*__LONG_NE+ 1 ; if(!qbevent)break;evnt(9213);}while(r); S_11223:; if ((-(*__LONG_NE== 1 ))||new_error){ if(qbevent){evnt(9214);if(r)goto S_11223;} do{ qbs_set(__STRING_BLK,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9214);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9214);}while(r); } S_11227:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(9215);if(r)goto S_11227;} do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9215);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9215);}while(r); } S_11231:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(9216);if(r)goto S_11231;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Syntax error - too many parameters (Expected ",45),__STRING_QB64PREFIX),qbs_new_txt_len("MEMGET mem-reference, offset, variable)",39))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9216);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9216);}while(r); } }else{ S_11236:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(9218);if(r)goto S_11236;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9218);}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(9218);}while(r); } } fornext_continue_1330:; } fornext_exit_1330:; do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9221);}while(r); S_11244:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))|(-(*__LONG_NE!= 2 ))))||new_error){ if(qbevent){evnt(9222);if(r)goto S_11244;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("MEMGET mem-reference, offset, variable",38))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9222);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9222);}while(r); } S_11248:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMGET",7))))||new_error){ if(qbevent){evnt(9224);if(r)goto S_11248;} do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("_MemGet",7)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9224);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("MemGet",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9224);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BLK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9226);}while(r); S_11254:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9226);if(r)goto S_11254;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9226);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9227);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9229);}while(r); S_11259:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9229);if(r)goto S_11259;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9229);}while(r); } S_11262:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))|(-((*__LONG_TYP& 511 )!= 1 )))||new_error){ if(qbevent){evnt(9230);if(r)goto S_11262;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("MEM type",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9230);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9230);}while(r); } do{ qbs_set(__STRING_BLKOFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1333= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9231);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OFFS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9238);}while(r); S_11268:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9238);if(r)goto S_11268;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9238);}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(9239);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1334=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9240);}while(r); S_11273:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9240);if(r)goto S_11273;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9240);}while(r); } do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9241);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9244);}while(r); S_11278:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9244);if(r)goto S_11278;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9244);}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(9245);}while(r); do{ qbs_set(__STRING_VARSIZE,FUNC_EVALUATETOTYP(__STRING_E,&(pass1335= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9246);}while(r); S_11283:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9246);if(r)goto S_11283;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9246);}while(r); } do{ qbs_set(__STRING_VAROFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1336= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9247);}while(r); S_11287:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9247);if(r)goto S_11287;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9247);}while(r); } do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(9257);}while(r); S_11291:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(9258);if(r)goto S_11291;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9258);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9258);}while(r); } S_11295:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("2",1))))||new_error){ if(qbevent){evnt(9259);if(r)goto S_11295;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9259);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9259);}while(r); } S_11299:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("4",1))))||new_error){ if(qbevent){evnt(9260);if(r)goto S_11299;} do{ *__LONG_S= 4 ; if(!qbevent)break;evnt(9260);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9260);}while(r); } S_11303:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("8",1))))||new_error){ if(qbevent){evnt(9261);if(r)goto S_11303;} do{ *__LONG_S= 8 ; if(!qbevent)break;evnt(9261);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9261);}while(r); } S_11307:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(9263);if(r)goto S_11307;} S_11308:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(9265);if(r)goto S_11308;} do{ SUB_WRITEBUFLINE(&(pass1337=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9266);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1338=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9268);}while(r); } }else{ do{ SUB_WRITEBUFLINE(&(pass1339=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_OFFS),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9272);}while(r); do{ SUB_WRITEBUFLINE(&(pass1340=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if ( ((mem_block*)(",19),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset ){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9274);}while(r); do{ SUB_WRITEBUFLINE(&(pass1341=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9276);}while(r); do{ SUB_WRITEBUFLINE(&(pass1342=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long < ((mem_block*)(",25),__STRING_BLKOFFS),qbs_new_txt_len("))->offset ||",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9277);}while(r); do{ SUB_WRITEBUFLINE(&(pass1343=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9278);}while(r); do{ SUB_WRITEBUFLINE(&(pass1344=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9279);}while(r); do{ SUB_WRITEBUFLINE(&(pass1345=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9281);}while(r); do{ SUB_WRITEBUFLINE(&(pass1346=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9282);}while(r); S_11322:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(9283);if(r)goto S_11322;} do{ SUB_WRITEBUFLINE(&(pass1347=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9284);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1348=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9286);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1349=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9288);}while(r); do{ SUB_WRITEBUFLINE(&(pass1350=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else error(309);",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9289);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9292);}while(r); S_11331:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9292);if(r)goto S_11331;} 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(9292);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9292);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9293);}while(r); } } S_11339:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9301);if(r)goto S_11339;} S_11340:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMPUT",7)))|(((qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("MEMPUT",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(9302);if(r)goto S_11340;} do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9304);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9305);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9306);}while(r); do{ *__LONG_NE= 0 ; if(!qbevent)break;evnt(9307);}while(r); S_11345:; fornext_value1353= 2 ; fornext_finalvalue1353=*__LONG_N; fornext_step1353= 1 ; if (fornext_step1353<0) fornext_step_negative1353=1; else fornext_step_negative1353=0; if (new_error) goto fornext_error1353; goto fornext_entrylabel1353; while(1){ fornext_value1353=fornext_step1353+(*__LONG_I2); fornext_entrylabel1353: *__LONG_I2=fornext_value1353; if (fornext_step_negative1353){ if (fornext_value1353fornext_finalvalue1353) break; } fornext_error1353:; if(qbevent){evnt(9308);if(r)goto S_11345;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9309);}while(r); S_11347:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9310);if(r)goto S_11347;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9310);}while(r); } S_11350:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9311);if(r)goto S_11350;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9311);}while(r); } S_11353:; 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(9312);if(r)goto S_11353;} do{ *__LONG_NE=*__LONG_NE+ 1 ; if(!qbevent)break;evnt(9313);}while(r); S_11355:; if ((-(*__LONG_NE== 1 ))||new_error){ if(qbevent){evnt(9314);if(r)goto S_11355;} do{ qbs_set(__STRING_BLK,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9314);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9314);}while(r); } S_11359:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(9315);if(r)goto S_11359;} do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9315);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9315);}while(r); } S_11363:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(9316);if(r)goto S_11363;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9316);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9316);}while(r); } S_11367:; 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(9317);if(r)goto S_11367;} 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(9317);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9317);}while(r); } }else{ S_11372:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(9319);if(r)goto S_11372;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9319);}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(9319);}while(r); } } fornext_continue_1352:; } fornext_exit_1352:; S_11379:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_NE< 2 ))|(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(9322);if(r)goto S_11379;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("MEMPUT mem-reference, offset, variable|value[AS type]",53))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9322);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9322);}while(r); } S_11383:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(9323);if(r)goto S_11383;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9323);}while(r); }else{ do{ qbs_set(__STRING_TYP,qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9323);}while(r); } S_11388:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMPUT",7))))||new_error){ if(qbevent){evnt(9325);if(r)goto S_11388;} do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("_MemPut",7)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9325);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("MemPut",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9325);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BLK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9327);}while(r); S_11394:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9327);if(r)goto S_11394;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9327);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9328);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9330);}while(r); S_11399:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9330);if(r)goto S_11399;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9330);}while(r); } S_11402:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))|(-((*__LONG_TYP& 511 )!= 1 )))||new_error){ if(qbevent){evnt(9331);if(r)goto S_11402;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("MEM type",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9331);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9331);}while(r); } do{ qbs_set(__STRING_BLKOFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1355= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9332);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OFFS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9334);}while(r); S_11408:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9334);if(r)goto S_11408;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9334);}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(9335);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1356=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9336);}while(r); S_11413:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9336);if(r)goto S_11413;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9336);}while(r); } do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9337);}while(r); S_11417:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(9339);if(r)goto S_11417;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9340);}while(r); S_11419:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9340);if(r)goto S_11419;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9340);}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(9341);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9343);}while(r); S_11424:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9343);if(r)goto S_11424;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9343);}while(r); } S_11427:; if (((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))&((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(9344);if(r)goto S_11427;} do{ SUB_WRITEBUFLINE(&(pass1357=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("g_tmp_str=",10),__STRING_TEST),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9345);}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(9346);}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(9347);}while(r); }else{ do{ qbs_set(__STRING_VARSIZE,FUNC_EVALUATETOTYP(__STRING_E,&(pass1358= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9349);}while(r); S_11433:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9349);if(r)goto S_11433;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9349);}while(r); } do{ qbs_set(__STRING_VAROFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1359= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9350);}while(r); S_11437:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9350);if(r)goto S_11437;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9350);}while(r); } } do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(9354);}while(r); S_11442:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(9355);if(r)goto S_11442;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9355);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9355);}while(r); } S_11446:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("2",1))))||new_error){ if(qbevent){evnt(9356);if(r)goto S_11446;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9356);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9356);}while(r); } S_11450:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("4",1))))||new_error){ if(qbevent){evnt(9357);if(r)goto S_11450;} do{ *__LONG_S= 4 ; if(!qbevent)break;evnt(9357);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9357);}while(r); } S_11454:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARSIZE,qbs_new_txt_len("8",1))))||new_error){ if(qbevent){evnt(9358);if(r)goto S_11454;} do{ *__LONG_S= 8 ; if(!qbevent)break;evnt(9358);}while(r); do{ qbs_set(__STRING_ST,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9358);}while(r); } S_11458:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(9360);if(r)goto S_11458;} S_11459:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(9362);if(r)goto S_11459;} do{ SUB_WRITEBUFLINE(&(pass1360=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9363);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1361=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9365);}while(r); } }else{ do{ SUB_WRITEBUFLINE(&(pass1362=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_OFFS),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9369);}while(r); do{ SUB_WRITEBUFLINE(&(pass1363=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if ( ((mem_block*)(",19),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset ){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9371);}while(r); do{ SUB_WRITEBUFLINE(&(pass1364=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9373);}while(r); do{ SUB_WRITEBUFLINE(&(pass1365=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long < ((mem_block*)(",25),__STRING_BLKOFFS),qbs_new_txt_len("))->offset ||",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9374);}while(r); do{ SUB_WRITEBUFLINE(&(pass1366=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9375);}while(r); do{ SUB_WRITEBUFLINE(&(pass1367=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9376);}while(r); do{ SUB_WRITEBUFLINE(&(pass1368=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9378);}while(r); do{ SUB_WRITEBUFLINE(&(pass1369=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9379);}while(r); S_11473:; if ((*__LONG_S)||new_error){ if(qbevent){evnt(9380);if(r)goto S_11473;} do{ SUB_WRITEBUFLINE(&(pass1370=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9381);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1371=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9383);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1372=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9385);}while(r); do{ SUB_WRITEBUFLINE(&(pass1373=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else error(309);",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9386);}while(r); } }else{ do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9394);}while(r); S_11483:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(9395);if(r)goto S_11483;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid type",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9395);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9395);}while(r); } S_11487:; if (((-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 ))|(-((*__LONG_T&*__LONG_ISUDT)!= 0 ))|((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(9396);if(r)goto S_11487;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MEMPUT requires numeric type",28))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9396);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9396);}while(r); } S_11491:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(9397);if(r)goto S_11491;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(9397);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9399);}while(r); S_11495:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9399);if(r)goto S_11495;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9399);}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),FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP),__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9400);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9401);}while(r); S_11500:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9401);if(r)goto S_11500;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9401);}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(9402);}while(r); do{ qbs_set(__STRING_VARSIZE,FUNC_STR2(&(pass1374=(*__LONG_T& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9403);}while(r); S_11505:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(9404);if(r)goto S_11505;} do{ SUB_WRITEBUFLINE(&(pass1375=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9406);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1376=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),__STRING_OFFS),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9409);}while(r); do{ SUB_WRITEBUFLINE(&(pass1377=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if ( ((mem_block*)(",19),__STRING_BLKOFFS),qbs_new_txt_len("))->lock_offset ){",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9411);}while(r); do{ SUB_WRITEBUFLINE(&(pass1378=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9413);}while(r); do{ SUB_WRITEBUFLINE(&(pass1379=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long < ((mem_block*)(",25),__STRING_BLKOFFS),qbs_new_txt_len("))->offset ||",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9414);}while(r); do{ SUB_WRITEBUFLINE(&(pass1380=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9415);}while(r); do{ SUB_WRITEBUFLINE(&(pass1381=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9416);}while(r); do{ SUB_WRITEBUFLINE(&(pass1382=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9418);}while(r); do{ SUB_WRITEBUFLINE(&(pass1383=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9419);}while(r); do{ SUB_WRITEBUFLINE(&(pass1384=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9420);}while(r); do{ SUB_WRITEBUFLINE(&(pass1385=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9421);}while(r); do{ SUB_WRITEBUFLINE(&(pass1386=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else error(309);",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9422);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9427);}while(r); S_11522:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9427);if(r)goto S_11522;} 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(9427);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9427);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9428);}while(r); } } S_11530:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9437);if(r)goto S_11530;} S_11531:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMFILL",8)))|(((qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("MEMFILL",7)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(9438);if(r)goto S_11531;} do{ qbs_set(__STRING_TYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9440);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9441);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9442);}while(r); do{ *__LONG_NE= 0 ; if(!qbevent)break;evnt(9443);}while(r); S_11536:; fornext_value1389= 2 ; fornext_finalvalue1389=*__LONG_N; fornext_step1389= 1 ; if (fornext_step1389<0) fornext_step_negative1389=1; else fornext_step_negative1389=0; if (new_error) goto fornext_error1389; goto fornext_entrylabel1389; while(1){ fornext_value1389=fornext_step1389+(*__LONG_I2); fornext_entrylabel1389: *__LONG_I2=fornext_value1389; if (fornext_step_negative1389){ if (fornext_value1389fornext_finalvalue1389) break; } fornext_error1389:; if(qbevent){evnt(9444);if(r)goto S_11536;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9445);}while(r); S_11538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9446);if(r)goto S_11538;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9446);}while(r); } S_11541:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9447);if(r)goto S_11541;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9447);}while(r); } S_11544:; 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(9448);if(r)goto S_11544;} do{ *__LONG_NE=*__LONG_NE+ 1 ; if(!qbevent)break;evnt(9449);}while(r); S_11546:; if ((-(*__LONG_NE== 1 ))||new_error){ if(qbevent){evnt(9450);if(r)goto S_11546;} do{ qbs_set(__STRING_BLK,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9450);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9450);}while(r); } S_11550:; if ((-(*__LONG_NE== 2 ))||new_error){ if(qbevent){evnt(9451);if(r)goto S_11550;} do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9451);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9451);}while(r); } S_11554:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(9452);if(r)goto S_11554;} do{ qbs_set(__STRING_BYTES,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9452);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9452);}while(r); } S_11558:; if ((-(*__LONG_NE== 4 ))||new_error){ if(qbevent){evnt(9453);if(r)goto S_11558;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9453);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9453);}while(r); } S_11562:; 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(9454);if(r)goto S_11562;} 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(9454);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9454);}while(r); } }else{ S_11567:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(9456);if(r)goto S_11567;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9456);}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(9456);}while(r); } } fornext_continue_1388:; } fornext_exit_1388:; S_11574:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_NE< 3 ))|(qbs_equal(__STRING_E,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(9459);if(r)goto S_11574;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("MEMFILL mem-reference, offset, bytes, variable|value[AS type]",61))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9459);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9459);}while(r); } S_11578:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(9460);if(r)goto S_11578;} do{ qbs_set(__STRING_VAR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9460);}while(r); }else{ do{ qbs_set(__STRING_TYP,qbs_ucase(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9460);}while(r); } S_11583:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_MEMFILL",8))))||new_error){ if(qbevent){evnt(9462);if(r)goto S_11583;} do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("_MemFill",8)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9462);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("MemFill",7)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9462);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BLK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9464);}while(r); S_11589:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9464);if(r)goto S_11589;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9464);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9465);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9467);}while(r); S_11594:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9467);if(r)goto S_11594;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9467);}while(r); } S_11597:; if (((-((*__LONG_TYP&*__LONG_ISUDT)== 0 ))|(-((*__LONG_TYP& 511 )!= 1 )))||new_error){ if(qbevent){evnt(9468);if(r)goto S_11597;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("MEM type",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9468);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9468);}while(r); } do{ qbs_set(__STRING_BLKOFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1391= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9469);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_OFFS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9471);}while(r); S_11603:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9471);if(r)goto S_11603;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9471);}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(9472);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1392=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9473);}while(r); S_11608:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9473);if(r)goto S_11608;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9473);}while(r); } do{ qbs_set(__STRING_OFFS,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9474);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_BYTES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9476);}while(r); S_11613:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9476);if(r)goto S_11613;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9476);}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(9477);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1393=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9478);}while(r); S_11618:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9478);if(r)goto S_11618;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9478);}while(r); } do{ qbs_set(__STRING_BYTES,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9479);}while(r); S_11622:; if ((-(*__LONG_NE== 3 ))||new_error){ if(qbevent){evnt(9481);if(r)goto S_11622;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9482);}while(r); S_11624:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9482);if(r)goto S_11624;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9482);}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(9483);}while(r); do{ qbs_set(__STRING_TEST,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9484);}while(r); S_11629:; if (((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))&((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(9485);if(r)goto S_11629;} do{ SUB_WRITEBUFLINE(&(pass1394=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=(ptrszint)",19),__STRING_TEST),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9486);}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(9487);}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(9488);}while(r); }else{ do{ qbs_set(__STRING_VARSIZE,FUNC_EVALUATETOTYP(__STRING_E,&(pass1395= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9490);}while(r); S_11635:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9490);if(r)goto S_11635;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9490);}while(r); } do{ qbs_set(__STRING_VAROFFS,FUNC_EVALUATETOTYP(__STRING_E,&(pass1396= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9491);}while(r); S_11639:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9491);if(r)goto S_11639;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9491);}while(r); } } S_11643:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(9494);if(r)goto S_11643;} do{ SUB_WRITEBUFLINE(&(pass1397=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9495);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1398=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9497);}while(r); } }else{ do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9503);}while(r); S_11650:; if ((-(*__LONG_T== 0 ))||new_error){ if(qbevent){evnt(9504);if(r)goto S_11650;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Invalid type",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9504);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9504);}while(r); } S_11654:; if (((-((*__LONG_T&*__LONG_ISOFFSETINBITS)!= 0 ))|(-((*__LONG_T&*__LONG_ISUDT)!= 0 ))|((*__LONG_T&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(9505);if(r)goto S_11654;} do{ qbs_set(__STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MEMFILL requires numeric type",29))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9505);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9505);}while(r); } S_11658:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(9506);if(r)goto S_11658;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(9506);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_VAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9508);}while(r); S_11662:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9508);if(r)goto S_11662;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9508);}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),FUNC_SCASE(qbs_new_txt_len("As",2))),__STRING1_SP),__STRING_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9509);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9510);}while(r); S_11667:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9510);if(r)goto S_11667;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9510);}while(r); } do{ qbs_set(__STRING_C,qbs_new_txt_len("sub__memfill_",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9512);}while(r); S_11671:; if ((*__LONG_NOCHECKS)||new_error){ if(qbevent){evnt(9513);if(r)goto S_11671;} do{ qbs_set(__STRING_C,qbs_new_txt_len("sub__memfill_nochecks_",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9513);}while(r); } S_11674:; if ((*__LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(9514);if(r)goto S_11674;} 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(9515);}while(r); }else{ S_11677:; if ((*__LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(9517);if(r)goto S_11677;} S_11678:; if ((-((*__LONG_T& 511 )== 32 ))||new_error){ if(qbevent){evnt(9518);if(r)goto S_11678;} 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(9518);}while(r); } S_11681:; if ((-((*__LONG_T& 511 )== 64 ))||new_error){ if(qbevent){evnt(9519);if(r)goto S_11681;} 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(9519);}while(r); } S_11684:; if ((-((*__LONG_T& 511 )== 256 ))||new_error){ if(qbevent){evnt(9520);if(r)goto S_11684;} 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(9520);}while(r); } }else{ do{ qbs_set(__STRING_C,qbs_add(__STRING_C,FUNC_STR2(&(pass1399=(*__LONG_T& 511 )/ 8 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9522);}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(9525);}while(r); S_11692:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(9526);if(r)goto S_11692;} 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(9526);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1400=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9527);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9530);}while(r); S_11698:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9530);if(r)goto S_11698;} 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(9530);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9530);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9531);}while(r); } } do{ *__LONG_CISPECIAL= 0 ; if(!qbevent)break;evnt(9549);}while(r); S_11707:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(9550);if(r)goto S_11707;} S_11708:; 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(9551);if(r)goto S_11708;} 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,&(pass1402= 2 ),__LONG_N)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9552);}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,&(pass1403= 2 ),__LONG_N)),__STRING1_SP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9553);}while(r); do{ *__LONG_N=*__LONG_N+ 3 ; if(!qbevent)break;evnt(9554);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,qbs_new_txt_len("CALL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9555);}while(r); do{ *__LONG_CISPECIAL= 1 ; if(!qbevent)break;evnt(9556);}while(r); } } do{ *__LONG_USECALL= 0 ; if(!qbevent)break;evnt(9561);}while(r); S_11717:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CALL",4))))||new_error){ if(qbevent){evnt(9562);if(r)goto S_11717;} do{ *__LONG_USECALL= 1 ; if(!qbevent)break;evnt(9563);}while(r); S_11719:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(9564);if(r)goto S_11719;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name [(...)]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9564);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9564);}while(r); } do{ qbs_set(__STRING_CN,FUNC_GETELEMENT(__STRING_CA,&(pass1404= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9565);}while(r); do{ qbs_set(__STRING_N,qbs_ucase(__STRING_CN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9565);}while(r); S_11725:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(9567);if(r)goto S_11725;} S_11726:; if ((-(*__LONG_N<= 4 ))||new_error){ if(qbevent){evnt(9569);if(r)goto S_11726;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name (...)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9569);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9569);}while(r); } S_11730:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(FUNC_GETELEMENT(__STRING_A,&(pass1405= 3 )),qbs_new_txt_len("(",1)))|(qbs_notequal(FUNC_GETELEMENT(__STRING_A,__LONG_N),qbs_new_txt_len(")",1)))))||new_error){ if(qbevent){evnt(9570);if(r)goto S_11730;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name (...)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9570);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9570);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_add(__STRING_N,__STRING1_SP),FUNC_GETELEMENTS(__STRING_A,&(pass1406= 4 ),&(pass1407=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9571);}while(r); do{ qbs_set(__STRING_CA,qbs_add(qbs_add(__STRING_CN,__STRING1_SP),FUNC_GETELEMENTS(__STRING_CA,&(pass1408= 4 ),&(pass1409=*__LONG_N- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9572);}while(r); S_11736:; 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(9575);if(r)goto S_11736;} S_11737:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_N,qbs_new_txt_len("INTERRUPT",9))))||new_error){ if(qbevent){evnt(9577);if(r)goto S_11737;} do{ SUB_WRITEBUFRAWDATA(&(pass1410=*__LONG_MAINTXTBUF),qbs_new_txt_len("call_interrupt(",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9577);}while(r); }else{ do{ SUB_WRITEBUFRAWDATA(&(pass1411=*__LONG_MAINTXTBUF),qbs_new_txt_len("call_interruptx(",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9577);}while(r); } do{ *__LONG_ARGN= 0 ; if(!qbevent)break;evnt(9578);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9579);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9580);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9581);}while(r); S_11746:; fornext_value1413= 2 ; fornext_finalvalue1413=*__LONG_N; fornext_step1413= 1 ; if (fornext_step1413<0) fornext_step_negative1413=1; else fornext_step_negative1413=0; if (new_error) goto fornext_error1413; goto fornext_entrylabel1413; while(1){ fornext_value1413=fornext_step1413+(*__LONG_I); fornext_entrylabel1413: *__LONG_I=fornext_value1413; if (fornext_step_negative1413){ if (fornext_value1413fornext_finalvalue1413) break; } fornext_error1413:; if(qbevent){evnt(9582);if(r)goto S_11746;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9583);}while(r); S_11748:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9584);if(r)goto S_11748;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9584);}while(r); } S_11751:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9585);if(r)goto S_11751;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9585);}while(r); } S_11754:; 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(9586);if(r)goto S_11754;} S_11755:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(9587);if(r)goto S_11755;} S_11756:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9588);if(r)goto S_11756;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9588);}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(9588);}while(r); } } do{ *__LONG_ARGN=*__LONG_ARGN+ 1 ; if(!qbevent)break;evnt(9590);}while(r); S_11763:; if ((-(*__LONG_ARGN== 1 ))||new_error){ if(qbevent){evnt(9591);if(r)goto S_11763;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9592);}while(r); S_11765:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9593);if(r)goto S_11765;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9593);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(9594);}while(r); S_11769:; if ((-(*__LONG_CISPECIAL== 1 ))||new_error){ if(qbevent){evnt(9595);if(r)goto S_11769;} 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(9595);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1414= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9596);}while(r); S_11773:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9597);if(r)goto S_11773;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9597);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1415=*__LONG_MAINTXTBUF),__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9599);}while(r); } S_11778:; if (((-(*__LONG_ARGN== 2 ))|(-(*__LONG_ARGN== 3 )))||new_error){ if(qbevent){evnt(9601);if(r)goto S_11778;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9602);}while(r); S_11780:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9603);if(r)goto S_11780;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9603);}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(9604);}while(r); do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9605);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1416= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9606);}while(r); S_11786:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9607);if(r)goto S_11786;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9607);}while(r); } do{ SUB_WRITEBUFRAWDATA(&(pass1417=*__LONG_MAINTXTBUF),qbs_add(qbs_new_txt_len(",",1),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9609);}while(r); } do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9611);}while(r); }else{ S_11793:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9613);if(r)goto S_11793;} do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9613);}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(9613);}while(r); } } fornext_continue_1412:; } fornext_exit_1412:; S_11800:; if ((-(*__LONG_ARGN!= 3 ))||new_error){ if(qbevent){evnt(9616);if(r)goto S_11800;} 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(9616);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9616);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1418=*__LONG_MAINTXTBUF),qbs_new_txt_len(");",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9617);}while(r); S_11805:; if ((-(*__LONG_CISPECIAL== 0 ))||new_error){ if(qbevent){evnt(9618);if(r)goto S_11805;} 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(9618);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9619);}while(r); S_11809:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9619);if(r)goto S_11809;} 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(9619);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9619);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9621);}while(r); } S_11816:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_N,qbs_new_txt_len("ABSOLUTE",8))))||new_error){ if(qbevent){evnt(9632);if(r)goto S_11816;} do{ qbs_set(__STRING_L,FUNC_SCASE(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(9633);}while(r); do{ *__LONG_ARGN= 0 ; if(!qbevent)break;evnt(9634);}while(r); do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9635);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9636);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9637);}while(r); S_11822:; fornext_value1421= 2 ; fornext_finalvalue1421=*__LONG_N; fornext_step1421= 1 ; if (fornext_step1421<0) fornext_step_negative1421=1; else fornext_step_negative1421=0; if (new_error) goto fornext_error1421; goto fornext_entrylabel1421; while(1){ fornext_value1421=fornext_step1421+(*__LONG_I); fornext_entrylabel1421: *__LONG_I=fornext_value1421; if (fornext_step_negative1421){ if (fornext_value1421fornext_finalvalue1421) break; } fornext_error1421:; if(qbevent){evnt(9638);if(r)goto S_11822;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9639);}while(r); S_11824:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9640);if(r)goto S_11824;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9640);}while(r); } S_11827:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9641);if(r)goto S_11827;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9641);}while(r); } S_11830:; 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(9642);if(r)goto S_11830;} S_11831:; if ((-(*__LONG_I<*__LONG_N))||new_error){ if(qbevent){evnt(9643);if(r)goto S_11831;} S_11832:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9644);if(r)goto S_11832;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected expression before , or )",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9644);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9644);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9646);}while(r); S_11837:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9647);if(r)goto S_11837;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9647);}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(9648);}while(r); do{ qbs_set(__STRING_IGNORE,FUNC_EVALUATE(__STRING_E,__LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9649);}while(r); S_11842:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9650);if(r)goto S_11842;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9650);}while(r); } S_11845:; if (((-((*__LONG_TYP&*__LONG_ISPOINTER)!= 0 ))&(-((*__LONG_TYP&*__LONG_ISREFERENCE)!= 0 )))||new_error){ if(qbevent){evnt(9652);if(r)goto S_11845;} 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(9656);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1422=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9657);}while(r); S_11848:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9658);if(r)goto S_11848;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9658);}while(r); } }else{ S_11852:; if ((*__LONG_TYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(9664);if(r)goto S_11852;} S_11853:; if ((-((*__LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(9665);if(r)goto S_11853;} do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1423=*__LONG_SINGLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9666);}while(r); S_11855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9667);if(r)goto S_11855;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9667);}while(r); } do{ qbs_set(__STRING_V,qbs_add(qbs_new_txt_len("pass",4),FUNC_STR2(&(pass1424=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9668);}while(r); do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("float *",7),__STRING_V),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9669);}while(r); do{ SUB_WRITEBUFLINE(&(pass1425=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),__STRING_V),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9670);}while(r); do{ SUB_WRITEBUFLINE(&(pass1426=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=4;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9671);}while(r); do{ SUB_WRITEBUFLINE(&(pass1427=*__LONG_DATATXTBUF),qbs_add(__STRING_V,qbs_new_txt_len("=(float*)(dblock+cmem_sp);",26))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9672);}while(r); do{ SUB_WRITEBUFLINE(&(pass1428=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen))||new_error){ if(qbevent){evnt(9719);if(r)goto S_11924;} 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(9719);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9719);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9720);}while(r); } }else{ do{ qbs_set(__STRING_A,__STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9725);}while(r); do{ qbs_set(__STRING_CA,__STRING_CN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9726);}while(r); do{ *__LONG_USECALL= 2 ; if(!qbevent)break;evnt(9727);}while(r); } do{ *__LONG_N=FUNC_NUMELEMENTS(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9731);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,FUNC_GETELEMENT(__STRING_A,&(pass1448= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9732);}while(r); do{ *__LONG_VALIDSUB= 0 ; if(!qbevent)break;evnt(9735);}while(r); do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9736);}while(r); S_11940:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(9736);if(r)goto S_11940;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1449= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9736);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9737);}while(r); S_11944:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9738);if(r)goto S_11944;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9738);}while(r); } S_11947:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(9739);if(r)goto S_11947;} S_11948:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(9740);if(r)goto S_11948;} do{ *__LONG_VALIDSUB= 1 ; if(!qbevent)break;evnt(9740);}while(r); do{ goto dl_exit_1450; if(!qbevent)break;evnt(9740);}while(r); } S_11952:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(9741);if(r)goto S_11952;} do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9742);}while(r); S_11954:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(9742);if(r)goto S_11954;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1451= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9742);}while(r); } do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(9743);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9744);}while(r); S_11959:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9745);if(r)goto S_11959;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9745);}while(r); } }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(9747);}while(r); } dl_continue_1450:; } dl_exit_1450:; S_11966:; if ((-(*__LONG_VALIDSUB== 0 ))||new_error){ if(qbevent){evnt(9750);if(r)goto S_11966;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected CALL sub-name [(...)]",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9750);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9750);}while(r); } } S_11971:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(9754);if(r)goto S_11971;} S_11972:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(9756);if(r)goto S_11972;} do{ qbs_set(__STRING_FIRSTELEMENT,qbs_new_txt_len("PRINT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9756);}while(r); } do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9758);}while(r); S_11976:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(9758);if(r)goto S_11976;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1452= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9758);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9759);}while(r); S_11980:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9760);if(r)goto S_11980;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9760);}while(r); } S_11983:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(9761);if(r)goto S_11983;} S_11984:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 2 ))||new_error){ if(qbevent){evnt(9762);if(r)goto S_11984;} 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(9765);}while(r); S_11986:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9766);if(r)goto S_11986;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9766);}while(r); } S_11989:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))== 36 )))||new_error){ if(qbevent){evnt(9767);if(r)goto S_11989;} S_11990:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_S,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(9768);if(r)goto S_11990;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(9768);}while(r); } }else{ S_11994:; if ((qbs_cleanup(qbs_tmp_base,__STRING_S->len))||new_error){ if(qbevent){evnt(9770);if(r)goto S_11994;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(9770);}while(r); } } S_11998:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(9773);if(r)goto S_11998;} S_11999:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1))!= 61 )))||new_error){ if(qbevent){evnt(9774);if(r)goto S_11999;} S_12000:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(FUNC_GETELEMENT(__STRING_A,&(pass1455= 2 )))== 61 )))||new_error){ if(qbevent){evnt(9775);if(r)goto S_12000;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(9775);}while(r); } } } S_12005:; if ((-(*__LONG_N> 2 ))||new_error){ if(qbevent){evnt(9779);if(r)goto S_12005;} S_12006:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PRINT",5)))&(qbs_notequal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LPRINT",6)))))||new_error){ if(qbevent){evnt(9780);if(r)goto S_12006;} S_12007:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1456= 2 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9781);if(r)goto S_12007;} do{ *__LONG_B= 1 ; if(!qbevent)break;evnt(9782);}while(r); S_12009:; fornext_value1458= 3 ; fornext_finalvalue1458=*__LONG_N; fornext_step1458= 1 ; if (fornext_step1458<0) fornext_step_negative1458=1; else fornext_step_negative1458=0; if (new_error) goto fornext_error1458; goto fornext_entrylabel1458; while(1){ fornext_value1458=fornext_step1458+(*__LONG_I); fornext_entrylabel1458: *__LONG_I=fornext_value1458; if (fornext_step_negative1458){ if (fornext_value1458fornext_finalvalue1458) break; } fornext_error1458:; if(qbevent){evnt(9783);if(r)goto S_12009;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9784);}while(r); S_12011:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9785);if(r)goto S_12011;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9785);}while(r); } S_12014:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9786);if(r)goto S_12014;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9787);}while(r); S_12016:; if ((-(*__LONG_B== 0 ))||new_error){ if(qbevent){evnt(9788);if(r)goto S_12016;} S_12017:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(9789);if(r)goto S_12017;} do{ goto fornext_exit_1457; if(!qbevent)break;evnt(9789);}while(r); } S_12020:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1459=*__LONG_I+ 1 )),qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(9790);if(r)goto S_12020;} do{ goto LABEL_NOTSUBCALL; if(!qbevent)break;evnt(9790);}while(r); } } } fornext_continue_1457:; } fornext_exit_1457:; } } } S_12029:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("_GL",3))))||new_error){ if(qbevent){evnt(9800);if(r)goto S_12029;} 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(9801);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9801);}while(r); } S_12033:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("VWATCH",6))))||new_error){ if(qbevent){evnt(9804);if(r)goto S_12033;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot call SUB VWATCH directly",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9805);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9805);}while(r); } S_12037:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("OPEN",4))))||new_error){ if(qbevent){evnt(9808);if(r)goto S_12037;} do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9810);}while(r); S_12039:; fornext_value1461= 2 ; fornext_finalvalue1461=*__LONG_N; fornext_step1461= 1 ; if (fornext_step1461<0) fornext_step_negative1461=1; else fornext_step_negative1461=0; if (new_error) goto fornext_error1461; goto fornext_entrylabel1461; while(1){ fornext_value1461=fornext_step1461+(*__LONG_X); fornext_entrylabel1461: *__LONG_X=fornext_value1461; if (fornext_step_negative1461){ if (fornext_value1461fornext_finalvalue1461) break; } fornext_error1461:; if(qbevent){evnt(9811);if(r)goto S_12039;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_A,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9812);}while(r); S_12041:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9813);if(r)goto S_12041;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9813);}while(r); } S_12044:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9814);if(r)goto S_12044;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9814);}while(r); } S_12047:; 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(9815);if(r)goto S_12047;} do{ goto fornext_exit_1460; if(!qbevent)break;evnt(9815);}while(r); } S_12050:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_B== 0 ))&(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))))||new_error){ if(qbevent){evnt(9816);if(r)goto S_12050;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(9817);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9818);}while(r); S_12053:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9819);if(r)goto S_12053;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9819);}while(r); } do{ goto fornext_exit_1460; if(!qbevent)break;evnt(9820);}while(r); } fornext_continue_1460:; } fornext_exit_1460:; } S_12060:; 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(9830);if(r)goto S_12060;} S_12061:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("RESET",5))))||new_error){ if(qbevent){evnt(9831);if(r)goto S_12061;} S_12062:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(9832);if(r)goto S_12062;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - RESET takes no parameters",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9832);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9832);}while(r); } do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Reset",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9833);}while(r); }else{ do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Close",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9835);}while(r); } S_12070:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(9838);if(r)goto S_12070;} do{ SUB_WRITEBUFLINE(&(pass1462=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_close(NULL,0);",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9839);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9841);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9842);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(9843);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9844);}while(r); S_12077:; fornext_value1464= 2 ; fornext_finalvalue1464=*__LONG_N; fornext_step1464= 1 ; if (fornext_step1464<0) fornext_step_negative1464=1; else fornext_step_negative1464=0; if (new_error) goto fornext_error1464; goto fornext_entrylabel1464; while(1){ fornext_value1464=fornext_step1464+(*__LONG_X); fornext_entrylabel1464: *__LONG_X=fornext_value1464; if (fornext_step_negative1464){ if (fornext_value1464fornext_finalvalue1464) break; } fornext_error1464:; if(qbevent){evnt(9845);if(r)goto S_12077;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9846);}while(r); S_12079:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9847);if(r)goto S_12079;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9847);}while(r); } S_12082:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9848);if(r)goto S_12082;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9848);}while(r); } S_12085:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len("#",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(9849);if(r)goto S_12085;} S_12086:; if ((-(*__LONG_S== 0 ))||new_error){ if(qbevent){evnt(9850);if(r)goto S_12086;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(9850);}while(r); }else{ do{ qbs_set(__STRING_A,qbs_new_txt_len("Unexpected #",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9850);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9850);}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(9851);}while(r); do{ goto LABEL_CLOSENEXTA; if(!qbevent)break;evnt(9852);}while(r); } S_12095:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(9855);if(r)goto S_12095;} S_12096:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(9856);if(r)goto S_12096;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9857);}while(r); S_12098:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9858);if(r)goto S_12098;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9858);}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(9859);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1465= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9860);}while(r); S_12103:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9861);if(r)goto S_12103;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9861);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1466=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_close(",10),__STRING_E),qbs_new_txt_len(",1);",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9862);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9863);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(9864);}while(r); do{ goto LABEL_CLOSENEXTA; if(!qbevent)break;evnt(9865);}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(9867);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9867);}while(r); } } do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(9871);}while(r); S_12116:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9872);if(r)goto S_12116;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9872);}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(9872);}while(r); } LABEL_CLOSENEXTA:; if(qbevent){evnt(9874);r=0;} fornext_continue_1463:; } fornext_exit_1463:; S_12122:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(9877);if(r)goto S_12122;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9878);}while(r); S_12124:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9879);if(r)goto S_12124;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9879);}while(r); } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9880);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1467= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9881);}while(r); S_12129:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9882);if(r)goto S_12129;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9882);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1468=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_close(",10),__STRING_E),qbs_new_txt_len(",1);",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9883);}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(9885);}while(r); } } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(9889);}while(r); S_12138:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(9889);if(r)goto S_12138;} 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(9889);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9889);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9890);}while(r); } S_12145:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("READ",4))))||new_error){ if(qbevent){evnt(9909);if(r)goto S_12145;} do{ SUB_XREAD(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9910);}while(r); S_12147:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9911);if(r)goto S_12147;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9911);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(9913);}while(r); } do{ *__LONG_LINEINPUT= 0 ; if(!qbevent)break;evnt(9952);}while(r); S_12153:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(9953);if(r)goto S_12153;} S_12154:; 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(9954);if(r)goto S_12154;} do{ *__LONG_LINEINPUT= 1 ; if(!qbevent)break;evnt(9955);}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(9956);}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(9956);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(9956);}while(r); do{ qbs_set(__STRING_FIRSTELEMENT,qbs_new_txt_len("INPUT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9957);}while(r); } } S_12162:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("INPUT",5))))||new_error){ if(qbevent){evnt(9961);if(r)goto S_12162;} S_12163:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(9962);if(r)goto S_12163;} S_12164:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1473= 2 )),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(9963);if(r)goto S_12164;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Input",5)),__STRING1_SP),qbs_new_txt_len("#",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9964);}while(r); S_12166:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(9964);if(r)goto S_12166;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Line",4)),__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9964);}while(r); } do{ qbs_set(__STRING_U,FUNC_STR2(&(pass1474=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9966);}while(r); S_12170:; if ((-(*__LONG_N== 2 ))||new_error){ if(qbevent){evnt(9968);if(r)goto S_12170;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9968);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9968);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9969);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9970);}while(r); S_12176:; fornext_value1476= 3 ; fornext_finalvalue1476=*__LONG_N; fornext_step1476= 1 ; if (fornext_step1476<0) fornext_step_negative1476=1; else fornext_step_negative1476=0; if (new_error) goto fornext_error1476; goto fornext_entrylabel1476; while(1){ fornext_value1476=fornext_step1476+(*__LONG_I); fornext_entrylabel1476: *__LONG_I=fornext_value1476; if (fornext_step_negative1476){ if (fornext_value1476fornext_finalvalue1476) break; } fornext_error1476:; if(qbevent){evnt(9971);if(r)goto S_12176;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9972);}while(r); S_12178:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9973);if(r)goto S_12178;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9973);}while(r); } S_12181:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9974);if(r)goto S_12181;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9974);}while(r); } S_12184:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(9975);if(r)goto S_12184;} S_12185:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9976);if(r)goto S_12185;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9976);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9976);}while(r); } do{ goto LABEL_INPUTGOTFN; if(!qbevent)break;evnt(9977);}while(r); } S_12191:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9979);if(r)goto S_12191;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9979);}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(9979);}while(r); } fornext_continue_1475:; } fornext_exit_1475:; LABEL_INPUTGOTFN:; if(qbevent){evnt(9981);r=0;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9982);}while(r); S_12198:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9983);if(r)goto S_12198;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9983);}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(9984);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1477= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9985);}while(r); S_12203:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(9986);if(r)goto S_12203;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9986);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1478=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_fileno=",11),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9987);}while(r); do{ SUB_WRITEBUFLINE(&(pass1479=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9988);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(9989);}while(r); S_12209:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(9990);if(r)goto S_12209;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9990);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(9990);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9991);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9992);}while(r); S_12215:; fornext_value1481=*__LONG_I; fornext_finalvalue1481=*__LONG_N; fornext_step1481= 1 ; if (fornext_step1481<0) fornext_step_negative1481=1; else fornext_step_negative1481=0; if (new_error) goto fornext_error1481; goto fornext_entrylabel1481; while(1){ fornext_value1481=fornext_step1481+(*__LONG_I); fornext_entrylabel1481: *__LONG_I=fornext_value1481; if (fornext_step_negative1481){ if (fornext_value1481fornext_finalvalue1481) break; } fornext_error1481:; if(qbevent){evnt(9993);if(r)goto S_12215;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9994);}while(r); S_12217:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(9995);if(r)goto S_12217;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(9995);}while(r); } S_12220:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(9996);if(r)goto S_12220;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(9996);}while(r); } S_12223:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(9997);if(r)goto S_12223;} S_12224:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(9998);if(r)goto S_12224;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9998);}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(9998);}while(r); } do{ qbs_set(__STRING_A2,qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(9999);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(9999);}while(r); } S_12232:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(10001);if(r)goto S_12232;} S_12233:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(10002);if(r)goto S_12233;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10002);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10002);}while(r); } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10003);}while(r); S_12238:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10004);if(r)goto S_12238;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10004);}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(10005);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10006);}while(r); S_12243:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10007);if(r)goto S_12243;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10007);}while(r); } S_12246:; if ((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(10008);if(r)goto S_12246;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable-name",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10008);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10008);}while(r); } S_12250:; if (((*__LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(10009);if(r)goto S_12250;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_T,&(pass1482= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10010);}while(r); S_12252:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10011);if(r)goto S_12252;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10011);}while(r); } S_12255:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10012);if(r)goto S_12255;} do{ SUB_WRITEBUFLINE(&(pass1483=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_file_line_input_string(tmp_fileno,",38),__STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10013);}while(r); do{ SUB_WRITEBUFLINE(&(pass1484=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10014);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1485=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_file_input_string(tmp_fileno,",33),__STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10016);}while(r); do{ SUB_WRITEBUFLINE(&(pass1486=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10017);}while(r); } do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(10019);}while(r); }else{ S_12264:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10021);if(r)goto S_12264;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string-variable",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10021);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10021);}while(r); } S_12268:; if (((-((*__LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*__LONG_T& 511 )!= 64 )))||new_error){ if(qbevent){evnt(10024);if(r)goto S_12268;} S_12269:; if (((*__LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(10025);if(r)goto S_12269;} 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)),&(pass1487= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10026);}while(r); S_12271:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10027);if(r)goto S_12271;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10027);}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)),&(pass1488= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10029);}while(r); S_12276:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10030);if(r)goto S_12276;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10030);}while(r); } } }else{ S_12281:; if ((*__LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(10033);if(r)goto S_12281;} do{ SUB_SETREFER(__STRING_E,__LONG_T,qbs_new_txt_len("func_file_input_uint64(tmp_fileno)",34),&(pass1489= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10034);}while(r); S_12283:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10035);if(r)goto S_12283;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10035);}while(r); } }else{ do{ SUB_SETREFER(__STRING_E,__LONG_T,qbs_new_txt_len("func_file_input_int64(tmp_fileno)",33),&(pass1490= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10037);}while(r); S_12288:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10038);if(r)goto S_12288;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10038);}while(r); } } } do{ SUB_WRITEBUFLINE(&(pass1491=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),__STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10042);}while(r); } S_12295:; if ((-(*__LONG_I==*__LONG_N))||new_error){ if(qbevent){evnt(10045);if(r)goto S_12295;} do{ goto fornext_exit_1480; if(!qbevent)break;evnt(10045);}while(r); } S_12298:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10046);if(r)goto S_12298;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many variables",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10046);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10046);}while(r); } do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10047);}while(r); do{ qbs_set(__STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10047);}while(r); } S_12305:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(10049);if(r)goto S_12305;} do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10049);}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(10049);}while(r); } fornext_continue_1480:; } fornext_exit_1480:; do{ SUB_WRITEBUFLINE(&(pass1492=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),__STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10051);}while(r); S_12312:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(10052);if(r)goto S_12312;} do{ SUB_WRITEBUFLINE(&(pass1493=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10052);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10053);}while(r); S_12316:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10053);if(r)goto S_12316;} 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(10053);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10053);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10054);}while(r); } } } S_12325:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("INPUT",5))))||new_error){ if(qbevent){evnt(10060);if(r)goto S_12325;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Input",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10061);}while(r); S_12327:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10061);if(r)goto S_12327;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Line",4)),__STRING1_SP),__STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10061);}while(r); } do{ *__LONG_COMMANEEDED= 0 ; if(!qbevent)break;evnt(10062);}while(r); do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(10063);}while(r); do{ *__LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(10065);}while(r); S_12333:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,__LONG_I),qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(10065);if(r)goto S_12333;} do{ *__LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(10065);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(10065);}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(10065);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10067);}while(r); S_12339:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_A2, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(10068);if(r)goto S_12339;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10069);}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(10069);}while(r); S_12342:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10070);if(r)goto S_12342;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10070);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1495=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_print(qbs_new_txt_len(",26),__STRING_A2),qbs_new_txt_len("),0);",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10071);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(10072);}while(r); do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10074);}while(r); do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(10075);}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(10076);}while(r); S_12350:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(10077);if(r)goto S_12350;} S_12351:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10078);if(r)goto S_12351;} do{ goto LABEL_FINISHEDPROMPTSTRING; if(!qbevent)break;evnt(10078);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1496=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10079);}while(r); do{ goto LABEL_FINISHEDPROMPTSTRING; if(!qbevent)break;evnt(10080);}while(r); } S_12357:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(10082);if(r)goto S_12357;} do{ goto LABEL_FINISHEDPROMPTSTRING; if(!qbevent)break;evnt(10083);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Syntax error - Reference: INPUT [;] ",36),func_chr( 34 )),qbs_new_txt_len("[Question or statement text]",28)),func_chr( 34 )),qbs_new_txt_len("{,|;} variable[, ...] or INPUT ; variable[, ...]",48))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10085);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10085);}while(r); } S_12363:; if ((-(*__LONG_LINEINPUT== 0 ))||new_error){ if(qbevent){evnt(10088);if(r)goto S_12363;} do{ SUB_WRITEBUFLINE(&(pass1497=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10088);}while(r); } LABEL_FINISHEDPROMPTSTRING:; if(qbevent){evnt(10089);r=0;} do{ *__LONG_NUMVAR= 0 ; if(!qbevent)break;evnt(10090);}while(r); S_12367:; fornext_value1499=*__LONG_I; fornext_finalvalue1499=*__LONG_N; fornext_step1499= 1 ; if (fornext_step1499<0) fornext_step_negative1499=1; else fornext_step_negative1499=0; if (new_error) goto fornext_error1499; goto fornext_entrylabel1499; while(1){ fornext_value1499=fornext_step1499+(*__LONG_I); fornext_entrylabel1499: *__LONG_I=fornext_value1499; if (fornext_step_negative1499){ if (fornext_value1499fornext_finalvalue1499) break; } fornext_error1499:; if(qbevent){evnt(10091);if(r)goto S_12367;} S_12368:; if ((-(*__LONG_COMMANEEDED== 1 ))||new_error){ if(qbevent){evnt(10092);if(r)goto S_12368;} do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10093);}while(r); S_12370:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(10094);if(r)goto S_12370;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - comma expected",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10094);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10094);}while(r); } }else{ do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(10097);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10098);}while(r); S_12377:; fornext_value1501=*__LONG_I; fornext_finalvalue1501=*__LONG_N; fornext_step1501= 1 ; if (fornext_step1501<0) fornext_step_negative1501=1; else fornext_step_negative1501=0; if (new_error) goto fornext_error1501; goto fornext_entrylabel1501; while(1){ fornext_value1501=fornext_step1501+(*__LONG_I2); fornext_entrylabel1501: *__LONG_I2=fornext_value1501; if (fornext_step_negative1501){ if (fornext_value1501fornext_finalvalue1501) break; } fornext_error1501:; if(qbevent){evnt(10099);if(r)goto S_12377;} do{ qbs_set(__STRING_E2,FUNC_GETELEMENT(__STRING_CA,__LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10100);}while(r); S_12379:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(10101);if(r)goto S_12379;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(10101);}while(r); } S_12382:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(10102);if(r)goto S_12382;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(10102);}while(r); } S_12385:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E2,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(10103);if(r)goto S_12385;} do{ *__LONG_I2=*__LONG_I2- 1 ; if(!qbevent)break;evnt(10103);}while(r); do{ goto fornext_exit_1500; if(!qbevent)break;evnt(10103);}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(10104);}while(r); fornext_continue_1500:; } fornext_exit_1500:; do{ *__LONG_I=*__LONG_I2; if(!qbevent)break;evnt(10106);}while(r); S_12392:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(10106);if(r)goto S_12392;} do{ *__LONG_I=*__LONG_N; if(!qbevent)break;evnt(10106);}while(r); } S_12395:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(10107);if(r)goto S_12395;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10107);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10107);}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(10108);}while(r); do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10109);}while(r); S_12401:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10110);if(r)goto S_12401;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10110);}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(10111);}while(r); S_12405:; if ((-(*__LONG_I!=*__LONG_N))||new_error){ if(qbevent){evnt(10111);if(r)goto S_12405;} 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(10111);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10112);}while(r); S_12409:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10113);if(r)goto S_12409;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10113);}while(r); } S_12412:; if ((-((*__LONG_T&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(10114);if(r)goto S_12412;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10114);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10114);}while(r); } S_12416:; if (((*__LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(10116);if(r)goto S_12416;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_T,&(pass1503= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10117);}while(r); S_12418:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10118);if(r)goto S_12418;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10118);}while(r); } do{ *__LONG_NUMVAR=*__LONG_NUMVAR+ 1 ; if(!qbevent)break;evnt(10119);}while(r); S_12422:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10120);if(r)goto S_12422;} do{ SUB_WRITEBUFLINE(&(pass1504=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variabletypes[",24),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=ISSTRING+512;",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10121);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1505=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_input_variabletypes[",24),FUNC_STR2(__LONG_NUMVAR)),qbs_new_txt_len("]=ISSTRING;",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10123);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1506=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10125);}while(r); do{ goto LABEL_GOTINPUTVAR; if(!qbevent)break;evnt(10126);}while(r); } S_12430:; if ((*__LONG_LINEINPUT)||new_error){ if(qbevent){evnt(10129);if(r)goto S_12430;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected string variable",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10129);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10129);}while(r); } S_12434:; if (((*__LONG_T&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(10130);if(r)goto S_12434;} S_12435:; if (((*__LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(10131);if(r)goto S_12435;} do{ qbs_set(__STRING_A,qbs_new_txt_len("INPUT cannot handle BIT array elements",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10132);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10132);}while(r); } } do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("&(",2),FUNC_REFER(__STRING_E,__LONG_T,&(pass1507= 0 ))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10135);}while(r); S_12441:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10136);if(r)goto S_12441;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10136);}while(r); } S_12444:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(10139);if(r)goto S_12444;} do{ *__LONG_T=*__LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(10139);}while(r); } S_12447:; if (((*__LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(10140);if(r)goto S_12447;} do{ *__LONG_T=*__LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(10140);}while(r); } S_12450:; if (((*__LONG_T&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(10141);if(r)goto S_12450;} do{ *__LONG_T=*__LONG_T-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(10141);}while(r); } do{ *__LONG_NUMVAR=*__LONG_NUMVAR+ 1 ; if(!qbevent)break;evnt(10152);}while(r); do{ SUB_WRITEBUFLINE(&(pass1508=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10153);}while(r); do{ SUB_WRITEBUFLINE(&(pass1509=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10154);}while(r); do{ goto LABEL_GOTINPUTVAR; if(!qbevent)break;evnt(10155);}while(r); } LABEL_GOTINPUTVAR:; if(qbevent){evnt(10158);r=0;} do{ *__LONG_COMMANEEDED=*__LONG_COMMANEEDED+ 1 ; if(!qbevent)break;evnt(10159);}while(r); S_12459:; if ((-(*__LONG_COMMANEEDED== 2 ))||new_error){ if(qbevent){evnt(10159);if(r)goto S_12459;} do{ *__LONG_COMMANEEDED= 0 ; if(!qbevent)break;evnt(10159);}while(r); } fornext_continue_1498:; } fornext_exit_1498:; S_12463:; if ((-(*__LONG_NUMVAR== 0 ))||new_error){ if(qbevent){evnt(10161);if(r)goto S_12463;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Syntax error - Reference: INPUT [;] ",36),func_chr( 34 )),qbs_new_txt_len("[Question or statement text]",28)),func_chr( 34 )),qbs_new_txt_len("{,|;} variable[, ...] or INPUT ; variable[, ...]",48))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10161);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10161);}while(r); } S_12467:; if (((-(*__LONG_LINEINPUT== 1 ))&(-(*__LONG_NUMVAR> 1 )))||new_error){ if(qbevent){evnt(10162);if(r)goto S_12467;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Too many variables",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10162);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10162);}while(r); } S_12471:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(10163);if(r)goto S_12471;} do{ SUB_WRITEBUFLINE(&(pass1510=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= -4; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10164);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1511=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10166);}while(r); do{ SUB_WRITEBUFLINE(&(pass1512=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (stop_program) end();",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10167);}while(r); S_12476:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(10168);if(r)goto S_12476;} do{ SUB_WRITEBUFLINE(&(pass1513=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= -5; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10169);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1514=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10171);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10172);}while(r); S_12481:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10172);if(r)goto S_12481;} 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(10172);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10172);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10173);}while(r); } S_12488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WRITE",5))))||new_error){ if(qbevent){evnt(10178);if(r)goto S_12488;} S_12489:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(10179);if(r)goto S_12489;} S_12490:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1516= 2 )),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(10180);if(r)goto S_12490;} do{ SUB_XFILEWRITE(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10181);}while(r); S_12492:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10182);if(r)goto S_12492;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10182);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10183);}while(r); } } } S_12499:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("WRITE",5))))||new_error){ if(qbevent){evnt(10188);if(r)goto S_12499;} do{ SUB_XWRITE(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10189);}while(r); S_12501:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10190);if(r)goto S_12501;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10190);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10191);}while(r); } S_12506:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("PRINT",5))))||new_error){ if(qbevent){evnt(10194);if(r)goto S_12506;} S_12507:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(10195);if(r)goto S_12507;} S_12508:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(__STRING_A,&(pass1517= 2 )),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(10196);if(r)goto S_12508;} do{ SUB_XFILEPRINT(__STRING_A,__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10197);}while(r); S_12510:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10198);if(r)goto S_12510;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10198);}while(r); } do{ qbs_set(__STRING_L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10199);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10200);}while(r); S_12515:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10200);if(r)goto S_12515;} 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(10200);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10200);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10201);}while(r); } } } S_12524:; 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(10206);if(r)goto S_12524;} S_12525:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SECONDELEMENT,qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(10207);if(r)goto S_12525;} do{ *__LONG_ELEMENTON= 2 ; if(!qbevent)break;evnt(10208);}while(r); LABEL_REDOSEMI:; if(qbevent){evnt(10209);r=0;} S_12527:; fornext_value1520=*__LONG_ELEMENTON; fornext_finalvalue1520=*__LONG_N- 1 ; 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_I); fornext_entrylabel1520: *__LONG_I=fornext_value1520; if (fornext_step_negative1520){ if (fornext_value1520fornext_finalvalue1520) break; } fornext_error1520:; if(qbevent){evnt(10210);if(r)goto S_12527;} do{ qbs_set(__STRING_NEXTCHAR,FUNC_GETELEMENT(__STRING_A,&(pass1521=*__LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10211);}while(r); S_12529:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_NEXTCHAR,qbs_new_txt_len(";",1)))&(qbs_notequal(__STRING_NEXTCHAR,qbs_new_txt_len(",",1)))&(qbs_notequal(__STRING_NEXTCHAR,qbs_new_txt_len("+",1)))&(qbs_notequal(__STRING_NEXTCHAR,qbs_new_txt_len(")",1)))))||new_error){ if(qbevent){evnt(10212);if(r)goto S_12529;} do{ qbs_set(__STRING_TEMP1,FUNC_GETELEMENT(__STRING_A,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10213);}while(r); do{ *__LONG_BEGINPOINT=func_instr(*__LONG_BEGINPOINT,__STRING_TEMP1,func_chr( 34 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10214);}while(r); do{ *__LONG_ENDPOINT=func_instr(*__LONG_BEGINPOINT+ 1 ,__STRING_TEMP1,qbs_add(func_chr( 34 ),qbs_new_txt_len(",",1)),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10215);}while(r); S_12533:; if (((-(*__LONG_BEGINPOINT!= 0 ))&(-(*__LONG_ENDPOINT!= 0 )))||new_error){ if(qbevent){evnt(10216);if(r)goto S_12533;} do{ *__LONG_TEXTLENGTH=*__LONG_ENDPOINT-*__LONG_BEGINPOINT- 1 ; if(!qbevent)break;evnt(10218);}while(r); do{ qbs_set(__STRING_TEXTVALUE,func_mid(__STRING_TEMP1,*__LONG_ENDPOINT+ 2 ,((int32)(qbs_ltrim(qbs_str((int32)(*__LONG_TEXTLENGTH))))->len),1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10219);}while(r); S_12536:; if ((qbs_cleanup(qbs_tmp_base,-(func_val(__STRING_TEXTVALUE)==*__LONG_TEXTLENGTH)))||new_error){ if(qbevent){evnt(10220);if(r)goto S_12536;} do{ SUB_INSERTELEMENTS(__STRING_A,__LONG_I,qbs_new_txt_len(";",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10221);}while(r); do{ SUB_INSERTELEMENTS(__STRING_CA,__LONG_I,qbs_new_txt_len(";",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10222);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(10223);}while(r); do{ *__LONG_ELEMENTON=*__LONG_I+ 2 ; if(!qbevent)break;evnt(10224);}while(r); do{ goto LABEL_REDOSEMI; if(!qbevent)break;evnt(10225);}while(r); } } S_12544:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_TEMP1,qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(10228);if(r)goto S_12544;} S_12545:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(qbs_ltrim(__STRING_NEXTCHAR), 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(10229);if(r)goto S_12545;} S_12546:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(__STRING_TEMP1,qbs_new_txt_len(";",1)))&(qbs_notequal(__STRING_TEMP1,qbs_new_txt_len(",",1)))&(qbs_notequal(__STRING_TEMP1,qbs_new_txt_len("+",1)))&(qbs_notequal(__STRING_TEMP1,qbs_new_txt_len("(",1)))))||new_error){ if(qbevent){evnt(10230);if(r)goto S_12546;} do{ SUB_INSERTELEMENTS(__STRING_A,__LONG_I,qbs_new_txt_len(";",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10231);}while(r); do{ SUB_INSERTELEMENTS(__STRING_CA,__LONG_I,qbs_new_txt_len(";",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10232);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(10233);}while(r); do{ *__LONG_ELEMENTON=*__LONG_I+ 2 ; if(!qbevent)break;evnt(10234);}while(r); do{ goto LABEL_REDOSEMI; if(!qbevent)break;evnt(10235);}while(r); } } } } fornext_continue_1519:; } fornext_exit_1519:; } do{ SUB_XPRINT(__STRING_A,__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10243);}while(r); S_12559:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10244);if(r)goto S_12559;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10244);}while(r); } do{ qbs_set(__STRING_L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10245);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10246);}while(r); S_12564:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10246);if(r)goto S_12564;} 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(10246);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10246);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10247);}while(r); } S_12571:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("CLEAR",5))))||new_error){ if(qbevent){evnt(10252);if(r)goto S_12571;} S_12572:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(10253);if(r)goto S_12572;} 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(10253);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10253);}while(r); } } S_12577:; 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(10257);if(r)goto S_12577;} S_12578:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(10258);if(r)goto S_12578;} 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(10258);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10258);}while(r); } S_12582:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LSET",4))))||new_error){ if(qbevent){evnt(10259);if(r)goto S_12582;} do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("LSet",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10259);}while(r); }else{ do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("RSet",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10259);}while(r); } do{ qbs_set(__STRING_DEST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10260);}while(r); do{ qbs_set(__STRING_SOURCE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10261);}while(r); do{ *__LONG_PART= 1 ; if(!qbevent)break;evnt(10262);}while(r); do{ *__LONG_I= 2 ; if(!qbevent)break;evnt(10263);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10264);}while(r); do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(10265);}while(r); S_12593:; do{ if(qbevent){evnt(10266);if(r)goto S_12593;} S_12594:; if ((-(*__LONG_I>*__LONG_N))||new_error){ if(qbevent){evnt(10267);if(r)goto S_12594;} S_12595:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_PART!= 2 ))|(qbs_equal(__STRING_A3,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(10268);if(r)goto S_12595;} 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(10268);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10268);}while(r); } do{ qbs_set(__STRING_SOURCE,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10269);}while(r); do{ goto dl_exit_1523; if(!qbevent)break;evnt(10270);}while(r); } do{ qbs_set(__STRING_A2,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10272);}while(r); S_12603:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(10273);if(r)goto S_12603;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(10273);}while(r); } S_12606:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(10274);if(r)goto S_12606;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(10274);}while(r); } S_12609:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_A2,qbs_new_txt_len("=",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(10275);if(r)goto S_12609;} S_12610:; if ((-(*__LONG_PART== 1 ))||new_error){ if(qbevent){evnt(10276);if(r)goto S_12610;} do{ qbs_set(__STRING_DEST,__STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10276);}while(r); do{ *__LONG_PART= 2 ; if(!qbevent)break;evnt(10276);}while(r); do{ qbs_set(__STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10276);}while(r); do{ goto LABEL_LRSETGOTPART; if(!qbevent)break;evnt(10276);}while(r); } } S_12617:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A3->len))||new_error){ if(qbevent){evnt(10278);if(r)goto S_12617;} 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(10278);}while(r); }else{ do{ qbs_set(__STRING_A3,__STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10278);}while(r); } LABEL_LRSETGOTPART:; if(qbevent){evnt(10279);r=0;} do{ *__LONG_I=*__LONG_I+ 1 ; if(!qbevent)break;evnt(10280);}while(r); dl_continue_1523:; }while(1); dl_exit_1523:; S_12624:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_DEST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(10282);if(r)goto S_12624;} 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(10282);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10282);}while(r); } do{ qbs_set(__STRING_F,FUNC_FIXOPERATIONORDER(__STRING_DEST)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10284);}while(r); S_12629:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10285);if(r)goto S_12629;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10285);}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(10286);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_F,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10287);}while(r); S_12634:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10288);if(r)goto S_12634;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10288);}while(r); } S_12637:; if (((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(10289);if(r)goto S_12637;} 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(10289);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10289);}while(r); } do{ qbs_set(__STRING_DEST,FUNC_EVALUATETOTYP(__STRING_F,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10290);}while(r); S_12642:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10291);if(r)goto S_12642;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10291);}while(r); } do{ qbs_set(__STRING_SOURCE,FUNC_FIXOPERATIONORDER(__STRING_SOURCE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10292);}while(r); S_12646:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10293);if(r)goto S_12646;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10293);}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(10294);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10295);}while(r); S_12651:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10295);if(r)goto S_12651;} 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(10295);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10295);}while(r); } do{ qbs_set(__STRING_SOURCE,FUNC_EVALUATETOTYP(__STRING_SOURCE,__LONG_ISSTRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10296);}while(r); S_12657:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10297);if(r)goto S_12657;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10297);}while(r); } S_12660:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LSET",4))))||new_error){ if(qbevent){evnt(10298);if(r)goto S_12660;} do{ SUB_WRITEBUFLINE(&(pass1526=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10299);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1527=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10301);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10303);}while(r); } S_12667:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SWAP",4))))||new_error){ if(qbevent){evnt(10307);if(r)goto S_12667;} S_12668:; if ((-(*__LONG_N< 4 ))||new_error){ if(qbevent){evnt(10308);if(r)goto S_12668;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP ... , ...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10308);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10308);}while(r); } do{ *__LONG_B= 0 ; if(!qbevent)break;evnt(10309);}while(r); do{ *__LONG_ELE= 1 ; if(!qbevent)break;evnt(10310);}while(r); do{ qbs_set(__STRING_E1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10311);}while(r); do{ qbs_set(__STRING_E2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10312);}while(r); S_12676:; fornext_value1529= 2 ; fornext_finalvalue1529=*__LONG_N; fornext_step1529= 1 ; if (fornext_step1529<0) fornext_step_negative1529=1; else fornext_step_negative1529=0; if (new_error) goto fornext_error1529; goto fornext_entrylabel1529; while(1){ fornext_value1529=fornext_step1529+(*__LONG_I); fornext_entrylabel1529: *__LONG_I=fornext_value1529; if (fornext_step_negative1529){ if (fornext_value1529fornext_finalvalue1529) break; } fornext_error1529:; if(qbevent){evnt(10313);if(r)goto S_12676;} do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_CA,__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10314);}while(r); S_12678:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(10315);if(r)goto S_12678;} do{ *__LONG_B=*__LONG_B+ 1 ; if(!qbevent)break;evnt(10315);}while(r); } S_12681:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(10316);if(r)goto S_12681;} do{ *__LONG_B=*__LONG_B- 1 ; if(!qbevent)break;evnt(10316);}while(r); } S_12684:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len(",",1)))&(-(*__LONG_B== 0 ))))||new_error){ if(qbevent){evnt(10317);if(r)goto S_12684;} S_12685:; if ((-(*__LONG_ELE== 2 ))||new_error){ if(qbevent){evnt(10318);if(r)goto S_12685;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP ... , ...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10318);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10318);}while(r); } do{ *__LONG_ELE= 2 ; if(!qbevent)break;evnt(10319);}while(r); }else{ S_12691:; if ((-(*__LONG_ELE== 1 ))||new_error){ if(qbevent){evnt(10321);if(r)goto S_12691;} 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(10321);}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(10321);}while(r); } } fornext_continue_1528:; } fornext_exit_1528:; S_12698:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(10324);if(r)goto S_12698;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected SWAP ... , ...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10324);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10324);}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(10325);}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(10325);}while(r); do{ qbs_set(__STRING_E1,FUNC_FIXOPERATIONORDER(__STRING_E1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10327);}while(r); S_12705:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10328);if(r)goto S_12705;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10328);}while(r); } do{ qbs_set(__STRING_E1L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10329);}while(r); do{ qbs_set(__STRING_E2,FUNC_FIXOPERATIONORDER(__STRING_E2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10330);}while(r); S_12710:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10331);if(r)goto S_12710;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10331);}while(r); } do{ qbs_set(__STRING_E2L,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10332);}while(r); do{ qbs_set(__STRING_E1,FUNC_EVALUATE(__STRING_E1,__LONG_E1TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10333);}while(r); do{ qbs_set(__STRING_E2,FUNC_EVALUATE(__STRING_E2,__LONG_E2TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10333);}while(r); S_12716:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10334);if(r)goto S_12716;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10334);}while(r); } S_12719:; if (((-((*__LONG_E1TYP&*__LONG_ISREFERENCE)== 0 ))|(-((*__LONG_E2TYP&*__LONG_ISREFERENCE)== 0 )))||new_error){ if(qbevent){evnt(10335);if(r)goto S_12719;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10335);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10335);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10337);}while(r); do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(10338);}while(r); S_12725:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(10339);if(r)goto S_12725;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10339);}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(10339);}while(r); } S_12730:; if (((*__LONG_E1TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(10342);if(r)goto S_12730;} S_12731:; if ((-((*__LONG_E2TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(10343);if(r)goto S_12731;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10343);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10343);}while(r); } do{ qbs_set(__STRING_E1,FUNC_REFER(__STRING_E1,__LONG_E1TYP,&(pass1533= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10344);}while(r); do{ qbs_set(__STRING_E2,FUNC_REFER(__STRING_E2,__LONG_E2TYP,&(pass1534= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10344);}while(r); S_12737:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10345);if(r)goto S_12737;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10345);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1535=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10346);}while(r); do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10347);}while(r); } S_12743:; if ((*__LONG_E1TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(10355);if(r)goto S_12743;} do{ qbs_set(__STRING_A,__STRING_E1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10356);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10358);}while(r); S_12746:; if ((*__LONG_I)||new_error){ if(qbevent){evnt(10359);if(r)goto S_12746;} do{ *__LONG_IDNUMBER=qbr(func_val(qbs_left(__STRING_A,*__LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10360);}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(10360);}while(r); do{ SUB_GETID(__LONG_IDNUMBER); if(!qbevent)break;evnt(10361);}while(r); S_12750:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10362);if(r)goto S_12750;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10362);}while(r); } do{ *__LONG_U=qbr(func_val(__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10363);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10364);}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(10364);}while(r); do{ *__LONG_E=qbr(func_val(__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10364);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_A,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10365);}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(10365);}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(10366);}while(r); S_12760:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(10366);if(r)goto S_12760;} 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(10366);}while(r); } S_12763:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(10367);if(r)goto S_12763;} do{ qbs_set(__STRING_LHSSCOPE,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10368);}while(r); do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10369);}while(r); do{ *__LONG_T2=*__LONG_E2TYP; if(!qbevent)break;evnt(10369);}while(r); S_12767:; if ((-((*__LONG_T2&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(10370);if(r)goto S_12767;} 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(10370);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10370);}while(r); } do{ *__LONG_IDNUMBER2=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10371);}while(r); do{ SUB_GETID(__LONG_IDNUMBER2); if(!qbevent)break;evnt(10372);}while(r); S_12773:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10373);if(r)goto S_12773;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10373);}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(10374);}while(r); S_12777:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(10374);if(r)goto S_12777;} 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(10374);}while(r); } do{ *__LONG_I=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10375);}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(10375);}while(r); do{ *__LONG_U2=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10375);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10376);}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(10376);}while(r); do{ *__LONG_E2=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10376);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10378);}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(10378);}while(r); S_12788:; if (((-(*__LONG_U!=*__LONG_U2))|(-(*__LONG_E2!= 0 )))||new_error){ if(qbevent){evnt(10380);if(r)goto S_12788;} 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(10380);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10380);}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(10381);}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(10382);}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(10383);}while(r); do{ qbs_set(__STRING_SIZ,FUNC_STR2(__LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10384);}while(r); S_12796:; if ((-(*__LONG_B== 1 ))||new_error){ if(qbevent){evnt(10385);if(r)goto S_12796;} do{ SUB_WRITEBUFLINE(&(pass1542=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10385);}while(r); } S_12799:; if ((-(*__LONG_B== 2 ))||new_error){ if(qbevent){evnt(10386);if(r)goto S_12799;} do{ SUB_WRITEBUFLINE(&(pass1543=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10386);}while(r); } S_12802:; if ((-(*__LONG_B== 4 ))||new_error){ if(qbevent){evnt(10387);if(r)goto S_12802;} do{ SUB_WRITEBUFLINE(&(pass1544=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10387);}while(r); } S_12805:; if ((-(*__LONG_B== 8 ))||new_error){ if(qbevent){evnt(10388);if(r)goto S_12805;} do{ SUB_WRITEBUFLINE(&(pass1545=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10388);}while(r); } S_12808:; if (((-(*__LONG_B!= 1 ))&(-(*__LONG_B!= 2 ))&(-(*__LONG_B!= 4 ))&(-(*__LONG_B!= 8 )))||new_error){ if(qbevent){evnt(10389);if(r)goto S_12808;} do{ SUB_WRITEBUFLINE(&(pass1546=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10389);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10390);}while(r); } } } do{ *__LONG_E1TYPC=*__LONG_E1TYP; if(!qbevent)break;evnt(10396);}while(r); S_12816:; if ((*__LONG_E1TYPC&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(10397);if(r)goto S_12816;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISPOINTER; if(!qbevent)break;evnt(10397);}while(r); } S_12819:; if ((*__LONG_E1TYPC&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(10398);if(r)goto S_12819;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(10398);}while(r); } S_12822:; if ((*__LONG_E1TYPC&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(10399);if(r)goto S_12822;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISARRAY; if(!qbevent)break;evnt(10399);}while(r); } S_12825:; if ((*__LONG_E1TYPC&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(10400);if(r)goto S_12825;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(10400);}while(r); } S_12828:; if ((*__LONG_E1TYPC&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(10401);if(r)goto S_12828;} do{ *__LONG_E1TYPC=*__LONG_E1TYPC-*__LONG_ISUDT; if(!qbevent)break;evnt(10401);}while(r); } do{ *__LONG_E2TYPC=*__LONG_E2TYP; if(!qbevent)break;evnt(10402);}while(r); S_12832:; if ((*__LONG_E2TYPC&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(10403);if(r)goto S_12832;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISPOINTER; if(!qbevent)break;evnt(10403);}while(r); } S_12835:; if ((*__LONG_E2TYPC&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(10404);if(r)goto S_12835;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(10404);}while(r); } S_12838:; if ((*__LONG_E2TYPC&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(10405);if(r)goto S_12838;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISARRAY; if(!qbevent)break;evnt(10405);}while(r); } S_12841:; if ((*__LONG_E2TYPC&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(10406);if(r)goto S_12841;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(10406);}while(r); } S_12844:; if ((*__LONG_E2TYPC&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(10407);if(r)goto S_12844;} do{ *__LONG_E2TYPC=*__LONG_E2TYPC-*__LONG_ISUDT; if(!qbevent)break;evnt(10407);}while(r); } S_12847:; if ((-(*__LONG_E1TYPC!=*__LONG_E2TYPC))||new_error){ if(qbevent){evnt(10408);if(r)goto S_12847;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10408);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10408);}while(r); } do{ *__LONG_T=*__LONG_E1TYP; if(!qbevent)break;evnt(10409);}while(r); S_12852:; if ((*__LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(10410);if(r)goto S_12852;} 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(10410);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10410);}while(r); } do{ *__LONG_B=*__LONG_T& 511 ; if(!qbevent)break;evnt(10411);}while(r); do{ qbs_set(__STRING_T,FUNC_STR2(__LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10412);}while(r); S_12858:; if ((-(*__LONG_B> 64 ))||new_error){ if(qbevent){evnt(10412);if(r)goto S_12858;} do{ qbs_set(__STRING_T,qbs_new_txt_len("longdouble",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10412);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1547=*__LONG_MAINTXTBUF),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,&(pass1548= 0 ))),qbs_new_txt_len(",&",2)),FUNC_REFER(__STRING_E2,__LONG_E2TYP,&(pass1549= 0 ))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10413);}while(r); S_12862:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10414);if(r)goto S_12862;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10414);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10415);}while(r); } S_12867:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("OPTION",6))))||new_error){ if(qbevent){evnt(10418);if(r)goto S_12867;} S_12868:; if ((-(*__BYTE_OPTIONEXPLICIT== 0 ))||new_error){ if(qbevent){evnt(10419);if(r)goto S_12868;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len(" or OPTION ",11),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICIT",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10419);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10419);}while(r); } S_12873:; if ((-(*__BYTE_OPTIONEXPLICITARRAY== 0 ))||new_error){ if(qbevent){evnt(10420);if(r)goto S_12873;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len(" or OPTION ",11)),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICITARRAY",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10420);}while(r); } S_12876:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(10421);if(r)goto S_12876;} do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected OPTION BASE",20),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10421);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10421);}while(r); } do{ qbs_set(__STRING_E,FUNC_GETELEMENT(__STRING_A,&(pass1550= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10422);}while(r); S_12881:; if(qbevent){evnt(10423);if(r)goto S_12881;} S_12882:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("BASE",4))))||new_error){ if(qbevent){evnt(10424);if(r)goto S_12882;} do{ qbs_set(__STRING_L,FUNC_GETELEMENT(__STRING_A,&(pass1552= 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10425);}while(r); S_12884:; 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(10426);if(r)goto S_12884;} 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(10426);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10426);}while(r); } S_12888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_L,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(10427);if(r)goto S_12888;} do{ *__INTEGER_OPTIONBASE= 1 ; if(!qbevent)break;evnt(10427);}while(r); }else{ do{ *__INTEGER_OPTIONBASE= 0 ; if(!qbevent)break;evnt(10427);}while(r); } do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(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(10428);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10429);}while(r); S_12895:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10429);if(r)goto S_12895;} 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(10429);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10429);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10430);}while(r); sc_ec_28_end:; goto sc_1551_end; } S_12901:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("EXPLICIT",8))||qbs_equal(__STRING_E,qbs_new_txt_len("_EXPLICIT",9))))||new_error){ if(qbevent){evnt(10431);if(r)goto S_12901;} S_12902:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("EXPLICIT",8)))&(qbs_equal(__STRING_QB64PREFIX,qbs_new_txt_len("_",1)))))||new_error){ if(qbevent){evnt(10432);if(r)goto S_12902;} S_12903:; if ((-(*__BYTE_OPTIONEXPLICIT== 0 ))||new_error){ if(qbevent){evnt(10433);if(r)goto S_12903;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len(" or OPTION ",11),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICIT",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10433);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10433);}while(r); } S_12908:; if ((-(*__BYTE_OPTIONEXPLICITARRAY== 0 ))||new_error){ if(qbevent){evnt(10434);if(r)goto S_12908;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len(" or OPTION ",11)),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICITARRAY",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10434);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected OPTION BASE",20),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10435);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10435);}while(r); } do{ *__LONG_OPEX_DESIREDSTATE= -1 ; if(!qbevent)break;evnt(10438);}while(r); S_12915:; if ((-(*__BYTE_OPTIONEXPLICIT== 0 ))||new_error){ if(qbevent){evnt(10439);if(r)goto S_12915;} S_12916:; if ((-(*__LONG_OPEX_RECOMPILEATTEMPTS== 0 ))||new_error){ if(qbevent){evnt(10440);if(r)goto S_12916;} do{ *__LONG_OPEX_RECOMPILEATTEMPTS=*__LONG_OPEX_RECOMPILEATTEMPTS+ 1 ; if(!qbevent)break;evnt(10441);}while(r); do{ goto LABEL_DO_RECOMPILE; if(!qbevent)break;evnt(10442);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("Option",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10446);}while(r); S_12922:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("EXPLICIT",8))))||new_error){ if(qbevent){evnt(10447);if(r)goto S_12922;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Explicit",8)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10447);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("_Explicit",9)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10447);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10448);}while(r); S_12928:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10448);if(r)goto S_12928;} 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(10448);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10448);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10449);}while(r); sc_ec_29_end:; goto sc_1551_end; } S_12934:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("EXPLICITARRAY",13))||qbs_equal(__STRING_E,qbs_new_txt_len("_EXPLICITARRAY",14))))||new_error){ if(qbevent){evnt(10450);if(r)goto S_12934;} S_12935:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_E,qbs_new_txt_len("EXPLICITARRAY",13)))&(qbs_equal(__STRING_QB64PREFIX,qbs_new_txt_len("_",1)))))||new_error){ if(qbevent){evnt(10451);if(r)goto S_12935;} S_12936:; if ((-(*__BYTE_OPTIONEXPLICIT== 0 ))||new_error){ if(qbevent){evnt(10452);if(r)goto S_12936;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len(" or OPTION ",11),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICIT",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10452);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10452);}while(r); } S_12941:; if ((-(*__BYTE_OPTIONEXPLICITARRAY== 0 ))||new_error){ if(qbevent){evnt(10453);if(r)goto S_12941;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len(" or OPTION ",11)),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICITARRAY",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10453);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected OPTION BASE",20),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10454);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10454);}while(r); } do{ *__LONG_OPEXARRAY_DESIREDSTATE= -1 ; if(!qbevent)break;evnt(10457);}while(r); S_12948:; if ((-(*__BYTE_OPTIONEXPLICITARRAY== 0 ))||new_error){ if(qbevent){evnt(10458);if(r)goto S_12948;} S_12949:; if ((-(*__LONG_OPEXARRAY_RECOMPILEATTEMPTS== 0 ))||new_error){ if(qbevent){evnt(10459);if(r)goto S_12949;} do{ *__LONG_OPEXARRAY_RECOMPILEATTEMPTS=*__LONG_OPEXARRAY_RECOMPILEATTEMPTS+ 1 ; if(!qbevent)break;evnt(10460);}while(r); do{ goto LABEL_DO_RECOMPILE; if(!qbevent)break;evnt(10461);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(FUNC_SCASE(qbs_new_txt_len("Option",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10465);}while(r); S_12955:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_E,qbs_new_txt_len("EXPLICITARRAY",13))))||new_error){ if(qbevent){evnt(10466);if(r)goto S_12955;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("ExplicitArray",13)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10466);}while(r); }else{ do{ qbs_set(__STRING_L,qbs_add(__STRING_L,FUNC_SCASE(qbs_new_txt_len("_ExplicitArray",14)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10466);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(10467);}while(r); S_12961:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(10467);if(r)goto S_12961;} 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(10467);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10467);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(10468);}while(r); sc_ec_30_end:; goto sc_1551_end; } S_12968:; if ((-(*__BYTE_OPTIONEXPLICIT== 0 ))||new_error){ if(qbevent){evnt(10470);if(r)goto S_12968;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len(" or OPTION ",11),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICIT",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10470);}while(r); }else{ do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10470);}while(r); } S_12973:; if ((-(*__BYTE_OPTIONEXPLICITARRAY== 0 ))||new_error){ if(qbevent){evnt(10471);if(r)goto S_12973;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(__STRING_E,qbs_new_txt_len(" or OPTION ",11)),__STRING_QB64PREFIX),qbs_new_txt_len("EXPLICITARRAY",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10471);}while(r); } do{ qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Expected OPTION BASE",20),__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10472);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10472);}while(r); sc_1551_end:; } do{ memcpy((((char*)__UDT_ID2)+(0)+ 0),(((char*)__UDT_ID)+(0)+ 0), 256); memcpy((((char*)__UDT_ID2)+(0)+ 256),(((char*)__UDT_ID)+(0)+ 256), 256); memcpy((((char*)__UDT_ID2)+(0)+ 512),(((char*)__UDT_ID)+(0)+ 512), 4); memcpy((((char*)__UDT_ID2)+(0)+ 516),(((char*)__UDT_ID)+(0)+ 516), 2); memcpy((((char*)__UDT_ID2)+(0)+ 518),(((char*)__UDT_ID)+(0)+ 518), 2); memcpy((((char*)__UDT_ID2)+(0)+ 520),(((char*)__UDT_ID)+(0)+ 520), 8); memcpy((((char*)__UDT_ID2)+(0)+ 528),(((char*)__UDT_ID)+(0)+ 528), 8); memcpy((((char*)__UDT_ID2)+(0)+ 536),(((char*)__UDT_ID)+(0)+ 536), 4); memcpy((((char*)__UDT_ID2)+(0)+ 540),(((char*)__UDT_ID)+(0)+ 540), 4); memcpy((((char*)__UDT_ID2)+(0)+ 544),(((char*)__UDT_ID)+(0)+ 544), 2); memcpy((((char*)__UDT_ID2)+(0)+ 546),(((char*)__UDT_ID)+(0)+ 546), 2); memcpy((((char*)__UDT_ID2)+(0)+ 548),(((char*)__UDT_ID)+(0)+ 548), 2); memcpy((((char*)__UDT_ID2)+(0)+ 550),(((char*)__UDT_ID)+(0)+ 550), 256); memcpy((((char*)__UDT_ID2)+(0)+ 806),(((char*)__UDT_ID)+(0)+ 806), 2); memcpy((((char*)__UDT_ID2)+(0)+ 808),(((char*)__UDT_ID)+(0)+ 808), 1); memcpy((((char*)__UDT_ID2)+(0)+ 809),(((char*)__UDT_ID)+(0)+ 809), 2); memcpy((((char*)__UDT_ID2)+(0)+ 811),(((char*)__UDT_ID)+(0)+ 811), 2); memcpy((((char*)__UDT_ID2)+(0)+ 813),(((char*)__UDT_ID)+(0)+ 813), 400); memcpy((((char*)__UDT_ID2)+(0)+ 1213),(((char*)__UDT_ID)+(0)+ 1213), 400); memcpy((((char*)__UDT_ID2)+(0)+ 1613),(((char*)__UDT_ID)+(0)+ 1613), 256); memcpy((((char*)__UDT_ID2)+(0)+ 1869),(((char*)__UDT_ID)+(0)+ 1869), 256); memcpy((((char*)__UDT_ID2)+(0)+ 2125),(((char*)__UDT_ID)+(0)+ 2125), 256); memcpy((((char*)__UDT_ID2)+(0)+ 2381),(((char*)__UDT_ID)+(0)+ 2381), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2385),(((char*)__UDT_ID)+(0)+ 2385), 256); memcpy((((char*)__UDT_ID2)+(0)+ 2641),(((char*)__UDT_ID)+(0)+ 2641), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2645),(((char*)__UDT_ID)+(0)+ 2645), 2); memcpy((((char*)__UDT_ID2)+(0)+ 2647),(((char*)__UDT_ID)+(0)+ 2647), 100); memcpy((((char*)__UDT_ID2)+(0)+ 2747),(((char*)__UDT_ID)+(0)+ 2747), 100); memcpy((((char*)__UDT_ID2)+(0)+ 2847),(((char*)__UDT_ID)+(0)+ 2847), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2851),(((char*)__UDT_ID)+(0)+ 2851), 2); memcpy((((char*)__UDT_ID2)+(0)+ 2853),(((char*)__UDT_ID)+(0)+ 2853), 2); memcpy((((char*)__UDT_ID2)+(0)+ 2855),(((char*)__UDT_ID)+(0)+ 2855), 4); memcpy((((char*)__UDT_ID2)+(0)+ 2859),(((char*)__UDT_ID)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__UDT_ID2)+(0)+ 2861), *(qbs**)(((char*)__UDT_ID)+(0)+ 2861)); if(!qbevent)break;evnt(10478);}while(r); do{ *__LONG_TARGETID=*__LONG_CURRENTID; if(!qbevent)break;evnt(10480);}while(r); S_12982:; 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(10482);if(r)goto S_12982;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Command not implemented",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10482);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10482);}while(r); } S_12986:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(10484);if(r)goto S_12986;} S_12987:; if ((-(*(int16*)(((char*)__UDT_ID2)+(809))== 0 ))||new_error){ if(qbevent){evnt(10485);if(r)goto S_12987;} 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(10485);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10485);}while(r); } } do{ SUB_SETDEPENDENCY(&(pass1556=*(int16*)(((char*)__UDT_ID2)+(546)))); if(!qbevent)break;evnt(10488);}while(r); do{ *__LONG_SEPERATEARGS_ERROR= 0 ; if(!qbevent)break;evnt(10490);}while(r); do{ *__LONG_PASSEDNEEDED=FUNC_SEPERATEARGS(FUNC_GETELEMENTS(__STRING_A,&(pass1557= 2 ),__LONG_N),FUNC_GETELEMENTS(__STRING_CA,&(pass1558= 2 ),__LONG_N),__LONG_PASSED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10491);}while(r); S_12995:; if ((*__LONG_SEPERATEARGS_ERROR)||new_error){ if(qbevent){evnt(10492);if(r)goto S_12995;} do{ qbs_set(__STRING_A,__STRING_SEPERATEARGS_ERROR_MESSAGE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10492);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10492);}while(r); } S_12999:; fornext_value1560= 1 ; fornext_finalvalue1560=*__LONG_OPTMAX; fornext_step1560= 1 ; if (fornext_step1560<0) fornext_step_negative1560=1; else fornext_step_negative1560=0; if (new_error) goto fornext_error1560; goto fornext_entrylabel1560; while(1){ fornext_value1560=fornext_step1560+(*__LONG_I); fornext_entrylabel1560: *__LONG_I=fornext_value1560; if (fornext_step_negative1560){ if (fornext_value1560fornext_finalvalue1560) break; } fornext_error1560:; if(qbevent){evnt(10495);if(r)goto S_12999;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10495);}while(r); fornext_continue_1559:; } fornext_exit_1559:; S_13002:; fornext_value1562= 1 ; fornext_finalvalue1562=*__LONG_OPTMAX+ 1 ; fornext_step1562= 1 ; if (fornext_step1562<0) fornext_step_negative1562=1; else fornext_step_negative1562=0; if (new_error) goto fornext_error1562; goto fornext_entrylabel1562; while(1){ fornext_value1562=fornext_step1562+(*__LONG_I); fornext_entrylabel1562: *__LONG_I=fornext_value1562; if (fornext_step_negative1562){ if (fornext_value1562fornext_finalvalue1562) break; } fornext_error1562:; if(qbevent){evnt(10496);if(r)goto S_13002;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10496);}while(r); fornext_continue_1561:; } fornext_exit_1561:; S_13005:; fornext_value1564= 1 ; fornext_finalvalue1564=*(int16*)(((char*)__UDT_ID2)+(809)); fornext_step1564= 1 ; if (fornext_step1564<0) fornext_step_negative1564=1; else fornext_step_negative1564=0; if (new_error) goto fornext_error1564; goto fornext_entrylabel1564; while(1){ fornext_value1564=fornext_step1564+(*__LONG_I); fornext_entrylabel1564: *__LONG_I=fornext_value1564; if (fornext_step_negative1564){ if (fornext_value1564fornext_finalvalue1564) break; } fornext_error1564:; if(qbevent){evnt(10497);if(r)goto S_13005;} 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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10497);}while(r); fornext_continue_1563:; } fornext_exit_1563:; S_13008:; fornext_value1566= 1 ; fornext_finalvalue1566=*(int16*)(((char*)__UDT_ID2)+(809))+ 1 ; fornext_step1566= 1 ; if (fornext_step1566<0) fornext_step_negative1566=1; else fornext_step_negative1566=0; if (new_error) goto fornext_error1566; goto fornext_entrylabel1566; while(1){ fornext_value1566=fornext_step1566+(*__LONG_I); fornext_entrylabel1566: *__LONG_I=fornext_value1566; if (fornext_step_negative1566){ if (fornext_value1566fornext_finalvalue1566) break; } fornext_error1566:; if(qbevent){evnt(10498);if(r)goto S_13008;} 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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10498);}while(r); fornext_continue_1565:; } fornext_exit_1565:; S_13011:; if (( 0 )||new_error){ if(qbevent){evnt(10502);if(r)goto S_13011;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1567; sub_file_print(tmp_fileno,qbs_new_txt_len("separgs:",8), 0, 0, 1); if (new_error) goto skip1567; skip1567: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10503);}while(r); S_13013:; fornext_value1569= 1 ; fornext_finalvalue1569=*(int16*)(((char*)__UDT_ID2)+(809)); fornext_step1569= 1 ; if (fornext_step1569<0) fornext_step_negative1569=1; else fornext_step_negative1569=0; if (new_error) goto fornext_error1569; goto fornext_entrylabel1569; while(1){ fornext_value1569=fornext_step1569+(*__LONG_I); fornext_entrylabel1569: *__LONG_I=fornext_value1569; if (fornext_step_negative1569){ if (fornext_value1569fornext_finalvalue1569) break; } fornext_error1569:; if(qbevent){evnt(10503);if(r)goto S_13013;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1570; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I)), 1, 1, 0); if (new_error) goto skip1570; 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 skip1570; skip1570: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10503);}while(r); fornext_continue_1568:; } fornext_exit_1568:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1571; sub_file_print(tmp_fileno,qbs_new_txt_len("separgslayout:",14), 0, 0, 1); if (new_error) goto skip1571; skip1571: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10504);}while(r); S_13017:; fornext_value1573= 1 ; fornext_finalvalue1573=*(int16*)(((char*)__UDT_ID2)+(809))+ 1 ; fornext_step1573= 1 ; if (fornext_step1573<0) fornext_step_negative1573=1; else fornext_step_negative1573=0; if (new_error) goto fornext_error1573; goto fornext_entrylabel1573; while(1){ fornext_value1573=fornext_step1573+(*__LONG_I); fornext_entrylabel1573: *__LONG_I=fornext_value1573; if (fornext_step_negative1573){ if (fornext_value1573fornext_finalvalue1573) break; } fornext_error1573:; if(qbevent){evnt(10504);if(r)goto S_13017;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1574; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I)), 1, 1, 0); if (new_error) goto skip1574; 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 skip1574; skip1574: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10504);}while(r); fornext_continue_1572:; } fornext_exit_1572:; } S_13021:; if ((*__LONG_USECALL)||new_error){ if(qbevent){evnt(10516);if(r)goto S_13021;} S_13022:; if ((*(int16*)(((char*)__UDT_ID)+(548)))||new_error){ if(qbevent){evnt(10517);if(r)goto S_13022;} S_13023:; if ((-(*__LONG_USECALL== 1 ))||new_error){ if(qbevent){evnt(10518);if(r)goto S_13023;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Call",4)),__STRING1_SP),FUNC_SCASE(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(10518);}while(r); } S_13026:; if ((-(*__LONG_USECALL== 2 ))||new_error){ if(qbevent){evnt(10519);if(r)goto S_13026;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Call",4)),__STRING1_SP),FUNC_SCASE(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(10519);}while(r); } }else{ S_13030:; if ((-(*__LONG_USECALL== 1 ))||new_error){ if(qbevent){evnt(10521);if(r)goto S_13030;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(10521);}while(r); } S_13033:; if ((-(*__LONG_USECALL== 2 ))||new_error){ if(qbevent){evnt(10522);if(r)goto S_13033;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(10522);}while(r); } } }else{ S_13038:; if ((*(int16*)(((char*)__UDT_ID)+(548)))||new_error){ if(qbevent){evnt(10525);if(r)goto S_13038;} do{ qbs_set(__STRING_L,qbs_add(qbs_add(FUNC_SCASE(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(10526);}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(10528);}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(10532);}while(r); do{ *__LONG_ADDEDLAYOUT= 0 ; if(!qbevent)break;evnt(10533);}while(r); do{ *__LONG_FIELDCALL= 0 ; if(!qbevent)break;evnt(10535);}while(r); S_13047:; 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(10537);if(r)goto S_13047;} S_13048:; if ((*__LONG_PASSED& 2 )||new_error){ if(qbevent){evnt(10538);if(r)goto S_13048;} do{ *__LONG_PASSED=*__LONG_PASSED- 2 ; if(!qbevent)break;evnt(10540);}while(r); }else{ S_13051:; 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(10543);if(r)goto S_13051;} do{ *__LONG_FIELDCALL= 1 ; if(!qbevent)break;evnt(10544);}while(r); do{ qbs_set(__STRING_SUBCALL,qbs_new_txt_len("field_get(",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10545);}while(r); }else{ do{ *__LONG_FIELDCALL= 2 ; if(!qbevent)break;evnt(10547);}while(r); do{ qbs_set(__STRING_SUBCALL,qbs_new_txt_len("field_put(",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10548);}while(r); } } } S_13060:; 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(10553);if(r)goto S_13060;} S_13061:; if ((-(*__LONG_USECALL== 0 ))||new_error){ if(qbevent){evnt(10554);if(r)goto S_13061;} 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(10555);}while(r); } } S_13065:; fornext_value1577= 1 ; fornext_finalvalue1577=*(int16*)(((char*)__UDT_ID2)+(809)); fornext_step1577= 1 ; if (fornext_step1577<0) fornext_step_negative1577=1; else fornext_step_negative1577=0; if (new_error) goto fornext_error1577; goto fornext_entrylabel1577; while(1){ fornext_value1577=fornext_step1577+(*__LONG_I); fornext_entrylabel1577: *__LONG_I=fornext_value1577; if (fornext_step_negative1577){ if (fornext_value1577fornext_finalvalue1577) break; } fornext_error1577:; if(qbevent){evnt(10559);if(r)goto S_13065;} do{ *__LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(813)),400,1),( -3 )+(*__LONG_I* 4 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10560);}while(r); do{ *__LONG_NELE=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2647)),100,1),*__LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10561);}while(r); do{ *__LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2747)),100,1),*__LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10562);}while(r); do{ *__LONG_ADDLAYOUT= 1 ; if(!qbevent)break;evnt(10564);}while(r); do{ *__LONG_CONVERTSPACING= 0 ; if(!qbevent)break;evnt(10565);}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(10566);}while(r); S_13072:; while((qbs_cleanup(qbs_tmp_base,__STRING_X->len))||new_error){ if(qbevent){evnt(10567);if(r)goto S_13072;} do{ *__LONG_X=qbs_asc(__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10568);}while(r); S_13074:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(10569);if(r)goto S_13074;} do{ *__LONG_CONVERTSPACING= 0 ; if(!qbevent)break;evnt(10570);}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(10571);}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(10572);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(10574);}while(r); do{ *__LONG_AN= 0 ; if(!qbevent)break;evnt(10575);}while(r); do{ qbs_set(__STRING_X3,qbs_right(__STRING_L, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10576);}while(r); S_13081:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP)))||new_error){ if(qbevent){evnt(10577);if(r)goto S_13081;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(10577);}while(r); } S_13084:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP2)))||new_error){ if(qbevent){evnt(10578);if(r)goto S_13084;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(10579);}while(r); S_13086:; 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(10580);if(r)goto S_13086;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(10580);}while(r); } }else{ S_13090:; 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(10582);if(r)goto S_13090;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(10582);}while(r); } } do{ *__LONG_S1=*__LONG_S; if(!qbevent)break;evnt(10584);}while(r); S_13095:; 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(10586);if(r)goto S_13095;} do{ *__LONG_CONVERTSPACING= 1 ; if(!qbevent)break;evnt(10586);}while(r); } S_13098:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("LPRINT",6))))||new_error){ if(qbevent){evnt(10589);if(r)goto S_13098;} } S_13100:; 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(10613);if(r)goto S_13100;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(10617);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10618);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(10619);}while(r); } S_13105:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(10622);if(r)goto S_13105;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(10623);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10624);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(10625);}while(r); } S_13110:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(10628);if(r)goto S_13110;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(10629);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10630);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(10631);}while(r); } S_13115:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(10634);if(r)goto S_13115;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10634);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(10634);}while(r); } S_13119:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X,func_chr( 0 ))))||new_error){ if(qbevent){evnt(10637);if(r)goto S_13119;} S_13120:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("STEP",4))))||new_error){ if(qbevent){evnt(10638);if(r)goto S_13120;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10638);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(10638);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10639);}while(r); do{ goto LABEL_CUSTOMLAYCHAR; if(!qbevent)break;evnt(10639);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10643);}while(r); LABEL_CUSTOMLAYCHAR:; if(qbevent){evnt(10649);r=0;} S_13128:; if ((-(*__LONG_S== 0 ))||new_error){ if(qbevent){evnt(10650);if(r)goto S_13128;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(10650);}while(r); } S_13131:; if ((-(*__LONG_S!=*__LONG_S1))||new_error){ if(qbevent){evnt(10651);if(r)goto S_13131;} S_13132:; if ((*__LONG_S1)||new_error){ if(qbevent){evnt(10652);if(r)goto S_13132;} do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10652);}while(r); } S_13135:; if ((-(*__LONG_S== 1 ))||new_error){ if(qbevent){evnt(10653);if(r)goto S_13135;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10653);}while(r); } S_13138:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(10654);if(r)goto S_13138;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10654);}while(r); } } S_13142:; 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)+(809))))))||new_error){ if(qbevent){evnt(10657);if(r)goto S_13142;} S_13143:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_X2,(qbs_add(qbs_new_txt_len(")",1),__STRING1_SP2)))))||new_error){ if(qbevent){evnt(10658);if(r)goto S_13143;} 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(10659);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_X2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10663);}while(r); }else{ do{ *__LONG_ADDLAYOUT= 0 ; if(!qbevent)break;evnt(10666);}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(10667);}while(r); } do{ *__LONG_ADDEDLAYOUT= 0 ; if(!qbevent)break;evnt(10669);}while(r); dl_continue_1579:; } dl_exit_1579:; S_13154:; if ((-(*__LONG_TARGETTYP== -3 ))||new_error){ if(qbevent){evnt(10678);if(r)goto S_13154;} S_13155:; 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("N-LL",4))))||new_error){ if(qbevent){evnt(10679);if(r)goto S_13155;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected array name",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10679);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10679);}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(10681);}while(r); S_13160:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_E,__STRING1_SP,0)== 0 )))||new_error){ if(qbevent){evnt(10683);if(r)goto S_13160;} do{ qbs_set(__STRING_TRY_STRING,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10684);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10685);}while(r); S_13163:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10686);if(r)goto S_13163;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10686);}while(r); } S_13166:; do{ if(qbevent){evnt(10687);if(r)goto S_13166;} S_13167:; if ((*__LONG_TRY)||new_error){ if(qbevent){evnt(10688);if(r)goto S_13167;} S_13168:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(10689);if(r)goto S_13168;} S_13169:; if ((-((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(10690);if(r)goto S_13169;} 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(10691);}while(r); do{ goto dl_exit_1584; if(!qbevent)break;evnt(10692);}while(r); } } S_13174:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(10696);if(r)goto S_13174;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(10696);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10696);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(10696);}while(r); } S_13180:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10697);if(r)goto S_13180;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10697);}while(r); } } S_13184:; if ((-(*__LONG_TRY== 0 ))||new_error){ if(qbevent){evnt(10699);if(r)goto S_13184;} S_13185:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(FUNC_REMOVESYMBOL(__STRING_TRY_STRING))->len)== 0 )))||new_error){ if(qbevent){evnt(10700);if(r)goto S_13185;} S_13186:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10701);if(r)goto S_13186;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10701);}while(r); } do{ *__LONG_A=qbs_asc(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10702);}while(r); S_13190:; if (((-(*__LONG_A>= 97 ))&(-(*__LONG_A<= 122 )))||new_error){ if(qbevent){evnt(10703);if(r)goto S_13190;} do{ *__LONG_A=*__LONG_A- 32 ; if(!qbevent)break;evnt(10703);}while(r); } S_13193:; if ((-(*__LONG_A== 95 ))||new_error){ if(qbevent){evnt(10704);if(r)goto S_13193;} do{ *__LONG_A= 91 ; if(!qbevent)break;evnt(10704);}while(r); } do{ *__LONG_A=*__LONG_A- 64 ; if(!qbevent)break;evnt(10705);}while(r); S_13197:; 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(10706);if(r)goto S_13197;} 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(10706);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10706);}while(r); } S_13201:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10707);if(r)goto S_13201;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10707);}while(r); } } } S_13206:; dl_continue_1584:; }while((!(-(*__LONG_TRY== 0 )))&&(!new_error)); dl_exit_1584:; if(qbevent){evnt(10710);if(r)goto S_13206;} } do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10715);}while(r); S_13209:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10716);if(r)goto S_13209;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10716);}while(r); } S_13212:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(10717);if(r)goto S_13212;} 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(10717);}while(r); } S_13215:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(10718);if(r)goto S_13215;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10718);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(10718);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1587= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10719);}while(r); S_13220:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10720);if(r)goto S_13220;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10720);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(10721);}while(r); } S_13225:; if ((-(*__LONG_TARGETTYP== -2 ))||new_error){ if(qbevent){evnt(10725);if(r)goto S_13225;} do{ qbs_set(__STRING_E,FUNC_FIXOPERATIONORDER(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10726);}while(r); S_13227:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10727);if(r)goto S_13227;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10727);}while(r); } S_13230:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(10728);if(r)goto S_13230;} 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(10728);}while(r); } S_13233:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(10729);if(r)goto S_13233;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10729);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(10729);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1589= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10730);}while(r); S_13238:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10731);if(r)goto S_13238;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10731);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(10732);}while(r); } S_13243:; if ((-(*__LONG_TARGETTYP== -4 ))||new_error){ if(qbevent){evnt(10735);if(r)goto S_13243;} S_13244:; if ((*__LONG_FIELDCALL)||new_error){ if(qbevent){evnt(10737);if(r)goto S_13244;} do{ *__LONG_I=*(int16*)(((char*)__UDT_ID2)+(809))+ 1 ; if(!qbevent)break;evnt(10738);}while(r); do{ goto fornext_exit_1576; if(!qbevent)break;evnt(10739);}while(r); } S_13248:; 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("N-LL",4))))||new_error){ if(qbevent){evnt(10742);if(r)goto S_13248;} 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(10742);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10742);}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(10743);}while(r); S_13253:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10744);if(r)goto S_13253;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10744);}while(r); } S_13256:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(10745);if(r)goto S_13256;} 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(10745);}while(r); } S_13259:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(10746);if(r)goto S_13259;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10746);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(10746);}while(r); } S_13263:; 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(10749);if(r)goto S_13263;} do{ qbs_set(__STRING_E2,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10750);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10751);}while(r); S_13266:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10752);if(r)goto S_13266;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10752);}while(r); } S_13269:; if (((*__LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(10753);if(r)goto S_13269;} S_13270:; if ((-((*__LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(10754);if(r)goto S_13270;} do{ qbs_set(__STRING_SUBCALL,qbs_right(__STRING_SUBCALL,__STRING_SUBCALL->len- 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10756);}while(r); S_13272:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("GET",3))))||new_error){ if(qbevent){evnt(10758);if(r)goto S_13272;} 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(10759);}while(r); do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1592= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10760);}while(r); S_13275:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10761);if(r)goto S_13275;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10761);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(10762);}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(10764);}while(r); } } } do{ qbs_set(__STRING_E,__STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10769);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(__STRING_E,&(pass1593= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10772);}while(r); S_13287:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10773);if(r)goto S_13287;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10773);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(10774);}while(r); } S_13292:; 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("N-LL",4))))||new_error){ if(qbevent){evnt(10777);if(r)goto S_13292;} do{ qbs_set(__STRING_E,qbs_new_txt_len("NULL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10778);}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(10781);}while(r); S_13296:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10782);if(r)goto S_13296;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10782);}while(r); } S_13299:; if (((-(*__LONG_CONVERTSPACING== 1 ))&(-(*__LONG_ADDLAYOUT== 1 )))||new_error){ if(qbevent){evnt(10783);if(r)goto S_13299;} 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(10783);}while(r); } S_13302:; if ((*__LONG_ADDLAYOUT)||new_error){ if(qbevent){evnt(10784);if(r)goto S_13302;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_TLAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10784);}while(r); do{ *__LONG_ADDEDLAYOUT= 1 ; if(!qbevent)break;evnt(10784);}while(r); } do{ qbs_set(__STRING_E,FUNC_EVALUATE(__STRING_E2,__LONG_SOURCETYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10786);}while(r); S_13307:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10787);if(r)goto S_13307;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10787);}while(r); } S_13310:; if ((*__LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(10789);if(r)goto S_13310;} S_13311:; if ((-((*__LONG_TARGETTYP&*__LONG_ISOFFSET)== 0 ))||new_error){ if(qbevent){evnt(10790);if(r)goto S_13311;} S_13312:; if ((-(*(int16*)(((char*)__UDT_ID2)+(548))== 0 ))||new_error){ if(qbevent){evnt(10791);if(r)goto S_13312;} 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(10791);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10791);}while(r); } } } S_13318:; 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(10795);if(r)goto S_13318;} S_13319:; if ((-(*__LONG_I== 3 ))||new_error){ if(qbevent){evnt(10796);if(r)goto S_13319;} S_13320:; if (((*__LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(10797);if(r)goto S_13320;} do{ *__LONG_TARGETTYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(10798);}while(r); } } } S_13325:; 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(10803);if(r)goto S_13325;} do{ *__LONG_DEREFERENCE= 1 ; if(!qbevent)break;evnt(10803);}while(r); }else{ do{ *__LONG_DEREFERENCE= 0 ; if(!qbevent)break;evnt(10803);}while(r); } S_13330:; if (((*__LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(10806);if(r)goto S_13330;} S_13331:; if ((-(*__LONG_DEREFERENCE== 0 ))||new_error){ if(qbevent){evnt(10807);if(r)goto S_13331;} S_13332:; if (((*__LONG_TARGETTYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(10810);if(r)goto S_13332;} S_13333:; if ((-((*__LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(10811);if(r)goto S_13333;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10811);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10811);}while(r); } S_13337:; if ((-((*__LONG_SOURCETYP&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(10812);if(r)goto S_13337;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10812);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10812);}while(r); } S_13341:; if (( 0 )||new_error){ if(qbevent){evnt(10813);if(r)goto S_13341;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1595; 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 skip1595; skip1595: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10813);}while(r); } do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP; if(!qbevent)break;evnt(10816);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP; if(!qbevent)break;evnt(10816);}while(r); do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISFLOAT); if(!qbevent)break;evnt(10817);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISFLOAT); if(!qbevent)break;evnt(10818);}while(r); S_13348:; if ((-(*__LONG_SOURCETYP2!=*__LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(10819);if(r)goto S_13348;} 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(10819);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10819);}while(r); } S_13352:; if ((*__LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(10822);if(r)goto S_13352;} S_13353:; if (( 0 )||new_error){ if(qbevent){evnt(10823);if(r)goto S_13353;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1596; 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 skip1596; skip1596: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(10823);}while(r); } do{ *__LONG_UDTREFID=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10825);}while(r); do{ SUB_GETID(__LONG_UDTREFID); if(!qbevent)break;evnt(10826);}while(r); S_13358:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10827);if(r)goto S_13358;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10827);}while(r); } do{ *__LONG_UDTREFI=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10828);}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(10829);}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(10830);}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(10831);}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(10832);}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(10833);}while(r); S_13367:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_O, 4 ),qbs_new_txt_len("(0)*",4))))||new_error){ if(qbevent){evnt(10835);if(r)goto S_13367;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10835);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10835);}while(r); } }else{ S_13372:; 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(10837);if(r)goto S_13372;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10837);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10837);}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(10840);}while(r); do{ SUB_GETID(__LONG_IDNUM); if(!qbevent)break;evnt(10841);}while(r); S_13379:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10842);if(r)goto S_13379;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10842);}while(r); } S_13382:; if ((*__LONG_TARGETTYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(10844);if(r)goto S_13382;} do{ *__LONG_TARGETTYPSIZE=string2l(func_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(1213)),400,1),(*__LONG_I* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10845);}while(r); S_13384:; if ((-(*(int32*)(((char*)__UDT_ID)+(540))!=*__LONG_TARGETTYPSIZE))||new_error){ if(qbevent){evnt(10846);if(r)goto S_13384;} 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(10846);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10846);}while(r); } } S_13389:; 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(10849);if(r)goto S_13389;} S_13390:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(10850);if(r)goto S_13390;} 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(10851);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(10852);}while(r); } } S_13395:; if ((-(*(int32*)(((char*)__UDT_ID)+(2847))== 0 ))||new_error){ if(qbevent){evnt(10856);if(r)goto S_13395;} S_13396:; if ((-(*__LONG_NELEREQ== 0 ))||new_error){ if(qbevent){evnt(10862);if(r)goto S_13396;} S_13397:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))> 0 ))||new_error){ if(qbevent){evnt(10866);if(r)goto S_13397;} do{ *__LONG_NELEREQ=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(10868);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)__UDT_ID2)+(2747)),100,1),*__LONG_I, 1 ,func_chr(*__LONG_NELEREQ),1); if(!qbevent)break;evnt(10869);}while(r); } do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 0),(((char*)__UDT_ID2)+(0)+ 0), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 256),(((char*)__UDT_ID2)+(0)+ 256), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 512),(((char*)__UDT_ID2)+(0)+ 512), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 516),(((char*)__UDT_ID2)+(0)+ 516), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 518),(((char*)__UDT_ID2)+(0)+ 518), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 520),(((char*)__UDT_ID2)+(0)+ 520), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 528),(((char*)__UDT_ID2)+(0)+ 528), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 536),(((char*)__UDT_ID2)+(0)+ 536), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 540),(((char*)__UDT_ID2)+(0)+ 540), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 544),(((char*)__UDT_ID2)+(0)+ 544), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 546),(((char*)__UDT_ID2)+(0)+ 546), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 548),(((char*)__UDT_ID2)+(0)+ 548), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 550),(((char*)__UDT_ID2)+(0)+ 550), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 806),(((char*)__UDT_ID2)+(0)+ 806), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 808),(((char*)__UDT_ID2)+(0)+ 808), 1); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 809),(((char*)__UDT_ID2)+(0)+ 809), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 811),(((char*)__UDT_ID2)+(0)+ 811), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 813),(((char*)__UDT_ID2)+(0)+ 813), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1213),(((char*)__UDT_ID2)+(0)+ 1213), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1613),(((char*)__UDT_ID2)+(0)+ 1613), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1869),(((char*)__UDT_ID2)+(0)+ 1869), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2125),(((char*)__UDT_ID2)+(0)+ 2125), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2381),(((char*)__UDT_ID2)+(0)+ 2381), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2385),(((char*)__UDT_ID2)+(0)+ 2385), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2641),(((char*)__UDT_ID2)+(0)+ 2641), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2645),(((char*)__UDT_ID2)+(0)+ 2645), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2647),(((char*)__UDT_ID2)+(0)+ 2647), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2747),(((char*)__UDT_ID2)+(0)+ 2747), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2847),(((char*)__UDT_ID2)+(0)+ 2847), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2851),(((char*)__UDT_ID2)+(0)+ 2851), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2853),(((char*)__UDT_ID2)+(0)+ 2853), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2855),(((char*)__UDT_ID2)+(0)+ 2855), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2859),(((char*)__UDT_ID2)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2861), *(qbs**)(((char*)__UDT_ID2)+(0)+ 2861)); if(!qbevent)break;evnt(10875);}while(r); }else{ S_13403:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!=*__LONG_NELEREQ))||new_error){ if(qbevent){evnt(10882);if(r)goto S_13403;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Passing arrays with a differing number of elements to a SUB/FUNCTION is not supported",85)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10882);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10882);}while(r); } } } do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1598= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10888);}while(r); S_13410:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10889);if(r)goto S_13410;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10889);}while(r); } do{ goto LABEL_SETE; if(!qbevent)break;evnt(10890);}while(r); } S_13415:; if ((-((*__LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(10897);if(r)goto S_13415;} S_13416:; if (((*__LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(10898);if(r)goto S_13416;} 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(10899);}while(r); do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP; if(!qbevent)break;evnt(10901);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP; if(!qbevent)break;evnt(10901);}while(r); do{ *__LONG_ARR= 0 ; if(!qbevent)break;evnt(10904);}while(r); S_13421:; if (((*__LONG_SOURCETYP2&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(10904);if(r)goto S_13421;} do{ *__LONG_ARR= 1 ; if(!qbevent)break;evnt(10904);}while(r); } do{ *__LONG_PASSUDTELEMENT= 0 ; if(!qbevent)break;evnt(10905);}while(r); S_13425:; if (((-((*__LONG_TARGETTYP2&*__LONG_ISUDT)== 0 ))&(-((*__LONG_SOURCETYP2&*__LONG_ISUDT)!= 0 )))||new_error){ if(qbevent){evnt(10905);if(r)goto S_13425;} do{ *__LONG_PASSUDTELEMENT= 1 ; if(!qbevent)break;evnt(10905);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP2-*__LONG_ISUDT; if(!qbevent)break;evnt(10905);}while(r); } do{ *__LONG_TARGETTYP2=*__LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(10908);}while(r); do{ *__LONG_SOURCETYP2=*__LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(10909);}while(r); S_13431:; if ((-(*__LONG_SOURCETYP2==*__LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(10912);if(r)goto S_13431;} S_13432:; if ((*__LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(10914);if(r)goto S_13432;} do{ *__LONG_UDTREFID=qbr(func_val(__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10918);}while(r); do{ SUB_GETID(__LONG_UDTREFID); if(!qbevent)break;evnt(10919);}while(r); S_13435:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10920);if(r)goto S_13435;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10920);}while(r); } do{ *__LONG_UDTREFI=func_instr(NULL,__STRING_E,__STRING1_SP3,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10921);}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(10922);}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(10923);}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(10924);}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(10925);}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(10926);}while(r); S_13444:; if ((*__LONG_ARR)||new_error){ if(qbevent){evnt(10929);if(r)goto S_13444;} 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(10930);}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(10932);}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(10935);}while(r); S_13450:; if ((*__LONG_PASSUDTELEMENT)||new_error){ if(qbevent){evnt(10938);if(r)goto S_13450;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass1600=*__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(10938);}while(r); } S_13453:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10939);if(r)goto S_13453;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10939);}while(r); } }else{ S_13457:; if ((*__LONG_ARR)||new_error){ if(qbevent){evnt(10943);if(r)goto S_13457;} S_13458:; if (((*__LONG_SOURCETYP2&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(10944);if(r)goto S_13458;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Cannot pass BIT array offsets",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10944);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10944);}while(r); } do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1601= 0 ))),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10945);}while(r); S_13463:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10946);if(r)goto S_13463;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10946);}while(r); } }else{ do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1602= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10948);}while(r); S_13468:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10949);if(r)goto S_13468;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10949);}while(r); } } S_13472:; if ((-((*__LONG_SOURCETYP&*__LONG_ISUNSIGNED)!=(*__LONG_TARGETTYP&*__LONG_ISUNSIGNED)))||new_error){ if(qbevent){evnt(10953);if(r)goto S_13472;} do{ qbs_set(__STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass1603=*__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(10954);}while(r); S_13474:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(10955);if(r)goto S_13474;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10955);}while(r); } } } S_13479:; 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(10960);if(r)goto S_13479;} S_13480:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(10961);if(r)goto S_13480;} 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(10962);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(10963);}while(r); } } do{ goto LABEL_SETE; if(!qbevent)break;evnt(10967);}while(r); } } }else{ S_13489:; if (((*__LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(10972);if(r)goto S_13489;} 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(10973);}while(r); S_13491:; 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(10974);if(r)goto S_13491;} S_13492:; if ((-(((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDNUM)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])]== 0 ))||new_error){ if(qbevent){evnt(10975);if(r)goto S_13492;} 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(10976);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(10977);}while(r); } } } } } } S_13501:; if ((*__LONG_TARGETTYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(10989);if(r)goto S_13501;} S_13502:; if ((-((*__LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(10990);if(r)goto S_13502;} do{ *__LONG_NTH=*__LONG_I; if(!qbevent)break;evnt(10991);}while(r); S_13504:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 1 ))||new_error){ if(qbevent){evnt(10992);if(r)goto S_13504;} do{ qbs_set(__STRING_A,qbs_new_txt_len("String required for sub",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10992);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10992);}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(10993);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10993);}while(r); } } S_13512:; if ((-((*__LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(10996);if(r)goto S_13512;} S_13513:; if ((*__LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(10997);if(r)goto S_13513;} do{ *__LONG_NTH=*__LONG_I; if(!qbevent)break;evnt(10998);}while(r); S_13515:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 1 ))||new_error){ if(qbevent){evnt(10999);if(r)goto S_13515;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Number required for sub",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(10999);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(10999);}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(11000);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11000);}while(r); } } S_13523:; if (((*__LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(11005);if(r)goto S_13523;} do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_SOURCETYP,&(pass1604= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11006);}while(r); S_13525:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11007);if(r)goto S_13525;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11007);}while(r); } } S_13529:; if ((-(*__LONG_EXPLICITREFERENCE== 0 ))||new_error){ if(qbevent){evnt(11010);if(r)goto S_13529;} S_13530:; if ((*__LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(11011);if(r)goto S_13530;} do{ *__LONG_NTH=*__LONG_I; if(!qbevent)break;evnt(11012);}while(r); S_13532:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_QB64PREFIX_SET&(qbs_equal(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("_MEM",4)))))||new_error){ if(qbevent){evnt(11013);if(r)goto S_13532;} do{ qbs_set(__STRING_X,qbs_add(qbs_add(qbs_new_txt_len("'",1),func_mid(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)), 2 ,NULL,0)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11014);}while(r); }else{ 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(11016);}while(r); } S_13537:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 1 ))||new_error){ if(qbevent){evnt(11018);if(r)goto S_13537;} 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(11018);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11018);}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(11019);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11019);}while(r); } }else{ S_13545:; if ((*__LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(11022);if(r)goto S_13545;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Number required for sub",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11022);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11022);}while(r); } } S_13550:; if (((*__LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(11026);if(r)goto S_13550;} S_13551:; if ((-((*__LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(11027);if(r)goto S_13551;} do{ *__LONG_BITS=*__LONG_TARGETTYP& 511 ; if(!qbevent)break;evnt(11029);}while(r); S_13553:; if ((-(*__LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(11030);if(r)goto S_13553;} 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(11030);}while(r); } S_13556:; if (((-(*__LONG_BITS> 16 ))&(-(*__LONG_BITS< 32 )))||new_error){ if(qbevent){evnt(11031);if(r)goto S_13556;} 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(11031);}while(r); } S_13559:; if ((-(*__LONG_BITS>= 32 ))||new_error){ if(qbevent){evnt(11032);if(r)goto S_13559;} 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(11032);}while(r); } } } S_13564:; if (((*__LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(11036);if(r)goto S_13564;} S_13565:; if (((*__LONG_TARGETTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(11037);if(r)goto S_13565;} do{ goto LABEL_SETE; if(!qbevent)break;evnt(11037);}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(11038);}while(r); S_13569:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11039);if(r)goto S_13569;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11039);}while(r); } do{ qbs_set(__STRING_V,qbs_add(qbs_new_txt_len("pass",4),FUNC_STR2(&(pass1605=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11040);}while(r); S_13573:; 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(11042);if(r)goto S_13573;} do{ *__LONG_BYTESREQ=((*__LONG_TARGETTYP& 511 )+ 7 )/ 8 ; if(!qbevent)break;evnt(11043);}while(r); do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_add(__STRING_T,qbs_new_txt_len(" *",2)),__STRING_V),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11044);}while(r); do{ SUB_WRITEBUFLINE(&(pass1606=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),__STRING_V),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11045);}while(r); do{ SUB_WRITEBUFLINE(&(pass1607=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(__LONG_BYTESREQ)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11046);}while(r); do{ SUB_WRITEBUFLINE(&(pass1608=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(__STRING_V,qbs_new_txt_len("=(",2)),__STRING_T),qbs_new_txt_len("*)(dblock+cmem_sp);",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11047);}while(r); do{ SUB_WRITEBUFLINE(&(pass1609=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_spchr",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11080);}while(r); } S_13605:; 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(11083);if(r)goto S_13605;} do{ qbs_set(__STRING_E,qbs_new_txt_len("NULL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11083);}while(r); } } S_13609:; if ((-(*__LONG_I!= 1 ))||new_error){ if(qbevent){evnt(11087);if(r)goto S_13609;} do{ qbs_set(__STRING_SUBCALL,qbs_add(__STRING_SUBCALL,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11087);}while(r); } do{ qbs_set(__STRING_SUBCALL,qbs_add(__STRING_SUBCALL,__STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11088);}while(r); fornext_continue_1576:; } fornext_exit_1576:; 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(11092);}while(r); S_13615:; while((qbs_cleanup(qbs_tmp_base,__STRING_X->len))||new_error){ if(qbevent){evnt(11093);if(r)goto S_13615;} do{ *__LONG_X=qbs_asc(__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11094);}while(r); S_13617:; if ((*__LONG_X)||new_error){ if(qbevent){evnt(11095);if(r)goto S_13617;} do{ qbs_set(__STRING_X2,func_mid(__STRING_X, 2 ,*__LONG_X,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11096);}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(11097);}while(r); do{ *__LONG_S= 0 ; if(!qbevent)break;evnt(11099);}while(r); do{ *__LONG_AN= 0 ; if(!qbevent)break;evnt(11100);}while(r); do{ qbs_set(__STRING_X3,qbs_right(__STRING_L, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11101);}while(r); S_13623:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP)))||new_error){ if(qbevent){evnt(11102);if(r)goto S_13623;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(11102);}while(r); } S_13626:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X3,__STRING1_SP2)))||new_error){ if(qbevent){evnt(11103);if(r)goto S_13626;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(11104);}while(r); S_13628:; 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(11105);if(r)goto S_13628;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(11105);}while(r); } }else{ S_13632:; 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(11108);if(r)goto S_13632;} do{ *__LONG_AN= 1 ; if(!qbevent)break;evnt(11108);}while(r); } } do{ *__LONG_S1=*__LONG_S; if(!qbevent)break;evnt(11111);}while(r); S_13637:; 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(11113);if(r)goto S_13637;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(11114);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11115);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(11116);}while(r); } S_13642:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(11119);if(r)goto S_13642;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(11120);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11121);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(11122);}while(r); } S_13647:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(11125);if(r)goto S_13647;} do{ *__LONG_S= 1 ; if(!qbevent)break;evnt(11126);}while(r); do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11127);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(11128);}while(r); } S_13652:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(11131);if(r)goto S_13652;} do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11131);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(11131);}while(r); } S_13656:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X,func_chr( 0 ))))||new_error){ if(qbevent){evnt(11133);if(r)goto S_13656;} S_13657:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_X2,qbs_new_txt_len("STEP",4))))||new_error){ if(qbevent){evnt(11134);if(r)goto S_13657;} do{ qbs_set(__STRING_X2,qbs_add(FUNC_SCASE(qbs_new_txt_len("Step",4)),__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11134);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(11134);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11135);}while(r); do{ goto LABEL_CUSTOMLAYCHAR2; if(!qbevent)break;evnt(11135);}while(r); } do{ qbs_set(__STRING_X2,qbs_add(__STRING_X2,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11139);}while(r); LABEL_CUSTOMLAYCHAR2:; if(qbevent){evnt(11140);r=0;} S_13665:; if ((-(*__LONG_S== 0 ))||new_error){ if(qbevent){evnt(11141);if(r)goto S_13665;} do{ *__LONG_S= 2 ; if(!qbevent)break;evnt(11141);}while(r); } S_13668:; if ((-(*__LONG_S!=*__LONG_S1))||new_error){ if(qbevent){evnt(11142);if(r)goto S_13668;} S_13669:; if ((*__LONG_S1)||new_error){ if(qbevent){evnt(11143);if(r)goto S_13669;} do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11143);}while(r); } S_13672:; if ((-(*__LONG_S== 1 ))||new_error){ if(qbevent){evnt(11144);if(r)goto S_13672;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11144);}while(r); } S_13675:; if ((-(*__LONG_S== 2 ))||new_error){ if(qbevent){evnt(11145);if(r)goto S_13675;} do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING1_SP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11145);}while(r); } } do{ qbs_set(__STRING_L,qbs_add(__STRING_L,__STRING_X2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11147);}while(r); }else{ do{ *__LONG_ADDLAYOUT= 0 ; if(!qbevent)break;evnt(11150);}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(11151);}while(r); } do{ *__LONG_ADDEDLAYOUT= 0 ; if(!qbevent)break;evnt(11153);}while(r); dl_continue_1613:; } dl_exit_1613:; S_13686:; if ((*__LONG_PASSEDNEEDED)||new_error){ if(qbevent){evnt(11161);if(r)goto S_13686;} 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(11162);}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(11164);}while(r); S_13690:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SLEEP",5))))||new_error){ if(qbevent){evnt(11166);if(r)goto S_13690;} S_13691:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(11167);if(r)goto S_13691;} do{ SUB_WRITEBUFLINE(&(pass1617=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= -4; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11168);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass1618=*__LONG_MAINTXTBUF),__STRING_SUBCALL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11172);}while(r); S_13696:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("SLEEP",5))))||new_error){ if(qbevent){evnt(11174);if(r)goto S_13696;} S_13697:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(11175);if(r)goto S_13697;} do{ SUB_WRITEBUFLINE(&(pass1619=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= -5; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11176);}while(r); } } do{ qbs_set(__STRING_SUBCALL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11180);}while(r); S_13702:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(11181);if(r)goto S_13702;} do{ SUB_WRITEBUFLINE(&(pass1620=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11181);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(11183);}while(r); do{ qbs_set(__STRING_X,qbs_right(__STRING_L, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11184);}while(r); S_13707:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_X,__STRING1_SP))|(qbs_equal(__STRING_X,__STRING1_SP2))))||new_error){ if(qbevent){evnt(11184);if(r)goto S_13707;} do{ qbs_set(__STRING_L,qbs_left(__STRING_L,__STRING_L->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11184);}while(r); } S_13710:; if ((-(*__LONG_USECALL== 1 ))||new_error){ if(qbevent){evnt(11185);if(r)goto S_13710;} 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(11185);}while(r); } S_13713:; if (( 0 )||new_error){ if(qbevent){evnt(11186);if(r)goto S_13713;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1622; 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 skip1622; skip1622: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11186);}while(r); } S_13716:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(11187);if(r)goto S_13716;} do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11187);}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(11187);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(11188);}while(r); } S_13723:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(11193);if(r)goto S_13723;} do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11194);}while(r); S_13725:; if ((-(*__LONG_N>= 2 ))||new_error){ if(qbevent){evnt(11194);if(r)goto S_13725;} do{ qbs_set(__STRING_FINDIDSECONDARG,FUNC_GETELEMENT(__STRING_A,&(pass1624= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11194);}while(r); } do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(11195);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_FIRSTELEMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11196);}while(r); S_13730:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11197);if(r)goto S_13730;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11197);}while(r); } }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(11199);}while(r); } dl_continue_1453:; } dl_exit_1453:; } LABEL_NOTSUBCALL:; if(qbevent){evnt(11205);r=0;} S_13738:; if ((-(*__LONG_N>= 1 ))||new_error){ if(qbevent){evnt(11207);if(r)goto S_13738;} S_13739:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_FIRSTELEMENT,qbs_new_txt_len("LET",3))))||new_error){ if(qbevent){evnt(11208);if(r)goto S_13739;} S_13740:; if ((-(*__LONG_N== 1 ))||new_error){ if(qbevent){evnt(11209);if(r)goto S_13740;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error - Reference: LET variable = expression (tip: LET is entirely optional)",83)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11209);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11209);}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(11210);}while(r); do{ *__LONG_N=*__LONG_N- 1 ; if(!qbevent)break;evnt(11211);}while(r); do{ qbs_set(__STRING_L,FUNC_SCASE(qbs_new_txt_len("Let",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11212);}while(r); S_13747:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(11213);if(r)goto S_13747;} 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(11213);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11213);}while(r); } do{ goto LABEL_LETUSED; if(!qbevent)break;evnt(11215);}while(r); } } S_13755:; if ((-(*__LONG_N>= 3 ))||new_error){ if(qbevent){evnt(11220);if(r)goto S_13755;} S_13756:; 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(11221);if(r)goto S_13756;} LABEL_LETUSED:; if(qbevent){evnt(11222);r=0;} do{ SUB_ASSIGN(__STRING_CA,__LONG_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11223);}while(r); S_13758:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11224);if(r)goto S_13758;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11224);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(11225);}while(r); S_13762:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_LAYOUT->len== 0 )))||new_error){ if(qbevent){evnt(11226);if(r)goto S_13762;} do{ qbs_set(__STRING_LAYOUT,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11226);}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(11226);}while(r); } do{ goto LABEL_FINISHEDLINE; if(!qbevent)break;evnt(11227);}while(r); } } S_13770:; 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(11230);if(r)goto S_13770;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Expected ... = expression",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11230);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11230);}while(r); } do{ qbs_set(__STRING_A,qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11233);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11233);}while(r); LABEL_FINISHEDLINE:; if(qbevent){evnt(11235);r=0;} do{ *__LONG_THENGOTO= 0 ; if(!qbevent)break;evnt(11236);}while(r); LABEL_FINISHEDLINE2:; if(qbevent){evnt(11237);r=0;} S_13777:; if ((*__BYTE_INPUTFUNCTIONCALLED)||new_error){ if(qbevent){evnt(11239);if(r)goto S_13777;} do{ *__BYTE_INPUTFUNCTIONCALLED= 0 ; if(!qbevent)break;evnt(11240);}while(r); S_13779:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(11241);if(r)goto S_13779;} do{ SUB_WRITEBUFLINE(&(pass1628=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= -5; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11242);}while(r); } } S_13783:; if ((-(*__INTEGER_ARRAYPROCESSINGHAPPENED== 1 ))||new_error){ if(qbevent){evnt(11246);if(r)goto S_13783;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(11246);}while(r); } do{ qbs_set(__STRING_INCLINENUMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11248);}while(r); S_13787:; if ((((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])])||new_error){ if(qbevent){evnt(11249);if(r)goto S_13787;} do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_new_txt_len(",",1),FUNC_STR2((&(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11250);}while(r); do{ qbs_set(__STRING_THISINCNAME,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(11251);}while(r); do{ qbs_set(__STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),__STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11252);}while(r); do{ qbs_set(__STRING_INCLINENUMP,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_INCLINENUMP,qbs_new_txt_len(",",1)),func_chr( 34 )),__STRING_THISINCNAME),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11253);}while(r); } S_13793:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(11255);if(r)goto S_13793;} S_13794:; if ((*__LONG_VWATCHON&(-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 )))||new_error){ if(qbevent){evnt(11256);if(r)goto S_13794;} do{ qbs_set(__STRING_TEMP,__STRING_VWATCHERRORCALL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11256);}while(r); }else{ do{ qbs_set(__STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11256);}while(r); } S_13799:; if ((*__LONG_DYNSCOPE)||new_error){ if(qbevent){evnt(11257);if(r)goto S_13799;} do{ *__LONG_DYNSCOPE= 0 ; if(!qbevent)break;evnt(11258);}while(r); do{ SUB_WRITEBUFLINE(&(pass1630=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(qbevent){",12),__STRING_TEMP),qbs_new_txt_len("evnt(",5)),FUNC_STR2(__LONG_LINENUMBER)),__STRING_INCLINENUMP),qbs_new_txt_len(");if(r)goto S_",14)),FUNC_STR2(__LONG_STATEMENTN)),qbs_new_txt_len(";}",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11259);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1631=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("if(!qbevent)break;",18),__STRING_TEMP),qbs_new_txt_len("evnt(",5)),FUNC_STR2(__LONG_LINENUMBER)),__STRING_INCLINENUMP),qbs_new_txt_len(");}while(r);",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11261);}while(r); } } LABEL_FINISHEDNONEXEC:; if(qbevent){evnt(11265);r=0;} do{ *__LONG_FIRSTLINE= 0 ; if(!qbevent)break;evnt(11267);}while(r); S_13807:; if ((-(*__LONG_LAYOUTDONE== 0 ))||new_error){ if(qbevent){evnt(11269);if(r)goto S_13807;} do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(11269);}while(r); } S_13810:; if ((-(*__LONG_CONTINUELINEFROM== 0 ))||new_error){ if(qbevent){evnt(11271);if(r)goto S_13810;} S_13811:; if ((qbs_cleanup(qbs_tmp_base,__STRING_ADDMETAINCLUDE->len))||new_error){ if(qbevent){evnt(11274);if(r)goto S_13811;} S_13812:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(11276);if(r)goto S_13812;} do{ qbs_set(__STRING_LAYOUTCOMMENT_BACKUP,__STRING_LAYOUTCOMMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11278);}while(r); do{ *__LONG_LAYOUTOK_BACKUP=*__LONG_LAYOUTOK; if(!qbevent)break;evnt(11279);}while(r); do{ qbs_set(__STRING_LAYOUT_BACKUP,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11280);}while(r); } do{ qbs_set(__STRING_A,__STRING_ADDMETAINCLUDE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11283);}while(r); do{ qbs_set(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11283);}while(r); S_13819:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(11285);if(r)goto S_13819;} do{ *__LONG_INCLUDINGFROMROOT= 0 ; if(!qbevent)break;evnt(11286);}while(r); do{ *__LONG_FORCEINCLUDINGFILE= 0 ; if(!qbevent)break;evnt(11287);}while(r); LABEL_FORCEINCLUDE:; if(qbevent){evnt(11288);r=0;} S_13822:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(11289);if(r)goto S_13822;} do{ qbs_set(__STRING_A,__STRING_FORCEINCLUDEFROMROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11290);}while(r); do{ qbs_set(__STRING_FORCEINCLUDEFROMROOT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11291);}while(r); do{ *__LONG_FORCEINCLUDINGFILE= 1 ; if(!qbevent)break;evnt(11292);}while(r); do{ *__LONG_INCLUDINGFROMROOT= 1 ; if(!qbevent)break;evnt(11293);}while(r); } } S_13829:; if ((-(*__LONG_INCLEVEL== 100 ))||new_error){ if(qbevent){evnt(11297);if(r)goto S_13829;} 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(11297);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11297);}while(r); } do{ *__LONG_FH= 99 +*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(11299);}while(r); do{ *__LONG_FIRSTTRYMETHOD= 1 ; if(!qbevent)break;evnt(11301);}while(r); S_13835:; if (((-(*__LONG_INCLUDINGFROMROOT!= 0 ))&(-(*__LONG_INCLEVEL== 0 )))||new_error){ if(qbevent){evnt(11302);if(r)goto S_13835;} do{ *__LONG_FIRSTTRYMETHOD= 2 ; if(!qbevent)break;evnt(11302);}while(r); } S_13838:; fornext_value1634=*__LONG_FIRSTTRYMETHOD; fornext_finalvalue1634= 2 ; fornext_step1634= 1 ; if (fornext_step1634<0) fornext_step_negative1634=1; else fornext_step_negative1634=0; if (new_error) goto fornext_error1634; goto fornext_entrylabel1634; while(1){ fornext_value1634=fornext_step1634+(*__LONG_TRY); fornext_entrylabel1634: *__LONG_TRY=fornext_value1634; if (fornext_step_negative1634){ if (fornext_value1634fornext_finalvalue1634) break; } fornext_error1634:; if(qbevent){evnt(11303);if(r)goto S_13838;} S_13839:; if ((-(*__LONG_TRY== 1 ))||new_error){ if(qbevent){evnt(11304);if(r)goto S_13839;} S_13840:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(11305);if(r)goto S_13840;} S_13841:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11306);if(r)goto S_13841;} do{ qbs_set(__STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11306);}while(r); }else{ do{ qbs_set(__STRING_P,FUNC_GETFILEPATH(__STRING_SOURCEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11306);}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(11308);}while(r); } do{ qbs_set(__STRING_F,qbs_add(__STRING_P,__STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11310);}while(r); } S_13851:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(11312);if(r)goto S_13851;} do{ qbs_set(__STRING_F,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11312);}while(r); } S_13854:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(__STRING_F)))||new_error){ if(qbevent){evnt(11313);if(r)goto S_13854;} do{ *__INTEGER_QBERRORHAPPENED= -2 ; if(!qbevent)break;evnt(11314);}while(r); do{ sub_open(__STRING_F, 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11315);}while(r); LABEL_QBERRORHAPPENED2:; if(qbevent){evnt(11316);r=0;} S_13857:; if ((-(*__INTEGER_QBERRORHAPPENED== -2 ))||new_error){ if(qbevent){evnt(11317);if(r)goto S_13857;} do{ goto fornext_exit_1633; if(!qbevent)break;evnt(11317);}while(r); } } do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(11319);}while(r); fornext_continue_1633:; } fornext_exit_1633:; S_13863:; if ((-(*__INTEGER_QBERRORHAPPENED!= -2 ))||new_error){ if(qbevent){evnt(11321);if(r)goto S_13863;} do{ *__INTEGER_QBERRORHAPPENED= 0 ; if(!qbevent)break;evnt(11321);}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(11321);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11321);}while(r); } do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL+ 1 ; if(!qbevent)break;evnt(11322);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11322);}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(11322);}while(r); } S_13872:; while((*__LONG_INCLEVEL)||new_error){ if(qbevent){evnt(11325);if(r)goto S_13872;} do{ *__LONG_FH= 99 +*__LONG_INCLEVEL; if(!qbevent)break;evnt(11326);}while(r); S_13874:; if ((-(func_eof(*__LONG_FH)== 0 ))||new_error){ if(qbevent){evnt(11328);if(r)goto S_13874;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1636; sub_file_line_input_string(tmp_fileno,__STRING_X); if (new_error) goto skip1636; skip1636: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11329);}while(r); do{ qbs_set(__STRING_A3,__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11330);}while(r); do{ *__LONG_CONTINUELINEFROM= 0 ; if(!qbevent)break;evnt(11331);}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(11332);}while(r); do{ *__LONG_ERRORLINEININCLUDE=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]; if(!qbevent)break;evnt(11334);}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(11335);}while(r); S_13881:; if ((-(*__LONG_INCLEVEL> 1 ))||new_error){ if(qbevent){evnt(11336);if(r)goto S_13881;} 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(11337);}while(r); S_13883:; fornext_value1638= 1 ; fornext_finalvalue1638=*__LONG_INCLEVEL- 1 ; fornext_step1638= 1 ; if (fornext_step1638<0) fornext_step_negative1638=1; else fornext_step_negative1638=0; if (new_error) goto fornext_error1638; goto fornext_entrylabel1638; while(1){ fornext_value1638=fornext_step1638+(*__LONG_X); fornext_entrylabel1638: *__LONG_X=fornext_value1638; if (fornext_step_negative1638){ if (fornext_value1638fornext_finalvalue1638) break; } fornext_error1638:; if(qbevent){evnt(11338);if(r)goto S_13883;} 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(11339);}while(r); S_13885:; if ((-(*__LONG_X<(*__LONG_INCLEVEL- 1 )))||new_error){ if(qbevent){evnt(11340);if(r)goto S_13885;} S_13886:; if ((-(*__LONG_X==(*__LONG_INCLEVEL- 2 )))||new_error){ if(qbevent){evnt(11341);if(r)goto S_13886;} 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(11342);}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(11344);}while(r); } } fornext_continue_1637:; } fornext_exit_1637:; do{ qbs_set(__STRING_E,qbs_add(__STRING_E,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11348);}while(r); } do{ qbs_set(__STRING_INCERROR,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11350);}while(r); do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER- 1 ; if(!qbevent)break;evnt(11351);}while(r); S_13897:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11352);if(r)goto S_13897;} do{ qbs_set(__STRING_SENDC,qbs_add(func_chr( 10 ),__STRING_A3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11352);}while(r); do{ goto LABEL_SENDCOMMAND; if(!qbevent)break;evnt(11352);}while(r); } do{ goto LABEL_INCLUDELINE; if(!qbevent)break;evnt(11353);}while(r); } do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(11356);}while(r); do{ *__LONG_INCLEVEL=*__LONG_INCLEVEL- 1 ; if(!qbevent)break;evnt(11357);}while(r); S_13905:; if ((-(*__LONG_INCLEVEL== 0 ))||new_error){ if(qbevent){evnt(11358);if(r)goto S_13905;} S_13906:; if ((-(*__LONG_FORCEINCLUDINGFILE== 1 ))||new_error){ if(qbevent){evnt(11359);if(r)goto S_13906;} do{ *__LONG_FORCEINCLUDINGFILE= 0 ; if(!qbevent)break;evnt(11360);}while(r); do{ goto LABEL_FORCEINCLUDECOMPLETED; if(!qbevent)break;evnt(11361);}while(r); } do{ *__LONG_LAYOUTOK=*__LONG_LAYOUTOK_BACKUP; if(!qbevent)break;evnt(11364);}while(r); do{ qbs_set(__STRING_LAYOUT,__STRING_LAYOUT_BACKUP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11365);}while(r); do{ qbs_set(__STRING_LAYOUTCOMMENT,__STRING_LAYOUTCOMMENT_BACKUP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11366);}while(r); } dl_continue_1635:; } dl_exit_1635:; } S_13916:; if (( 0 )||new_error){ if(qbevent){evnt(11376);if(r)goto S_13916;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1639; sub_file_print(tmp_fileno,qbs_new_txt_len("[layout check]",14), 0, 0, 1); if (new_error) goto skip1639; skip1639: 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= 9 ; if (new_error) goto skip1640; 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 skip1640; skip1640: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11378);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1641; 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 skip1641; skip1641: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11379);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1642; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_LAYOUTOK)), 1, 0, 1); if (new_error) goto skip1642; skip1642: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11380);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1643; sub_file_print(tmp_fileno,qbs_new_txt_len("[end layout check]",18), 0, 0, 1); if (new_error) goto skip1643; skip1643: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11381);}while(r); } S_13923:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11387);if(r)goto S_13923;} S_13924:; if ((-(*__LONG_CONTINUELINEFROM!= 0 ))||new_error){ if(qbevent){evnt(11388);if(r)goto S_13924;} do{ goto LABEL_IDE4; if(!qbevent)break;evnt(11388);}while(r); } S_13927:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUTCOMMENT->len))||new_error){ if(qbevent){evnt(11390);if(r)goto S_13927;} S_13928:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(11391);if(r)goto S_13928;} 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(11391);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,__STRING_LAYOUTCOMMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11391);}while(r); } } S_13934:; if ((-(*__LONG_LAYOUTOK== 0 ))||new_error){ if(qbevent){evnt(11394);if(r)goto S_13934;} do{ qbs_set(__STRING_LAYOUT,__STRING_LAYOUTORIGINAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11395);}while(r); }else{ do{ *__LONG_I=func_instr(NULL,__STRING_LAYOUT,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11400);}while(r); S_13938:; while((*__LONG_I)||new_error){ if(qbevent){evnt(11401);if(r)goto S_13938;} 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(11402);}while(r); do{ *__LONG_I=func_instr(NULL,__STRING_LAYOUT,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11403);}while(r); dl_continue_1646:; } dl_exit_1646:; } do{ *__LONG_X=*__LONG_LHSCONTROLLEVEL; if(!qbevent)break;evnt(11407);}while(r); S_13944:; if ((-(*__INTEGER_CONTROLLEVEL<*__LONG_LHSCONTROLLEVEL))||new_error){ if(qbevent){evnt(11407);if(r)goto S_13944;} do{ *__LONG_X=*__INTEGER_CONTROLLEVEL; if(!qbevent)break;evnt(11407);}while(r); } S_13947:; if ((-(*__LONG_DEFININGTYPE== 2 ))||new_error){ if(qbevent){evnt(11408);if(r)goto S_13947;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(11408);}while(r); } S_13950:; if ((-(*__LONG_DEFININGTYPE> 0 ))||new_error){ if(qbevent){evnt(11409);if(r)goto S_13950;} do{ *__LONG_DEFININGTYPE= 2 ; if(!qbevent)break;evnt(11409);}while(r); } S_13953:; if ((-(*__LONG_DECLARINGLIBRARY== 2 ))||new_error){ if(qbevent){evnt(11410);if(r)goto S_13953;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(11410);}while(r); } S_13956:; if ((-(*__LONG_DECLARINGLIBRARY> 0 ))||new_error){ if(qbevent){evnt(11411);if(r)goto S_13956;} do{ *__LONG_DECLARINGLIBRARY= 2 ; if(!qbevent)break;evnt(11411);}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(11412);}while(r); S_13960:; if ((*__LONG_LINECONTINUATION)||new_error){ if(qbevent){evnt(11413);if(r)goto S_13960;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11413);}while(r); } do{ goto LABEL_IDERET4; if(!qbevent)break;evnt(11415);}while(r); } LABEL_SKIPIDE4:; if(qbevent){evnt(11419);r=0;} dl_continue_330:; }while(1); dl_exit_330:; S_13966:; if ((-(*__LONG_LASTLINERETURN== 0 ))||new_error){ if(qbevent){evnt(11423);if(r)goto S_13966;} do{ *__LONG_LASTLINERETURN= 1 ; if(!qbevent)break;evnt(11424);}while(r); do{ *__LONG_LASTLINE= 1 ; if(!qbevent)break;evnt(11425);}while(r); do{ qbs_set(__STRING_WHOLELINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11426);}while(r); do{ goto LABEL_MAINPASSLASTLINE; if(!qbevent)break;evnt(11427);}while(r); } LABEL_IDE5:; if(qbevent){evnt(11430);r=0;} do{ *__LONG_LINENUMBER= 0 ; if(!qbevent)break;evnt(11431);}while(r); S_13973:; if ((-(*__INTEGER_CLOSEDMAIN== 0 ))||new_error){ if(qbevent){evnt(11433);if(r)goto S_13973;} do{ SUB_CLOSEMAIN(); if(!qbevent)break;evnt(11433);}while(r); } S_13976:; if ((*__LONG_DEFININGTYPE)||new_error){ if(qbevent){evnt(11435);if(r)goto S_13976;} do{ *__LONG_LINENUMBER=*__LONG_DEFININGTYPEERROR; if(!qbevent)break;evnt(11435);}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(11435);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11435);}while(r); } S_13981:; if ((*__INTEGER_CONTROLLEVEL)||new_error){ if(qbevent){evnt(11438);if(r)goto S_13981;} do{ qbs_set(__STRING_A,qbs_new_txt_len("Unidentified open control block",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11439);}while(r); S_13983:; sc_1649=((int16*)(__ARRAY_INTEGER_CONTROLTYPE[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_INTEGER_CONTROLTYPE[4],__ARRAY_INTEGER_CONTROLTYPE[5])]; if(qbevent){evnt(11440);if(r)goto S_13983;} S_13984:; if (((sc_1649==( 1 )))||new_error){ if(qbevent){evnt(11441);if(r)goto S_13984;} do{ qbs_set(__STRING_A,qbs_new_txt_len("IF without END IF",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11441);}while(r); sc_ec_31_end:; goto sc_1649_end; } S_13986:; if (((sc_1649==( 2 )))||new_error){ if(qbevent){evnt(11442);if(r)goto S_13986;} do{ qbs_set(__STRING_A,qbs_new_txt_len("FOR without NEXT",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11442);}while(r); sc_ec_32_end:; goto sc_1649_end; } S_13988:; if (((sc_1649==( 3 ))||(sc_1649==( 4 )))||new_error){ if(qbevent){evnt(11443);if(r)goto S_13988;} do{ qbs_set(__STRING_A,qbs_new_txt_len("DO without LOOP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11443);}while(r); sc_ec_33_end:; goto sc_1649_end; } S_13990:; if (((sc_1649==( 5 )))||new_error){ if(qbevent){evnt(11444);if(r)goto S_13990;} do{ qbs_set(__STRING_A,qbs_new_txt_len("WHILE without WEND",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11444);}while(r); sc_ec_34_end:; goto sc_1649_end; } S_13992:; if (((sc_1649==( 6 )))||new_error){ if(qbevent){evnt(11445);if(r)goto S_13992;} do{ qbs_set(__STRING_A,qbs_new_txt_len("$IF without $END IF",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11445);}while(r); sc_ec_35_end:; goto sc_1649_end; } S_13994:; if ((((sc_1649>=( 10 ))&&(sc_1649<=( 19 ))))||new_error){ if(qbevent){evnt(11446);if(r)goto S_13994;} 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(11446);}while(r); sc_ec_36_end:; goto sc_1649_end; } S_13996:; if (((sc_1649==( 32 )))||new_error){ if(qbevent){evnt(11447);if(r)goto S_13996;} 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(11447);}while(r); sc_ec_37_end:; goto sc_1649_end; } sc_1649_end:; do{ *__LONG_LINENUMBER=((int32*)(__ARRAY_LONG_CONTROLREF[0]))[array_check((*__INTEGER_CONTROLLEVEL)-__ARRAY_LONG_CONTROLREF[4],__ARRAY_LONG_CONTROLREF[5])]; if(!qbevent)break;evnt(11449);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11450);}while(r); } S_14002:; if ((-(*__LONG_IDEINDENTSUBS== 0 ))||new_error){ if(qbevent){evnt(11453);if(r)goto S_14002;} S_14003:; if ((qbs_cleanup(qbs_tmp_base,__STRING_SUBFUNC->len))||new_error){ if(qbevent){evnt(11454);if(r)goto S_14003;} 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(11454);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11454);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass1651=*__LONG_ERRTXTBUF),qbs_new_txt_len("exit(99);",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11458);}while(r); do{ SUB_WRITEBUFLINE(&(pass1652=*__LONG_ERRTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11459);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("clear.txt",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11462);}while(r); S_14011:; fornext_value1654= 1 ; fornext_finalvalue1654=*__LONG_IDN; fornext_step1654= 1 ; if (fornext_step1654<0) fornext_step_negative1654=1; else fornext_step_negative1654=0; if (new_error) goto fornext_error1654; goto fornext_entrylabel1654; while(1){ fornext_value1654=fornext_step1654+(*__LONG_I); fornext_entrylabel1654: *__LONG_I=fornext_value1654; if (fornext_step_negative1654){ if (fornext_value1654fornext_finalvalue1654) break; } fornext_error1654:; if(qbevent){evnt(11464);if(r)goto S_14011;} S_14012:; if ((*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2853)))||new_error){ if(qbevent){evnt(11466);if(r)goto S_14012;} 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]))*2869+2385)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11467);}while(r); do{ goto LABEL_CLEARSTATICSCOPE; if(!qbevent)break;evnt(11468);}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]))*2869+2385)),256,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11471);}while(r); S_14017:; if (((-(*__LONG_A== 0 ))|(-(*__LONG_A== 32 )))||new_error){ if(qbevent){evnt(11472);if(r)goto S_14017;} do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11473);}while(r); LABEL_CLEARSTATICSCOPE:; if(qbevent){evnt(11474);r=0;} S_14019:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+512)))||new_error){ if(qbevent){evnt(11476);if(r)goto S_14019;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(11477);}while(r); S_14021:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11478);if(r)goto S_14021;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11478);}while(r); } S_14024:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))== -1 ))||new_error){ if(qbevent){evnt(11479);if(r)goto S_14024;} do{ goto LABEL_CLEARERASERETURNED; if(!qbevent)break;evnt(11479);}while(r); } S_14027:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_VWATCHVARIABLEEXCLUSIONS,qbs_add(qbs_add(qbs_new_txt_len("@",1),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1))),qbs_new_txt_len("@",1)),0)> 0 )))||new_error){ if(qbevent){evnt(11480);if(r)goto S_14027;} do{ goto LABEL_CLEARERASERETURNED; if(!qbevent)break;evnt(11481);}while(r); } do{ *__LONG_CLEARERASERETURN= 1 ; if(!qbevent)break;evnt(11483);}while(r); do{ goto LABEL_CLEARERASE; if(!qbevent)break;evnt(11483);}while(r); } S_14033:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+536)))||new_error){ if(qbevent){evnt(11486);if(r)goto S_14033;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(11487);}while(r); S_14035:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11488);if(r)goto S_14035;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11488);}while(r); } do{ qbs_set(__STRING_BYTES,FUNC_VARIABLESIZE(&(pass1655= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11489);}while(r); S_14039:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11490);if(r)goto S_14039;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11490);}while(r); } do{ *__LONG_TYP=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(11492);}while(r); S_14043:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(11493);if(r)goto S_14043;} 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(&(pass1656=*__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(11494);}while(r); }else{ do{ qbs_set(__STRING_E,FUNC_STR2(__LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11496);}while(r); } do{ qbs_set(__STRING_E,FUNC_REFER(__STRING_E,__LONG_TYP,&(pass1657= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11498);}while(r); S_14049:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11499);if(r)goto S_14049;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11499);}while(r); } S_14052:; if ((*__LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(11500);if(r)goto S_14052;} S_14053:; if ((*__LONG_TYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(11501);if(r)goto S_14053;} do{ SUB_WRITEBUFLINE(&(pass1658=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11502);}while(r); do{ goto LABEL_CLEARED; if(!qbevent)break;evnt(11503);}while(r); }else{ S_14057:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,__STRING_VWATCHVARIABLEEXCLUSIONS,qbs_add(qbs_add(qbs_new_txt_len("@",1),__STRING_E),qbs_new_txt_len("@",1)),0)== 0 ))&(qbs_notequal(qbs_left(__STRING_E, 12 ),qbs_new_txt_len("_SUB_VWATCH_",12)))))||new_error){ if(qbevent){evnt(11505);if(r)goto S_14057;} do{ SUB_WRITEBUFLINE(&(pass1659=*__LONG_MAINTXTBUF),qbs_add(__STRING_E,qbs_new_txt_len("->len=0;",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11506);}while(r); } do{ goto LABEL_CLEARED; if(!qbevent)break;evnt(11508);}while(r); } } S_14063:; if ((*__LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(11511);if(r)goto S_14063;} S_14064:; if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*__LONG_TYP& 511 )-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||new_error){ if(qbevent){evnt(11512);if(r)goto S_14064;} do{ SUB_CLEAR_UDT_WITH_VARSTRINGS(__STRING_E,&(pass1660=*__LONG_TYP& 511 ),__LONG_MAINTXTBUF,&(pass1661= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11514);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1662=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11516);}while(r); } }else{ S_14070:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,__STRING_VWATCHVARIABLEEXCLUSIONS,qbs_add(qbs_add(qbs_new_txt_len("@",1),__STRING_E),qbs_new_txt_len("@",1)),0)== 0 ))&(qbs_notequal(qbs_left(__STRING_E, 12 ),qbs_new_txt_len("_SUB_VWATCH_",12)))))||new_error){ if(qbevent){evnt(11519);if(r)goto S_14070;} do{ SUB_WRITEBUFLINE(&(pass1663=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*",1),__STRING_E),qbs_new_txt_len("=0;",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11520);}while(r); } } do{ goto LABEL_CLEARED; if(!qbevent)break;evnt(11523);}while(r); } } LABEL_CLEARED:; if(qbevent){evnt(11528);r=0;} LABEL_CLEARERASERETURNED:; if(qbevent){evnt(11529);r=0;} fornext_continue_1653:; } fornext_exit_1653:; S_14078:; if (( 0 )||new_error){ if(qbevent){evnt(11532);if(r)goto S_14078;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1664; sub_file_print(tmp_fileno,qbs_new_txt_len("finished making program!",24), 0, 0, 1); if (new_error) goto skip1664; skip1664: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11533);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1665; sub_file_print(tmp_fileno,qbs_new_txt_len("recompile=",10), 0, 0, 0); if (new_error) goto skip1665; sub_file_print(tmp_fileno,qbs_str((int16)(*__INTEGER_RECOMPILE)), 1, 0, 1); if (new_error) goto skip1665; skip1665: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11534);}while(r); } S_14082:; fornext_value1667= 1 ; fornext_finalvalue1667=*__LONG_IDN; fornext_step1667= 1 ; if (fornext_step1667<0) fornext_step_negative1667=1; else fornext_step_negative1667=0; if (new_error) goto fornext_error1667; goto fornext_entrylabel1667; while(1){ fornext_value1667=fornext_step1667+(*__LONG_I); fornext_entrylabel1667: *__LONG_I=fornext_value1667; if (fornext_step_negative1667){ if (fornext_value1667fornext_finalvalue1667) break; } fornext_error1667:; if(qbevent){evnt(11538);if(r)goto S_14082;} S_14083:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_I)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(11539);if(r)goto S_14083;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(11541);}while(r); S_14085:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11542);if(r)goto S_14085;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11542);}while(r); } S_14088:; if (( 0 )||new_error){ if(qbevent){evnt(11544);if(r)goto S_14088;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1668; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! checking:",30), 0, 0, 0); if (new_error) goto skip1668; sub_file_print(tmp_fileno,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,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(11544);}while(r); } S_14091:; if ((*(int32*)(((char*)__UDT_ID)+(2855)))||new_error){ if(qbevent){evnt(11546);if(r)goto S_14091;} S_14092:; if (( 0 )||new_error){ if(qbevent){evnt(11548);if(r)goto S_14092;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1669; 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 skip1669; skip1669: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11548);}while(r); } do{ *__LONG_I2=*(int32*)(((char*)__UDT_ID)+(2855)); if(!qbevent)break;evnt(11550);}while(r); do{ *__LONG_X=*(int16*)(((char*)__UDT_ID)+(2859)); if(!qbevent)break;evnt(11551);}while(r); S_14097:; if (( 0 )||new_error){ if(qbevent){evnt(11553);if(r)goto S_14097;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1670; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! values:",28), 0, 0, 0); if (new_error) goto skip1670; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I2)), 1, 0, 0); if (new_error) goto skip1670; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_X)), 1, 0, 1); if (new_error) goto skip1670; skip1670: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11553);}while(r); } S_14100:; 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(11556);if(r)goto S_14100;} 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(11557);}while(r); S_14102:; if (( 0 )||new_error){ if(qbevent){evnt(11560);if(r)goto S_14102;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1671; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling cmem sf! setting:",29), 0, 0, 0); if (new_error) goto skip1671; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I2)), 1, 0, 0); if (new_error) goto skip1671; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_X)), 1, 0, 1); if (new_error) goto skip1671; skip1671: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11560);}while(r); } do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(11563);}while(r); } } } fornext_continue_1666:; } fornext_exit_1666:; do{ *__LONG_UNRESOLVED= 0 ; if(!qbevent)break;evnt(11569);}while(r); S_14111:; fornext_value1673= 1 ; fornext_finalvalue1673=*__LONG_IDN; fornext_step1673= 1 ; if (fornext_step1673<0) fornext_step_negative1673=1; else fornext_step_negative1673=0; if (new_error) goto fornext_error1673; goto fornext_entrylabel1673; while(1){ fornext_value1673=fornext_step1673+(*__LONG_I); fornext_entrylabel1673: *__LONG_I=fornext_value1673; if (fornext_step_negative1673){ if (fornext_value1673fornext_finalvalue1673) break; } fornext_error1673:; if(qbevent){evnt(11570);if(r)goto S_14111;} do{ SUB_GETID(__LONG_I); if(!qbevent)break;evnt(11571);}while(r); S_14113:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11572);if(r)goto S_14113;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11572);}while(r); } S_14116:; if (( 0 )||new_error){ if(qbevent){evnt(11574);if(r)goto S_14116;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1674; sub_file_print(tmp_fileno,qbs_new_txt_len("checking id named:",18), 0, 0, 0); if (new_error) goto skip1674; sub_file_print(tmp_fileno,qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1), 0, 0, 1); if (new_error) goto skip1674; skip1674: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11574);}while(r); } S_14119:; if ((*(int16*)(((char*)__UDT_ID)+(544)))||new_error){ if(qbevent){evnt(11576);if(r)goto S_14119;} S_14120:; fornext_value1676= 1 ; fornext_finalvalue1676=*(int16*)(((char*)__UDT_ID)+(809)); fornext_step1676= 1 ; if (fornext_step1676<0) fornext_step_negative1676=1; else fornext_step_negative1676=0; if (new_error) goto fornext_error1676; goto fornext_entrylabel1676; while(1){ fornext_value1676=fornext_step1676+(*__LONG_I2); fornext_entrylabel1676: *__LONG_I2=fornext_value1676; if (fornext_step_negative1676){ if (fornext_value1676fornext_finalvalue1676) break; } fornext_error1676:; if(qbevent){evnt(11577);if(r)goto S_14120;} do{ *__LONG_T=string2l(func_mid(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),(*__LONG_I2* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11578);}while(r); S_14122:; if ((-(*__LONG_T> 0 ))||new_error){ if(qbevent){evnt(11579);if(r)goto S_14122;} S_14123:; if (((*__LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(11580);if(r)goto S_14123;} S_14124:; if (((*__LONG_T&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(11581);if(r)goto S_14124;} S_14125:; if (( 0 )||new_error){ if(qbevent){evnt(11583);if(r)goto S_14125;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1677; sub_file_print(tmp_fileno,qbs_new_txt_len("checking argument ",18), 0, 0, 0); if (new_error) goto skip1677; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_I2)), 1, 0, 0); if (new_error) goto skip1677; sub_file_print(tmp_fileno,qbs_new_txt_len(" of ",4), 0, 0, 0); if (new_error) goto skip1677; sub_file_print(tmp_fileno,qbs_str((int16)(*(int16*)(((char*)__UDT_ID)+(809)))), 1, 0, 1); if (new_error) goto skip1677; skip1677: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11583);}while(r); } do{ *__LONG_NELE=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID)+(2647)),100,1),*__LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11585);}while(r); do{ *__LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)__UDT_ID)+(2747)),100,1),*__LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11586);}while(r); S_14130:; if (( 0 )||new_error){ if(qbevent){evnt(11588);if(r)goto S_14130;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1678; sub_file_print(tmp_fileno,qbs_new_txt_len("nele=",5), 0, 0, 0); if (new_error) goto skip1678; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_NELE)), 1, 0, 1); if (new_error) goto skip1678; skip1678: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11588);}while(r); } S_14133:; if (( 0 )||new_error){ if(qbevent){evnt(11589);if(r)goto S_14133;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1679; sub_file_print(tmp_fileno,qbs_new_txt_len("nelereq=",8), 0, 0, 0); if (new_error) goto skip1679; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_NELEREQ)), 1, 0, 1); if (new_error) goto skip1679; skip1679: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11589);}while(r); } S_14136:; if ((-(*__LONG_NELE!=*__LONG_NELEREQ))||new_error){ if(qbevent){evnt(11591);if(r)goto S_14136;} S_14137:; if (( 0 )||new_error){ if(qbevent){evnt(11593);if(r)goto S_14137;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1680; sub_file_print(tmp_fileno,qbs_new_txt_len("mismatch detected!",18), 0, 0, 1); if (new_error) goto skip1680; skip1680: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11593);}while(r); } do{ *__LONG_UNRESOLVED=*__LONG_UNRESOLVED+ 1 ; if(!qbevent)break;evnt(11595);}while(r); do{ *__INTEGER_SFLISTN=*__INTEGER_SFLISTN+ 1 ; if(!qbevent)break;evnt(11596);}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(11597);}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(11598);}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(11599);}while(r); } } } } fornext_continue_1675:; } fornext_exit_1675:; } fornext_continue_1672:; } fornext_exit_1672:; S_14152:; if ((-(*__LONG_UNRESOLVED> 0 ))||new_error){ if(qbevent){evnt(11609);if(r)goto S_14152;} S_14153:; if ((-(*__LONG_LASTUNRESOLVED== -1 ))||new_error){ if(qbevent){evnt(11610);if(r)goto S_14153;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(11612);}while(r); S_14155:; if (( 0 )||new_error){ if(qbevent){evnt(11613);if(r)goto S_14155;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1681; sub_file_print(tmp_fileno,qbs_new_txt_len("recompiling to resolve array elements (first time)",50), 0, 0, 1); if (new_error) goto skip1681; skip1681: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11614);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1682; sub_file_print(tmp_fileno,qbs_new_txt_len("sflistn=",8), 0, 0, 0); if (new_error) goto skip1682; sub_file_print(tmp_fileno,qbs_str((int16)(*__INTEGER_SFLISTN)), 1, 0, 1); if (new_error) goto skip1682; skip1682: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11615);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1683; sub_file_print(tmp_fileno,qbs_new_txt_len("oldsflistn=",11), 0, 0, 0); if (new_error) goto skip1683; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_OLDSFLISTN)), 1, 0, 1); if (new_error) goto skip1683; skip1683: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11616);}while(r); } }else{ S_14161:; if ((-(*__LONG_UNRESOLVED<*__LONG_LASTUNRESOLVED))||new_error){ if(qbevent){evnt(11620);if(r)goto S_14161;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(11621);}while(r); S_14163:; if (( 0 )||new_error){ if(qbevent){evnt(11622);if(r)goto S_14163;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1684; 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 skip1684; skip1684: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11623);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1685; sub_file_print(tmp_fileno,qbs_new_txt_len("sflistn=",8), 0, 0, 0); if (new_error) goto skip1685; sub_file_print(tmp_fileno,qbs_str((int16)(*__INTEGER_SFLISTN)), 1, 0, 1); if (new_error) goto skip1685; skip1685: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11624);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1686; sub_file_print(tmp_fileno,qbs_new_txt_len("oldsflistn=",11), 0, 0, 0); if (new_error) goto skip1686; sub_file_print(tmp_fileno,qbs_str((int32)(*__LONG_OLDSFLISTN)), 1, 0, 1); if (new_error) goto skip1686; skip1686: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11625);}while(r); } } } } do{ *__LONG_LASTUNRESOLVED=*__LONG_UNRESOLVED; if(!qbevent)break;evnt(11630);}while(r); S_14172:; if (( 0 )||new_error){ if(qbevent){evnt(11656);if(r)goto S_14172;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1687; sub_file_print(tmp_fileno,qbs_new_txt_len("Beginning COMMON array list check...",36), 0, 0, 1); if (new_error) goto skip1687; skip1687: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11656);}while(r); } do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(11657);}while(r); S_14176:; fornext_value1689= 1 ; fornext_finalvalue1689=*__LONG_COMMONARRAYLISTN; fornext_step1689= 1 ; if (fornext_step1689<0) fornext_step_negative1689=1; else fornext_step_negative1689=0; if (new_error) goto fornext_error1689; goto fornext_entrylabel1689; while(1){ fornext_value1689=fornext_step1689+(*__LONG_X); fornext_entrylabel1689: *__LONG_X=fornext_value1689; if (fornext_step_negative1689){ if (fornext_value1689fornext_finalvalue1689) break; } fornext_error1689:; if(qbevent){evnt(11658);if(r)goto S_14176;} do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11659);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11659);}while(r); do{ qbs_set(__STRING_TYP,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11660);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11660);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11661);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11661);}while(r); do{ *__LONG_DIMSHARED2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11662);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11662);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11664);}while(r); S_14186:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11665);if(r)goto S_14186;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11665);}while(r); } S_14189:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(11666);if(r)goto S_14189;} do{ qbs_set(__STRING_VARNAME,qbs_add(__STRING_VARNAME,FUNC_TYPE2SYMBOL(__STRING_TYP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11666);}while(r); } S_14192:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11667);if(r)goto S_14192;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11667);}while(r); } S_14195:; if (( 0 )||new_error){ if(qbevent){evnt(11669);if(r)goto S_14195;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1690; 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 skip1690; skip1690: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11669);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11671);}while(r); S_14199:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11672);if(r)goto S_14199;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11672);}while(r); } S_14202:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(11673);if(r)goto S_14202;} S_14203:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(11674);if(r)goto S_14203;} do{ goto LABEL_FOUNDCOMMONARRAY2; if(!qbevent)break;evnt(11674);}while(r); } S_14206:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(11675);if(r)goto S_14206;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(11675);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11675);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(11675);}while(r); } S_14212:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11676);if(r)goto S_14212;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11676);}while(r); } dl_continue_1691:; } dl_exit_1691:; LABEL_FOUNDCOMMONARRAY2:; if(qbevent){evnt(11678);r=0;} S_14216:; if (( 0 )||new_error){ if(qbevent){evnt(11680);if(r)goto S_14216;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1692; 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 skip1692; skip1692: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11680);}while(r); } S_14219:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))== -1 ))||new_error){ if(qbevent){evnt(11682);if(r)goto S_14219;} S_14220:; if ((-(((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]!= 0 ))||new_error){ if(qbevent){evnt(11683);if(r)goto S_14220;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(11683);}while(r); } S_14223:; if (( 0 )||new_error){ if(qbevent){evnt(11684);if(r)goto S_14223;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1693; 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 skip1693; skip1693: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11684);}while(r); } } fornext_continue_1688:; } fornext_exit_1688:; S_14228:; if (( 0 )||new_error){ if(qbevent){evnt(11687);if(r)goto S_14228;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1694; sub_file_print(tmp_fileno,qbs_new_txt_len("Finished COMMON array list check!",33), 0, 0, 1); if (new_error) goto skip1694; skip1694: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11687);}while(r); } S_14231:; if ((-(*__LONG_VWATCHDESIREDSTATE!=*__LONG_VWATCHON))||new_error){ if(qbevent){evnt(11689);if(r)goto S_14231;} do{ *__LONG_VWATCHRECOMPILEATTEMPTS=*__LONG_VWATCHRECOMPILEATTEMPTS+ 1 ; if(!qbevent)break;evnt(11690);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(11691);}while(r); } S_14235:; if ((*__INTEGER_RECOMPILE)||new_error){ if(qbevent){evnt(11694);if(r)goto S_14235;} LABEL_DO_RECOMPILE:; if(qbevent){evnt(11695);r=0;} S_14236:; if (( 0 )||new_error){ if(qbevent){evnt(11696);if(r)goto S_14236;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1695; sub_file_print(tmp_fileno,qbs_new_txt_len("Recompile required!",19), 0, 0, 1); if (new_error) goto skip1695; skip1695: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11696);}while(r); } do{ *__INTEGER_RECOMPILE= 0 ; if(!qbevent)break;evnt(11697);}while(r); S_14240:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(11698);if(r)goto S_14240;} do{ *__LONG_IDERECOMPILE= 1 ; if(!qbevent)break;evnt(11698);}while(r); } S_14243:; fornext_value1697= 1 ; fornext_finalvalue1697= 255 ; fornext_step1697= 1 ; if (fornext_step1697<0) fornext_step_negative1697=1; else fornext_step_negative1697=0; if (new_error) goto fornext_error1697; goto fornext_entrylabel1697; while(1){ fornext_value1697=fornext_step1697+(*__LONG_CLOSEALL); fornext_entrylabel1697: *__LONG_CLOSEALL=fornext_value1697; if (fornext_step_negative1697){ if (fornext_value1697fornext_finalvalue1697) break; } fornext_error1697:; if(qbevent){evnt(11699);if(r)goto S_14243;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(11699);}while(r); fornext_continue_1696:; } fornext_exit_1696:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11700);}while(r); do{ goto LABEL_RECOMPILE; if(!qbevent)break;evnt(11701);}while(r); } S_14249:; if (( 0 )||new_error){ if(qbevent){evnt(11704);if(r)goto S_14249;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1698; sub_file_print(tmp_fileno,qbs_new_txt_len("Beginning label check...",24), 0, 0, 1); if (new_error) goto skip1698; skip1698: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11704);}while(r); } S_14252:; fornext_value1700= 1 ; fornext_finalvalue1700=*__LONG_NLABELS; fornext_step1700= 1 ; if (fornext_step1700<0) fornext_step_negative1700=1; else fornext_step_negative1700=0; if (new_error) goto fornext_error1700; goto fornext_entrylabel1700; while(1){ fornext_value1700=fornext_step1700+(*__LONG_R); fornext_entrylabel1700: *__LONG_R=fornext_value1700; if (fornext_step_negative1700){ if (fornext_value1700fornext_finalvalue1700) break; } fornext_error1700:; if(qbevent){evnt(11705);if(r)goto S_14252;} S_14253:; if ((*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274)))||new_error){ if(qbevent){evnt(11707);if(r)goto S_14253;} 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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11708);}while(r); do{ *__LONG_IGNORE=FUNC_VALIDLABEL(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11709);}while(r); do{ *__LONG_V=FUNC_HASHFIND(__STRING_A,&(pass1701= 2 ),__LONG_IGNORE,__LONG_R2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11710);}while(r); LABEL_ADDLABCHK7:; if(qbevent){evnt(11711);r=0;} S_14257:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(11712);if(r)goto S_14257;} S_14258:; if ((-(*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R2)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))==*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+274))))||new_error){ if(qbevent){evnt(11713);if(r)goto S_14258;} do{ *__LONG_LINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270)); if(!qbevent)break;evnt(11714);}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(11714);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11714);}while(r); } S_14263:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(11716);if(r)goto S_14263;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R2); if(!qbevent)break;evnt(11716);}while(r); do{ goto LABEL_ADDLABCHK7; if(!qbevent)break;evnt(11716);}while(r); } } } S_14269:; if ((-(*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282))== 0 ))||new_error){ if(qbevent){evnt(11721);if(r)goto S_14269;} S_14270:; 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]))*282+1)),256,1)))),__STRING1_SP),0)))||new_error){ if(qbevent){evnt(11723);if(r)goto S_14270;} S_14271:; 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]))*282+1)),256,1)))),__STRING1_SP),0)== 0 )))||new_error){ if(qbevent){evnt(11724);if(r)goto S_14271;} 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]))*282+1)),256,1)))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11725);}while(r); S_14273:; if (( 0 )||new_error){ if(qbevent){evnt(11726);if(r)goto S_14273;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1702; sub_file_print(tmp_fileno,qbs_new_txt_len("Recompiling to resolve label:",29), 0, 0, 0); if (new_error) goto skip1702; 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]))*282+1)),256,1)), 0, 0, 1); if (new_error) goto skip1702; skip1702: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11726);}while(r); } do{ goto LABEL_DO_RECOMPILE; if(!qbevent)break;evnt(11727);}while(r); } } do{ *__LONG_LINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270)); if(!qbevent)break;evnt(11731);}while(r); do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Label '",7),qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+1)),256,1))),qbs_new_txt_len("' not defined",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11731);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11731);}while(r); } S_14283:; if ((*(uint8*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+269)))||new_error){ if(qbevent){evnt(11735);if(r)goto S_14283;} do{ *__LONG_X= 0 ; if(!qbevent)break;evnt(11738);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11739);}while(r); do{ *__LONG_IGNORE=FUNC_VALIDLABEL(__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11740);}while(r); do{ *__LONG_V=FUNC_HASHFIND(__STRING_A,&(pass1703= 2 ),__LONG_IGNORE,__LONG_R2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11741);}while(r); LABEL_ADDLABCHK4:; if(qbevent){evnt(11742);r=0;} S_14288:; if ((*__LONG_V)||new_error){ if(qbevent){evnt(11743);if(r)goto S_14288;} do{ *__LONG_X=*__LONG_X+ 1 ; if(!qbevent)break;evnt(11744);}while(r); S_14290:; if ((-(*__LONG_V== 2 ))||new_error){ if(qbevent){evnt(11745);if(r)goto S_14290;} do{ *__LONG_V=FUNC_HASHFINDCONT(__LONG_IGNORE,__LONG_R2); if(!qbevent)break;evnt(11745);}while(r); do{ goto LABEL_ADDLABCHK4; if(!qbevent)break;evnt(11745);}while(r); } } S_14295:; if ((-(*__LONG_X!= 1 ))||new_error){ if(qbevent){evnt(11747);if(r)goto S_14295;} do{ *__LONG_LINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+270)); if(!qbevent)break;evnt(11747);}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(11747);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11747);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1704=*__LONG_GLOBTXTBUF),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(&(pass1705=*(int64*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*__LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+261))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11750);}while(r); } fornext_continue_1699:; } fornext_exit_1699:; S_14303:; if (( 0 )||new_error){ if(qbevent){evnt(11755);if(r)goto S_14303;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1706; sub_file_print(tmp_fileno,qbs_new_txt_len("Finished check!",15), 0, 0, 1); if (new_error) goto skip1706; skip1706: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11755);}while(r); } do{ qbs_set(__STRING_SUBFUNC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11765);}while(r); do{ *__INTEGER_DEFDATAHANDLE=*__LONG_GLOBTXTBUF; if(!qbevent)break;evnt(11766);}while(r); do{ *__LONG_DATATXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11767);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11768);}while(r); S_14310:; if ((*__LONG_CONSOLE)||new_error){ if(qbevent){evnt(11770);if(r)goto S_14310;} do{ SUB_WRITEBUFLINE(&(pass1707=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 console=1;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11771);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1708=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 console=0;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11773);}while(r); } S_14315:; if ((*__LONG_SCREENHIDE)||new_error){ if(qbevent){evnt(11776);if(r)goto S_14315;} do{ SUB_WRITEBUFLINE(&(pass1709=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 screen_hide_startup=1;",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11777);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1710=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 screen_hide_startup=0;",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11779);}while(r); } S_14320:; if ((*__LONG_ASSERTS)||new_error){ if(qbevent){evnt(11782);if(r)goto S_14320;} do{ SUB_WRITEBUFLINE(&(pass1711=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 asserts=1;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11783);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1712=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 asserts=0;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11785);}while(r); } S_14325:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(11788);if(r)goto S_14325;} do{ SUB_WRITEBUFLINE(&(pass1713=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 vwatch=-1;",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11789);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass1714=*__LONG_GLOBTXTBUF),qbs_new_txt_len("int32 vwatch=0;",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11791);}while(r); } do{ *__LONG_BH=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("dyninfo.txt",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11794);}while(r); S_14331:; if ((*__LONG_RESIZE)||new_error){ if(qbevent){evnt(11795);if(r)goto S_14331;} do{ SUB_WRITEBUFLINE(&(pass1715=*__LONG_BH),qbs_new_txt_len("ScreenResize=1;",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11796);}while(r); } S_14334:; if ((*__LONG_RESIZE_SCALE)||new_error){ if(qbevent){evnt(11798);if(r)goto S_14334;} do{ SUB_WRITEBUFLINE(&(pass1716=*__LONG_BH),qbs_add(qbs_add(qbs_new_txt_len("ScreenResizeScale=",18),FUNC_STR2(__LONG_RESIZE_SCALE)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11799);}while(r); } S_14337:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(11802);if(r)goto S_14337;} do{ SUB_VWATCHVARIABLE(qbs_new_txt_len("",0),&(pass1717= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11803);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1718=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("ptrszint data_size=",19),FUNC_STR2(__LONG_DATAOFFSET)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11808);}while(r); S_14341:; if ((-(*__LONG_DATAOFFSET== 0 ))||new_error){ if(qbevent){evnt(11809);if(r)goto S_14341;} do{ SUB_WRITEBUFLINE(&(pass1719=*__LONG_GLOBTXTBUF),qbs_new_txt_len("uint8 *data=(uint8*)calloc(1,1);",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11811);}while(r); }else{ S_14344:; if ((-(*__LONG_INLINE_DATA== 0 ))||new_error){ if(qbevent){evnt(11815);if(r)goto S_14344;} S_14345:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(11816);if(r)goto S_14345;} S_14346:; if ((-(*__LONG_OS_BITS== 32 ))||new_error){ if(qbevent){evnt(11817);if(r)goto S_14346;} do{ qbs_set(__STRING_X,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11818);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1720=*__LONG_DATABINBUF),__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11818);}while(r); do{ SUB_WRITEBUFLINE(&(pass1721=*__LONG_GLOBTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11819);}while(r); do{ SUB_WRITEBUFLINE(&(pass1722=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("extern char *binary_internal_temp",33),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11820);}while(r); do{ SUB_WRITEBUFLINE(&(pass1723=*__LONG_GLOBTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11821);}while(r); do{ SUB_WRITEBUFLINE(&(pass1724=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("uint8 *data=(uint8*)&binary_internal_temp",41),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11822);}while(r); }else{ do{ qbs_set(__STRING_X,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11824);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1725=*__LONG_DATABINBUF),__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11824);}while(r); do{ SUB_WRITEBUFLINE(&(pass1726=*__LONG_GLOBTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11825);}while(r); do{ SUB_WRITEBUFLINE(&(pass1727=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("extern char *_binary_internal_temp",34),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11826);}while(r); do{ SUB_WRITEBUFLINE(&(pass1728=*__LONG_GLOBTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11827);}while(r); do{ SUB_WRITEBUFLINE(&(pass1729=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("uint8 *data=(uint8*)&_binary_internal_temp",42),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11828);}while(r); } } S_14362:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(11831);if(r)goto S_14362;} do{ qbs_set(__STRING_X,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11832);}while(r); do{ SUB_WRITEBUFRAWDATA(&(pass1730=*__LONG_DATABINBUF),__STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11832);}while(r); do{ SUB_WRITEBUFLINE(&(pass1731=*__LONG_GLOBTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11833);}while(r); do{ SUB_WRITEBUFLINE(&(pass1732=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("extern char *_binary_internal_temp",34),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11834);}while(r); do{ SUB_WRITEBUFLINE(&(pass1733=*__LONG_GLOBTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11835);}while(r); do{ SUB_WRITEBUFLINE(&(pass1734=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("uint8 *data=(uint8*)&_binary_internal_temp",42),__STRING_TEMPFOLDERINDEXSTR2),qbs_new_txt_len("_data_bin_start;",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11836);}while(r); } }else{ do{ *__LONG_FF=FUNC_OPENBUFFER(qbs_new_txt_len("B",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("data.bin",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11840);}while(r); do{ qbs_set(__STRING_X,FUNC_READBUFRAWDATA(&(pass1735=*__LONG_FF),&(pass1737=FUNC_GETBUFLEN(&(pass1736=*__LONG_FF))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11841);}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(11842);}while(r); S_14374:; fornext_value1739= 1 ; fornext_finalvalue1739=__STRING_X->len; fornext_step1739= 1 ; if (fornext_step1739<0) fornext_step_negative1739=1; else fornext_step_negative1739=0; if (new_error) goto fornext_error1739; goto fornext_entrylabel1739; while(1){ fornext_value1739=fornext_step1739+(*__LONG_I); fornext_entrylabel1739: *__LONG_I=fornext_value1739; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative1739){ if (fornext_value1739fornext_finalvalue1739) break; } fornext_error1739:; if(qbevent){evnt(11843);if(r)goto S_14374;} 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(11844);}while(r); fornext_continue_1738:; } fornext_exit_1738:; 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(11846);}while(r); do{ SUB_WRITEBUFLINE(&(pass1741=*__LONG_GLOBTXTBUF),__STRING_X2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11847);}while(r); do{ SUB_WRITEBUFLINE(&(pass1742=*__LONG_GLOBTXTBUF),qbs_new_txt_len("uint8 *data=&inline_data[0];",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11848);}while(r); do{ qbs_set(__STRING_X,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11849);}while(r); do{ qbs_set(__STRING_X2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11849);}while(r); } } S_14384:; if (( 0 )||new_error){ if(qbevent){evnt(11853);if(r)goto S_14384;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1743; 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 skip1743; skip1743: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11853);}while(r); } do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 1 ; if(!qbevent)break;evnt(11854);}while(r); do{ *__LONG_NCOMMONTMP= 0 ; if(!qbevent)break;evnt(11855);}while(r); do{ *__LONG_XI= 1 ; if(!qbevent)break;evnt(11856);}while(r); S_14390:; fornext_value1745= 1 ; fornext_finalvalue1745=*__LONG_COMMONARRAYLISTN; fornext_step1745= 1 ; if (fornext_step1745<0) fornext_step_negative1745=1; else fornext_step_negative1745=0; if (new_error) goto fornext_error1745; goto fornext_entrylabel1745; while(1){ fornext_value1745=fornext_step1745+(*__LONG_X); fornext_entrylabel1745: *__LONG_X=fornext_value1745; if (fornext_step_negative1745){ if (fornext_value1745fornext_finalvalue1745) break; } fornext_error1745:; if(qbevent){evnt(11857);if(r)goto S_14390;} do{ qbs_set(__STRING_VARNAME,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11858);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11858);}while(r); do{ qbs_set(__STRING_TYP,FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11859);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11859);}while(r); do{ *__LONG_DIMMETHOD2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11860);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11860);}while(r); do{ *__LONG_DIMSHARED2=qbr(func_val(FUNC_GETELEMENT(__STRING_COMMONARRAYLIST,__LONG_XI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11861);}while(r); do{ *__LONG_XI=*__LONG_XI+ 1 ; if(!qbevent)break;evnt(11861);}while(r); do{ qbs_set(__STRING_PUREVARNAME,__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11864);}while(r); do{ *__LONG_T=FUNC_TYPNAME2TYP(__STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11865);}while(r); S_14401:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11866);if(r)goto S_14401;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11866);}while(r); } S_14404:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(11867);if(r)goto S_14404;} do{ qbs_set(__STRING_VARNAME,qbs_add(__STRING_VARNAME,FUNC_TYPE2SYMBOL(__STRING_TYP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11867);}while(r); } S_14407:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11868);if(r)goto S_14407;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11868);}while(r); } do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11869);}while(r); S_14411:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11870);if(r)goto S_14411;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11870);}while(r); } S_14414:; while((*__LONG_TRY)||new_error){ if(qbevent){evnt(11871);if(r)goto S_14414;} S_14415:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(11872);if(r)goto S_14415;} do{ goto LABEL_FOUNDCOMMONARRAY; if(!qbevent)break;evnt(11872);}while(r); } S_14418:; if ((-(*__LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(11873);if(r)goto S_14418;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(11873);}while(r); do{ *__LONG_TRY=FUNC_FINDID(__STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11873);}while(r); }else{ do{ *__LONG_TRY= 0 ; if(!qbevent)break;evnt(11873);}while(r); } S_14424:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11874);if(r)goto S_14424;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11874);}while(r); } dl_continue_1746:; } dl_exit_1746:; do{ qbs_set(__STRING_A,qbs_new_txt_len("COMMON array unlocatable",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11876);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11876);}while(r); LABEL_FOUNDCOMMONARRAY:; if(qbevent){evnt(11877);r=0;} S_14430:; if (( 0 )||new_error){ if(qbevent){evnt(11878);if(r)goto S_14430;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1747; 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 skip1747; skip1747: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(11878);}while(r); } do{ *__LONG_I=*__LONG_CURRENTID; if(!qbevent)break;evnt(11880);}while(r); do{ *__LONG_ARRAYTYPE=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(11881);}while(r); do{ *__LONG_ARRAYELEMENTS=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(11882);}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(11883);}while(r); S_14437:; if ((-((*__LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(11884);if(r)goto S_14437;} do{ qbs_set(__STRING_E,qbs_add(__STRING_E,FUNC_TYPEVALUE2SYMBOL(__LONG_T))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11884);}while(r); } S_14440:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(11885);if(r)goto S_14440;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(11885);}while(r); } do{ qbs_set(__STRING_N,__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11886);}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(11887);}while(r); do{ *__LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(11888);}while(r); do{ *__LONG_COMMAND= 3 ; if(!qbevent)break;evnt(11891);}while(r); S_14447:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(11892);if(r)goto S_14447;} S_14448:; if ((-((*__LONG_T&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(11893);if(r)goto S_14448;} do{ *__LONG_COMMAND= 4 ; if(!qbevent)break;evnt(11894);}while(r); } } S_14452:; if ((-(*__LONG_ARRAYELEMENTS== -1 ))||new_error){ if(qbevent){evnt(11906);if(r)goto S_14452;} do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11912);}while(r); do{ SUB_WRITEBUFLINE(&(pass1748=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==2){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11913);}while(r); do{ qbs_set(__STRING_X,FUNC_STR2(&(pass1749=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11915);}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(11916);}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(11917);}while(r); do{ SUB_WRITEBUFLINE(&(pass1750=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static uint8 *",14),__STRING_X1),qbs_new_txt_len("=(uint8*)malloc(1);",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11918);}while(r); do{ SUB_WRITEBUFLINE(&(pass1751=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static int64 ",13),__STRING_X2),qbs_new_txt_len("=0;",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11919);}while(r); do{ SUB_WRITEBUFLINE(&(pass1752=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11921);}while(r); S_14461:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(11923);if(r)goto S_14461;} do{ SUB_WRITEBUFLINE(&(pass1753=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==3){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11923);}while(r); } S_14464:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(11924);if(r)goto S_14464;} do{ SUB_WRITEBUFLINE(&(pass1754=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==4){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11924);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1755=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11925);}while(r); S_14468:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(11927);if(r)goto S_14468;} do{ SUB_WRITEBUFLINE(&(pass1756=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11929);}while(r); do{ SUB_WRITEBUFLINE(&(pass1757=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11930);}while(r); do{ SUB_WRITEBUFLINE(&(pass1758=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes=int64val>>3;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11931);}while(r); } S_14473:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(11934);if(r)goto S_14473;} do{ SUB_WRITEBUFLINE(&(pass1759=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes=1;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11934);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1760=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11937);}while(r); do{ SUB_WRITEBUFLINE(&(pass1761=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11938);}while(r); do{ SUB_WRITEBUFLINE(&(pass1762=*__LONG_MAINTXTBUF),qbs_new_txt_len("while(int32val--){",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11941);}while(r); do{ SUB_WRITEBUFLINE(&(pass1763=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11942);}while(r); do{ SUB_WRITEBUFLINE(&(pass1764=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11943);}while(r); do{ SUB_WRITEBUFLINE(&(pass1765=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11944);}while(r); do{ SUB_WRITEBUFLINE(&(pass1766=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11945);}while(r); do{ SUB_WRITEBUFLINE(&(pass1767=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes*=(int64val2-int64val+1);",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11946);}while(r); do{ SUB_WRITEBUFLINE(&(pass1768=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11947);}while(r); S_14485:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(11949);if(r)goto S_14485;} do{ SUB_WRITEBUFLINE(&(pass1769=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11951);}while(r); do{ SUB_WRITEBUFLINE(&(pass1770=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11952);}while(r); } S_14489:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(11955);if(r)goto S_14489;} do{ SUB_WRITEBUFLINE(&(pass1771=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytei=0;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11956);}while(r); do{ SUB_WRITEBUFLINE(&(pass1772=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11960);}while(r); do{ SUB_WRITEBUFLINE(&(pass1776=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11961);}while(r); do{ SUB_WRITEBUFLINE(&(pass1777=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytei++;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11962);}while(r); do{ SUB_WRITEBUFLINE(&(pass1778=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11963);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1779=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11967);}while(r); do{ SUB_WRITEBUFLINE(&(pass1780=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11968);}while(r); do{ SUB_WRITEBUFLINE(&(pass1781=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11970);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11975);}while(r); do{ SUB_WRITEBUFLINE(&(pass1782=*__LONG_MAINTXTBUF),qbs_new_txt_len("int32val=2;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11976);}while(r); do{ SUB_WRITEBUFLINE(&(pass1783=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11977);}while(r); do{ SUB_WRITEBUFLINE(&(pass1784=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11979);}while(r); }else{ do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("inpchain",8)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11989);}while(r); do{ SUB_WRITEBUFLINE(&(pass1785=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==2){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11991);}while(r); do{ SUB_WRITEBUFLINE(&(pass1786=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11992);}while(r); S_14510:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(11994);if(r)goto S_14510;} do{ SUB_WRITEBUFLINE(&(pass1787=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==3){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11994);}while(r); } S_14513:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(11995);if(r)goto S_14513;} do{ SUB_WRITEBUFLINE(&(pass1788=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (int32val==4){",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11995);}while(r); } S_14516:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(11997);if(r)goto S_14516;} do{ SUB_WRITEBUFLINE(&(pass1789=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(11999);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1790=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12004);}while(r); do{ qbs_set(__STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12007);}while(r); S_14521:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(12008);if(r)goto S_14521;} do{ SUB_WRITEBUFLINE(&(pass1791=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes=1;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12008);}while(r); } S_14524:; fornext_value1793= 1 ; fornext_finalvalue1793=*__LONG_ARRAYELEMENTS; fornext_step1793= 1 ; if (fornext_step1793<0) fornext_step_negative1793=1; else fornext_step_negative1793=0; if (new_error) goto fornext_error1793; goto fornext_entrylabel1793; while(1){ fornext_value1793=fornext_step1793+(*__LONG_X2); fornext_entrylabel1793: *__LONG_X2=fornext_value1793; if (fornext_step_negative1793){ if (fornext_value1793fornext_finalvalue1793) break; } fornext_error1793:; if(qbevent){evnt(12009);if(r)goto S_14524;} S_14525:; if ((-(*__LONG_X2>*__LONG_NCOMMONTMP))||new_error){ if(qbevent){evnt(12012);if(r)goto S_14525;} do{ *__LONG_NCOMMONTMP=*__LONG_NCOMMONTMP+ 1 ; if(!qbevent)break;evnt(12013);}while(r); S_14527:; if (( 0 )||new_error){ if(qbevent){evnt(12015);if(r)goto S_14527;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1794; sub_file_print(tmp_fileno,qbs_new_txt_len("Calling DIM2(...)...",20), 0, 0, 1); if (new_error) goto skip1794; skip1794: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12015);}while(r); } S_14530:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12016);if(r)goto S_14530;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12016);}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),&(pass1795= 0 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12017);}while(r); S_14534:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12018);if(r)goto S_14534;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12018);}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),&(pass1796= 0 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12019);}while(r); S_14538:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12020);if(r)goto S_14538;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12020);}while(r); } S_14541:; if (( 0 )||new_error){ if(qbevent){evnt(12021);if(r)goto S_14541;} 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("Finished calling DIM2(...)!",27), 0, 0, 1); if (new_error) goto skip1797; skip1797: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12021);}while(r); } S_14544:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12022);if(r)goto S_14544;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12022);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass1798=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12027);}while(r); do{ SUB_WRITEBUFLINE(&(pass1799=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__INTEGER64____RESERVED_COMMON_LBOUND",38),FUNC_STR2(__LONG_X2)),qbs_new_txt_len("=int64val;",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12028);}while(r); do{ SUB_WRITEBUFLINE(&(pass1800=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12029);}while(r); do{ SUB_WRITEBUFLINE(&(pass1801=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("*__INTEGER64____RESERVED_COMMON_UBOUND",38),FUNC_STR2(__LONG_X2)),qbs_new_txt_len("=int64val2;",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12030);}while(r); S_14552:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(12031);if(r)goto S_14552;} do{ SUB_WRITEBUFLINE(&(pass1802=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes*=(int64val2-int64val+1);",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12031);}while(r); } S_14555:; if ((-(*__LONG_X2> 1 ))||new_error){ if(qbevent){evnt(12032);if(r)goto S_14555;} 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(12032);}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(12033);}while(r); fornext_continue_1792:; } fornext_exit_1792:; S_14560:; if (( 0 )||new_error){ if(qbevent){evnt(12036);if(r)goto S_14560;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1803; 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 skip1803; skip1803: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12036);}while(r); } S_14563:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12037);if(r)goto S_14563;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12037);}while(r); } do{ *__INTEGER_REDIMOPTION= 1 ; if(!qbevent)break;evnt(12039);}while(r); do{ *__LONG_RETVAL=FUNC_DIM2(__STRING_PUREVARNAME,__STRING_TYP,&(pass1804= 0 ),__STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12040);}while(r); S_14568:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12041);if(r)goto S_14568;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12041);}while(r); } do{ *__INTEGER_REDIMOPTION= 0 ; if(!qbevent)break;evnt(12042);}while(r); S_14572:; if (( 0 )||new_error){ if(qbevent){evnt(12043);if(r)goto S_14572;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1805; 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 skip1805; skip1805: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12043);}while(r); } S_14575:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12044);if(r)goto S_14575;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12044);}while(r); } S_14578:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(12046);if(r)goto S_14578;} 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(12048);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_VARNAME),&(pass1806= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12049);}while(r); S_14581:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12050);if(r)goto S_14581;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12050);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1807=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_get(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12051);}while(r); } S_14586:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(12054);if(r)goto S_14586;} do{ SUB_WRITEBUFLINE(&(pass1808=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytei=0;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12055);}while(r); do{ SUB_WRITEBUFLINE(&(pass1809=*__LONG_MAINTXTBUF),qbs_new_txt_len("while(bytei>3,1));",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12059);}while(r); do{ SUB_WRITEBUFLINE(&(pass1813=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12060);}while(r); do{ SUB_WRITEBUFLINE(&(pass1814=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytei++;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12061);}while(r); do{ SUB_WRITEBUFLINE(&(pass1815=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12062);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1816=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12066);}while(r); do{ SUB_WRITEBUFLINE(&(pass1817=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12067);}while(r); do{ SUB_WRITEBUFLINE(&(pass1818=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12068);}while(r); do{ *__LONG_MAINTXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("chain",5)),FUNC_STR2(__LONG_I)),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12072);}while(r); do{ SUB_WRITEBUFLINE(&(pass1819=*__LONG_MAINTXTBUF),qbs_new_txt_len("int32val=2;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12074);}while(r); do{ SUB_WRITEBUFLINE(&(pass1820=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12075);}while(r); do{ SUB_WRITEBUFLINE(&(pass1821=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (",4),__STRING_N2),qbs_new_txt_len("[2]&1){",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12077);}while(r); S_14603:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(12079);if(r)goto S_14603;} do{ SUB_WRITEBUFLINE(&(pass1822=*__LONG_MAINTXTBUF),qbs_new_txt_len("int32val=3;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12079);}while(r); } S_14606:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(12080);if(r)goto S_14606;} do{ SUB_WRITEBUFLINE(&(pass1823=*__LONG_MAINTXTBUF),qbs_new_txt_len("int32val=4;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12080);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1824=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12081);}while(r); S_14610:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(12083);if(r)goto S_14610;} do{ *__LONG_BITS=*__LONG_T& 511 ; if(!qbevent)break;evnt(12085);}while(r); S_14612:; if ((*__LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(12086);if(r)goto S_14612;} 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(12086);}while(r); } S_14615:; if ((*__LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(12087);if(r)goto S_14615;} do{ *__LONG_BITS=*__LONG_TSIZE* 8 ; if(!qbevent)break;evnt(12087);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1825=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),FUNC_STR2(__LONG_BITS)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12088);}while(r); do{ SUB_WRITEBUFLINE(&(pass1826=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12089);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1827=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int32val=",9),FUNC_STR2(__LONG_ARRAYELEMENTS)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12092);}while(r); do{ SUB_WRITEBUFLINE(&(pass1828=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12093);}while(r); S_14623:; if ((-(*__LONG_COMMAND== 3 ))||new_error){ if(qbevent){evnt(12095);if(r)goto S_14623;} S_14624:; fornext_value1830= 1 ; fornext_finalvalue1830=*__LONG_ARRAYELEMENTS; 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+(*__LONG_X2); fornext_entrylabel1830: *__LONG_X2=fornext_value1830; if (fornext_step_negative1830){ if (fornext_value1830fornext_finalvalue1830) break; } fornext_error1830:; if(qbevent){evnt(12097);if(r)goto S_14624;} 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(12099);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1831= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12100);}while(r); S_14627:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12101);if(r)goto S_14627;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12101);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1832=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12102);}while(r); do{ SUB_WRITEBUFLINE(&(pass1833=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12103);}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(12104);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1834= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12105);}while(r); S_14634:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12106);if(r)goto S_14634;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12106);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1835=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12107);}while(r); do{ SUB_WRITEBUFLINE(&(pass1836=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12108);}while(r); fornext_continue_1829:; } fornext_exit_1829:; 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))),&(pass1837= -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12112);}while(r); S_14641:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12113);if(r)goto S_14641;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12113);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1838=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_put(FF,NULL,",16),__STRING_E),qbs_new_txt_len(",0);",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12114);}while(r); } S_14646:; if ((-(*__LONG_COMMAND== 4 ))||new_error){ if(qbevent){evnt(12118);if(r)goto S_14646;} do{ SUB_WRITEBUFLINE(&(pass1839=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes=1;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12121);}while(r); S_14648:; fornext_value1841= 1 ; fornext_finalvalue1841=*__LONG_ARRAYELEMENTS; fornext_step1841= 1 ; if (fornext_step1841<0) fornext_step_negative1841=1; else fornext_step_negative1841=0; if (new_error) goto fornext_error1841; goto fornext_entrylabel1841; while(1){ fornext_value1841=fornext_step1841+(*__LONG_X2); fornext_entrylabel1841: *__LONG_X2=fornext_value1841; if (fornext_step_negative1841){ if (fornext_value1841fornext_finalvalue1841) break; } fornext_error1841:; if(qbevent){evnt(12122);if(r)goto S_14648;} 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(12123);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1842= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12124);}while(r); S_14651:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12125);if(r)goto S_14651;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12125);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1843=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int64val=",9),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12126);}while(r); do{ SUB_WRITEBUFLINE(&(pass1844=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12127);}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(12128);}while(r); do{ qbs_set(__STRING_E,FUNC_EVALUATETOTYP(FUNC_FIXOPERATIONORDER(__STRING_E),&(pass1845= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12129);}while(r); S_14658:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12130);if(r)goto S_14658;} do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12130);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1846=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("int64val2=",10),__STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12131);}while(r); do{ SUB_WRITEBUFLINE(&(pass1847=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12132);}while(r); do{ SUB_WRITEBUFLINE(&(pass1848=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytes*=(int64val2-int64val+1);",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12133);}while(r); fornext_continue_1840:; } fornext_exit_1840:; do{ SUB_WRITEBUFLINE(&(pass1849=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytei=0;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12136);}while(r); do{ SUB_WRITEBUFLINE(&(pass1850=*__LONG_MAINTXTBUF),qbs_new_txt_len("while(byteilen; int64val<<=3;",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12139);}while(r); do{ SUB_WRITEBUFLINE(&(pass1853=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12140);}while(r); do{ SUB_WRITEBUFLINE(&(pass1854=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12141);}while(r); do{ SUB_WRITEBUFLINE(&(pass1855=*__LONG_MAINTXTBUF),qbs_new_txt_len("bytei++;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12142);}while(r); do{ SUB_WRITEBUFLINE(&(pass1856=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12143);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1857=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12147);}while(r); } fornext_continue_1744:; } fornext_exit_1744:; do{ *__LONG_USE_GLOBAL_BYTE_ELEMENTS= 0 ; if(!qbevent)break;evnt(12154);}while(r); S_14678:; if (( 0 )||new_error){ if(qbevent){evnt(12155);if(r)goto S_14678;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip1858; 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 skip1858; skip1858: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12155);}while(r); } S_14681:; fornext_value1860= 1 ; fornext_finalvalue1860= 255 ; fornext_step1860= 1 ; if (fornext_step1860<0) fornext_step_negative1860=1; else fornext_step_negative1860=0; if (new_error) goto fornext_error1860; goto fornext_entrylabel1860; while(1){ fornext_value1860=fornext_step1860+(*__LONG_CLOSEALL); fornext_entrylabel1860: *__LONG_CLOSEALL=fornext_value1860; if (fornext_step_negative1860){ if (fornext_value1860fornext_finalvalue1860) break; } fornext_error1860:; if(qbevent){evnt(12158);if(r)goto S_14681;} do{ sub_close(*__LONG_CLOSEALL,1); if(!qbevent)break;evnt(12158);}while(r); fornext_continue_1859:; } fornext_exit_1859:; do{ sub_open(qbs_add(__STRING_TMPDIR,qbs_new_txt_len("temp.bin",8)), 4 ,NULL, 4 , 26 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12159);}while(r); do{ qbs_set(__STRING_COMPILELOG,qbs_add(__STRING_TMPDIR,qbs_new_txt_len("compilelog.txt",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12161);}while(r); do{ sub_open(__STRING_COMPILELOG, 4 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12163);}while(r); do{ sub_close( 1 ,1); if(!qbevent)break;evnt(12163);}while(r); S_14688:; if (((-(*__LONG_IDEMODE== 0 ))&(~(*__BYTE_QUIETMODE)))||new_error){ if(qbevent){evnt(12165);if(r)goto S_14688;} S_14689:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(12166);if(r)goto S_14689;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("[",1),func_string(*__LONG_MAXPROGRESSWIDTH,(qbs_new_txt_len(".",1)->chr[0]))),qbs_new_txt_len("] 100%",6))); if (new_error) goto skip1861; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip1861: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12167);}while(r); }else{ do{ qbg_sub_locate(NULL, 1 ,NULL,NULL,NULL,2); if(!qbevent)break;evnt(12169);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(func_string(*__LONG_MAXPROGRESSWIDTH, 219 ),qbs_new_txt_len(" 100%",5))); if (new_error) goto skip1862; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip1862: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12170);}while(r); } } S_14696:; if ((~(*__BYTE_IGNOREWARNINGS))||new_error){ if(qbevent){evnt(12174);if(r)goto S_14696;} do{ *__LONG_TOTALUNUSEDVARIABLES= 0 ; if(!qbevent)break;evnt(12175);}while(r); S_14698:; fornext_value1864= 1 ; fornext_finalvalue1864=*__LONG_TOTALVARIABLESCREATED; fornext_step1864= 1 ; if (fornext_step1864<0) fornext_step_negative1864=1; else fornext_step_negative1864=0; if (new_error) goto fornext_error1864; goto fornext_entrylabel1864; while(1){ fornext_value1864=fornext_step1864+(*__LONG_I); fornext_entrylabel1864: *__LONG_I=fornext_value1864; if (fornext_step_negative1864){ if (fornext_value1864fornext_finalvalue1864) break; } fornext_error1864:; if(qbevent){evnt(12176);if(r)goto S_14698;} S_14699:; if ((-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+28))== 0 ))||new_error){ if(qbevent){evnt(12177);if(r)goto S_14699;} do{ *__LONG_TOTALUNUSEDVARIABLES=*__LONG_TOTALUNUSEDVARIABLES+ 1 ; if(!qbevent)break;evnt(12178);}while(r); } fornext_continue_1863:; } fornext_exit_1863:; S_14703:; if ((-(*__LONG_TOTALUNUSEDVARIABLES> 0 ))||new_error){ if(qbevent){evnt(12182);if(r)goto S_14703;} do{ *__LONG_MAXVARNAMELEN= 0 ; if(!qbevent)break;evnt(12183);}while(r); S_14705:; fornext_value1866= 1 ; fornext_finalvalue1866=*__LONG_TOTALVARIABLESCREATED; fornext_step1866= 1 ; if (fornext_step1866<0) fornext_step_negative1866=1; else fornext_step_negative1866=0; if (new_error) goto fornext_error1866; goto fornext_entrylabel1866; while(1){ fornext_value1866=fornext_step1866+(*__LONG_I); fornext_entrylabel1866: *__LONG_I=fornext_value1866; if (fornext_step_negative1866){ if (fornext_value1866fornext_finalvalue1866) break; } fornext_error1866:; if(qbevent){evnt(12184);if(r)goto S_14705;} S_14706:; if ((-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+28))== 0 ))||new_error){ if(qbevent){evnt(12185);if(r)goto S_14706;} S_14707:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))->len>*__LONG_MAXVARNAMELEN)))||new_error){ if(qbevent){evnt(12186);if(r)goto S_14707;} do{ *__LONG_MAXVARNAMELEN=(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12186);}while(r); } } fornext_continue_1865:; } fornext_exit_1865:; do{ qbs_set(__STRING_HEADER,qbs_new_txt_len("unused variable",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12190);}while(r); S_14713:; fornext_value1868= 1 ; fornext_finalvalue1868=*__LONG_TOTALVARIABLESCREATED; fornext_step1868= 1 ; if (fornext_step1868<0) fornext_step_negative1868=1; else fornext_step_negative1868=0; if (new_error) goto fornext_error1868; goto fornext_entrylabel1868; while(1){ fornext_value1868=fornext_step1868+(*__LONG_I); fornext_entrylabel1868: *__LONG_I=fornext_value1868; if (fornext_step_negative1868){ if (fornext_value1868fornext_finalvalue1868) break; } fornext_error1868:; if(qbevent){evnt(12191);if(r)goto S_14713;} S_14714:; if ((-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+28))== 0 ))||new_error){ if(qbevent){evnt(12192);if(r)goto S_14714;} do{ SUB_ADDWARNING((int32*)(void*)( ((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])) + ((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+4) ),(int32*)(void*)( ((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])) + ((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+8) ),(int32*)(void*)( ((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])) + ((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12) ),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+56))),__STRING_HEADER,qbs_add(qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),func_space((*__LONG_MAXVARNAMELEN+ 1 )-(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))->len)),qbs_new_txt_len(" ",2)),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*__LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12193);}while(r); } fornext_continue_1867:; } fornext_exit_1867:; } } S_14720:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(12199);if(r)goto S_14720;} do{ goto LABEL_IDERET5; if(!qbevent)break;evnt(12199);}while(r); } LABEL_IDE6:; if(qbevent){evnt(12200);r=0;} S_14723:; if (((-(*__LONG_IDEMODE== 0 ))&(-(*__LONG_NO_C_COMPILE_MODE== 0 )))||new_error){ if(qbevent){evnt(12202);if(r)goto S_14723;} S_14724:; if ((~(*__BYTE_QUIETMODE))||new_error){ if(qbevent){evnt(12203);if(r)goto S_14724;} do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip1869: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12204);}while(r); S_14726:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(12205);if(r)goto S_14726;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Compiling C++ code into executable...",37)); if (new_error) goto skip1870; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip1870: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12206);}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 skip1871; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip1871: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12208);}while(r); } } S_14732:; if ((qbs_cleanup(qbs_tmp_base,__STRING_OUTPUTFILE_CMD->len))||new_error){ if(qbevent){evnt(12211);if(r)goto S_14732;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__OUT,FUNC_GETFILEPATH(__STRING_OUTPUTFILE_CMD)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12213);}while(r); do{ qbs_set(__STRING_F,func_mid(__STRING_OUTPUTFILE_CMD,__STRING_PATH__ASCII_CHR_046__OUT->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12214);}while(r); do{ qbs_set(__STRING_FILE,FUNC_REMOVEFILEEXTENSION(__STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12215);}while(r); S_14736:; if ((qbs_cleanup(qbs_tmp_base,__STRING_PATH__ASCII_CHR_046__OUT->len))||new_error){ if(qbevent){evnt(12216);if(r)goto S_14736;} S_14737:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(__STRING_PATH__ASCII_CHR_046__OUT)== 0 )))||new_error){ if(qbevent){evnt(12217);if(r)goto S_14737;} do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip1875: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12218);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("Can't create output executable - path not found: ",49),__STRING_PATH__ASCII_CHR_046__OUT)); if (new_error) goto skip1876; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip1876: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12219);}while(r); S_14740:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(12220);if(r)goto S_14740;} do{ if(qbevent){evnt(12220);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(12220);}while(r); } do{ if(qbevent){evnt(12221);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(12221);}while(r); } do{ qbs_set(__STRING_CURRENTDIR,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12223);}while(r); do{ sub_chdir(__STRING_PATH__ASCII_CHR_046__OUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12224);}while(r); do{ qbs_set(__STRING_PATH__ASCII_CHR_046__OUT,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12225);}while(r); do{ sub_chdir(__STRING_CURRENTDIR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12226);}while(r); S_14749:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_PATH__ASCII_CHR_046__OUT, 1 ),__STRING1_PATHSEP)))||new_error){ if(qbevent){evnt(12227);if(r)goto S_14749;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__OUT,qbs_add(__STRING_PATH__ASCII_CHR_046__OUT,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12227);}while(r); } do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_PATH__ASCII_CHR_046__OUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12228);}while(r); do{ *__BYTE_SAVEEXEWITHSOURCE= -1 ; if(!qbevent)break;evnt(12229);}while(r); } } do{ qbs_set(__STRING_T__ASCII_CHR_046__PATH__ASCII_CHR_046__EXE,__STRING_PATH__ASCII_CHR_046__EXE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12232);}while(r); S_14757:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION))))||new_error){ if(qbevent){evnt(12233);if(r)goto S_14757;} do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(12234);}while(r); do{ error_goto_line=7; if(!qbevent)break;evnt(12235);}while(r); do{ sub_kill(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12236);}while(r); do{ error_goto_line=8; if(!qbevent)break;evnt(12237);}while(r); S_14762:; if ((-(*__LONG_E== 1 ))||new_error){ if(qbevent){evnt(12238);if(r)goto S_14762;} 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(12239);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12239);}while(r); } } do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_T__ASCII_CHR_046__PATH__ASCII_CHR_046__EXE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12242);}while(r); } S_14769:; if ((*__LONG_EXEICONSET)||new_error){ if(qbevent){evnt(12245);if(r)goto S_14769;} do{ *__LONG_LINENUMBER=*__LONG_EXEICONSET; if(!qbevent)break;evnt(12246);}while(r); do{ qbs_set(__STRING_WHOLELINE,qbs_add(qbs_add(qbs_new_txt_len(" $EXEICON:'",11),__STRING_EXEICONFILE),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12247);}while(r); do{ error_goto_line=9; if(!qbevent)break;evnt(12251);}while(r); do{ if(!qbevent)break;evnt(12253);}while(r); do{ *__LONG_ERRNO=FUNC_COPYFILE(__STRING_EXEICONFILE,qbs_add(__STRING_TMPDIR,qbs_new_txt_len("icon.ico",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12254);}while(r); S_14775:; if ((-(*__LONG_ERRNO!= 0 ))||new_error){ if(qbevent){evnt(12255);if(r)goto S_14775;} do{ qbs_set(__STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Error copying ",14),FUNC_QUOTEDFILENAME(__STRING_EXEICONFILE)),qbs_new_txt_len(" to temp directory",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12255);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12255);}while(r); } do{ error_goto_line=10; if(!qbevent)break;evnt(12257);}while(r); } S_14781:; if ((*__BYTE_VERSIONINFOSET)||new_error){ if(qbevent){evnt(12260);if(r)goto S_14781;} do{ *__LONG_MANIBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(qbs_add(qbs_add(__STRING_TMPDIR,__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len(".manifest",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12261);}while(r); do{ SUB_WRITEBUFLINE(&(pass1877=*__LONG_MANIBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12262);}while(r); do{ SUB_WRITEBUFLINE(&(pass1878=*__LONG_MANIBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12263);}while(r); do{ SUB_WRITEBUFLINE(&(pass1879=*__LONG_MANIBUF),qbs_new_txt_len("",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12269);}while(r); do{ SUB_WRITEBUFLINE(&(pass1885=*__LONG_MANIBUF),qbs_add(qbs_add(qbs_new_txt_len("",13),__STRING_VIFILEDESCRIPTION),qbs_new_txt_len("",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12270);}while(r); do{ SUB_WRITEBUFLINE(&(pass1886=*__LONG_MANIBUF),qbs_new_txt_len("",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12271);}while(r); do{ SUB_WRITEBUFLINE(&(pass1887=*__LONG_MANIBUF),qbs_new_txt_len(" ",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12272);}while(r); do{ SUB_WRITEBUFLINE(&(pass1888=*__LONG_MANIBUF),qbs_new_txt_len(" ",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12280);}while(r); do{ SUB_WRITEBUFLINE(&(pass1896=*__LONG_MANIBUF),qbs_new_txt_len(" ",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12281);}while(r); do{ SUB_WRITEBUFLINE(&(pass1897=*__LONG_MANIBUF),qbs_new_txt_len("",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12282);}while(r); do{ SUB_WRITEBUFLINE(&(pass1898=*__LONG_MANIBUF),qbs_new_txt_len("",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12283);}while(r); do{ *__LONG_MANIBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("manifest.h",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12285);}while(r); do{ SUB_WRITEBUFLINE(&(pass1899=*__LONG_MANIBUF),qbs_new_txt_len("#ifndef RESOURCE_H",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12286);}while(r); do{ SUB_WRITEBUFLINE(&(pass1900=*__LONG_MANIBUF),qbs_new_txt_len("#define RESOURCE_H",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12287);}while(r); do{ SUB_WRITEBUFLINE(&(pass1901=*__LONG_MANIBUF),qbs_new_txt_len("#ifdef __cplusplus",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12288);}while(r); do{ SUB_WRITEBUFLINE(&(pass1902=*__LONG_MANIBUF),qbs_add(qbs_add(qbs_new_txt_len("extern ",7),FUNC_ADDQUOTES(qbs_new_txt_len("C",1))),qbs_new_txt_len(" {",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12289);}while(r); do{ SUB_WRITEBUFLINE(&(pass1903=*__LONG_MANIBUF),qbs_new_txt_len("#endif",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12290);}while(r); do{ SUB_WRITEBUFLINE(&(pass1904=*__LONG_MANIBUF),qbs_new_txt_len("#ifdef __cplusplus",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12291);}while(r); do{ SUB_WRITEBUFLINE(&(pass1905=*__LONG_MANIBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12292);}while(r); do{ SUB_WRITEBUFLINE(&(pass1906=*__LONG_MANIBUF),qbs_new_txt_len("#endif",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12293);}while(r); do{ SUB_WRITEBUFLINE(&(pass1907=*__LONG_MANIBUF),qbs_new_txt_len("#endif /* RESOURCE_H */",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12294);}while(r); do{ SUB_WRITEBUFLINE(&(pass1908=*__LONG_MANIBUF),qbs_new_txt_len("#define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 /*Defined manifest file*/",70)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12295);}while(r); do{ SUB_WRITEBUFLINE(&(pass1909=*__LONG_MANIBUF),qbs_new_txt_len("#define RT_MANIFEST 24",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12296);}while(r); } S_14818:; if ((*__BYTE_VERSIONINFOSET|*__LONG_EXEICONSET)||new_error){ if(qbevent){evnt(12299);if(r)goto S_14818;} do{ *__LONG_ICONRCBUF=FUNC_OPENBUFFER(qbs_new_txt_len("O",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("icon.rc",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12300);}while(r); S_14820:; if ((*__LONG_EXEICONSET)||new_error){ if(qbevent){evnt(12302);if(r)goto S_14820;} do{ SUB_WRITEBUFLINE(&(pass1910=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len("0 ICON ",7),FUNC_ADDQUOTES(qbs_new_txt_len("icon.ico",8)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12303);}while(r); } S_14823:; if ((*__BYTE_VERSIONINFOSET)||new_error){ if(qbevent){evnt(12306);if(r)goto S_14823;} do{ SUB_WRITEBUFLINE(&(pass1911=*__LONG_ICONRCBUF),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12307);}while(r); do{ SUB_WRITEBUFLINE(&(pass1912=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len("#include ",9),FUNC_ADDQUOTES(qbs_new_txt_len("manifest.h",10)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12308);}while(r); do{ SUB_WRITEBUFLINE(&(pass1913=*__LONG_ICONRCBUF),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12309);}while(r); do{ SUB_WRITEBUFLINE(&(pass1914=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len("CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST ",47),FUNC_ADDQUOTES(qbs_add(qbs_add(__STRING_FILE,__STRING_EXTENSION),qbs_new_txt_len(".manifest",9))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12310);}while(r); do{ SUB_WRITEBUFLINE(&(pass1915=*__LONG_ICONRCBUF),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12311);}while(r); do{ SUB_WRITEBUFLINE(&(pass1916=*__LONG_ICONRCBUF),qbs_new_txt_len("1 VERSIONINFO",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12312);}while(r); S_14830:; if ((qbs_cleanup(qbs_tmp_base,__STRING_VIFILEVERSIONNUM->len))||new_error){ if(qbevent){evnt(12313);if(r)goto S_14830;} do{ SUB_WRITEBUFLINE(&(pass1918=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len("FILEVERSION ",16),__STRING_VIFILEVERSIONNUM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12313);}while(r); } S_14833:; if ((qbs_cleanup(qbs_tmp_base,__STRING_VIPRODUCTVERSIONNUM->len))||new_error){ if(qbevent){evnt(12314);if(r)goto S_14833;} do{ SUB_WRITEBUFLINE(&(pass1920=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len("PRODUCTVERSION ",16),__STRING_VIPRODUCTVERSIONNUM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12314);}while(r); } do{ SUB_WRITEBUFLINE(&(pass1921=*__LONG_ICONRCBUF),qbs_new_txt_len("BEGIN",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12315);}while(r); do{ SUB_WRITEBUFLINE(&(pass1922=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len(" BLOCK ",10),FUNC_ADDQUOTES(qbs_new_txt_len("StringFileInfo",14)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12316);}while(r); do{ SUB_WRITEBUFLINE(&(pass1923=*__LONG_ICONRCBUF),qbs_new_txt_len(" BEGIN",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12317);}while(r); do{ SUB_WRITEBUFLINE(&(pass1924=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len(" BLOCK ",14),FUNC_ADDQUOTES(qbs_new_txt_len("040904E4",8)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12318);}while(r); do{ SUB_WRITEBUFLINE(&(pass1925=*__LONG_ICONRCBUF),qbs_new_txt_len(" BEGIN",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12319);}while(r); do{ SUB_WRITEBUFLINE(&(pass1926=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("CompanyName",11))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VICOMPANYNAME,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12320);}while(r); do{ SUB_WRITEBUFLINE(&(pass1927=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("FileDescription",15))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIFILEDESCRIPTION,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12321);}while(r); do{ SUB_WRITEBUFLINE(&(pass1928=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("FileVersion",11))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIFILEVERSION,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12322);}while(r); do{ SUB_WRITEBUFLINE(&(pass1929=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("InternalName",12))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIINTERNALNAME,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12323);}while(r); do{ SUB_WRITEBUFLINE(&(pass1930=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("LegalCopyright",14))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VILEGALCOPYRIGHT,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12324);}while(r); do{ SUB_WRITEBUFLINE(&(pass1931=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("LegalTrademarks",15))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VILEGALTRADEMARKS,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12325);}while(r); do{ SUB_WRITEBUFLINE(&(pass1932=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("OriginalFilename",16))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIORIGINALFILENAME,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12326);}while(r); do{ SUB_WRITEBUFLINE(&(pass1933=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("ProductName",11))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIPRODUCTNAME,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12327);}while(r); do{ SUB_WRITEBUFLINE(&(pass1934=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("ProductVersion",14))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIPRODUCTVERSION,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12328);}while(r); do{ SUB_WRITEBUFLINE(&(pass1935=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("Comments",8))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VICOMMENTS,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12329);}while(r); do{ SUB_WRITEBUFLINE(&(pass1936=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("Web",3))),qbs_new_txt_len(",",1)),FUNC_ADDQUOTES(qbs_add(__STRING_VIWEB,qbs_new_txt_len("\\0",2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12330);}while(r); do{ SUB_WRITEBUFLINE(&(pass1937=*__LONG_ICONRCBUF),qbs_new_txt_len(" END",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12331);}while(r); do{ SUB_WRITEBUFLINE(&(pass1938=*__LONG_ICONRCBUF),qbs_new_txt_len(" END",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12332);}while(r); do{ SUB_WRITEBUFLINE(&(pass1939=*__LONG_ICONRCBUF),qbs_add(qbs_new_txt_len(" BLOCK ",10),FUNC_ADDQUOTES(qbs_new_txt_len("VarFileInfo",11)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12333);}while(r); do{ SUB_WRITEBUFLINE(&(pass1940=*__LONG_ICONRCBUF),qbs_new_txt_len(" BEGIN",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12334);}while(r); do{ SUB_WRITEBUFLINE(&(pass1941=*__LONG_ICONRCBUF),qbs_add(qbs_add(qbs_new_txt_len(" VALUE ",18),FUNC_ADDQUOTES(qbs_new_txt_len("Translation",11))),qbs_new_txt_len(", 0x409, 0x04E4",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12335);}while(r); do{ SUB_WRITEBUFLINE(&(pass1942=*__LONG_ICONRCBUF),qbs_new_txt_len(" END",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12336);}while(r); do{ SUB_WRITEBUFLINE(&(pass1943=*__LONG_ICONRCBUF),qbs_new_txt_len("END",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12337);}while(r); } } do{ SUB_WRITEBUFFERS(qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12343);}while(r); do{ qbs_set(__STRING_O,qbs_lcase(__STRING_OS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12347);}while(r); do{ *__LONG_WIN= 0 ; if(!qbevent)break;evnt(12348);}while(r); S_14864:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(12348);if(r)goto S_14864;} do{ *__LONG_WIN= 1 ; if(!qbevent)break;evnt(12348);}while(r); } do{ *__LONG_LNX= 0 ; if(!qbevent)break;evnt(12349);}while(r); S_14868:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(12349);if(r)goto S_14868;} do{ *__LONG_LNX= 1 ; if(!qbevent)break;evnt(12349);}while(r); } do{ *__LONG_MAC= 0 ; if(!qbevent)break;evnt(12350);}while(r); S_14872:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(12350);if(r)goto S_14872;} do{ *__LONG_MAC= 1 ; if(!qbevent)break;evnt(12350);}while(r); do{ qbs_set(__STRING_O,qbs_new_txt_len("osx",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12350);}while(r); } do{ qbs_set(__STRING_VER,__STRING_VERSION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12351);}while(r); do{ qbs_set(__STRING_LIBS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12352);}while(r); do{ qbs_set(__STRING_MAKEDEPS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12353);}while(r); do{ qbs_set(__STRING_MAKE,FUNC_GETMAKEEXECUTABLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12354);}while(r); do{ qbs_set(__STRING_LOCALPATH,qbs_new_txt_len("internal\\c\\",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12356);}while(r); S_14881:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 5 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12359);if(r)goto S_14881;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_GL=y",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12359);}while(r); } S_14884:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 11 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12360);if(r)goto S_14884;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_SCREENIMAGE=y",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12360);}while(r); } S_14887:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 6 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12361);if(r)goto S_14887;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_IMAGE_CODEC=y",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12361);}while(r); } S_14890:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 7 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12362);if(r)goto S_14890;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_CONSOLE_ONLY=y",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12362);}while(r); } S_14893:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 8 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12363);if(r)goto S_14893;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_SOCKETS=y",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12363);}while(r); } S_14896:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 9 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12364);if(r)goto S_14896;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_PRINTER=y",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12364);}while(r); } S_14899:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 10 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12365);if(r)goto S_14899;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_ICON=y",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12365);}while(r); } S_14902:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 11 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12366);if(r)goto S_14902;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_SCREENIMAGE=y",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12366);}while(r); } S_14905:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 1 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12367);if(r)goto S_14905;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_FONT=y",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12367);}while(r); } S_14908:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 12 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12368);if(r)goto S_14908;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_DEVICEINPUT=y",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12368);}while(r); } S_14911:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 13 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12369);if(r)goto S_14911;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_ZLIB=y",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12369);}while(r); } S_14914:; if (((-(*__LONG_INLINE_DATA== 0 ))&*__LONG_DATAOFFSET)||new_error){ if(qbevent){evnt(12370);if(r)goto S_14914;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_DATA=y",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12370);}while(r); } S_14917:; if ((*__LONG_CONSOLE)||new_error){ if(qbevent){evnt(12371);if(r)goto S_14917;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_CONSOLE=y",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12371);}while(r); } S_14920:; if ((*__LONG_EXEICONSET|*__BYTE_VERSIONINFOSET)||new_error){ if(qbevent){evnt(12372);if(r)goto S_14920;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_ICON_RC=y",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12372);}while(r); } S_14923:; if ((-(*__ULONG_USEMINIAUDIOBACKEND== 0 ))||new_error){ if(qbevent){evnt(12374);if(r)goto S_14923;} S_14924:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 3 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12375);if(r)goto S_14924;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_AUDIO_DECODE=y",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12375);}while(r); } S_14927:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 2 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12376);if(r)goto S_14927;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_AUDIO_CONVERSION=y",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12376);}while(r); } S_14930:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 4 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12377);if(r)goto S_14930;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_AUDIO_OUT=y",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12377);}while(r); } }else{ S_14934:; if ((((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 3 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])]|((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 2 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])]|((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[array_check(( 4 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5])])||new_error){ if(qbevent){evnt(12379);if(r)goto S_14934;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" DEP_AUDIO_MINIAUDIO=y",22))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12380);}while(r); } } S_14938:; if ((-(*__LONG_TEMPFOLDERINDEX> 1 ))||new_error){ if(qbevent){evnt(12384);if(r)goto S_14938;} do{ qbs_set(__STRING_MAKEDEPS,qbs_add(qbs_add(__STRING_MAKEDEPS,qbs_new_txt_len(" TEMP_ID=",9)),FUNC_STR2(__LONG_TEMPFOLDERINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12384);}while(r); } do{ qbs_set(__STRING_CXXFLAGSEXTRA,__STRING_EXTRACPPFLAGS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12386);}while(r); do{ qbs_set(__STRING_CXXLIBSEXTRA,__STRING_EXTRALINKERFLAGS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12387);}while(r); S_14943:; if ((*__ULONG_OPTIMIZECPPPROGRAM)||new_error){ if(qbevent){evnt(12390);if(r)goto S_14943;} S_14944:; if ((*__LONG_INCLUDE_GDB_DEBUGGING_INFO)||new_error){ if(qbevent){evnt(12391);if(r)goto S_14944;} do{ qbs_set(__STRING_CXXFLAGSEXTRA,qbs_add(__STRING_CXXFLAGSEXTRA,qbs_new_txt_len(" -Og",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12392);}while(r); }else{ do{ qbs_set(__STRING_CXXFLAGSEXTRA,qbs_add(__STRING_CXXFLAGSEXTRA,qbs_new_txt_len(" -O2",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12394);}while(r); } }else{ S_14950:; if ((*__LONG_INCLUDE_GDB_DEBUGGING_INFO)||new_error){ if(qbevent){evnt(12397);if(r)goto S_14950;} do{ qbs_set(__STRING_CXXFLAGSEXTRA,qbs_add(__STRING_CXXFLAGSEXTRA,qbs_new_txt_len(" -g",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12398);}while(r); } } do{ qbs_set(__STRING_CXXLIBSEXTRA,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_CXXLIBSEXTRA,qbs_new_txt_len(" ",1)),__STRING_MYLIB),qbs_new_txt_len(" ",1)),__STRING_MYLIBOPT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12402);}while(r); do{ qbs_set(__STRING_ESCAPEDEXE,FUNC_STRREPLACE(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len(" ",1),qbs_new_txt_len("\\ ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12406);}while(r); do{ qbs_set(__STRING_ESCAPEDEXE,FUNC_STRREPLACE(__STRING_ESCAPEDEXE,qbs_new_txt_len("$",1),qbs_new_txt_len("$$",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12407);}while(r); do{ qbs_set(__STRING_MAKELINE,qbs_add(qbs_add(qbs_add(__STRING_MAKE,__STRING_MAKEDEPS),qbs_new_txt_len(" EXE=",5)),FUNC_ADDQUOTES(__STRING_ESCAPEDEXE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12409);}while(r); do{ qbs_set(__STRING_MAKELINE,qbs_add(qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" ",1)),FUNC_ADDQUOTES(qbs_add(qbs_new_txt_len("CXXFLAGS_EXTRA=",15),__STRING_CXXFLAGSEXTRA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12410);}while(r); do{ qbs_set(__STRING_MAKELINE,qbs_add(qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" ",1)),FUNC_ADDQUOTES(qbs_add(qbs_new_txt_len("CFLAGS_EXTRA=",13),__STRING_CXXFLAGSEXTRA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12411);}while(r); do{ qbs_set(__STRING_MAKELINE,qbs_add(qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" ",1)),FUNC_ADDQUOTES(qbs_add(qbs_new_txt_len("CXXLIBS_EXTRA=",14),__STRING_CXXLIBSEXTRA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12412);}while(r); do{ qbs_set(__STRING_MAKELINE,qbs_add(qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" -j",3)),FUNC_ADDQUOTES(FUNC_STR2((int32*)__ULONG_MAXPARALLELPROCESSES)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12413);}while(r); S_14962:; if ((~(*__ULONG_STRIPDEBUGSYMBOLS))||new_error){ if(qbevent){evnt(12415);if(r)goto S_14962;} do{ qbs_set(__STRING_MAKELINE,qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" STRIP_SYMBOLS=n",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12416);}while(r); } S_14965:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(12419);if(r)goto S_14965;} do{ qbs_set(__STRING_MAKELINE,qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" OS=win",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12421);}while(r); S_14967:; fornext_value1945= 1 ; fornext_finalvalue1945=*__LONG_RESOLVESTATICFUNCTIONS; fornext_step1945= 1 ; if (fornext_step1945<0) fornext_step_negative1945=1; else fornext_step_negative1945=0; if (new_error) goto fornext_error1945; goto fornext_entrylabel1945; while(1){ fornext_value1945=fornext_step1945+(*__LONG_X); fornext_entrylabel1945: *__LONG_X=fornext_value1945; if (fornext_step_negative1945){ if (fornext_value1945fornext_finalvalue1945) break; } fornext_error1945:; if(qbevent){evnt(12424);if(r)goto S_14967;} S_14968:; 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(12425);if(r)goto S_14968;} do{ *__LONG_N= 0 ; if(!qbevent)break;evnt(12427);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cmd /c internal\\c\\c_compiler\\bin\\nm.exe ",40),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(12428);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12429);}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(12430);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12431);}while(r); S_14974:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12432);if(r)goto S_14974;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1948; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1948; skip1948: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12433);}while(r); S_14976:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12434);if(r)goto S_14976;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12436);}while(r); S_14978:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(12437);if(r)goto S_14978;} S_14979:; 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(12438);if(r)goto S_14979;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(12439);}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(12440);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12441);}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(12442);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1950; 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 skip1950; skip1950: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12443);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12444);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12446);}while(r); } } dl_continue_1947:; } dl_exit_1947:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12450);}while(r); S_14992:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(12451);if(r)goto S_14992;} 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(12451);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12451);}while(r); } S_14996:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12453);if(r)goto S_14996;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12454);}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(12455);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12456);}while(r); S_15000:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12457);if(r)goto S_15000;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1952; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1952; skip1952: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12458);}while(r); S_15002:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12459);if(r)goto S_15002;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12461);}while(r); S_15004:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(12462);if(r)goto S_15004;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12463);}while(r); S_15006:; 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(12464);if(r)goto S_15006;} 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(12465);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1955; 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 skip1955; skip1955: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12466);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1956; 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 skip1956; skip1956: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12467);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1957; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0, 0, 1); if (new_error) goto skip1957; skip1957: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12468);}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(12470);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1958; 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 skip1958; skip1958: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12471);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12473);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12474);}while(r); do{ goto dl_exit_1951; if(!qbevent)break;evnt(12475);}while(r); } } dl_continue_1951:; } dl_exit_1951:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12479);}while(r); } S_15023:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12482);if(r)goto S_15023;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cmd /c internal\\c\\c_compiler\\bin\\nm.exe ",40),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(12483);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12484);}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(12485);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12486);}while(r); S_15028:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12487);if(r)goto S_15028;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1960; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1960; skip1960: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12488);}while(r); S_15030:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12489);if(r)goto S_15030;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12491);}while(r); S_15032:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(12492);if(r)goto S_15032;} S_15033:; 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(12493);if(r)goto S_15033;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(12494);}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(12495);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12496);}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(12497);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1962; 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 skip1962; skip1962: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12498);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12499);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12501);}while(r); } } dl_continue_1959:; } dl_exit_1959:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12505);}while(r); S_15046:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(12506);if(r)goto S_15046;} 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(12506);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12506);}while(r); } } S_15051:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12509);if(r)goto S_15051;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12510);}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(12511);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12512);}while(r); S_15055:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12513);if(r)goto S_15055;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1964; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1964; skip1964: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12514);}while(r); S_15057:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12515);if(r)goto S_15057;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12517);}while(r); S_15059:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(12518);if(r)goto S_15059;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12519);}while(r); S_15061:; 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(12520);if(r)goto S_15061;} 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(12521);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1967; 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 skip1967; skip1967: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12522);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1968; 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 skip1968; skip1968: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12523);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1969; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0, 0, 1); if (new_error) goto skip1969; skip1969: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12524);}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(12526);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1970; 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 skip1970; skip1970: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12527);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12529);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12530);}while(r); do{ goto dl_exit_1963; if(!qbevent)break;evnt(12531);}while(r); } } dl_continue_1963:; } dl_exit_1963:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12535);}while(r); S_15077:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12536);if(r)goto S_15077;} 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(12536);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12536);}while(r); } } } fornext_continue_1944:; } fornext_exit_1944:; S_15084:; if ((-(*__LONG_NO_C_COMPILE_MODE== 0 ))||new_error){ if(qbevent){evnt(12542);if(r)goto S_15084;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("cmd /c ",7),__STRING_MAKELINE),qbs_new_txt_len(" 1>> ",5)),__STRING_COMPILELOG),qbs_new_txt_len(" 2>&1",5)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12543);}while(r); S_15086:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(12545);if(r)goto S_15086;} do{ *__LONG_DUMMY=FUNC_DARKENFGBG(&(pass1971= 0 )); if(!qbevent)break;evnt(12547);}while(r); } } do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(12551);}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(12552);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1972; sub_file_print(tmp_fileno,qbs_new_txt_len("@echo off",9), 0, 0, 1); if (new_error) goto skip1972; skip1972: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12553);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1973; sub_file_print(tmp_fileno,qbs_new_txt_len("cd %0\\..\\",9), 0, 0, 1); if (new_error) goto skip1973; skip1973: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12554);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1974; sub_file_print(tmp_fileno,qbs_new_txt_len("cd ../..",8), 0, 0, 1); if (new_error) goto skip1974; skip1974: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12555);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1975; 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 skip1975; skip1975: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12556);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1976; sub_file_print(tmp_fileno,qbs_new_txt_len("echo Debugger commands:",23), 0, 0, 1); if (new_error) goto skip1976; skip1976: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12557);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1977; 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 skip1977; skip1977: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12558);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1978; 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 skip1978; skip1978: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12559);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1979; sub_file_print(tmp_fileno,qbs_new_txt_len("echo Type 'quit' to exit",24), 0, 0, 1); if (new_error) goto skip1979; skip1979: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12560);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1980; 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 skip1980; skip1980: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12561);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1981; sub_file_print(tmp_fileno,qbs_new_txt_len("pause",5), 0, 0, 1); if (new_error) goto skip1981; skip1981: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12562);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1982; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("internal\\c\\c_compiler\\bin\\gdb.exe ",34),func_chr( 34 )),__STRING_PATH__ASCII_CHR_046__EXE),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )), 0, 0, 1); if (new_error) goto skip1982; skip1982: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12563);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip1983; sub_file_print(tmp_fileno,qbs_new_txt_len("pause",5), 0, 0, 1); if (new_error) goto skip1983; skip1983: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12564);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(12565);}while(r); } S_15106:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(12568);if(r)goto S_15106;} S_15107:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(12570);if(r)goto S_15107;} do{ qbs_set(__STRING_MAKELINE,qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" OS=osx",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12571);}while(r); }else{ do{ qbs_set(__STRING_MAKELINE,qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" OS=lnx",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12573);}while(r); } S_15112:; fornext_value1985= 1 ; fornext_finalvalue1985=*__LONG_RESOLVESTATICFUNCTIONS; 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+(*__LONG_X); fornext_entrylabel1985: *__LONG_X=fornext_value1985; if (fornext_step_negative1985){ if (fornext_value1985fornext_finalvalue1985) break; } fornext_error1985:; if(qbevent){evnt(12576);if(r)goto S_15112;} S_15113:; 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(12577);if(r)goto S_15113;} do{ *__LONG_N= 0 ; if(!qbevent)break;evnt(12579);}while(r); S_15115:; if ((-(*__LONG_MACOSX== 0 ))||new_error){ if(qbevent){evnt(12580);if(r)goto S_15115;} 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(12580);}while(r); } S_15118:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(12581);if(r)goto S_15118;} 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(12581);}while(r); } S_15121:; if ((-(*__LONG_MACOSX== 0 ))||new_error){ if(qbevent){evnt(12583);if(r)goto S_15121;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12584);}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(12585);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12586);}while(r); S_15125:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12587);if(r)goto S_15125;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1988; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1988; skip1988: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12588);}while(r); S_15127:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12589);if(r)goto S_15127;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12591);}while(r); S_15129:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(12592);if(r)goto S_15129;} S_15130:; 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(12593);if(r)goto S_15130;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(12594);}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(12595);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12596);}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(12597);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1990; 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 skip1990; skip1990: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12598);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12599);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12601);}while(r); } } dl_continue_1987:; } dl_exit_1987:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12605);}while(r); S_15143:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(12606);if(r)goto S_15143;} 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(12606);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12606);}while(r); } } S_15148:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12609);if(r)goto S_15148;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12610);}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(12611);}while(r); do{ qbs_set(__STRING_S2,__STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12611);}while(r); S_15152:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(12612);if(r)goto S_15152;} 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(12612);}while(r); } do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output.txt",27), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12613);}while(r); S_15156:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12614);if(r)goto S_15156;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip1992; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip1992; skip1992: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12615);}while(r); S_15158:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12616);if(r)goto S_15158;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12618);}while(r); S_15160:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(12619);if(r)goto S_15160;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12620);}while(r); S_15162:; 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(12621);if(r)goto S_15162;} 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(12622);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1995; 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 skip1995; skip1995: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12623);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1996; 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 skip1996; skip1996: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12624);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1997; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0, 0, 1); if (new_error) goto skip1997; skip1997: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12625);}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(12627);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip1998; 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 skip1998; skip1998: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12628);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12630);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12631);}while(r); do{ goto dl_exit_1991; if(!qbevent)break;evnt(12632);}while(r); } } dl_continue_1991:; } dl_exit_1991:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12636);}while(r); } S_15179:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12639);if(r)goto S_15179;} S_15180:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(12640);if(r)goto S_15180;} do{ goto LABEL_MACOSX_LIBFIND_FAILED; if(!qbevent)break;evnt(12640);}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(12641);}while(r); do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12642);}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(12643);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12644);}while(r); S_15187:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12645);if(r)goto S_15187;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip2000; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip2000; skip2000: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12646);}while(r); S_15189:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12647);if(r)goto S_15189;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12649);}while(r); S_15191:; if ((*__LONG_X1)||new_error){ if(qbevent){evnt(12650);if(r)goto S_15191;} S_15192:; 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(12651);if(r)goto S_15192;} do{ *__LONG_X1=*__LONG_X1+ 1 ; if(!qbevent)break;evnt(12652);}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(12653);}while(r); do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12654);}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(12655);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip2002; 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 skip2002; skip2002: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12656);}while(r); do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12657);}while(r); } do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12659);}while(r); } } dl_continue_1999:; } dl_exit_1999:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12663);}while(r); S_15205:; if ((-(*__LONG_N> 1 ))||new_error){ if(qbevent){evnt(12664);if(r)goto S_15205;} 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(12664);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12664);}while(r); } } S_15210:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12667);if(r)goto S_15210;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12668);}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(12669);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\nm_output_dynamic.txt",35), 2 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12670);}while(r); S_15214:; while((!(func_eof(*__LONG_FH)))||new_error){ if(qbevent){evnt(12671);if(r)goto S_15214;} do{ tmp_fileno=*__LONG_FH; if (new_error) goto skip2004; sub_file_line_input_string(tmp_fileno,__STRING_A); if (new_error) goto skip2004; skip2004: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12672);}while(r); S_15216:; if ((qbs_cleanup(qbs_tmp_base,__STRING_A->len))||new_error){ if(qbevent){evnt(12673);if(r)goto S_15216;} do{ *__LONG_X1=func_instr(NULL,__STRING_A,__STRING_S,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12675);}while(r); S_15218:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_A,__STRING_S->len),__STRING_S)))||new_error){ if(qbevent){evnt(12676);if(r)goto S_15218;} do{ *__LONG_FH2=func_freefile(); if(!qbevent)break;evnt(12677);}while(r); S_15220:; 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(12678);if(r)goto S_15220;} 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(12679);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip2007; 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 skip2007; skip2007: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12680);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip2008; 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 skip2008; skip2008: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12681);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip2009; sub_file_print(tmp_fileno,qbs_new_txt_len("}",1), 0, 0, 1); if (new_error) goto skip2009; skip2009: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12682);}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(12684);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH2; if (new_error) goto skip2010; 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 skip2010; skip2010: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12685);}while(r); } do{ sub_close(*__LONG_FH2,1); if(!qbevent)break;evnt(12687);}while(r); do{ *__LONG_N=*__LONG_N+ 1 ; if(!qbevent)break;evnt(12688);}while(r); do{ goto dl_exit_2003; if(!qbevent)break;evnt(12689);}while(r); } } dl_continue_2003:; } dl_exit_2003:; do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12693);}while(r); LABEL_MACOSX_LIBFIND_FAILED:; if(qbevent){evnt(12694);r=0;} S_15236:; if ((-(*__LONG_N== 0 ))||new_error){ if(qbevent){evnt(12695);if(r)goto S_15236;} 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(12695);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12695);}while(r); } } } fornext_continue_1984:; } fornext_exit_1984:; S_15243:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(12701);if(r)goto S_15243;} do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(12703);}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(12704);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2011; 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 skip2011; skip2011: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12705);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2012; 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 skip2012; skip2012: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12706);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2013; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("cd ../c",7),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2013; skip2013: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12707);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2014; sub_file_print(tmp_fileno,qbs_add(__STRING_MAKELINE,func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2014; skip2014: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12708);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2015; 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 skip2015; skip2015: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12709);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(12710);}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(12711);}while(r); do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(12713);}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(12714);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2016; 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 skip2016; skip2016: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12715);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2017; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause()",7),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2017; skip2017: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12716);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2018; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("{",1),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2018; skip2018: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12717);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2019; 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 skip2019; skip2019: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12718);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2020; 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 skip2020; skip2020: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12719);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2021; 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 skip2021; skip2021: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12720);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2022; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty $OLDCONFIG",15),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2022; skip2022: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12721);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2023; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("}",1),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2023; skip2023: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12722);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2024; 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 skip2024; skip2024: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12723);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2025; 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 skip2025; skip2025: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12724);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2026; 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 skip2026; skip2026: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12725);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2027; 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 skip2027; skip2027: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12726);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2028; 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 skip2028; skip2028: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12727);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2029; 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 )),__STRING_PATH__ASCII_CHR_046__EXE),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2029; skip2029: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12728);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2030; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause",5),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2030; skip2030: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12729);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(12730);}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(12731);}while(r); }else{ do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(12735);}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(12736);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2031; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("#!/bin/sh",9),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2031; skip2031: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12737);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2032; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause()",7),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2032; skip2032: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12738);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2033; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("{",1),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2033; skip2033: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12739);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2034; 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 skip2034; skip2034: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12740);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2035; 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 skip2035; skip2035: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12741);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2036; 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 skip2036; skip2036: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12742);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2037; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty $OLDCONFIG",15),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2037; skip2037: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12743);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2038; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("}",1),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2038; skip2038: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12744);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2039; 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 skip2039; skip2039: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12745);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2040; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("cd ../c",7),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2040; skip2040: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12746);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2041; sub_file_print(tmp_fileno,qbs_add(__STRING_MAKELINE,func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2041; skip2041: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12747);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2042; 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 skip2042; skip2042: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12748);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2043; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause",5),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2043; skip2043: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12749);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(12750);}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(12751);}while(r); do{ *__LONG_FFH=func_freefile(); if(!qbevent)break;evnt(12753);}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(12754);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2044; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("#!/bin/sh",9),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2044; skip2044: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12755);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2045; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause()",7),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2045; skip2045: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12756);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2046; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("{",1),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2046; skip2046: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12757);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2047; 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 skip2047; skip2047: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12758);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2048; 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 skip2048; skip2048: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12759);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2049; 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 skip2049; skip2049: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12760);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2050; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("stty $OLDCONFIG",15),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2050; skip2050: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12761);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2051; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("}",1),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2051; skip2051: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12762);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2052; 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 skip2052; skip2052: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12763);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2053; 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 skip2053; skip2053: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12764);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2054; 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 skip2054; skip2054: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12765);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2055; 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 skip2055; skip2055: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12766);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2056; 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 skip2056; skip2056: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12767);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2057; 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 )),__STRING_PATH__ASCII_CHR_046__EXE),__STRING_FILE),__STRING_EXTENSION),func_chr( 34 )),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2057; skip2057: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12768);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FFH; if (new_error) goto skip2058; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("Pause",5),func_chr( 10 )), 0, 0, 0); if (new_error) goto skip2058; skip2058: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12769);}while(r); do{ sub_close(*__LONG_FFH,1); if(!qbevent)break;evnt(12770);}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(12771);}while(r); } S_15310:; if ((-(*__LONG_NO_C_COMPILE_MODE== 0 ))||new_error){ if(qbevent){evnt(12775);if(r)goto S_15310;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(__STRING_MAKELINE,qbs_new_txt_len(" 1>> ",5)),__STRING_COMPILELOG),qbs_new_txt_len(" 2>&1",5)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12776);}while(r); S_15312:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(12777);if(r)goto S_15312;} do{ *__LONG_DUMMY=FUNC_DARKENFGBG(&(pass2059= 0 )); if(!qbevent)break;evnt(12779);}while(r); } } S_15316:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("[MACOSX]",8),0)))||new_error){ if(qbevent){evnt(12783);if(r)goto S_15316;} do{ *__LONG_FF=func_freefile(); if(!qbevent)break;evnt(12784);}while(r); S_15318:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("./",2)))|(qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("../../",6)))|(qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("..\\..\\",6)))))||new_error){ if(qbevent){evnt(12785);if(r)goto S_15318;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12785);}while(r); } do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__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(12786);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2060; 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 skip2060; skip2060: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12787);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2061; sub_file_print(tmp_fileno,func_chr( 10 ), 0, 0, 0); if (new_error) goto skip2061; skip2061: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12788);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2062; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("./",2),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len(" &",2)), 0, 0, 0); if (new_error) goto skip2062; skip2062: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12789);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2063; sub_file_print(tmp_fileno,func_chr( 10 ), 0, 0, 0); if (new_error) goto skip2063; skip2063: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12790);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2064; 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("osascript -e 'tell application ",31),func_chr( 34 )),qbs_new_txt_len("Terminal",8)),func_chr( 34 )),qbs_new_txt_len(" to close (every window whose name contains ",44)),func_chr( 34 )),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len("_start.command",14)),func_chr( 34 )),qbs_new_txt_len(")' &",4)), 0, 0, 0); if (new_error) goto skip2064; skip2064: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12791);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2065; sub_file_print(tmp_fileno,func_chr( 10 ), 0, 0, 0); if (new_error) goto skip2065; skip2065: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12792);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2066; 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("osascript -e 'if (count the windows of application ",51),func_chr( 34 )),qbs_new_txt_len("Terminal",8)),func_chr( 34 )),qbs_new_txt_len(") is 0 then tell application ",29)),func_chr( 34 )),qbs_new_txt_len("Terminal",8)),func_chr( 34 )),qbs_new_txt_len(" to quit' &",11)), 0, 0, 0); if (new_error) goto skip2066; skip2066: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12793);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2067; sub_file_print(tmp_fileno,func_chr( 10 ), 0, 0, 0); if (new_error) goto skip2067; skip2067: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12794);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2068; sub_file_print(tmp_fileno,qbs_new_txt_len("exit",4), 0, 0, 0); if (new_error) goto skip2068; skip2068: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12795);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FF; if (new_error) goto skip2069; sub_file_print(tmp_fileno,func_chr( 10 ), 0, 0, 0); if (new_error) goto skip2069; skip2069: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12796);}while(r); do{ sub_close(*__LONG_FF,1); if(!qbevent)break;evnt(12797);}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("chmod +x ",9),__STRING_PATH__ASCII_CHR_046__EXE),__STRING_FILE),__STRING_EXTENSION),qbs_new_txt_len("_start.command",14)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12798);}while(r); } } S_15336:; if ((*__LONG_NO_C_COMPILE_MODE)||new_error){ if(qbevent){evnt(12803);if(r)goto S_15336;} do{ *__LONG_COMPFAILED= 0 ; if(!qbevent)break;evnt(12803);}while(r); do{ goto LABEL_NO_C_COMPILE; if(!qbevent)break;evnt(12803);}while(r); } S_15340:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("../../",6)))|(qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("..\\..\\",6)))))||new_error){ if(qbevent){evnt(12804);if(r)goto S_15340;} do{ qbs_set(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12804);}while(r); } S_15343:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION))))||new_error){ if(qbevent){evnt(12805);if(r)goto S_15343;} do{ *__LONG_COMPFAILED= 0 ; if(!qbevent)break;evnt(12806);}while(r); do{ qbs_set(__STRING_LASTBINARYGENERATED,qbs_add(qbs_add(__STRING_PATH__ASCII_CHR_046__EXE,__STRING_FILE),__STRING_EXTENSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12807);}while(r); }else{ do{ *__LONG_COMPFAILED= 1 ; if(!qbevent)break;evnt(12809);}while(r); } S_15349:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(12812);if(r)goto S_15349;} S_15350:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(12813);if(r)goto S_15350;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("C++ Compilation failed ",23),func_chr( 0 )),qbs_new_txt_len("(Check ",7)),qbs__trim(__STRING_COMPILELOG)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12814);}while(r); do{ goto LABEL_IDEERROR; if(!qbevent)break;evnt(12815);}while(r); } S_15354:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(12817);if(r)goto S_15354;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("ERROR: C++ compilation failed.",30)); if (new_error) goto skip2070; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2070: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12818);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len("Check ",6),__STRING_COMPILELOG),qbs_new_txt_len(" for details.",13))); if (new_error) goto skip2071; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2071: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12819);}while(r); } }else{ S_15359:; if (((-(*__LONG_IDEMODE== 0 ))&(~(*__BYTE_QUIETMODE)))||new_error){ if(qbevent){evnt(12822);if(r)goto S_15359;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Output: ",8)); if (new_error) goto skip2072; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,__STRING_LASTBINARYGENERATED); if (new_error) goto skip2072; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2072: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12822);}while(r); } } LABEL_SKIP_BUILD:; if(qbevent){evnt(12825);r=0;} S_15363:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(12829);if(r)goto S_15363;} do{ goto LABEL_IDERET6; if(!qbevent)break;evnt(12829);}while(r); } LABEL_NO_C_COMPILE:; if(qbevent){evnt(12831);r=0;} S_15366:; if (((((-(*__LONG_COMPFAILED!= 0 ))|(-(*__BYTE_WARNINGSISSUED!= 0 ))))&(-(*__LONG_CONSOLEMODE== 0 )))||new_error){ if(qbevent){evnt(12833);if(r)goto S_15366;} do{ if(qbevent){evnt(12833);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(12833);}while(r); } S_15369:; if ((-(*__LONG_COMPFAILED!= 0 ))||new_error){ if(qbevent){evnt(12834);if(r)goto S_15369;} do{ if(qbevent){evnt(12834);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(12834);}while(r); } do{ if(qbevent){evnt(12835);} exit_code= 0 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(12835);}while(r); LABEL_QBERROR_TEST:; if(qbevent){evnt(12837);r=0;} do{ *__LONG_E= 1 ; if(!qbevent)break;evnt(12838);}while(r); do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; return;} if(!qbevent)break;evnt(12839);}while(r); LABEL_QBERROR:; if(qbevent){evnt(12841);r=0;} S_15375:; if (( 0 )||new_error){ if(qbevent){evnt(12858);if(r)goto S_15375;} S_15376:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(12859);if(r)goto S_15376;} do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2073: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12860);}while(r); }else{ do{ sub__autodisplay(); if(!qbevent)break;evnt(12862);}while(r); do{ qbg_screen(func__newimage( 80 , 25 , 0 ,1),NULL, 0 , 0 ,NULL,13); if(!qbevent)break;evnt(12863);}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(12864);}while(r); } do{ sub__controlchr( 2 ); if(!qbevent)break;evnt(12866);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("A QB error has occurred (and you have compiled in debugging support).",69)); if (new_error) goto skip2074; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2074: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12867);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Some key information (qb64pe.bas):",34)); if (new_error) goto skip2075; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2075: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12868);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Error",5)); if (new_error) goto skip2076; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((uint32)(get_error_err())),qbs_new_txt(" "))); if (new_error) goto skip2076; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2076: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12869);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Description: ",13)); if (new_error) goto skip2077; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,func__errormessage(NULL,0)); if (new_error) goto skip2077; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2077: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12870);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Line",4)); if (new_error) goto skip2078; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((int32)(func__errorline())),qbs_new_txt(" "))); if (new_error) goto skip2078; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2078: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12871);}while(r); S_15389:; if ((func__inclerrorline())||new_error){ if(qbevent){evnt(12872);if(r)goto S_15389;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Included line",13)); if (new_error) goto skip2079; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((int32)(func__inclerrorline())),qbs_new_txt(" "))); if (new_error) goto skip2079; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2079: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12873);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Included file ",14)); if (new_error) goto skip2080; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,func__inclerrorfile()); if (new_error) goto skip2080; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2080: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12874);}while(r); } do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2081: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12876);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Loaded source file details:",27)); if (new_error) goto skip2082; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2082: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12877);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("ideerror =",10)); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((int32)(*__LONG_IDEERROR)),qbs_new_txt(" "))); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len("qberrorhappened =",17)); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((int16)(*__INTEGER_QBERRORHAPPENED)),qbs_new_txt(" "))); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len("qberrorhappenedvalue =",22)); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((int32)(*__LONG_QBERRORHAPPENEDVALUE)),qbs_new_txt(" "))); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len("linenumber =",12)); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_add(qbs_str((int32)(*__LONG_LINENUMBER)),qbs_new_txt(" "))); if (new_error) goto skip2083; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2083: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12878);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("ca$ = {",7)); if (new_error) goto skip2084; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,__STRING_CA); if (new_error) goto skip2084; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len("}, idecommand$ = {",18)); if (new_error) goto skip2084; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,__STRING_IDECOMMAND); if (new_error) goto skip2084; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len("}",1)); if (new_error) goto skip2084; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2084: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12879);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("linefragment = {",16)); if (new_error) goto skip2085; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,__STRING_LINEFRAGMENT); if (new_error) goto skip2085; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len("}",1)); if (new_error) goto skip2085; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2085: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12880);}while(r); do{ sub_end(); if(!qbevent)break;evnt(12881);}while(r); } S_15400:; if ((*__LONG_IDEERROR)||new_error){ if(qbevent){evnt(12884);if(r)goto S_15400;} do{ *__LONG_FH=func_freefile(); if(!qbevent)break;evnt(12885);}while(r); do{ sub_open(qbs_new_txt_len("internal\\temp\\ideerror.txt",26), 5 ,NULL,NULL,*__LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12886);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip2086; sub_file_print(tmp_fileno,func_date(), 0, 0, 0); if (new_error) goto skip2086; sub_file_print(tmp_fileno,func_time(), 0, 0, 0); if (new_error) goto skip2086; sub_file_print(tmp_fileno,qbs_new_txt_len("--------------------",20), 0, 0, 1); if (new_error) goto skip2086; skip2086: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12887);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip2087; sub_file_print(tmp_fileno,qbs_str((uint32)(get_error_err())), 1, 0, 1); if (new_error) goto skip2087; skip2087: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12888);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip2088; sub_file_print(tmp_fileno,func__errormessage(NULL,0), 0, 0, 1); if (new_error) goto skip2088; skip2088: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12889);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip2089; sub_file_print(tmp_fileno,qbs_str((int32)(func__errorline())), 1, 0, 1); if (new_error) goto skip2089; skip2089: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12890);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip2090; sub_file_print(tmp_fileno,qbs_str((int32)(func__inclerrorline())), 1, 0, 1); if (new_error) goto skip2090; skip2090: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12891);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*__LONG_FH; if (new_error) goto skip2091; sub_file_print(tmp_fileno,func__inclerrorfile(), 0, 0, 1); if (new_error) goto skip2091; skip2091: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12892);}while(r); do{ sub_close(*__LONG_FH,1); if(!qbevent)break;evnt(12893);}while(r); do{ qbs_set(__STRING_SENDC,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12894);}while(r); do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_SENDCOMMAND;} if(!qbevent)break;evnt(12895);}while(r); } do{ *__LONG_QBERRORHAPPENEDVALUE=*__INTEGER_QBERRORHAPPENED; if(!qbevent)break;evnt(12898);}while(r); do{ *__INTEGER_QBERRORHAPPENED= 1 ; if(!qbevent)break;evnt(12899);}while(r); S_15415:; if (( 0 )||new_error){ if(qbevent){evnt(12901);if(r)goto S_15415;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2092; sub_file_print(tmp_fileno,qbs_new_txt_len("QB ERROR!",9), 0, 0, 1); if (new_error) goto skip2092; skip2092: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12901);}while(r); } S_15418:; if (( 0 )||new_error){ if(qbevent){evnt(12902);if(r)goto S_15418;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2093; sub_file_print(tmp_fileno,qbs_new_txt_len("ERR=",4), 0, 0, 0); if (new_error) goto skip2093; sub_file_print(tmp_fileno,qbs_str((uint32)(get_error_err())), 1, 0, 1); if (new_error) goto skip2093; skip2093: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12902);}while(r); } S_15421:; if (( 0 )||new_error){ if(qbevent){evnt(12903);if(r)goto S_15421;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2094; sub_file_print(tmp_fileno,qbs_new_txt_len("ERL=",4), 0, 0, 0); if (new_error) goto skip2094; sub_file_print(tmp_fileno,qbs_str((double)(get_error_erl())), 1, 0, 1); if (new_error) goto skip2094; skip2094: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(12903);}while(r); } S_15424:; if ((*__LONG_IDEMODE&(-(*__LONG_QBERRORHAPPENEDVALUE>= 0 )))||new_error){ if(qbevent){evnt(12905);if(r)goto S_15424;} do{ *__LONG_IDEERRORLINE=*__LONG_LINENUMBER; if(!qbevent)break;evnt(12907);}while(r); do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(qbs_new_txt_len("Compiler error (check for syntax errors) (",42),func__errormessage(NULL,0)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12908);}while(r); S_15427:; if ((get_error_err())||new_error){ if(qbevent){evnt(12909);if(r)goto S_15427;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(__STRING_IDEMESSAGE,FUNC_STR2(&(pass2095=get_error_err()))),qbs_new_txt_len("-",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12909);}while(r); } S_15430:; if ((func__errorline())||new_error){ if(qbevent){evnt(12910);if(r)goto S_15430;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,FUNC_STR2(&(pass2096=func__errorline())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12910);}while(r); } S_15433:; if ((func__inclerrorline())||new_error){ if(qbevent){evnt(12911);if(r)goto S_15433;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_IDEMESSAGE,qbs_new_txt_len("-",1)),func__inclerrorfile()),qbs_new_txt_len("-",1)),FUNC_STR2(&(pass2097=func__inclerrorline())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12911);}while(r); } do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12912);}while(r); S_15437:; if ((-(*__LONG_INCLEVEL> 0 ))||new_error){ if(qbevent){evnt(12913);if(r)goto S_15437;} do{ qbs_set(__STRING_IDEMESSAGE,qbs_add(__STRING_IDEMESSAGE,__STRING_INCERROR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12913);}while(r); } do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_IDEERROR;} if(!qbevent)break;evnt(12914);}while(r); } S_15442:; if ((-(*__LONG_QBERRORHAPPENEDVALUE>= 0 ))||new_error){ if(qbevent){evnt(12917);if(r)goto S_15442;} do{ qbs_set(__STRING_A,qbs_new_txt_len("UNEXPECTED INTERNAL COMPILER ERROR!",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12918);}while(r); do{ goto LABEL_ERRMES; if(!qbevent)break;evnt(12918);}while(r); } do{ *__INTEGER_QBERRORCODE=get_error_err(); if(!qbevent)break;evnt(12922);}while(r); do{ *__INTEGER_QBERRORLINE=qbr_float_to_long(get_error_erl()); if(!qbevent)break;evnt(12923);}while(r); S_15448:; if ((-(*__LONG_QBERRORHAPPENEDVALUE== -1 ))||new_error){ if(qbevent){evnt(12924);if(r)goto S_15448;} do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_QBERRORHAPPENED1;} if(!qbevent)break;evnt(12924);}while(r); } S_15451:; if ((-(*__LONG_QBERRORHAPPENEDVALUE== -2 ))||new_error){ if(qbevent){evnt(12925);if(r)goto S_15451;} do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_QBERRORHAPPENED2;} if(!qbevent)break;evnt(12925);}while(r); } S_15454:; if ((-(*__LONG_QBERRORHAPPENEDVALUE== -3 ))||new_error){ if(qbevent){evnt(12926);if(r)goto S_15454;} do{ if (!error_handling){error(20);}else{error_handling=0; error_err=0; goto LABEL_QBERRORHAPPENED3;} if(!qbevent)break;evnt(12926);}while(r); } do{ sub_end(); if(!qbevent)break;evnt(12927);}while(r); LABEL_ERRMES:; if(qbevent){evnt(12929);r=0;} S_15458:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(12930);if(r)goto S_15458;} do{ qbs_set(__STRING_A,__STRING_ERROR_MESSAGE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12930);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(12930);}while(r); } do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12931);}while(r); do{ *__LONG_LAYOUTOK= 0 ; if(!qbevent)break;evnt(12931);}while(r); S_15464:; if ((*__LONG_FORCEINCLUDINGFILE)||new_error){ if(qbevent){evnt(12933);if(r)goto S_15464;} S_15465:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_A,qbs_new_txt_len("END SUB/FUNCTION before",23),0)))||new_error){ if(qbevent){evnt(12934);if(r)goto S_15465;} do{ qbs_set(__STRING_A,qbs_new_txt_len("SUB without END SUB",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12934);}while(r); } }else{ S_15469:; if ((-(*__LONG_INCLEVEL> 0 ))||new_error){ if(qbevent){evnt(12936);if(r)goto S_15469;} do{ qbs_set(__STRING_A,qbs_add(__STRING_A,__STRING_INCERROR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12936);}while(r); } } S_15473:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(12939);if(r)goto S_15473;} do{ *__LONG_IDEERRORLINE=*__LONG_LINENUMBER; if(!qbevent)break;evnt(12940);}while(r); do{ qbs_set(__STRING_IDEMESSAGE,__STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12941);}while(r); do{ goto LABEL_IDEERROR; if(!qbevent)break;evnt(12942);}while(r); } do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2098: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12945);}while(r); S_15479:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(12946);if(r)goto S_15479;} S_15480:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(12947);if(r)goto S_15480;} do{ qbg_sub_color( 4 ,NULL,NULL,1); if(!qbevent)break;evnt(12948);}while(r); }else{ do{ qbg_sub_color( 9 ,NULL,NULL,1); if(!qbevent)break;evnt(12950);}while(r); } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_A); if (new_error) goto skip2099; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2099: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12953);}while(r); S_15487:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(12954);if(r)goto S_15487;} do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(12954);}while(r); } S_15490:; fornext_value2101= 1 ; fornext_finalvalue2101=__STRING_LINEFRAGMENT->len; fornext_step2101= 1 ; if (fornext_step2101<0) fornext_step_negative2101=1; else fornext_step_negative2101=0; if (new_error) goto fornext_error2101; goto fornext_entrylabel2101; while(1){ fornext_value2101=fornext_step2101+(*__LONG_I); fornext_entrylabel2101: *__LONG_I=fornext_value2101; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2101){ if (fornext_value2101fornext_finalvalue2101) break; } fornext_error2101:; if(qbevent){evnt(12955);if(r)goto S_15490;} S_15491:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_LINEFRAGMENT,*__LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(12956);if(r)goto S_15491;} do{ sub_mid(__STRING_LINEFRAGMENT,*__LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(12956);}while(r); } fornext_continue_2100:; } fornext_exit_2100:; S_15495:; fornext_value2104= 1 ; fornext_finalvalue2104=__STRING_WHOLELINE->len; fornext_step2104= 1 ; if (fornext_step2104<0) fornext_step_negative2104=1; else fornext_step_negative2104=0; if (new_error) goto fornext_error2104; goto fornext_entrylabel2104; while(1){ fornext_value2104=fornext_step2104+(*__LONG_I); fornext_entrylabel2104: *__LONG_I=fornext_value2104; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2104){ if (fornext_value2104fornext_finalvalue2104) break; } fornext_error2104:; if(qbevent){evnt(12958);if(r)goto S_15495;} S_15496:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WHOLELINE,*__LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(12959);if(r)goto S_15496;} do{ sub_mid(__STRING_WHOLELINE,*__LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(12959);}while(r); } fornext_continue_2103:; } fornext_exit_2103:; 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 skip2106; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2106: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12961);}while(r); S_15501:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(12962);if(r)goto S_15501;} do{ qbg_sub_color( 8 ,NULL,NULL,1); if(!qbevent)break;evnt(12962);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("LINE ",5)); if (new_error) goto skip2107; makefit(tqbs); qbs_print(tqbs,0); skip2107: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12963);}while(r); S_15505:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(12964);if(r)goto S_15505;} do{ qbg_sub_color( 15 ,NULL,NULL,1); if(!qbevent)break;evnt(12964);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(FUNC_STR2(__LONG_LINENUMBER),qbs_new_txt_len(":",1))); if (new_error) goto skip2108; makefit(tqbs); qbs_print(tqbs,0); skip2108: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12965);}while(r); S_15509:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(12966);if(r)goto S_15509;} do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(12966);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,__STRING_WHOLELINE); if (new_error) goto skip2109; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2109: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12967);}while(r); S_15513:; if ((*__LONG_CONSOLEMODE)||new_error){ if(qbevent){evnt(12969);if(r)goto S_15513;} do{ if(qbevent){evnt(12969);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(12969);}while(r); } do{ if(qbevent){evnt(12970);} exit_code= 1 ; sub_end(); if(!qbevent)break;evnt(12970);}while(r); sub_end(); return; } qbs* FUNC_PARSECMDLINEARGS(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_15517:; fornext_value2111= 1 ; fornext_finalvalue2111=func__commandcount(); fornext_step2111= 1 ; if (fornext_step2111<0) fornext_step_negative2111=1; else fornext_step_negative2111=0; if (new_error) goto fornext_error2111; goto fornext_entrylabel2111; while(1){ fornext_value2111=fornext_step2111+(*_FUNC_PARSECMDLINEARGS_LONG_I); fornext_entrylabel2111: *_FUNC_PARSECMDLINEARGS_LONG_I=fornext_value2111; if (fornext_step_negative2111){ if (fornext_value2111fornext_finalvalue2111) break; } fornext_error2111:; if(qbevent){evnt(12976);if(r)goto S_15517;} do{ qbs_set(_FUNC_PARSECMDLINEARGS_STRING_TOKEN,func_command(*_FUNC_PARSECMDLINEARGS_LONG_I,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12977);}while(r); S_15519:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_lcase(_FUNC_PARSECMDLINEARGS_STRING_TOKEN),qbs_new_txt_len("/?",2)))|(qbs_equal(qbs_lcase(_FUNC_PARSECMDLINEARGS_STRING_TOKEN),qbs_new_txt_len("--help",6)))|(qbs_equal(qbs_lcase(_FUNC_PARSECMDLINEARGS_STRING_TOKEN),qbs_new_txt_len("/help",5)))))||new_error){ if(qbevent){evnt(12978);if(r)goto S_15519;} do{ qbs_set(_FUNC_PARSECMDLINEARGS_STRING_TOKEN,qbs_new_txt_len("-?",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12978);}while(r); } S_15522:; qbs_set(sc_2112,qbs_lcase(qbs_left(_FUNC_PARSECMDLINEARGS_STRING_TOKEN, 2 ))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(12979);if(r)goto S_15522;} S_15523:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-?",2))))||new_error){ if(qbevent){evnt(12980);if(r)goto S_15523;} do{ sub__dest(func__console()); if(!qbevent)break;evnt(12981);}while(r); S_15525:; if ((-(*__BYTE_QB64VERSIONPRINTED== 0 ))||new_error){ if(qbevent){evnt(12982);if(r)goto S_15525;} do{ *__BYTE_QB64VERSIONPRINTED= -1 ; if(!qbevent)break;evnt(12982);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("QB64-PE Compiler V",18),__STRING_VERSION)); if (new_error) goto skip2113; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2113: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12982);}while(r); } do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2114: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12983);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Usage: qb64pe [switches] ",31)); if (new_error) goto skip2115; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2115: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12984);}while(r); do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2116: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12985);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Options:",8)); if (new_error) goto skip2117; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2117: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12986);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" Source file to load",45)); if (new_error) goto skip2118; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2118: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12987);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -c Compile instead of edit",49)); if (new_error) goto skip2119; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2119: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12988);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -o Write output executable to ",66)); if (new_error) goto skip2120; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2120: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12989);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -x Compile instead of edit and output the result to the",78)); if (new_error) goto skip2121; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2121: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12990);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" console",36)); if (new_error) goto skip2122; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2122: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12991);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -w Show warnings",39)); if (new_error) goto skip2123; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2123: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12992);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -q Quiet mode (does not inhibit warnings or errors)",74)); if (new_error) goto skip2124; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2124: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12993);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -m Do not colorize compiler output (monochrome mode)",75)); if (new_error) goto skip2125; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2125: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12994);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -e Enable OPTION _EXPLICIT, making variable declaration",78)); if (new_error) goto skip2126; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2126: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12995);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" mandatory (per-compilation; doesn't affect the",75)); if (new_error) goto skip2127; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2127: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12996);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" source file or global settings)",60)); if (new_error) goto skip2128; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2128: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12997);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -s[:switch=true/false] View/edit compiler settings",53)); if (new_error) goto skip2129; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2129: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12998);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -l: Start the IDE at the specified line number",68)); if (new_error) goto skip2130; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2130: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(12999);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -p Purge all pre-compiled content first",62)); if (new_error) goto skip2131; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2131: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13000);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -z Generate C code without compiling to executable",73)); if (new_error) goto skip2132; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2132: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13001);}while(r); do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2133: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13002);}while(r); do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13003);}while(r); sc_ec_38_end:; goto sc_2112_end; } S_15550:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-u",2))))||new_error){ if(qbevent){evnt(13004);if(r)goto S_15550;} do{ *__LONG_HELP_RECACHING= 2 ; if(!qbevent)break;evnt(13005);}while(r); do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(13005);}while(r); S_15553:; if ((FUNC_IDEUPDATEHELPBOX())||new_error){ if(qbevent){evnt(13006);if(r)goto S_15553;} do{ sub__dest(func__console()); if(!qbevent)break;evnt(13007);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Update failed: curl not found",29)); if (new_error) goto skip2134; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2134: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13008);}while(r); do{ if(qbevent){evnt(13009);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13009);}while(r); } do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13011);}while(r); sc_ec_39_end:; goto sc_2112_end; } S_15559:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-c",2))))||new_error){ if(qbevent){evnt(13012);if(r)goto S_15559;} do{ *__LONG_NOIDEMODE= 1 ; if(!qbevent)break;evnt(13013);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13014);}while(r); sc_ec_40_end:; goto sc_2112_end; } S_15562:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-o",2))))||new_error){ if(qbevent){evnt(13015);if(r)goto S_15562;} S_15563:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(func_command(*_FUNC_PARSECMDLINEARGS_LONG_I+ 1 ,1))->len)> 0 )))||new_error){ if(qbevent){evnt(13016);if(r)goto S_15563;} do{ qbs_set(__STRING_OUTPUTFILE_CMD,func_command(*_FUNC_PARSECMDLINEARGS_LONG_I+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13016);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_I=*_FUNC_PARSECMDLINEARGS_LONG_I+ 1 ; if(!qbevent)break;evnt(13016);}while(r); } do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13017);}while(r); sc_ec_41_end:; goto sc_2112_end; } S_15568:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-x",2))))||new_error){ if(qbevent){evnt(13018);if(r)goto S_15568;} do{ *__LONG_CONSOLEMODE= 1 ; if(!qbevent)break;evnt(13019);}while(r); do{ *__LONG_NOIDEMODE= 1 ; if(!qbevent)break;evnt(13020);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13021);}while(r); sc_ec_42_end:; goto sc_2112_end; } S_15572:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-w",2))))||new_error){ if(qbevent){evnt(13022);if(r)goto S_15572;} do{ *__BYTE_SHOWWARNINGS= -1 ; if(!qbevent)break;evnt(13023);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13024);}while(r); sc_ec_43_end:; goto sc_2112_end; } S_15575:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-q",2))))||new_error){ if(qbevent){evnt(13025);if(r)goto S_15575;} do{ *__BYTE_QUIETMODE= -1 ; if(!qbevent)break;evnt(13026);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13027);}while(r); sc_ec_44_end:; goto sc_2112_end; } S_15578:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-m",2))))||new_error){ if(qbevent){evnt(13028);if(r)goto S_15578;} do{ *__BYTE_MONOCHROMELOGGINGMODE= -1 ; if(!qbevent)break;evnt(13029);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13030);}while(r); sc_ec_45_end:; goto sc_2112_end; } S_15581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-e",2))))||new_error){ if(qbevent){evnt(13031);if(r)goto S_15581;} do{ *__BYTE_OPTIONEXPLICIT_CMD= -1 ; if(!qbevent)break;evnt(13032);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13033);}while(r); sc_ec_46_end:; goto sc_2112_end; } S_15584:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-s",2))))||new_error){ if(qbevent){evnt(13034);if(r)goto S_15584;} do{ *_FUNC_PARSECMDLINEARGS_LONG_SETTINGSMODE= -1 ; if(!qbevent)break;evnt(13035);}while(r); do{ sub__dest(func__console()); if(!qbevent)break;evnt(13036);}while(r); S_15587:; if ((-(*__BYTE_QB64VERSIONPRINTED== 0 ))||new_error){ if(qbevent){evnt(13037);if(r)goto S_15587;} do{ *__BYTE_QB64VERSIONPRINTED= -1 ; if(!qbevent)break;evnt(13037);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_new_txt_len("QB64-PE Compiler V",18),__STRING_VERSION)); if (new_error) goto skip2135; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2135: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13037);}while(r); } S_15591:; qbs_set(sc_2136,qbs_lcase(func_mid(_FUNC_PARSECMDLINEARGS_STRING_TOKEN, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(13038);if(r)goto S_15591;} S_15592:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13039);if(r)goto S_15592;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("debuginfo = ",16)); if (new_error) goto skip2137; makefit(tqbs); qbs_print(tqbs,0); skip2137: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13040);}while(r); S_15594:; if ((*__LONG_IDEDEBUGINFO)||new_error){ if(qbevent){evnt(13041);if(r)goto S_15594;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("true",4)); if (new_error) goto skip2138; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2138: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13041);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("false",5)); if (new_error) goto skip2139; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2139: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13041);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("exewithsource = ",16)); if (new_error) goto skip2140; makefit(tqbs); qbs_print(tqbs,0); skip2140: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13042);}while(r); S_15600:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(13043);if(r)goto S_15600;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("true",4)); if (new_error) goto skip2141; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2141: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13043);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("false",5)); if (new_error) goto skip2142; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2142: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13043);}while(r); } do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13044);}while(r); sc_ec_47_end:; goto sc_2136_end; } S_15606:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len(":exewithsource",14))))||new_error){ if(qbevent){evnt(13045);if(r)goto S_15606;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("exewithsource = ",16)); if (new_error) goto skip2143; makefit(tqbs); qbs_print(tqbs,0); skip2143: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13046);}while(r); S_15608:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(13047);if(r)goto S_15608;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("true",4)); if (new_error) goto skip2144; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2144: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13047);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("false",5)); if (new_error) goto skip2145; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2145: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13047);}while(r); } do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13048);}while(r); sc_ec_48_end:; goto sc_2136_end; } S_15614:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len(":exewithsource=true",19))))||new_error){ if(qbevent){evnt(13049);if(r)goto S_15614;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13050);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("exewithsource = true",20)); if (new_error) goto skip2146; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2146: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13051);}while(r); do{ *__BYTE_SAVEEXEWITHSOURCE= -1 ; if(!qbevent)break;evnt(13052);}while(r); sc_ec_49_end:; goto sc_2136_end; } S_15618:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len(":exewithsource=false",20))))||new_error){ if(qbevent){evnt(13053);if(r)goto S_15618;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13054);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("exewithsource = false",21)); if (new_error) goto skip2147; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2147: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13055);}while(r); do{ *__BYTE_SAVEEXEWITHSOURCE= 0 ; if(!qbevent)break;evnt(13056);}while(r); sc_ec_50_end:; goto sc_2136_end; } S_15622:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len(":debuginfo",10))))||new_error){ if(qbevent){evnt(13057);if(r)goto S_15622;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("debuginfo = ",12)); if (new_error) goto skip2148; makefit(tqbs); qbs_print(tqbs,0); skip2148: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13058);}while(r); S_15624:; if ((*__LONG_IDEDEBUGINFO)||new_error){ if(qbevent){evnt(13059);if(r)goto S_15624;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("true",4)); if (new_error) goto skip2149; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2149: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13059);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("false",5)); if (new_error) goto skip2150; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2150: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13059);}while(r); } do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13060);}while(r); sc_ec_51_end:; goto sc_2136_end; } S_15630:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len(":debuginfo=true",15))))||new_error){ if(qbevent){evnt(13061);if(r)goto S_15630;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("debuginfo = true",16)); if (new_error) goto skip2151; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2151: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13062);}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DebugInfo",9),qbs_add(qbs_new_txt_len("True",4),_FUNC_PARSECMDLINEARGS_STRING_DEBUGINFOINIWARNING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13063);}while(r); do{ *__LONG_IDEDEBUGINFO= -1 ; if(!qbevent)break;evnt(13064);}while(r); do{ *__LONG_INCLUDE_GDB_DEBUGGING_INFO=*__LONG_IDEDEBUGINFO; if(!qbevent)break;evnt(13065);}while(r); do{ SUB_PURGETEMPORARYBUILDFILES(__STRING_OS,&(pass2152=*__LONG_MACOSX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13066);}while(r); sc_ec_52_end:; goto sc_2136_end; } S_15636:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2136,qbs_new_txt_len(":debuginfo=false",16))))||new_error){ if(qbevent){evnt(13067);if(r)goto S_15636;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("debuginfo = false",17)); if (new_error) goto skip2153; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2153: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13068);}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DebugInfo",9),qbs_add(qbs_new_txt_len("False",5),_FUNC_PARSECMDLINEARGS_STRING_DEBUGINFOINIWARNING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13069);}while(r); do{ *__LONG_IDEDEBUGINFO= 0 ; if(!qbevent)break;evnt(13070);}while(r); do{ *__LONG_INCLUDE_GDB_DEBUGGING_INFO=*__LONG_IDEDEBUGINFO; if(!qbevent)break;evnt(13071);}while(r); do{ SUB_PURGETEMPORARYBUILDFILES(__STRING_OS,&(pass2154=*__LONG_MACOSX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13072);}while(r); sc_ec_53_end:; goto sc_2136_end; } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Invalid settings switch: ",25)); if (new_error) goto skip2155; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,_FUNC_PARSECMDLINEARGS_STRING_TOKEN); if (new_error) goto skip2155; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2155: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13074);}while(r); do{ tqbs=qbs_new(0,0); qbs_print(nothingstring,1); skip2156: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13075);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Valid switches:",15)); if (new_error) goto skip2157; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2157: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13076);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -s:debuginfo=true/false (Embed C++ debug info into .EXE)",64)); if (new_error) goto skip2158; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2158: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13077);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" -s:exewithsource=true/false (Save .EXE in the source folder)",64)); if (new_error) goto skip2159; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip2159: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13078);}while(r); do{ if(qbevent){evnt(13079);} exit_code= 1 ; if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13079);}while(r); sc_2136_end:; do{ sub__dest( 0 ); if(!qbevent)break;evnt(13081);}while(r); sc_ec_54_end:; goto sc_2112_end; } S_15651:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-l",2))))||new_error){ if(qbevent){evnt(13082);if(r)goto S_15651;} S_15652:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_PARSECMDLINEARGS_STRING_TOKEN, 3 , 1 ,1),qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(13083);if(r)goto S_15652;} do{ *__LONG_IDESTARTATLINE=qbr(func_val(func_mid(_FUNC_PARSECMDLINEARGS_STRING_TOKEN, 4 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13083);}while(r); } do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13084);}while(r); sc_ec_55_end:; goto sc_2112_end; } S_15656:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-p",2))))||new_error){ if(qbevent){evnt(13085);if(r)goto S_15656;} do{ SUB_PURGETEMPORARYBUILDFILES(__STRING_OS,&(pass2160=*__LONG_MACOSX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13086);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13087);}while(r); sc_ec_56_end:; goto sc_2112_end; } S_15659:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_2112,qbs_new_txt_len("-z",2))))||new_error){ if(qbevent){evnt(13088);if(r)goto S_15659;} do{ *__LONG_NO_C_COMPILE_MODE= 1 ; if(!qbevent)break;evnt(13089);}while(r); do{ *__LONG_CONSOLEMODE= 1 ; if(!qbevent)break;evnt(13090);}while(r); do{ *__LONG_NOIDEMODE= 1 ; if(!qbevent)break;evnt(13091);}while(r); do{ *_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH= -1 ; if(!qbevent)break;evnt(13092);}while(r); sc_ec_57_end:; goto sc_2112_end; } S_15665:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_PARSECMDLINEARGS_STRING_PASSEDFILENAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13094);if(r)goto S_15665;} do{ qbs_set(_FUNC_PARSECMDLINEARGS_STRING_PASSEDFILENAME,_FUNC_PARSECMDLINEARGS_STRING_TOKEN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13094);}while(r); } sc_2112_end:; fornext_continue_2110:; } fornext_exit_2110:; S_15670:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_PARSECMDLINEARGS_STRING_PASSEDFILENAME->len))||new_error){ if(qbevent){evnt(13098);if(r)goto S_15670;} do{ qbs_set(_FUNC_PARSECMDLINEARGS_STRING_PARSECMDLINEARGS,_FUNC_PARSECMDLINEARGS_STRING_PASSEDFILENAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13099);}while(r); }else{ S_15673:; if (((-(*_FUNC_PARSECMDLINEARGS_LONG_CMDLINESWITCH== 0 ))&(-(*_FUNC_PARSECMDLINEARGS_LONG_SETTINGSMODE== -1 )))||new_error){ if(qbevent){evnt(13101);if(r)goto S_15673;} do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(13101);}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; qbs_maketmp(_FUNC_PARSECMDLINEARGS_STRING_PARSECMDLINEARGS);return _FUNC_PARSECMDLINEARGS_STRING_PARSECMDLINEARGS; } 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 "data2.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T= 0 ; if(!qbevent)break;evnt(13106);}while(r); S_15678:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(13107);if(r)goto S_15678;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 65536 ; if(!qbevent)break;evnt(13107);}while(r); } S_15681:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(13108);if(r)goto S_15681;} S_15682:; if ((-((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1& 511 )== 1 ))||new_error){ if(qbevent){evnt(13109);if(r)goto S_15682;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 4096 ; if(!qbevent)break;evnt(13110);}while(r); }else{ do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 32768 ; if(!qbevent)break;evnt(13112);}while(r); } }else{ S_15688:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(13115);if(r)goto S_15688;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 512 ; if(!qbevent)break;evnt(13116);}while(r); }else{ S_15691:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(13118);if(r)goto S_15691;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 256 ; if(!qbevent)break;evnt(13119);}while(r); }else{ do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 128 ; if(!qbevent)break;evnt(13121);}while(r); S_15695:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(13122);if(r)goto S_15695;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 1024 ; if(!qbevent)break;evnt(13122);}while(r); } S_15698:; if ((*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(13123);if(r)goto S_15698;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+ 8192 ; if(!qbevent)break;evnt(13123);}while(r); } } do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S=(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1& 511 )/ 8 ; if(!qbevent)break;evnt(13125);}while(r); S_15703:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 1 ))||new_error){ if(qbevent){evnt(13126);if(r)goto S_15703;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13126);}while(r); } S_15706:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 2 ))||new_error){ if(qbevent){evnt(13127);if(r)goto S_15706;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13127);}while(r); } S_15709:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 4 ))||new_error){ if(qbevent){evnt(13128);if(r)goto S_15709;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13128);}while(r); } S_15712:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 8 ))||new_error){ if(qbevent){evnt(13129);if(r)goto S_15712;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13129);}while(r); } S_15715:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 16 ))||new_error){ if(qbevent){evnt(13130);if(r)goto S_15715;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13130);}while(r); } S_15718:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 32 ))||new_error){ if(qbevent){evnt(13131);if(r)goto S_15718;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13131);}while(r); } S_15721:; if ((-(*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S== 64 ))||new_error){ if(qbevent){evnt(13132);if(r)goto S_15721;} do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_T=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T+*_FUNC_TYPE2MEMTYPEVALUE_LONG_T1S; if(!qbevent)break;evnt(13132);}while(r); } } } do{ *_FUNC_TYPE2MEMTYPEVALUE_LONG_TYPE2MEMTYPEVALUE=*_FUNC_TYPE2MEMTYPEVALUE_LONG_T; if(!qbevent)break;evnt(13135);}while(r); 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_TYPE2MEMTYPEVALUE_LONG_TYPE2MEMTYPEVALUE; } int32 FUNC_ALLOCARRAY(qbs*_FUNC_ALLOCARRAY_STRING_N2,qbs*_FUNC_ALLOCARRAY_STRING_ELEMENTS,int32*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE,int32*_FUNC_ALLOCARRAY_LONG_UDT){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST=*__INTEGER_DIMSHARED; if(!qbevent)break;evnt(13140);}while(r); do{ *__INTEGER_DIMSHARED= 0 ; if(!qbevent)break;evnt(13140);}while(r); S_15729:; if ((-(*__LONG_AUTOARRAY== 1 ))||new_error){ if(qbevent){evnt(13142);if(r)goto S_15729;} do{ *__LONG_AUTOARRAY= 0 ; if(!qbevent)break;evnt(13142);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_AUTOARY= 1 ; if(!qbevent)break;evnt(13142);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13144);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E,_FUNC_ALLOCARRAY_STRING_ELEMENTS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13149);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_N,_FUNC_ALLOCARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13149);}while(r); S_15736:; if ((-(*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE== -2147483647 ))||new_error){ if(qbevent){evnt(13150);if(r)goto S_15736;} do{ *_FUNC_ALLOCARRAY_LONG_STRINGARRAY= 1 ; if(!qbevent)break;evnt(13150);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE= 8 ; if(!qbevent)break;evnt(13150);}while(r); } S_15740:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_ALLOCARRAY_STRING_E)== 63 )))||new_error){ if(qbevent){evnt(13152);if(r)goto S_15740;} 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(13153);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_UNDEFINED= -1 ; if(!qbevent)break;evnt(13154);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_NUME= 1 ; if(!qbevent)break;evnt(13155);}while(r); S_15744:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ALLOCARRAY_STRING_E->len== 1 )))||new_error){ if(qbevent){evnt(13156);if(r)goto S_15744;} do{ goto LABEL_UNDEFINEDARRAY; if(!qbevent)break;evnt(13156);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_UNDEFINED= 1 ; if(!qbevent)break;evnt(13157);}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(13158);}while(r); do{ goto LABEL_UNDEFINEDARRAY; if(!qbevent)break;evnt(13159);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_NUME= 1 ; if(!qbevent)break;evnt(13164);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_N=FUNC_NUMELEMENTS(_FUNC_ALLOCARRAY_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13165);}while(r); S_15753:; fornext_value2167= 1 ; fornext_finalvalue2167=*_FUNC_ALLOCARRAY_LONG_N; fornext_step2167= 1 ; if (fornext_step2167<0) fornext_step_negative2167=1; else fornext_step_negative2167=0; if (new_error) goto fornext_error2167; goto fornext_entrylabel2167; while(1){ fornext_value2167=fornext_step2167+(*_FUNC_ALLOCARRAY_LONG_I); fornext_entrylabel2167: *_FUNC_ALLOCARRAY_LONG_I=fornext_value2167; if (fornext_step_negative2167){ if (fornext_value2167fornext_finalvalue2167) break; } fornext_error2167:; if(qbevent){evnt(13166);if(r)goto S_15753;} 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(13167);}while(r); S_15755:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13168);if(r)goto S_15755;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B+ 1 ; if(!qbevent)break;evnt(13168);}while(r); } S_15758:; 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(13169);if(r)goto S_15758;} do{ *_FUNC_ALLOCARRAY_LONG_NUME=*_FUNC_ALLOCARRAY_LONG_NUME+ 1 ; if(!qbevent)break;evnt(13169);}while(r); } S_15761:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13170);if(r)goto S_15761;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B- 1 ; if(!qbevent)break;evnt(13170);}while(r); } fornext_continue_2166:; } fornext_exit_2166:; S_15765:; if (( 0 )||new_error){ if(qbevent){evnt(13172);if(r)goto S_15765;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2168; sub_file_print(tmp_fileno,qbs_new_txt_len("numelements count:",18), 0, 0, 0); if (new_error) goto skip2168; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_ALLOCARRAY_LONG_NUME)), 1, 0, 1); if (new_error) goto skip2168; skip2168: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13172);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_DESCSTATIC= 0 ; if(!qbevent)break;evnt(13174);}while(r); S_15769:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(13175);if(r)goto S_15769;} S_15770:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!=*_FUNC_ALLOCARRAY_LONG_NUME))||new_error){ if(qbevent){evnt(13176);if(r)goto S_15770;} S_15771:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))== -1 ))||new_error){ if(qbevent){evnt(13178);if(r)goto S_15771;} S_15772:; 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(13179);if(r)goto S_15772;} 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(13179);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13179);}while(r); } S_15776:; if ((-(*_FUNC_ALLOCARRAY_LONG_NUME== 1 ))||new_error){ if(qbevent){evnt(13180);if(r)goto S_15776;} do{ *(int16*)(((char*)__UDT_ID)+(516))= 1 ; if(!qbevent)break;evnt(13180);}while(r); do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516))= 1 ; if(!qbevent)break;evnt(13180);}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(13181);}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(13183);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13183);}while(r); } } S_15786:; if ((*(int16*)(((char*)__UDT_ID)+(518)))||new_error){ if(qbevent){evnt(13187);if(r)goto S_15786;} do{ *_FUNC_ALLOCARRAY_LONG_DESCSTATIC= 1 ; if(!qbevent)break;evnt(13187);}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(13190);}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(13192);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13193);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS= 1 ; if(!qbevent)break;evnt(13194);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=( 4 )+(*_FUNC_ALLOCARRAY_LONG_NUME* 4 )-( 4 ); if(!qbevent)break;evnt(13195);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_CURE= 1 ; if(!qbevent)break;evnt(13196);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13197);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13197);}while(r); S_15798:; fornext_value2170= 1 ; fornext_finalvalue2170=*_FUNC_ALLOCARRAY_LONG_N; fornext_step2170= 1 ; if (fornext_step2170<0) fornext_step_negative2170=1; else fornext_step_negative2170=0; if (new_error) goto fornext_error2170; goto fornext_entrylabel2170; while(1){ fornext_value2170=fornext_step2170+(*_FUNC_ALLOCARRAY_LONG_I); fornext_entrylabel2170: *_FUNC_ALLOCARRAY_LONG_I=fornext_value2170; if (fornext_step_negative2170){ if (fornext_value2170fornext_finalvalue2170) break; } fornext_error2170:; if(qbevent){evnt(13198);if(r)goto S_15798;} 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(13199);}while(r); S_15800:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13200);if(r)goto S_15800;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B+ 1 ; if(!qbevent)break;evnt(13200);}while(r); } S_15803:; 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(13201);if(r)goto S_15803;} S_15804:; if ((-(*_FUNC_ALLOCARRAY_LONG_I==*_FUNC_ALLOCARRAY_LONG_N))||new_error){ if(qbevent){evnt(13202);if(r)goto S_15804;} 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(13202);}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(13203);}while(r); S_15808:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13204);if(r)goto S_15808;} 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(13204);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_BASEGIVEN= 1 ; if(!qbevent)break;evnt(13208);}while(r); S_15812:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13209);if(r)goto S_15812;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,FUNC_STR2(&(pass2173=*__INTEGER_OPTIONBASE+ 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13209);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_BASEGIVEN= 0 ; if(!qbevent)break;evnt(13209);}while(r); } do{ *__INTEGER_CONSTEQUATION= 1 ; if(!qbevent)break;evnt(13210);}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(13212);}while(r); S_15818:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13213);if(r)goto S_15818;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13213);}while(r); } S_15821:; if ((*_FUNC_ALLOCARRAY_LONG_BASEGIVEN)||new_error){ if(qbevent){evnt(13214);if(r)goto S_15821;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_L,__STRING_TLAYOUT),__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("To",2))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13214);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,FUNC_EVALUATETOTYP(_FUNC_ALLOCARRAY_STRING_E3BASE,&(pass2174= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13215);}while(r); S_15825:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13216);if(r)goto S_15825;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13216);}while(r); } S_15828:; if ((-(*__INTEGER_CONSTEQUATION== 0 ))||new_error){ if(qbevent){evnt(13218);if(r)goto S_15828;} do{ *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS= 0 ; if(!qbevent)break;evnt(13218);}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(13219);}while(r); do{ *__INTEGER_CONSTEQUATION= 1 ; if(!qbevent)break;evnt(13221);}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(13223);}while(r); S_15834:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13224);if(r)goto S_15834;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13224);}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(13225);}while(r); S_15838:; if ((-(*_FUNC_ALLOCARRAY_LONG_I==*_FUNC_ALLOCARRAY_LONG_N))||new_error){ if(qbevent){evnt(13226);if(r)goto S_15838;} 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(13226);}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(13226);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,FUNC_EVALUATETOTYP(_FUNC_ALLOCARRAY_STRING_E3,&(pass2175= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13227);}while(r); S_15844:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13228);if(r)goto S_15844;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13228);}while(r); } S_15847:; if ((-(*__INTEGER_CONSTEQUATION== 0 ))||new_error){ if(qbevent){evnt(13230);if(r)goto S_15847;} do{ *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS= 0 ; if(!qbevent)break;evnt(13230);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13231);}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(&(pass2176=*_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(13232);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13233);}while(r); S_15853:; if ((-(*_FUNC_ALLOCARRAY_LONG_CURE== 1 ))||new_error){ if(qbevent){evnt(13235);if(r)goto S_15853;} 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(13237);}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(&(pass2177=*_FUNC_ALLOCARRAY_LONG_EI+ 4 ))),qbs_new_txt_len("]*",2)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2178=*_FUNC_ALLOCARRAY_LONG_EI+ 3 ))),qbs_new_txt_len("];",2)),_FUNC_ALLOCARRAY_STRING_CR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13239);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13241);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI+ 1 ; if(!qbevent)break;evnt(13242);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_EI=*_FUNC_ALLOCARRAY_LONG_EI- 8 ; if(!qbevent)break;evnt(13243);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_CURE=*_FUNC_ALLOCARRAY_LONG_CURE+ 1 ; if(!qbevent)break;evnt(13244);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13245);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13245);}while(r); do{ goto LABEL_AANEXTE; if(!qbevent)break;evnt(13246);}while(r); } S_15866:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ALLOCARRAY_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13248);if(r)goto S_15866;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_B- 1 ; if(!qbevent)break;evnt(13248);}while(r); } S_15869:; 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(13249);if(r)goto S_15869;} do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3BASE,_FUNC_ALLOCARRAY_STRING_E3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13250);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_E3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13251);}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(13253);}while(r); } LABEL_AANEXTE:; if(qbevent){evnt(13255);r=0;} fornext_continue_2169:; } fornext_exit_2169:; 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(13257);}while(r); LABEL_UNDEFINEDARRAY:; if(qbevent){evnt(13259);r=0;} do{ *_FUNC_ALLOCARRAY_LONG_CMEM= 0 ; if(!qbevent)break;evnt(13262);}while(r); S_15878:; if ((-(*__INTEGER_ARRAYDESC== 0 ))||new_error){ if(qbevent){evnt(13263);if(r)goto S_15878;} S_15879:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13264);if(r)goto S_15879;} do{ *_FUNC_ALLOCARRAY_LONG_CMEM= 1 ; if(!qbevent)break;evnt(13264);}while(r); } }else{ S_15883:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__INTEGER_ARRAYDESC)-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(13266);if(r)goto S_15883;} do{ *_FUNC_ALLOCARRAY_LONG_CMEM= 1 ; if(!qbevent)break;evnt(13266);}while(r); } } do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY=*_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS; if(!qbevent)break;evnt(13269);}while(r); S_15888:; if (((-(*__LONG_SUBFUNCN!= 0 ))&(-(*__LONG_DIMSTATIC== 0 )))||new_error){ if(qbevent){evnt(13270);if(r)goto S_15888;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13270);}while(r); } S_15891:; if ((-(*__LONG_DIMSTATIC== 3 ))||new_error){ if(qbevent){evnt(13271);if(r)goto S_15891;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13271);}while(r); } S_15894:; if ((*__INTEGER_DYNAMICMODE)||new_error){ if(qbevent){evnt(13272);if(r)goto S_15894;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13272);}while(r); } S_15897:; if ((*__INTEGER_REDIMOPTION)||new_error){ if(qbevent){evnt(13273);if(r)goto S_15897;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13273);}while(r); } S_15900:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(13274);if(r)goto S_15900;} do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13274);}while(r); } S_15903:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(13276);if(r)goto S_15903;} S_15904:; if ((-(*_FUNC_ALLOCARRAY_LONG_STATICARRAY== 1 ))||new_error){ if(qbevent){evnt(13277);if(r)goto S_15904;} S_15905:; if ((*_FUNC_ALLOCARRAY_LONG_DESCSTATIC)||new_error){ if(qbevent){evnt(13278);if(r)goto S_15905;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot redefine a static array!",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13278);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13278);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_STATICARRAY= 0 ; if(!qbevent)break;evnt(13279);}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(13288);}while(r); S_15913:; if ((-(*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE< 0 ))||new_error){ if(qbevent){evnt(13289);if(r)goto S_15913;} do{ *_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE=-(*_FUNC_ALLOCARRAY_LONG_ELEMENTSIZE); if(!qbevent)break;evnt(13290);}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(13291);}while(r); } S_15917:; if ((-(*__INTEGER_ARRAYDESC== 0 ))||new_error){ if(qbevent){evnt(13296);if(r)goto S_15917;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("ptrszint *",10),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13297);}while(r); do{ SUB_WRITEBUFLINE(&(pass2180=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (!",5),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13298);}while(r); do{ SUB_WRITEBUFLINE(&(pass2181=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("=(ptrszint*)mem_static_malloc(",30)),FUNC_STR2(&(pass2182=( 4 **_FUNC_ALLOCARRAY_LONG_NUME)+( 4 )+( 1 )))),qbs_new_txt_len("*ptrsz);",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13299);}while(r); do{ SUB_WRITEBUFLINE(&(pass2183=*__LONG_DATATXTBUF),qbs_new_txt_len("new_mem_lock();",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13301);}while(r); do{ SUB_WRITEBUFLINE(&(pass2184=*__LONG_DATATXTBUF),qbs_new_txt_len("mem_lock_tmp->type=4;",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13302);}while(r); do{ SUB_WRITEBUFLINE(&(pass2185=*__LONG_DATATXTBUF),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(&(pass2186=( 4 **_FUNC_ALLOCARRAY_LONG_NUME)+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("]=(ptrszint)mem_lock_tmp;",25))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13303);}while(r); } do{ qbs_set(_FUNC_ALLOCARRAY_STRING_SIZESTR,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13307);}while(r); S_15926:; fornext_value2188= 1 ; fornext_finalvalue2188=*_FUNC_ALLOCARRAY_LONG_NUME; fornext_step2188= 1 ; if (fornext_step2188<0) fornext_step_negative2188=1; else fornext_step_negative2188=0; if (new_error) goto fornext_error2188; goto fornext_entrylabel2188; while(1){ fornext_value2188=fornext_step2188+(*_FUNC_ALLOCARRAY_LONG_I); fornext_entrylabel2188: *_FUNC_ALLOCARRAY_LONG_I=fornext_value2188; if (fornext_step_negative2188){ if (fornext_value2188fornext_finalvalue2188) break; } fornext_error2188:; if(qbevent){evnt(13308);if(r)goto S_15926;} S_15927:; if ((-(*_FUNC_ALLOCARRAY_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(13309);if(r)goto S_15927;} 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(13309);}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(&(pass2189=(*_FUNC_ALLOCARRAY_LONG_I* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13310);}while(r); fornext_continue_2187:; } fornext_exit_2187:; do{ qbs_set(_FUNC_ALLOCARRAY_STRING_ELESIZESTR,_FUNC_ALLOCARRAY_STRING_SIZESTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13312);}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(13313);}while(r); S_15934:; if ((*_FUNC_ALLOCARRAY_LONG_STATICARRAY)||new_error){ if(qbevent){evnt(13318);if(r)goto S_15934;} do{ SUB_WRITEBUFLINE(&(pass2190=*__LONG_DATATXTBUF),_FUNC_ALLOCARRAY_STRING_SD); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13320);}while(r); S_15936:; if ((*_FUNC_ALLOCARRAY_LONG_CMEM&(-(*_FUNC_ALLOCARRAY_LONG_STRINGARRAY== 0 )))||new_error){ if(qbevent){evnt(13325);if(r)goto S_15936;} do{ SUB_WRITEBUFLINE(&(pass2191=*__LONG_DATATXTBUF),qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)cmem_static_pointer;",34))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13328);}while(r); do{ SUB_WRITEBUFLINE(&(pass2192=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13330);}while(r); do{ SUB_WRITEBUFLINE(&(pass2193=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if ((",5),_FUNC_ALLOCARRAY_STRING_SIZESTR),qbs_new_txt_len(")>65536) error(257);",20))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13332);}while(r); do{ SUB_WRITEBUFLINE(&(pass2194=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13334);}while(r); do{ SUB_WRITEBUFLINE(&(pass2195=*__LONG_DATATXTBUF),qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[2]=1+2+4;",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13336);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2196=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13339);}while(r); S_15944:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13340);if(r)goto S_15944;} do{ SUB_WRITEBUFLINE(&(pass2197=*__LONG_DATATXTBUF),qbs_add(qbs_add(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(13342);}while(r); do{ SUB_WRITEBUFLINE(&(pass2198=*__LONG_DATATXTBUF),qbs_new_txt_len("while(tmp_long--){",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13343);}while(r); S_15947:; if ((*_FUNC_ALLOCARRAY_LONG_CMEM)||new_error){ if(qbevent){evnt(13344);if(r)goto S_15947;} do{ SUB_WRITEBUFLINE(&(pass2199=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13345);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2200=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13347);}while(r); } do{ SUB_WRITEBUFLINE(&(pass2201=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13349);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2202=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13352);}while(r); } do{ SUB_WRITEBUFLINE(&(pass2203=*__LONG_DATATXTBUF),qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[2]=1+2;",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13354);}while(r); } S_15958:; if (((-(*_FUNC_ALLOCARRAY_LONG_UDT> 0 ))&((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_ALLOCARRAY_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||new_error){ if(qbevent){evnt(13357);if(r)goto S_15958;} do{ SUB_WRITEBUFLINE(&(pass2204=*__LONG_DATATXTBUF),qbs_add(qbs_add(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(13358);}while(r); do{ SUB_WRITEBUFLINE(&(pass2205=*__LONG_DATATXTBUF),qbs_new_txt_len("while(tmp_long--){",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13359);}while(r); do{ SUB_INITIALISE_ARRAY_UDT_VARSTRINGS(_FUNC_ALLOCARRAY_STRING_N,_FUNC_ALLOCARRAY_LONG_UDT,&(pass2206= 0 ),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT,_FUNC_ALLOCARRAY_STRING_ACC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13360);}while(r); do{ SUB_WRITEBUFLINE(&(pass2207=*__LONG_DATATXTBUF),_FUNC_ALLOCARRAY_STRING_ACC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13361);}while(r); do{ SUB_WRITEBUFLINE(&(pass2208=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13362);}while(r); } do{ SUB_WRITEBUFLINE(&(pass2209=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13366);}while(r); do{ *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=*_FUNC_ALLOCARRAY_LONG_NUME+ 65536 ; if(!qbevent)break;evnt(13367);}while(r); } S_15968:; if ((-(*_FUNC_ALLOCARRAY_LONG_STATICARRAY== 0 ))||new_error){ if(qbevent){evnt(13372);if(r)goto S_15968;} S_15969:; if ((-(*_FUNC_ALLOCARRAY_LONG_UNDEFINED== 0 ))||new_error){ if(qbevent){evnt(13374);if(r)goto S_15969;} 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(13379);}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(13380);}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(13381);}while(r); S_15973:; if ((-(*__INTEGER_REDIMOPTION== 0 ))||new_error){ if(qbevent){evnt(13386);if(r)goto S_15973;} 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(13387);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (!error_occurred) error(10);",31))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13388);}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(13389);}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(&(pass2210=( 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(13397);}while(r); S_15979:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13399);if(r)goto S_15979;} 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(13400);}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(13404);}while(r); S_15983:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13406);if(r)goto S_15983;} 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(13407);}while(r); do{ goto LABEL_SKIPERASE; if(!qbevent)break;evnt(13408);}while(r); } S_15987:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13412);if(r)goto S_15987;} 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(13413);}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(13414);}while(r); } S_15991:; if (((-(*_FUNC_ALLOCARRAY_LONG_UDT> 0 ))&((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_ALLOCARRAY_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||new_error){ if(qbevent){evnt(13417);if(r)goto S_15991;} 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(13418);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("while(tmp_long--) {",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13419);}while(r); do{ SUB_FREE_ARRAY_UDT_VARSTRINGS(_FUNC_ALLOCARRAY_STRING_N,_FUNC_ALLOCARRAY_LONG_UDT,&(pass2211= 0 ),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT,_FUNC_ALLOCARRAY_STRING_ACC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13420);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,_FUNC_ALLOCARRAY_STRING_ACC),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13421);}while(r); } S_15997:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13425);if(r)goto S_15997;} 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(13427);}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(13430);}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(13431);}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(13432);}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(13433);}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(13434);}while(r); } LABEL_SKIPERASE:; if(qbevent){evnt(13437);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(13439);}while(r); S_16007:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13440);if(r)goto S_16007;} 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(13441);}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(13451);}while(r); S_16012:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY|((-(*_FUNC_ALLOCARRAY_LONG_UDT> 0 ))&((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_ALLOCARRAY_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(13452);if(r)goto S_16012;} S_16013:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13456);if(r)goto S_16013;} 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(13457);}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(13459);}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_long2=",10)),_FUNC_ALLOCARRAY_STRING_ELESIZESTR),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13462);}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_long2 0 ))&((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_ALLOCARRAY_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||new_error){ if(qbevent){evnt(13525);if(r)goto S_16068;} do{ SUB_WRITEBUFLINE(&(pass2217=*__LONG_FREETXTBUF),qbs_new_txt_len("while(tmp_long--) {",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13526);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_ACC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13527);}while(r); do{ SUB_FREE_ARRAY_UDT_VARSTRINGS(_FUNC_ALLOCARRAY_STRING_N,_FUNC_ALLOCARRAY_LONG_UDT,&(pass2218= 0 ),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT,_FUNC_ALLOCARRAY_STRING_ACC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13528);}while(r); do{ SUB_WRITEBUFLINE(&(pass2219=*__LONG_FREETXTBUF),qbs_add(_FUNC_ALLOCARRAY_STRING_ACC,qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13529);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2220=*__LONG_FREETXTBUF),qbs_add(qbs_add(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(13531);}while(r); } do{ SUB_WRITEBUFLINE(&(pass2221=*__LONG_FREETXTBUF),qbs_add(qbs_add(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(13533);}while(r); do{ SUB_WRITEBUFLINE(&(pass2222=*__LONG_FREETXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13534);}while(r); do{ SUB_WRITEBUFLINE(&(pass2223=*__LONG_FREETXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("free_mem_lock( (mem_lock*)((ptrszint*)",38),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len(")[",2)),FUNC_STR2(&(pass2224=( 4 **_FUNC_ALLOCARRAY_LONG_NUME)+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("] );",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13536);}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(13543);}while(r); S_16082:; if ((-(*__INTEGER_REDIMOPTION== 2 ))||new_error){ if(qbevent){evnt(13545);if(r)goto S_16082;} 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(13546);}while(r); 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("memcpy(redim_preserve_cmem_buffer,(void*)(",42)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]),preserved_elements*",24)),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13550);}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(13552);}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(13553);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*",43)),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13554);}while(r); 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("memcpy((void*)(",15)),_FUNC_ALLOCARRAY_STRING_N),qbs_new_txt_len("[0]),redim_preserve_cmem_buffer,preserved_elements*",51)),_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13555);}while(r); do{ qbs_set(_FUNC_ALLOCARRAY_STRING_F12,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_F12,__STRING_CRLF),qbs_new_txt_len("if (preserved_elementsfornext_finalvalue2237) break; } fornext_error2237:; if(qbevent){evnt(13614);if(r)goto S_16131;} do{ *_FUNC_ALLOCARRAY_LONG_B=*_FUNC_ALLOCARRAY_LONG_I* 4 ; if(!qbevent)break;evnt(13615);}while(r); do{ SUB_WRITEBUFLINE(&(pass2238=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13616);}while(r); do{ SUB_WRITEBUFLINE(&(pass2239=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2240=*_FUNC_ALLOCARRAY_LONG_B+ 1 ))),qbs_new_txt_len("]=0;",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13617);}while(r); do{ SUB_WRITEBUFLINE(&(pass2241=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2242=*_FUNC_ALLOCARRAY_LONG_B+ 2 ))),qbs_new_txt_len("]=0;",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13618);}while(r); fornext_continue_2236:; } fornext_exit_2236:; S_16137:; if ((*_FUNC_ALLOCARRAY_LONG_STRINGARRAY)||new_error){ if(qbevent){evnt(13620);if(r)goto S_16137;} do{ SUB_WRITEBUFLINE(&(pass2243=*__LONG_DATATXTBUF),qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)¬hingstring;",29))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13622);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2244=*__LONG_DATATXTBUF),qbs_add(_FUNC_ALLOCARRAY_STRING_N,qbs_new_txt_len("[0]=(ptrszint)nothingvalue;",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13625);}while(r); } do{ SUB_WRITEBUFLINE(&(pass2245=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13627);}while(r); } S_16144:; if ((-(*_FUNC_ALLOCARRAY_LONG_UNDEFINED== 0 ))||new_error){ if(qbevent){evnt(13630);if(r)goto S_16144;} S_16145:; if ((-(*__INTEGER_REDIMOPTION== 0 ))||new_error){ if(qbevent){evnt(13632);if(r)goto S_16145;} 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(13632);}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(13633);}while(r); } do{ *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=*_FUNC_ALLOCARRAY_LONG_NUME; if(!qbevent)break;evnt(13637);}while(r); S_16151:; if ((-(*_FUNC_ALLOCARRAY_LONG_UNDEFINED== -1 ))||new_error){ if(qbevent){evnt(13638);if(r)goto S_16151;} do{ *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY= -1 ; if(!qbevent)break;evnt(13638);}while(r); } } S_16155:; if ((-(*_FUNC_ALLOCARRAY_LONG_AUTOARY== 0 ))||new_error){ if(qbevent){evnt(13642);if(r)goto S_16155;} S_16156:; if ((-(*__INTEGER_DIMOPTION== 3 ))||new_error){ if(qbevent){evnt(13643);if(r)goto S_16156;} do{ SUB_WRITEBUFLINE(&(pass2246=*__LONG_DATATXTBUF),_FUNC_ALLOCARRAY_STRING_F12); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13644);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2247=*__LONG_MAINTXTBUF),_FUNC_ALLOCARRAY_STRING_F12); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13646);}while(r); } } do{ *__INTEGER_DIMSHARED=*_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST; if(!qbevent)break;evnt(13658);}while(r); do{ qbs_set(__STRING_TLAYOUT,_FUNC_ALLOCARRAY_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13660);}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; 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 "data4.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(13664);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_IDNUMBER,FUNC_STR2(__LONG_CURRENTID)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13674);}while(r); do{ if(!qbevent)break;evnt(13676);}while(r); do{ memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 0),(((char*)__UDT_ID)+(0)+ 0), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 256),(((char*)__UDT_ID)+(0)+ 256), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 512),(((char*)__UDT_ID)+(0)+ 512), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 516),(((char*)__UDT_ID)+(0)+ 516), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 518),(((char*)__UDT_ID)+(0)+ 518), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 520),(((char*)__UDT_ID)+(0)+ 520), 8); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 528),(((char*)__UDT_ID)+(0)+ 528), 8); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 536),(((char*)__UDT_ID)+(0)+ 536), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 540),(((char*)__UDT_ID)+(0)+ 540), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 544),(((char*)__UDT_ID)+(0)+ 544), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 546),(((char*)__UDT_ID)+(0)+ 546), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 548),(((char*)__UDT_ID)+(0)+ 548), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 550),(((char*)__UDT_ID)+(0)+ 550), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 806),(((char*)__UDT_ID)+(0)+ 806), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 808),(((char*)__UDT_ID)+(0)+ 808), 1); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 809),(((char*)__UDT_ID)+(0)+ 809), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 811),(((char*)__UDT_ID)+(0)+ 811), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 813),(((char*)__UDT_ID)+(0)+ 813), 400); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 1213),(((char*)__UDT_ID)+(0)+ 1213), 400); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 1613),(((char*)__UDT_ID)+(0)+ 1613), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 1869),(((char*)__UDT_ID)+(0)+ 1869), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2125),(((char*)__UDT_ID)+(0)+ 2125), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2381),(((char*)__UDT_ID)+(0)+ 2381), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2385),(((char*)__UDT_ID)+(0)+ 2385), 256); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2641),(((char*)__UDT_ID)+(0)+ 2641), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2645),(((char*)__UDT_ID)+(0)+ 2645), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2647),(((char*)__UDT_ID)+(0)+ 2647), 100); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2747),(((char*)__UDT_ID)+(0)+ 2747), 100); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2847),(((char*)__UDT_ID)+(0)+ 2847), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2851),(((char*)__UDT_ID)+(0)+ 2851), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2853),(((char*)__UDT_ID)+(0)+ 2853), 2); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2855),(((char*)__UDT_ID)+(0)+ 2855), 4); memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2859),(((char*)__UDT_ID)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(0)+ 2861), *(qbs**)(((char*)__UDT_ID)+(0)+ 2861)); if(!qbevent)break;evnt(13678);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_STRING_INDEXES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13680);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_TYP=*(int32*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(512))+*__LONG_ISARRAY+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(13681);}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(13682);}while(r); S_16171:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13684);if(r)goto S_16171;} do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13685);}while(r); do{ goto LABEL_GOTARRAYINDEX; if(!qbevent)break;evnt(13686);}while(r); } do{ *_FUNC_ARRAYREFERENCE_LONG_N=FUNC_NUMELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13689);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_ELEMENTS= 1 ; if(!qbevent)break;evnt(13692);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_B= 0 ; if(!qbevent)break;evnt(13693);}while(r); S_16178:; fornext_value2250= 1 ; fornext_finalvalue2250=*_FUNC_ARRAYREFERENCE_LONG_N; fornext_step2250= 1 ; if (fornext_step2250<0) fornext_step_negative2250=1; else fornext_step_negative2250=0; if (new_error) goto fornext_error2250; goto fornext_entrylabel2250; while(1){ fornext_value2250=fornext_step2250+(*_FUNC_ARRAYREFERENCE_LONG_I); fornext_entrylabel2250: *_FUNC_ARRAYREFERENCE_LONG_I=fornext_value2250; if (fornext_step_negative2250){ if (fornext_value2250fornext_finalvalue2250) break; } fornext_error2250:; if(qbevent){evnt(13694);if(r)goto S_16178;} 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(13695);}while(r); S_16180:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_A== 40 ))||new_error){ if(qbevent){evnt(13696);if(r)goto S_16180;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B+ 1 ; if(!qbevent)break;evnt(13696);}while(r); } S_16183:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_A== 41 ))||new_error){ if(qbevent){evnt(13697);if(r)goto S_16183;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B- 1 ; if(!qbevent)break;evnt(13697);}while(r); } S_16186:; if (((-(*_FUNC_ARRAYREFERENCE_LONG_A== 44 ))&(-(*_FUNC_ARRAYREFERENCE_LONG_B== 0 )))||new_error){ if(qbevent){evnt(13698);if(r)goto S_16186;} do{ *_FUNC_ARRAYREFERENCE_LONG_ELEMENTS=*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS+ 1 ; if(!qbevent)break;evnt(13698);}while(r); } fornext_continue_2249:; } fornext_exit_2249:; S_16190:; if ((-(*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(516))== -1 ))||new_error){ if(qbevent){evnt(13701);if(r)goto S_16190;} S_16191:; 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(13702);if(r)goto S_16191;} 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(13702);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13702);}while(r); } S_16195:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS== 1 ))||new_error){ if(qbevent){evnt(13703);if(r)goto S_16195;} do{ *(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(516))= 1 ; if(!qbevent)break;evnt(13703);}while(r); do{ *(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516))= 1 ; if(!qbevent)break;evnt(13703);}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(13704);}while(r); }else{ S_16201:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS!=*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+(516))))||new_error){ if(qbevent){evnt(13706);if(r)goto S_16201;} 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(13706);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13706);}while(r); } } do{ *_FUNC_ARRAYREFERENCE_LONG_CURARG= 1 ; if(!qbevent)break;evnt(13709);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_FIRSTI= 1 ; if(!qbevent)break;evnt(13710);}while(r); S_16208:; fornext_value2252= 1 ; fornext_finalvalue2252=*_FUNC_ARRAYREFERENCE_LONG_N; fornext_step2252= 1 ; if (fornext_step2252<0) fornext_step_negative2252=1; else fornext_step_negative2252=0; if (new_error) goto fornext_error2252; goto fornext_entrylabel2252; while(1){ fornext_value2252=fornext_step2252+(*_FUNC_ARRAYREFERENCE_LONG_I); fornext_entrylabel2252: *_FUNC_ARRAYREFERENCE_LONG_I=fornext_value2252; if (fornext_step_negative2252){ if (fornext_value2252fornext_finalvalue2252) break; } fornext_error2252:; if(qbevent){evnt(13711);if(r)goto S_16208;} 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(13712);}while(r); S_16210:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13713);if(r)goto S_16210;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B+ 1 ; if(!qbevent)break;evnt(13713);}while(r); } S_16213:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13714);if(r)goto S_16213;} do{ *_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B- 1 ; if(!qbevent)break;evnt(13714);}while(r); } S_16216:; 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(13715);if(r)goto S_16216;} S_16217:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_I==*_FUNC_ARRAYREFERENCE_LONG_N))||new_error){ if(qbevent){evnt(13716);if(r)goto S_16217;} S_16218:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(13717);if(r)goto S_16218;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Array index missing",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13717);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13717);}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),&(pass2253= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13718);}while(r); S_16223:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13719);if(r)goto S_16223;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13719);}while(r); } }else{ do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_E,FUNC_EVALUATETOTYP(FUNC_GETELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_FIRSTI,&(pass2254=*_FUNC_ARRAYREFERENCE_LONG_I- 1 )),&(pass2255= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13721);}while(r); S_16228:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13722);if(r)goto S_16228;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13722);}while(r); } } S_16232:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13724);if(r)goto S_16232;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Array index missing",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13724);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13724);}while(r); } do{ *_FUNC_ARRAYREFERENCE_LONG_ARGI=((*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS-*_FUNC_ARRAYREFERENCE_LONG_CURARG)* 4 )+( 4 ); if(!qbevent)break;evnt(13725);}while(r); S_16237:; if ((-(*_FUNC_ARRAYREFERENCE_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(13726);if(r)goto S_16237;} S_16238:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(13727);if(r)goto S_16238;} 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(&(pass2256=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 1 ))),qbs_new_txt_len("])+",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13728);}while(r); }else{ do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("(",1)),_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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13730);}while(r); } }else{ S_16244:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(13734);if(r)goto S_16244;} 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(&(pass2257=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 1 ))),qbs_new_txt_len("])*",3)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2258=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 2 ))),qbs_new_txt_len("]+",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13735);}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(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("((",2)),_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("])*",3)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),FUNC_STR2(&(pass2259=*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 2 ))),qbs_new_txt_len("]+",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13737);}while(r); } } do{ *_FUNC_ARRAYREFERENCE_LONG_FIRSTI=*_FUNC_ARRAYREFERENCE_LONG_I+ 1 ; if(!qbevent)break;evnt(13740);}while(r); do{ *_FUNC_ARRAYREFERENCE_LONG_CURARG=*_FUNC_ARRAYREFERENCE_LONG_CURARG+ 1 ; if(!qbevent)break;evnt(13741);}while(r); } fornext_continue_2251:; } fornext_exit_2251:; 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(13744);}while(r); LABEL_GOTARRAYINDEX:; if(qbevent){evnt(13745);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(13747);}while(r); do{ qbs_set(_FUNC_ARRAYREFERENCE_STRING_ARRAYREFERENCE,_FUNC_ARRAYREFERENCE_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13748);}while(r); 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_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 "data5.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_16257:; fornext_value2263= 1 ; fornext_finalvalue2263=*_SUB_ASSIGN_LONG_N; fornext_step2263= 1 ; if (fornext_step2263<0) fornext_step_negative2263=1; else fornext_step_negative2263=0; if (new_error) goto fornext_error2263; goto fornext_entrylabel2263; while(1){ fornext_value2263=fornext_step2263+(*_SUB_ASSIGN_LONG_I); fornext_entrylabel2263: *_SUB_ASSIGN_LONG_I=fornext_value2263; if (fornext_step_negative2263){ if (fornext_value2263fornext_finalvalue2263) break; } fornext_error2263:; if(qbevent){evnt(13754);if(r)goto S_16257;} 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(13755);}while(r); S_16259:; if ((-(*_SUB_ASSIGN_LONG_C== 40 ))||new_error){ if(qbevent){evnt(13756);if(r)goto S_16259;} do{ *_SUB_ASSIGN_LONG_B=*_SUB_ASSIGN_LONG_B+ 1 ; if(!qbevent)break;evnt(13756);}while(r); } S_16262:; if ((-(*_SUB_ASSIGN_LONG_C== 41 ))||new_error){ if(qbevent){evnt(13757);if(r)goto S_16262;} do{ *_SUB_ASSIGN_LONG_B=*_SUB_ASSIGN_LONG_B- 1 ; if(!qbevent)break;evnt(13757);}while(r); } S_16265:; if (((-(*_SUB_ASSIGN_LONG_C== 61 ))&(-(*_SUB_ASSIGN_LONG_B== 0 )))||new_error){ if(qbevent){evnt(13758);if(r)goto S_16265;} S_16266:; if ((-(*_SUB_ASSIGN_LONG_I== 1 ))||new_error){ if(qbevent){evnt(13759);if(r)goto S_16266;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ... =",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13759);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13759);}while(r); } S_16270:; if ((-(*_SUB_ASSIGN_LONG_I==*_SUB_ASSIGN_LONG_N))||new_error){ if(qbevent){evnt(13760);if(r)goto S_16270;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected = ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13760);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13760);}while(r); } do{ qbs_set(_SUB_ASSIGN_STRING_A2,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(_SUB_ASSIGN_STRING_A,&(pass2264= 1 ),&(pass2265=*_SUB_ASSIGN_LONG_I- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13762);}while(r); S_16275:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13763);if(r)goto S_16275;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13763);}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(13764);}while(r); S_16279:; if ((-(*_SUB_ASSIGN_LONG_I== 2 ))||new_error){ if(qbevent){evnt(13767);if(r)goto S_16279;} do{ *_SUB_ASSIGN_LONG_TRY=FUNC_FINDID(_SUB_ASSIGN_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13768);}while(r); S_16281:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13769);if(r)goto S_16281;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13769);}while(r); } S_16284:; while((*_SUB_ASSIGN_LONG_TRY)||new_error){ if(qbevent){evnt(13770);if(r)goto S_16284;} S_16285:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(13771);if(r)goto S_16285;} S_16286:; if ((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2641))))||new_error){ if(qbevent){evnt(13772);if(r)goto S_16286;} S_16287:; if ((-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(13773);if(r)goto S_16287;} do{ SUB_MAKEIDREFER(_SUB_ASSIGN_STRING_A2,_SUB_ASSIGN_LONG_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13774);}while(r); do{ goto LABEL_ASSIGNSIMPLEVARIABLE; if(!qbevent)break;evnt(13775);}while(r); } } } S_16293:; if ((-(*_SUB_ASSIGN_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(13779);if(r)goto S_16293;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(13779);}while(r); do{ *_SUB_ASSIGN_LONG_TRY=FUNC_FINDID(_SUB_ASSIGN_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13779);}while(r); }else{ do{ *_SUB_ASSIGN_LONG_TRY= 0 ; if(!qbevent)break;evnt(13779);}while(r); } S_16299:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13780);if(r)goto S_16299;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13780);}while(r); } dl_continue_2266:; } dl_exit_2266:; } 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(13784);}while(r); S_16305:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13784);if(r)goto S_16305;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13784);}while(r); } LABEL_ASSIGNSIMPLEVARIABLE:; if(qbevent){evnt(13785);r=0;} S_16308:; if ((-((*_SUB_ASSIGN_LONG_TYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(13786);if(r)goto S_16308;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable =",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13786);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13786);}while(r); } do{ SUB_SETREFER(_SUB_ASSIGN_STRING_A2,_SUB_ASSIGN_LONG_TYP,FUNC_GETELEMENTS(_SUB_ASSIGN_STRING_A,&(pass2267=*_SUB_ASSIGN_LONG_I+ 1 ),_SUB_ASSIGN_LONG_N),&(pass2268= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13787);}while(r); S_16313:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(13788);if(r)goto S_16313;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13788);}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(13789);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13791);}while(r); } fornext_continue_2262:; } fornext_exit_2262:; do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected =",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13795);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13795);}while(r); 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; } 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 "data6.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ memcpy((((char*)__UDT_ID)+(0)+ 0),(((char*)__UDT_CLEARIDDATA)+(0)+ 0), 256); memcpy((((char*)__UDT_ID)+(0)+ 256),(((char*)__UDT_CLEARIDDATA)+(0)+ 256), 256); memcpy((((char*)__UDT_ID)+(0)+ 512),(((char*)__UDT_CLEARIDDATA)+(0)+ 512), 4); memcpy((((char*)__UDT_ID)+(0)+ 516),(((char*)__UDT_CLEARIDDATA)+(0)+ 516), 2); memcpy((((char*)__UDT_ID)+(0)+ 518),(((char*)__UDT_CLEARIDDATA)+(0)+ 518), 2); memcpy((((char*)__UDT_ID)+(0)+ 520),(((char*)__UDT_CLEARIDDATA)+(0)+ 520), 8); memcpy((((char*)__UDT_ID)+(0)+ 528),(((char*)__UDT_CLEARIDDATA)+(0)+ 528), 8); memcpy((((char*)__UDT_ID)+(0)+ 536),(((char*)__UDT_CLEARIDDATA)+(0)+ 536), 4); memcpy((((char*)__UDT_ID)+(0)+ 540),(((char*)__UDT_CLEARIDDATA)+(0)+ 540), 4); memcpy((((char*)__UDT_ID)+(0)+ 544),(((char*)__UDT_CLEARIDDATA)+(0)+ 544), 2); memcpy((((char*)__UDT_ID)+(0)+ 546),(((char*)__UDT_CLEARIDDATA)+(0)+ 546), 2); memcpy((((char*)__UDT_ID)+(0)+ 548),(((char*)__UDT_CLEARIDDATA)+(0)+ 548), 2); memcpy((((char*)__UDT_ID)+(0)+ 550),(((char*)__UDT_CLEARIDDATA)+(0)+ 550), 256); memcpy((((char*)__UDT_ID)+(0)+ 806),(((char*)__UDT_CLEARIDDATA)+(0)+ 806), 2); memcpy((((char*)__UDT_ID)+(0)+ 808),(((char*)__UDT_CLEARIDDATA)+(0)+ 808), 1); memcpy((((char*)__UDT_ID)+(0)+ 809),(((char*)__UDT_CLEARIDDATA)+(0)+ 809), 2); memcpy((((char*)__UDT_ID)+(0)+ 811),(((char*)__UDT_CLEARIDDATA)+(0)+ 811), 2); memcpy((((char*)__UDT_ID)+(0)+ 813),(((char*)__UDT_CLEARIDDATA)+(0)+ 813), 400); memcpy((((char*)__UDT_ID)+(0)+ 1213),(((char*)__UDT_CLEARIDDATA)+(0)+ 1213), 400); memcpy((((char*)__UDT_ID)+(0)+ 1613),(((char*)__UDT_CLEARIDDATA)+(0)+ 1613), 256); memcpy((((char*)__UDT_ID)+(0)+ 1869),(((char*)__UDT_CLEARIDDATA)+(0)+ 1869), 256); memcpy((((char*)__UDT_ID)+(0)+ 2125),(((char*)__UDT_CLEARIDDATA)+(0)+ 2125), 256); memcpy((((char*)__UDT_ID)+(0)+ 2381),(((char*)__UDT_CLEARIDDATA)+(0)+ 2381), 4); memcpy((((char*)__UDT_ID)+(0)+ 2385),(((char*)__UDT_CLEARIDDATA)+(0)+ 2385), 256); memcpy((((char*)__UDT_ID)+(0)+ 2641),(((char*)__UDT_CLEARIDDATA)+(0)+ 2641), 4); memcpy((((char*)__UDT_ID)+(0)+ 2645),(((char*)__UDT_CLEARIDDATA)+(0)+ 2645), 2); memcpy((((char*)__UDT_ID)+(0)+ 2647),(((char*)__UDT_CLEARIDDATA)+(0)+ 2647), 100); memcpy((((char*)__UDT_ID)+(0)+ 2747),(((char*)__UDT_CLEARIDDATA)+(0)+ 2747), 100); memcpy((((char*)__UDT_ID)+(0)+ 2847),(((char*)__UDT_CLEARIDDATA)+(0)+ 2847), 4); memcpy((((char*)__UDT_ID)+(0)+ 2851),(((char*)__UDT_CLEARIDDATA)+(0)+ 2851), 2); memcpy((((char*)__UDT_ID)+(0)+ 2853),(((char*)__UDT_CLEARIDDATA)+(0)+ 2853), 2); memcpy((((char*)__UDT_ID)+(0)+ 2855),(((char*)__UDT_CLEARIDDATA)+(0)+ 2855), 4); memcpy((((char*)__UDT_ID)+(0)+ 2859),(((char*)__UDT_CLEARIDDATA)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__UDT_ID)+(0)+ 2861), *(qbs**)(((char*)__UDT_CLEARIDDATA)+(0)+ 2861)); if(!qbevent)break;evnt(13799);}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; } void SUB_VWATCHVARIABLE(qbs*_SUB_VWATCHVARIABLE_STRING_THIS,int8*_SUB_VWATCHVARIABLE_BYTE_ACTION){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(13803);}while(r); do{ if(!qbevent)break;evnt(13804);}while(r); S_16325:; if(qbevent){evnt(13806);if(r)goto S_16325;} S_16326:; if (((*_SUB_VWATCHVARIABLE_BYTE_ACTION==( -1 )))||new_error){ if(qbevent){evnt(13807);if(r)goto S_16326;} do{ *_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES= 0 ; if(!qbevent)break;evnt(13808);}while(r); do{ qbs_set(_SUB_VWATCHVARIABLE_STRING_LOCALVARIABLESLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13809);}while(r); do{ *_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES= 0 ; if(!qbevent)break;evnt(13810);}while(r); do{ qbs_set(_SUB_VWATCHVARIABLE_STRING_MAINMODULEVARIABLESLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13811);}while(r); sc_ec_58_end:; goto sc_2270_end; } S_16331:; if (((*_SUB_VWATCHVARIABLE_BYTE_ACTION==( 0 )))||new_error){ if(qbevent){evnt(13812);if(r)goto S_16331;} S_16332:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,__STRING_VWATCHVARIABLEEXCLUSIONS,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_VWATCHVARIABLE_STRING_THIS),qbs_new_txt_len("@",1)),0)> 0 ))|(qbs_equal(qbs_left(_SUB_VWATCHVARIABLE_STRING_THIS, 12 ),qbs_new_txt_len("_SUB_VWATCH_",12)))))||new_error){ if(qbevent){evnt(13813);if(r)goto S_16332;} do{ goto exit_subfunc; if(!qbevent)break;evnt(13814);}while(r); } do{ qbs_set(__STRING_VWATCHNEWVARIABLE,_SUB_VWATCHVARIABLE_STRING_THIS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13817);}while(r); S_16336:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13818);if(r)goto S_16336;} do{ *_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES=*_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES+ 1 ; if(!qbevent)break;evnt(13819);}while(r); do{ qbs_set(_SUB_VWATCHVARIABLE_STRING_MAINMODULEVARIABLESLIST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_VWATCHVARIABLE_STRING_MAINMODULEVARIABLESLIST,qbs_new_txt_len("vwatch_global_vars[",19)),FUNC_STR2(&(pass2271=*_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES- 1 ))),qbs_new_txt_len("] = &",5)),_SUB_VWATCHVARIABLE_STRING_THIS),qbs_new_txt_len(";",1)),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13820);}while(r); do{ SUB_MANAGEVARIABLELIST(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1),_SUB_VWATCHVARIABLE_STRING_THIS,&(pass2272=*_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES- 1 ),&(pass2273= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13821);}while(r); }else{ do{ *_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES=*_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES+ 1 ; if(!qbevent)break;evnt(13823);}while(r); do{ qbs_set(_SUB_VWATCHVARIABLE_STRING_LOCALVARIABLESLIST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_VWATCHVARIABLE_STRING_LOCALVARIABLESLIST,qbs_new_txt_len("vwatch_local_vars[",18)),FUNC_STR2(&(pass2274=*_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES- 1 ))),qbs_new_txt_len("] = &",5)),_SUB_VWATCHVARIABLE_STRING_THIS),qbs_new_txt_len(";",1)),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13824);}while(r); do{ SUB_MANAGEVARIABLELIST(qbs_new_fixed((((uint8*)__UDT_ID)+(256)),256,1),_SUB_VWATCHVARIABLE_STRING_THIS,&(pass2275=*_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES- 1 ),&(pass2276= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13825);}while(r); } sc_ec_59_end:; goto sc_2270_end; } S_16345:; if (((*_SUB_VWATCHVARIABLE_BYTE_ACTION==( 1 )))||new_error){ if(qbevent){evnt(13827);if(r)goto S_16345;} S_16346:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(13828);if(r)goto S_16346;} S_16347:; if ((-(*_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES> 0 ))||new_error){ if(qbevent){evnt(13829);if(r)goto S_16347;} do{ SUB_WRITEBUFLINE(&(pass2277=*__LONG_DATATXTBUF),qbs_new_txt_len("void *vwatch_local_vars[0];",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13830);}while(r); do{ SUB_WRITEBUFLINE(&(pass2278=*__LONG_GLOBTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("void *vwatch_global_vars[",25),qbs_str((int32)(*_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES))),qbs_new_txt_len("];",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13831);}while(r); do{ SUB_WRITEBUFLINE(&(pass2279=*__LONG_DATATXTBUF),_SUB_VWATCHVARIABLE_STRING_MAINMODULEVARIABLESLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13832);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2280=*__LONG_DATATXTBUF),qbs_new_txt_len("void *vwatch_local_vars[0];",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13834);}while(r); do{ SUB_WRITEBUFLINE(&(pass2281=*__LONG_GLOBTXTBUF),qbs_new_txt_len("void *vwatch_global_vars[0];",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13835);}while(r); } do{ qbs_set(_SUB_VWATCHVARIABLE_STRING_MAINMODULEVARIABLESLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13838);}while(r); do{ *_SUB_VWATCHVARIABLE_LONG_TOTALMAINMODULEVARIABLES= 0 ; if(!qbevent)break;evnt(13839);}while(r); }else{ S_16358:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_SUBFUNC,qbs_new_txt_len("SUB_VWATCH",10))))||new_error){ if(qbevent){evnt(13841);if(r)goto S_16358;} S_16359:; if ((-(*_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES> 0 ))||new_error){ if(qbevent){evnt(13842);if(r)goto S_16359;} do{ SUB_WRITEBUFLINE(&(pass2282=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("void *vwatch_local_vars[",24),qbs_str((int32)(*_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES))),qbs_new_txt_len("];",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13843);}while(r); do{ SUB_WRITEBUFLINE(&(pass2283=*__LONG_DATATXTBUF),_SUB_VWATCHVARIABLE_STRING_LOCALVARIABLESLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13844);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass2284=*__LONG_DATATXTBUF),qbs_new_txt_len("void *vwatch_local_vars[0];",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13846);}while(r); } }else{ do{ SUB_WRITEBUFLINE(&(pass2285=*__LONG_DATATXTBUF),qbs_new_txt_len("void *vwatch_local_vars[0];",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13849);}while(r); } do{ qbs_set(_SUB_VWATCHVARIABLE_STRING_LOCALVARIABLESLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13852);}while(r); do{ *_SUB_VWATCHVARIABLE_LONG_TOTALLOCALVARIABLES= 0 ; if(!qbevent)break;evnt(13853);}while(r); } sc_ec_60_end:; goto sc_2270_end; } sc_2270_end:; 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; } void SUB_VWATCHADDLABEL(int32*_SUB_VWATCHADDLABEL_LONG_THIS,int8*_SUB_VWATCHADDLABEL_BYTE_LASTLINE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(13859);}while(r); S_16373:; if ((-(*_SUB_VWATCHADDLABEL_BYTE_LASTLINE== 0 ))||new_error){ if(qbevent){evnt(13861);if(r)goto S_16373;} S_16374:; while((qbs_cleanup(qbs_tmp_base,-(*_SUB_VWATCHADDLABEL_LONG_THIS>__STRING_VWATCHUSEDLABELS->len)))||new_error){ if(qbevent){evnt(13862);if(r)goto S_16374;} do{ qbs_set(__STRING_VWATCHUSEDLABELS,qbs_add(__STRING_VWATCHUSEDLABELS,func_space( 1000 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13863);}while(r); do{ qbs_set(__STRING_VWATCHUSEDSKIPLABELS,qbs_add(__STRING_VWATCHUSEDSKIPLABELS,func_space( 1000 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13864);}while(r); ww_continue_2286:; } ww_exit_2286:; S_16378:; if ((-(*__LONG_FIRSTLINENUMBERLABELVWATCH== 0 ))||new_error){ if(qbevent){evnt(13867);if(r)goto S_16378;} do{ *__LONG_FIRSTLINENUMBERLABELVWATCH=*_SUB_VWATCHADDLABEL_LONG_THIS; if(!qbevent)break;evnt(13868);}while(r); }else{ S_16381:; if ((-(*_SUB_VWATCHADDLABEL_LONG_PREVSKIP!=*_SUB_VWATCHADDLABEL_LONG_PREVLABEL))||new_error){ if(qbevent){evnt(13870);if(r)goto S_16381;} do{ tqbs=__STRING_VWATCHUSEDSKIPLABELS; if (!new_error){ tmp_fileno=*_SUB_VWATCHADDLABEL_LONG_PREVLABEL; if (!new_error){ tmp_long= 1 ; 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(13871);}while(r); do{ SUB_WRITEBUFLINE(&(pass2288=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("VWATCH_SKIPLABEL_",17),FUNC_STR2(_SUB_VWATCHADDLABEL_LONG_PREVLABEL)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13872);}while(r); do{ *_SUB_VWATCHADDLABEL_LONG_PREVSKIP=*_SUB_VWATCHADDLABEL_LONG_PREVLABEL; if(!qbevent)break;evnt(13873);}while(r); } } S_16387:; if ((-(*_SUB_VWATCHADDLABEL_LONG_PREVLABEL!=*_SUB_VWATCHADDLABEL_LONG_THIS))||new_error){ if(qbevent){evnt(13877);if(r)goto S_16387;} do{ tqbs=__STRING_VWATCHUSEDLABELS; if (!new_error){ tmp_fileno=*_SUB_VWATCHADDLABEL_LONG_THIS; if (!new_error){ tmp_long= 1 ; 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(13878);}while(r); do{ SUB_WRITEBUFLINE(&(pass2289=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("VWATCH_LABEL_",13),FUNC_STR2(_SUB_VWATCHADDLABEL_LONG_THIS)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13879);}while(r); do{ *_SUB_VWATCHADDLABEL_LONG_PREVLABEL=*_SUB_VWATCHADDLABEL_LONG_THIS; if(!qbevent)break;evnt(13880);}while(r); do{ *__LONG_LASTLINENUMBERLABELVWATCH=*_SUB_VWATCHADDLABEL_LONG_THIS; if(!qbevent)break;evnt(13881);}while(r); } }else{ S_16394:; if ((-(*_SUB_VWATCHADDLABEL_LONG_PREVSKIP!=*_SUB_VWATCHADDLABEL_LONG_PREVLABEL))||new_error){ if(qbevent){evnt(13884);if(r)goto S_16394;} do{ tqbs=__STRING_VWATCHUSEDSKIPLABELS; if (!new_error){ tmp_fileno=*_SUB_VWATCHADDLABEL_LONG_PREVLABEL; if (!new_error){ tmp_long= 1 ; 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(13885);}while(r); do{ SUB_WRITEBUFLINE(&(pass2290=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("VWATCH_SKIPLABEL_",17),FUNC_STR2(_SUB_VWATCHADDLABEL_LONG_PREVLABEL)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13886);}while(r); do{ *_SUB_VWATCHADDLABEL_LONG_PREVSKIP=*_SUB_VWATCHADDLABEL_LONG_PREVLABEL; if(!qbevent)break;evnt(13887);}while(r); } } 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_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 "data9.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ SUB_XEND(); if(!qbevent)break;evnt(13893);}while(r); do{ SUB_WRITEBUFLINE(&(pass2291=*__LONG_MAINTXTBUF),qbs_new_txt_len("return;",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13895);}while(r); S_16402:; if ((*__LONG_VWATCHON&(-(*__LONG_FIRSTLINENUMBERLABELVWATCH> 0 )))||new_error){ if(qbevent){evnt(13897);if(r)goto S_16402;} do{ SUB_WRITEBUFLINE(&(pass2292=*__LONG_MAINTXTBUF),qbs_new_txt_len("VWATCH_SETNEXTLINE:;",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13898);}while(r); do{ SUB_WRITEBUFLINE(&(pass2293=*__LONG_MAINTXTBUF),qbs_new_txt_len("switch (*__LONG_VWATCH_GOTO) {",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13899);}while(r); S_16405:; fornext_value2295=*__LONG_FIRSTLINENUMBERLABELVWATCH; fornext_finalvalue2295=*__LONG_LASTLINENUMBERLABELVWATCH; fornext_step2295= 1 ; if (fornext_step2295<0) fornext_step_negative2295=1; else fornext_step_negative2295=0; if (new_error) goto fornext_error2295; goto fornext_entrylabel2295; while(1){ fornext_value2295=fornext_step2295+(*_SUB_CLOSEMAIN_LONG_I); fornext_entrylabel2295: *_SUB_CLOSEMAIN_LONG_I=fornext_value2295; if (fornext_step_negative2295){ if (fornext_value2295fornext_finalvalue2295) break; } fornext_error2295:; if(qbevent){evnt(13900);if(r)goto S_16405;} S_16406:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_VWATCHUSEDLABELS,*_SUB_CLOSEMAIN_LONG_I)== 1 )))||new_error){ if(qbevent){evnt(13901);if(r)goto S_16406;} do{ SUB_WRITEBUFLINE(&(pass2296=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" case ",9),FUNC_STR2(_SUB_CLOSEMAIN_LONG_I)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13902);}while(r); do{ SUB_WRITEBUFLINE(&(pass2297=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" goto VWATCH_LABEL_",26),FUNC_STR2(_SUB_CLOSEMAIN_LONG_I)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13903);}while(r); do{ SUB_WRITEBUFLINE(&(pass2298=*__LONG_MAINTXTBUF),qbs_new_txt_len(" break;",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13904);}while(r); } fornext_continue_2294:; } fornext_exit_2294:; do{ SUB_WRITEBUFLINE(&(pass2299=*__LONG_MAINTXTBUF),qbs_new_txt_len(" default:",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13907);}while(r); do{ SUB_WRITEBUFLINE(&(pass2300=*__LONG_MAINTXTBUF),qbs_new_txt_len(" *__LONG_VWATCH_GOTO=*__LONG_VWATCH_LINENUMBER;",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13908);}while(r); do{ SUB_WRITEBUFLINE(&(pass2301=*__LONG_MAINTXTBUF),qbs_new_txt_len(" goto VWATCH_SETNEXTLINE;",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13909);}while(r); do{ SUB_WRITEBUFLINE(&(pass2302=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13910);}while(r); do{ SUB_WRITEBUFLINE(&(pass2303=*__LONG_MAINTXTBUF),qbs_new_txt_len("VWATCH_SKIPLINE:;",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13912);}while(r); do{ SUB_WRITEBUFLINE(&(pass2304=*__LONG_MAINTXTBUF),qbs_new_txt_len("switch (*__LONG_VWATCH_GOTO) {",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13913);}while(r); S_16418:; fornext_value2306=*__LONG_FIRSTLINENUMBERLABELVWATCH; fornext_finalvalue2306=*__LONG_LASTLINENUMBERLABELVWATCH; fornext_step2306= 1 ; if (fornext_step2306<0) fornext_step_negative2306=1; else fornext_step_negative2306=0; if (new_error) goto fornext_error2306; goto fornext_entrylabel2306; while(1){ fornext_value2306=fornext_step2306+(*_SUB_CLOSEMAIN_LONG_I); fornext_entrylabel2306: *_SUB_CLOSEMAIN_LONG_I=fornext_value2306; if (fornext_step_negative2306){ if (fornext_value2306fornext_finalvalue2306) break; } fornext_error2306:; if(qbevent){evnt(13914);if(r)goto S_16418;} S_16419:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_VWATCHUSEDSKIPLABELS,*_SUB_CLOSEMAIN_LONG_I)== 1 )))||new_error){ if(qbevent){evnt(13915);if(r)goto S_16419;} do{ SUB_WRITEBUFLINE(&(pass2307=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" case -",10),FUNC_STR2(_SUB_CLOSEMAIN_LONG_I)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13916);}while(r); do{ SUB_WRITEBUFLINE(&(pass2308=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len(" goto VWATCH_SKIPLABEL_",30),FUNC_STR2(_SUB_CLOSEMAIN_LONG_I)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13917);}while(r); do{ SUB_WRITEBUFLINE(&(pass2309=*__LONG_MAINTXTBUF),qbs_new_txt_len(" break;",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13918);}while(r); } fornext_continue_2305:; } fornext_exit_2305:; do{ SUB_WRITEBUFLINE(&(pass2310=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13921);}while(r); } do{ SUB_WRITEBUFLINE(&(pass2311=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13925);}while(r); do{ SUB_WRITEBUFLINE(&(pass2312=*__LONG_RETTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13926);}while(r); do{ SUB_WRITEBUFLINE(&(pass2313=*__LONG_RETTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13927);}while(r); do{ SUB_WRITEBUFLINE(&(pass2314=*__LONG_RETTXTBUF),qbs_new_txt_len("error(3);",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13928);}while(r); do{ *__INTEGER_CLOSEDMAIN= 1 ; if(!qbevent)break;evnt(13930);}while(r); do{ *__LONG_FIRSTLINENUMBERLABELVWATCH= 0 ; if(!qbevent)break;evnt(13931);}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; } 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 "data10.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_COUNTELEMENTS_LONG_N=FUNC_NUMELEMENTS(_FUNC_COUNTELEMENTS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13935);}while(r); do{ *_FUNC_COUNTELEMENTS_LONG_C= 1 ; if(!qbevent)break;evnt(13936);}while(r); S_16435:; fornext_value2317= 1 ; fornext_finalvalue2317=*_FUNC_COUNTELEMENTS_LONG_N; fornext_step2317= 1 ; if (fornext_step2317<0) fornext_step_negative2317=1; else fornext_step_negative2317=0; if (new_error) goto fornext_error2317; goto fornext_entrylabel2317; while(1){ fornext_value2317=fornext_step2317+(*_FUNC_COUNTELEMENTS_LONG_I); fornext_entrylabel2317: *_FUNC_COUNTELEMENTS_LONG_I=fornext_value2317; if (fornext_step_negative2317){ if (fornext_value2317fornext_finalvalue2317) break; } fornext_error2317:; if(qbevent){evnt(13937);if(r)goto S_16435;} 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(13938);}while(r); S_16437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_COUNTELEMENTS_STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(13939);if(r)goto S_16437;} do{ *_FUNC_COUNTELEMENTS_LONG_B=*_FUNC_COUNTELEMENTS_LONG_B+ 1 ; if(!qbevent)break;evnt(13939);}while(r); } S_16440:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_COUNTELEMENTS_STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(13940);if(r)goto S_16440;} do{ *_FUNC_COUNTELEMENTS_LONG_B=*_FUNC_COUNTELEMENTS_LONG_B- 1 ; if(!qbevent)break;evnt(13940);}while(r); } S_16443:; if ((-(*_FUNC_COUNTELEMENTS_LONG_B< 0 ))||new_error){ if(qbevent){evnt(13941);if(r)goto S_16443;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected ) encountered",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13941);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13941);}while(r); } S_16447:; 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(13942);if(r)goto S_16447;} do{ *_FUNC_COUNTELEMENTS_LONG_C=*_FUNC_COUNTELEMENTS_LONG_C+ 1 ; if(!qbevent)break;evnt(13942);}while(r); } fornext_continue_2316:; } fornext_exit_2316:; do{ *_FUNC_COUNTELEMENTS_LONG_COUNTELEMENTS=*_FUNC_COUNTELEMENTS_LONG_C; if(!qbevent)break;evnt(13944);}while(r); 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; 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 "data11.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_DIM2_STRING_TYP,_FUNC_DIM2_STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13969);}while(r); do{ *_FUNC_DIM2_LONG_DIM2= 1 ; if(!qbevent)break;evnt(13970);}while(r); S_16454:; if (( 0 )||new_error){ if(qbevent){evnt(13972);if(r)goto S_16454;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2321; sub_file_print(tmp_fileno,qbs_new_txt_len("dim2 called",11), 0, 1, 0); if (new_error) goto skip2321; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_DIM2_LONG_METHOD)), 1, 0, 1); if (new_error) goto skip2321; skip2321: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(13972);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_CVARNAME,_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13974);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_L,_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13975);}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(13976);}while(r); S_16460:; if ((-(*__INTEGER_DIMSFARRAY== 1 ))||new_error){ if(qbevent){evnt(13978);if(r)goto S_16460;} do{ *_FUNC_DIM2_LONG_F= 0 ; if(!qbevent)break;evnt(13978);}while(r); }else{ do{ *_FUNC_DIM2_LONG_F= 1 ; if(!qbevent)break;evnt(13978);}while(r); } S_16465:; if (((-(*__LONG_DIMSTATIC!= 0 ))&(-(*__INTEGER_DIMSHARED== 0 )))||new_error){ if(qbevent){evnt(13980);if(r)goto S_16465;} do{ *__INTEGER_DEFDATAHANDLE=*__LONG_GLOBTXTBUF; if(!qbevent)break;evnt(13983);}while(r); do{ *__LONG_DATATXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("maindata.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13984);}while(r); do{ *__LONG_FREETXTBUF=FUNC_OPENBUFFER(qbs_new_txt_len("A",1),qbs_add(__STRING_TMPDIR,qbs_new_txt_len("mainfree.txt",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13985);}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(13989);}while(r); S_16471:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_TYP->len== 0 )))||new_error){ if(qbevent){evnt(13992);if(r)goto S_16471;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("DIM2: No type specified!",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(13992);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(13992);}while(r); } S_16475:; fornext_value2324= 1 ; fornext_finalvalue2324=*__LONG_LASTTYPE; fornext_step2324= 1 ; if (fornext_step2324<0) fornext_step_negative2324=1; else fornext_step_negative2324=0; if (new_error) goto fornext_error2324; goto fornext_entrylabel2324; while(1){ fornext_value2324=fornext_step2324+(*_FUNC_DIM2_LONG_I); fornext_entrylabel2324: *_FUNC_DIM2_LONG_I=fornext_value2324; if (fornext_step_negative2324){ if (fornext_value2324fornext_finalvalue2324) break; } fornext_error2324:; if(qbevent){evnt(13996);if(r)goto S_16475;} S_16476:; 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))))|(((qbs_equal(_FUNC_DIM2_STRING_TYP,qbs_new_txt_len("MEM",3)))&(qbs_equal(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)),qbs_new_txt_len("_MEM",4)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(13997);if(r)goto S_16476;} 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(13998);}while(r); S_16478:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_DIM2_STRING_TYP,qbs_new_txt_len("MEM",3)))&(qbs_equal(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)),qbs_new_txt_len("_MEM",4)))))||new_error){ if(qbevent){evnt(13999);if(r)goto S_16478;} do{ qbs_set(__STRING_DIM2TYPEPASSBACK,func_mid(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)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14000);}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(14003);}while(r); S_16482:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14006);if(r)goto S_16482;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(14007);}while(r); S_16484:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14008);if(r)goto S_16484;} do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14009);}while(r); S_16486:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14010);if(r)goto S_16486;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14010);}while(r); } S_16489:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(14011);if(r)goto S_16489;} S_16490:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(14012);if(r)goto S_16490;} 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_2325; if(!qbevent)break;evnt(14015);}while(r); } S_16496:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(14017);if(r)goto S_16496;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(14017);}while(r); do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_VARNAME); 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_16502:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14018);if(r)goto S_16502;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14018);}while(r); } dl_continue_2325:; } dl_exit_2325:; } 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); 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(14022);}while(r); S_16509:; 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(14023);if(r)goto S_16509;} S_16510:; if ((*_FUNC_DIM2_LONG_BITS% 8 )||new_error){ if(qbevent){evnt(14024);if(r)goto S_16510;} do{ *_FUNC_DIM2_LONG_BITS=*_FUNC_DIM2_LONG_BITS+ 8 -(*_FUNC_DIM2_LONG_BITS% 8 ); if(!qbevent)break;evnt(14024);}while(r); } } S_16514:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14027);if(r)goto S_16514;} S_16515:; 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_16515;} 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_16517:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14030);if(r)goto S_16517;} 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,&(pass2327=-(*_FUNC_DIM2_LONG_BITS)),_FUNC_DIM2_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14032);}while(r); S_16522:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14033);if(r)goto S_16522;} 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_16526:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14035);if(r)goto S_16526;} 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_16532:; 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_16532;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14041);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14042);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__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{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_UDTTYPE+*_FUNC_DIM2_LONG_I; if(!qbevent)break;evnt(14049);}while(r); S_16541:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14050);if(r)goto S_16541;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14050);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14051);}while(r); S_16545:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14053);if(r)goto S_16545;} 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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14056);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(14057);}while(r); do{ SUB_VWATCHVARIABLE(_FUNC_DIM2_STRING_N,&(pass2328= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14058);}while(r); S_16553:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14059);if(r)goto S_16553;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14059);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14060);}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(14064);}while(r); do{ *_FUNC_DIM2_LONG_BYTES=*_FUNC_DIM2_LONG_BITS/ 8 ; if(!qbevent)break;evnt(14064);}while(r); S_16560:; if ((*_FUNC_DIM2_LONG_BITS% 8 )||new_error){ if(qbevent){evnt(14065);if(r)goto S_16560;} do{ *_FUNC_DIM2_LONG_BYTES=*_FUNC_DIM2_LONG_BYTES+ 1 ; if(!qbevent)break;evnt(14066);}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); S_16564:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14069);if(r)goto S_16564;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("void *",6),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14069);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14070);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14071);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_UDTTYPE+*_FUNC_DIM2_LONG_I; if(!qbevent)break;evnt(14072);}while(r); S_16570:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14073);if(r)goto S_16570;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14074);}while(r); S_16572:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14075);if(r)goto S_16572;} do{ SUB_WRITEBUFLINE(&(pass2329=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14076);}while(r); do{ SUB_WRITEBUFLINE(&(pass2330=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14077);}while(r); do{ SUB_WRITEBUFLINE(&(pass2331=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 0 )))||new_error){ if(qbevent){evnt(14112);if(r)goto S_16609;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Expected more type information after ",37),__STRING_QB64PREFIX),qbs_new_txt_len("UNSIGNED!",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14112);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14112);}while(r); } } do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14115);}while(r); S_16615:; 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(14117);if(r)goto S_16615;} S_16616:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_TYP->len> 6 )))||new_error){ if(qbevent){evnt(14119);if(r)goto S_16616;} S_16617:; 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(14120);if(r)goto S_16617;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * number/constant",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14120);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14120);}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(14122);}while(r); do{ *_FUNC_DIM2_LONG_HASHFOUND= 0 ; if(!qbevent)break;evnt(14125);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_HASHNAME,_FUNC_DIM2_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14126);}while(r); do{ *_FUNC_DIM2_LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(14127);}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(14128);}while(r); S_16626:; while((*_FUNC_DIM2_LONG_HASHRES)||new_error){ if(qbevent){evnt(14129);if(r)goto S_16626;} S_16627:; 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(14130);if(r)goto S_16627;} S_16628:; 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(14131);if(r)goto S_16628;} do{ *_FUNC_DIM2_LONG_HASHFOUND= 1 ; if(!qbevent)break;evnt(14132);}while(r); do{ goto dl_exit_2345; if(!qbevent)break;evnt(14133);}while(r); } } S_16633:; if ((-(*_FUNC_DIM2_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(14136);if(r)goto S_16633;} do{ *_FUNC_DIM2_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_DIM2_LONG_HASHRESFLAGS,_FUNC_DIM2_LONG_HASHRESREF); if(!qbevent)break;evnt(14136);}while(r); }else{ do{ *_FUNC_DIM2_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(14136);}while(r); } dl_continue_2345:; } dl_exit_2345:; S_16639:; if ((*_FUNC_DIM2_LONG_HASHFOUND)||new_error){ if(qbevent){evnt(14138);if(r)goto S_16639;} do{ *_FUNC_DIM2_LONG_I2=*_FUNC_DIM2_LONG_HASHRESREF; if(!qbevent)break;evnt(14139);}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(14140);}while(r); S_16642:; if ((*_FUNC_DIM2_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(14141);if(r)goto S_16642;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * numeric-constant",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14141);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14141);}while(r); } S_16646:; if ((*_FUNC_DIM2_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(14143);if(r)goto S_16646;} 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(14144);}while(r); do{ *_FUNC_DIM2_INTEGER64_V=qbr(*_FUNC_DIM2_FLOAT_V); if(!qbevent)break;evnt(14145);}while(r); do{ *_FUNC_DIM2_UINTEGER64_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(14146);}while(r); }else{ S_16651:; if ((*_FUNC_DIM2_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(14148);if(r)goto S_16651;} 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(14149);}while(r); do{ *_FUNC_DIM2_INTEGER64_V=*_FUNC_DIM2_UINTEGER64_V; if(!qbevent)break;evnt(14150);}while(r); do{ *_FUNC_DIM2_FLOAT_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(14151);}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(14153);}while(r); do{ *_FUNC_DIM2_FLOAT_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(14154);}while(r); do{ *_FUNC_DIM2_UINTEGER64_V=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(14155);}while(r); } } S_16661:; if (((-(*_FUNC_DIM2_INTEGER64_V< 1 ))|(-(*_FUNC_DIM2_INTEGER64_V> 9999999999ll )))||new_error){ if(qbevent){evnt(14158);if(r)goto S_16661;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("STRING * out-of-range constant",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14158);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14158);}while(r); } do{ *_FUNC_DIM2_LONG_BYTES=*_FUNC_DIM2_INTEGER64_V; if(!qbevent)break;evnt(14159);}while(r); do{ qbs_set(__STRING_DIM2TYPEPASSBACK,qbs_add(FUNC_SCASE(qbs_new_txt_len("String * ",9)),((qbs*)(((uint64*)(__ARRAY_STRING_CONSTCNAME[0]))[array_check((*_FUNC_DIM2_LONG_I2)-__ARRAY_STRING_CONSTCNAME[4],__ARRAY_STRING_CONSTCNAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14160);}while(r); do{ goto LABEL_CONSTANTLENSTR; if(!qbevent)break;evnt(14161);}while(r); } S_16669:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_DIM2_STRING_C)== 0 )))||new_error){ if(qbevent){evnt(14164);if(r)goto S_16669;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number/Constant expected after *",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14164);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14164);}while(r); } S_16673:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_C->len> 10 )))||new_error){ if(qbevent){evnt(14165);if(r)goto S_16673;} 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(14165);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14165);}while(r); } do{ *_FUNC_DIM2_LONG_BYTES=qbr(func_val(_FUNC_DIM2_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14166);}while(r); S_16678:; if ((-(*_FUNC_DIM2_LONG_BYTES== 0 ))||new_error){ if(qbevent){evnt(14167);if(r)goto S_16678;} 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(14167);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14167);}while(r); } LABEL_CONSTANTLENSTR:; if(qbevent){evnt(14168);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(14169);}while(r); S_16683:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14172);if(r)goto S_16683;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(14173);}while(r); S_16685:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14174);if(r)goto S_16685;} 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(14175);}while(r); S_16687:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14176);if(r)goto S_16687;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14176);}while(r); } S_16690:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(14177);if(r)goto S_16690;} S_16691:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(14178);if(r)goto S_16691;} 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(14179);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(14180);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14180);}while(r); do{ goto dl_exit_2347; if(!qbevent)break;evnt(14181);}while(r); } S_16697:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(14183);if(r)goto S_16697;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(14183);}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(14183);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(14183);}while(r); } S_16703:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14184);if(r)goto S_16703;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14184);}while(r); } dl_continue_2347:; } dl_exit_2347:; } 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(14187);}while(r); S_16709:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14193);if(r)goto S_16709;} S_16710:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14195);if(r)goto S_16710;} 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(14196);}while(r); S_16712:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14196);if(r)goto S_16712;} 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(14196);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,_FUNC_DIM2_LONG_BYTES,&(pass2349= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14198);}while(r); S_16717:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14199);if(r)goto S_16717;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14199);}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(14200);}while(r); S_16721:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14201);if(r)goto S_16721;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14201);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14202);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14205);}while(r); S_16727:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14206);if(r)goto S_16727;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14207);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14208);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14209);}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(14211);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(14215);}while(r); S_16736:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14216);if(r)goto S_16736;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14216);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14217);}while(r); S_16740:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14218);if(r)goto S_16740;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14218);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14218);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14220);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14221);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(540))=*_FUNC_DIM2_LONG_BYTES; if(!qbevent)break;evnt(14222);}while(r); S_16747:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(14223);if(r)goto S_16747;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14224);}while(r); } S_16750:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(14226);if(r)goto S_16750;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14227);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(14229);}while(r); S_16754:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14230);if(r)goto S_16754;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14230);}while(r); } do{ SUB_VWATCHVARIABLE(_FUNC_DIM2_STRING_N,&(pass2350= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14231);}while(r); do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14232);}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(14236);}while(r); S_16761:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14237);if(r)goto S_16761;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14237);}while(r); } S_16764:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14238);if(r)goto S_16764;} do{ SUB_WRITEBUFLINE(&(pass2351=*__LONG_FREETXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_FUNC_DIM2_STRING_N),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14238);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14239);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14240);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(14241);}while(r); S_16770:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14242);if(r)goto S_16770;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14243);}while(r); S_16772:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14244);if(r)goto S_16772;} do{ SUB_WRITEBUFLINE(&(pass2352=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14244);}while(r); } S_16775:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14245);if(r)goto S_16775;} do{ SUB_WRITEBUFLINE(&(pass2353=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14245);}while(r); } S_16778:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14246);if(r)goto S_16778;} do{ SUB_WRITEBUFLINE(&(pass2354=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_spchr,0,",8)),FUNC_STR2(_FUNC_DIM2_LONG_BYTES)),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14248);}while(r); } S_16787:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14249);if(r)goto S_16787;} do{ SUB_WRITEBUFLINE(&(pass2357=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14249);}while(r); } }else{ S_16791:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14251);if(r)goto S_16791;} do{ SUB_WRITEBUFLINE(&(pass2358=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14251);}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(14252);}while(r); S_16795:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14253);if(r)goto S_16795;} do{ SUB_WRITEBUFLINE(&(pass2359=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14253);}while(r); } S_16798:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14254);if(r)goto S_16798;} do{ SUB_WRITEBUFLINE(&(pass2360=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14254);}while(r); } S_16801:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14255);if(r)goto S_16801;} do{ SUB_WRITEBUFLINE(&(pass2361=*__LONG_DATATXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14255);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(540))=*_FUNC_DIM2_LONG_BYTES; if(!qbevent)break;evnt(14257);}while(r); S_16806:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(14258);if(r)goto S_16806;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14259);}while(r); } S_16809:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(14261);if(r)goto S_16809;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14262);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14264);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(14265);}while(r); do{ SUB_VWATCHVARIABLE(_FUNC_DIM2_STRING_N,&(pass2362= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14266);}while(r); S_16815:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14267);if(r)goto S_16815;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14267);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14268);}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(14272);}while(r); S_16821:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14275);if(r)goto S_16821;} do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(14276);}while(r); S_16823:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14277);if(r)goto S_16823;} 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(14278);}while(r); S_16825:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14279);if(r)goto S_16825;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14279);}while(r); } S_16828:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(14280);if(r)goto S_16828;} S_16829:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(14281);if(r)goto S_16829;} 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(14282);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(14283);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14283);}while(r); do{ goto dl_exit_2363; if(!qbevent)break;evnt(14284);}while(r); } S_16835:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(14286);if(r)goto S_16835;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(14286);}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(14286);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(14286);}while(r); } S_16841:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14287);if(r)goto S_16841;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14287);}while(r); } dl_continue_2363:; } dl_exit_2363:; } 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(14290);}while(r); S_16847:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14296);if(r)goto S_16847;} S_16848:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14298);if(r)goto S_16848;} 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(14299);}while(r); S_16850:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14299);if(r)goto S_16850;} 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(14299);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2365= -2147483647 ),&(pass2366= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14301);}while(r); S_16855:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14302);if(r)goto S_16855;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14302);}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(14303);}while(r); S_16859:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14304);if(r)goto S_16859;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14304);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14305);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14308);}while(r); S_16865:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14309);if(r)goto S_16865;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14310);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14311);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14312);}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(14314);}while(r); } } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14318);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(14319);}while(r); S_16875:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14320);if(r)goto S_16875;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14320);}while(r); } S_16878:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14321);if(r)goto S_16878;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14321);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14321);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14323);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14324);}while(r); S_16884:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(14325);if(r)goto S_16884;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14326);}while(r); } S_16887:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(14328);if(r)goto S_16887;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14329);}while(r); } do{ SUB_REGID(); if(!qbevent)break;evnt(14331);}while(r); S_16891:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14332);if(r)goto S_16891;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14332);}while(r); } do{ SUB_VWATCHVARIABLE(_FUNC_DIM2_STRING_N,&(pass2367= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14333);}while(r); do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14334);}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(14338);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14339);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14340);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(14341);}while(r); S_16901:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14342);if(r)goto S_16901;} S_16902:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14343);if(r)goto S_16902;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14343);}while(r); } S_16905:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14344);if(r)goto S_16905;} do{ SUB_WRITEBUFLINE(&(pass2368=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14344);}while(r); } do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14345);}while(r); }else{ S_16910:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14347);if(r)goto S_16910;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_FUNC_DIM2_STRING_N),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14347);}while(r); } S_16913:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14348);if(r)goto S_16913;} do{ SUB_WRITEBUFLINE(&(pass2369=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14348);}while(r); } } S_16917:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(14350);if(r)goto S_16917;} do{ SUB_WRITEBUFLINE(&(pass2370=*__LONG_FREETXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_FUNC_DIM2_STRING_N),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14350);}while(r); } S_16920:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(14351);if(r)goto S_16920;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14352);}while(r); } S_16923:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(14354);if(r)goto S_16923;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14355);}while(r); } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14357);}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(14358);}while(r); do{ SUB_VWATCHVARIABLE(_FUNC_DIM2_STRING_N,&(pass2371= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14359);}while(r); S_16929:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14360);if(r)goto S_16929;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14360);}while(r); } do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14361);}while(r); } S_16934:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_DIM2_STRING_TYP, 4 ),qbs_new_txt_len("_BIT",4)))|(((qbs_equal(qbs_left(_FUNC_DIM2_STRING_TYP, 3 ),qbs_new_txt_len("BIT",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(14364);if(r)goto S_16934;} S_16935:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(qbs_left(_FUNC_DIM2_STRING_TYP, 4 ),qbs_new_txt_len("_BIT",4)))&(-(_FUNC_DIM2_STRING_TYP->len> 4 )))|((qbs_equal(qbs_left(_FUNC_DIM2_STRING_TYP, 3 ),qbs_new_txt_len("BIT",3)))&(-(_FUNC_DIM2_STRING_TYP->len> 3 )))))||new_error){ if(qbevent){evnt(14365);if(r)goto S_16935;} S_16936:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_left(_FUNC_DIM2_STRING_TYP, 7 ),qbs_new_txt_len("_BIT * ",7)))&(qbs_notequal(qbs_left(_FUNC_DIM2_STRING_TYP, 6 ),qbs_new_txt_len("BIT * ",6)))))||new_error){ if(qbevent){evnt(14366);if(r)goto S_16936;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Expected ",9),__STRING_QB64PREFIX),qbs_new_txt_len("BIT * number",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14366);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14366);}while(r); } do{ qbs_set(_FUNC_DIM2_STRING_C,func_mid(_FUNC_DIM2_STRING_TYP,func_instr(NULL,_FUNC_DIM2_STRING_TYP,qbs_new_txt_len(" * ",3),0)+ 3 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14367);}while(r); S_16941:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_DIM2_STRING_C)== 0 )))||new_error){ if(qbevent){evnt(14368);if(r)goto S_16941;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number expected after *",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14368);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14368);}while(r); } S_16945:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_DIM2_STRING_C->len> 2 )))||new_error){ if(qbevent){evnt(14369);if(r)goto S_16945;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot create a bit variable of size > 64 bits",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14369);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14369);}while(r); } do{ *_FUNC_DIM2_LONG_BITS=qbr(func_val(_FUNC_DIM2_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14370);}while(r); S_16950:; if ((-(*_FUNC_DIM2_LONG_BITS== 0 ))||new_error){ if(qbevent){evnt(14371);if(r)goto S_16950;} 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(14371);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14371);}while(r); } S_16954:; if ((-(*_FUNC_DIM2_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(14372);if(r)goto S_16954;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot create a bit variable of size > 64 bits",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14372);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14372);}while(r); } }else{ do{ *_FUNC_DIM2_LONG_BITS= 1 ; if(!qbevent)break;evnt(14374);}while(r); } S_16961:; if ((-(*_FUNC_DIM2_LONG_BITS<= 32 ))||new_error){ if(qbevent){evnt(14376);if(r)goto S_16961;} do{ qbs_set(_FUNC_DIM2_STRING_CT,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14376);}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(14376);}while(r); } S_16966:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14377);if(r)goto S_16966;} do{ qbs_set(_FUNC_DIM2_STRING_N,qbs_new_txt_len("U",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14377);}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(14377);}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(14378);}while(r); S_16971:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(14381);if(r)goto S_16971;} S_16972:; if ((-(*_FUNC_DIM2_LONG_BITS> 63 ))||new_error){ if(qbevent){evnt(14382);if(r)goto S_16972;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot create a bit array of size > 63 bits",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14382);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(14382);}while(r); } do{ *__INTEGER_ARRAYDESC= 0 ; if(!qbevent)break;evnt(14383);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_CMPS,_FUNC_DIM2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14384);}while(r); S_16978:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14384);if(r)goto S_16978;} 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(14384);}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(14385);}while(r); S_16982:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14386);if(r)goto S_16982;} do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_CMPS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14387);}while(r); S_16984:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14388);if(r)goto S_16984;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14388);}while(r); } S_16987:; while((*_FUNC_DIM2_LONG_TRY)||new_error){ if(qbevent){evnt(14389);if(r)goto S_16987;} S_16988:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(14390);if(r)goto S_16988;} 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(14391);}while(r); do{ *__INTEGER_ARRAYDESC=*__LONG_CURRENTID; if(!qbevent)break;evnt(14392);}while(r); do{ qbs_set(_FUNC_DIM2_STRING_SCOPE2,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14392);}while(r); do{ goto dl_exit_2375; if(!qbevent)break;evnt(14393);}while(r); } S_16994:; if ((-(*_FUNC_DIM2_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(14395);if(r)goto S_16994;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(14395);}while(r); do{ *_FUNC_DIM2_LONG_TRY=FUNC_FINDID(_FUNC_DIM2_STRING_CMPS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14395);}while(r); }else{ do{ *_FUNC_DIM2_LONG_TRY= 0 ; if(!qbevent)break;evnt(14395);}while(r); } S_17000:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14396);if(r)goto S_17000;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14396);}while(r); } dl_continue_2375:; } dl_exit_2375:; } 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(14399);}while(r); S_17006:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14405);if(r)goto S_17006;} S_17007:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_DIM2_STRING_ELEMENTS->len== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14407);if(r)goto S_17007;} 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(14408);}while(r); S_17009:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14408);if(r)goto S_17009;} 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(14408);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2377=-(*_FUNC_DIM2_LONG_BITS)),&(pass2378= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14410);}while(r); S_17014:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14411);if(r)goto S_17014;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14411);}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(14412);}while(r); S_17018:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14413);if(r)goto S_17018;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14413);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14414);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14417);}while(r); S_17024:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14418);if(r)goto S_17024;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14419);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14420);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14421);}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(14423);}while(r); } } do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),_FUNC_DIM2_STRING_CVARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14427);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_BITTYPE- 1 +*_FUNC_DIM2_LONG_BITS; if(!qbevent)break;evnt(14428);}while(r); S_17034:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14429);if(r)goto S_17034;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14429);}while(r); } S_17037:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14430);if(r)goto S_17037;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14430);}while(r); } S_17040:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14431);if(r)goto S_17040;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14431);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14431);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14433);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14434);}while(r); S_17046:; if ((-(*_FUNC_DIM2_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(14435);if(r)goto S_17046;} S_17047:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14436);if(r)goto S_17047;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14436);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14436);}while(r); } } S_17053:; if ((-(*_FUNC_DIM2_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(14438);if(r)goto S_17053;} S_17054:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14439);if(r)goto S_17054;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14439);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14439);}while(r); } } do{ SUB_REGID(); if(!qbevent)break;evnt(14441);}while(r); S_17061:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14442);if(r)goto S_17061;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14442);}while(r); } do{ SUB_VWATCHVARIABLE(_FUNC_DIM2_STRING_N,&(pass2379= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14443);}while(r); do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14444);}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(14447);}while(r); do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14448);}while(r); do{ SUB_WRITEBUFLINE(&(pass2380=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14449);}while(r); do{ SUB_WRITEBUFLINE(&(pass2381=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=4;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14450);}while(r); do{ SUB_WRITEBUFLINE(&(pass2382=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14501);if(r)goto S_17142;} 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(14502);}while(r); S_17144:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14502);if(r)goto S_17144;} 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(14502);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2389= 1 ),&(pass2390= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14504);}while(r); S_17149:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14505);if(r)goto S_17149;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14505);}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(14506);}while(r); S_17153:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14507);if(r)goto S_17153;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14507);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14508);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14511);}while(r); S_17159:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14512);if(r)goto S_17159;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14513);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14514);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14515);}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(14517);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_BYTETYPE; if(!qbevent)break;evnt(14521);}while(r); S_17168:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14521);if(r)goto S_17168;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14521);}while(r); } S_17171:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14522);if(r)goto S_17171;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14522);}while(r); } S_17174:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14523);if(r)goto S_17174;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14523);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14523);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14525);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14526);}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(14528);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14529);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_BYTETYPE; if(!qbevent)break;evnt(14530);}while(r); S_17184:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14530);if(r)goto S_17184;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14530);}while(r); } S_17187:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14531);if(r)goto S_17187;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14531);}while(r); } S_17190:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14532);if(r)goto S_17190;} do{ SUB_WRITEBUFLINE(&(pass2391=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14532);}while(r); } S_17193:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14533);if(r)goto S_17193;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14534);}while(r); S_17195:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14535);if(r)goto S_17195;} do{ SUB_WRITEBUFLINE(&(pass2392=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=1;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14535);}while(r); } S_17198:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14536);if(r)goto S_17198;} do{ SUB_WRITEBUFLINE(&(pass2393=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14536);}while(r); } S_17201:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14537);if(r)goto S_17201;} do{ SUB_WRITEBUFLINE(&(pass2394=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14584);if(r)goto S_17278;} 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(14585);}while(r); S_17280:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14585);if(r)goto S_17280;} 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(14585);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2401= 2 ),&(pass2402= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14587);}while(r); S_17285:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14588);if(r)goto S_17285;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14588);}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(14589);}while(r); S_17289:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14590);if(r)goto S_17289;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14590);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14591);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14594);}while(r); S_17295:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14595);if(r)goto S_17295;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14596);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14597);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14598);}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(14600);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(14605);}while(r); S_17304:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14605);if(r)goto S_17304;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14605);}while(r); } S_17307:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14606);if(r)goto S_17307;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14606);}while(r); } S_17310:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14607);if(r)goto S_17310;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14607);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14607);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14609);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14610);}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(14612);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14613);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(14614);}while(r); S_17320:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14614);if(r)goto S_17320;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14614);}while(r); } S_17323:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14615);if(r)goto S_17323;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14615);}while(r); } S_17326:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14616);if(r)goto S_17326;} do{ SUB_WRITEBUFLINE(&(pass2403=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14616);}while(r); } S_17329:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14617);if(r)goto S_17329;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14618);}while(r); S_17331:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14619);if(r)goto S_17331;} do{ SUB_WRITEBUFLINE(&(pass2404=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=2;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14619);}while(r); } S_17334:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14620);if(r)goto S_17334;} do{ SUB_WRITEBUFLINE(&(pass2405=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14620);}while(r); } S_17337:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14621);if(r)goto S_17337;} do{ SUB_WRITEBUFLINE(&(pass2406=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14674);if(r)goto S_17414;} 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(14675);}while(r); S_17416:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14675);if(r)goto S_17416;} 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(14675);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2413=*__LONG_OS_BITS/ 8 ),&(pass2414= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14677);}while(r); S_17421:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14678);if(r)goto S_17421;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14678);}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(14679);}while(r); S_17425:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14680);if(r)goto S_17425;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14680);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14681);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14684);}while(r); S_17431:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14685);if(r)goto S_17431;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14686);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14687);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14688);}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(14690);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(14694);}while(r); S_17440:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14694);if(r)goto S_17440;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14694);}while(r); } S_17443:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14695);if(r)goto S_17443;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14695);}while(r); } S_17446:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14696);if(r)goto S_17446;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14696);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14696);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14698);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14699);}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(14701);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14702);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(14703);}while(r); S_17456:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14703);if(r)goto S_17456;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14703);}while(r); } S_17459:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14704);if(r)goto S_17459;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14704);}while(r); } S_17462:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14705);if(r)goto S_17462;} do{ SUB_WRITEBUFLINE(&(pass2415=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14705);}while(r); } S_17465:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14706);if(r)goto S_17465;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14707);}while(r); S_17467:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14708);if(r)goto S_17467;} do{ SUB_WRITEBUFLINE(&(pass2416=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(&(pass2417=*__LONG_OS_BITS/ 8 ))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14708);}while(r); } S_17470:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14709);if(r)goto S_17470;} do{ SUB_WRITEBUFLINE(&(pass2418=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14709);}while(r); } S_17473:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14710);if(r)goto S_17473;} do{ SUB_WRITEBUFLINE(&(pass2419=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14760);if(r)goto S_17550;} 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(14761);}while(r); S_17552:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14761);if(r)goto S_17552;} 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(14761);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2427= 4 ),&(pass2428= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14763);}while(r); S_17557:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14764);if(r)goto S_17557;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14764);}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(14765);}while(r); S_17561:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14766);if(r)goto S_17561;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14766);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14767);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14770);}while(r); S_17567:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14771);if(r)goto S_17567;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14772);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14773);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14774);}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(14776);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_LONGTYPE; if(!qbevent)break;evnt(14780);}while(r); S_17576:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14780);if(r)goto S_17576;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14780);}while(r); } S_17579:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14781);if(r)goto S_17579;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14781);}while(r); } S_17582:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14782);if(r)goto S_17582;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14782);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14782);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14784);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14785);}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(14787);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14788);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_LONGTYPE; if(!qbevent)break;evnt(14789);}while(r); S_17592:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14789);if(r)goto S_17592;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14789);}while(r); } S_17595:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14790);if(r)goto S_17595;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14790);}while(r); } S_17598:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14791);if(r)goto S_17598;} do{ SUB_WRITEBUFLINE(&(pass2429=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14791);}while(r); } S_17601:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14792);if(r)goto S_17601;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14793);}while(r); S_17603:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14794);if(r)goto S_17603;} do{ SUB_WRITEBUFLINE(&(pass2430=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=4;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14794);}while(r); } S_17606:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14795);if(r)goto S_17606;} do{ SUB_WRITEBUFLINE(&(pass2431=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14795);}while(r); } S_17609:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14796);if(r)goto S_17609;} do{ SUB_WRITEBUFLINE(&(pass2432=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14846);if(r)goto S_17686;} 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(14847);}while(r); S_17688:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14847);if(r)goto S_17688;} 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(14847);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2439= 8 ),&(pass2440= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14849);}while(r); S_17693:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14850);if(r)goto S_17693;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14850);}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(14851);}while(r); S_17697:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14852);if(r)goto S_17697;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14852);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14853);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14856);}while(r); S_17703:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14857);if(r)goto S_17703;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14858);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14859);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14860);}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(14862);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(14866);}while(r); S_17712:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14866);if(r)goto S_17712;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14866);}while(r); } S_17715:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14867);if(r)goto S_17715;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14867);}while(r); } S_17718:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14868);if(r)goto S_17718;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14868);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14868);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14870);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14871);}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(14873);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14874);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(14875);}while(r); S_17728:; if ((*_FUNC_DIM2_LONG_UNSGN)||new_error){ if(qbevent){evnt(14875);if(r)goto S_17728;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(14875);}while(r); } S_17731:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14876);if(r)goto S_17731;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14876);}while(r); } S_17734:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14877);if(r)goto S_17734;} do{ SUB_WRITEBUFLINE(&(pass2441=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14877);}while(r); } S_17737:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14878);if(r)goto S_17737;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14879);}while(r); S_17739:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14880);if(r)goto S_17739;} do{ SUB_WRITEBUFLINE(&(pass2442=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=8;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14880);}while(r); } S_17742:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14881);if(r)goto S_17742;} do{ SUB_WRITEBUFLINE(&(pass2443=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14881);}while(r); } S_17745:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14882);if(r)goto S_17745;} do{ SUB_WRITEBUFLINE(&(pass2444=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(14932);if(r)goto S_17818;} 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(14933);}while(r); S_17820:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(14933);if(r)goto S_17820;} 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(14933);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2451= 4 ),&(pass2452= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14935);}while(r); S_17825:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(14936);if(r)goto S_17825;} do{ goto exit_subfunc; if(!qbevent)break;evnt(14936);}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(14937);}while(r); S_17829:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(14938);if(r)goto S_17829;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(14938);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(14939);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(14942);}while(r); S_17835:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(14943);if(r)goto S_17835;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(14944);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(14945);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(14946);}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(14948);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(14952);}while(r); S_17844:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14953);if(r)goto S_17844;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14953);}while(r); } S_17847:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(14954);if(r)goto S_17847;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(14954);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(14954);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(14956);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14957);}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(14959);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(14960);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(14961);}while(r); S_17857:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14962);if(r)goto S_17857;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14962);}while(r); } S_17860:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14963);if(r)goto S_17860;} do{ SUB_WRITEBUFLINE(&(pass2453=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14963);}while(r); } S_17863:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(14964);if(r)goto S_17863;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(14965);}while(r); S_17865:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14966);if(r)goto S_17865;} do{ SUB_WRITEBUFLINE(&(pass2454=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=4;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14966);}while(r); } S_17868:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14967);if(r)goto S_17868;} do{ SUB_WRITEBUFLINE(&(pass2455=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(14967);}while(r); } S_17871:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(14968);if(r)goto S_17871;} do{ SUB_WRITEBUFLINE(&(pass2456=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(15016);if(r)goto S_17932;} 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(15017);}while(r); S_17934:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(15017);if(r)goto S_17934;} 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(15017);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2463= 8 ),&(pass2464= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15019);}while(r); S_17939:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15020);if(r)goto S_17939;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15020);}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(15021);}while(r); S_17943:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(15022);if(r)goto S_17943;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(15022);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(15023);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(15026);}while(r); S_17949:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(15027);if(r)goto S_17949;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(15028);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(15029);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(15030);}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(15032);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(15036);}while(r); S_17958:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(15037);if(r)goto S_17958;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(15037);}while(r); } S_17961:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(15038);if(r)goto S_17961;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(15038);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(15038);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(15040);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15041);}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(15043);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(15044);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(15045);}while(r); S_17971:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(15046);if(r)goto S_17971;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15046);}while(r); } S_17974:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(15047);if(r)goto S_17974;} do{ SUB_WRITEBUFLINE(&(pass2465=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15047);}while(r); } S_17977:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(15048);if(r)goto S_17977;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(15049);}while(r); S_17979:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(15050);if(r)goto S_17979;} do{ SUB_WRITEBUFLINE(&(pass2466=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=8;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15050);}while(r); } S_17982:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(15051);if(r)goto S_17982;} do{ SUB_WRITEBUFLINE(&(pass2467=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15051);}while(r); } S_17985:; if ((-(*_FUNC_DIM2_LONG_F== 1 ))||new_error){ if(qbevent){evnt(15052);if(r)goto S_17985;} do{ SUB_WRITEBUFLINE(&(pass2468=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_splen== 1 ))&(-(qbs_asc(_FUNC_DIM2_STRING_ELEMENTS)== 63 ))))||new_error){ if(qbevent){evnt(15100);if(r)goto S_18046;} 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(15101);}while(r); S_18048:; if ((*__LONG_E)||new_error){ if(qbevent){evnt(15101);if(r)goto S_18048;} 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(15101);}while(r); } } do{ *_FUNC_DIM2_LONG_NUME=FUNC_ALLOCARRAY(_FUNC_DIM2_STRING_N,_FUNC_DIM2_STRING_ELEMENTS,&(pass2475= 32 ),&(pass2476= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15103);}while(r); S_18053:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15104);if(r)goto S_18053;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15104);}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(15105);}while(r); S_18057:; if ((*__INTEGER_ARRAYDESC)||new_error){ if(qbevent){evnt(15106);if(r)goto S_18057;} do{ goto LABEL_DIM2EXITFUNC; if(!qbevent)break;evnt(15106);}while(r); } do{ SUB_CLEARID(); if(!qbevent)break;evnt(15107);}while(r); }else{ do{ SUB_CLEARID(); if(!qbevent)break;evnt(15110);}while(r); S_18063:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_DIM2_STRING_ELEMENTS,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(15111);if(r)goto S_18063;} do{ *_FUNC_DIM2_LONG_NUME= -1 ; if(!qbevent)break;evnt(15112);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2847))=*__LONG_GLINKID; if(!qbevent)break;evnt(15113);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(2851))=*__INTEGER_GLINKARG; if(!qbevent)break;evnt(15114);}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(15116);}while(r); } } do{ *(int32*)(((char*)__UDT_ID)+(512))=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(15120);}while(r); S_18072:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(15121);if(r)goto S_18072;} do{ *(int32*)(((char*)__UDT_ID)+(512))=*(int32*)(((char*)__UDT_ID)+(512))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(15121);}while(r); } S_18075:; if ((-(*_FUNC_DIM2_LONG_NUME> 65536 ))||new_error){ if(qbevent){evnt(15122);if(r)goto S_18075;} do{ *_FUNC_DIM2_LONG_NUME=*_FUNC_DIM2_LONG_NUME- 65536 ; if(!qbevent)break;evnt(15122);}while(r); do{ *(int16*)(((char*)__UDT_ID)+(518))= 1 ; if(!qbevent)break;evnt(15122);}while(r); } do{ *(int16*)(((char*)__UDT_ID)+(516))=*_FUNC_DIM2_LONG_NUME; if(!qbevent)break;evnt(15124);}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),_FUNC_DIM2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15125);}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(15127);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(15128);}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(15129);}while(r); S_18085:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(15130);if(r)goto S_18085;} do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15130);}while(r); } S_18088:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(15131);if(r)goto S_18088;} do{ SUB_WRITEBUFLINE(&(pass2477=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_DIM2_STRING_N),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15131);}while(r); } S_18091:; if ((((int16*)(__ARRAY_INTEGER_CMEMLIST[0]))[array_check((*__LONG_IDN+ 1 )-__ARRAY_INTEGER_CMEMLIST[4],__ARRAY_INTEGER_CMEMLIST[5])])||new_error){ if(qbevent){evnt(15132);if(r)goto S_18091;} do{ *(int32*)(((char*)__UDT_ID)+(536))=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(15133);}while(r); S_18093:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(15134);if(r)goto S_18093;} do{ SUB_WRITEBUFLINE(&(pass2478=*__LONG_DATATXTBUF),qbs_new_txt_len("cmem_sp-=32;",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15134);}while(r); } S_18096:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(15135);if(r)goto S_18096;} do{ SUB_WRITEBUFLINE(&(pass2479=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15135);}while(r); } S_18099:; if ((*_FUNC_DIM2_LONG_F)||new_error){ if(qbevent){evnt(15136);if(r)goto S_18099;} do{ SUB_WRITEBUFLINE(&(pass2480=*__LONG_DATATXTBUF),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 "data12.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_UDTREFERENCE_STRING_OBAK,_FUNC_UDTREFERENCE_STRING_O); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15184);}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(15189);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_O= 0 ; if(!qbevent)break;evnt(15192);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_INCMEM= 0 ; if(!qbevent)break;evnt(15194);}while(r); S_18146:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(15195);if(r)goto S_18146;} do{ *_FUNC_UDTREFERENCE_LONG_U=*(int32*)(((char*)__UDT_ID)+(536))& 511 ; if(!qbevent)break;evnt(15196);}while(r); S_18148:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(15197);if(r)goto S_18148;} do{ *_FUNC_UDTREFERENCE_LONG_INCMEM= 1 ; if(!qbevent)break;evnt(15197);}while(r); } }else{ do{ *_FUNC_UDTREFERENCE_LONG_U=*(int32*)(((char*)__UDT_ID)+(512))& 511 ; if(!qbevent)break;evnt(15199);}while(r); S_18153:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(15200);if(r)goto S_18153;} do{ *_FUNC_UDTREFERENCE_LONG_INCMEM= 1 ; if(!qbevent)break;evnt(15200);}while(r); } } do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(15202);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_N=FUNC_NUMELEMENTS(_FUNC_UDTREFERENCE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15204);}while(r); S_18159:; if ((-(*_FUNC_UDTREFERENCE_LONG_N== 0 ))||new_error){ if(qbevent){evnt(15205);if(r)goto S_18159;} do{ goto LABEL_FULLUDT; if(!qbevent)break;evnt(15205);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_I= 1 ; if(!qbevent)break;evnt(15207);}while(r); LABEL_UDTFINDELENEXT:; if(qbevent){evnt(15208);r=0;} S_18163:; 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(15209);if(r)goto S_18163;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected .",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15209);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15209);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_I=*_FUNC_UDTREFERENCE_LONG_I+ 1 ; if(!qbevent)break;evnt(15210);}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(15211);}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(15212);}while(r); S_18170:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_UDTREFERENCE_STRING_NSYM->len))||new_error){ if(qbevent){evnt(15212);if(r)goto S_18170;} do{ *_FUNC_UDTREFERENCE_LONG_NTYP=FUNC_TYPNAME2TYP(_FUNC_UDTREFERENCE_STRING_NSYM); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15212);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_NTYPSIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(15212);}while(r); } S_18174:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15213);if(r)goto S_18174;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15213);}while(r); } S_18177:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_UDTREFERENCE_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(15215);if(r)goto S_18177;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected .elementname",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15215);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15215);}while(r); } LABEL_UDTFINDELE:; if(qbevent){evnt(15216);r=0;} S_18181:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(15217);if(r)goto S_18181;} 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(15217);}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(15217);}while(r); } S_18186:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(15218);if(r)goto S_18186;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Element not defined",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15218);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15218);}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(15219);}while(r); S_18191:; if ((((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[array_check((*__LONG_E)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5])])||new_error){ if(qbevent){evnt(15220);if(r)goto S_18191;} S_18192:; if ((*_FUNC_UDTREFERENCE_LONG_O% 8 )||new_error){ if(qbevent){evnt(15221);if(r)goto S_18192;} do{ *_FUNC_UDTREFERENCE_LONG_O=*_FUNC_UDTREFERENCE_LONG_O+( 8 -(*_FUNC_UDTREFERENCE_LONG_O% 8 )); if(!qbevent)break;evnt(15221);}while(r); } } S_18196:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_UDTREFERENCE_STRING_N,_FUNC_UDTREFERENCE_STRING_N2)))||new_error){ if(qbevent){evnt(15224);if(r)goto S_18196;} 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(15226);}while(r); do{ goto LABEL_UDTFINDELE; if(!qbevent)break;evnt(15227);}while(r); } S_18200:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_UDTREFERENCE_STRING_NSYM->len))||new_error){ if(qbevent){evnt(15231);if(r)goto S_18200;} S_18201:; 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(15233);if(r)goto S_18201;} 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(15233);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15233);}while(r); } S_18205:; 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(15234);if(r)goto S_18205;} S_18206:; 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(15235);if(r)goto S_18206;} do{ goto LABEL_CORRECTSYMBOL; if(!qbevent)break;evnt(15235);}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(15236);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15236);}while(r); } } LABEL_CORRECTSYMBOL:; if(qbevent){evnt(15239);r=0;} S_18213:; if ((-(*_FUNC_UDTREFERENCE_LONG_I!=*_FUNC_UDTREFERENCE_LONG_N))||new_error){ if(qbevent){evnt(15242);if(r)goto S_18213;} S_18214:; 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(15243);if(r)goto S_18214;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected user defined type",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15243);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15243);}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(15244);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(15245);}while(r); do{ *_FUNC_UDTREFERENCE_LONG_I=*_FUNC_UDTREFERENCE_LONG_I+ 1 ; if(!qbevent)break;evnt(15246);}while(r); do{ goto LABEL_UDTFINDELENEXT; if(!qbevent)break;evnt(15247);}while(r); } S_18223:; 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(15251);if(r)goto S_18223;} 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(15252);}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(15253);}while(r); } LABEL_FULLUDT:; if(qbevent){evnt(15256);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(15258);}while(r); S_18228:; if ((*_FUNC_UDTREFERENCE_LONG_O% 8 )||new_error){ if(qbevent){evnt(15260);if(r)goto S_18228;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("QB64 cannot handle bit offsets within user defined types",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15260);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15260);}while(r); } do{ *_FUNC_UDTREFERENCE_LONG_O=*_FUNC_UDTREFERENCE_LONG_O/ 8 ; if(!qbevent)break;evnt(15261);}while(r); S_18233:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_UDTREFERENCE_STRING_O,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(15263);if(r)goto S_18233;} S_18234:; if ((-(*_FUNC_UDTREFERENCE_LONG_O!= 0 ))||new_error){ if(qbevent){evnt(15264);if(r)goto S_18234;} 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(15265);}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(15268);}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(15271);}while(r); do{ qbs_set(_FUNC_UDTREFERENCE_STRING_UDTREFERENCE,_FUNC_UDTREFERENCE_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15273);}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(15274);}while(r); S_18243:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(15277);if(r)goto S_18243;} do{ *_FUNC_UDTREFERENCE_LONG_TYP=*_FUNC_UDTREFERENCE_LONG_U+*__LONG_ISUDT+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(15278);}while(r); } S_18246:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_UDTREFERENCE_STRING_OBAK,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(15281);if(r)goto S_18246;} do{ *_FUNC_UDTREFERENCE_LONG_TYP=*_FUNC_UDTREFERENCE_LONG_TYP+*__LONG_ISARRAY; if(!qbevent)break;evnt(15281);}while(r); } S_18249:; if ((*_FUNC_UDTREFERENCE_LONG_INCMEM)||new_error){ if(qbevent){evnt(15282);if(r)goto S_18249;} do{ *_FUNC_UDTREFERENCE_LONG_TYP=*_FUNC_UDTREFERENCE_LONG_TYP+*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(15282);}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_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 "data13.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if (_FUNC_EVALUATE_ARRAY_STRING_BLOCK[2]&2){ error(10); }else{ if (_FUNC_EVALUATE_ARRAY_STRING_BLOCK[2]&1){ if (!error_occurred) 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(15289);}while(r); do{ if (_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[2]&2){ error(10); }else{ if (_FUNC_EVALUATE_ARRAY_INTEGER_EVALEDBLOCK[2]&1){ if (!error_occurred) 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(15290);}while(r); do{ if (_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[2]&2){ error(10); }else{ if (_FUNC_EVALUATE_ARRAY_LONG_BLOCKTYPE[2]&1){ if (!error_occurred) 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(15291);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15294);}while(r); do{ *_FUNC_EVALUATE_LONG_TYP= -1 ; if(!qbevent)break;evnt(15295);}while(r); S_18257:; if (( 0 )||new_error){ if(qbevent){evnt(15297);if(r)goto S_18257;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2490; 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 skip2490; skip2490: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15297);}while(r); } S_18260:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(15298);if(r)goto S_18260;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Syntax error",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15298);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15298);}while(r); } do{ *_FUNC_EVALUATE_LONG_BLOCKN= 0 ; if(!qbevent)break;evnt(15307);}while(r); do{ *_FUNC_EVALUATE_LONG_N=FUNC_NUMELEMENTS(_FUNC_EVALUATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15308);}while(r); do{ *_FUNC_EVALUATE_LONG_B= 0 ; if(!qbevent)break;evnt(15309);}while(r); S_18267:; fornext_value2492= 1 ; fornext_finalvalue2492=*_FUNC_EVALUATE_LONG_N; fornext_step2492= 1 ; if (fornext_step2492<0) fornext_step_negative2492=1; else fornext_step_negative2492=0; if (new_error) goto fornext_error2492; goto fornext_entrylabel2492; while(1){ fornext_value2492=fornext_step2492+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2492: *_FUNC_EVALUATE_LONG_I=fornext_value2492; if (fornext_step_negative2492){ if (fornext_value2492fornext_finalvalue2492) break; } fornext_error2492:; if(qbevent){evnt(15310);if(r)goto S_18267;} LABEL_REEVALUATE:; if(qbevent){evnt(15312);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(15317);}while(r); S_18269:; if (( 0 )||new_error){ if(qbevent){evnt(15320);if(r)goto S_18269;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2493; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("#*#*#* reevaluating:",20),_FUNC_EVALUATE_STRING_L), 0, 1, 0); if (new_error) goto skip2493; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_I)), 1, 0, 1); if (new_error) goto skip2493; skip2493: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15320);}while(r); } S_18272:; if ((-(*_FUNC_EVALUATE_LONG_I!=*_FUNC_EVALUATE_LONG_N))||new_error){ if(qbevent){evnt(15323);if(r)goto S_18272;} do{ qbs_set(_FUNC_EVALUATE_STRING_NEXTL,FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,&(pass2494=*_FUNC_EVALUATE_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15323);}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(15323);}while(r); } S_18277:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15327);if(r)goto S_18277;} S_18278:; if (( 0 )||new_error){ if(qbevent){evnt(15329);if(r)goto S_18278;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2495; sub_file_print(tmp_fileno,_FUNC_EVALUATE_STRING_L, 0, 0, 1); if (new_error) goto skip2495; skip2495: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15329);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_L2,_FUNC_EVALUATE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15331);}while(r); S_18282:; fornext_value2497= 1 ; fornext_finalvalue2497= 4 ; fornext_step2497= 1 ; if (fornext_step2497<0) fornext_step_negative2497=1; else fornext_step_negative2497=0; if (new_error) goto fornext_error2497; goto fornext_entrylabel2497; while(1){ fornext_value2497=fornext_step2497+(*_FUNC_EVALUATE_LONG_TRY_METHOD); fornext_entrylabel2497: *_FUNC_EVALUATE_LONG_TRY_METHOD=fornext_value2497; if (fornext_step_negative2497){ if (fornext_value2497fornext_finalvalue2497) break; } fornext_error2497:; if(qbevent){evnt(15332);if(r)goto S_18282;} do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15333);}while(r); S_18284:; if (((-(*_FUNC_EVALUATE_LONG_TRY_METHOD== 2 ))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD== 4 )))||new_error){ if(qbevent){evnt(15334);if(r)goto S_18284;} S_18285:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15335);if(r)goto S_18285;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15335);}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(15336);}while(r); S_18289:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15336);if(r)goto S_18289;} do{ qbs_set(_FUNC_EVALUATE_STRING_DTYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15336);}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(15336);}while(r); } S_18293:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_EVALUATE_STRING_DTYP->len== 0 )))||new_error){ if(qbevent){evnt(15337);if(r)goto S_18293;} S_18294:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_EVALUATE_STRING_L)== 0 )))||new_error){ if(qbevent){evnt(15338);if(r)goto S_18294;} S_18295:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(_FUNC_EVALUATE_STRING_L)))||new_error){ if(qbevent){evnt(15339);if(r)goto S_18295;} S_18296:; 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(15340);if(r)goto S_18296;} do{ *_FUNC_EVALUATE_LONG_V= 27 ; if(!qbevent)break;evnt(15340);}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(15340);}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(15341);}while(r); } } }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15345);}while(r); } } do{ *_FUNC_EVALUATE_LONG_TRY=FUNC_FINDID(_FUNC_EVALUATE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15348);}while(r); S_18309:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15349);if(r)goto S_18309;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15349);}while(r); } S_18312:; while((*_FUNC_EVALUATE_LONG_TRY)||new_error){ if(qbevent){evnt(15350);if(r)goto S_18312;} S_18313:; if (( 0 )||new_error){ if(qbevent){evnt(15352);if(r)goto S_18313;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2500; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_TRY)), 1, 0, 1); if (new_error) goto skip2500; skip2500: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15352);}while(r); } S_18316:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_NEXTL,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15355);if(r)goto S_18316;} S_18317:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(15356);if(r)goto S_18317;} S_18318:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2641))))&(-(*_FUNC_EVALUATE_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(15357);if(r)goto S_18318;} do{ *_FUNC_EVALUATE_LONG_ARRAYID=*__LONG_CURRENTID; if(!qbevent)break;evnt(15358);}while(r); do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15359);}while(r); do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I+ 2 ; if(!qbevent)break;evnt(15360);}while(r); do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15361);}while(r); LABEL_EVALNEXTELE3:; if(qbevent){evnt(15362);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(15363);}while(r); S_18324:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15364);if(r)goto S_18324;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15364);}while(r); } S_18327:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15365);if(r)goto S_18327;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15366);}while(r); S_18329:; if ((-(*_FUNC_EVALUATE_LONG_B2== -1 ))||new_error){ if(qbevent){evnt(15367);if(r)goto S_18329;} do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_ARRAYREFERENCE(FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,&(pass2501=*_FUNC_EVALUATE_LONG_I+ 2 ),&(pass2502=*_FUNC_EVALUATE_LONG_I2- 1 )),_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15368);}while(r); S_18331:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15369);if(r)goto S_18331;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15369);}while(r); } do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I2; if(!qbevent)break;evnt(15370);}while(r); S_18335:; if ((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(15373);if(r)goto S_18335;} do{ SUB_GETID(_FUNC_EVALUATE_LONG_ARRAYID); if(!qbevent)break;evnt(15375);}while(r); S_18337:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15376);if(r)goto S_18337;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15376);}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(15377);}while(r); do{ *_FUNC_EVALUATE_LONG_U=*_FUNC_EVALUATE_LONG_TYP2& 511 ; if(!qbevent)break;evnt(15379);}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(15380);}while(r); S_18343:; 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(15381);if(r)goto S_18343;} S_18344:; if ((*_FUNC_EVALUATE_LONG_S% 8 )||new_error){ if(qbevent){evnt(15382);if(r)goto S_18344;} do{ *_FUNC_EVALUATE_LONG_S=*_FUNC_EVALUATE_LONG_S+( 8 -(*_FUNC_EVALUATE_LONG_S% 8 )); if(!qbevent)break;evnt(15382);}while(r); } do{ *_FUNC_EVALUATE_LONG_S=*_FUNC_EVALUATE_LONG_S/ 8 ; if(!qbevent)break;evnt(15383);}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(15385);}while(r); do{ goto LABEL_EVALUDT; if(!qbevent)break;evnt(15387);}while(r); } do{ goto LABEL_EVALEDNEXTELE3; if(!qbevent)break;evnt(15390);}while(r); } } do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I2+ 1 ; if(!qbevent)break;evnt(15393);}while(r); do{ goto LABEL_EVALNEXTELE3; if(!qbevent)break;evnt(15394);}while(r); LABEL_EVALEDNEXTELE3:; if(qbevent){evnt(15395);r=0;} do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15396);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15397);}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(15398);}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(15399);}while(r); S_18361:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15400);if(r)goto S_18361;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15400);}while(r); } do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15401);}while(r); } } }else{ S_18368:; if (((-(*(int32*)(((char*)__UDT_ID)+(536))!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)== 0 )))||new_error){ if(qbevent){evnt(15409);if(r)goto S_18368;} S_18369:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2641))))&(-(*_FUNC_EVALUATE_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(15410);if(r)goto S_18369;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15411);}while(r); do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15412);}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(15413);}while(r); S_18373:; 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(15414);if(r)goto S_18373;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15414);}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(15415);}while(r); do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15416);}while(r); } } S_18380:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(15421);if(r)goto S_18380;} S_18381:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2641))))&(-(*_FUNC_EVALUATE_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_EVALUATE_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(15422);if(r)goto S_18381;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15423);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_O,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15424);}while(r); LABEL_EVALUDT:; if(qbevent){evnt(15425);r=0;} do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15426);}while(r); do{ *_FUNC_EVALUATE_LONG_I3=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15427);}while(r); S_18386:; fornext_value2505=*_FUNC_EVALUATE_LONG_I3; fornext_finalvalue2505=*_FUNC_EVALUATE_LONG_N; fornext_step2505= 1 ; if (fornext_step2505<0) fornext_step_negative2505=1; else fornext_step_negative2505=0; if (new_error) goto fornext_error2505; goto fornext_entrylabel2505; while(1){ fornext_value2505=fornext_step2505+(*_FUNC_EVALUATE_LONG_I2); fornext_entrylabel2505: *_FUNC_EVALUATE_LONG_I2=fornext_value2505; if (fornext_step_negative2505){ if (fornext_value2505fornext_finalvalue2505) break; } fornext_error2505:; if(qbevent){evnt(15428);if(r)goto S_18386;} 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(15429);}while(r); S_18388:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15430);if(r)goto S_18388;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15430);}while(r); } S_18391:; if ((-(*_FUNC_EVALUATE_LONG_B2== 0 ))||new_error){ if(qbevent){evnt(15431);if(r)goto S_18391;} S_18392:; 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(15432);if(r)goto S_18392;} do{ *_FUNC_EVALUATE_LONG_I4=*_FUNC_EVALUATE_LONG_I2- 1 ; if(!qbevent)break;evnt(15433);}while(r); do{ goto LABEL_GOTUDT; if(!qbevent)break;evnt(15434);}while(r); } } S_18397:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15437);if(r)goto S_18397;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15437);}while(r); } fornext_continue_2504:; } fornext_exit_2504:; do{ *_FUNC_EVALUATE_LONG_I4=*_FUNC_EVALUATE_LONG_N; if(!qbevent)break;evnt(15439);}while(r); LABEL_GOTUDT:; if(qbevent){evnt(15440);r=0;} S_18402:; if ((-(*_FUNC_EVALUATE_LONG_I4<*_FUNC_EVALUATE_LONG_I3))||new_error){ if(qbevent){evnt(15441);if(r)goto S_18402;} do{ qbs_set(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15441);}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(15441);}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(15443);}while(r); S_18408:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15444);if(r)goto S_18408;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15444);}while(r); } do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I4; if(!qbevent)break;evnt(15445);}while(r); do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15446);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15447);}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(15448);}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(15449);}while(r); do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15452);}while(r); } } } S_18420:; if ((-(*(int16*)(((char*)__UDT_ID)+(544))== 1 ))||new_error){ if(qbevent){evnt(15459);if(r)goto S_18420;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15460);}while(r); S_18422:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,&(pass2506=*_FUNC_EVALUATE_LONG_I+ 1 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15461);if(r)goto S_18422;} do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I+ 2 ; if(!qbevent)break;evnt(15462);}while(r); do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15463);}while(r); do{ *_FUNC_EVALUATE_LONG_ARGS= 1 ; if(!qbevent)break;evnt(15464);}while(r); LABEL_EVALNEXTELE:; if(qbevent){evnt(15465);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(15466);}while(r); S_18427:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15467);if(r)goto S_18427;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15467);}while(r); } S_18430:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15468);if(r)goto S_18430;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15469);}while(r); S_18432:; if ((-(*_FUNC_EVALUATE_LONG_B2== -1 ))||new_error){ if(qbevent){evnt(15470);if(r)goto S_18432;} S_18433:; if ((-(*_FUNC_EVALUATE_LONG_I2==(*_FUNC_EVALUATE_LONG_I+ 2 )))||new_error){ if(qbevent){evnt(15471);if(r)goto S_18433;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected (...)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15471);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15471);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_EVALUATEFUNC(FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,&(pass2507=*_FUNC_EVALUATE_LONG_I+ 2 ),&(pass2508=*_FUNC_EVALUATE_LONG_I2- 1 )),_FUNC_EVALUATE_LONG_ARGS,_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15472);}while(r); S_18438:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15473);if(r)goto S_18438;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15473);}while(r); } do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I2; if(!qbevent)break;evnt(15474);}while(r); do{ goto LABEL_EVALEDNEXTELE; if(!qbevent)break;evnt(15475);}while(r); } } S_18445:; 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(15478);if(r)goto S_18445;} do{ *_FUNC_EVALUATE_LONG_ARGS=*_FUNC_EVALUATE_LONG_ARGS+ 1 ; if(!qbevent)break;evnt(15478);}while(r); } do{ *_FUNC_EVALUATE_LONG_I2=*_FUNC_EVALUATE_LONG_I2+ 1 ; if(!qbevent)break;evnt(15479);}while(r); do{ goto LABEL_EVALNEXTELE; if(!qbevent)break;evnt(15480);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_EVALUATEFUNC(qbs_new_txt_len("",0),&(pass2509= 0 ),_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15483);}while(r); S_18452:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15484);if(r)goto S_18452;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15484);}while(r); } } LABEL_EVALEDNEXTELE:; if(qbevent){evnt(15486);r=0;} do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15487);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15488);}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(15489);}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(15490);}while(r); S_18460:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15491);if(r)goto S_18460;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15491);}while(r); } do{ goto LABEL_EVALED; if(!qbevent)break;evnt(15492);}while(r); } S_18465:; if ((-(*_FUNC_EVALUATE_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(15495);if(r)goto S_18465;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(15495);}while(r); do{ *_FUNC_EVALUATE_LONG_TRY=FUNC_FINDID(_FUNC_EVALUATE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15495);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_TRY= 0 ; if(!qbevent)break;evnt(15495);}while(r); } S_18471:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15496);if(r)goto S_18471;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15496);}while(r); } dl_continue_2499:; } dl_exit_2499:; fornext_continue_2496:; } fornext_exit_2496:; S_18476:; if ((-(*_FUNC_EVALUATE_LONG_I!=*_FUNC_EVALUATE_LONG_N))||new_error){ if(qbevent){evnt(15502);if(r)goto S_18476;} S_18477:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_EVALUATE_STRING_A,&(pass2510=*_FUNC_EVALUATE_LONG_I+ 1 )),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15503);if(r)goto S_18477;} S_18478:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_EVALUATE_STRING_L)== 0 )))||new_error){ if(qbevent){evnt(15504);if(r)goto S_18478;} S_18479:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(_FUNC_EVALUATE_STRING_L)))||new_error){ if(qbevent){evnt(15505);if(r)goto S_18479;} S_18480:; if (( 0 )||new_error){ if(qbevent){evnt(15506);if(r)goto S_18480;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2511; sub_file_print(tmp_fileno,qbs_new_txt_len("**************",14), 0, 0, 1); if (new_error) goto skip2511; skip2511: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15507);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2512; 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 skip2512; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_I)), 1, 0, 1); if (new_error) goto skip2512; skip2512: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15508);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2513; sub_file_print(tmp_fileno,qbs_new_txt_len("**************",14), 0, 0, 1); if (new_error) goto skip2513; skip2513: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15509);}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(15511);}while(r); S_18486:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15512);if(r)goto S_18486;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15512);}while(r); } do{ *_FUNC_EVALUATE_LONG_NUME= 1 ; if(!qbevent)break;evnt(15514);}while(r); do{ *_FUNC_EVALUATE_LONG_B2= 0 ; if(!qbevent)break;evnt(15515);}while(r); S_18491:; fornext_value2515=*_FUNC_EVALUATE_LONG_I+ 2 ; fornext_finalvalue2515=*_FUNC_EVALUATE_LONG_N; fornext_step2515= 1 ; if (fornext_step2515<0) fornext_step_negative2515=1; else fornext_step_negative2515=0; if (new_error) goto fornext_error2515; goto fornext_entrylabel2515; while(1){ fornext_value2515=fornext_step2515+(*_FUNC_EVALUATE_LONG_I2); fornext_entrylabel2515: *_FUNC_EVALUATE_LONG_I2=fornext_value2515; if (fornext_step_negative2515){ if (fornext_value2515fornext_finalvalue2515) break; } fornext_error2515:; if(qbevent){evnt(15516);if(r)goto S_18491;} 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(15517);}while(r); S_18493:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15518);if(r)goto S_18493;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2+ 1 ; if(!qbevent)break;evnt(15518);}while(r); } S_18496:; 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(15519);if(r)goto S_18496;} do{ *_FUNC_EVALUATE_LONG_NUME=*_FUNC_EVALUATE_LONG_NUME+ 1 ; if(!qbevent)break;evnt(15519);}while(r); } S_18499:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_E,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15520);if(r)goto S_18499;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_B2- 1 ; if(!qbevent)break;evnt(15520);}while(r); } S_18502:; if ((-(*_FUNC_EVALUATE_LONG_B2== -1 ))||new_error){ if(qbevent){evnt(15521);if(r)goto S_18502;} do{ goto fornext_exit_2514; if(!qbevent)break;evnt(15521);}while(r); } fornext_continue_2514:; } fornext_exit_2514:; do{ qbs_set(_FUNC_EVALUATE_STRING_FAKEE,qbs_new_txt_len("10",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15523);}while(r); S_18507:; fornext_value2517= 2 ; fornext_finalvalue2517=*_FUNC_EVALUATE_LONG_NUME; fornext_step2517= 1 ; if (fornext_step2517<0) fornext_step_negative2517=1; else fornext_step_negative2517=0; if (new_error) goto fornext_error2517; goto fornext_entrylabel2517; while(1){ fornext_value2517=fornext_step2517+(*_FUNC_EVALUATE_LONG_I2); fornext_entrylabel2517: *_FUNC_EVALUATE_LONG_I2=fornext_value2517; if (fornext_step_negative2517){ if (fornext_value2517fornext_finalvalue2517) break; } fornext_error2517:; if(qbevent){evnt(15523);if(r)goto S_18507;} 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(15523);}while(r); fornext_continue_2516:; } fornext_exit_2516:; S_18510:; if (( 0 )||new_error){ if(qbevent){evnt(15524);if(r)goto S_18510;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2518; 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 skip2518; skip2518: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15524);}while(r); } S_18513:; if ((*__BYTE_OPTIONEXPLICIT|*__BYTE_OPTIONEXPLICITARRAY)||new_error){ if(qbevent){evnt(15525);if(r)goto S_18513;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Array '",7),_FUNC_EVALUATE_STRING_L),qbs_new_txt_len("' (",3)),FUNC_SYMBOL2FULLTYPENAME(_FUNC_EVALUATE_STRING_DTYP)),qbs_new_txt_len(") not defined",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15525);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15525);}while(r); } S_18517:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15526);if(r)goto S_18517;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15526);}while(r); } do{ *_FUNC_EVALUATE_LONG_OLDDIMSTATIC=*__LONG_DIMSTATIC; if(!qbevent)break;evnt(15527);}while(r); do{ *_FUNC_EVALUATE_LONG_METHOD= 1 ; if(!qbevent)break;evnt(15528);}while(r); S_18522:; if ((*__LONG_SUBFUNCN)||new_error){ if(qbevent){evnt(15529);if(r)goto S_18522;} do{ *__LONG_AUTOARRAY= 1 ; if(!qbevent)break;evnt(15530);}while(r); do{ *_FUNC_EVALUATE_LONG_XI= 1 ; if(!qbevent)break;evnt(15533);}while(r); S_18525:; fornext_value2520= 1 ; fornext_finalvalue2520=*__LONG_STATICARRAYLISTN; fornext_step2520= 1 ; if (fornext_step2520<0) fornext_step_negative2520=1; else fornext_step_negative2520=0; if (new_error) goto fornext_error2520; goto fornext_entrylabel2520; while(1){ fornext_value2520=fornext_step2520+(*_FUNC_EVALUATE_LONG_X); fornext_entrylabel2520: *_FUNC_EVALUATE_LONG_X=fornext_value2520; if (fornext_step_negative2520){ if (fornext_value2520fornext_finalvalue2520) break; } fornext_error2520:; if(qbevent){evnt(15534);if(r)goto S_18525;} 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(15535);}while(r); do{ *_FUNC_EVALUATE_LONG_XI=*_FUNC_EVALUATE_LONG_XI+ 1 ; if(!qbevent)break;evnt(15535);}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(15536);}while(r); do{ *_FUNC_EVALUATE_LONG_XI=*_FUNC_EVALUATE_LONG_XI+ 1 ; if(!qbevent)break;evnt(15536);}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(15537);}while(r); do{ *_FUNC_EVALUATE_LONG_XI=*_FUNC_EVALUATE_LONG_XI+ 1 ; if(!qbevent)break;evnt(15537);}while(r); S_18532:; 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(15539);if(r)goto S_18532;} do{ qbs_set(_FUNC_EVALUATE_STRING_L3,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15540);}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(15540);}while(r); S_18535:; 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(15541);if(r)goto S_18535;} S_18536:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15542);if(r)goto S_18536;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15542);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_VARNAME2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15544);}while(r); do{ qbs_set(_FUNC_EVALUATE_STRING_DTYP,_FUNC_EVALUATE_STRING_TYP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15545);}while(r); do{ *_FUNC_EVALUATE_LONG_METHOD=*_FUNC_EVALUATE_LONG_DIMMETHOD2; if(!qbevent)break;evnt(15546);}while(r); do{ *__LONG_DIMSTATIC= 3 ; if(!qbevent)break;evnt(15547);}while(r); } S_18544:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15549);if(r)goto S_18544;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15549);}while(r); } } fornext_continue_2519:; } fornext_exit_2519:; } do{ *__BYTE_BYPASSNEXTVARIABLE= -1 ; if(!qbevent)break;evnt(15553);}while(r); 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(15554);}while(r); S_18552:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15555);if(r)goto S_18552;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15555);}while(r); } do{ *__LONG_DIMSTATIC=*_FUNC_EVALUATE_LONG_OLDDIMSTATIC; if(!qbevent)break;evnt(15556);}while(r); S_18556:; if (( 0 )||new_error){ if(qbevent){evnt(15557);if(r)goto S_18556;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2521; sub_file_print(tmp_fileno,qbs_new_txt_len("#*#*#* dim2 has returned!!!",27), 0, 0, 1); if (new_error) goto skip2521; skip2521: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15557);}while(r); } do{ goto LABEL_REEVALUATE; if(!qbevent)break;evnt(15558);}while(r); } } } } do{ qbs_set(_FUNC_EVALUATE_STRING_L,_FUNC_EVALUATE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15564);}while(r); } S_18566:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(15568);if(r)goto S_18566;} S_18567:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15569);if(r)goto S_18567;} do{ *_FUNC_EVALUATE_LONG_I1=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(15569);}while(r); } do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B+ 1 ; if(!qbevent)break;evnt(15570);}while(r); } S_18572:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15573);if(r)goto S_18572;} do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15574);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15575);}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(15576);}while(r); } S_18577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(15579);if(r)goto S_18577;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B- 1 ; if(!qbevent)break;evnt(15580);}while(r); S_18579:; if ((-(*_FUNC_EVALUATE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(15581);if(r)goto S_18579;} do{ qbs_set(_FUNC_EVALUATE_STRING_C,FUNC_EVALUATE(FUNC_GETELEMENTS(_FUNC_EVALUATE_STRING_A,_FUNC_EVALUATE_LONG_I1,&(pass2522=*_FUNC_EVALUATE_LONG_I- 1 )),_FUNC_EVALUATE_LONG_TYP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15582);}while(r); S_18581:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15583);if(r)goto S_18581;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15583);}while(r); } S_18584:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15584);if(r)goto S_18584;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15584);}while(r); } do{ *_FUNC_EVALUATE_LONG_BLOCKN=*_FUNC_EVALUATE_LONG_BLOCKN+ 1 ; if(!qbevent)break;evnt(15585);}while(r); S_18588:; if (((*_FUNC_EVALUATE_LONG_TYP2&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(15586);if(r)goto S_18588;} 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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15587);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15589);}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(15591);}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(15592);}while(r); } } LABEL_EVALED:; if(qbevent){evnt(15595);r=0;} fornext_continue_2491:; } fornext_exit_2491:; do{ qbs_set(_FUNC_EVALUATE_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15598);}while(r); S_18599:; if (( 0 )||new_error){ if(qbevent){evnt(15600);if(r)goto S_18599;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2523; sub_file_print(tmp_fileno,qbs_new_txt_len("evaluated blocks:",17), 0, 0, 0); if (new_error) goto skip2523; skip2523: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15600);}while(r); } S_18602:; fornext_value2525= 1 ; fornext_finalvalue2525=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2525= 1 ; if (fornext_step2525<0) fornext_step_negative2525=1; else fornext_step_negative2525=0; if (new_error) goto fornext_error2525; goto fornext_entrylabel2525; while(1){ fornext_value2525=fornext_step2525+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2525: *_FUNC_EVALUATE_LONG_I=fornext_value2525; if (fornext_step_negative2525){ if (fornext_value2525fornext_finalvalue2525) break; } fornext_error2525:; if(qbevent){evnt(15601);if(r)goto S_18602;} S_18603:; if ((-(*_FUNC_EVALUATE_LONG_I!=*_FUNC_EVALUATE_LONG_BLOCKN))||new_error){ if(qbevent){evnt(15602);if(r)goto S_18603;} S_18604:; if (( 0 )||new_error){ if(qbevent){evnt(15603);if(r)goto S_18604;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2526; 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 skip2526; skip2526: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15603);}while(r); } }else{ S_18608:; if (( 0 )||new_error){ if(qbevent){evnt(15605);if(r)goto S_18608;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2527; 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 skip2527; skip2527: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15605);}while(r); } } fornext_continue_2524:; } fornext_exit_2524:; S_18613:; fornext_value2529= 1 ; fornext_finalvalue2529=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2529= 1 ; if (fornext_step2529<0) fornext_step_negative2529=1; else fornext_step_negative2529=0; if (new_error) goto fornext_error2529; goto fornext_entrylabel2529; while(1){ fornext_value2529=fornext_step2529+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2529: *_FUNC_EVALUATE_LONG_I=fornext_value2529; if (fornext_step_negative2529){ if (fornext_value2529fornext_finalvalue2529) break; } fornext_error2529:; if(qbevent){evnt(15612);if(r)goto S_18613;} S_18614:; 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(15613);if(r)goto S_18614;} S_18615:; 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(15614);if(r)goto S_18615;} 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(15617);}while(r); S_18617:; if (((-(*_FUNC_EVALUATE_LONG_C== 45 ))|(((-(*_FUNC_EVALUATE_LONG_C>= 48 ))&(-(*_FUNC_EVALUATE_LONG_C<= 57 )))))||new_error){ if(qbevent){evnt(15618);if(r)goto S_18617;} 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(15619);}while(r); do{ *_FUNC_EVALUATE_LONG_F= 0 ; if(!qbevent)break;evnt(15621);}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(15622);}while(r); S_18621:; if ((*_FUNC_EVALUATE_LONG_X)||new_error){ if(qbevent){evnt(15623);if(r)goto S_18621;} do{ *_FUNC_EVALUATE_LONG_F= 1 ; if(!qbevent)break;evnt(15624);}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(15624);}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(15626);}while(r); S_18626:; if ((*_FUNC_EVALUATE_LONG_X)||new_error){ if(qbevent){evnt(15627);if(r)goto S_18626;} do{ *_FUNC_EVALUATE_LONG_F= 2 ; if(!qbevent)break;evnt(15628);}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(15628);}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(15630);}while(r); S_18631:; if ((*_FUNC_EVALUATE_LONG_X)||new_error){ if(qbevent){evnt(15631);if(r)goto S_18631;} do{ *_FUNC_EVALUATE_LONG_F= 3 ; if(!qbevent)break;evnt(15632);}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(15632);}while(r); } } } S_18637:; if ((*_FUNC_EVALUATE_LONG_F)||new_error){ if(qbevent){evnt(15636);if(r)goto S_18637;} S_18638:; if (((-(*_FUNC_EVALUATE_LONG_F== 2 ))|(-(*_FUNC_EVALUATE_LONG_F== 3 )))||new_error){ if(qbevent){evnt(15638);if(r)goto S_18638;} do{ sub_mid(_FUNC_EVALUATE_STRING_NUM,*_FUNC_EVALUATE_LONG_X, 1 ,qbs_new_txt_len("E",1),1); if(!qbevent)break;evnt(15638);}while(r); } S_18641:; if ((-(*_FUNC_EVALUATE_LONG_F== 3 ))||new_error){ if(qbevent){evnt(15639);if(r)goto S_18641;} 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(15639);}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(15642);}while(r); S_18646:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15643);if(r)goto S_18646;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15643);}while(r); } S_18649:; 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(15644);if(r)goto S_18649;} 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(15644);}while(r); } S_18652:; 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(15645);if(r)goto S_18652;} S_18653:; 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(15646);if(r)goto S_18653;} 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(15646);}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(15646);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15649);}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(15650);}while(r); do{ goto LABEL_EVALEDBLOCK; if(!qbevent)break;evnt(15651);}while(r); } S_18664:; 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(15709);if(r)goto S_18664;} S_18665:; 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(15710);if(r)goto S_18665;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15711);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15713);}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(15715);}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(15716);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15717);}while(r); do{ goto LABEL_EVALEDBLOCK; if(!qbevent)break;evnt(15718);}while(r); } S_18675:; 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(15722);if(r)goto S_18675;} 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(15723);}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(15725);}while(r); S_18678:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15726);if(r)goto S_18678;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15726);}while(r); } S_18681:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_EVALUATE_STRING_TYP->len== 0 )))||new_error){ if(qbevent){evnt(15729);if(r)goto S_18681;} S_18682:; 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(15730);if(r)goto S_18682;} do{ *_FUNC_EVALUATE_LONG_V= 27 ; if(!qbevent)break;evnt(15730);}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(15730);}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(15731);}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(15735);}while(r); S_18690:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15736);if(r)goto S_18690;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15736);}while(r); } S_18693:; while((*_FUNC_EVALUATE_LONG_TRY)||new_error){ if(qbevent){evnt(15737);if(r)goto S_18693;} S_18694:; if (( 0 )||new_error){ if(qbevent){evnt(15738);if(r)goto S_18694;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2532; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_EVALUATE_LONG_TRY)), 1, 0, 1); if (new_error) goto skip2532; skip2532: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15738);}while(r); } S_18697:; if (((-(*(int32*)(((char*)__UDT_ID)+(536))!= 0 ))&(-((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)== 0 )))||new_error){ if(qbevent){evnt(15739);if(r)goto S_18697;} do{ goto LABEL_SIMPLEVARFOUND; if(!qbevent)break;evnt(15740);}while(r); } S_18700:; if ((-(*_FUNC_EVALUATE_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(15742);if(r)goto S_18700;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(15742);}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(15742);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_TRY= 0 ; if(!qbevent)break;evnt(15742);}while(r); } S_18706:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15743);if(r)goto S_18706;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15743);}while(r); } dl_continue_2531:; } dl_exit_2531:; S_18710:; if (( 0 )||new_error){ if(qbevent){evnt(15746);if(r)goto S_18710;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2533; 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 skip2533; skip2533: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15746);}while(r); } S_18713:; if ((*__BYTE_OPTIONEXPLICIT)||new_error){ if(qbevent){evnt(15747);if(r)goto S_18713;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Variable '",10),_FUNC_EVALUATE_STRING_X),qbs_new_txt_len("' (",3)),FUNC_SYMBOL2FULLTYPENAME(_FUNC_EVALUATE_STRING_TYP)),qbs_new_txt_len(") not defined",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15747);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15747);}while(r); } do{ *__BYTE_BYPASSNEXTVARIABLE= -1 ; if(!qbevent)break;evnt(15748);}while(r); do{ *_FUNC_EVALUATE_LONG_RETVAL=FUNC_DIM2(_FUNC_EVALUATE_STRING_X,_FUNC_EVALUATE_STRING_TYP,&(pass2534= 1 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15749);}while(r); do{ SUB_MANAGEVARIABLELIST(qbs_new_txt_len("",0),__STRING_VWATCHNEWVARIABLE,&(pass2535= 0 ),&(pass2536= 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15750);}while(r); S_18720:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15751);if(r)goto S_18720;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15751);}while(r); } LABEL_SIMPLEVARFOUND:; if(qbevent){evnt(15753);r=0;} do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15754);}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(15755);}while(r); S_18725:; 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(15756);if(r)goto S_18725;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15756);}while(r); } S_18728:; if ((-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))||new_error){ if(qbevent){evnt(15757);if(r)goto S_18728;} S_18729:; 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(15758);if(r)goto S_18729;} do{ goto LABEL_RETURNPOINTER; if(!qbevent)break;evnt(15758);}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])])),&(pass2537= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15761);}while(r); S_18734:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15761);if(r)goto S_18734;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15761);}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(15762);}while(r); do{ goto LABEL_EVALEDBLOCK; if(!qbevent)break;evnt(15763);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid expression",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15765);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15765);}while(r); }else{ S_18743:; 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(15768);if(r)goto S_18743;} S_18744:; if ((-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))||new_error){ if(qbevent){evnt(15769);if(r)goto S_18744;} do{ goto LABEL_RETURNPOINTER; if(!qbevent)break;evnt(15769);}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])])),&(pass2538= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15773);}while(r); S_18748:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(15774);if(r)goto S_18748;} do{ goto exit_subfunc; if(!qbevent)break;evnt(15774);}while(r); } } } } LABEL_EVALEDBLOCK:; if(qbevent){evnt(15780);r=0;} fornext_continue_2528:; } fornext_exit_2528:; S_18755:; if ((-(*_FUNC_EVALUATE_LONG_BLOCKN== 1 ))||new_error){ if(qbevent){evnt(15785);if(r)goto S_18755;} S_18756:; 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(15786);if(r)goto S_18756;} S_18757:; 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(15787);if(r)goto S_18757;} LABEL_RETURNPOINTER:; if(qbevent){evnt(15788);r=0;} S_18758:; 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(15789);if(r)goto S_18758;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(15789);}while(r); } S_18761:; if (( 0 )||new_error){ if(qbevent){evnt(15790);if(r)goto S_18761;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2539; 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 skip2539; skip2539: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15790);}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(15791);}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(15792);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15793);}while(r); } } } S_18770:; if (( 0 )||new_error){ if(qbevent){evnt(15806);if(r)goto S_18770;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2540; sub_file_print(tmp_fileno,qbs_new_txt_len("applying operators:",19), 0, 0, 0); if (new_error) goto skip2540; skip2540: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(15806);}while(r); } S_18773:; if ((-(*_FUNC_EVALUATE_LONG_TYP== -1 ))||new_error){ if(qbevent){evnt(15809);if(r)goto S_18773;} 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(15810);}while(r); S_18775:; 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(15813);if(r)goto S_18775;} 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(15814);}while(r); } } do{ *_FUNC_EVALUATE_LONG_NONOP= 0 ; if(!qbevent)break;evnt(15818);}while(r); S_18780:; fornext_value2542= 1 ; fornext_finalvalue2542=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2542= 1 ; if (fornext_step2542<0) fornext_step_negative2542=1; else fornext_step_negative2542=0; if (new_error) goto fornext_error2542; goto fornext_entrylabel2542; while(1){ fornext_value2542=fornext_step2542+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2542: *_FUNC_EVALUATE_LONG_I=fornext_value2542; if (fornext_step_negative2542){ if (fornext_value2542fornext_finalvalue2542) break; } fornext_error2542:; if(qbevent){evnt(15819);if(r)goto S_18780;} S_18781:; 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(15821);if(r)goto S_18781;} 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(15822);}while(r); S_18783:; if ((*_FUNC_EVALUATE_LONG_ISOP)||new_error){ if(qbevent){evnt(15823);if(r)goto S_18783;} do{ *_FUNC_EVALUATE_LONG_NONOP= 0 ; if(!qbevent)break;evnt(15824);}while(r); do{ *__INTEGER_CONSTEQUATION= 0 ; if(!qbevent)break;evnt(15826);}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(15829);}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(15830);}while(r); S_18788:; if ((-(*_FUNC_EVALUATE_LONG_U!= 5 ))||new_error){ if(qbevent){evnt(15832);if(r)goto S_18788;} do{ *_FUNC_EVALUATE_LONG_NONOP= 1 ; if(!qbevent)break;evnt(15833);}while(r); S_18790:; 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(15834);if(r)goto S_18790;} S_18791:; 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(15835);if(r)goto S_18791;} 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(15835);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15835);}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(15836);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15836);}while(r); } } S_18799:; 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(15839);if(r)goto S_18799;} 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(15839);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15839);}while(r); } do{ *_FUNC_EVALUATE_LONG_OLDTYP=*_FUNC_EVALUATE_LONG_TYP; if(!qbevent)break;evnt(15847);}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(15848);}while(r); S_18805:; if (((-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISSTRING)== 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISSTRING)!= 0 )))||new_error){ if(qbevent){evnt(15860);if(r)goto S_18805;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert number to string",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15861);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15861);}while(r); } do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 0 ; if(!qbevent)break;evnt(15865);}while(r); do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 0 ; if(!qbevent)break;evnt(15866);}while(r); S_18811:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISOFFSET)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISOFFSET)!= 0 )))||new_error){ if(qbevent){evnt(15867);if(r)goto S_18811;} do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 2 ; if(!qbevent)break;evnt(15868);}while(r); S_18813:; if ((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(15869);if(r)goto S_18813;} S_18814:; if ((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISUNSIGNED)== 0 ))||new_error){ if(qbevent){evnt(15870);if(r)goto S_18814;} do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 1 ; if(!qbevent)break;evnt(15870);}while(r); } } S_18818:; if ((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(15872);if(r)goto S_18818;} S_18819:; if ((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISUNSIGNED)== 0 ))||new_error){ if(qbevent){evnt(15873);if(r)goto S_18819;} do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 1 ; if(!qbevent)break;evnt(15873);}while(r); } } S_18823:; 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(15879);if(r)goto S_18823;} S_18824:; 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(15880);if(r)goto S_18824;} S_18825:; if (((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)!= 0 )))||new_error){ if(qbevent){evnt(15882);if(r)goto S_18825;} do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 1 ; if(!qbevent)break;evnt(15883);}while(r); S_18827:; if ((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15884);if(r)goto S_18827;} do{ *_FUNC_EVALUATE_LONG_LHSTYP= 2 ; if(!qbevent)break;evnt(15884);}while(r); } S_18830:; if ((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15885);if(r)goto S_18830;} do{ *_FUNC_EVALUATE_LONG_RHSTYP= 2 ; if(!qbevent)break;evnt(15885);}while(r); } } } S_18835:; 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(15888);if(r)goto S_18835;} do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 1 ; if(!qbevent)break;evnt(15890);}while(r); S_18837:; if ((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15891);if(r)goto S_18837;} do{ *_FUNC_EVALUATE_LONG_LHSTYP= 2 ; if(!qbevent)break;evnt(15891);}while(r); } S_18840:; if ((-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(15892);if(r)goto S_18840;} do{ *_FUNC_EVALUATE_LONG_RHSTYP= 2 ; if(!qbevent)break;evnt(15892);}while(r); } } }else{ S_18845:; if ((*_FUNC_EVALUATE_LONG_LHSTYP& 2 )||new_error){ if(qbevent){evnt(15895);if(r)goto S_18845;} do{ *_FUNC_EVALUATE_LONG_LHSTYP= 1 ; if(!qbevent)break;evnt(15895);}while(r); } S_18848:; if ((*_FUNC_EVALUATE_LONG_RHSTYP& 2 )||new_error){ if(qbevent){evnt(15896);if(r)goto S_18848;} do{ *_FUNC_EVALUATE_LONG_RHSTYP= 1 ; if(!qbevent)break;evnt(15896);}while(r); } } S_18852:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(15899);if(r)goto S_18852;} do{ *_FUNC_EVALUATE_LONG_RESULT= 1 ; if(!qbevent)break;evnt(15899);}while(r); } } S_18856:; if (((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15906);if(r)goto S_18856;} S_18857:; if ((-((*_FUNC_EVALUATE_LONG_LHSTYP& 4 )== 0 ))||new_error){ if(qbevent){evnt(15907);if(r)goto S_18857;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert string to number",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15907);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15907);}while(r); } }else{ S_18862:; if ((-(*_FUNC_EVALUATE_LONG_LHSTYP== 4 ))||new_error){ if(qbevent){evnt(15910);if(r)goto S_18862;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert number to string",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15910);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15910);}while(r); } S_18866:; if (((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15911);if(r)goto S_18866;} S_18867:; if ((-((*_FUNC_EVALUATE_LONG_LHSTYP& 2 )== 0 ))||new_error){ if(qbevent){evnt(15912);if(r)goto S_18867;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15914);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 64 ; if(!qbevent)break;evnt(15915);}while(r); } }else{ S_18872:; if ((-((*_FUNC_EVALUATE_LONG_LHSTYP& 1 )== 0 ))||new_error){ if(qbevent){evnt(15919);if(r)goto S_18872;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15921);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15922);}while(r); } } } S_18878:; if (((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(15927);if(r)goto S_18878;} S_18879:; if ((-((*_FUNC_EVALUATE_LONG_RHSTYP& 4 )== 0 ))||new_error){ if(qbevent){evnt(15928);if(r)goto S_18879;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert string to number",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15928);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15928);}while(r); } }else{ S_18884:; if ((-(*_FUNC_EVALUATE_LONG_RHSTYP== 4 ))||new_error){ if(qbevent){evnt(15931);if(r)goto S_18884;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot convert number to string",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15931);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(15931);}while(r); } S_18888:; if (((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15932);if(r)goto S_18888;} S_18889:; if ((-((*_FUNC_EVALUATE_LONG_RHSTYP& 2 )== 0 ))||new_error){ if(qbevent){evnt(15933);if(r)goto S_18889;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15935);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 64 ; if(!qbevent)break;evnt(15936);}while(r); } }else{ S_18894:; if ((-((*_FUNC_EVALUATE_LONG_RHSTYP& 1 )== 0 ))||new_error){ if(qbevent){evnt(15940);if(r)goto S_18894;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15942);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 256 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15943);}while(r); } } } S_18900:; if ((-(*_FUNC_EVALUATE_LONG_ISOP== 7 ))||new_error){ if(qbevent){evnt(15949);if(r)goto S_18900;} S_18901:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)!= 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)!= 0 )))||new_error){ if(qbevent){evnt(15959);if(r)goto S_18901;} do{ *_FUNC_EVALUATE_LONG_S1=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15960);}while(r); do{ *_FUNC_EVALUATE_LONG_S2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15960);}while(r); S_18904:; if ((-(*_FUNC_EVALUATE_LONG_S2<*_FUNC_EVALUATE_LONG_S1))||new_error){ if(qbevent){evnt(15961);if(r)goto S_18904;} do{ *_FUNC_EVALUATE_LONG_S1=*_FUNC_EVALUATE_LONG_S2; if(!qbevent)break;evnt(15961);}while(r); } S_18907:; if ((-(*_FUNC_EVALUATE_LONG_S1== 32 ))||new_error){ if(qbevent){evnt(15962);if(r)goto S_18907;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15963);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 32 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15963);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15964);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 32 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15964);}while(r); } S_18913:; if ((-(*_FUNC_EVALUATE_LONG_S1== 64 ))||new_error){ if(qbevent){evnt(15966);if(r)goto S_18913;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15967);}while(r); do{ *_FUNC_EVALUATE_LONG_OLDTYP= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15967);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(15968);}while(r); do{ *_FUNC_EVALUATE_LONG_NEWTYP= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(15968);}while(r); } } } do{ *_FUNC_EVALUATE_LONG_TYP=*_FUNC_EVALUATE_LONG_NEWTYP; if(!qbevent)break;evnt(15973);}while(r); S_18922:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISSTRING)== 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(15980);if(r)goto S_18922;} S_18923:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)!= 0 )))||new_error){ if(qbevent){evnt(15981);if(r)goto S_18923;} do{ *_FUNC_EVALUATE_LONG_B= 0 ; if(!qbevent)break;evnt(15983);}while(r); S_18925:; if (((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15983);if(r)goto S_18925;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15983);}while(r); } S_18928:; if (((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(15984);if(r)goto S_18928;} do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15985);}while(r); S_18930:; if ((-(*_FUNC_EVALUATE_LONG_B2>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(15985);if(r)goto S_18930;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B2; if(!qbevent)break;evnt(15985);}while(r); } } do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISFLOAT+*_FUNC_EVALUATE_LONG_B; if(!qbevent)break;evnt(15987);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(15992);}while(r); do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(15992);}while(r); S_18938:; if ((-(*_FUNC_EVALUATE_LONG_B2>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(15992);if(r)goto S_18938;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B2; if(!qbevent)break;evnt(15992);}while(r); } do{ *_FUNC_EVALUATE_LONG_TYP= 64 ; if(!qbevent)break;evnt(15993);}while(r); S_18942:; if ((-(*_FUNC_EVALUATE_LONG_B== 64 ))||new_error){ if(qbevent){evnt(15994);if(r)goto S_18942;} S_18943:; if (((-((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISUNSIGNED)!= 0 ))&(-((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(15995);if(r)goto S_18943;} do{ *_FUNC_EVALUATE_LONG_TYP= 64 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(15995);}while(r); } } } } S_18949:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(16000);if(r)goto S_18949;} S_18950:; if (((-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFLOAT)!= 0 ))|(-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISSTRING)!= 0 )))||new_error){ if(qbevent){evnt(16001);if(r)goto S_18950;} do{ *_FUNC_EVALUATE_LONG_TYP= 64 ; if(!qbevent)break;evnt(16001);}while(r); } } S_18954:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(16003);if(r)goto S_18954;} S_18955:; if ((-((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(16004);if(r)goto S_18955;} do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISFLOAT+ 256 ; if(!qbevent)break;evnt(16004);}while(r); } } S_18959:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 4 ))||new_error){ if(qbevent){evnt(16006);if(r)goto S_18959;} do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(16007);}while(r); } S_18962:; if ((-(*_FUNC_EVALUATE_LONG_RESULT== 8 ))||new_error){ if(qbevent){evnt(16009);if(r)goto S_18962;} do{ *_FUNC_EVALUATE_LONG_TYP= 32 ; if(!qbevent)break;evnt(16010);}while(r); } S_18965:; if ((*_FUNC_EVALUATE_LONG_OFFSETMODE)||new_error){ if(qbevent){evnt(16014);if(r)goto S_18965;} S_18966:; if ((-(*_FUNC_EVALUATE_LONG_RESULT!= 8 ))||new_error){ if(qbevent){evnt(16015);if(r)goto S_18966;} do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16016);}while(r); S_18968:; if ((-(*_FUNC_EVALUATE_LONG_OFFSETMODE== 2 ))||new_error){ if(qbevent){evnt(16016);if(r)goto S_18968;} do{ *_FUNC_EVALUATE_LONG_TYP=*_FUNC_EVALUATE_LONG_TYP+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(16016);}while(r); } } } S_18973:; if ((-(*_FUNC_EVALUATE_LONG_U== 2 ))||new_error){ if(qbevent){evnt(16021);if(r)goto S_18973;} S_18974:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATE_STRING_I,qbs_new_txt_len("pow2",4))))||new_error){ if(qbevent){evnt(16022);if(r)goto S_18974;} S_18975:; if ((*_FUNC_EVALUATE_LONG_OFFSETMODE)||new_error){ if(qbevent){evnt(16024);if(r)goto S_18975;} 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(16024);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16024);}while(r); } do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_OLDTYP& 511 ; if(!qbevent)break;evnt(16028);}while(r); S_18980:; if ((*_FUNC_EVALUATE_LONG_OLDTYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(16029);if(r)goto S_18980;} }else{ S_18982:; if ((-(*_FUNC_EVALUATE_LONG_B> 16 ))||new_error){ if(qbevent){evnt(16032);if(r)goto S_18982;} do{ *_FUNC_EVALUATE_LONG_B= 64 ; if(!qbevent)break;evnt(16032);}while(r); } S_18985:; if ((-(*_FUNC_EVALUATE_LONG_B> 32 ))||new_error){ if(qbevent){evnt(16033);if(r)goto S_18985;} do{ *_FUNC_EVALUATE_LONG_B= 256 ; if(!qbevent)break;evnt(16033);}while(r); } S_18988:; if ((-(*_FUNC_EVALUATE_LONG_B<= 16 ))||new_error){ if(qbevent){evnt(16034);if(r)goto S_18988;} do{ *_FUNC_EVALUATE_LONG_B= 32 ; if(!qbevent)break;evnt(16034);}while(r); } } do{ *_FUNC_EVALUATE_LONG_B2=*_FUNC_EVALUATE_LONG_NEWTYP& 511 ; if(!qbevent)break;evnt(16036);}while(r); S_18993:; if ((*_FUNC_EVALUATE_LONG_NEWTYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(16037);if(r)goto S_18993;} S_18994:; if ((-(*_FUNC_EVALUATE_LONG_B2>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(16038);if(r)goto S_18994;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B2; if(!qbevent)break;evnt(16038);}while(r); } }else{ do{ *_FUNC_EVALUATE_LONG_B3= 32 ; if(!qbevent)break;evnt(16040);}while(r); S_18999:; if ((-(*_FUNC_EVALUATE_LONG_B2> 16 ))||new_error){ if(qbevent){evnt(16041);if(r)goto S_18999;} do{ *_FUNC_EVALUATE_LONG_B3= 64 ; if(!qbevent)break;evnt(16041);}while(r); } S_19002:; if ((-(*_FUNC_EVALUATE_LONG_B2> 32 ))||new_error){ if(qbevent){evnt(16042);if(r)goto S_19002;} do{ *_FUNC_EVALUATE_LONG_B3= 256 ; if(!qbevent)break;evnt(16042);}while(r); } S_19005:; if ((-(*_FUNC_EVALUATE_LONG_B3>*_FUNC_EVALUATE_LONG_B))||new_error){ if(qbevent){evnt(16043);if(r)goto S_19005;} do{ *_FUNC_EVALUATE_LONG_B=*_FUNC_EVALUATE_LONG_B3; if(!qbevent)break;evnt(16043);}while(r); } } do{ *_FUNC_EVALUATE_LONG_TYP=*__LONG_ISFLOAT+*_FUNC_EVALUATE_LONG_B; if(!qbevent)break;evnt(16045);}while(r); } } S_19012:; if ((-(*_FUNC_EVALUATE_LONG_U== 5 ))||new_error){ if(qbevent){evnt(16052);if(r)goto S_19012;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16053);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16054);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(16054);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(16054);}while(r); } S_19018:; if ((-(*_FUNC_EVALUATE_LONG_U== 1 ))||new_error){ if(qbevent){evnt(16059);if(r)goto S_19018;} 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])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16060);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16061);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16061);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(16061);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(16061);}while(r); } S_19025:; if ((-(*_FUNC_EVALUATE_LONG_U== 2 ))||new_error){ if(qbevent){evnt(16064);if(r)goto S_19025;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16065);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16066);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16066);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(16066);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(16066);}while(r); } S_19032:; if ((-(*_FUNC_EVALUATE_LONG_U== 3 ))||new_error){ if(qbevent){evnt(16069);if(r)goto S_19032;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16070);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16071);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16071);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(16071);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(16071);}while(r); } S_19039:; if ((-(*_FUNC_EVALUATE_LONG_U== 4 ))||new_error){ if(qbevent){evnt(16074);if(r)goto S_19039;} 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])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16075);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16076);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16076);}while(r); do{ *_FUNC_EVALUATE_LONG_I=*_FUNC_EVALUATE_LONG_I+ 1 ; if(!qbevent)break;evnt(16076);}while(r); do{ goto LABEL_OPERATORAPPLIED; if(!qbevent)break;evnt(16076);}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(16081);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16081);}while(r); LABEL_OPERATORAPPLIED:; if(qbevent){evnt(16082);r=0;} S_19048:; if ((*_FUNC_EVALUATE_LONG_OFFSETCVI)||new_error){ if(qbevent){evnt(16084);if(r)goto S_19048;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16084);}while(r); do{ *_FUNC_EVALUATE_LONG_OFFSETCVI= 0 ; if(!qbevent)break;evnt(16084);}while(r); } do{ *_FUNC_EVALUATE_LONG_OFFSETMODE= 0 ; if(!qbevent)break;evnt(16085);}while(r); }else{ do{ *_FUNC_EVALUATE_LONG_NONOP=*_FUNC_EVALUATE_LONG_NONOP+ 1 ; if(!qbevent)break;evnt(16088);}while(r); } }else{ do{ *_FUNC_EVALUATE_LONG_NONOP=*_FUNC_EVALUATE_LONG_NONOP+ 1 ; if(!qbevent)break;evnt(16091);}while(r); } S_19059:; if ((-(*_FUNC_EVALUATE_LONG_NONOP> 1 ))||new_error){ if(qbevent){evnt(16093);if(r)goto S_19059;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected operator in equation",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16093);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16093);}while(r); } fornext_continue_2541:; } fornext_exit_2541:; S_19064:; if (( 0 )||new_error){ if(qbevent){evnt(16095);if(r)goto S_19064;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2543; sub_file_print(tmp_fileno,qbs_new_txt_len("",0), 0, 0, 1); if (new_error) goto skip2543; skip2543: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16095);}while(r); } S_19067:; fornext_value2545= 1 ; fornext_finalvalue2545=*_FUNC_EVALUATE_LONG_BLOCKN; fornext_step2545= 1 ; if (fornext_step2545<0) fornext_step_negative2545=1; else fornext_step_negative2545=0; if (new_error) goto fornext_error2545; goto fornext_entrylabel2545; while(1){ fornext_value2545=fornext_step2545+(*_FUNC_EVALUATE_LONG_I); fornext_entrylabel2545: *_FUNC_EVALUATE_LONG_I=fornext_value2545; if (fornext_step_negative2545){ if (fornext_value2545fornext_finalvalue2545) break; } fornext_error2545:; if(qbevent){evnt(16098);if(r)goto S_19067;} 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(16099);}while(r); fornext_continue_2544:; } fornext_exit_2544:; S_19070:; if (( 0 )||new_error){ if(qbevent){evnt(16102);if(r)goto S_19070;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2546; 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 skip2546; skip2546: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16103);}while(r); S_19072:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16104);if(r)goto S_19072;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2547; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISSTRING]",10), 0, 0, 0); if (new_error) goto skip2547; skip2547: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16104);}while(r); } S_19075:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16105);if(r)goto S_19075;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2548; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISFLOAT]",9), 0, 0, 0); if (new_error) goto skip2548; skip2548: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16105);}while(r); } S_19078:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16106);if(r)goto S_19078;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2549; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISUNSIGNED]",12), 0, 0, 0); if (new_error) goto skip2549; skip2549: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16106);}while(r); } S_19081:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(16107);if(r)goto S_19081;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2550; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISPOINTER]",11), 0, 0, 0); if (new_error) goto skip2550; skip2550: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16107);}while(r); } S_19084:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16108);if(r)goto S_19084;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2551; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISFIXEDLENGTH]",15), 0, 0, 0); if (new_error) goto skip2551; skip2551: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16108);}while(r); } S_19087:; if (((*_FUNC_EVALUATE_LONG_TYP&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(16109);if(r)goto S_19087;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2552; sub_file_print(tmp_fileno,qbs_new_txt_len("[ISINCONVENTIONALMEMORY]",24), 0, 0, 0); if (new_error) goto skip2552; skip2552: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16109);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2553; sub_file_print(tmp_fileno,qbs_add(qbs_add(qbs_new_txt_len("(size in bits=",14),FUNC_STR2(&(pass2554=*_FUNC_EVALUATE_LONG_TYP& 511 ))),qbs_new_txt_len(")",1)), 0, 0, 1); if (new_error) goto skip2553; skip2553: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16110);}while(r); } do{ qbs_set(_FUNC_EVALUATE_STRING_EVALUATE,_FUNC_EVALUATE_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16114);}while(r); 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_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 "data14.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_A,_FUNC_EVALUATEFUNC_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16124);}while(r); S_19094:; if (( 0 )||new_error){ if(qbevent){evnt(16126);if(r)goto S_19094;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2556; 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 skip2556; skip2556: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16126);}while(r); } do{ if(!qbevent)break;evnt(16128);}while(r); do{ memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 0),(((char*)__UDT_ID)+(0)+ 0), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 256),(((char*)__UDT_ID)+(0)+ 256), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 512),(((char*)__UDT_ID)+(0)+ 512), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 516),(((char*)__UDT_ID)+(0)+ 516), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 518),(((char*)__UDT_ID)+(0)+ 518), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 520),(((char*)__UDT_ID)+(0)+ 520), 8); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 528),(((char*)__UDT_ID)+(0)+ 528), 8); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 536),(((char*)__UDT_ID)+(0)+ 536), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 540),(((char*)__UDT_ID)+(0)+ 540), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 544),(((char*)__UDT_ID)+(0)+ 544), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 546),(((char*)__UDT_ID)+(0)+ 546), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 548),(((char*)__UDT_ID)+(0)+ 548), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 550),(((char*)__UDT_ID)+(0)+ 550), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 806),(((char*)__UDT_ID)+(0)+ 806), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 808),(((char*)__UDT_ID)+(0)+ 808), 1); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 809),(((char*)__UDT_ID)+(0)+ 809), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 811),(((char*)__UDT_ID)+(0)+ 811), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 813),(((char*)__UDT_ID)+(0)+ 813), 400); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 1213),(((char*)__UDT_ID)+(0)+ 1213), 400); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 1613),(((char*)__UDT_ID)+(0)+ 1613), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 1869),(((char*)__UDT_ID)+(0)+ 1869), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2125),(((char*)__UDT_ID)+(0)+ 2125), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2381),(((char*)__UDT_ID)+(0)+ 2381), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2385),(((char*)__UDT_ID)+(0)+ 2385), 256); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2641),(((char*)__UDT_ID)+(0)+ 2641), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2645),(((char*)__UDT_ID)+(0)+ 2645), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2647),(((char*)__UDT_ID)+(0)+ 2647), 100); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2747),(((char*)__UDT_ID)+(0)+ 2747), 100); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2847),(((char*)__UDT_ID)+(0)+ 2847), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2851),(((char*)__UDT_ID)+(0)+ 2851), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2853),(((char*)__UDT_ID)+(0)+ 2853), 2); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2855),(((char*)__UDT_ID)+(0)+ 2855), 4); memcpy((((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2859),(((char*)__UDT_ID)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2861), *(qbs**)(((char*)__UDT_ID)+(0)+ 2861)); if(!qbevent)break;evnt(16130);}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(16131);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*(int32*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2381)); if(!qbevent)break;evnt(16132);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETID=*__LONG_CURRENTID; if(!qbevent)break;evnt(16133);}while(r); S_19102:; 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(16135);if(r)goto S_19102;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Command not implemented",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16135);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16135);}while(r); } S_19106:; 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_input",10)))&(-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 1 ))&(-(*__BYTE_INPUTFUNCTIONCALLED== 0 ))))||new_error){ if(qbevent){evnt(16136);if(r)goto S_19106;} do{ *__BYTE_INPUTFUNCTIONCALLED= -1 ; if(!qbevent)break;evnt(16137);}while(r); S_19108:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(16138);if(r)goto S_19108;} do{ SUB_WRITEBUFLINE(&(pass2557=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= -4; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16139);}while(r); } } do{ SUB_SETDEPENDENCY(&(pass2558=*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(546)))); if(!qbevent)break;evnt(16143);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_PASSOMIT= 0 ; if(!qbevent)break;evnt(16145);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST= 0 ; if(!qbevent)break;evnt(16146);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST= 0 ; if(!qbevent)break;evnt(16146);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_F,qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(1613)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16148);}while(r); S_19117:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_EVALUATEFUNC_STRING_F->len))||new_error){ if(qbevent){evnt(16149);if(r)goto S_19117;} do{ *_FUNC_EVALUATEFUNC_LONG_SQB= 0 ; if(!qbevent)break;evnt(16152);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_A= 0 ; if(!qbevent)break;evnt(16153);}while(r); S_19120:; fornext_value2561= 1 ; fornext_finalvalue2561=_FUNC_EVALUATEFUNC_STRING_F->len; fornext_step2561= 1 ; if (fornext_step2561<0) fornext_step_negative2561=1; else fornext_step_negative2561=0; if (new_error) goto fornext_error2561; goto fornext_entrylabel2561; while(1){ fornext_value2561=fornext_step2561+(*_FUNC_EVALUATEFUNC_LONG_FI); fornext_entrylabel2561: *_FUNC_EVALUATEFUNC_LONG_FI=fornext_value2561; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2561){ if (fornext_value2561fornext_finalvalue2561) break; } fornext_error2561:; if(qbevent){evnt(16154);if(r)goto S_19120;} 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(16155);}while(r); S_19122:; if ((-(*_FUNC_EVALUATEFUNC_LONG_FA== 63 ))||new_error){ if(qbevent){evnt(16156);if(r)goto S_19122;} do{ *_FUNC_EVALUATEFUNC_LONG_A=*_FUNC_EVALUATEFUNC_LONG_A+ 1 ; if(!qbevent)break;evnt(16157);}while(r); S_19124:; if (((-(*_FUNC_EVALUATEFUNC_LONG_SQB!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST== 0 )))||new_error){ if(qbevent){evnt(16158);if(r)goto S_19124;} do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST=*_FUNC_EVALUATEFUNC_LONG_A; if(!qbevent)break;evnt(16158);}while(r); } } S_19128:; if ((-(*_FUNC_EVALUATEFUNC_LONG_FA== 91 ))||new_error){ if(qbevent){evnt(16160);if(r)goto S_19128;} do{ *_FUNC_EVALUATEFUNC_LONG_SQB= 1 ; if(!qbevent)break;evnt(16160);}while(r); } S_19131:; if ((-(*_FUNC_EVALUATEFUNC_LONG_FA== 93 ))||new_error){ if(qbevent){evnt(16161);if(r)goto S_19131;} do{ *_FUNC_EVALUATEFUNC_LONG_SQB= 0 ; if(!qbevent)break;evnt(16161);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST=*_FUNC_EVALUATEFUNC_LONG_A; if(!qbevent)break;evnt(16161);}while(r); } fornext_continue_2560:; } fornext_exit_2560:; do{ *_FUNC_EVALUATEFUNC_LONG_OMITARGS=*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST-*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST+ 1 ; if(!qbevent)break;evnt(16163);}while(r); S_19137:; if (((-(*_FUNC_EVALUATEFUNC_LONG_ARGS!=(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(809))-*_FUNC_EVALUATEFUNC_LONG_OMITARGS)))&(-(*_FUNC_EVALUATEFUNC_LONG_ARGS!=*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(809)))))||new_error){ if(qbevent){evnt(16165);if(r)goto S_19137;} S_19138:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2861)))->len> 0 )))||new_error){ if(qbevent){evnt(16166);if(r)goto S_19138;} do{ SUB_GIVE_ERROR(qbs_add(qbs_new_txt_len("Incorrect number of arguments - Reference: ",43),*((qbs**)((char*)_FUNC_EVALUATEFUNC_UDT_ID2+(2861))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16167);}while(r); }else{ 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(16169);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(16171);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_PASSOMIT= 1 ; if(!qbevent)break;evnt(16174);}while(r); S_19146:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(809))==*_FUNC_EVALUATEFUNC_LONG_ARGS))||new_error){ if(qbevent){evnt(16176);if(r)goto S_19146;} do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST= 0 ; if(!qbevent)break;evnt(16176);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST= 0 ; if(!qbevent)break;evnt(16176);}while(r); } }else{ S_19151:; 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(16180);if(r)goto S_19151;} do{ goto LABEL_SKIPARGNUMCHK; if(!qbevent)break;evnt(16180);}while(r); } S_19154:; if (((-(*(int8*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(808))== -1 ))&(((-(*_FUNC_EVALUATEFUNC_LONG_ARGS>=*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(811))))&(-(*_FUNC_EVALUATEFUNC_LONG_ARGS<=*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(809)))))))||new_error){ if(qbevent){evnt(16181);if(r)goto S_19154;} do{ goto LABEL_SKIPARGNUMCHK; if(!qbevent)break;evnt(16181);}while(r); } S_19157:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(809))!=*_FUNC_EVALUATEFUNC_LONG_ARGS))||new_error){ if(qbevent){evnt(16183);if(r)goto S_19157;} S_19158:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2861)))->len> 0 )))||new_error){ if(qbevent){evnt(16184);if(r)goto S_19158;} do{ SUB_GIVE_ERROR(qbs_add(qbs_new_txt_len("Incorrect number of arguments - Reference: ",43),*((qbs**)((char*)_FUNC_EVALUATEFUNC_UDT_ID2+(2861))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16185);}while(r); }else{ 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(16187);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(16189);}while(r); } } LABEL_SKIPARGNUMCHK:; if(qbevent){evnt(16194);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(16196);}while(r); S_19167:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(809))!= 0 ))||new_error){ if(qbevent){evnt(16199);if(r)goto S_19167;} do{ *_FUNC_EVALUATEFUNC_LONG_CURARG= 1 ; if(!qbevent)break;evnt(16201);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_FIRSTI= 1 ; if(!qbevent)break;evnt(16202);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_N=FUNC_NUMELEMENTS(_FUNC_EVALUATEFUNC_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16204);}while(r); S_19171:; if ((-(*_FUNC_EVALUATEFUNC_LONG_N== 0 ))||new_error){ if(qbevent){evnt(16205);if(r)goto S_19171;} do{ *_FUNC_EVALUATEFUNC_LONG_I= 0 ; if(!qbevent)break;evnt(16205);}while(r); do{ goto LABEL_NOARGS; if(!qbevent)break;evnt(16205);}while(r); } S_19175:; fornext_value2564= 1 ; fornext_finalvalue2564=*_FUNC_EVALUATEFUNC_LONG_N; fornext_step2564= 1 ; if (fornext_step2564<0) fornext_step_negative2564=1; else fornext_step_negative2564=0; if (new_error) goto fornext_error2564; goto fornext_entrylabel2564; while(1){ fornext_value2564=fornext_step2564+(*_FUNC_EVALUATEFUNC_LONG_I); fornext_entrylabel2564: *_FUNC_EVALUATEFUNC_LONG_I=fornext_value2564; if (fornext_step_negative2564){ if (fornext_value2564fornext_finalvalue2564) break; } fornext_error2564:; if(qbevent){evnt(16207);if(r)goto S_19175;} S_19176:; if (((-(*_FUNC_EVALUATEFUNC_LONG_CURARG>=*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST))&(-(*_FUNC_EVALUATEFUNC_LONG_CURARG<=*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(16211);if(r)goto S_19176;} LABEL_NOARGS:; if(qbevent){evnt(16212);r=0;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(813)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16213);}while(r); S_19178:; fornext_value2566= 1 ; fornext_finalvalue2566=*_FUNC_EVALUATEFUNC_LONG_OMITARGS- 1 ; fornext_step2566= 1 ; if (fornext_step2566<0) fornext_step_negative2566=1; else fornext_step_negative2566=0; if (new_error) goto fornext_error2566; goto fornext_entrylabel2566; while(1){ fornext_value2566=fornext_step2566+(*_FUNC_EVALUATEFUNC_LONG_FI); fornext_entrylabel2566: *_FUNC_EVALUATEFUNC_LONG_FI=fornext_value2566; if (fornext_step_negative2566){ if (fornext_value2566fornext_finalvalue2566) break; } fornext_error2566:; if(qbevent){evnt(16217);if(r)goto S_19178;} 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(16217);}while(r); fornext_continue_2565:; } fornext_exit_2565:; 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(16217);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_CURARG=*_FUNC_EVALUATEFUNC_LONG_CURARG+*_FUNC_EVALUATEFUNC_LONG_OMITARGS; if(!qbevent)break;evnt(16218);}while(r); S_19183:; if ((-(*_FUNC_EVALUATEFUNC_LONG_I==*_FUNC_EVALUATEFUNC_LONG_N))||new_error){ if(qbevent){evnt(16219);if(r)goto S_19183;} do{ goto fornext_exit_2563; if(!qbevent)break;evnt(16219);}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(16220);}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(16223);}while(r); S_19189:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_L,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(16224);if(r)goto S_19189;} do{ *_FUNC_EVALUATEFUNC_LONG_B=*_FUNC_EVALUATEFUNC_LONG_B+ 1 ; if(!qbevent)break;evnt(16224);}while(r); } S_19192:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(16225);if(r)goto S_19192;} do{ *_FUNC_EVALUATEFUNC_LONG_B=*_FUNC_EVALUATEFUNC_LONG_B- 1 ; if(!qbevent)break;evnt(16225);}while(r); } S_19195:; 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(16226);if(r)goto S_19195;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(813)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16228);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_NELE=qbs_asc(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2647)),100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16229);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_NELEREQ=qbs_asc(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2747)),100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16230);}while(r); S_19199:; if ((-(*_FUNC_EVALUATEFUNC_LONG_I==*_FUNC_EVALUATEFUNC_LONG_N))||new_error){ if(qbevent){evnt(16232);if(r)goto S_19199;} 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(16233);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_GETELEMENTS(_FUNC_EVALUATEFUNC_STRING_A,_FUNC_EVALUATEFUNC_LONG_FIRSTI,&(pass2567=*_FUNC_EVALUATEFUNC_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16235);}while(r); } S_19204:; 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(16238);if(r)goto S_19204;} do{ *_FUNC_EVALUATEFUNC_LONG_DEREFERENCE= 1 ; if(!qbevent)break;evnt(16238);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_DEREFERENCE= 0 ; if(!qbevent)break;evnt(16238);}while(r); } S_19209:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_CV",3)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CV",2)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16243);if(r)goto S_19209;} S_19210:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16244);if(r)goto S_19210;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,FUNC_TYPE2SYMBOL(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16245);}while(r); S_19212:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16246);if(r)goto S_19212;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16246);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16247);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16248);}while(r); } } S_19219:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MK",3)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MK",2)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16254);if(r)goto S_19219;} S_19220:; 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(16255);if(r)goto S_19220;} S_19221:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16256);if(r)goto S_19221;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,FUNC_TYPE2SYMBOL(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16257);}while(r); S_19223:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16258);if(r)goto S_19223;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16258);}while(r); } S_19226:; if (( 0 )||new_error){ if(qbevent){evnt(16259);if(r)goto S_19226;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2568; 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 skip2568; skip2568: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(16259);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16260);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16261);}while(r); } } } S_19234:; 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(16266);if(r)goto S_19234;} S_19235:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16267);if(r)goto S_19235;} 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(16269);}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(16270);}while(r); S_19238:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16271);if(r)goto S_19238;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16271);}while(r); } S_19241:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16272);if(r)goto S_19241;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected array-name",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16272);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16272);}while(r); } S_19245:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(16273);if(r)goto S_19245;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected array-name",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16273);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16273);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_ULBOUNDARRAY,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16275);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_ULBOUNDARRAYTYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16276);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16277);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16278);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16279);}while(r); } } S_19256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("INPUT",5))))||new_error){ if(qbevent){evnt(16285);if(r)goto S_19256;} S_19257:; 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(16286);if(r)goto S_19257;} S_19258:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(16287);if(r)goto S_19258;} S_19259:; 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(16288);if(r)goto S_19259;} 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(16288);}while(r); } } } } S_19265:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ASC",3))))||new_error){ if(qbevent){evnt(16295);if(r)goto S_19265;} S_19266:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(16296);if(r)goto S_19266;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E,&(pass2570= 32 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16297);}while(r); S_19268:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16298);if(r)goto S_19268;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16298);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16299);}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(16300);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16301);}while(r); } } S_19276:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MEMGET",7)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MEMGET",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16312);if(r)goto S_19276;} S_19277:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16313);if(r)goto S_19277;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_BLK,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16314);}while(r); } S_19280:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(16316);if(r)goto S_19280;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MEMGET_OFFS,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16317);}while(r); } S_19283:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 3 ))||new_error){ if(qbevent){evnt(16319);if(r)goto S_19283;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_ucase(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16320);}while(r); S_19285:; 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(16321);if(r)goto S_19285;} S_19286:; 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(16322);if(r)goto S_19286;} 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(16323);}while(r); }else{ S_19289:; 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(16325);if(r)goto S_19289;} 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(16325);}while(r); } } } do{ *_FUNC_EVALUATEFUNC_LONG_T=FUNC_TYPNAME2TYP(_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16328);}while(r); S_19295:; if ((-(*_FUNC_EVALUATEFUNC_LONG_T== 0 ))||new_error){ if(qbevent){evnt(16329);if(r)goto S_19295;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid TYPE name",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16329);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16329);}while(r); } S_19299:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(16330);if(r)goto S_19299;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("BIT TYPE unsupported",20))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16330);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16330);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE=*__LONG_TYPNAME2TYPSIZE; if(!qbevent)break;evnt(16331);}while(r); S_19304:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16332);if(r)goto S_19304;} S_19305:; if ((-((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(16333);if(r)goto S_19305;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * ...",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16333);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16333);}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(16334);}while(r); }else{ S_19311:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16336);if(r)goto S_19311;} 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(16337);}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(16338);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_MEMGET_SIZE=(*_FUNC_EVALUATEFUNC_LONG_T& 511 )/ 8 ; if(!qbevent)break;evnt(16340);}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(16341);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_OFFS,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_MEMGET_OFFS,&(pass2573=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16350);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_BLKOFFS,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_MEMGET_BLK,&(pass2574= -6 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16351);}while(r); S_19321:; if ((-(*__LONG_NOCHECKS== 0 ))||new_error){ if(qbevent){evnt(16352);if(r)goto S_19321;} 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(16354);}while(r); } S_19324:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16356);if(r)goto S_19324;} 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(16357);}while(r); }else{ S_19327:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16359);if(r)goto S_19327;} 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(16360);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T=*__LONG_ISUDT+*__LONG_ISPOINTER+(*_FUNC_EVALUATEFUNC_LONG_T& 511 ); if(!qbevent)break;evnt(16361);}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(16363);}while(r); S_19332:; if ((*_FUNC_EVALUATEFUNC_LONG_T&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(16364);if(r)goto S_19332;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16364);}while(r); } } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_T; if(!qbevent)break;evnt(16374);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16377);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E2,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16382);}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(16383);}while(r); S_19343:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16384);if(r)goto S_19343;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16384);}while(r); } S_19346:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_ROR",4)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ROR",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))|(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_ROL",4)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ROL",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16388);if(r)goto S_19346;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_ROTLR_N,qbs_lcase(qbs_right(_FUNC_EVALUATEFUNC_STRING_N, 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16389);}while(r); S_19348:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16390);if(r)goto S_19348;} S_19349:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)|(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT)|(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)|(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(16391);if(r)goto S_19349;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected non-floating-point value",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16392);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16393);}while(r); } S_19353:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(16395);if(r)goto S_19353;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2575= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16395);}while(r); } S_19356:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16396);if(r)goto S_19356;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16396);}while(r); } S_19359:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(16398);if(r)goto S_19359;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__",6),_FUNC_EVALUATEFUNC_STRING_ROTLR_N),qbs_new_txt_len("8(",2)),_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16399);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16400);}while(r); S_19362:; }else{ if (-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 )== 16 )){ if(qbevent){evnt(16401);if(r)goto S_19362;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__",6),_FUNC_EVALUATEFUNC_STRING_ROTLR_N),qbs_new_txt_len("16(",3)),_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16402);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16403);}while(r); S_19365:; }else{ if (-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 )== 32 )){ if(qbevent){evnt(16404);if(r)goto S_19365;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__",6),_FUNC_EVALUATEFUNC_STRING_ROTLR_N),qbs_new_txt_len("32(",3)),_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16405);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16406);}while(r); S_19368:; }else{ if (-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 )== 64 )){ if(qbevent){evnt(16407);if(r)goto S_19368;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__",6),_FUNC_EVALUATEFUNC_STRING_ROTLR_N),qbs_new_txt_len("64(",3)),_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16408);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16409);}while(r); }else{ do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unknown data size",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16411);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16412);}while(r); } } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16414);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16415);}while(r); do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16416);}while(r); S_19378:; }else{ if (-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 )){ if(qbevent){evnt(16417);if(r)goto S_19378;} S_19379:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(16418);if(r)goto S_19379;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2576= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16418);}while(r); } S_19382:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16419);if(r)goto S_19382;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16419);}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(16420);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16421);}while(r); } } } S_19389:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MEM",4)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16426);if(r)goto S_19389;} S_19390:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(16427);if(r)goto S_19390;} S_19391:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 1 ))||new_error){ if(qbevent){evnt(16428);if(r)goto S_19391;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP= -7 ; if(!qbevent)break;evnt(16429);}while(r); } S_19394:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 2 ))||new_error){ if(qbevent){evnt(16431);if(r)goto S_19394;} 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(16432);}while(r); S_19396:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)== 0 ))||new_error){ if(qbevent){evnt(16433);if(r)goto S_19396;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected _MEM(_OFFSET-value,...)",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16433);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16433);}while(r); } } } } S_19403:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_OFFSET",7)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("OFFSET",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16439);if(r)goto S_19403;} S_19404:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16440);if(r)goto S_19404;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OFFSET expects the name of a variable/array",43))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16441);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16441);}while(r); } S_19408:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16443);if(r)goto S_19408;} S_19409:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16444);if(r)goto S_19409;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OFFSET cannot reference _BIT type arrays",40))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16444);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16444);}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,&(pass2578= -6 ))),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16446);}while(r); S_19415:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16447);if(r)goto S_19415;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16447);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16448);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16449);}while(r); } S_19421:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(16453);if(r)goto S_19421;} S_19422:; 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(16454);if(r)goto S_19422;} 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(16454);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16454);}while(r); } S_19426:; 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(16455);if(r)goto S_19426;} 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(16455);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16455);}while(r); } } S_19431:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ENVIRON",7))))||new_error){ if(qbevent){evnt(16459);if(r)goto S_19431;} S_19432:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16460);if(r)goto S_19432;} S_19433:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)||new_error){ if(qbevent){evnt(16461);if(r)goto S_19433;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2579= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16461);}while(r); } S_19436:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16462);if(r)goto S_19436;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16462);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(16463);}while(r); } } S_19442:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("LEN",3))))||new_error){ if(qbevent){evnt(16468);if(r)goto S_19442;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16469);}while(r); S_19444:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16470);if(r)goto S_19444;} S_19445:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(16472);if(r)goto S_19445;} 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(16473);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16474);}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(16476);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16476);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2580= -5 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16478);}while(r); S_19453:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16479);if(r)goto S_19453;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16479);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16480);}while(r); } S_19458:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_BIN",4)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("BIN",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16485);if(r)goto S_19458;} S_19459:; 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(16486);if(r)goto S_19459;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16487);}while(r); S_19461:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16489);if(r)goto S_19461;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16489);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16489);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 0 ; if(!qbevent)break;evnt(16490);}while(r); S_19466:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16491);if(r)goto S_19466;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2581= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16491);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 1 ; if(!qbevent)break;evnt(16491);}while(r); } S_19470:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16492);if(r)goto S_19470;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16492);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16493);}while(r); S_19474:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16494);if(r)goto S_19474;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__bin(",10),_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(16495);}while(r); }else{ S_19477:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16497);if(r)goto S_19477;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("func__bin_float(",16),_FUNC_EVALUATEFUNC_STRING_E),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16498);}while(r); }else{ S_19480:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16500);if(r)goto S_19480;} S_19481:; if ((-(*_FUNC_EVALUATEFUNC_LONG_WASREF== 0 ))||new_error){ if(qbevent){evnt(16501);if(r)goto S_19481;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS= 0 ; if(!qbevent)break;evnt(16501);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("func__bin(",10),_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(16503);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16506);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16507);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16508);}while(r); } } S_19493:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("OCT",3))))||new_error){ if(qbevent){evnt(16513);if(r)goto S_19493;} S_19494:; 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(16514);if(r)goto S_19494;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16515);}while(r); S_19496:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16517);if(r)goto S_19496;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16517);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16517);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 0 ; if(!qbevent)break;evnt(16518);}while(r); S_19501:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16519);if(r)goto S_19501;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2582= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16519);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 1 ; if(!qbevent)break;evnt(16519);}while(r); } S_19505:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16520);if(r)goto S_19505;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16520);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16521);}while(r); S_19509:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16522);if(r)goto S_19509;} 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(16523);}while(r); }else{ S_19512:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16525);if(r)goto S_19512;} 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(16526);}while(r); }else{ S_19515:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16528);if(r)goto S_19515;} S_19516:; if ((-(*_FUNC_EVALUATEFUNC_LONG_WASREF== 0 ))||new_error){ if(qbevent){evnt(16529);if(r)goto S_19516;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS= 0 ; if(!qbevent)break;evnt(16529);}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(16531);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16534);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16535);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16536);}while(r); } } S_19528:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("HEX",3))))||new_error){ if(qbevent){evnt(16541);if(r)goto S_19528;} S_19529:; 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(16542);if(r)goto S_19529;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16543);}while(r); S_19531:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16544);if(r)goto S_19531;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16544);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16544);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 0 ; if(!qbevent)break;evnt(16545);}while(r); S_19536:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16546);if(r)goto S_19536;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2583= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16546);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_WASREF= 1 ; if(!qbevent)break;evnt(16546);}while(r); } S_19540:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16547);if(r)goto S_19540;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16547);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16548);}while(r); S_19544:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16549);if(r)goto S_19544;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS=(*_FUNC_EVALUATEFUNC_LONG_BITS+ 3 )/ 4 ; if(!qbevent)break;evnt(16550);}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(16551);}while(r); }else{ S_19548:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16553);if(r)goto S_19548;} 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(16554);}while(r); }else{ S_19551:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(16556);if(r)goto S_19551;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 2 ; if(!qbevent)break;evnt(16556);}while(r); } S_19554:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(16557);if(r)goto S_19554;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 4 ; if(!qbevent)break;evnt(16557);}while(r); } S_19557:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16558);if(r)goto S_19557;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 8 ; if(!qbevent)break;evnt(16558);}while(r); } S_19560:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16559);if(r)goto S_19560;} S_19561:; if ((-(*_FUNC_EVALUATEFUNC_LONG_WASREF== 1 ))||new_error){ if(qbevent){evnt(16560);if(r)goto S_19561;} do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 16 ; if(!qbevent)break;evnt(16560);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_CHARS= 0 ; if(!qbevent)break;evnt(16560);}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(16562);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16565);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16566);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16567);}while(r); } } S_19575:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("EXP",3))))||new_error){ if(qbevent){evnt(16573);if(r)goto S_19575;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16574);}while(r); S_19577:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16575);if(r)goto S_19577;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16575);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16575);}while(r); } S_19581:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16576);if(r)goto S_19581;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2584= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16576);}while(r); } S_19584:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16577);if(r)goto S_19584;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16577);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16578);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16579);}while(r); S_19589:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16580);if(r)goto S_19589;} S_19590:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16581);if(r)goto S_19590;} 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(16581);}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(16581);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16581);}while(r); } }else{ S_19597:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16583);if(r)goto S_19597;} 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(16584);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16584);}while(r); }else{ S_19601:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(16586);if(r)goto S_19601;} 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(16586);}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(16586);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16586);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16589);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16590);}while(r); } S_19612:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("INT",3))))||new_error){ if(qbevent){evnt(16594);if(r)goto S_19612;} S_19613:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16595);if(r)goto S_19613;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16595);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16595);}while(r); } S_19617:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16596);if(r)goto S_19617;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2585= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16596);}while(r); } S_19620:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16597);if(r)goto S_19620;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16597);}while(r); } S_19623:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16599);if(r)goto S_19623;} 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(16599);}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(16599);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16600);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16601);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16602);}while(r); } S_19632:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("FIX",3))))||new_error){ if(qbevent){evnt(16606);if(r)goto S_19632;} S_19633:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16607);if(r)goto S_19633;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16607);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16607);}while(r); } S_19637:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16608);if(r)goto S_19637;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2586= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16608);}while(r); } S_19640:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16609);if(r)goto S_19640;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16609);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16611);}while(r); S_19644:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16612);if(r)goto S_19644;} S_19645:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16613);if(r)goto S_19645;} 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(16613);}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(16613);}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(16615);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16617);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(16618);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16619);}while(r); } S_19657:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_ROUND",6)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ROUND",5)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16623);if(r)goto S_19657;} S_19658:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16624);if(r)goto S_19658;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16624);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16624);}while(r); } S_19662:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16625);if(r)goto S_19662;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2587= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16625);}while(r); } S_19665:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16626);if(r)goto S_19665;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16626);}while(r); } S_19668:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16628);if(r)goto S_19668;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16629);}while(r); S_19670:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16630);if(r)goto S_19670;} 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(16630);}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(16630);}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(16632);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16634);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16635);}while(r); S_19680:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16636);if(r)goto S_19680;} S_19681:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(16637);if(r)goto S_19681;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16637);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16637);}while(r); } } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16639);}while(r); } S_19689:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CDBL",4))))||new_error){ if(qbevent){evnt(16644);if(r)goto S_19689;} S_19690:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16645);if(r)goto S_19690;} 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(16645);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16645);}while(r); } S_19694:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16646);if(r)goto S_19694;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16646);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16646);}while(r); } S_19698:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16647);if(r)goto S_19698;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2588= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16647);}while(r); } S_19701:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16648);if(r)goto S_19701;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16648);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16650);}while(r); S_19705:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16651);if(r)goto S_19705;} S_19706:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16652);if(r)goto S_19706;} 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(16652);}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(16654);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16656);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16657);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16658);}while(r); } S_19716:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CSNG",4))))||new_error){ if(qbevent){evnt(16662);if(r)goto S_19716;} S_19717:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16663);if(r)goto S_19717;} 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(16663);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16663);}while(r); } S_19721:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16664);if(r)goto S_19721;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16664);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16664);}while(r); } S_19725:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16665);if(r)goto S_19725;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2589= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16665);}while(r); } S_19728:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16666);if(r)goto S_19728;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16666);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16668);}while(r); S_19732:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16669);if(r)goto S_19732;} S_19733:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16670);if(r)goto S_19733;} 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(16670);}while(r); } S_19736:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16671);if(r)goto S_19736;} 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(16671);}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(16673);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16675);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16676);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16677);}while(r); } S_19746:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CLNG",4))))||new_error){ if(qbevent){evnt(16682);if(r)goto S_19746;} S_19747:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16683);if(r)goto S_19747;} 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(16683);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16683);}while(r); } S_19751:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16684);if(r)goto S_19751;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16684);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16684);}while(r); } S_19755:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16685);if(r)goto S_19755;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2590= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16685);}while(r); } S_19758:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16686);if(r)goto S_19758;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16686);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16688);}while(r); S_19762:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16689);if(r)goto S_19762;} S_19763:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16690);if(r)goto S_19763;} 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(16690);}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(16690);}while(r); } }else{ S_19769:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16692);if(r)goto S_19769;} S_19770:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16693);if(r)goto S_19770;} 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(16693);}while(r); } S_19773:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16694);if(r)goto S_19773;} 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(16694);}while(r); } }else{ S_19777:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16696);if(r)goto S_19777;} 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(16696);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16699);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 32 ; if(!qbevent)break;evnt(16700);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16701);}while(r); } S_19786:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CINT",4))))||new_error){ if(qbevent){evnt(16705);if(r)goto S_19786;} S_19787:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET))||new_error){ if(qbevent){evnt(16706);if(r)goto S_19787;} 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(16706);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16706);}while(r); } S_19791:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16707);if(r)goto S_19791;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric value",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16707);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16707);}while(r); } S_19795:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16708);if(r)goto S_19795;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2591= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16708);}while(r); } S_19798:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16709);if(r)goto S_19798;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16709);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16711);}while(r); S_19802:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16712);if(r)goto S_19802;} S_19803:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 64 ))||new_error){ if(qbevent){evnt(16713);if(r)goto S_19803;} 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(16713);}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(16713);}while(r); } }else{ S_19809:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16715);if(r)goto S_19809;} S_19810:; if (((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 15 ))&(-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 32 )))||new_error){ if(qbevent){evnt(16716);if(r)goto S_19810;} 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(16716);}while(r); } S_19813:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16717);if(r)goto S_19813;} 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(16717);}while(r); } }else{ S_19817:; if (((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 32 )))||new_error){ if(qbevent){evnt(16719);if(r)goto S_19817;} 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(16719);}while(r); } S_19820:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 32 ))||new_error){ if(qbevent){evnt(16720);if(r)goto S_19820;} 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(16720);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,_FUNC_EVALUATEFUNC_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16723);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 16 ; if(!qbevent)break;evnt(16724);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16725);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 0 ; if(!qbevent)break;evnt(16729);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SIZE= 0 ; if(!qbevent)break;evnt(16730);}while(r); S_19831:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKI",3))))||new_error){ if(qbevent){evnt(16731);if(r)goto S_19831;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 1 ; if(!qbevent)break;evnt(16731);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16731);}while(r); } S_19835:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKL",3))))||new_error){ if(qbevent){evnt(16732);if(r)goto S_19835;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 2 ; if(!qbevent)break;evnt(16732);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16732);}while(r); } S_19839:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKS",3))))||new_error){ if(qbevent){evnt(16733);if(r)goto S_19839;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 3 ; if(!qbevent)break;evnt(16733);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16733);}while(r); } S_19843:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MKD",3))))||new_error){ if(qbevent){evnt(16734);if(r)goto S_19843;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= 4 ; if(!qbevent)break;evnt(16734);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16734);}while(r); } S_19847:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MK",3)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MK",2)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16735);if(r)goto S_19847;} do{ *_FUNC_EVALUATEFUNC_LONG_MKTYPE= -1 ; if(!qbevent)break;evnt(16735);}while(r); } S_19850:; if ((*_FUNC_EVALUATEFUNC_LONG_MKTYPE)||new_error){ if(qbevent){evnt(16736);if(r)goto S_19850;} S_19851:; if (((-(*_FUNC_EVALUATEFUNC_LONG_MKTYPE!= -1 ))|(-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 )))||new_error){ if(qbevent){evnt(16737);if(r)goto S_19851;} do{ *_FUNC_EVALUATEFUNC_LONG_QTYP= 0 ; if(!qbevent)break;evnt(16740);}while(r); S_19853:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(16741);if(r)goto S_19853;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("b",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16741);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16741);}while(r); } S_19857:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(16742);if(r)goto S_19857;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ub",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16742);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16742);}while(r); } S_19861:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(16743);if(r)goto S_19861;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16743);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16743);}while(r); } S_19865:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(16744);if(r)goto S_19865;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16744);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16744);}while(r); } S_19869:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(16745);if(r)goto S_19869;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("l",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16745);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16745);}while(r); } S_19873:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(16746);if(r)goto S_19873;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ul",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16746);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16746);}while(r); } S_19877:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(16747);if(r)goto S_19877;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i64",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16747);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16747);}while(r); } S_19881:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(16748);if(r)goto S_19881;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16748);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16748);}while(r); } S_19885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(16749);if(r)goto S_19885;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("s",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16749);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16749);}while(r); } S_19889:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(16750);if(r)goto S_19889;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("d",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16750);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16750);}while(r); } S_19893:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(16751);if(r)goto S_19893;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("f",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16751);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16751);}while(r); } S_19897:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(16752);if(r)goto S_19897;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("o",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16752);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16752);}while(r); } S_19901:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_MKTYPE,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(16753);if(r)goto S_19901;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("uo",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16753);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16753);}while(r); } S_19905:; 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(16754);if(r)goto S_19905;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ubit",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16754);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16754);}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(16754);}while(r); } S_19910:; 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(16755);if(r)goto S_19910;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("bit",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16755);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_QTYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16755);}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(16755);}while(r); } S_19915:; if ((-(*_FUNC_EVALUATEFUNC_LONG_QTYP== 0 ))||new_error){ if(qbevent){evnt(16756);if(r)goto S_19915;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MK only accepts numeric types",29))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16756);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16756);}while(r); } S_19919:; if ((*_FUNC_EVALUATEFUNC_LONG_SIZE)||new_error){ if(qbevent){evnt(16757);if(r)goto S_19919;} 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(16758);}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(16760);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_NOCOMMA= 1 ; if(!qbevent)break;evnt(16762);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=*_FUNC_EVALUATEFUNC_LONG_QTYP; if(!qbevent)break;evnt(16763);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 0 ; if(!qbevent)break;evnt(16768);}while(r); S_19929:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVI",3))))||new_error){ if(qbevent){evnt(16769);if(r)goto S_19929;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 1 ; if(!qbevent)break;evnt(16769);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16769);}while(r); } S_19933:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVL",3))))||new_error){ if(qbevent){evnt(16770);if(r)goto S_19933;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 2 ; if(!qbevent)break;evnt(16770);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16770);}while(r); } S_19937:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVS",3))))||new_error){ if(qbevent){evnt(16771);if(r)goto S_19937;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 3 ; if(!qbevent)break;evnt(16771);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16771);}while(r); } S_19941:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CVD",3))))||new_error){ if(qbevent){evnt(16772);if(r)goto S_19941;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= 4 ; if(!qbevent)break;evnt(16772);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16772);}while(r); } S_19945:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_CV",3)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("CV",2)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(16773);if(r)goto S_19945;} do{ *_FUNC_EVALUATEFUNC_LONG_CVTYPE= -1 ; if(!qbevent)break;evnt(16773);}while(r); } S_19948:; if ((*_FUNC_EVALUATEFUNC_LONG_CVTYPE)||new_error){ if(qbevent){evnt(16774);if(r)goto S_19948;} S_19949:; if (((-(*_FUNC_EVALUATEFUNC_LONG_CVTYPE!= -1 ))|(-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 )))||new_error){ if(qbevent){evnt(16775);if(r)goto S_19949;} S_19950:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16776);if(r)goto S_19950;} 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(16776);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16776);}while(r); } S_19954:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16777);if(r)goto S_19954;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2594= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16777);}while(r); } S_19957:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16778);if(r)goto S_19957;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16778);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 0 ; if(!qbevent)break;evnt(16779);}while(r); S_19961:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(16780);if(r)goto S_19961;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("b",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16780);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16780);}while(r); } S_19965:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(16781);if(r)goto S_19965;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ub",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16781);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16781);}while(r); } S_19969:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(16782);if(r)goto S_19969;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16782);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16782);}while(r); } S_19973:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(16783);if(r)goto S_19973;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16783);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16783);}while(r); } S_19977:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(16784);if(r)goto S_19977;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("l",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16784);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16784);}while(r); } S_19981:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(16785);if(r)goto S_19981;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ul",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16785);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16785);}while(r); } S_19985:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(16786);if(r)goto S_19985;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("i64",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16786);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16786);}while(r); } S_19989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(16787);if(r)goto S_19989;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ui64",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16787);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16787);}while(r); } S_19993:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(16788);if(r)goto S_19993;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("s",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16788);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16788);}while(r); } S_19997:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(16789);if(r)goto S_19997;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("d",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16789);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16789);}while(r); } S_20001:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(16790);if(r)goto S_20001;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("f",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16790);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16790);}while(r); } S_20005:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(16791);if(r)goto S_20005;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("o",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16791);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16791);}while(r); } S_20009:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_CVTYPE,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(16792);if(r)goto S_20009;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("uo",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16792);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16792);}while(r); } S_20013:; 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(16793);if(r)goto S_20013;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("ubit",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16793);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16793);}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(16793);}while(r); } S_20018:; 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(16794);if(r)goto S_20018;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_CTYPE,qbs_new_txt_len("bit",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16794);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(16794);}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(16794);}while(r); } S_20023:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TYP== 0 ))||new_error){ if(qbevent){evnt(16795);if(r)goto S_20023;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CV cannot return STRING type!",29))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16795);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16795);}while(r); } S_20027:; 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(16796);if(r)goto S_20027;} 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(16797);}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(16799);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16801);}while(r); } } S_20035:; 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(16806);if(r)goto S_20035;} S_20036:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(16807);if(r)goto S_20036;} S_20037:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16808);if(r)goto S_20037;} S_20038:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(16809);if(r)goto S_20038;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2597= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16809);}while(r); } S_20041:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16810);if(r)goto S_20041;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16810);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP= 64 ; if(!qbevent)break;evnt(16811);}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(16812);}while(r); } } } S_20049:; 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(16818);if(r)goto S_20049;} S_20050:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16819);if(r)goto S_20050;} 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(16820);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16820);}while(r); } S_20054:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16822);if(r)goto S_20054;} 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(16823);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16823);}while(r); } S_20058:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16825);if(r)goto S_20058;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16826);}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(16827);}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(16828);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16829);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16830);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2598= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16832);}while(r); S_20066:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16833);if(r)goto S_20066;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16833);}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(16834);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16835);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16836);}while(r); } S_20073:; 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(16840);if(r)goto S_20073;} S_20074:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(16841);if(r)goto S_20074;} 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(16842);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16842);}while(r); } S_20078:; 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(16845);if(r)goto S_20078;} S_20079:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16846);if(r)goto S_20079;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16847);}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(16848);}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(16849);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(16850);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16851);}while(r); } S_20086:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16854);if(r)goto S_20086;} S_20087:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(16855);if(r)goto S_20087;} 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(16855);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16855);}while(r); } S_20091:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16856);if(r)goto S_20091;} 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(16856);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16856);}while(r); } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2599= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16861);}while(r); S_20097:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16862);if(r)goto S_20097;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16862);}while(r); } S_20100:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16863);if(r)goto S_20100;} S_20101:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16864);if(r)goto S_20101;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2600= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16864);}while(r); } S_20104:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16865);if(r)goto S_20104;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16865);}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(16866);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T= 3 ; if(!qbevent)break;evnt(16867);}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(16869);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T= 0 ; if(!qbevent)break;evnt(16881);}while(r); S_20112:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(16882);if(r)goto S_20112;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 128 ; if(!qbevent)break;evnt(16882);}while(r); } S_20115:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16883);if(r)goto S_20115;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 64 ; if(!qbevent)break;evnt(16884);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 63 ); if(!qbevent)break;evnt(16885);}while(r); }else{ do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(16887);}while(r); S_20120:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(16888);if(r)goto S_20120;} S_20121:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16889);if(r)goto S_20121;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 4 ; if(!qbevent)break;evnt(16889);}while(r); } S_20124:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16890);if(r)goto S_20124;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 8 ; if(!qbevent)break;evnt(16890);}while(r); } S_20127:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(16891);if(r)goto S_20127;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 6 ; if(!qbevent)break;evnt(16891);}while(r); } }else{ S_20131:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(16893);if(r)goto S_20131;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 1 ; if(!qbevent)break;evnt(16893);}while(r); } S_20134:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(16894);if(r)goto S_20134;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 2 ; if(!qbevent)break;evnt(16894);}while(r); } S_20137:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(16895);if(r)goto S_20137;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 20 ; if(!qbevent)break;evnt(16895);}while(r); } S_20140:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(16896);if(r)goto S_20140;} do{ *_FUNC_EVALUATEFUNC_LONG_T=*_FUNC_EVALUATEFUNC_LONG_T+ 5 ; if(!qbevent)break;evnt(16896);}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(16900);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_ISSTRING; if(!qbevent)break;evnt(16901);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16902);}while(r); } S_20150:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(16916);if(r)goto S_20150;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(16917);}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(16918);}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(16919);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16920);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16921);}while(r); } S_20157:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(16924);if(r)goto S_20157;} S_20158:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(16925);if(r)goto S_20158;} 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(16925);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(16925);}while(r); } S_20162:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16928);if(r)goto S_20162;} S_20163:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16929);if(r)goto S_20163;} do{ SUB_GETID(&(pass2601=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16930);}while(r); S_20165:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16931);if(r)goto S_20165;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16931);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_M=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(16932);}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(16933);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16934);}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(16935);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16936);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2603= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16939);}while(r); S_20175:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16940);if(r)goto S_20175;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16940);}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(16941);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16942);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16943);}while(r); } } S_20183:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16947);if(r)goto S_20183;} 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(16948);}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(16949);}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(16950);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16951);}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(16952);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16953);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_M=(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(16957);}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(16958);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16959);}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(16960);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16961);}while(r); } S_20197:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(16967);if(r)goto S_20197;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2608= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16968);}while(r); S_20199:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16969);if(r)goto S_20199;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16969);}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(16970);}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(16971);}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(16972);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16973);}while(r); do{ SUB_GETID(&(pass2612=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16976);}while(r); S_20207:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16977);if(r)goto S_20207;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16977);}while(r); } S_20210:; if ((*(int16*)(((char*)__UDT_ID)+(2859)))||new_error){ if(qbevent){evnt(16978);if(r)goto S_20210;} 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(16980);}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(16983);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(16986);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(16989);}while(r); do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2613= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16990);}while(r); S_20219:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16991);if(r)goto S_20219;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16991);}while(r); } S_20222:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(16992);if(r)goto S_20222;} S_20223:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(16993);if(r)goto S_20223;} do{ SUB_GETID(&(pass2614=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(16996);}while(r); S_20225:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(16997);if(r)goto S_20225;} do{ goto exit_subfunc; if(!qbevent)break;evnt(16997);}while(r); } S_20228:; if ((*(int16*)(((char*)__UDT_ID)+(2859)))||new_error){ if(qbevent){evnt(16998);if(r)goto S_20228;} 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(16999);}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(17001);}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(17005);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17007);}while(r); } do{ SUB_GETID(&(pass2615=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17012);}while(r); S_20239:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17013);if(r)goto S_20239;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17013);}while(r); } S_20242:; if ((*(int16*)(((char*)__UDT_ID)+(2859)))||new_error){ if(qbevent){evnt(17014);if(r)goto S_20242;} 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(17015);}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(17017);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17020);}while(r); } S_20249:; 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(17024);if(r)goto S_20249;} S_20250:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17025);if(r)goto S_20250;} 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(17026);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17026);}while(r); } S_20254:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISINCONVENTIONALMEMORY)== 0 ))||new_error){ if(qbevent){evnt(17028);if(r)goto S_20254;} do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(17029);}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(17030);}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(17031);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(17032);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17033);}while(r); } S_20261:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17036);if(r)goto S_20261;} S_20262:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17037);if(r)goto S_20262;} S_20263:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(17038);if(r)goto S_20263;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len("80",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17039);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(17040);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17041);}while(r); } } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(17044);}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,&(pass2616= 1 ))),qbs_new_txt_len("[0])) - ((ptrszint)(&cmem[0])) ) /16)",37))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17045);}while(r); S_20271:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17046);if(r)goto S_20271;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17046);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17047);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TYP= 64 ; if(!qbevent)break;evnt(17051);}while(r); do{ SUB_GETID(&(pass2617=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17053);}while(r); S_20278:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17054);if(r)goto S_20278;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17054);}while(r); } S_20281:; if (((-(*(int16*)(((char*)__UDT_ID)+(2859))!= 0 ))&(-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 )))||new_error){ if(qbevent){evnt(17055);if(r)goto S_20281;} S_20282:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17056);if(r)goto S_20282;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2618= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17057);}while(r); S_20284:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17058);if(r)goto S_20284;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17058);}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(17059);}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(17060);}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(17061);}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(17062);}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,&(pass2622= 1 ))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17064);}while(r); S_20293:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17065);if(r)goto S_20293;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17065);}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(17069);}while(r); } do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17071);}while(r); } S_20302:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -2 ))||new_error){ if(qbevent){evnt(17097);if(r)goto S_20302;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2623= -2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17098);}while(r); S_20304:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17099);if(r)goto S_20304;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17099);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(17100);}while(r); } S_20309:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -7 ))||new_error){ if(qbevent){evnt(17103);if(r)goto S_20309;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2624= -7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17104);}while(r); S_20311:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17105);if(r)goto S_20311;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17105);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(17106);}while(r); } S_20316:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -8 ))||new_error){ if(qbevent){evnt(17109);if(r)goto S_20316;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_EVALUATETOTYP(_FUNC_EVALUATEFUNC_STRING_E2,&(pass2625= -8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17110);}while(r); S_20318:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17111);if(r)goto S_20318;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17111);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(17112);}while(r); } S_20323:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(17115);if(r)goto S_20323;} S_20324:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISOFFSET)== 0 ))||new_error){ if(qbevent){evnt(17116);if(r)goto S_20324;} S_20325:; if ((-(*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(548))== 0 ))||new_error){ if(qbevent){evnt(17117);if(r)goto S_20325;} 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(17117);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17117);}while(r); } } } do{ *_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE= 0 ; if(!qbevent)break;evnt(17122);}while(r); S_20332:; if ((-(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP== -1 ))||new_error){ if(qbevent){evnt(17123);if(r)goto S_20332;} do{ *_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE= 1 ; if(!qbevent)break;evnt(17124);}while(r); S_20334:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(17125);if(r)goto S_20334;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17125);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17125);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(17126);}while(r); S_20339:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(17127);if(r)goto S_20339;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17127);}while(r); } } S_20343:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(17131);if(r)goto S_20343;} S_20344:; if ((-(*_FUNC_EVALUATEFUNC_LONG_DEREFERENCE== 0 ))||new_error){ if(qbevent){evnt(17132);if(r)goto S_20344;} S_20345:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17137);if(r)goto S_20345;} S_20346:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17138);if(r)goto S_20346;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17138);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17138);}while(r); } S_20350:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISARRAY)== 0 ))||new_error){ if(qbevent){evnt(17139);if(r)goto S_20350;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17139);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17139);}while(r); } S_20354:; if (( 0 )||new_error){ if(qbevent){evnt(17140);if(r)goto S_20354;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2626; 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 skip2626; skip2626: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17140);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP; if(!qbevent)break;evnt(17143);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(17143);}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(17144);}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(17145);}while(r); S_20361:; if ((-(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2!=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(17146);if(r)goto S_20361;} 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(17146);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17146);}while(r); } S_20365:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17149);if(r)goto S_20365;} S_20366:; if (( 0 )||new_error){ if(qbevent){evnt(17150);if(r)goto S_20366;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2627; 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 skip2627; skip2627: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17150);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFID=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17152);}while(r); do{ SUB_GETID(_FUNC_EVALUATEFUNC_LONG_UDTREFID); if(!qbevent)break;evnt(17153);}while(r); S_20371:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17154);if(r)goto S_20371;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17154);}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(17155);}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(17156);}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(17157);}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(17158);}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(17159);}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(17160);}while(r); S_20380:; 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(17162);if(r)goto S_20380;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17162);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17162);}while(r); } }else{ S_20385:; 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(17164);if(r)goto S_20385;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20)); 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{ *_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(17168);}while(r); do{ SUB_GETID(_FUNC_EVALUATEFUNC_LONG_IDNUM); if(!qbevent)break;evnt(17169);}while(r); S_20392:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17170);if(r)goto S_20392;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17170);}while(r); } S_20395:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17172);if(r)goto S_20395;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYPSIZE=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(1213)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17173);}while(r); S_20397:; if ((-(*(int32*)(((char*)__UDT_ID)+(540))!=*_FUNC_EVALUATEFUNC_LONG_TARGETTYPSIZE))||new_error){ if(qbevent){evnt(17174);if(r)goto S_20397;} 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(17174);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17174);}while(r); } } S_20402:; 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(17177);if(r)goto S_20402;} S_20403:; 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(17178);if(r)goto S_20403;} 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(17179);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(17181);}while(r); } } S_20408:; if ((-(*(int32*)(((char*)__UDT_ID)+(2847))== 0 ))||new_error){ if(qbevent){evnt(17187);if(r)goto S_20408;} S_20409:; if ((-(*_FUNC_EVALUATEFUNC_LONG_NELEREQ== 0 ))||new_error){ if(qbevent){evnt(17192);if(r)goto S_20409;} S_20410:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!= -1 ))||new_error){ if(qbevent){evnt(17196);if(r)goto S_20410;} do{ *_FUNC_EVALUATEFUNC_LONG_NELEREQ=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(17197);}while(r); do{ sub_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2747)),100,1),*_FUNC_EVALUATEFUNC_LONG_CURARG, 1 ,func_chr(*_FUNC_EVALUATEFUNC_LONG_NELEREQ),1); if(!qbevent)break;evnt(17198);}while(r); } do{ memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 0),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 0), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 256),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 256), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 512),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 512), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 516),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 516), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 518),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 518), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 520),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 520), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 528),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 528), 8); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 536),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 536), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 540),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 540), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 544),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 544), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 546),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 546), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 548),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 548), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 550),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 550), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 806),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 806), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 808),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 808), 1); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 809),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 809), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 811),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 811), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 813),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 813), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1213),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 1213), 400); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1613),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 1613), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1869),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 1869), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2125),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2125), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2381),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2381), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2385),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2385), 256); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2641),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2641), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2645),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2645), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2647),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2647), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2747),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2747), 100); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2847),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2847), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2851),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2851), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2853),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2853), 2); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2855),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2855), 4); memcpy((((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2859),(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2861), *(qbs**)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(0)+ 2861)); if(!qbevent)break;evnt(17201);}while(r); }else{ S_20416:; if ((-(*(int16*)(((char*)__UDT_ID)+(516))!=*_FUNC_EVALUATEFUNC_LONG_NELEREQ))||new_error){ if(qbevent){evnt(17214);if(r)goto S_20416;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Passing arrays with a differing number of elements to a SUB/FUNCTION is not supported",85)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17214);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17214);}while(r); } } } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2629= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17222);}while(r); S_20423:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17223);if(r)goto S_20423;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17223);}while(r); } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(17224);}while(r); } S_20428:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(17242);if(r)goto S_20428;} S_20429:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(17243);if(r)goto S_20429;} 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(17244);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP; if(!qbevent)break;evnt(17246);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(17246);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_ARR= 0 ; if(!qbevent)break;evnt(17249);}while(r); S_20434:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17249);if(r)goto S_20434;} do{ *_FUNC_EVALUATEFUNC_LONG_ARR= 1 ; if(!qbevent)break;evnt(17249);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_PASSUDTELEMENT= 0 ; if(!qbevent)break;evnt(17250);}while(r); S_20438:; if (((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2&*__LONG_ISUDT)== 0 ))&(-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&*__LONG_ISUDT)!= 0 )))||new_error){ if(qbevent){evnt(17250);if(r)goto S_20438;} do{ *_FUNC_EVALUATEFUNC_LONG_PASSUDTELEMENT= 1 ; if(!qbevent)break;evnt(17250);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2-*__LONG_ISUDT; if(!qbevent)break;evnt(17250);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP2=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(17253);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_SOURCETYP2=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&( 511 +*__LONG_ISOFFSETINBITS+*__LONG_ISUDT+*__LONG_ISFLOAT+*__LONG_ISSTRING); if(!qbevent)break;evnt(17254);}while(r); S_20444:; if ((-(*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2==*_FUNC_EVALUATEFUNC_LONG_TARGETTYP2))||new_error){ if(qbevent){evnt(17257);if(r)goto S_20444;} S_20445:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17259);if(r)goto S_20445;} do{ *_FUNC_EVALUATEFUNC_LONG_UDTREFID=qbr(func_val(_FUNC_EVALUATEFUNC_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17263);}while(r); do{ SUB_GETID(_FUNC_EVALUATEFUNC_LONG_UDTREFID); if(!qbevent)break;evnt(17264);}while(r); S_20448:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17265);if(r)goto S_20448;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17265);}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(17266);}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(17267);}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(17268);}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(17269);}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(17270);}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(17271);}while(r); S_20457:; if ((*_FUNC_EVALUATEFUNC_LONG_ARR)||new_error){ if(qbevent){evnt(17274);if(r)goto S_20457;} 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(17275);}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(17277);}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(17280);}while(r); S_20463:; if ((*_FUNC_EVALUATEFUNC_LONG_PASSUDTELEMENT)||new_error){ if(qbevent){evnt(17283);if(r)goto S_20463;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass2631=*_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(17283);}while(r); } S_20466:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17284);if(r)goto S_20466;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17284);}while(r); } }else{ S_20470:; if ((*_FUNC_EVALUATEFUNC_LONG_ARR)||new_error){ if(qbevent){evnt(17288);if(r)goto S_20470;} S_20471:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP2&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17289);if(r)goto S_20471;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot pass BIT array offsets",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17289);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17289);}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,&(pass2632= 0 ))),qbs_new_txt_len("))",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17290);}while(r); S_20476:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17291);if(r)goto S_20476;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17291);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2633= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17293);}while(r); S_20481:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17294);if(r)goto S_20481;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17294);}while(r); } } S_20485:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUNSIGNED)!=(*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUNSIGNED)))||new_error){ if(qbevent){evnt(17298);if(r)goto S_20485;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),FUNC_TYP2CTYP(&(pass2634=*_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(17299);}while(r); S_20487:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17300);if(r)goto S_20487;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17300);}while(r); } } } S_20492:; 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(17306);if(r)goto S_20492;} S_20493:; 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(17307);if(r)goto S_20493;} 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(17308);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(17309);}while(r); } } do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(17313);}while(r); } } }else{ S_20502:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(17331);if(r)goto S_20502;} 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(17332);}while(r); S_20504:; 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(17333);if(r)goto S_20504;} S_20505:; 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(17334);if(r)goto S_20505;} 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(17335);}while(r); do{ *__INTEGER_RECOMPILE= 1 ; if(!qbevent)break;evnt(17336);}while(r); } } } } } } S_20514:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17359);if(r)goto S_20514;} S_20515:; if ((-((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(17360);if(r)goto S_20515;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_CURARG; if(!qbevent)break;evnt(17361);}while(r); S_20517:; if (((-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_NTH>*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(17362);if(r)goto S_20517;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_NTH- 1 ; if(!qbevent)break;evnt(17362);}while(r); } S_20520:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 1 ))||new_error){ if(qbevent){evnt(17363);if(r)goto S_20520;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("String required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17363);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17363);}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(17364);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17364);}while(r); } } S_20528:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(17367);if(r)goto S_20528;} S_20529:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17368);if(r)goto S_20529;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_CURARG; if(!qbevent)break;evnt(17369);}while(r); S_20531:; if (((-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_NTH>*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(17370);if(r)goto S_20531;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_NTH- 1 ; if(!qbevent)break;evnt(17370);}while(r); } S_20534:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 1 ))||new_error){ if(qbevent){evnt(17371);if(r)goto S_20534;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17371);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17371);}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(17372);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17372);}while(r); } } S_20542:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(17377);if(r)goto S_20542;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_E,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2635= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17378);}while(r); S_20544:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17379);if(r)goto S_20544;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17379);}while(r); } } S_20548:; if ((-(*_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE== 0 ))||new_error){ if(qbevent){evnt(17382);if(r)goto S_20548;} S_20549:; if ((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17383);if(r)goto S_20549;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_CURARG; if(!qbevent)break;evnt(17384);}while(r); S_20551:; if (((-(*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST!= 0 ))&(-(*_FUNC_EVALUATEFUNC_LONG_NTH>*_FUNC_EVALUATEFUNC_LONG_OMITARG_LAST)))||new_error){ if(qbevent){evnt(17385);if(r)goto S_20551;} do{ *_FUNC_EVALUATEFUNC_LONG_NTH=*_FUNC_EVALUATEFUNC_LONG_NTH- 1 ; if(!qbevent)break;evnt(17385);}while(r); } S_20554:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_QB64PREFIX_SET&(qbs_equal(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("_MEM",4)))))||new_error){ if(qbevent){evnt(17386);if(r)goto S_20554;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_X,qbs_add(qbs_add(qbs_new_txt_len("'",1),func_mid(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)), 2 ,NULL,0)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17387);}while(r); }else{ 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(17389);}while(r); } S_20559:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_EVALUATEFUNC_LONG_TARGETID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 1 ))||new_error){ if(qbevent){evnt(17391);if(r)goto S_20559;} 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(17391);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17391);}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(17392);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17392);}while(r); } }else{ S_20567:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17395);if(r)goto S_20567;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Number required for function",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17395);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17395);}while(r); } } S_20572:; if (((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(17399);if(r)goto S_20572;} S_20573:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(17400);if(r)goto S_20573;} do{ *_FUNC_EVALUATEFUNC_LONG_BITS=*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 ; if(!qbevent)break;evnt(17402);}while(r); S_20575:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(17403);if(r)goto S_20575;} 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(17403);}while(r); } S_20578:; if (((-(*_FUNC_EVALUATEFUNC_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATEFUNC_LONG_BITS< 32 )))||new_error){ if(qbevent){evnt(17404);if(r)goto S_20578;} 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(17404);}while(r); } S_20581:; if ((-(*_FUNC_EVALUATEFUNC_LONG_BITS>= 32 ))||new_error){ if(qbevent){evnt(17405);if(r)goto S_20581;} 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(17405);}while(r); } } } S_20586:; if ((*_FUNC_EVALUATEFUNC_LONG_EXPLICITREFERENCE)||new_error){ if(qbevent){evnt(17409);if(r)goto S_20586;} S_20587:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17410);if(r)goto S_20587;} 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(17412);}while(r); }else{ S_20590:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(17414);if(r)goto S_20590;} S_20591:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(17415);if(r)goto S_20591;} 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(17415);}while(r); } S_20594:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(17416);if(r)goto S_20594;} 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(17416);}while(r); } S_20597:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 256 ))||new_error){ if(qbevent){evnt(17417);if(r)goto S_20597;} 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(17417);}while(r); } }else{ S_20601:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(17419);if(r)goto S_20601;} S_20602:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(17420);if(r)goto S_20602;} 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(17420);}while(r); } S_20605:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(17421);if(r)goto S_20605;} 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(17421);}while(r); } S_20608:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(17422);if(r)goto S_20608;} 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(17422);}while(r); } S_20611:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(17423);if(r)goto S_20611;} 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(17423);}while(r); } }else{ S_20615:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(17425);if(r)goto S_20615;} 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(17425);}while(r); } S_20618:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(17426);if(r)goto S_20618;} 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(17426);}while(r); } S_20621:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(17427);if(r)goto S_20621;} 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(17427);}while(r); } S_20624:; if ((-((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(17428);if(r)goto S_20624;} 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(17428);}while(r); } } } } } S_20631:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(17435);if(r)goto S_20631;} S_20632:; if (((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(17436);if(r)goto S_20632;} do{ goto LABEL_DONTEVALUATE; if(!qbevent)break;evnt(17436);}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(17438);}while(r); S_20636:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17439);if(r)goto S_20636;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17439);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_V,qbs_add(qbs_new_txt_len("pass",4),FUNC_STR2(&(pass2636=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17440);}while(r); S_20640:; 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(17442);if(r)goto S_20640;} do{ *_FUNC_EVALUATEFUNC_LONG_BYTESREQ=((*_FUNC_EVALUATEFUNC_LONG_TARGETTYP& 511 )+ 7 )/ 8 ; if(!qbevent)break;evnt(17443);}while(r); do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17444);}while(r); do{ SUB_WRITEBUFLINE(&(pass2637=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if(",3),_FUNC_EVALUATEFUNC_STRING_V),qbs_new_txt_len("==NULL){",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17445);}while(r); do{ SUB_WRITEBUFLINE(&(pass2638=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("cmem_sp-=",9),FUNC_STR2(_FUNC_EVALUATEFUNC_LONG_BYTESREQ)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17446);}while(r); do{ SUB_WRITEBUFLINE(&(pass2639=*__LONG_DATATXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17447);}while(r); do{ SUB_WRITEBUFLINE(&(pass2640=*__LONG_DATATXTBUF),qbs_new_txt_len("if (cmem_spchr",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17468);}while(r); } S_20662:; 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(17471);if(r)goto S_20662;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,qbs_new_txt_len("NULL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17471);}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(17475);}while(r); S_20667:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("_MEM",4)))|(((qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(17478);if(r)goto S_20667;} S_20668:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 1 ))||new_error){ if(qbevent){evnt(17479);if(r)goto S_20668;} S_20669:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 1 ))||new_error){ if(qbevent){evnt(17480);if(r)goto S_20669;} 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(17480);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17480);}while(r); } } S_20674:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARGS== 2 ))||new_error){ if(qbevent){evnt(17482);if(r)goto S_20674;} S_20675:; if ((-(*_FUNC_EVALUATEFUNC_LONG_CURARG== 2 ))||new_error){ if(qbevent){evnt(17483);if(r)goto S_20675;} 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(17483);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17483);}while(r); } } } S_20681:; if (((-(*_FUNC_EVALUATEFUNC_LONG_I!=*_FUNC_EVALUATEFUNC_LONG_N))&(-(*_FUNC_EVALUATEFUNC_LONG_NOCOMMA== 0 )))||new_error){ if(qbevent){evnt(17487);if(r)goto S_20681;} 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(17487);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_NOCOMMA= 0 ; if(!qbevent)break;evnt(17488);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_FIRSTI=*_FUNC_EVALUATEFUNC_LONG_I+ 1 ; if(!qbevent)break;evnt(17489);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_CURARG=*_FUNC_EVALUATEFUNC_LONG_CURARG+ 1 ; if(!qbevent)break;evnt(17490);}while(r); } S_20688:; 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(17493);if(r)goto S_20688;} do{ *_FUNC_EVALUATEFUNC_LONG_TARGETTYP=string2l(func_mid(qbs_new_fixed((((uint8*)_FUNC_EVALUATEFUNC_UDT_ID2)+(813)),400,1),(*_FUNC_EVALUATEFUNC_LONG_CURARG* 4 )-( 4 )+( 1 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17494);}while(r); S_20690:; fornext_value2644= 1 ; fornext_finalvalue2644=*_FUNC_EVALUATEFUNC_LONG_OMITARGS; fornext_step2644= 1 ; if (fornext_step2644<0) fornext_step_negative2644=1; else fornext_step_negative2644=0; if (new_error) goto fornext_error2644; goto fornext_entrylabel2644; while(1){ fornext_value2644=fornext_step2644+(*_FUNC_EVALUATEFUNC_LONG_FI); fornext_entrylabel2644: *_FUNC_EVALUATEFUNC_LONG_FI=fornext_value2644; if (fornext_step_negative2644){ if (fornext_value2644fornext_finalvalue2644) break; } fornext_error2644:; if(qbevent){evnt(17496);if(r)goto S_20690;} 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(17496);}while(r); fornext_continue_2643:; } fornext_exit_2643:; do{ *_FUNC_EVALUATEFUNC_LONG_CURARG=*_FUNC_EVALUATEFUNC_LONG_CURARG+*_FUNC_EVALUATEFUNC_LONG_OMITARGS; if(!qbevent)break;evnt(17497);}while(r); } fornext_continue_2563:; } fornext_exit_2563:; } S_20697:; 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(17503);if(r)goto S_20697;} S_20698:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",NULL",5))))||new_error){ if(qbevent){evnt(17504);if(r)goto S_20698;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R,qbs_new_txt_len(",1",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17504);}while(r); } S_20701:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("UBOUND",6))))||new_error){ if(qbevent){evnt(17505);if(r)goto S_20701;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_R2,qbs_new_txt_len("func_ubound(",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17505);}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(17505);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_E,FUNC_REFER(_FUNC_EVALUATEFUNC_STRING_ULBOUNDARRAY,_FUNC_EVALUATEFUNC_LONG_SOURCETYP,&(pass2645= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17506);}while(r); S_20707:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17507);if(r)goto S_20707;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17507);}while(r); } do{ *_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(17510);}while(r); S_20711:; if ((-(*_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS== -1 ))||new_error){ if(qbevent){evnt(17511);if(r)goto S_20711;} do{ *_FUNC_EVALUATEFUNC_LONG_ARRAYELEMENTS= 1 ; if(!qbevent)break;evnt(17511);}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(17513);}while(r); do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17514);}while(r); do{ goto LABEL_EVALFUNCSPECIAL; if(!qbevent)break;evnt(17515);}while(r); } S_20718:; if ((*_FUNC_EVALUATEFUNC_LONG_PASSOMIT)||new_error){ if(qbevent){evnt(17518);if(r)goto S_20718;} S_20719:; if ((*_FUNC_EVALUATEFUNC_LONG_OMITARG_FIRST)||new_error){ if(qbevent){evnt(17519);if(r)goto S_20719;} 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(17519);}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(17519);}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(17521);}while(r); LABEL_EVALFUNCSPECIAL:; if(qbevent){evnt(17523);r=0;} S_20726:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATEFUNC_STRING_N,qbs_new_txt_len("ABS",3))))||new_error){ if(qbevent){evnt(17525);if(r)goto S_20726;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP; if(!qbevent)break;evnt(17525);}while(r); } S_20729:; 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(17528);if(r)goto S_20729;} do{ *_FUNC_EVALUATEFUNC_LONG_B=*_FUNC_EVALUATEFUNC_LONG_SOURCETYP& 511 ; if(!qbevent)break;evnt(17529);}while(r); S_20731:; if ((*_FUNC_EVALUATEFUNC_LONG_SOURCETYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(17530);if(r)goto S_20731;} S_20732:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B== 64 ))||new_error){ if(qbevent){evnt(17532);if(r)goto S_20732;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17532);}while(r); } S_20735:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B== 32 ))||new_error){ if(qbevent){evnt(17533);if(r)goto S_20735;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17533);}while(r); } }else{ S_20739:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B<= 32 ))||new_error){ if(qbevent){evnt(17536);if(r)goto S_20739;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17536);}while(r); } S_20742:; if ((-(*_FUNC_EVALUATEFUNC_LONG_B<= 16 ))||new_error){ if(qbevent){evnt(17537);if(r)goto S_20742;} do{ *_FUNC_EVALUATEFUNC_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(17537);}while(r); } } } S_20747:; if ((-(*(int32*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(2381))==(*__LONG_ISUDT+( 1 ))))||new_error){ if(qbevent){evnt(17541);if(r)goto S_20747;} do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_V,qbs_add(qbs_new_txt_len("func",4),FUNC_STR2(&(pass2646=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17543);}while(r); do{ SUB_WRITEBUFLINE(__INTEGER_DEFDATAHANDLE,qbs_add(qbs_add(qbs_new_txt_len("mem_block ",10),_FUNC_EVALUATEFUNC_STRING_V),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17544);}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(17545);}while(r); } S_20752:; if ((*(int16*)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+(806)))||new_error){ if(qbevent){evnt(17548);if(r)goto S_20752;} S_20753:; 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(17549);if(r)goto S_20753;} 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(17550);}while(r); } } S_20757:; if (( 0 )||new_error){ if(qbevent){evnt(17554);if(r)goto S_20757;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2647; sub_file_print(tmp_fileno,qbs_new_txt_len("evaluatefunc:out:",17), 0, 0, 0); if (new_error) goto skip2647; sub_file_print(tmp_fileno,_FUNC_EVALUATEFUNC_STRING_R, 0, 0, 1); if (new_error) goto skip2647; skip2647: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(17554);}while(r); } do{ qbs_set(_FUNC_EVALUATEFUNC_STRING_EVALUATEFUNC,_FUNC_EVALUATEFUNC_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17555);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free14.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 "data15.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_20761:; if ((-(*_FUNC_VARIABLESIZE_LONG_I!= -1 ))||new_error){ if(qbevent){evnt(17560);if(r)goto S_20761;} do{ SUB_GETID(_FUNC_VARIABLESIZE_LONG_I); if(!qbevent)break;evnt(17560);}while(r); } S_20764:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17561);if(r)goto S_20764;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17561);}while(r); } do{ *_FUNC_VARIABLESIZE_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(17563);}while(r); S_20768:; if ((-(*_FUNC_VARIABLESIZE_LONG_T== 0 ))||new_error){ if(qbevent){evnt(17563);if(r)goto S_20768;} do{ *_FUNC_VARIABLESIZE_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(17563);}while(r); } do{ *_FUNC_VARIABLESIZE_LONG_BYTES=(*_FUNC_VARIABLESIZE_LONG_T& 511 )/ 8 ; if(!qbevent)break;evnt(17564);}while(r); S_20772:; if ((*_FUNC_VARIABLESIZE_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(17566);if(r)goto S_20772;} do{ *_FUNC_VARIABLESIZE_LONG_U=*_FUNC_VARIABLESIZE_LONG_T& 511 ; if(!qbevent)break;evnt(17567);}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(17568);}while(r); } S_20776:; if ((*_FUNC_VARIABLESIZE_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17571);if(r)goto S_20776;} S_20777:; if ((*_FUNC_VARIABLESIZE_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17572);if(r)goto S_20777;} do{ *_FUNC_VARIABLESIZE_LONG_BYTES=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(17573);}while(r); }else{ S_20780:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17575);if(r)goto S_20780;} 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(17575);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17575);}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(17576);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17577);}while(r); } } S_20788:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17581);if(r)goto S_20788;} 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(17582);}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(17583);}while(r); do{ *_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS=*(int16*)(((char*)__UDT_ID)+(516)); if(!qbevent)break;evnt(17584);}while(r); S_20792:; if ((-(*_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS== -1 ))||new_error){ if(qbevent){evnt(17584);if(r)goto S_20792;} do{ *_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS= 1 ; if(!qbevent)break;evnt(17584);}while(r); } S_20795:; fornext_value2649= 1 ; fornext_finalvalue2649=*_FUNC_VARIABLESIZE_LONG_ARRAYELEMENTS; fornext_step2649= 1 ; if (fornext_step2649<0) fornext_step_negative2649=1; else fornext_step_negative2649=0; if (new_error) goto fornext_error2649; goto fornext_entrylabel2649; while(1){ fornext_value2649=fornext_step2649+(*_FUNC_VARIABLESIZE_LONG_I2); fornext_entrylabel2649: *_FUNC_VARIABLESIZE_LONG_I2=fornext_value2649; if (fornext_step_negative2649){ if (fornext_value2649fornext_finalvalue2649) break; } fornext_error2649:; if(qbevent){evnt(17585);if(r)goto S_20795;} 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(&(pass2650=(*_FUNC_VARIABLESIZE_LONG_I2* 4 )-( 4 )+( 5 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17586);}while(r); fornext_continue_2648:; } fornext_exit_2648:; 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(17588);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17589);}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(17592);}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_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 "data16.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_A,_FUNC_EVALUATETOTYP_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17599);}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(17600);}while(r); S_20804:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17601);if(r)goto S_20804;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17601);}while(r); } S_20807:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(17604);if(r)goto S_20807;} S_20808:; if (((-((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISOFFSET)== 0 ))&(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP>= 0 )))||new_error){ if(qbevent){evnt(17605);if(r)goto S_20808;} 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(17606);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17606);}while(r); } } S_20813:; if (((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -4 ))|(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))|(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 )))||new_error){ if(qbevent){evnt(17612);if(r)goto S_20813;} S_20814:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17613);if(r)goto S_20814;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17613);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17613);}while(r); } S_20818:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17614);if(r)goto S_20818;} 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(17614);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17614);}while(r); } S_20822:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17618);if(r)goto S_20822;} S_20823:; if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||new_error){ if(qbevent){evnt(17619);if(r)goto S_20823;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("UDT must have fixed size",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17619);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17619);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17620);}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(17621);}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(17621);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17622);}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(17623);}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(17623);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17624);}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(17625);}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(17625);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17626);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17627);}while(r); S_20838:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17628);if(r)goto S_20838;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17628);}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(17629);}while(r); S_20842:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17630);if(r)goto S_20842;} 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(17631);}while(r); S_20844:; 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(17633);if(r)goto S_20844;} do{ goto LABEL_METHOD2USEALLUDT; if(!qbevent)break;evnt(17635);}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(17639);}while(r); S_20849:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(17642);if(r)goto S_20849;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2655=((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(17643);}while(r); }else{ S_20852:; if (((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)> 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))&((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))))||new_error){ if(qbevent){evnt(17645);if(r)goto S_20852;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)",9),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(")->len",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17646);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17647);}while(r); S_20855:; }else{ if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)> 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))&((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -4 )))){ if(qbevent){evnt(17648);if(r)goto S_20855;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(*((qbs**)((char*)",18),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("+(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))))->chr",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17649);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(*((qbs**)((char*)",18),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("+(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))))->len",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17650);}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(17651);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17652);}while(r); } } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2656=((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(17654);}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(17656);}while(r); S_20864:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17657);if(r)goto S_20864;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17657);}while(r); } S_20867:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17658);if(r)goto S_20867;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_DST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17658);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17659);}while(r); } S_20872:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17662);if(r)goto S_20872;} S_20873:; 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(17664);if(r)goto S_20873;} S_20874:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17666);if(r)goto S_20874;} S_20875:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17667);if(r)goto S_20875;} 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(17668);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17668);}while(r); } } do{ goto LABEL_METHOD2USEALL; if(!qbevent)break;evnt(17671);}while(r); } S_20882:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17674);if(r)goto S_20882;} S_20883:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17675);if(r)goto S_20883;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17676);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17677);}while(r); S_20886:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17678);if(r)goto S_20886;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17678);}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(17679);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2657= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17680);}while(r); S_20891:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17681);if(r)goto S_20891;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17681);}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(17682);}while(r); S_20895:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17683);if(r)goto S_20895;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17683);}while(r); } S_20898:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17684);if(r)goto S_20898;} 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(17684);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2658= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17686);}while(r); S_20903:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17687);if(r)goto S_20903;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17687);}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(17689);}while(r); S_20907:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17690);if(r)goto S_20907;} 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(17690);}while(r); } S_20910:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17691);if(r)goto S_20910;} 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(17691);}while(r); } } do{ goto exit_subfunc; if(!qbevent)break;evnt(17693);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2659= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17695);}while(r); S_20917:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17696);if(r)goto S_20917;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17696);}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(17697);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2660=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17698);}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(17699);}while(r); S_20923:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17700);if(r)goto S_20923;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17700);}while(r); } S_20926:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17701);if(r)goto S_20926;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17701);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17702);}while(r); } S_20931:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17705);if(r)goto S_20931;} S_20932:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17706);if(r)goto S_20932;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17707);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17708);}while(r); S_20935:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17709);if(r)goto S_20935;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17709);}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(17710);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2661= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17711);}while(r); S_20940:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17712);if(r)goto S_20940;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17712);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2662= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17714);}while(r); S_20945:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17715);if(r)goto S_20945;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17715);}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(17716);}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(17718);}while(r); S_20951:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17719);if(r)goto S_20951;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17719);}while(r); } S_20954:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17720);if(r)goto S_20954;} 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(17720);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17721);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2663= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17725);}while(r); S_20960:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17726);if(r)goto S_20960;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17726);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17727);}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(17728);}while(r); S_20965:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(17729);if(r)goto S_20965;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17729);}while(r); } S_20968:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(17730);if(r)goto S_20968;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17730);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17731);}while(r); } S_20973:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -8 ))||new_error){ if(qbevent){evnt(17738);if(r)goto S_20973;} S_20974:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17739);if(r)goto S_20974;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17739);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17739);}while(r); } S_20978:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17740);if(r)goto S_20978;} 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(17740);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17740);}while(r); } S_20982:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17743);if(r)goto S_20982;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17744);}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(17745);}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(17745);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17746);}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(17747);}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(17747);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17748);}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(17749);}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(17749);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17750);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17751);}while(r); S_20994:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17752);if(r)goto S_20994;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17752);}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(17753);}while(r); S_20998:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17754);if(r)goto S_20998;} 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(17755);}while(r); S_21000:; 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(17757);if(r)goto S_21000;} do{ goto LABEL_METHOD2USEALLUDT__7; if(!qbevent)break;evnt(17759);}while(r); } } S_21004:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(17763);if(r)goto S_21004;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2667=((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(17764);}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(17765);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2668=((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(17767);}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(17768);}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(17770);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_T1); if(!qbevent)break;evnt(17775);}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(17776);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17778);}while(r); } S_21016:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17781);if(r)goto S_21016;} S_21017:; 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(17783);if(r)goto S_21017;} S_21018:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17785);if(r)goto S_21018;} S_21019:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17786);if(r)goto S_21019;} 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(17787);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17787);}while(r); } } do{ goto LABEL_METHOD2USEALL__7; if(!qbevent)break;evnt(17790);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17793);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17794);}while(r); S_21028:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17795);if(r)goto S_21028;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17795);}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(17796);}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(&(pass2669=( 4 **(int16*)(((char*)__UDT_ID)+(516)))+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17797);}while(r); S_21033:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17801);if(r)goto S_21033;} S_21034:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17802);if(r)goto S_21034;} 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(17803);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2670= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17804);}while(r); S_21037:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17805);if(r)goto S_21037;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17805);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17810);}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(17811);}while(r); }else{ do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MEMELEMENT cannot reference variable-length strings",51))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17815);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17815);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(17818);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2671= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17821);}while(r); S_21049:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17822);if(r)goto S_21049;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17822);}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(17823);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_STR2(&(pass2672=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17824);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17829);}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(17830);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17832);}while(r); } S_21058:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17835);if(r)goto S_21058;} S_21059:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(17836);if(r)goto S_21059;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17837);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17838);}while(r); S_21062:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17839);if(r)goto S_21062;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17839);}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(17840);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2673= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17841);}while(r); S_21067:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17842);if(r)goto S_21067;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17842);}while(r); } }else{ do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MEMELEMENT cannot reference variable-length strings",51))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17844);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17844);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17851);}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(17852);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17854);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2674= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17858);}while(r); S_21079:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17859);if(r)goto S_21079;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17859);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17860);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17865);}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(17866);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17868);}while(r); } S_21087:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -7 ))||new_error){ if(qbevent){evnt(17881);if(r)goto S_21087;} LABEL_METHOD2USEALL__7:; if(qbevent){evnt(17882);r=0;} S_21088:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17883);if(r)goto S_21088;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17883);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17883);}while(r); } S_21092:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17884);if(r)goto S_21092;} 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(17884);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17884);}while(r); } S_21096:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17887);if(r)goto S_21096;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17889);}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(17890);}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(17890);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17891);}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(17892);}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(17892);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17893);}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(17894);}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(17894);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17896);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17897);}while(r); S_21108:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17898);if(r)goto S_21108;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17898);}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(17899);}while(r); S_21112:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(17899);if(r)goto S_21112;} 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(17899);}while(r); } LABEL_METHOD2USEALLUDT__7:; if(qbevent){evnt(17900);r=0;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(FUNC_VARIABLESIZE(&(pass2678= -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(17901);}while(r); S_21116:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17902);if(r)goto S_21116;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17902);}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(17903);}while(r); S_21120:; if ((-(*__LONG_E!= 0 ))||new_error){ if(qbevent){evnt(17909);if(r)goto S_21120;} do{ *_FUNC_EVALUATETOTYP_LONG_SIZE= 1 ; if(!qbevent)break;evnt(17909);}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(17909);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17911);}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(17912);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17914);}while(r); } S_21129:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(17918);if(r)goto S_21129;} S_21130:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17919);if(r)goto S_21130;} S_21131:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17920);if(r)goto S_21131;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MEM cannot reference variable-length strings",44))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17921);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17921);}while(r); } } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17925);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17926);}while(r); S_21138:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17927);if(r)goto S_21138;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17927);}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(17929);}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(&(pass2679=( 4 **(int16*)(((char*)__UDT_ID)+(516)))+( 4 )+( 1 )-( 1 )))),qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17930);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(17932);}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(17934);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_VARIABLESIZE(&(pass2681= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17935);}while(r); S_21146:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17936);if(r)goto S_21146;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17936);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2682= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17937);}while(r); S_21150:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17938);if(r)goto S_21150;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17938);}while(r); } S_21153:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17940);if(r)goto S_21153;} 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(17941);}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(17943);}while(r); } S_21158:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17948);if(r)goto S_21158;} do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=*_FUNC_EVALUATETOTYP_LONG_TSIZE; if(!qbevent)break;evnt(17949);}while(r); }else{ do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17951);}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(17953);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17955);}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(17956);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17958);}while(r); } S_21168:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(17962);if(r)goto S_21168;} S_21169:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(17963);if(r)goto S_21169;} do{ SUB_GIVE_ERROR(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MEM cannot reference variable-length strings",44))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17963);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17963);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17965);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(17966);}while(r); S_21175:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17966);if(r)goto S_21175;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17966);}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(17967);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2683= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17968);}while(r); S_21180:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17968);if(r)goto S_21180;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17968);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17970);}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(17971);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17973);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2684= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17977);}while(r); S_21188:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(17978);if(r)goto S_21188;} do{ goto exit_subfunc; if(!qbevent)break;evnt(17978);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(17979);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP); if(!qbevent)break;evnt(17981);}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(17982);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17984);}while(r); } S_21196:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -2 ))||new_error){ if(qbevent){evnt(17989);if(r)goto S_21196;} LABEL_METHOD2USEALL:; if(qbevent){evnt(17990);r=0;} S_21197:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(17993);if(r)goto S_21197;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17993);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17993);}while(r); } S_21201:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(17994);if(r)goto S_21201;} 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(17994);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(17994);}while(r); } S_21205:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(17997);if(r)goto S_21205;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(17999);}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(18000);}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(18000);}while(r); do{ *_FUNC_EVALUATETOTYP_LONG_U=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18001);}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(18002);}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(18002);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18003);}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(18004);}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(18004);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18005);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(18006);}while(r); S_21217:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18007);if(r)goto S_21217;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18007);}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(18008);}while(r); S_21221:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(18008);if(r)goto S_21221;} 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(18008);}while(r); } LABEL_METHOD2USEALLUDT:; if(qbevent){evnt(18009);r=0;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(FUNC_VARIABLESIZE(&(pass2688= -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(18010);}while(r); S_21225:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18011);if(r)goto S_21225;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18011);}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(18012);}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(18013);}while(r); S_21230:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(18014);if(r)goto S_21230;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18014);}while(r); } S_21233:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(18015);if(r)goto S_21233;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_DST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18015);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18016);}while(r); } S_21238:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(18020);if(r)goto S_21238;} S_21239:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18022);if(r)goto S_21239;} S_21240:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(18023);if(r)goto S_21240;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2689= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18024);}while(r); S_21242:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18025);if(r)goto S_21242;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18025);}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(18026);}while(r); S_21246:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(18027);if(r)goto S_21246;} 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(18027);}while(r); } S_21249:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(18028);if(r)goto S_21249;} 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(18028);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18029);}while(r); } } do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18032);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(18033);}while(r); S_21257:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18034);if(r)goto S_21257;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18034);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(18035);}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(18037);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_VARIABLESIZE(&(pass2691= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18038);}while(r); S_21263:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18039);if(r)goto S_21263;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18039);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2692= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18040);}while(r); S_21267:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18041);if(r)goto S_21267;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18041);}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(18042);}while(r); S_21271:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18045);if(r)goto S_21271;} do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=*_FUNC_EVALUATETOTYP_LONG_TSIZE; if(!qbevent)break;evnt(18046);}while(r); }else{ do{ *_FUNC_EVALUATETOTYP_LONG_BYTES=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(18048);}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(18050);}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(18051);}while(r); S_21278:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(18052);if(r)goto S_21278;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18052);}while(r); } S_21281:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(18053);if(r)goto S_21281;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18053);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18055);}while(r); } S_21286:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18059);if(r)goto S_21286;} S_21287:; if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(18060);if(r)goto S_21287;} do{ *_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(func_val(_FUNC_EVALUATETOTYP_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18061);}while(r); do{ SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER); if(!qbevent)break;evnt(18062);}while(r); S_21290:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18063);if(r)goto S_21290;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18063);}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(18064);}while(r); do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2693= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18065);}while(r); S_21295:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18066);if(r)goto S_21295;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18066);}while(r); } }else{ do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2694= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18068);}while(r); S_21300:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18069);if(r)goto S_21300;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18069);}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(18070);}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(18072);}while(r); S_21306:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(18073);if(r)goto S_21306;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18073);}while(r); } S_21309:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(18074);if(r)goto S_21309;} 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(18074);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18075);}while(r); } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2695= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18079);}while(r); S_21315:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18080);if(r)goto S_21315;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18080);}while(r); } do{ *_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/ 8 ; if(!qbevent)break;evnt(18081);}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(18082);}while(r); S_21320:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||new_error){ if(qbevent){evnt(18083);if(r)goto S_21320;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_STR2(_FUNC_EVALUATETOTYP_LONG_SIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18083);}while(r); } S_21323:; if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||new_error){ if(qbevent){evnt(18084);if(r)goto S_21323;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18084);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18085);}while(r); } S_21328:; if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)!=(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISSTRING)))||new_error){ if(qbevent){evnt(18092);if(r)goto S_21328;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Illegal string-number conversion",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18093);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18093);}while(r); } S_21332:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(18096);if(r)goto S_21332;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18097);}while(r); S_21334:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(18098);if(r)goto S_21334;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2696= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18099);}while(r); S_21336:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18100);if(r)goto S_21336;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18100);}while(r); } } do{ goto exit_subfunc; if(!qbevent)break;evnt(18102);}while(r); } S_21342:; if (((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(18106);if(r)goto S_21342;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("evaluatetotyp received a request for a pointer (unsupported)",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18107);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18107);}while(r); do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid pointer",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18109);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18109);}while(r); } S_21348:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(18113);if(r)goto S_21348;} do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2697= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18114);}while(r); S_21350:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18115);if(r)goto S_21350;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18115);}while(r); } } S_21354:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(18118);if(r)goto S_21354;} 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(18119);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18119);}while(r); } S_21358:; if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(18123);if(r)goto S_21358;} S_21359:; if ((-((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||new_error){ if(qbevent){evnt(18124);if(r)goto S_21359;} do{ *_FUNC_EVALUATETOTYP_LONG_BITS=*_FUNC_EVALUATETOTYP_LONG_TARGETTYP& 511 ; if(!qbevent)break;evnt(18125);}while(r); S_21361:; if ((-(*_FUNC_EVALUATETOTYP_LONG_BITS<= 16 ))||new_error){ if(qbevent){evnt(18127);if(r)goto S_21361;} 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(18127);}while(r); } S_21364:; if (((-(*_FUNC_EVALUATETOTYP_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATETOTYP_LONG_BITS< 32 )))||new_error){ if(qbevent){evnt(18128);if(r)goto S_21364;} 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(18128);}while(r); } S_21367:; if ((-(*_FUNC_EVALUATETOTYP_LONG_BITS>= 32 ))||new_error){ if(qbevent){evnt(18129);if(r)goto S_21367;} 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(18129);}while(r); } } } do{ qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18133);}while(r); 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_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 "data17.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_FINDID_STRING_N,qbs_ucase(_FUNC_FINDID_STRING_N2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18137);}while(r); S_21374:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_FINDID_STRING_N)== 34 )))||new_error){ if(qbevent){evnt(18140);if(r)goto S_21374;} do{ goto LABEL_NOID; if(!qbevent)break;evnt(18140);}while(r); } do{ qbs_set(_FUNC_FINDID_STRING_SECONDARG,__STRING_FINDIDSECONDARG); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18143);}while(r); do{ qbs_set(__STRING_FINDIDSECONDARG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18143);}while(r); do{ *_FUNC_FINDID_LONG_FINDANOTHER=*__INTEGER_FINDANOTHERID; if(!qbevent)break;evnt(18146);}while(r); do{ *__INTEGER_FINDANOTHERID= 0 ; if(!qbevent)break;evnt(18146);}while(r); S_21381:; if (((-(*_FUNC_FINDID_LONG_FINDANOTHER!= 0 ))&(-(*__LONG_FINDIDINTERNAL!= 2 )))||new_error){ if(qbevent){evnt(18147);if(r)goto S_21381;} 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(18147);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18147);}while(r); } S_21385:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18148);if(r)goto S_21385;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18148);}while(r); } do{ *_FUNC_FINDID_LONG_FINDID= 2 ; if(!qbevent)break;evnt(18150);}while(r); do{ *_FUNC_FINDID_LONG_I= 0 ; if(!qbevent)break;evnt(18153);}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(18154);}while(r); S_21391:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18154);if(r)goto S_21391;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18154);}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(18155);}while(r); S_21395:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18155);if(r)goto S_21395;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18155);}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(18156);}while(r); S_21399:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18156);if(r)goto S_21399;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18156);}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(18157);}while(r); S_21403:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18157);if(r)goto S_21403;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18157);}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(18158);}while(r); S_21407:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18158);if(r)goto S_21407;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18158);}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(18159);}while(r); S_21411:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18159);if(r)goto S_21411;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18159);}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(18160);}while(r); S_21415:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18160);if(r)goto S_21415;} do{ goto LABEL_GOTSC; if(!qbevent)break;evnt(18160);}while(r); } LABEL_GOTSC:; if(qbevent){evnt(18161);r=0;} S_21418:; if ((*_FUNC_FINDID_LONG_I)||new_error){ if(qbevent){evnt(18162);if(r)goto S_21418;} 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(18163);}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(18163);}while(r); S_21421:; 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(18164);if(r)goto S_21421;} 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(18164);}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(18175);}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(18176);}while(r); S_21428:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FINDID_STRING_SC->len))||new_error){ if(qbevent){evnt(18177);if(r)goto S_21428;} do{ *_FUNC_FINDID_LONG_SCPASSED= 1 ; if(!qbevent)break;evnt(18177);}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(18177);}while(r); }else{ do{ *_FUNC_FINDID_LONG_SCPASSED= 0 ; if(!qbevent)break;evnt(18177);}while(r); } S_21434:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FINDID_STRING_N->len< 256 )))||new_error){ if(qbevent){evnt(18179);if(r)goto S_21434;} 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(18179);}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(18188);}while(r); S_21438:; if ((*_FUNC_FINDID_LONG_FINDANOTHER)||new_error){ if(qbevent){evnt(18189);if(r)goto S_21438;} LABEL_HASHRETRY:; if(qbevent){evnt(18190);r=0;} do{ *_FUNC_FINDID_LONG_Z=FUNC_HASHFINDCONT(_FUNC_FINDID_LONG_UNREQUIRED,_FUNC_FINDID_LONG_I); if(!qbevent)break;evnt(18191);}while(r); }else{ do{ *_FUNC_FINDID_LONG_Z=FUNC_HASHFIND(_FUNC_FINDID_STRING_N,&(pass2706= 1 ),_FUNC_FINDID_LONG_UNREQUIRED,_FUNC_FINDID_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18193);}while(r); } do{ *__LONG_FINDIDINTERNAL=*_FUNC_FINDID_LONG_Z; if(!qbevent)break;evnt(18195);}while(r); S_21444:; if ((-(*_FUNC_FINDID_LONG_Z== 0 ))||new_error){ if(qbevent){evnt(18196);if(r)goto S_21444;} do{ goto LABEL_NOID; if(!qbevent)break;evnt(18196);}while(r); } do{ *_FUNC_FINDID_LONG_FINDID=*_FUNC_FINDID_LONG_Z; if(!qbevent)break;evnt(18197);}while(r); S_21448:; if (((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+544))== 0 ))&(-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2645))== 0 )))||new_error){ if(qbevent){evnt(18211);if(r)goto S_21448;} S_21449:; 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]))*2869+2385)),256,1),_FUNC_FINDID_STRING_INSF)))||new_error){ if(qbevent){evnt(18212);if(r)goto S_21449;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(18212);}while(r); } } S_21453:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+544))== 2 ))||new_error){ if(qbevent){evnt(18216);if(r)goto S_21453;} S_21454:; 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]))*2869+1869)),256,1))!= 32 )))||new_error){ if(qbevent){evnt(18217);if(r)goto S_21454;} S_21455:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(_FUNC_FINDID_STRING_SECONDARG),qbs_ucase(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+1869)),256,1))))))||new_error){ if(qbevent){evnt(18218);if(r)goto S_21455;} S_21456:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(qbs_left(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+1869)),256,1), 1 ),qbs_new_txt_len("_",1)))&(qbs_notequal(qbs_left(_FUNC_FINDID_STRING_SECONDARG, 1 ),qbs_new_txt_len("_",1)))&(qbs_equal(qbs_rtrim(_FUNC_FINDID_STRING_SECONDARG),qbs_ucase(func_mid(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+1869)),256,1)), 2 ,NULL,0)))))){ if(qbevent){evnt(18219);if(r)goto S_21456;} }else{ do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(18221);}while(r); } } } S_21461:; 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]))*2869+2125)),256,1))!= 32 )))||new_error){ if(qbevent){evnt(18224);if(r)goto S_21461;} S_21462:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_rtrim(_FUNC_FINDID_STRING_SECONDARG),qbs_ucase(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2125)),256,1))))))||new_error){ if(qbevent){evnt(18225);if(r)goto S_21462;} S_21463:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(qbs_left(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2125)),256,1), 1 ),qbs_new_txt_len("_",1)))&(qbs_notequal(qbs_left(_FUNC_FINDID_STRING_SECONDARG, 1 ),qbs_new_txt_len("_",1)))&(qbs_notequal(qbs_rtrim(_FUNC_FINDID_STRING_SECONDARG),qbs_ucase(func_mid(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+2125)),256,1)), 2 ,NULL,0)))))){ if(qbevent){evnt(18226);if(r)goto S_21463;} }else{ do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(18228);}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]))*2869+528)),8,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18235);}while(r); do{ *_FUNC_FINDID_LONG_AMUSTHAVE=*_FUNC_FINDID_LONG_IMUSTHAVE& 255 ; if(!qbevent)break;evnt(18236);}while(r); S_21471:; if ((-(*_FUNC_FINDID_LONG_AMUSTHAVE!= 32 ))||new_error){ if(qbevent){evnt(18237);if(r)goto S_21471;} S_21472:; if ((*_FUNC_FINDID_LONG_SCPASSED)||new_error){ if(qbevent){evnt(18238);if(r)goto S_21472;} S_21473:; 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]))*2869+528)),8,1))))||new_error){ if(qbevent){evnt(18239);if(r)goto S_21473;} do{ goto LABEL_FINDIDOK; if(!qbevent)break;evnt(18239);}while(r); } } do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(18250);}while(r); } S_21479:; if ((*_FUNC_FINDID_LONG_SCPASSED)||new_error){ if(qbevent){evnt(18256);if(r)goto S_21479;} 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]))*2869+520)),8,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18257);}while(r); do{ *_FUNC_FINDID_LONG_AMAYHAVE=*_FUNC_FINDID_LONG_IMAYHAVE& 255 ; if(!qbevent)break;evnt(18258);}while(r); S_21482:; if ((-(*_FUNC_FINDID_LONG_AMAYHAVE== 32 ))||new_error){ if(qbevent){evnt(18259);if(r)goto S_21482;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(18259);}while(r); } S_21485:; if ((-(*_FUNC_FINDID_LONG_AMAYHAVE== 36 ))||new_error){ if(qbevent){evnt(18262);if(r)goto S_21485;} S_21486:; if ((-(*_FUNC_FINDID_LONG_IMAYHAVE!= 8228 ))||new_error){ if(qbevent){evnt(18263);if(r)goto S_21486;} S_21487:; if ((qbs_cleanup(qbs_tmp_base,-(string2i(_FUNC_FINDID_STRING_SC)== 8228 )))||new_error){ if(qbevent){evnt(18265);if(r)goto S_21487;} do{ goto LABEL_FINDIDOK; if(!qbevent)break;evnt(18265);}while(r); } } } S_21492:; 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]))*2869+520)),8,1))))||new_error){ if(qbevent){evnt(18269);if(r)goto S_21492;} do{ goto LABEL_FINDIDNOMATCH; if(!qbevent)break;evnt(18269);}while(r); } } LABEL_FINDIDOK:; if(qbevent){evnt(18273);r=0;} do{ memcpy((((char*)__UDT_ID)+(0)+ 0),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 0), 256); memcpy((((char*)__UDT_ID)+(0)+ 256),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 256), 256); memcpy((((char*)__UDT_ID)+(0)+ 512),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 512), 4); memcpy((((char*)__UDT_ID)+(0)+ 516),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 516), 2); memcpy((((char*)__UDT_ID)+(0)+ 518),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 518), 2); memcpy((((char*)__UDT_ID)+(0)+ 520),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 520), 8); memcpy((((char*)__UDT_ID)+(0)+ 528),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 528), 8); memcpy((((char*)__UDT_ID)+(0)+ 536),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 536), 4); memcpy((((char*)__UDT_ID)+(0)+ 540),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 540), 4); memcpy((((char*)__UDT_ID)+(0)+ 544),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 544), 2); memcpy((((char*)__UDT_ID)+(0)+ 546),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 546), 2); memcpy((((char*)__UDT_ID)+(0)+ 548),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 548), 2); memcpy((((char*)__UDT_ID)+(0)+ 550),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 550), 256); memcpy((((char*)__UDT_ID)+(0)+ 806),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 806), 2); memcpy((((char*)__UDT_ID)+(0)+ 808),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 808), 1); memcpy((((char*)__UDT_ID)+(0)+ 809),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 809), 2); memcpy((((char*)__UDT_ID)+(0)+ 811),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 811), 2); memcpy((((char*)__UDT_ID)+(0)+ 813),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 813), 400); memcpy((((char*)__UDT_ID)+(0)+ 1213),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1213), 400); memcpy((((char*)__UDT_ID)+(0)+ 1613),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1613), 256); memcpy((((char*)__UDT_ID)+(0)+ 1869),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1869), 256); memcpy((((char*)__UDT_ID)+(0)+ 2125),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2125), 256); memcpy((((char*)__UDT_ID)+(0)+ 2381),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2381), 4); memcpy((((char*)__UDT_ID)+(0)+ 2385),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2385), 256); memcpy((((char*)__UDT_ID)+(0)+ 2641),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2641), 4); memcpy((((char*)__UDT_ID)+(0)+ 2645),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2645), 2); memcpy((((char*)__UDT_ID)+(0)+ 2647),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2647), 100); memcpy((((char*)__UDT_ID)+(0)+ 2747),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2747), 100); memcpy((((char*)__UDT_ID)+(0)+ 2847),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2847), 4); memcpy((((char*)__UDT_ID)+(0)+ 2851),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2851), 2); memcpy((((char*)__UDT_ID)+(0)+ 2853),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2853), 2); memcpy((((char*)__UDT_ID)+(0)+ 2855),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2855), 4); memcpy((((char*)__UDT_ID)+(0)+ 2859),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2859), 2); qbs_set(*(qbs**)(((char*)__UDT_ID)+(0)+ 2861), *(qbs**)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_FINDID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2861)); if(!qbevent)break;evnt(18275);}while(r); do{ *_FUNC_FINDID_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(18277);}while(r); do{ qbs_set(_FUNC_FINDID_STRING_TEMP,FUNC_REFER(FUNC_STR2(_FUNC_FINDID_LONG_I),_FUNC_FINDID_LONG_T,&(pass2707= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18278);}while(r); do{ SUB_MANAGEVARIABLELIST(qbs_new_txt_len("",0),_FUNC_FINDID_STRING_TEMP,&(pass2708= 0 ),&(pass2709= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18279);}while(r); do{ *__LONG_CURRENTID=*_FUNC_FINDID_LONG_I; if(!qbevent)break;evnt(18280);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18281);}while(r); LABEL_FINDIDNOMATCH:; if(qbevent){evnt(18284);r=0;} S_21502:; if ((-(*_FUNC_FINDID_LONG_Z== 2 ))||new_error){ if(qbevent){evnt(18286);if(r)goto S_21502;} do{ goto LABEL_HASHRETRY; if(!qbevent)break;evnt(18286);}while(r); } LABEL_NOID:; if(qbevent){evnt(18289);r=0;} do{ *_FUNC_FINDID_LONG_FINDID= 0 ; if(!qbevent)break;evnt(18290);}while(r); do{ *__LONG_CURRENTID= -1 ; if(!qbevent)break;evnt(18291);}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; 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 "data18.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_FINDARRAY_LONG_FINDARRAY= -1 ; if(!qbevent)break;evnt(18295);}while(r); do{ qbs_set(_FUNC_FINDARRAY_STRING_N,_FUNC_FINDARRAY_STRING_SECURE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18296);}while(r); S_21509:; if (( 0 )||new_error){ if(qbevent){evnt(18297);if(r)goto S_21509;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2711; 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 skip2711; skip2711: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18297);}while(r); } S_21512:; 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(18298);if(r)goto S_21512;} do{ *_FUNC_FINDARRAY_LONG_FINDARRAY= 0 ; if(!qbevent)break;evnt(18298);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18298);}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(18301);}while(r); S_21517:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18301);if(r)goto S_21517;} 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(18301);}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(18301);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18301);}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(18302);}while(r); S_21523:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18302);if(r)goto S_21523;} 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(18302);}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(18302);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18302);}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(18303);}while(r); S_21529:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18303);if(r)goto S_21529;} 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(18303);}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(18303);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18303);}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(18304);}while(r); S_21535:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18304);if(r)goto S_21535;} 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(18304);}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(18304);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18304);}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(18305);}while(r); S_21541:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18305);if(r)goto S_21541;} 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(18305);}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(18305);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18305);}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(18306);}while(r); S_21547:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18306);if(r)goto S_21547;} 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(18306);}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(18306);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18306);}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(18307);}while(r); S_21553:; if ((*_FUNC_FINDARRAY_LONG_I)||new_error){ if(qbevent){evnt(18307);if(r)goto S_21553;} 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(18307);}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(18307);}while(r); do{ goto LABEL_GOTSC2; if(!qbevent)break;evnt(18307);}while(r); } LABEL_GOTSC2:; if(qbevent){evnt(18308);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(18309);}while(r); S_21559:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_FINDARRAY_STRING_SC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(18311);if(r)goto S_21559;} do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18314);}while(r); S_21561:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18314);if(r)goto S_21561;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18314);}while(r); } S_21564:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(18315);if(r)goto S_21564;} S_21565:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(18316);if(r)goto S_21565;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18317);}while(r); } S_21568:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18319);if(r)goto S_21568;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18319);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18319);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(18319);}while(r); } S_21574:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18320);if(r)goto S_21574;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18320);}while(r); } dl_continue_2719:; } dl_exit_2719:; }else{ do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18327);}while(r); S_21580:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18327);if(r)goto S_21580;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18327);}while(r); } S_21583:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(18328);if(r)goto S_21583;} S_21584:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(18329);if(r)goto S_21584;} S_21585:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(18330);if(r)goto S_21585;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18330);}while(r); } S_21588:; if ((-(*(int32*)(((char*)__UDT_ID)+(2641))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(18331);if(r)goto S_21588;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18331);}while(r); } } S_21592:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18333);if(r)goto S_21592;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18333);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18333);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(18333);}while(r); } S_21598:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18334);if(r)goto S_21598;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18334);}while(r); } dl_continue_2720:; } dl_exit_2720:; do{ *_FUNC_FINDARRAY_LONG_A=qbs_asc(qbs_ucase(_FUNC_FINDARRAY_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18338);}while(r); S_21603:; if ((-(*_FUNC_FINDARRAY_LONG_A== 95 ))||new_error){ if(qbevent){evnt(18338);if(r)goto S_21603;} do{ *_FUNC_FINDARRAY_LONG_A= 91 ; if(!qbevent)break;evnt(18338);}while(r); } do{ *_FUNC_FINDARRAY_LONG_A=*_FUNC_FINDARRAY_LONG_A- 64 ; if(!qbevent)break;evnt(18339);}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(18340);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18341);}while(r); S_21609:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18341);if(r)goto S_21609;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18341);}while(r); } S_21612:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(18342);if(r)goto S_21612;} S_21613:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(18343);if(r)goto S_21613;} S_21614:; if ((-(*__LONG_SUBFUNCN== 0 ))||new_error){ if(qbevent){evnt(18344);if(r)goto S_21614;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18344);}while(r); } S_21617:; if ((-(*(int32*)(((char*)__UDT_ID)+(2641))==*__LONG_SUBFUNCN))||new_error){ if(qbevent){evnt(18345);if(r)goto S_21617;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18345);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(18346);}while(r); } S_21622:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18348);if(r)goto S_21622;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18348);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18348);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(18348);}while(r); } S_21628:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18349);if(r)goto S_21628;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18349);}while(r); } dl_continue_2721:; } dl_exit_2721:; do{ qbs_set(_FUNC_FINDARRAY_STRING_N2,_FUNC_FINDARRAY_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18353);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18354);}while(r); S_21634:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18354);if(r)goto S_21634;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18354);}while(r); } S_21637:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(18355);if(r)goto S_21637;} S_21638:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(18356);if(r)goto S_21638;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18357);}while(r); } S_21641:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18359);if(r)goto S_21641;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18359);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18359);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(18359);}while(r); } S_21647:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18360);if(r)goto S_21647;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18360);}while(r); } dl_continue_2722:; } dl_exit_2722:; do{ *_FUNC_FINDARRAY_LONG_A=qbs_asc(qbs_ucase(_FUNC_FINDARRAY_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18364);}while(r); S_21652:; if ((-(*_FUNC_FINDARRAY_LONG_A== 95 ))||new_error){ if(qbevent){evnt(18364);if(r)goto S_21652;} do{ *_FUNC_FINDARRAY_LONG_A= 91 ; if(!qbevent)break;evnt(18364);}while(r); } do{ *_FUNC_FINDARRAY_LONG_A=*_FUNC_FINDARRAY_LONG_A- 64 ; if(!qbevent)break;evnt(18365);}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(18366);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18367);}while(r); S_21658:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18367);if(r)goto S_21658;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18367);}while(r); } S_21661:; while((*_FUNC_FINDARRAY_LONG_TRY)||new_error){ if(qbevent){evnt(18368);if(r)goto S_21661;} S_21662:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(18369);if(r)goto S_21662;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18370);}while(r); } S_21665:; if ((-(*_FUNC_FINDARRAY_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18372);if(r)goto S_21665;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18372);}while(r); do{ *_FUNC_FINDARRAY_LONG_TRY=FUNC_FINDID(_FUNC_FINDARRAY_STRING_N2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18372);}while(r); }else{ do{ *_FUNC_FINDARRAY_LONG_TRY= 0 ; if(!qbevent)break;evnt(18372);}while(r); } S_21671:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18373);if(r)goto S_21671;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18373);}while(r); } dl_continue_2723:; } dl_exit_2723:; } do{ *_FUNC_FINDARRAY_LONG_FINDARRAY= 0 ; if(!qbevent)break;evnt(18377);}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; 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 "data19.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(18385);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_STRING_SAVEA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18387);}while(r); S_21679:; if (( 0 )||new_error){ if(qbevent){evnt(18388);if(r)goto S_21679;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2725; 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 skip2725; skip2725: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18388);}while(r); } do{ *__LONG_FOOINDWEL=*__LONG_FOOINDWEL+ 1 ; if(!qbevent)break;evnt(18390);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=FUNC_NUMELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18392);}while(r); S_21684:; if ((-(*__LONG_FOOINDWEL== 1 ))||new_error){ if(qbevent){evnt(18394);if(r)goto S_21684;} do{ *_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND= 0 ; if(!qbevent)break;evnt(18395);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_UPPERCASEA,qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18398);}while(r); S_21687:; fornext_value2727= 1 ; fornext_finalvalue2727=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; fornext_step2727= 1 ; if (fornext_step2727<0) fornext_step_negative2727=1; else fornext_step_negative2727=0; if (new_error) goto fornext_error2727; goto fornext_entrylabel2727; while(1){ fornext_value2727=fornext_step2727+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2727: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2727; if (fornext_step_negative2727){ if (fornext_value2727fornext_finalvalue2727) break; } fornext_error2727:; if(qbevent){evnt(18399);if(r)goto S_21687;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TEMP1,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_UPPERCASEA,_FUNC_FIXOPERATIONORDER_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18400);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TEMP2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_UPPERCASEA,&(pass2728=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18401);}while(r); S_21690:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP1,qbs_new_txt_len("AND",3)))&(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP2,qbs_new_txt_len("AND",3)))))||new_error){ if(qbevent){evnt(18402);if(r)goto S_21690;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Error: AND AND",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18402);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18402);}while(r); } S_21694:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP1,qbs_new_txt_len("OR",2)))&(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP2,qbs_new_txt_len("OR",2)))))||new_error){ if(qbevent){evnt(18403);if(r)goto S_21694;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Error: OR OR",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18403);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18403);}while(r); } S_21698:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP1,qbs_new_txt_len("XOR",3)))&(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP2,qbs_new_txt_len("XOR",3)))))||new_error){ if(qbevent){evnt(18404);if(r)goto S_21698;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Error: XOR XOR",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18404);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18404);}while(r); } S_21702:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP1,qbs_new_txt_len("IMP",3)))&(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP2,qbs_new_txt_len("IMP",3)))))||new_error){ if(qbevent){evnt(18405);if(r)goto S_21702;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Error: IMP IMP",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18405);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18405);}while(r); } S_21706:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP1,qbs_new_txt_len("EQV",3)))&(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_TEMP2,qbs_new_txt_len("EQV",3)))))||new_error){ if(qbevent){evnt(18406);if(r)goto S_21706;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Error: EQV EQV",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18406);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18406);}while(r); } fornext_continue_2726:; } fornext_exit_2726:; do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18410);}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(18411);}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(18412);}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(18413);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I= 1 ; if(!qbevent)break;evnt(18414);}while(r); LABEL_FINDMMB:; if(qbevent){evnt(18415);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(18416);}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(18417);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I3=*_FUNC_FIXOPERATIONORDER_LONG_I1; if(!qbevent)break;evnt(18418);}while(r); S_21719:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I2)||new_error){ if(qbevent){evnt(18419);if(r)goto S_21719;} S_21720:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I1== 0 ))||new_error){ if(qbevent){evnt(18420);if(r)goto S_21720;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I3=*_FUNC_FIXOPERATIONORDER_LONG_I2; if(!qbevent)break;evnt(18421);}while(r); }else{ S_21723:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I2<*_FUNC_FIXOPERATIONORDER_LONG_I1))||new_error){ if(qbevent){evnt(18423);if(r)goto S_21723;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I3=*_FUNC_FIXOPERATIONORDER_LONG_I2; if(!qbevent)break;evnt(18423);}while(r); } } } S_21728:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I3)||new_error){ if(qbevent){evnt(18426);if(r)goto S_21728;} S_21729:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I3==*_FUNC_FIXOPERATIONORDER_LONG_I1))||new_error){ if(qbevent){evnt(18427);if(r)goto S_21729;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18427);}while(r); } S_21732:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I3==*_FUNC_FIXOPERATIONORDER_LONG_I2))||new_error){ if(qbevent){evnt(18428);if(r)goto S_21732;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18428);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I3+ 2 ; if(!qbevent)break;evnt(18429);}while(r); S_21736:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B< 0 ))||new_error){ if(qbevent){evnt(18430);if(r)goto S_21736;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Missing (",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18430);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18430);}while(r); } do{ goto LABEL_FINDMMB; if(!qbevent)break;evnt(18431);}while(r); } S_21742:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B> 0 ))||new_error){ if(qbevent){evnt(18433);if(r)goto S_21742;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Missing )",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18433);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18433);}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(18437);}while(r); LABEL_RULE1:; if(qbevent){evnt(18440);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(18441);}while(r); S_21748:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I)||new_error){ if(qbevent){evnt(18442);if(r)goto S_21748;} 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(18443);}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(18444);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(18445);}while(r); S_21752:; if (( 0 )||new_error){ if(qbevent){evnt(18446);if(r)goto S_21752;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2731; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:+/-:",22),_FUNC_FIXOPERATIONORDER_STRING_A), 0, 0, 1); if (new_error) goto skip2731; skip2731: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18446);}while(r); } do{ goto LABEL_RULE1; if(!qbevent)break;evnt(18447);}while(r); } LABEL_RULE2:; if(qbevent){evnt(18451);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(18452);}while(r); S_21758:; if ((*_FUNC_FIXOPERATIONORDER_LONG_I)||new_error){ if(qbevent){evnt(18453);if(r)goto S_21758;} 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(18454);}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(18455);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(18456);}while(r); S_21762:; if (( 0 )||new_error){ if(qbevent){evnt(18457);if(r)goto S_21762;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2734; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:+/-:",22),_FUNC_FIXOPERATIONORDER_STRING_A), 0, 0, 1); if (new_error) goto skip2734; skip2734: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18457);}while(r); } do{ goto LABEL_RULE2; if(!qbevent)break;evnt(18458);}while(r); } LABEL_RULE3:; if(qbevent){evnt(18462);r=0;} S_21767:; 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(18463);if(r)goto S_21767;} S_21768:; fornext_value2736= 1 ; fornext_finalvalue2736=*_FUNC_FIXOPERATIONORDER_LONG_N- 2 ; fornext_step2736= 1 ; if (fornext_step2736<0) fornext_step_negative2736=1; else fornext_step_negative2736=0; if (new_error) goto fornext_error2736; goto fornext_entrylabel2736; while(1){ fornext_value2736=fornext_step2736+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2736: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2736; if (fornext_step_negative2736){ if (fornext_value2736fornext_finalvalue2736) break; } fornext_error2736:; if(qbevent){evnt(18464);if(r)goto S_21768;} S_21769:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I))))||new_error){ if(qbevent){evnt(18465);if(r)goto S_21769;} S_21770:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2737=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 )),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(18466);if(r)goto S_21770;} S_21771:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2738=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 )),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(18467);if(r)goto S_21771;} do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2739=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ),&(pass2740=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ),&(pass2741= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18468);}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(18469);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 2 ; if(!qbevent)break;evnt(18470);}while(r); S_21775:; if (( 0 )||new_error){ if(qbevent){evnt(18471);if(r)goto S_21775;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2742; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:+/-:",22),_FUNC_FIXOPERATIONORDER_STRING_A), 0, 0, 1); if (new_error) goto skip2742; skip2742: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18471);}while(r); } do{ goto LABEL_RULE3; if(!qbevent)break;evnt(18472);}while(r); } } } fornext_continue_2735:; } fornext_exit_2735:; } S_21784:; fornext_value2744= 1 ; fornext_finalvalue2744=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; fornext_step2744= 1 ; if (fornext_step2744<0) fornext_step_negative2744=1; else fornext_step_negative2744=0; if (new_error) goto fornext_error2744; goto fornext_entrylabel2744; while(1){ fornext_value2744=fornext_step2744+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2744: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2744; if (fornext_step_negative2744){ if (fornext_value2744fornext_finalvalue2744) break; } fornext_error2744:; if(qbevent){evnt(18496);if(r)goto S_21784;} S_21785:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I>(*_FUNC_FIXOPERATIONORDER_LONG_N- 1 )))||new_error){ if(qbevent){evnt(18497);if(r)goto S_21785;} do{ goto fornext_exit_2743; if(!qbevent)break;evnt(18497);}while(r); } S_21788:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I))== 45 )))||new_error){ if(qbevent){evnt(18499);if(r)goto S_21788;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 0 ; if(!qbevent)break;evnt(18501);}while(r); S_21790:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(18502);if(r)goto S_21790;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 1 ; if(!qbevent)break;evnt(18503);}while(r); }else{ do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2745=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18505);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18506);}while(r); S_21795:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 44 )))||new_error){ if(qbevent){evnt(18507);if(r)goto S_21795;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 1 ; if(!qbevent)break;evnt(18508);}while(r); }else{ S_21798:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2)))||new_error){ if(qbevent){evnt(18510);if(r)goto S_21798;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEG= 1 ; if(!qbevent)break;evnt(18510);}while(r); } } } S_21803:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEG== 1 ))||new_error){ if(qbevent){evnt(18513);if(r)goto S_21803;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A2,FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2746=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18515);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18516);}while(r); S_21806:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C>= 48 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(18517);if(r)goto S_21806;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2= 0 ; if(!qbevent)break;evnt(18518);}while(r); S_21808:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I<(*_FUNC_FIXOPERATIONORDER_LONG_N- 1 )))||new_error){ if(qbevent){evnt(18518);if(r)goto S_21808;} do{ *_FUNC_FIXOPERATIONORDER_LONG_C2=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2747=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18518);}while(r); } S_21811:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2!= 94 ))||new_error){ if(qbevent){evnt(18519);if(r)goto S_21811;} 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(18521);}while(r); S_21813:; 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(18522);if(r)goto S_21813;} 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(18523);}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(18525);}while(r); } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2749=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ),&(pass2750= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18527);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2751=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18528);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(18529);}while(r); S_21821:; if (( 0 )||new_error){ if(qbevent){evnt(18530);if(r)goto S_21821;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2752; 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 skip2752; skip2752: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18530);}while(r); } do{ goto LABEL_NEGDONE; if(!qbevent)break;evnt(18532);}while(r); } } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2753= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18539);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2754=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),func_chr( 241 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18540);}while(r); S_21829:; if (( 0 )||new_error){ if(qbevent){evnt(18541);if(r)goto S_21829;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2755; 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 skip2755; skip2755: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18541);}while(r); } } } LABEL_NEGDONE:; if(qbevent){evnt(18545);r=0;} fornext_continue_2743:; } fornext_exit_2743:; } do{ *_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED= 0 ; if(!qbevent)break;evnt(18555);}while(r); LABEL_POWNEG:; if(qbevent){evnt(18556);r=0;} S_21837:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("^",1),__STRING1_SP),func_chr( 241 )),0)))||new_error){ if(qbevent){evnt(18557);if(r)goto S_21837;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18558);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B1= 0 ; if(!qbevent)break;evnt(18559);}while(r); S_21840:; fornext_value2757= 1 ; fornext_finalvalue2757=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2757= 1 ; if (fornext_step2757<0) fornext_step_negative2757=1; else fornext_step_negative2757=0; if (new_error) goto fornext_error2757; goto fornext_entrylabel2757; while(1){ fornext_value2757=fornext_step2757+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2757: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2757; if (fornext_step_negative2757){ if (fornext_value2757fornext_finalvalue2757) break; } fornext_error2757:; if(qbevent){evnt(18560);if(r)goto S_21840;} 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(18561);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18562);}while(r); S_21843:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))||new_error){ if(qbevent){evnt(18563);if(r)goto S_21843;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18563);}while(r); } S_21846:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))||new_error){ if(qbevent){evnt(18564);if(r)goto S_21846;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18564);}while(r); } S_21849:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18565);if(r)goto S_21849;} S_21850:; if ((*_FUNC_FIXOPERATIONORDER_LONG_B1)||new_error){ if(qbevent){evnt(18566);if(r)goto S_21850;} S_21851:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2)))||new_error){ if(qbevent){evnt(18567);if(r)goto S_21851;} S_21852:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_A2,qbs_new_txt_len("^",1)))&(qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_A2,func_chr( 241 )))))||new_error){ if(qbevent){evnt(18568);if(r)goto S_21852;} do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2758=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18569);}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(18570);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18571);}while(r); S_21856:; if (( 0 )||new_error){ if(qbevent){evnt(18572);if(r)goto S_21856;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2759; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:^-:",21),_FUNC_FIXOPERATIONORDER_STRING_A), 0, 0, 1); if (new_error) goto skip2759; skip2759: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18572);}while(r); } do{ goto LABEL_POWNEG; if(!qbevent)break;evnt(18573);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED= 1 ; if(!qbevent)break;evnt(18574);}while(r); } } } S_21864:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 94 ))||new_error){ if(qbevent){evnt(18578);if(r)goto S_21864;} S_21865:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2760=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 )),func_chr( 241 ))))||new_error){ if(qbevent){evnt(18579);if(r)goto S_21865;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B1=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18579);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(18579);}while(r); } } } fornext_continue_2756:; } fornext_exit_2756:; S_21872:; if ((*_FUNC_FIXOPERATIONORDER_LONG_B1)||new_error){ if(qbevent){evnt(18583);if(r)goto S_21872;} 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(18584);}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(18585);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18586);}while(r); S_21876:; if (( 0 )||new_error){ if(qbevent){evnt(18587);if(r)goto S_21876;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2761; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("fixoperationorder:^-:",21),_FUNC_FIXOPERATIONORDER_STRING_A), 0, 0, 1); if (new_error) goto skip2761; skip2761: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18587);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED= 1 ; if(!qbevent)break;evnt(18588);}while(r); do{ goto LABEL_POWNEG; if(!qbevent)break;evnt(18589);}while(r); } } LABEL_NOT_RECHECK:; if(qbevent){evnt(18596);r=0;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LCO= 255 ; if(!qbevent)break;evnt(18597);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_HCO= 0 ; if(!qbevent)break;evnt(18598);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18599);}while(r); S_21886:; fornext_value2763= 1 ; fornext_finalvalue2763=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2763= 1 ; if (fornext_step2763<0) fornext_step_negative2763=1; else fornext_step_negative2763=0; if (new_error) goto fornext_error2763; goto fornext_entrylabel2763; while(1){ fornext_value2763=fornext_step2763+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2763: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2763; if (fornext_step_negative2763){ if (fornext_value2763fornext_finalvalue2763) break; } fornext_error2763:; if(qbevent){evnt(18600);if(r)goto S_21886;} 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(18601);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18602);}while(r); S_21889:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18603);if(r)goto S_21889;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18603);}while(r); } S_21892:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18604);if(r)goto S_21892;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18604);}while(r); } S_21895:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18605);if(r)goto S_21895;} do{ *_FUNC_FIXOPERATIONORDER_LONG_OP=FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18606);}while(r); S_21897:; if ((*_FUNC_FIXOPERATIONORDER_LONG_OP)||new_error){ if(qbevent){evnt(18607);if(r)goto S_21897;} S_21898:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_OP<*_FUNC_FIXOPERATIONORDER_LONG_LCO))||new_error){ if(qbevent){evnt(18608);if(r)goto S_21898;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LCO=*_FUNC_FIXOPERATIONORDER_LONG_OP; if(!qbevent)break;evnt(18608);}while(r); } S_21901:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_OP>*_FUNC_FIXOPERATIONORDER_LONG_HCO))||new_error){ if(qbevent){evnt(18609);if(r)goto S_21901;} do{ *_FUNC_FIXOPERATIONORDER_LONG_HCO=*_FUNC_FIXOPERATIONORDER_LONG_OP; if(!qbevent)break;evnt(18609);}while(r); } } } fornext_continue_2762:; } fornext_exit_2762:; S_21907:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_HCO!= 0 ))||new_error){ if(qbevent){evnt(18616);if(r)goto S_21907;} S_21908:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LCO!=*_FUNC_FIXOPERATIONORDER_LONG_HCO))||new_error){ if(qbevent){evnt(18617);if(r)goto S_21908;} S_21909:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LCO== 6 ))||new_error){ if(qbevent){evnt(18620);if(r)goto S_21909;} S_21910:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_N== 1 ))||new_error){ if(qbevent){evnt(18623);if(r)goto S_21910;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected NOT ...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18623);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18623);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18624);}while(r); S_21915:; fornext_value2765= 1 ; fornext_finalvalue2765=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2765= 1 ; if (fornext_step2765<0) fornext_step_negative2765=1; else fornext_step_negative2765=0; if (new_error) goto fornext_error2765; goto fornext_entrylabel2765; while(1){ fornext_value2765=fornext_step2765+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2765: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2765; if (fornext_step_negative2765){ if (fornext_value2765fornext_finalvalue2765) break; } fornext_error2765:; if(qbevent){evnt(18625);if(r)goto S_21915;} 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(18626);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18627);}while(r); S_21918:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18628);if(r)goto S_21918;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18628);}while(r); } S_21921:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18629);if(r)goto S_21921;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18629);}while(r); } S_21924:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18630);if(r)goto S_21924;} S_21925:; 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(18631);if(r)goto S_21925;} S_21926:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I==*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18632);if(r)goto S_21926;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected NOT ...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18632);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18632);}while(r); } S_21930:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(18633);if(r)goto S_21930;} 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,&(pass2766= 2 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18633);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18633);}while(r); do{ goto LABEL_LCO_BRACKETTING_DONE; if(!qbevent)break;evnt(18633);}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,&(pass2767= 1 ),&(pass2768=*_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,&(pass2769=*_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(18634);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 4 ; if(!qbevent)break;evnt(18635);}while(r); do{ goto LABEL_NOT_RECHECK; if(!qbevent)break;evnt(18636);}while(r); } } fornext_continue_2764:; } fornext_exit_2764:; } do{ *_FUNC_FIXOPERATIONORDER_LONG_N2=*_FUNC_FIXOPERATIONORDER_LONG_N; if(!qbevent)break;evnt(18642);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18643);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A3,qbs_new_txt_len("{",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18644);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N= 1 ; if(!qbevent)break;evnt(18645);}while(r); S_21946:; fornext_value2771= 1 ; fornext_finalvalue2771=*_FUNC_FIXOPERATIONORDER_LONG_N2; fornext_step2771= 1 ; if (fornext_step2771<0) fornext_step_negative2771=1; else fornext_step_negative2771=0; if (new_error) goto fornext_error2771; goto fornext_entrylabel2771; while(1){ fornext_value2771=fornext_step2771+(*_FUNC_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2771: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2771; if (fornext_step_negative2771){ if (fornext_value2771fornext_finalvalue2771) break; } fornext_error2771:; if(qbevent){evnt(18646);if(r)goto S_21946;} 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(18647);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18648);}while(r); S_21949:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18649);if(r)goto S_21949;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18649);}while(r); } S_21952:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18650);if(r)goto S_21952;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18650);}while(r); } S_21955:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18651);if(r)goto S_21955;} do{ *_FUNC_FIXOPERATIONORDER_LONG_OP=FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18652);}while(r); S_21957:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_OP==*_FUNC_FIXOPERATIONORDER_LONG_LCO))||new_error){ if(qbevent){evnt(18653);if(r)goto S_21957;} S_21958:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(18654);if(r)goto S_21958;} 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(18655);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N= 2 ; if(!qbevent)break;evnt(18656);}while(r); }else{ S_21962:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I==*_FUNC_FIXOPERATIONORDER_LONG_N2))||new_error){ if(qbevent){evnt(18658);if(r)goto S_21962;} 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(18658);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18658);}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(18659);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 3 ; if(!qbevent)break;evnt(18660);}while(r); } do{ goto LABEL_FIXOP0; if(!qbevent)break;evnt(18662);}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(18666);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 1 ; if(!qbevent)break;evnt(18667);}while(r); LABEL_FIXOP0:; if(qbevent){evnt(18668);r=0;} fornext_continue_2770:; } fornext_exit_2770:; 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(18670);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 1 ; if(!qbevent)break;evnt(18671);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18672);}while(r); LABEL_LCO_BRACKETTING_DONE:; if(qbevent){evnt(18674);r=0;} S_21978:; if (( 0 )||new_error){ if(qbevent){evnt(18675);if(r)goto S_21978;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2772; sub_file_print(tmp_fileno,qbs_new_txt_len("fixoperationorder:lco bracketing[",33), 0, 0, 0); if (new_error) goto skip2772; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_LCO)), 1, 0, 0); if (new_error) goto skip2772; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0, 0, 0); if (new_error) goto skip2772; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_HCO)), 1, 0, 0); if (new_error) goto skip2772; sub_file_print(tmp_fileno,qbs_add(qbs_new_txt_len("]:",2),_FUNC_FIXOPERATIONORDER_STRING_A), 0, 0, 1); if (new_error) goto skip2772; skip2772: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18675);}while(r); } S_21981:; if ((*_FUNC_FIXOPERATIONORDER_LONG_POWNEGUSED)||new_error){ if(qbevent){evnt(18678);if(r)goto S_21981;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18679);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I= 0 ; if(!qbevent)break;evnt(18680);}while(r); S_21984:; do{ if(qbevent){evnt(18681);if(r)goto S_21984;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(18682);}while(r); S_21986:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I>*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18683);if(r)goto S_21986;} do{ goto dl_exit_2773; if(!qbevent)break;evnt(18683);}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(18684);}while(r); S_21990:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18685);if(r)goto S_21990;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18685);}while(r); } S_21993:; if (((((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 ))))&(-(*_FUNC_FIXOPERATIONORDER_LONG_B!= 0 )))||new_error){ if(qbevent){evnt(18686);if(r)goto S_21993;} do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2774= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18687);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N- 1 ; if(!qbevent)break;evnt(18688);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ; if(!qbevent)break;evnt(18689);}while(r); S_21997:; if (( 0 )||new_error){ if(qbevent){evnt(18690);if(r)goto S_21997;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2775; 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 skip2775; skip2775: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(18690);}while(r); } } S_22001:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18692);if(r)goto S_22001;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18692);}while(r); } dl_continue_2773:; }while(1); dl_exit_2773:; } } } S_22008:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_left(_FUNC_FIXOPERATIONORDER_STRING_A, 4 )),(qbs_add(qbs_add(qbs_add(func_chr( 241 ),__STRING1_SP),func_chr( 241 )),__STRING1_SP)))))||new_error){ if(qbevent){evnt(18700);if(r)goto S_22008;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 241 ),__STRING1_SP),qbs_new_txt_len("{",1)),__STRING1_SP),FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2776= 2 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18701);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18701);}while(r); } S_22012:; 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(18703);if(r)goto S_22012;} 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,&(pass2777= 2 ),_FUNC_FIXOPERATIONORDER_LONG_N)),__STRING1_SP),qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18704);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=*_FUNC_FIXOPERATIONORDER_LONG_N+ 2 ; if(!qbevent)break;evnt(18704);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18713);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(18714);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C= 0 ; if(!qbevent)break;evnt(18715);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 0 ; if(!qbevent)break;evnt(18716);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI= 0 ; if(!qbevent)break;evnt(18716);}while(r); S_22021:; fornext_value2779= 1 ; fornext_finalvalue2779=*_FUNC_FIXOPERATIONORDER_LONG_N; 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_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2779: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2779; if (fornext_step_negative2779){ if (fornext_value2779fornext_finalvalue2779) break; } fornext_error2779:; if(qbevent){evnt(18717);if(r)goto S_22021;} 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(18718);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTC=*_FUNC_FIXOPERATIONORDER_LONG_C; if(!qbevent)break;evnt(18719);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18720);}while(r); S_22025:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(18722);if(r)goto S_22025;} S_22026:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C!= 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_B!= 0 )))||new_error){ if(qbevent){evnt(18723);if(r)goto S_22026;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18723);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(18724);}while(r); do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18725);}while(r); } S_22032:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(18727);if(r)goto S_22032;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(18729);}while(r); S_22034:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18732);if(r)goto S_22034;} S_22035:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))||new_error){ if(qbevent){evnt(18733);if(r)goto S_22035;} S_22036:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTC== 40 ))||new_error){ if(qbevent){evnt(18734);if(r)goto S_22036;} S_22037:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTTI==(*_FUNC_FIXOPERATIONORDER_LONG_I- 2 )))|(-(*_FUNC_FIXOPERATIONORDER_LONG_LASTTI== 0 )))||new_error){ if(qbevent){evnt(18735);if(r)goto S_22037;} S_22038:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTT>= 0 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_LASTT<= 3 )))||new_error){ if(qbevent){evnt(18736);if(r)goto S_22038;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected (",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18737);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18737);}while(r); } } } } } S_22046:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C!= 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_B!= 0 )))||new_error){ if(qbevent){evnt(18744);if(r)goto S_22046;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18744);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18745);}while(r); } S_22051:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(18748);if(r)goto S_22051;} S_22052:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 34 ))||new_error){ if(qbevent){evnt(18759);if(r)goto S_22052;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 1 ; if(!qbevent)break;evnt(18760);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18760);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X2= 1 ; if(!qbevent)break;evnt(18764);}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(18765);}while(r); S_22057:; while((*_FUNC_FIXOPERATIONORDER_LONG_X)||new_error){ if(qbevent){evnt(18766);if(r)goto S_22057;} 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(18767);}while(r); S_22059:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2== 92 ))||new_error){ if(qbevent){evnt(18768);if(r)goto S_22059;} 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(18769);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X2=*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 ; if(!qbevent)break;evnt(18770);}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(18773);}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(18774);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X2=*_FUNC_FIXOPERATIONORDER_LONG_X+ 1 ; if(!qbevent)break;evnt(18775);}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(18777);}while(r); dl_continue_2780:; } dl_exit_2780:; 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(18780);}while(r); S_22070:; if ((*_FUNC_FIXOPERATIONORDER_LONG_X)||new_error){ if(qbevent){evnt(18780);if(r)goto S_22070;} 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(18780);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18781);}while(r); } S_22075:; if (((((-(*_FUNC_FIXOPERATIONORDER_LONG_C>= 48 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_C<= 57 ))))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 45 )))||new_error){ if(qbevent){evnt(18785);if(r)goto S_22075;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 2 ; if(!qbevent)break;evnt(18786);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18786);}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(18788);}while(r); S_22079:; if ((*_FUNC_FIXOPERATIONORDER_LONG_X)||new_error){ if(qbevent){evnt(18789);if(r)goto S_22079;} do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2783= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18790);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2784=*_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(18790);}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(18791);}while(r); } S_22084:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_X== 0 ))||new_error){ if(qbevent){evnt(18794);if(r)goto S_22084;} 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(18795);}while(r); S_22086:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C2< 48 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C2> 57 )))||new_error){ if(qbevent){evnt(18796);if(r)goto S_22086;} do{ *_FUNC_FIXOPERATIONORDER_LONG_X= 1 ; if(!qbevent)break;evnt(18797);}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(18799);}while(r); } } S_22092:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_X== 0 ))||new_error){ if(qbevent){evnt(18804);if(r)goto S_22092;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18805);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18806);}while(r); S_22095:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 45 ))||new_error){ if(qbevent){evnt(18807);if(r)goto S_22095;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18808);}while(r); S_22097:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_lessthan(_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(18809);if(r)goto S_22097;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18809);}while(r); } S_22100:; 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(18810);if(r)goto S_22100;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18810);}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(18812);}while(r); S_22105:; 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(18813);if(r)goto S_22105;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18813);}while(r); } S_22108:; 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(18814);if(r)goto S_22108;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18814);}while(r); } S_22111:; 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(18815);if(r)goto S_22111;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18815);}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(18817);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2797= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18818);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2798=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_F3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18818);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18821);}while(r); } S_22121:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_F2)))||new_error){ if(qbevent){evnt(18825);if(r)goto S_22121;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 3 ; if(!qbevent)break;evnt(18826);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18826);}while(r); S_22124:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FIXOPERATIONORDER_STRING_F2->len> 1 )))||new_error){ if(qbevent){evnt(18827);if(r)goto S_22124;} S_22125:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_FIXOPERATIONORDER_STRING_F2,FUNC_SCASE2(_FUNC_FIXOPERATIONORDER_STRING_F2))))||new_error){ if(qbevent){evnt(18828);if(r)goto S_22125;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,FUNC_SCASE2(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18829);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2800= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18830);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2801=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18831);}while(r); } } S_22131:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F2,func_chr( 241 ))))||new_error){ if(qbevent){evnt(18835);if(r)goto S_22131;} 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(18835);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(18835);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18836);}while(r); } S_22137:; 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(18839);if(r)goto S_22137;} do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTT= 4 ; if(!qbevent)break;evnt(18840);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_LASTTI=*_FUNC_FIXOPERATIONORDER_LONG_I; if(!qbevent)break;evnt(18840);}while(r); S_22140:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I<*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(18842);if(r)goto S_22140;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2802=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18842);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC= 0 ; if(!qbevent)break;evnt(18842);}while(r); } S_22145:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 40 ))||new_error){ if(qbevent){evnt(18845);if(r)goto S_22145;} S_22146:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_LASTC!= 46 ))||new_error){ if(qbevent){evnt(18846);if(r)goto S_22146;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_E,qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18848);}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(18849);}while(r); S_22149:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18850);if(r)goto S_22149;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18850);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHFOUND= 0 ; if(!qbevent)break;evnt(18852);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_HASHNAME,_FUNC_FIXOPERATIONORDER_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18853);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(18854);}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(18855);}while(r); S_22156:; while((*_FUNC_FIXOPERATIONORDER_LONG_HASHRES)||new_error){ if(qbevent){evnt(18856);if(r)goto S_22156;} S_22157:; 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(18857);if(r)goto S_22157;} S_22158:; 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(18858);if(r)goto S_22158;} do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHFOUND= 1 ; if(!qbevent)break;evnt(18859);}while(r); do{ goto dl_exit_2803; if(!qbevent)break;evnt(18860);}while(r); } } S_22163:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(18863);if(r)goto S_22163;} do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_FIXOPERATIONORDER_LONG_HASHRESFLAGS,_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF); if(!qbevent)break;evnt(18863);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(18863);}while(r); } dl_continue_2803:; } dl_exit_2803:; S_22169:; if ((*_FUNC_FIXOPERATIONORDER_LONG_HASHFOUND)||new_error){ if(qbevent){evnt(18866);if(r)goto S_22169;} do{ *_FUNC_FIXOPERATIONORDER_LONG_I2=*_FUNC_FIXOPERATIONORDER_LONG_HASHRESREF; if(!qbevent)break;evnt(18867);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE= 0 ; if(!qbevent)break;evnt(18876);}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(18877);}while(r); S_22173:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18878);if(r)goto S_22173;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18878);}while(r); } S_22176:; while((*_FUNC_FIXOPERATIONORDER_LONG_TRY)||new_error){ if(qbevent){evnt(18879);if(r)goto S_22176;} S_22177:; if ((-(*(int32*)(((char*)__UDT_ID)+(512))== 0 ))||new_error){ if(qbevent){evnt(18880);if(r)goto S_22177;} do{ *_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE= 1 ; if(!qbevent)break;evnt(18880);}while(r); do{ goto dl_exit_2804; if(!qbevent)break;evnt(18880);}while(r); } S_22181:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18881);if(r)goto S_22181;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18881);}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(18881);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY= 0 ; if(!qbevent)break;evnt(18881);}while(r); } S_22187:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18882);if(r)goto S_22187;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18882);}while(r); } dl_continue_2804:; } dl_exit_2804:; S_22191:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE== 0 ))||new_error){ if(qbevent){evnt(18885);if(r)goto S_22191;} S_22192:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FIXOPERATIONORDER_STRING_ES->len== 0 )))||new_error){ if(qbevent){evnt(18886);if(r)goto S_22192;} do{ *_FUNC_FIXOPERATIONORDER_LONG_A=qbs_asc(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18887);}while(r); S_22194:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_A== 95 ))||new_error){ if(qbevent){evnt(18887);if(r)goto S_22194;} do{ *_FUNC_FIXOPERATIONORDER_LONG_A= 91 ; if(!qbevent)break;evnt(18887);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_A=*_FUNC_FIXOPERATIONORDER_LONG_A- 64 ; if(!qbevent)break;evnt(18888);}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(18889);}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(18890);}while(r); S_22200:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18891);if(r)goto S_22200;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18891);}while(r); } S_22203:; while((*_FUNC_FIXOPERATIONORDER_LONG_TRY)||new_error){ if(qbevent){evnt(18892);if(r)goto S_22203;} S_22204:; if ((-(*(int32*)(((char*)__UDT_ID)+(512))== 0 ))||new_error){ if(qbevent){evnt(18893);if(r)goto S_22204;} do{ *_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE= 1 ; if(!qbevent)break;evnt(18893);}while(r); do{ goto dl_exit_2806; if(!qbevent)break;evnt(18893);}while(r); } S_22208:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(18894);if(r)goto S_22208;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(18894);}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(18894);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY= 0 ; if(!qbevent)break;evnt(18894);}while(r); } S_22214:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18895);if(r)goto S_22214;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18895);}while(r); } dl_continue_2806:; } dl_exit_2806:; } } S_22220:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_STATICVARIABLE== 0 ))||new_error){ if(qbevent){evnt(18900);if(r)goto S_22220;} 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(18902);}while(r); S_22222:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18903);if(r)goto S_22222;} S_22223:; 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(18904);if(r)goto S_22223;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18904);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18904);}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(18905);}while(r); }else{ S_22229:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_ES->len))||new_error){ if(qbevent){evnt(18907);if(r)goto S_22229;} do{ *_FUNC_FIXOPERATIONORDER_LONG_ET=FUNC_TYPNAME2TYP(_FUNC_FIXOPERATIONORDER_STRING_ES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18907);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_ET= 0 ; if(!qbevent)break;evnt(18907);}while(r); } S_22234:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18908);if(r)goto S_22234;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18908);}while(r); } S_22237:; if ((*_FUNC_FIXOPERATIONORDER_LONG_ET&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(18909);if(r)goto S_22237;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Type mismatch",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18909);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(18909);}while(r); } S_22241:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(18911);if(r)goto S_22241;} 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(18912);}while(r); do{ *_FUNC_FIXOPERATIONORDER_INTEGER64_V=qbr(*_FUNC_FIXOPERATIONORDER_FLOAT_V); if(!qbevent)break;evnt(18913);}while(r); do{ *_FUNC_FIXOPERATIONORDER_UINTEGER64_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18914);}while(r); }else{ S_22246:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(18916);if(r)goto S_22246;} 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(18917);}while(r); do{ *_FUNC_FIXOPERATIONORDER_INTEGER64_V=*_FUNC_FIXOPERATIONORDER_UINTEGER64_V; if(!qbevent)break;evnt(18918);}while(r); do{ *_FUNC_FIXOPERATIONORDER_FLOAT_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18919);}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(18921);}while(r); do{ *_FUNC_FIXOPERATIONORDER_FLOAT_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18922);}while(r); do{ *_FUNC_FIXOPERATIONORDER_UINTEGER64_V=*_FUNC_FIXOPERATIONORDER_INTEGER64_V; if(!qbevent)break;evnt(18923);}while(r); } } S_22256:; if ((*_FUNC_FIXOPERATIONORDER_LONG_ET)||new_error){ if(qbevent){evnt(18927);if(r)goto S_22256;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T=*_FUNC_FIXOPERATIONORDER_LONG_ET; if(!qbevent)break;evnt(18927);}while(r); } S_22259:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(18930);if(r)goto S_22259;} 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(18931);}while(r); }else{ S_22262:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(18933);if(r)goto S_22262;} 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(18934);}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(18936);}while(r); } } S_22268:; if ((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(18941);if(r)goto S_22268;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T2=*_FUNC_FIXOPERATIONORDER_LONG_T& 511 ; if(!qbevent)break;evnt(18942);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18944);}while(r); S_22271:; 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(18945);if(r)goto S_22271;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("E",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18945);}while(r); } S_22274:; 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(18946);if(r)goto S_22274;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("D",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18946);}while(r); } S_22277:; 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(18947);if(r)goto S_22277;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("F",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18947);}while(r); } S_22280:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_S->len))||new_error){ if(qbevent){evnt(18948);if(r)goto S_22280;} 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(18950);}while(r); S_22282:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 32 ))||new_error){ if(qbevent){evnt(18952);if(r)goto S_22282;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("E",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18952);}while(r); } S_22285:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 64 ))||new_error){ if(qbevent){evnt(18953);if(r)goto S_22285;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("D",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18953);}while(r); } S_22288:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 256 ))||new_error){ if(qbevent){evnt(18954);if(r)goto S_22288;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_S,qbs_new_txt_len("F",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18954);}while(r); } do{ sub_mid(_FUNC_FIXOPERATIONORDER_STRING_E,*_FUNC_FIXOPERATIONORDER_LONG_X, 1 ,_FUNC_FIXOPERATIONORDER_STRING_S,1); if(!qbevent)break;evnt(18955);}while(r); S_22292:; 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(18956);if(r)goto S_22292;} 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(18956);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_X=*_FUNC_FIXOPERATIONORDER_LONG_X+ 2 ; if(!qbevent)break;evnt(18956);}while(r); } S_22296:; 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(18957);if(r)goto S_22296;} 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(18957);}while(r); } S_22299:; 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(18958);if(r)goto S_22299;} 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(18958);}while(r); } S_22302:; 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(18959);if(r)goto S_22302;} 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(18960);}while(r); } }else{ S_22306:; 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(18964);if(r)goto S_22306;} 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(18964);}while(r); } S_22309:; 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(18965);if(r)goto S_22309;} 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(18965);}while(r); } S_22312:; 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(18966);if(r)goto S_22312;} 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(18966);}while(r); } S_22315:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 32 ))||new_error){ if(qbevent){evnt(18967);if(r)goto S_22315;} 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(18967);}while(r); } S_22318:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 64 ))||new_error){ if(qbevent){evnt(18968);if(r)goto S_22318;} 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(18968);}while(r); } S_22321:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_T2== 256 ))||new_error){ if(qbevent){evnt(18969);if(r)goto S_22321;} 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(18969);}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(18972);}while(r); S_22327:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(18973);if(r)goto S_22327;} do{ goto exit_subfunc; if(!qbevent)break;evnt(18973);}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(18974);}while(r); } } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2814= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18979);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2815=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18980);}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(18982);}while(r); do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(18983);}while(r); } } } } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_U,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18993);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18995);}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(18996);}while(r); S_22344:; fornext_value2817= 1 ; fornext_finalvalue2817= 4 ; fornext_step2817= 1 ; if (fornext_step2817<0) fornext_step_negative2817=1; else fornext_step_negative2817=0; if (new_error) goto fornext_error2817; goto fornext_entrylabel2817; while(1){ fornext_value2817=fornext_step2817+(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD); fornext_entrylabel2817: *_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD=fornext_value2817; if (fornext_step_negative2817){ if (fornext_value2817fornext_finalvalue2817) break; } fornext_error2817:; if(qbevent){evnt(18998);if(r)goto S_22344;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING,_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(18999);}while(r); S_22346:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD== 2 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD== 4 )))||new_error){ if(qbevent){evnt(19000);if(r)goto S_22346;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_DTYP,FUNC_REMOVESYMBOL(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19001);}while(r); S_22348:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_FIXOPERATIONORDER_STRING_DTYP->len== 0 )))||new_error){ if(qbevent){evnt(19002);if(r)goto S_22348;} S_22349:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING)== 0 )))||new_error){ if(qbevent){evnt(19003);if(r)goto S_22349;} S_22350:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISVALIDVARIABLE(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING)))||new_error){ if(qbevent){evnt(19004);if(r)goto S_22350;} S_22351:; 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(19005);if(r)goto S_22351;} do{ *_FUNC_FIXOPERATIONORDER_LONG_V= 27 ; if(!qbevent)break;evnt(19005);}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(19005);}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(19006);}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(19010);}while(r); } } do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19013);}while(r); S_22364:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19014);if(r)goto S_22364;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19014);}while(r); } S_22367:; while((*_FUNC_FIXOPERATIONORDER_LONG_TRY)||new_error){ if(qbevent){evnt(19015);if(r)goto S_22367;} S_22368:; if (((((-(*__LONG_SUBFUNCN==*(int32*)(((char*)__UDT_ID)+(2641))))&(-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD<= 2 ))))|(-(*_FUNC_FIXOPERATIONORDER_LONG_TRY_METHOD>= 3 )))||new_error){ if(qbevent){evnt(19016);if(r)goto S_22368;} S_22369:; if (( 0 )||new_error){ if(qbevent){evnt(19018);if(r)goto S_22369;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2820; 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 skip2820; skip2820: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(19018);}while(r); } S_22372:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND!= 0 )))||new_error){ if(qbevent){evnt(19020);if(r)goto S_22372;} do{ *_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND= 0 ; if(!qbevent)break;evnt(19022);}while(r); S_22374:; if (((-(*(int32*)(((char*)__UDT_ID)+(512))!= 0 ))|(-(*(int16*)(((char*)__UDT_ID)+(544))== 1 )))||new_error){ if(qbevent){evnt(19025);if(r)goto S_22374;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19029);}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(19030);}while(r); S_22377:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19031);if(r)goto S_22377;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19031);}while(r); } S_22380:; if ((*(int16*)(((char*)__UDT_ID)+(548)))||new_error){ if(qbevent){evnt(19032);if(r)goto S_22380;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(FUNC_SCASE(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(19033);}while(r); S_22382:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2),qbs_new_txt_len("UBOUND",6)))|(qbs_equal(qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2),qbs_new_txt_len("LBOUND",6))))))||new_error){ if(qbevent){evnt(19034);if(r)goto S_22382;} do{ *_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND= 2 ; if(!qbevent)break;evnt(19035);}while(r); } }else{ 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(19038);}while(r); } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2821= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19040);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2822=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19041);}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(19042);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B2= 1 ; if(!qbevent)break;evnt(19045);}while(r); S_22392:; fornext_value2824=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ; fornext_finalvalue2824=*_FUNC_FIXOPERATIONORDER_LONG_N; fornext_step2824= 1 ; if (fornext_step2824<0) fornext_step_negative2824=1; else fornext_step_negative2824=0; if (new_error) goto fornext_error2824; goto fornext_entrylabel2824; while(1){ fornext_value2824=fornext_step2824+(*_FUNC_FIXOPERATIONORDER_LONG_I2); fornext_entrylabel2824: *_FUNC_FIXOPERATIONORDER_LONG_I2=fornext_value2824; if (fornext_step_negative2824){ if (fornext_value2824fornext_finalvalue2824) break; } fornext_error2824:; if(qbevent){evnt(19046);if(r)goto S_22392;} 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(19047);}while(r); S_22394:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2== 40 ))||new_error){ if(qbevent){evnt(19048);if(r)goto S_22394;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B2=*_FUNC_FIXOPERATIONORDER_LONG_B2+ 1 ; if(!qbevent)break;evnt(19048);}while(r); } S_22397:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C2== 41 ))||new_error){ if(qbevent){evnt(19049);if(r)goto S_22397;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B2=*_FUNC_FIXOPERATIONORDER_LONG_B2- 1 ; if(!qbevent)break;evnt(19049);}while(r); } S_22400:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B2== 0 ))||new_error){ if(qbevent){evnt(19050);if(r)goto S_22400;} do{ goto fornext_exit_2823; if(!qbevent)break;evnt(19050);}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(19051);}while(r); fornext_continue_2823:; } fornext_exit_2823:; do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I2; if(!qbevent)break;evnt(19055);}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(19057);}while(r); S_22407:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(19060);if(r)goto S_22407;} S_22408:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I<*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(19061);if(r)goto S_22408;} do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2825=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19061);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC= 0 ; if(!qbevent)break;evnt(19061);}while(r); } S_22413:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC== 46 ))||new_error){ if(qbevent){evnt(19062);if(r)goto S_22413;} do{ *_FUNC_FIXOPERATIONORDER_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(19062);}while(r); do{ goto LABEL_FOOUDT; if(!qbevent)break;evnt(19062);}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(19065);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(19066);}while(r); } } S_22422:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 40 ))||new_error){ if(qbevent){evnt(19070);if(r)goto S_22422;} S_22423:; if (((-(*(int32*)(((char*)__UDT_ID)+(536))!= 0 ))|(-(*(int16*)(((char*)__UDT_ID)+(544))== 1 )))||new_error){ if(qbevent){evnt(19071);if(r)goto S_22423;} S_22424:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(19073);if(r)goto S_22424;} S_22425:; if ((*(int16*)(((char*)__UDT_ID)+(548)))||new_error){ if(qbevent){evnt(19078);if(r)goto S_22425;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(FUNC_SCASE(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(19079);}while(r); }else{ 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(19081);}while(r); } S_22430:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19083);if(r)goto S_22430;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19083);}while(r); } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2826= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19084);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2827=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19085);}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(19086);}while(r); S_22436:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 46 ))||new_error){ if(qbevent){evnt(19090);if(r)goto S_22436;} 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(19090);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(19090);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(19091);}while(r); LABEL_FOOUDT:; if(qbevent){evnt(19093);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(19095);}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(19096);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_I=*_FUNC_FIXOPERATIONORDER_LONG_I+ 2 ; if(!qbevent)break;evnt(19097);}while(r); S_22444:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I>*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(19102);if(r)goto S_22444;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected .element",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19102);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19102);}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(19103);}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(19104);}while(r); S_22450:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19105);if(r)goto S_22450;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19105);}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(19106);}while(r); LABEL_FOOUDTNEXTE:; if(qbevent){evnt(19109);r=0;} S_22454:; 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(19110);if(r)goto S_22454;} 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(19115);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2829= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19116);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2830=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19117);}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(19118);}while(r); S_22459:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I==*_FUNC_FIXOPERATIONORDER_LONG_N))||new_error){ if(qbevent){evnt(19120);if(r)goto S_22459;} 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(19120);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(19120);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_NEXTC=qbs_asc(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2831=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19121);}while(r); S_22464:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_NEXTC!= 46 ))||new_error){ if(qbevent){evnt(19122);if(r)goto S_22464;} 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(19122);}while(r); do{ goto LABEL_CLASSDONE_SPECIAL; if(!qbevent)break;evnt(19122);}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(19124);}while(r); S_22469:; if ((-((*_FUNC_FIXOPERATIONORDER_LONG_T&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(19125);if(r)goto S_22469;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid . after element",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19125);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19125);}while(r); } do{ goto LABEL_FOOUDT; if(!qbevent)break;evnt(19126);}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(19131);}while(r); S_22476:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(19132);if(r)goto S_22476;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Element not defined",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19132);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19132);}while(r); } do{ goto LABEL_FOOUDTNEXTE; if(!qbevent)break;evnt(19133);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F3,_FUNC_FIXOPERATIONORDER_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19138);}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(19139);}while(r); S_22484:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19140);if(r)goto S_22484;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19140);}while(r); } S_22487:; if ((*(int16*)(((char*)__UDT_ID)+(548)))||new_error){ if(qbevent){evnt(19141);if(r)goto S_22487;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,qbs_add(FUNC_SCASE(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(19142);}while(r); }else{ 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(19144);}while(r); } do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2832= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19147);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2833=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),qbs_ucase(_FUNC_FIXOPERATIONORDER_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19148);}while(r); do{ goto LABEL_COULDNOTCLASSIFY; if(!qbevent)break;evnt(19149);}while(r); } } } S_22498:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_TRY== 2 ))||new_error){ if(qbevent){evnt(19155);if(r)goto S_22498;} do{ *__INTEGER_FINDANOTHERID= 1 ; if(!qbevent)break;evnt(19155);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY=FUNC_FINDID(_FUNC_FIXOPERATIONORDER_STRING_TRY_STRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19155);}while(r); }else{ do{ *_FUNC_FIXOPERATIONORDER_LONG_TRY= 0 ; if(!qbevent)break;evnt(19155);}while(r); } S_22504:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19156);if(r)goto S_22504;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19156);}while(r); } dl_continue_2819:; } dl_exit_2819:; fornext_continue_2816:; } fornext_exit_2816:; LABEL_COULDNOTCLASSIFY:; if(qbevent){evnt(19159);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(19162);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 0 ; if(!qbevent)break;evnt(19163);}while(r); S_22511:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(19164);if(r)goto S_22511;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19164);}while(r); } S_22514:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_UNSIGNED",9)))|(((qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("UNSIGNED",8)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(19165);if(r)goto S_22514;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19165);}while(r); } S_22517:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_BIT",4)))|(((qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("BIT",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(19166);if(r)goto S_22517;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19166);}while(r); } S_22520:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_BYTE",5)))|(((qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("BYTE",4)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(19167);if(r)goto S_22520;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19167);}while(r); } S_22523:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("INTEGER",7))))||new_error){ if(qbevent){evnt(19168);if(r)goto S_22523;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19168);}while(r); } S_22526:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("LONG",4))))||new_error){ if(qbevent){evnt(19169);if(r)goto S_22526;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19169);}while(r); } S_22529:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_INTEGER64",10)))|(((qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("INTEGER64",9)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(19170);if(r)goto S_22529;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19170);}while(r); } S_22532:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(19171);if(r)goto S_22532;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19171);}while(r); } S_22535:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(19172);if(r)goto S_22535;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19172);}while(r); } S_22538:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_FLOAT",6)))|(((qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("FLOAT",5)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(19173);if(r)goto S_22538;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19173);}while(r); } S_22541:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("_OFFSET",7)))|(((qbs_equal(_FUNC_FIXOPERATIONORDER_STRING_F3,qbs_new_txt_len("OFFSET",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(19174);if(r)goto S_22541;} do{ *_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE= 1 ; if(!qbevent)break;evnt(19174);}while(r); } S_22544:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_INTERNALTYPE== 1 ))||new_error){ if(qbevent){evnt(19175);if(r)goto S_22544;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_F2,FUNC_SCASE2(_FUNC_FIXOPERATIONORDER_STRING_F3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19176);}while(r); do{ SUB_REMOVEELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_I,_FUNC_FIXOPERATIONORDER_LONG_I,&(pass2834= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19177);}while(r); do{ SUB_INSERTELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2835=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 ),_FUNC_FIXOPERATIONORDER_STRING_F3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19178);}while(r); do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(19179);}while(r); } do{ goto LABEL_CLASSDONE; if(!qbevent)break;evnt(19182);}while(r); } LABEL_CLASSDONE:; if(qbevent){evnt(19185);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(19186);}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(19188);}while(r); LABEL_CLASSDONE_SPECIAL:; if(qbevent){evnt(19189);r=0;} fornext_continue_2778:; } fornext_exit_2778:; S_22556:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_F->len))||new_error){ if(qbevent){evnt(19192);if(r)goto S_22556;} 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(19192);}while(r); } S_22559:; if (( 0 )||new_error){ if(qbevent){evnt(19194);if(r)goto S_22559;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2838; 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 skip2838; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_N)), 1, 0, 1); if (new_error) goto skip2838; skip2838: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(19194);}while(r); } S_22562:; if (( 0 )||new_error){ if(qbevent){evnt(19195);if(r)goto S_22562;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2839; 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 skip2839; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_FIXOPERATIONORDER_LONG_N)), 1, 0, 1); if (new_error) goto skip2839; skip2839: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(19195);}while(r); } do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FF,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19201);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B= 0 ; if(!qbevent)break;evnt(19202);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_B2= 0 ; if(!qbevent)break;evnt(19203);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_P1= 0 ; if(!qbevent)break;evnt(19204);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_AA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19205);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_N=FUNC_NUMELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19206);}while(r); S_22571:; fornext_value2841= 1 ; fornext_finalvalue2841=*_FUNC_FIXOPERATIONORDER_LONG_N; 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_FIXOPERATIONORDER_LONG_I); fornext_entrylabel2841: *_FUNC_FIXOPERATIONORDER_LONG_I=fornext_value2841; if (fornext_step_negative2841){ if (fornext_value2841fornext_finalvalue2841) break; } fornext_error2841:; if(qbevent){evnt(19207);if(r)goto S_22571;} do{ *_FUNC_FIXOPERATIONORDER_LONG_OPENBRACKET= 0 ; if(!qbevent)break;evnt(19209);}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(19211);}while(r); do{ *_FUNC_FIXOPERATIONORDER_LONG_C=qbs_asc(_FUNC_FIXOPERATIONORDER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19213);}while(r); S_22575:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 40 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 123 )))||new_error){ if(qbevent){evnt(19217);if(r)goto S_22575;} do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B+ 1 ; if(!qbevent)break;evnt(19218);}while(r); S_22577:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 1 ))||new_error){ if(qbevent){evnt(19220);if(r)goto S_22577;} do{ *_FUNC_FIXOPERATIONORDER_LONG_P1=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(19225);}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(19226);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_OPENBRACKET= 1 ; if(!qbevent)break;evnt(19230);}while(r); do{ goto LABEL_FOOPASS; if(!qbevent)break;evnt(19232);}while(r); } S_22584:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 44 ))||new_error){ if(qbevent){evnt(19236);if(r)goto S_22584;} S_22585:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 1 ))||new_error){ if(qbevent){evnt(19237);if(r)goto S_22585;} do{ goto LABEL_FOOPASSIT; if(!qbevent)break;evnt(19238);}while(r); } } S_22589:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 41 ))|(-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 )))||new_error){ if(qbevent){evnt(19242);if(r)goto S_22589;} S_22590:; if ((*_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND)||new_error){ if(qbevent){evnt(19243);if(r)goto S_22590;} do{ *_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND=*_FUNC_FIXOPERATIONORDER_BYTE_UBOUNDLBOUND- 1 ; if(!qbevent)break;evnt(19243);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_B=*_FUNC_FIXOPERATIONORDER_LONG_B- 1 ; if(!qbevent)break;evnt(19244);}while(r); S_22594:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(19246);if(r)goto S_22594;} LABEL_FOOPASSIT:; if(qbevent){evnt(19247);r=0;} S_22595:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_P1!=*_FUNC_FIXOPERATIONORDER_LONG_I))||new_error){ if(qbevent){evnt(19248);if(r)goto S_22595;} do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FOO,FUNC_FIXOPERATIONORDER(FUNC_GETELEMENTS(_FUNC_FIXOPERATIONORDER_STRING_A,_FUNC_FIXOPERATIONORDER_LONG_P1,&(pass2842=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19249);}while(r); S_22597:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19250);if(r)goto S_22597;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19250);}while(r); } S_22600:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_FOO->len))||new_error){ if(qbevent){evnt(19251);if(r)goto S_22600;} 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(19252);}while(r); S_22602:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 125 ))||new_error){ if(qbevent){evnt(19253);if(r)goto S_22602;} 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(19253);}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(19253);}while(r); } } } S_22609:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 44 ))||new_error){ if(qbevent){evnt(19256);if(r)goto S_22609;} 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(19256);}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(19256);}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(19256);}while(r); } do{ *_FUNC_FIXOPERATIONORDER_LONG_P1=*_FUNC_FIXOPERATIONORDER_LONG_I+ 1 ; if(!qbevent)break;evnt(19257);}while(r); } do{ goto LABEL_FOOPASS; if(!qbevent)break;evnt(19260);}while(r); } S_22619:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_B== 0 ))||new_error){ if(qbevent){evnt(19266);if(r)goto S_22619;} 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(19266);}while(r); } LABEL_FOOPASS:; if(qbevent){evnt(19269);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(19271);}while(r); S_22623:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(19272);if(r)goto S_22623;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19272);}while(r); } S_22626:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_F2->len))||new_error){ if(qbevent){evnt(19273);if(r)goto S_22626;} S_22627:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_C== 46 ))||new_error){ if(qbevent){evnt(19276);if(r)goto S_22627;} S_22628:; if (((-(*_FUNC_FIXOPERATIONORDER_LONG_I> 1 ))&(-(*_FUNC_FIXOPERATIONORDER_LONG_I<*_FUNC_FIXOPERATIONORDER_LONG_N)))||new_error){ if(qbevent){evnt(19277);if(r)goto S_22628;} S_22629:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_FF->len))||new_error){ if(qbevent){evnt(19278);if(r)goto S_22629;} do{ sub_mid(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_FF->len, 1 ,__STRING1_SP2,1); if(!qbevent)break;evnt(19278);}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(19279);}while(r); do{ goto LABEL_FOOLOOPNXT; if(!qbevent)break;evnt(19280);}while(r); } } S_22636:; if ((*_FUNC_FIXOPERATIONORDER_LONG_OPENBRACKET)||new_error){ if(qbevent){evnt(19285);if(r)goto S_22636;} S_22637:; if ((-(*_FUNC_FIXOPERATIONORDER_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(19288);if(r)goto S_22637;} S_22638:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(FUNC_GETELEMENT(_FUNC_FIXOPERATIONORDER_STRING_A,&(pass2847=*_FUNC_FIXOPERATIONORDER_LONG_I- 1 )))== 0 )))||new_error){ if(qbevent){evnt(19289);if(r)goto S_22638;} do{ sub_mid(_FUNC_FIXOPERATIONORDER_STRING_FF,_FUNC_FIXOPERATIONORDER_STRING_FF->len, 1 ,__STRING1_SP2,1); if(!qbevent)break;evnt(19290);}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(19293);}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(19295);}while(r); } } LABEL_FOOLOOPNXT:; if(qbevent){evnt(19300);r=0;} fornext_continue_2840:; } fornext_exit_2840:; S_22648:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_AA->len))||new_error){ if(qbevent){evnt(19304);if(r)goto S_22648;} 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(19304);}while(r); } S_22651:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_FIXOPERATIONORDER_STRING_FF->len))||new_error){ if(qbevent){evnt(19305);if(r)goto S_22651;} 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(19305);}while(r); } S_22654:; if (( 0 )||new_error){ if(qbevent){evnt(19307);if(r)goto S_22654;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2853; 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 skip2853; skip2853: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(19307);}while(r); } S_22657:; if (( 0 )||new_error){ if(qbevent){evnt(19308);if(r)goto S_22657;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2854; 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 skip2854; skip2854: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(19308);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_FUNC_FIXOPERATIONORDER_STRING_FF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19309);}while(r); do{ qbs_set(_FUNC_FIXOPERATIONORDER_STRING_FIXOPERATIONORDER,_FUNC_FIXOPERATIONORDER_STRING_AA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19310);}while(r); do{ *__LONG_FOOINDWEL=*__LONG_FOOINDWEL- 1 ; if(!qbevent)break;evnt(19312);}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; 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 "data20.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_A,_FUNC_GETELEMENTSPECIAL_STRING_SAVEA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19319);}while(r); S_22664:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETELEMENTSPECIAL_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19320);if(r)goto S_22664;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19320);}while(r); } do{ *_FUNC_GETELEMENTSPECIAL_LONG_N= 1 ; if(!qbevent)break;evnt(19322);}while(r); do{ *_FUNC_GETELEMENTSPECIAL_LONG_P= 1 ; if(!qbevent)break;evnt(19323);}while(r); LABEL_GETELEMENTSPECIALNEXT:; if(qbevent){evnt(19324);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(19325);}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(19328);}while(r); S_22671:; if (((-(*_FUNC_GETELEMENTSPECIAL_LONG_I2<*_FUNC_GETELEMENTSPECIAL_LONG_I))&(-(*_FUNC_GETELEMENTSPECIAL_LONG_I2!= 0 )))||new_error){ if(qbevent){evnt(19329);if(r)goto S_22671;} 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(19330);}while(r); S_22673:; if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_I3== 0 ))||new_error){ if(qbevent){evnt(19330);if(r)goto S_22673;} 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(19330);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19330);}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(19331);}while(r); } S_22679:; if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_ELENUM==*_FUNC_GETELEMENTSPECIAL_LONG_N))||new_error){ if(qbevent){evnt(19334);if(r)goto S_22679;} S_22680:; if ((*_FUNC_GETELEMENTSPECIAL_LONG_I)||new_error){ if(qbevent){evnt(19335);if(r)goto S_22680;} 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(19336);}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(19338);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(19340);}while(r); } S_22687:; if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_I== 0 ))||new_error){ if(qbevent){evnt(19343);if(r)goto S_22687;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19343);}while(r); } do{ *_FUNC_GETELEMENTSPECIAL_LONG_N=*_FUNC_GETELEMENTSPECIAL_LONG_N+ 1 ; if(!qbevent)break;evnt(19344);}while(r); do{ *_FUNC_GETELEMENTSPECIAL_LONG_P=*_FUNC_GETELEMENTSPECIAL_LONG_I+ 1 ; if(!qbevent)break;evnt(19345);}while(r); do{ goto LABEL_GETELEMENTSPECIALNEXT; if(!qbevent)break;evnt(19346);}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; 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 "data21.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_22693:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETELEMENT_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19352);if(r)goto S_22693;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19352);}while(r); } do{ *_FUNC_GETELEMENT_LONG_N= 1 ; if(!qbevent)break;evnt(19354);}while(r); do{ *_FUNC_GETELEMENT_LONG_P= 1 ; if(!qbevent)break;evnt(19355);}while(r); LABEL_GETELEMENTNEXT:; if(qbevent){evnt(19356);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(19357);}while(r); S_22699:; if ((-(*_FUNC_GETELEMENT_LONG_ELENUM==*_FUNC_GETELEMENT_LONG_N))||new_error){ if(qbevent){evnt(19359);if(r)goto S_22699;} S_22700:; if ((*_FUNC_GETELEMENT_LONG_I)||new_error){ if(qbevent){evnt(19360);if(r)goto S_22700;} 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(19361);}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(19363);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(19365);}while(r); } S_22707:; if ((-(*_FUNC_GETELEMENT_LONG_I== 0 ))||new_error){ if(qbevent){evnt(19368);if(r)goto S_22707;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19368);}while(r); } do{ *_FUNC_GETELEMENT_LONG_N=*_FUNC_GETELEMENT_LONG_N+ 1 ; if(!qbevent)break;evnt(19369);}while(r); do{ *_FUNC_GETELEMENT_LONG_P=*_FUNC_GETELEMENT_LONG_I+ 1 ; if(!qbevent)break;evnt(19370);}while(r); do{ goto LABEL_GETELEMENTNEXT; if(!qbevent)break;evnt(19371);}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_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 "data22.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_22713:; if ((-(*_FUNC_GETELEMENTS_LONG_I2<*_FUNC_GETELEMENTS_LONG_I1))||new_error){ if(qbevent){evnt(19375);if(r)goto S_22713;} do{ qbs_set(_FUNC_GETELEMENTS_STRING_GETELEMENTS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19375);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19375);}while(r); } do{ *_FUNC_GETELEMENTS_LONG_N= 1 ; if(!qbevent)break;evnt(19376);}while(r); do{ *_FUNC_GETELEMENTS_LONG_P= 1 ; if(!qbevent)break;evnt(19377);}while(r); LABEL_GETELEMENTSNEXT:; if(qbevent){evnt(19378);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(19379);}while(r); S_22720:; if ((-(*_FUNC_GETELEMENTS_LONG_N==*_FUNC_GETELEMENTS_LONG_I1))||new_error){ if(qbevent){evnt(19380);if(r)goto S_22720;} do{ *_FUNC_GETELEMENTS_LONG_I1POS=*_FUNC_GETELEMENTS_LONG_P; if(!qbevent)break;evnt(19381);}while(r); } S_22723:; if ((-(*_FUNC_GETELEMENTS_LONG_N==*_FUNC_GETELEMENTS_LONG_I2))||new_error){ if(qbevent){evnt(19383);if(r)goto S_22723;} S_22724:; if ((*_FUNC_GETELEMENTS_LONG_I)||new_error){ if(qbevent){evnt(19384);if(r)goto S_22724;} 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(19385);}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(19387);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(19389);}while(r); } do{ *_FUNC_GETELEMENTS_LONG_N=*_FUNC_GETELEMENTS_LONG_N+ 1 ; if(!qbevent)break;evnt(19391);}while(r); do{ *_FUNC_GETELEMENTS_LONG_P=*_FUNC_GETELEMENTS_LONG_I+ 1 ; if(!qbevent)break;evnt(19392);}while(r); do{ goto LABEL_GETELEMENTSNEXT; if(!qbevent)break;evnt(19393);}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; 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 "data23.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_22734:; if ((-(*_SUB_GETID_LONG_I== -1 ))||new_error){ if(qbevent){evnt(19397);if(r)goto S_22734;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("-1 passed to getid!",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19397);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19397);}while(r); } do{ memcpy((((char*)__UDT_ID)+(0)+ 0),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 0), 256); memcpy((((char*)__UDT_ID)+(0)+ 256),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 256), 256); memcpy((((char*)__UDT_ID)+(0)+ 512),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 512), 4); memcpy((((char*)__UDT_ID)+(0)+ 516),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 516), 2); memcpy((((char*)__UDT_ID)+(0)+ 518),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 518), 2); memcpy((((char*)__UDT_ID)+(0)+ 520),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 520), 8); memcpy((((char*)__UDT_ID)+(0)+ 528),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 528), 8); memcpy((((char*)__UDT_ID)+(0)+ 536),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 536), 4); memcpy((((char*)__UDT_ID)+(0)+ 540),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 540), 4); memcpy((((char*)__UDT_ID)+(0)+ 544),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 544), 2); memcpy((((char*)__UDT_ID)+(0)+ 546),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 546), 2); memcpy((((char*)__UDT_ID)+(0)+ 548),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 548), 2); memcpy((((char*)__UDT_ID)+(0)+ 550),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 550), 256); memcpy((((char*)__UDT_ID)+(0)+ 806),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 806), 2); memcpy((((char*)__UDT_ID)+(0)+ 808),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 808), 1); memcpy((((char*)__UDT_ID)+(0)+ 809),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 809), 2); memcpy((((char*)__UDT_ID)+(0)+ 811),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 811), 2); memcpy((((char*)__UDT_ID)+(0)+ 813),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 813), 400); memcpy((((char*)__UDT_ID)+(0)+ 1213),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1213), 400); memcpy((((char*)__UDT_ID)+(0)+ 1613),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1613), 256); memcpy((((char*)__UDT_ID)+(0)+ 1869),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 1869), 256); memcpy((((char*)__UDT_ID)+(0)+ 2125),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2125), 256); memcpy((((char*)__UDT_ID)+(0)+ 2381),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2381), 4); memcpy((((char*)__UDT_ID)+(0)+ 2385),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2385), 256); memcpy((((char*)__UDT_ID)+(0)+ 2641),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2641), 4); memcpy((((char*)__UDT_ID)+(0)+ 2645),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2645), 2); memcpy((((char*)__UDT_ID)+(0)+ 2647),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2647), 100); memcpy((((char*)__UDT_ID)+(0)+ 2747),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2747), 100); memcpy((((char*)__UDT_ID)+(0)+ 2847),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2847), 4); memcpy((((char*)__UDT_ID)+(0)+ 2851),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2851), 2); memcpy((((char*)__UDT_ID)+(0)+ 2853),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2853), 2); memcpy((((char*)__UDT_ID)+(0)+ 2855),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2855), 4); memcpy((((char*)__UDT_ID)+(0)+ 2859),(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2859), 2); qbs_set(*(qbs**)(((char*)__UDT_ID)+(0)+ 2861), *(qbs**)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_GETID_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)+ 2861)); if(!qbevent)break;evnt(19399);}while(r); do{ *__LONG_CURRENTID=*_SUB_GETID_LONG_I; if(!qbevent)break;evnt(19401);}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_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 "data24.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_22740:; if ((-(*_SUB_INSERTELEMENTS_LONG_I== 0 ))||new_error){ if(qbevent){evnt(19405);if(r)goto S_22740;} S_22741:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_INSERTELEMENTS_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19406);if(r)goto S_22741;} do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A,_SUB_INSERTELEMENTS_STRING_ELEMENTS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19407);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19408);}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(19410);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19411);}while(r); } do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19414);}while(r); do{ *_SUB_INSERTELEMENTS_LONG_N=FUNC_NUMELEMENTS(_SUB_INSERTELEMENTS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19415);}while(r); S_22750:; fornext_value2864= 1 ; fornext_finalvalue2864=*_SUB_INSERTELEMENTS_LONG_N; fornext_step2864= 1 ; if (fornext_step2864<0) fornext_step_negative2864=1; else fornext_step_negative2864=0; if (new_error) goto fornext_error2864; goto fornext_entrylabel2864; while(1){ fornext_value2864=fornext_step2864+(*_SUB_INSERTELEMENTS_LONG_I2); fornext_entrylabel2864: *_SUB_INSERTELEMENTS_LONG_I2=fornext_value2864; if (fornext_step_negative2864){ if (fornext_value2864fornext_finalvalue2864) break; } fornext_error2864:; if(qbevent){evnt(19420);if(r)goto S_22750;} S_22751:; if ((-(*_SUB_INSERTELEMENTS_LONG_I2> 1 ))||new_error){ if(qbevent){evnt(19421);if(r)goto S_22751;} 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(19421);}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(19422);}while(r); S_22755:; if ((-(*_SUB_INSERTELEMENTS_LONG_I==*_SUB_INSERTELEMENTS_LONG_I2))||new_error){ if(qbevent){evnt(19423);if(r)goto S_22755;} 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(19423);}while(r); } fornext_continue_2863:; } fornext_exit_2863:; do{ qbs_set(_SUB_INSERTELEMENTS_STRING_A,_SUB_INSERTELEMENTS_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19426);}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_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 "data25.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_ISOPERATOR_STRING_A,qbs_ucase(_FUNC_ISOPERATOR_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19431);}while(r); do{ *_FUNC_ISOPERATOR_LONG_L= 0 ; if(!qbevent)break;evnt(19432);}while(r); do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19433);}while(r); S_22763:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(19433);if(r)goto S_22763;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19433);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19434);}while(r); S_22767:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(19434);if(r)goto S_22767;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19434);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19435);}while(r); S_22771:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(19435);if(r)goto S_22771;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19435);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19436);}while(r); S_22775:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(19436);if(r)goto S_22775;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19436);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19437);}while(r); S_22779:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(19437);if(r)goto S_22779;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19437);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19438);}while(r); S_22783:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(19438);if(r)goto S_22783;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19438);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19439);}while(r); S_22787:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(19440);if(r)goto S_22787;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19440);}while(r); } S_22790:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(19441);if(r)goto S_22790;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19441);}while(r); } S_22793:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(19442);if(r)goto S_22793;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19442);}while(r); } S_22796:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(19443);if(r)goto S_22796;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19443);}while(r); } S_22799:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(19444);if(r)goto S_22799;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19444);}while(r); } S_22802:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(19445);if(r)goto S_22802;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19445);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19446);}while(r); S_22806:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(19447);if(r)goto S_22806;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19447);}while(r); } S_22809:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(19448);if(r)goto S_22809;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19448);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19449);}while(r); S_22813:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(19449);if(r)goto S_22813;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19449);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19450);}while(r); S_22817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(19450);if(r)goto S_22817;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19450);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19451);}while(r); S_22821:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(19452);if(r)goto S_22821;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19452);}while(r); } S_22824:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(19453);if(r)goto S_22824;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19453);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19455);}while(r); S_22828:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,func_chr( 241 ))))||new_error){ if(qbevent){evnt(19455);if(r)goto S_22828;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19455);}while(r); } do{ *_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ; if(!qbevent)break;evnt(19456);}while(r); S_22832:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(19456);if(r)goto S_22832;} do{ goto LABEL_OPFOUND; if(!qbevent)break;evnt(19456);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(19457);}while(r); LABEL_OPFOUND:; if(qbevent){evnt(19458);r=0;} do{ *_FUNC_ISOPERATOR_LONG_ISOPERATOR=*_FUNC_ISOPERATOR_LONG_L; if(!qbevent)break;evnt(19459);}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_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 "data26.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_22837:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ISUINTEGER_STRING_I->len== 0 )))||new_error){ if(qbevent){evnt(19463);if(r)goto S_22837;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19463);}while(r); } S_22840:; 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(19464);if(r)goto S_22840;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19464);}while(r); } S_22843:; fornext_value2870= 1 ; fornext_finalvalue2870=_FUNC_ISUINTEGER_STRING_I->len; fornext_step2870= 1 ; if (fornext_step2870<0) fornext_step_negative2870=1; else fornext_step_negative2870=0; if (new_error) goto fornext_error2870; goto fornext_entrylabel2870; while(1){ fornext_value2870=fornext_step2870+(*_FUNC_ISUINTEGER_LONG_C); fornext_entrylabel2870: *_FUNC_ISUINTEGER_LONG_C=fornext_value2870; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2870){ if (fornext_value2870fornext_finalvalue2870) break; } fornext_error2870:; if(qbevent){evnt(19465);if(r)goto S_22843;} 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(19466);}while(r); S_22845:; if (((-(*_FUNC_ISUINTEGER_LONG_V< 48 ))|(-(*_FUNC_ISUINTEGER_LONG_V> 57 )))||new_error){ if(qbevent){evnt(19467);if(r)goto S_22845;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19467);}while(r); } fornext_continue_2869:; } fornext_exit_2869:; do{ *_FUNC_ISUINTEGER_LONG_ISUINTEGER= -1 ; if(!qbevent)break;evnt(19469);}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free26.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 "data27.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_22850:; fornext_value2874= 1 ; fornext_finalvalue2874=_FUNC_ISVALIDVARIABLE_STRING_A->len; fornext_step2874= 1 ; if (fornext_step2874<0) fornext_step_negative2874=1; else fornext_step_negative2874=0; if (new_error) goto fornext_error2874; goto fornext_entrylabel2874; while(1){ fornext_value2874=fornext_step2874+(*_FUNC_ISVALIDVARIABLE_LONG_I); fornext_entrylabel2874: *_FUNC_ISVALIDVARIABLE_LONG_I=fornext_value2874; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2874){ if (fornext_value2874fornext_finalvalue2874) break; } fornext_error2874:; if(qbevent){evnt(19473);if(r)goto S_22850;} 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(19474);}while(r); do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 0 ; if(!qbevent)break;evnt(19475);}while(r); S_22853:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_C>= 48 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(19476);if(r)goto S_22853;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 1 ; if(!qbevent)break;evnt(19476);}while(r); } S_22856:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_C>= 65 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(19477);if(r)goto S_22856;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 2 ; if(!qbevent)break;evnt(19477);}while(r); } S_22859:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_C>= 97 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_C<= 122 )))||new_error){ if(qbevent){evnt(19478);if(r)goto S_22859;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 2 ; if(!qbevent)break;evnt(19478);}while(r); } S_22862:; if ((-(*_FUNC_ISVALIDVARIABLE_LONG_C== 95 ))||new_error){ if(qbevent){evnt(19479);if(r)goto S_22862;} do{ *_FUNC_ISVALIDVARIABLE_LONG_T= 2 ; if(!qbevent)break;evnt(19479);}while(r); } S_22865:; if (((-(*_FUNC_ISVALIDVARIABLE_LONG_T== 2 ))|(((-(*_FUNC_ISVALIDVARIABLE_LONG_T== 1 ))&(-(*_FUNC_ISVALIDVARIABLE_LONG_I> 1 )))))||new_error){ if(qbevent){evnt(19480);if(r)goto S_22865;} }else{ S_22867:; if ((-(*_FUNC_ISVALIDVARIABLE_LONG_I== 1 ))||new_error){ if(qbevent){evnt(19483);if(r)goto S_22867;} do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 0 ; if(!qbevent)break;evnt(19483);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19483);}while(r); } do{ goto fornext_exit_2873; if(!qbevent)break;evnt(19484);}while(r); } fornext_continue_2873:; } fornext_exit_2873:; do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 1 ; if(!qbevent)break;evnt(19488);}while(r); S_22875:; if ((-(*_FUNC_ISVALIDVARIABLE_LONG_I>*_FUNC_ISVALIDVARIABLE_LONG_N))||new_error){ if(qbevent){evnt(19489);if(r)goto S_22875;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19489);}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(19490);}while(r); S_22879:; 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(19491);if(r)goto S_22879;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19491);}while(r); } S_22882:; 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(19492);if(r)goto S_22882;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19492);}while(r); } S_22885:; 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(19493);if(r)goto S_22885;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19493);}while(r); } S_22888:; 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(19494);if(r)goto S_22888;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19494);}while(r); } S_22891:; 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(19495);if(r)goto S_22891;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19495);}while(r); } S_22894:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(19496);if(r)goto S_22894;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19496);}while(r); } S_22897:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISVALIDVARIABLE_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19497);if(r)goto S_22897;} do{ goto exit_subfunc; if(!qbevent)break;evnt(19497);}while(r); } S_22900:; 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(19498);if(r)goto S_22900;} do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 0 ; if(!qbevent)break;evnt(19498);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19498);}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(19499);}while(r); S_22905:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(_FUNC_ISVALIDVARIABLE_STRING_E)))||new_error){ if(qbevent){evnt(19500);if(r)goto S_22905;} do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 1 ; if(!qbevent)break;evnt(19500);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19500);}while(r); } do{ *_FUNC_ISVALIDVARIABLE_LONG_ISVALIDVARIABLE= 0 ; if(!qbevent)break;evnt(19501);}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; 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 "data28.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_LINEFORMAT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19508);}while(r); do{ *__LONG_LINECONTINUATION= 0 ; if(!qbevent)break;evnt(19509);}while(r); LABEL_CONTINUELINE:; if(qbevent){evnt(19511);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(19513);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_CA,_FUNC_LINEFORMAT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19515);}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(19516);}while(r); do{ *_FUNC_LINEFORMAT_LONG_N=_FUNC_LINEFORMAT_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19518);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I= 1 ; if(!qbevent)break;evnt(19519);}while(r); LABEL_LINEFORMATNEXT:; if(qbevent){evnt(19520);r=0;} S_22917:; if ((-(*_FUNC_LINEFORMAT_LONG_I>=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19521);if(r)goto S_22917;} do{ goto LABEL_LINEFORMATDONE; if(!qbevent)break;evnt(19521);}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(19523);}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(19524);}while(r); S_22922:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 34 ))||new_error){ if(qbevent){evnt(19527);if(r)goto S_22922;} 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(19528);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19529);}while(r); S_22925:; fornext_value2881=*_FUNC_LINEFORMAT_LONG_I+ 1 ; fornext_finalvalue2881=*_FUNC_LINEFORMAT_LONG_N- 2 ; 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_LINEFORMAT_LONG_I2); fornext_entrylabel2881: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2881; if (fornext_step_negative2881){ if (fornext_value2881fornext_finalvalue2881) break; } fornext_error2881:; if(qbevent){evnt(19530);if(r)goto S_22925;} 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(19531);}while(r); S_22927:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 34 ))||new_error){ if(qbevent){evnt(19533);if(r)goto S_22927;} 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(&(pass2882=*_FUNC_LINEFORMAT_LONG_I2-(*_FUNC_LINEFORMAT_LONG_I+ 1 ))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19534);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I2+ 1 ; if(!qbevent)break;evnt(19535);}while(r); do{ goto fornext_exit_2880; if(!qbevent)break;evnt(19536);}while(r); } S_22932:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 92 ))||new_error){ if(qbevent){evnt(19539);if(r)goto S_22932;} 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(19540);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I2+ 1 ; if(!qbevent)break;evnt(19541);}while(r); } S_22936:; if (((-(*_FUNC_LINEFORMAT_LONG_C2< 32 ))|(-(*_FUNC_LINEFORMAT_LONG_C2> 126 )))||new_error){ if(qbevent){evnt(19544);if(r)goto S_22936;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_O,func_oct(*_FUNC_LINEFORMAT_LONG_C2,32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19545);}while(r); S_22938:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_O->len< 3 )))||new_error){ if(qbevent){evnt(19546);if(r)goto S_22938;} 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(19547);}while(r); S_22940:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_O->len< 3 )))||new_error){ if(qbevent){evnt(19548);if(r)goto S_22940;} 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(19548);}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(19550);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I2+ 1 ; if(!qbevent)break;evnt(19551);}while(r); } fornext_continue_2880:; } fornext_exit_2880:; S_22948:; if ((-(*_FUNC_LINEFORMAT_LONG_I2==(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19556);if(r)goto S_22948;} 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(&(pass2885=(*_FUNC_LINEFORMAT_LONG_N- 2 )-(*_FUNC_LINEFORMAT_LONG_I+ 1 )+ 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19557);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_N- 1 ; if(!qbevent)break;evnt(19558);}while(r); } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19561);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_FIRSTI=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(19566);}while(r); S_22955:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 46 ))||new_error){ if(qbevent){evnt(19567);if(r)goto S_22955;} 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(19568);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_C2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19568);}while(r); S_22958:; if ((((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 ))))||new_error){ if(qbevent){evnt(19569);if(r)goto S_22958;} do{ goto LABEL_LFNUMBER; if(!qbevent)break;evnt(19569);}while(r); } } S_22962:; if ((((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 ))))||new_error){ if(qbevent){evnt(19571);if(r)goto S_22962;} LABEL_LFNUMBER:; if(qbevent){evnt(19572);r=0;} S_22963:; 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(19575);if(r)goto S_22963;} 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(19576);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_MODE= 0 ; if(!qbevent)break;evnt(19584);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19585);}while(r); do{ *_FUNC_LINEFORMAT_LONG_DP= 0 ; if(!qbevent)break;evnt(19586);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19587);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 0 ; if(!qbevent)break;evnt(19588);}while(r); do{ *_FUNC_LINEFORMAT_LONG_PM= 1 ; if(!qbevent)break;evnt(19589);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_EX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19590);}while(r); LABEL_LFREADNUMBER:; if(qbevent){evnt(19595);r=0;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 0 ; if(!qbevent)break;evnt(19596);}while(r); S_22974:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 46 ))||new_error){ if(qbevent){evnt(19598);if(r)goto S_22974;} S_22975:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 0 ))||new_error){ if(qbevent){evnt(19599);if(r)goto S_22975;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19599);}while(r); do{ *_FUNC_LINEFORMAT_LONG_DP= 1 ; if(!qbevent)break;evnt(19599);}while(r); do{ *_FUNC_LINEFORMAT_LONG_MODE= 1 ; if(!qbevent)break;evnt(19599);}while(r); } } S_22981:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(19602);if(r)goto S_22981;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19603);}while(r); S_22983:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 0 ))||new_error){ if(qbevent){evnt(19604);if(r)goto S_22983;} 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(19604);}while(r); } S_22986:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 1 ))||new_error){ if(qbevent){evnt(19605);if(r)goto S_22986;} 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(19605);}while(r); } S_22989:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 2 ))||new_error){ if(qbevent){evnt(19606);if(r)goto S_22989;} do{ *_FUNC_LINEFORMAT_LONG_MODE= 3 ; if(!qbevent)break;evnt(19606);}while(r); } S_22992:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 3 ))||new_error){ if(qbevent){evnt(19607);if(r)goto S_22992;} 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(19607);}while(r); } } S_22996:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 69 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 68 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 70 )))||new_error){ if(qbevent){evnt(19610);if(r)goto S_22996;} S_22997:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE< 2 ))||new_error){ if(qbevent){evnt(19611);if(r)goto S_22997;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19612);}while(r); S_22999:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 69 ))||new_error){ if(qbevent){evnt(19613);if(r)goto S_22999;} do{ *_FUNC_LINEFORMAT_LONG_ED= 1 ; if(!qbevent)break;evnt(19613);}while(r); } S_23002:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 68 ))||new_error){ if(qbevent){evnt(19614);if(r)goto S_23002;} do{ *_FUNC_LINEFORMAT_LONG_ED= 2 ; if(!qbevent)break;evnt(19614);}while(r); } S_23005:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 70 ))||new_error){ if(qbevent){evnt(19615);if(r)goto S_23005;} do{ *_FUNC_LINEFORMAT_LONG_ED= 3 ; if(!qbevent)break;evnt(19615);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_MODE= 2 ; if(!qbevent)break;evnt(19616);}while(r); } } S_23011:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 43 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 45 )))||new_error){ if(qbevent){evnt(19620);if(r)goto S_23011;} S_23012:; if ((-(*_FUNC_LINEFORMAT_LONG_MODE== 2 ))||new_error){ if(qbevent){evnt(19621);if(r)goto S_23012;} do{ *_FUNC_LINEFORMAT_LONG_VALID= 1 ; if(!qbevent)break;evnt(19622);}while(r); S_23014:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 45 ))||new_error){ if(qbevent){evnt(19623);if(r)goto S_23014;} do{ *_FUNC_LINEFORMAT_LONG_PM= -1 ; if(!qbevent)break;evnt(19623);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_MODE= 3 ; if(!qbevent)break;evnt(19624);}while(r); } } S_23020:; if ((*_FUNC_LINEFORMAT_LONG_VALID)||new_error){ if(qbevent){evnt(19628);if(r)goto S_23020;} S_23021:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19629);if(r)goto S_23021;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19629);}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(19629);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19629);}while(r); do{ goto LABEL_LFREADNUMBER; if(!qbevent)break;evnt(19629);}while(r); } } S_23028:; 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(19635);if(r)goto S_23028;} 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(19635);}while(r); dl_continue_2886:; } dl_exit_2886:; S_23031:; 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(19637);if(r)goto S_23031;} 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(19637);}while(r); dl_continue_2888:; } dl_exit_2888:; S_23034:; 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(19639);if(r)goto S_23034;} 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(19639);}while(r); dl_continue_2890:; } dl_exit_2890:; S_23037:; if (((-(*_FUNC_LINEFORMAT_LONG_DP!= 0 ))|(-(*_FUNC_LINEFORMAT_LONG_ED!= 0 )))||new_error){ if(qbevent){evnt(19641);if(r)goto S_23037;} do{ *_FUNC_LINEFORMAT_LONG_FLOAT= 1 ; if(!qbevent)break;evnt(19641);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_FLOAT= 0 ; if(!qbevent)break;evnt(19641);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_EXTUSED= 1 ; if(!qbevent)break;evnt(19643);}while(r); S_23043:; if ((*_FUNC_LINEFORMAT_LONG_ED)||new_error){ if(qbevent){evnt(19645);if(r)goto S_23043;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19645);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19645);}while(r); } S_23047:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19648);if(r)goto S_23047;} 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(19649);}while(r); S_23049:; 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(19650);if(r)goto S_23049;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19650);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19650);}while(r); } S_23053:; 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(19651);if(r)goto S_23053;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19651);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19651);}while(r); } S_23057:; 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(19652);if(r)goto S_23057;} 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(19652);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19652);}while(r); } } S_23062:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19655);if(r)goto S_23062;} 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(19656);}while(r); S_23064:; 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(19657);if(r)goto S_23064;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19657);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19657);}while(r); } S_23068:; 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(19658);if(r)goto S_23068;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19658);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19658);}while(r); } S_23072:; 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(19659);if(r)goto S_23072;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19659);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19659);}while(r); } S_23076:; 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(19660);if(r)goto S_23076;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19660);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19660);}while(r); } S_23080:; 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(19661);if(r)goto S_23080;} 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(19661);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19661);}while(r); } S_23084:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(19662);if(r)goto S_23084;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19663);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 3 ; if(!qbevent)break;evnt(19664);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19665);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19666);}while(r); } S_23090:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19668);if(r)goto S_23090;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19669);}while(r); do{ goto LABEL_LFFOUNDBITEXT; if(!qbevent)break;evnt(19670);}while(r); } } S_23095:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19674);if(r)goto S_23095;} 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(19675);}while(r); S_23097:; 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(19676);if(r)goto S_23097;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19676);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19676);}while(r); } S_23101:; 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(19677);if(r)goto S_23101;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19677);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19677);}while(r); } S_23105:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(19678);if(r)goto S_23105;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19679);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 1 ; if(!qbevent)break;evnt(19680);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19681);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19682);}while(r); } S_23111:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(19684);if(r)goto S_23111;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19685);}while(r); do{ *_FUNC_LINEFORMAT_LONG_ED= 2 ; if(!qbevent)break;evnt(19686);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19687);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19688);}while(r); } S_23117:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19690);if(r)goto S_23117;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19691);}while(r); LABEL_LFFOUNDBITEXT:; if(qbevent){evnt(19692);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19693);}while(r); S_23120:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19694);if(r)goto S_23120;} 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(19695);}while(r); S_23122:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19696);if(r)goto S_23122;} 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(19697);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19698);}while(r); }else{ do{ goto dl_exit_2892; if(!qbevent)break;evnt(19700);}while(r); } dl_continue_2892:; } dl_exit_2892:; S_23129:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19703);if(r)goto S_23129;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19703);}while(r); } S_23132:; 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(19705);if(r)goto S_23132;} 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(19705);}while(r); dl_continue_2893:; } dl_exit_2893:; 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(19706);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19707);}while(r); } } S_23139:; if ((*_FUNC_LINEFORMAT_LONG_FLOAT)||new_error){ if(qbevent){evnt(19711);if(r)goto S_23139;} S_23140:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19713);if(r)goto S_23140;} do{ *_FUNC_LINEFORMAT_LONG_OFFSET=_FUNC_LINEFORMAT_STRING_WHOLE->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19714);}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(19715);}while(r); }else{ S_23144:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19717);if(r)goto S_23144;} do{ *_FUNC_LINEFORMAT_LONG_OFFSET= -1 ; if(!qbevent)break;evnt(19718);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS=_FUNC_LINEFORMAT_STRING_FRAC->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19719);}while(r); S_23147:; fornext_value2900= 1 ; fornext_finalvalue2900=_FUNC_LINEFORMAT_STRING_FRAC->len; fornext_step2900= 1 ; if (fornext_step2900<0) fornext_step_negative2900=1; else fornext_step_negative2900=0; if (new_error) goto fornext_error2900; goto fornext_entrylabel2900; while(1){ fornext_value2900=fornext_step2900+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2900: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2900; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2900){ if (fornext_value2900fornext_finalvalue2900) break; } fornext_error2900:; if(qbevent){evnt(19720);if(r)goto S_23147;} S_23148:; 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(19721);if(r)goto S_23148;} do{ goto fornext_exit_2899; if(!qbevent)break;evnt(19721);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_OFFSET=*_FUNC_LINEFORMAT_LONG_OFFSET- 1 ; if(!qbevent)break;evnt(19722);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS=*_FUNC_LINEFORMAT_LONG_SIGDIGITS- 1 ; if(!qbevent)break;evnt(19723);}while(r); fornext_continue_2899:; } fornext_exit_2899:; }else{ do{ *_FUNC_LINEFORMAT_LONG_OFFSET= 0 ; if(!qbevent)break;evnt(19727);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SIGDIGITS= 0 ; if(!qbevent)break;evnt(19728);}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(19731);}while(r); S_23160:; if ((-(*_FUNC_LINEFORMAT_LONG_SIGDIGITS<= 7 ))||new_error){ if(qbevent){evnt(19733);if(r)goto S_23160;} S_23161:; if (((-(*_FUNC_LINEFORMAT_LONG_OFFSET<= 38 ))&(-(*_FUNC_LINEFORMAT_LONG_OFFSET>= -38 )))||new_error){ if(qbevent){evnt(19734);if(r)goto S_23161;} S_23162:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== 38 ))||new_error){ if(qbevent){evnt(19735);if(r)goto S_23162;} S_23163:; if ((qbs_cleanup(qbs_tmp_base,qbs_greaterthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("3402823",7))))||new_error){ if(qbevent){evnt(19736);if(r)goto S_23163;} do{ goto LABEL_LFXSINGLE; if(!qbevent)break;evnt(19736);}while(r); } } S_23167:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== -38 ))||new_error){ if(qbevent){evnt(19738);if(r)goto S_23167;} S_23168:; if ((qbs_cleanup(qbs_tmp_base,qbs_lessthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("1175494",7))))||new_error){ if(qbevent){evnt(19739);if(r)goto S_23168;} do{ goto LABEL_LFXSINGLE; if(!qbevent)break;evnt(19739);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_ED= 1 ; if(!qbevent)break;evnt(19741);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19742);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19743);}while(r); } } LABEL_LFXSINGLE:; if(qbevent){evnt(19746);r=0;} S_23177:; if ((-(*_FUNC_LINEFORMAT_LONG_SIGDIGITS<= 16 ))||new_error){ if(qbevent){evnt(19748);if(r)goto S_23177;} S_23178:; if (((-(*_FUNC_LINEFORMAT_LONG_OFFSET<= 308 ))&(-(*_FUNC_LINEFORMAT_LONG_OFFSET>= -308 )))||new_error){ if(qbevent){evnt(19749);if(r)goto S_23178;} S_23179:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== 308 ))||new_error){ if(qbevent){evnt(19750);if(r)goto S_23179;} S_23180:; if ((qbs_cleanup(qbs_tmp_base,qbs_greaterthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("1797693134862315",16))))||new_error){ if(qbevent){evnt(19751);if(r)goto S_23180;} do{ goto LABEL_LFXDOUBLE; if(!qbevent)break;evnt(19751);}while(r); } } S_23184:; if ((-(*_FUNC_LINEFORMAT_LONG_OFFSET== -308 ))||new_error){ if(qbevent){evnt(19753);if(r)goto S_23184;} S_23185:; if ((qbs_cleanup(qbs_tmp_base,qbs_lessthan(_FUNC_LINEFORMAT_STRING_SIGDIG,qbs_new_txt_len("2225073858507201",16))))||new_error){ if(qbevent){evnt(19754);if(r)goto S_23185;} do{ goto LABEL_LFXDOUBLE; if(!qbevent)break;evnt(19754);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_ED= 2 ; if(!qbevent)break;evnt(19756);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19757);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19758);}while(r); } } LABEL_LFXDOUBLE:; if(qbevent){evnt(19761);r=0;} do{ *_FUNC_LINEFORMAT_LONG_ED= 3 ; if(!qbevent)break;evnt(19763);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19764);}while(r); do{ goto LABEL_LFFOUNDEXT; if(!qbevent)break;evnt(19764);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_EXTUSED= 0 ; if(!qbevent)break;evnt(19767);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19768);}while(r); LABEL_LFFOUNDEXT:; if(qbevent){evnt(19769);r=0;} S_23200:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19772);if(r)goto S_23200;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_WHOLE,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19772);}while(r); } S_23203:; if ((*_FUNC_LINEFORMAT_LONG_FLOAT)||new_error){ if(qbevent){evnt(19774);if(r)goto S_23203;} do{ *_FUNC_LINEFORMAT_LONG_DP= 1 ; if(!qbevent)break;evnt(19775);}while(r); S_23205:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19776);if(r)goto S_23205;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_FRAC,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19776);}while(r); } } S_23209:; 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(19779);if(r)goto S_23209;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_EX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19779);}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(19781);}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(19782);}while(r); S_23214:; if ((*_FUNC_LINEFORMAT_LONG_DP)||new_error){ if(qbevent){evnt(19783);if(r)goto S_23214;} 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(19783);}while(r); } S_23217:; if ((*_FUNC_LINEFORMAT_LONG_ED)||new_error){ if(qbevent){evnt(19784);if(r)goto S_23217;} S_23218:; if ((-(*_FUNC_LINEFORMAT_LONG_ED== 1 ))||new_error){ if(qbevent){evnt(19785);if(r)goto S_23218;} 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(19785);}while(r); } S_23221:; if ((-(*_FUNC_LINEFORMAT_LONG_ED== 2 ))||new_error){ if(qbevent){evnt(19786);if(r)goto S_23221;} 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(19786);}while(r); } S_23224:; if ((-(*_FUNC_LINEFORMAT_LONG_ED== 3 ))||new_error){ if(qbevent){evnt(19787);if(r)goto S_23224;} 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(19787);}while(r); } S_23227:; 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(19788);if(r)goto S_23227;} 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(19788);}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(19788);}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(19789);}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(19791);}while(r); S_23235:; if ((*_FUNC_LINEFORMAT_LONG_EXTUSED)||new_error){ if(qbevent){evnt(19793);if(r)goto S_23235;} 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(19793);}while(r); } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19795);}while(r); } S_23240:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(19800);if(r)goto S_23240;} S_23241:; 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(19801);if(r)goto S_23241;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19802);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19803);}while(r); LABEL_LFREADHEX:; if(qbevent){evnt(19804);r=0;} S_23244:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19805);if(r)goto S_23244;} 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(19806);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19806);}while(r); S_23247:; 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(19807);if(r)goto S_23247;} 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(19807);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19807);}while(r); do{ goto LABEL_LFREADHEX; if(!qbevent)break;evnt(19807);}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(19809);}while(r); S_23254:; 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(19812);if(r)goto S_23254;} 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(19812);}while(r); dl_continue_2902:; } dl_exit_2902:; S_23257:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19813);if(r)goto S_23257;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19813);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19815);}while(r); S_23261:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19817);if(r)goto S_23261;} 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(19818);}while(r); S_23263:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(19819);if(r)goto S_23263;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19819);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19819);}while(r); } S_23267:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(19820);if(r)goto S_23267;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19820);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19820);}while(r); } S_23271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(19821);if(r)goto S_23271;} 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(19821);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19821);}while(r); } } S_23276:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19824);if(r)goto S_23276;} 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(19825);}while(r); S_23278:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19826);if(r)goto S_23278;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19826);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19826);}while(r); } S_23282:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(19827);if(r)goto S_23282;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19827);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19827);}while(r); } S_23286:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19828);if(r)goto S_23286;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19828);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19828);}while(r); } S_23290:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(19829);if(r)goto S_23290;} 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(19829);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19829);}while(r); } S_23294:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(19830);if(r)goto S_23294;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19830);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19830);}while(r); } S_23298:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19831);if(r)goto S_23298;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19832);}while(r); do{ goto LABEL_LFHXBITEXT; if(!qbevent)break;evnt(19833);}while(r); } } S_23303:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19837);if(r)goto S_23303;} 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(19838);}while(r); S_23305:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19839);if(r)goto S_23305;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19839);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19839);}while(r); } S_23309:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19840);if(r)goto S_23309;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19840);}while(r); do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19840);}while(r); } S_23313:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19841);if(r)goto S_23313;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19842);}while(r); LABEL_LFHXBITEXT:; if(qbevent){evnt(19843);r=0;} S_23315:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19844);if(r)goto S_23315;} 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(19845);}while(r); S_23317:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19846);if(r)goto S_23317;} 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(19847);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19848);}while(r); }else{ do{ goto dl_exit_2904; if(!qbevent)break;evnt(19850);}while(r); } dl_continue_2904:; } dl_exit_2904:; S_23324:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19853);if(r)goto S_23324;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19853);}while(r); } S_23327:; 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(19855);if(r)goto S_23327;} 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(19855);}while(r); dl_continue_2905:; } dl_exit_2905:; do{ goto LABEL_LFHXEXT; if(!qbevent)break;evnt(19856);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19861);}while(r); S_23334:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 8 )))||new_error){ if(qbevent){evnt(19862);if(r)goto S_23334;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19862);}while(r); } S_23337:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 4 )))||new_error){ if(qbevent){evnt(19863);if(r)goto S_23337;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19863);}while(r); } do{ goto LABEL_LFHXEXT2; if(!qbevent)break;evnt(19864);}while(r); LABEL_LFHXEXT:; if(qbevent){evnt(19865);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(19866);}while(r); LABEL_LFHXEXT2:; if(qbevent){evnt(19867);r=0;} S_23342:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len> 16 )))||new_error){ if(qbevent){evnt(19870);if(r)goto S_23342;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19870);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19870);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V= 0 ; if(!qbevent)break;evnt(19871);}while(r); S_23347:; fornext_value2911= 1 ; fornext_finalvalue2911=_FUNC_LINEFORMAT_STRING_HX->len; fornext_step2911= 1 ; if (fornext_step2911<0) fornext_step_negative2911=1; else fornext_step_negative2911=0; if (new_error) goto fornext_error2911; goto fornext_entrylabel2911; while(1){ fornext_value2911=fornext_step2911+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2911: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2911; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2911){ if (fornext_value2911fornext_finalvalue2911) break; } fornext_error2911:; if(qbevent){evnt(19872);if(r)goto S_23347;} 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(19873);}while(r); S_23349:; if ((-(*_FUNC_LINEFORMAT_LONG_V2<= 57 ))||new_error){ if(qbevent){evnt(19874);if(r)goto S_23349;} do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 48 ; if(!qbevent)break;evnt(19874);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 65 + 10 ; if(!qbevent)break;evnt(19874);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(*_FUNC_LINEFORMAT_UINTEGER64_V* 16 )+*_FUNC_LINEFORMAT_LONG_V2; if(!qbevent)break;evnt(19875);}while(r); fornext_continue_2910:; } fornext_exit_2910:; LABEL_FINISHHEXOCTBIN:; if(qbevent){evnt(19878);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(19879);}while(r); S_23357:; 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(19880);if(r)goto S_23357;} S_23358:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19883);if(r)goto S_23358;} S_23359:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 127 ))||new_error){ if(qbevent){evnt(19884);if(r)goto S_23359;} S_23360:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 255 ))||new_error){ if(qbevent){evnt(19885);if(r)goto S_23360;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); 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{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))& 255 )+ 1 ; if(!qbevent)break;evnt(19886);}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(19887);}while(r); } } S_23368:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19891);if(r)goto S_23368;} S_23369:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 32767 ))||new_error){ if(qbevent){evnt(19892);if(r)goto S_23369;} S_23370:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 65535 ))||new_error){ if(qbevent){evnt(19893);if(r)goto S_23370;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19893);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19893);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))& 65535 )+ 1 ; if(!qbevent)break;evnt(19894);}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(19895);}while(r); } } S_23378:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19899);if(r)goto S_23378;} S_23379:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 2147483647 ))||new_error){ if(qbevent){evnt(19900);if(r)goto S_23379;} S_23380:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 4294967295ll ))||new_error){ if(qbevent){evnt(19901);if(r)goto S_23380;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19901);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19901);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))& 4294967295ll )+ 1 ; if(!qbevent)break;evnt(19902);}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(19903);}while(r); } } S_23388:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19907);if(r)goto S_23388;} S_23389:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V> 9223372036854775807ll ))||new_error){ if(qbevent){evnt(19908);if(r)goto S_23389;} do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(~(*_FUNC_LINEFORMAT_UINTEGER64_V))+ 1 ; if(!qbevent)break;evnt(19910);}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(19911);}while(r); } } S_23394:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19915);if(r)goto S_23394;} do{ *_FUNC_LINEFORMAT_LONG_VBITN=qbr(func_val(_FUNC_LINEFORMAT_STRING_BITN)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19916);}while(r); do{ *_FUNC_LINEFORMAT_UINTEGER64_H= 1 ; if(!qbevent)break;evnt(19917);}while(r); S_23397:; fornext_value2914= 1 ; fornext_finalvalue2914=*_FUNC_LINEFORMAT_LONG_VBITN- 1 ; fornext_step2914= 1 ; if (fornext_step2914<0) fornext_step_negative2914=1; else fornext_step_negative2914=0; if (new_error) goto fornext_error2914; goto fornext_entrylabel2914; while(1){ fornext_value2914=fornext_step2914+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2914: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2914; if (fornext_step_negative2914){ if (fornext_value2914fornext_finalvalue2914) break; } fornext_error2914:; if(qbevent){evnt(19917);if(r)goto S_23397;} do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H* 2 ; if(!qbevent)break;evnt(19917);}while(r); fornext_continue_2913:; } fornext_exit_2913:; do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H- 1 ; if(!qbevent)break;evnt(19917);}while(r); S_23401:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V>*_FUNC_LINEFORMAT_UINTEGER64_H))||new_error){ if(qbevent){evnt(19918);if(r)goto S_23401;} do{ *_FUNC_LINEFORMAT_UINTEGER64_H= 1 ; if(!qbevent)break;evnt(19919);}while(r); S_23403:; fornext_value2916= 1 ; fornext_finalvalue2916=*_FUNC_LINEFORMAT_LONG_VBITN; fornext_step2916= 1 ; if (fornext_step2916<0) fornext_step_negative2916=1; else fornext_step_negative2916=0; if (new_error) goto fornext_error2916; goto fornext_entrylabel2916; while(1){ fornext_value2916=fornext_step2916+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2916: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2916; if (fornext_step_negative2916){ if (fornext_value2916fornext_finalvalue2916) break; } fornext_error2916:; if(qbevent){evnt(19919);if(r)goto S_23403;} do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H* 2 ; if(!qbevent)break;evnt(19919);}while(r); fornext_continue_2915:; } fornext_exit_2915:; do{ *_FUNC_LINEFORMAT_UINTEGER64_H=*_FUNC_LINEFORMAT_UINTEGER64_H- 1 ; if(!qbevent)break;evnt(19919);}while(r); S_23407:; if ((-(*_FUNC_LINEFORMAT_UINTEGER64_V>*_FUNC_LINEFORMAT_UINTEGER64_H))||new_error){ if(qbevent){evnt(19920);if(r)goto S_23407;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19920);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19920);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V=((~(*_FUNC_LINEFORMAT_UINTEGER64_V))&*_FUNC_LINEFORMAT_UINTEGER64_H)+ 1 ; if(!qbevent)break;evnt(19921);}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(19922);}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(19928);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(19930);}while(r); } } S_23420:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(19936);if(r)goto S_23420;} S_23421:; 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(19937);if(r)goto S_23421;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19938);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19940);}while(r); LABEL_LFREADOCT:; if(qbevent){evnt(19941);r=0;} S_23424:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19942);if(r)goto S_23424;} 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(19943);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19943);}while(r); S_23427:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 55 )))||new_error){ if(qbevent){evnt(19944);if(r)goto S_23427;} 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(19944);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19944);}while(r); do{ goto LABEL_LFREADOCT; if(!qbevent)break;evnt(19944);}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(19946);}while(r); S_23434:; 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(19949);if(r)goto S_23434;} 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(19949);}while(r); dl_continue_2917:; } dl_exit_2917:; S_23437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19950);if(r)goto S_23437;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19950);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19952);}while(r); S_23441:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(19954);if(r)goto S_23441;} 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(19955);}while(r); S_23443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(19956);if(r)goto S_23443;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19956);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19956);}while(r); } S_23447:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(19957);if(r)goto S_23447;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(19957);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19957);}while(r); } S_23451:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(19958);if(r)goto S_23451;} 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(19958);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19958);}while(r); } } S_23456:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(19961);if(r)goto S_23456;} 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(19962);}while(r); S_23458:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(19963);if(r)goto S_23458;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19963);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19963);}while(r); } S_23462:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(19964);if(r)goto S_23462;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19964);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19964);}while(r); } S_23466:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(19965);if(r)goto S_23466;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19965);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19965);}while(r); } S_23470:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(19966);if(r)goto S_23470;} 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(19966);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(19966);}while(r); } S_23474:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(19967);if(r)goto S_23474;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19967);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19967);}while(r); } S_23478:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(19968);if(r)goto S_23478;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(19969);}while(r); do{ goto LABEL_LFOTBITEXT; if(!qbevent)break;evnt(19970);}while(r); } } S_23483:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19974);if(r)goto S_23483;} 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(19975);}while(r); S_23485:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(19976);if(r)goto S_23485;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19976);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19976);}while(r); } S_23489:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(19977);if(r)goto S_23489;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19977);}while(r); do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19977);}while(r); } S_23493:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(19978);if(r)goto S_23493;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19979);}while(r); LABEL_LFOTBITEXT:; if(qbevent){evnt(19980);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19981);}while(r); S_23496:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(19982);if(r)goto S_23496;} 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(19983);}while(r); S_23498:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(19984);if(r)goto S_23498;} 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(19985);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(19986);}while(r); }else{ do{ goto dl_exit_2919; if(!qbevent)break;evnt(19988);}while(r); } dl_continue_2919:; } dl_exit_2919:; S_23505:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(19991);if(r)goto S_23505;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19991);}while(r); } S_23508:; 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(19993);if(r)goto S_23508;} 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(19993);}while(r); dl_continue_2920:; } dl_exit_2920:; do{ goto LABEL_LFOTEXT; if(!qbevent)break;evnt(19994);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(19999);}while(r); S_23515:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 11 )))||new_error){ if(qbevent){evnt(20001);if(r)goto S_23515;} S_23516:; 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(20002);if(r)goto S_23516;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20002);}while(r); } } S_23520:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 6 )))||new_error){ if(qbevent){evnt(20005);if(r)goto S_23520;} S_23521:; 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(20006);if(r)goto S_23521;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20006);}while(r); } } do{ goto LABEL_LFOTEXT2; if(!qbevent)break;evnt(20009);}while(r); LABEL_LFOTEXT:; if(qbevent){evnt(20010);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(20011);}while(r); LABEL_LFOTEXT2:; if(qbevent){evnt(20012);r=0;} S_23527:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len> 22 )))||new_error){ if(qbevent){evnt(20016);if(r)goto S_23527;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20016);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20016);}while(r); } S_23531:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len== 22 )))||new_error){ if(qbevent){evnt(20017);if(r)goto S_23531;} S_23532:; 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(20018);if(r)goto S_23532;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20018);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20018);}while(r); } } do{ *_FUNC_LINEFORMAT_UINTEGER64_V= 0 ; if(!qbevent)break;evnt(20021);}while(r); S_23538:; fornext_value2929= 1 ; fornext_finalvalue2929=_FUNC_LINEFORMAT_STRING_HX->len; fornext_step2929= 1 ; if (fornext_step2929<0) fornext_step_negative2929=1; else fornext_step_negative2929=0; if (new_error) goto fornext_error2929; goto fornext_entrylabel2929; while(1){ fornext_value2929=fornext_step2929+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2929: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2929; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2929){ if (fornext_value2929fornext_finalvalue2929) break; } fornext_error2929:; if(qbevent){evnt(20022);if(r)goto S_23538;} 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(20023);}while(r); do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 48 ; if(!qbevent)break;evnt(20024);}while(r); do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(*_FUNC_LINEFORMAT_UINTEGER64_V* 8 )+*_FUNC_LINEFORMAT_LONG_V2; if(!qbevent)break;evnt(20025);}while(r); fornext_continue_2928:; } fornext_exit_2928:; do{ goto LABEL_FINISHHEXOCTBIN; if(!qbevent)break;evnt(20028);}while(r); } } S_23546:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(20034);if(r)goto S_23546;} S_23547:; 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(20035);if(r)goto S_23547;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(20036);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20038);}while(r); LABEL_LFREADBIN:; if(qbevent){evnt(20039);r=0;} S_23550:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20040);if(r)goto S_23550;} 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(20041);}while(r); do{ *_FUNC_LINEFORMAT_LONG_C=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20041);}while(r); S_23553:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 49 )))||new_error){ if(qbevent){evnt(20042);if(r)goto S_23553;} 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(20042);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20042);}while(r); do{ goto LABEL_LFREADBIN; if(!qbevent)break;evnt(20042);}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(20044);}while(r); S_23560:; 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(20047);if(r)goto S_23560;} 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(20047);}while(r); dl_continue_2931:; } dl_exit_2931:; S_23563:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20048);if(r)goto S_23563;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_HX,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20048);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20050);}while(r); S_23567:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 2 )))||new_error){ if(qbevent){evnt(20052);if(r)goto S_23567;} 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(20053);}while(r); S_23569:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(20054);if(r)goto S_23569;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(20054);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20054);}while(r); } S_23573:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(20055);if(r)goto S_23573;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 3 ; if(!qbevent)break;evnt(20055);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20055);}while(r); } S_23577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%&",3))))||new_error){ if(qbevent){evnt(20056);if(r)goto S_23577;} 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(20056);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20056);}while(r); } } S_23582:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=(*_FUNC_LINEFORMAT_LONG_N- 1 )))||new_error){ if(qbevent){evnt(20059);if(r)goto S_23582;} 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(20060);}while(r); S_23584:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(20061);if(r)goto S_23584;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(20061);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20061);}while(r); } S_23588:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(20062);if(r)goto S_23588;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(20062);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20062);}while(r); } S_23592:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(20063);if(r)goto S_23592;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(20063);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20063);}while(r); } S_23596:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(20064);if(r)goto S_23596;} 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(20064);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20064);}while(r); } S_23600:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(20065);if(r)goto S_23600;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(20065);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20065);}while(r); } S_23604:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("~`",2))))||new_error){ if(qbevent){evnt(20066);if(r)goto S_23604;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 2 ; if(!qbevent)break;evnt(20067);}while(r); do{ goto LABEL_LFBIBITEXT; if(!qbevent)break;evnt(20068);}while(r); } } S_23609:; if ((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20074);if(r)goto S_23609;} 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(20075);}while(r); S_23611:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(20076);if(r)goto S_23611;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20076);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20076);}while(r); } S_23615:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(20077);if(r)goto S_23615;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20077);}while(r); do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20077);}while(r); } S_23619:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(20078);if(r)goto S_23619;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20079);}while(r); LABEL_LFBIBITEXT:; if(qbevent){evnt(20080);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20081);}while(r); S_23622:; while((-(*_FUNC_LINEFORMAT_LONG_I<=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20082);if(r)goto S_23622;} 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(20083);}while(r); S_23624:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(20084);if(r)goto S_23624;} 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(20085);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20086);}while(r); }else{ do{ goto dl_exit_2933; if(!qbevent)break;evnt(20088);}while(r); } dl_continue_2933:; } dl_exit_2933:; S_23631:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20091);if(r)goto S_23631;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_BITN,qbs_new_txt_len("1",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20091);}while(r); } S_23634:; 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(20093);if(r)goto S_23634;} 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(20093);}while(r); dl_continue_2934:; } dl_exit_2934:; do{ goto LABEL_LFBIEXT; if(!qbevent)break;evnt(20094);}while(r); } } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20099);}while(r); S_23641:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 32 )))||new_error){ if(qbevent){evnt(20100);if(r)goto S_23641;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20100);}while(r); } S_23644:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len<= 16 )))||new_error){ if(qbevent){evnt(20101);if(r)goto S_23644;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20101);}while(r); } do{ goto LABEL_LFBIEXT2; if(!qbevent)break;evnt(20103);}while(r); LABEL_LFBIEXT:; if(qbevent){evnt(20104);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(20105);}while(r); LABEL_LFBIEXT2:; if(qbevent){evnt(20106);r=0;} S_23649:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_HX->len> 64 )))||new_error){ if(qbevent){evnt(20109);if(r)goto S_23649;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Overflow",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20109);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20109);}while(r); } do{ *_FUNC_LINEFORMAT_UINTEGER64_V= 0 ; if(!qbevent)break;evnt(20111);}while(r); S_23654:; fornext_value2940= 1 ; fornext_finalvalue2940=_FUNC_LINEFORMAT_STRING_HX->len; fornext_step2940= 1 ; if (fornext_step2940<0) fornext_step_negative2940=1; else fornext_step_negative2940=0; if (new_error) goto fornext_error2940; goto fornext_entrylabel2940; while(1){ fornext_value2940=fornext_step2940+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2940: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2940; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2940){ if (fornext_value2940fornext_finalvalue2940) break; } fornext_error2940:; if(qbevent){evnt(20112);if(r)goto S_23654;} 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(20113);}while(r); do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2- 48 ; if(!qbevent)break;evnt(20114);}while(r); do{ *_FUNC_LINEFORMAT_UINTEGER64_V=(*_FUNC_LINEFORMAT_UINTEGER64_V* 2 )+*_FUNC_LINEFORMAT_LONG_V2; if(!qbevent)break;evnt(20115);}while(r); fornext_continue_2939:; } fornext_exit_2939:; do{ goto LABEL_FINISHHEXOCTBIN; if(!qbevent)break;evnt(20118);}while(r); } } S_23662:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 38 ))||new_error){ if(qbevent){evnt(20124);if(r)goto S_23662;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected &H... or &O...",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20124);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20124);}while(r); } S_23666:; if (((((-(*_FUNC_LINEFORMAT_LONG_C>= 65 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 90 ))))|(-(*_FUNC_LINEFORMAT_LONG_C== 95 )))||new_error){ if(qbevent){evnt(20128);if(r)goto S_23666;} S_23667:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 95 ))||new_error){ if(qbevent){evnt(20129);if(r)goto S_23667;} do{ *_FUNC_LINEFORMAT_LONG_P2= 0 ; if(!qbevent)break;evnt(20129);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(20129);}while(r); } S_23672:; fornext_value2943=*_FUNC_LINEFORMAT_LONG_I+ 1 ; fornext_finalvalue2943=*_FUNC_LINEFORMAT_LONG_N; fornext_step2943= 1 ; if (fornext_step2943<0) fornext_step_negative2943=1; else fornext_step_negative2943=0; if (new_error) goto fornext_error2943; goto fornext_entrylabel2943; while(1){ fornext_value2943=fornext_step2943+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2943: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2943; if (fornext_step_negative2943){ if (fornext_value2943fornext_finalvalue2943) break; } fornext_error2943:; if(qbevent){evnt(20130);if(r)goto S_23672;} 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(20131);}while(r); S_23674:; 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(20132);if(r)goto S_23674;} do{ goto fornext_exit_2942; if(!qbevent)break;evnt(20132);}while(r); } S_23677:; if ((-(*_FUNC_LINEFORMAT_LONG_C2!= 95 ))||new_error){ if(qbevent){evnt(20133);if(r)goto S_23677;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I2; if(!qbevent)break;evnt(20133);}while(r); } fornext_continue_2942:; } fornext_exit_2942:; S_23681:; if ((*_FUNC_LINEFORMAT_LONG_P2)||new_error){ if(qbevent){evnt(20135);if(r)goto S_23681;} do{ *_FUNC_LINEFORMAT_LONG_N2=*_FUNC_LINEFORMAT_LONG_P2-*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20137);}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(20138);}while(r); S_23684:; if ((-(*_FUNC_LINEFORMAT_LONG_N2== 3 ))||new_error){ if(qbevent){evnt(20141);if(r)goto S_23684;} S_23685:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A3,qbs_new_txt_len("REM",3))))||new_error){ if(qbevent){evnt(20142);if(r)goto S_23685;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_N2; if(!qbevent)break;evnt(20143);}while(r); S_23687:; if ((-(*_FUNC_LINEFORMAT_LONG_I<*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20144);if(r)goto S_23687;} 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(20145);}while(r); S_23689:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 46 ))||new_error){ if(qbevent){evnt(20146);if(r)goto S_23689;} 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,*_FUNC_LINEFORMAT_LONG_N2,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20146);}while(r); do{ goto LABEL_EXTCHECK; if(!qbevent)break;evnt(20146);}while(r); } } S_23694:; 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(20150);if(r)goto S_23694;} 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(20150);}while(r); } do{ qbs_set(__STRING_LAYOUTCOMMENT,FUNC_SCASE(qbs_new_txt_len("Rem",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20151);}while(r); do{ goto LABEL_COMMENT; if(!qbevent)break;evnt(20152);}while(r); } } S_23701:; if ((-(*_FUNC_LINEFORMAT_LONG_N2== 4 ))||new_error){ if(qbevent){evnt(20157);if(r)goto S_23701;} S_23702:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A3,qbs_new_txt_len("DATA",4))))||new_error){ if(qbevent){evnt(20158);if(r)goto S_23702;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_X,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20159);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_N2; if(!qbevent)break;evnt(20160);}while(r); S_23705:; if ((-(*_FUNC_LINEFORMAT_LONG_I<*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20161);if(r)goto S_23705;} 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(20162);}while(r); S_23707:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 46 ))||new_error){ if(qbevent){evnt(20163);if(r)goto S_23707;} 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,*_FUNC_LINEFORMAT_LONG_N2,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20163);}while(r); do{ goto LABEL_EXTCHECK; if(!qbevent)break;evnt(20163);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_SCAN= 0 ; if(!qbevent)break;evnt(20166);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 0 ; if(!qbevent)break;evnt(20167);}while(r); do{ *_FUNC_LINEFORMAT_LONG_COMMANEXT= 0 ; if(!qbevent)break;evnt(20168);}while(r); do{ *_FUNC_LINEFORMAT_LONG_FINALDATA= 0 ; if(!qbevent)break;evnt(20169);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20170);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1= 0 ; if(!qbevent)break;evnt(20171);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P2= 0 ; if(!qbevent)break;evnt(20172);}while(r); LABEL_NEXTDATACHR:; if(qbevent){evnt(20173);r=0;} S_23719:; if ((-(*_FUNC_LINEFORMAT_LONG_I<*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20174);if(r)goto S_23719;} 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(20175);}while(r); S_23721:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 9 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 32 )))||new_error){ if(qbevent){evnt(20176);if(r)goto S_23721;} S_23722:; if ((-(*_FUNC_LINEFORMAT_LONG_SCAN== 0 ))||new_error){ if(qbevent){evnt(20177);if(r)goto S_23722;} do{ goto LABEL_SKIPWHITESPACE; if(!qbevent)break;evnt(20177);}while(r); } } S_23726:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 58 ))||new_error){ if(qbevent){evnt(20180);if(r)goto S_23726;} S_23727:; if ((-(*_FUNC_LINEFORMAT_LONG_SPEECHMARKS== 0 ))||new_error){ if(qbevent){evnt(20181);if(r)goto S_23727;} do{ *_FUNC_LINEFORMAT_LONG_FINALDATA= 1 ; if(!qbevent)break;evnt(20181);}while(r); do{ goto LABEL_ADDDATA; if(!qbevent)break;evnt(20181);}while(r); } } S_23732:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 44 ))||new_error){ if(qbevent){evnt(20184);if(r)goto S_23732;} S_23733:; if ((-(*_FUNC_LINEFORMAT_LONG_SPEECHMARKS== 0 ))||new_error){ if(qbevent){evnt(20185);if(r)goto S_23733;} LABEL_ADDDATA:; if(qbevent){evnt(20186);r=0;} S_23734:; if ((-(*__LONG_PREPASS== 0 ))||new_error){ if(qbevent){evnt(20187);if(r)goto S_23734;} S_23735:; if ((*_FUNC_LINEFORMAT_LONG_P1)||new_error){ if(qbevent){evnt(20188);if(r)goto S_23735;} 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(20192);}while(r); } S_23738:; if ((*_FUNC_LINEFORMAT_LONG_SPEECHMARKS)||new_error){ if(qbevent){evnt(20195);if(r)goto S_23738;} 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(20197);}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(20201);}while(r); } S_23743:; if ((-(*_FUNC_LINEFORMAT_LONG_FINALDATA== 1 ))||new_error){ if(qbevent){evnt(20203);if(r)goto S_23743;} do{ goto LABEL_FINISHEDDATA; if(!qbevent)break;evnt(20203);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20204);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P1= 0 ; if(!qbevent)break;evnt(20205);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P2= 0 ; if(!qbevent)break;evnt(20206);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 0 ; if(!qbevent)break;evnt(20207);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SCAN= 0 ; if(!qbevent)break;evnt(20208);}while(r); do{ *_FUNC_LINEFORMAT_LONG_COMMANEXT= 0 ; if(!qbevent)break;evnt(20209);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20210);}while(r); do{ goto LABEL_NEXTDATACHR; if(!qbevent)break;evnt(20211);}while(r); } } S_23756:; if ((-(*_FUNC_LINEFORMAT_LONG_COMMANEXT== 1 ))||new_error){ if(qbevent){evnt(20215);if(r)goto S_23756;} S_23757:; if (((-(*_FUNC_LINEFORMAT_LONG_C!= 32 ))&(-(*_FUNC_LINEFORMAT_LONG_C!= 9 )))||new_error){ if(qbevent){evnt(20216);if(r)goto S_23757;} 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(20216);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20216);}while(r); } } S_23762:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 34 ))||new_error){ if(qbevent){evnt(20219);if(r)goto S_23762;} S_23763:; if ((-(*_FUNC_LINEFORMAT_LONG_SPEECHMARKS== 1 ))||new_error){ if(qbevent){evnt(20220);if(r)goto S_23763;} do{ *_FUNC_LINEFORMAT_LONG_COMMANEXT= 1 ; if(!qbevent)break;evnt(20221);}while(r); do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 0 ; if(!qbevent)break;evnt(20222);}while(r); } S_23767:; if ((-(*_FUNC_LINEFORMAT_LONG_SCAN== 0 ))||new_error){ if(qbevent){evnt(20224);if(r)goto S_23767;} do{ *_FUNC_LINEFORMAT_LONG_SPEECHMARKS= 1 ; if(!qbevent)break;evnt(20224);}while(r); } } do{ *_FUNC_LINEFORMAT_LONG_SCAN= 1 ; if(!qbevent)break;evnt(20227);}while(r); S_23772:; if ((-(*_FUNC_LINEFORMAT_LONG_P1== 0 ))||new_error){ if(qbevent){evnt(20229);if(r)goto S_23772;} do{ *_FUNC_LINEFORMAT_LONG_P1=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(20229);}while(r); do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(20229);}while(r); } S_23776:; if (((-(*_FUNC_LINEFORMAT_LONG_C!= 9 ))&(-(*_FUNC_LINEFORMAT_LONG_C!= 32 )))||new_error){ if(qbevent){evnt(20230);if(r)goto S_23776;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I; if(!qbevent)break;evnt(20230);}while(r); } LABEL_SKIPWHITESPACE:; if(qbevent){evnt(20232);r=0;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20233);}while(r); do{ goto LABEL_NEXTDATACHR; if(!qbevent)break;evnt(20233);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_FINALDATA= 1 ; if(!qbevent)break;evnt(20235);}while(r); do{ goto LABEL_ADDDATA; if(!qbevent)break;evnt(20235);}while(r); LABEL_FINISHEDDATA:; if(qbevent){evnt(20236);r=0;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20237);}while(r); S_23785:; if ((-(*__LONG_PREPASS== 0 ))||new_error){ if(qbevent){evnt(20238);if(r)goto S_23785;} do{ SUB_WRITEBUFRAWDATA(&(pass2944=*__LONG_DATABINBUF),_FUNC_LINEFORMAT_STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20239);}while(r); do{ *__LONG_DATAOFFSET=*__LONG_DATAOFFSET+_FUNC_LINEFORMAT_STRING_X->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20240);}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(20242);}while(r); S_23789:; fornext_value2948= 1 ; fornext_finalvalue2948=_FUNC_LINEFORMAT_STRING_X->len- 1 ; fornext_step2948= 1 ; if (fornext_step2948<0) fornext_step_negative2948=1; else fornext_step_negative2948=0; if (new_error) goto fornext_error2948; goto fornext_entrylabel2948; while(1){ fornext_value2948=fornext_step2948+(*_FUNC_LINEFORMAT_LONG_EC); fornext_entrylabel2948: *_FUNC_LINEFORMAT_LONG_EC=fornext_value2948; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2948){ if (fornext_value2948fornext_finalvalue2948) break; } fornext_error2948:; if(qbevent){evnt(20243);if(r)goto S_23789;} 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(20245);}while(r); do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V1/ 16 ; if(!qbevent)break;evnt(20246);}while(r); S_23792:; if ((-(*_FUNC_LINEFORMAT_LONG_V2<= 9 ))||new_error){ if(qbevent){evnt(20246);if(r)goto S_23792;} do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2+ 48 ; if(!qbevent)break;evnt(20246);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_V2=*_FUNC_LINEFORMAT_LONG_V2+ 55 ; if(!qbevent)break;evnt(20246);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_V1=*_FUNC_LINEFORMAT_LONG_V1& 15 ; if(!qbevent)break;evnt(20247);}while(r); S_23798:; if ((-(*_FUNC_LINEFORMAT_LONG_V1<= 9 ))||new_error){ if(qbevent){evnt(20247);if(r)goto S_23798;} do{ *_FUNC_LINEFORMAT_LONG_V1=*_FUNC_LINEFORMAT_LONG_V1+ 48 ; if(!qbevent)break;evnt(20247);}while(r); }else{ do{ *_FUNC_LINEFORMAT_LONG_V1=*_FUNC_LINEFORMAT_LONG_V1+ 55 ; if(!qbevent)break;evnt(20247);}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(20248);}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(20249);}while(r); fornext_continue_2947:; } fornext_exit_2947:; } 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(20254);}while(r); S_23808:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_LINEFORMAT_STRING_E->len))||new_error){ if(qbevent){evnt(20254);if(r)goto S_23808;} 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(20254);}while(r); } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20255);}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(20259);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_N2; if(!qbevent)break;evnt(20260);}while(r); LABEL_EXTCHECK:; if(qbevent){evnt(20263);r=0;} S_23816:; if ((-(*_FUNC_LINEFORMAT_LONG_N2> 40 ))||new_error){ if(qbevent){evnt(20264);if(r)goto S_23816;} 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(20264);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20264);}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(20265);}while(r); do{ *_FUNC_LINEFORMAT_LONG_M= 0 ; if(!qbevent)break;evnt(20266);}while(r); S_23822:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 126 ))||new_error){ if(qbevent){evnt(20267);if(r)goto S_23822;} 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(20268);}while(r); S_23824:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(20269);if(r)goto S_23824;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20269);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20269);}while(r); } S_23828:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(20270);if(r)goto S_23828;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20270);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20270);}while(r); } S_23832:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(20271);if(r)goto S_23832;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20271);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20271);}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(20272);}while(r); S_23837:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(20273);if(r)goto S_23837;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20273);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20273);}while(r); } S_23841:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(20274);if(r)goto S_23841;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20274);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20274);}while(r); } S_23845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(20275);if(r)goto S_23845;} do{ *_FUNC_LINEFORMAT_LONG_M= 1 ; if(!qbevent)break;evnt(20275);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("~`",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20275);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20275);}while(r); } } S_23851:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 37 ))||new_error){ if(qbevent){evnt(20277);if(r)goto S_23851;} 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(20278);}while(r); S_23853:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 37 ))||new_error){ if(qbevent){evnt(20279);if(r)goto S_23853;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20279);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20279);}while(r); } S_23857:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 38 ))||new_error){ if(qbevent){evnt(20280);if(r)goto S_23857;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20280);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20280);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20281);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20281);}while(r); } S_23864:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 38 ))||new_error){ if(qbevent){evnt(20283);if(r)goto S_23864;} 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(20284);}while(r); S_23866:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 38 ))||new_error){ if(qbevent){evnt(20285);if(r)goto S_23866;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20285);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20285);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20286);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20286);}while(r); } S_23873:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 33 ))||new_error){ if(qbevent){evnt(20288);if(r)goto S_23873;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20288);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20288);}while(r); } S_23877:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 35 ))||new_error){ if(qbevent){evnt(20289);if(r)goto S_23877;} 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(20290);}while(r); S_23879:; if ((-(*_FUNC_LINEFORMAT_LONG_C4== 35 ))||new_error){ if(qbevent){evnt(20291);if(r)goto S_23879;} do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20291);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20291);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20292);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20292);}while(r); } S_23886:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 36 ))||new_error){ if(qbevent){evnt(20294);if(r)goto S_23886;} do{ *_FUNC_LINEFORMAT_LONG_M= 1 ; if(!qbevent)break;evnt(20294);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20294);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20294);}while(r); } S_23891:; if ((-(*_FUNC_LINEFORMAT_LONG_C3== 96 ))||new_error){ if(qbevent){evnt(20295);if(r)goto S_23891;} do{ *_FUNC_LINEFORMAT_LONG_M= 1 ; if(!qbevent)break;evnt(20295);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_E2,qbs_new_txt_len("`",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20295);}while(r); do{ goto LABEL_LFGETVE; if(!qbevent)break;evnt(20295);}while(r); } S_23896:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I)== 46 )))||new_error){ if(qbevent){evnt(20299);if(r)goto S_23896;} 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(20300);}while(r); S_23898:; if (((-(*_FUNC_LINEFORMAT_LONG_C2>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C2<= 57 )))||new_error){ if(qbevent){evnt(20301);if(r)goto S_23898;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20303);}while(r); S_23900:; fornext_value2952=*_FUNC_LINEFORMAT_LONG_I+ 2 ; fornext_finalvalue2952=*_FUNC_LINEFORMAT_LONG_N; fornext_step2952= 1 ; if (fornext_step2952<0) fornext_step_negative2952=1; else fornext_step_negative2952=0; if (new_error) goto fornext_error2952; goto fornext_entrylabel2952; while(1){ fornext_value2952=fornext_step2952+(*_FUNC_LINEFORMAT_LONG_I2); fornext_entrylabel2952: *_FUNC_LINEFORMAT_LONG_I2=fornext_value2952; if (fornext_step_negative2952){ if (fornext_value2952fornext_finalvalue2952) break; } fornext_error2952:; if(qbevent){evnt(20304);if(r)goto S_23900;} 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(20305);}while(r); S_23902:; 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(20307);if(r)goto S_23902;} do{ goto fornext_exit_2951; if(!qbevent)break;evnt(20307);}while(r); } S_23905:; if ((-(*_FUNC_LINEFORMAT_LONG_C!= 95 ))||new_error){ if(qbevent){evnt(20308);if(r)goto S_23905;} do{ *_FUNC_LINEFORMAT_LONG_P2=*_FUNC_LINEFORMAT_LONG_I2; if(!qbevent)break;evnt(20308);}while(r); } fornext_continue_2951:; } fornext_exit_2951:; 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(20310);}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(20311);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_P2+ 1 ; if(!qbevent)break;evnt(20312);}while(r); do{ goto LABEL_EXTCHECK; if(!qbevent)break;evnt(20313);}while(r); } } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20317);}while(r); LABEL_LFGETVE:; if(qbevent){evnt(20319);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(20320);}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(20321);}while(r); S_23918:; if ((*_FUNC_LINEFORMAT_LONG_M)||new_error){ if(qbevent){evnt(20322);if(r)goto S_23918;} LABEL_LFGETVD:; if(qbevent){evnt(20323);r=0;} S_23919:; if ((-(*_FUNC_LINEFORMAT_LONG_I<*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20324);if(r)goto S_23919;} 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(20325);}while(r); S_23921:; if (((-(*_FUNC_LINEFORMAT_LONG_C>= 48 ))&(-(*_FUNC_LINEFORMAT_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(20326);if(r)goto S_23921;} 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(20326);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20326);}while(r); do{ goto LABEL_LFGETVD; if(!qbevent)break;evnt(20326);}while(r); } } } do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20330);}while(r); } } S_23931:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 32 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 9 )))||new_error){ if(qbevent){evnt(20337);if(r)goto S_23931;} do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20337);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20337);}while(r); } S_23935:; 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(20341);if(r)goto S_23935;} S_23936:; if (((-(*_FUNC_LINEFORMAT_LONG_C== 60 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 61 ))|(-(*_FUNC_LINEFORMAT_LONG_C== 62 )))||new_error){ if(qbevent){evnt(20342);if(r)goto S_23936;} do{ *_FUNC_LINEFORMAT_LONG_COUNT= 0 ; if(!qbevent)break;evnt(20343);}while(r); S_23938:; do{ if(qbevent){evnt(20344);if(r)goto S_23938;} do{ *_FUNC_LINEFORMAT_LONG_COUNT=*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20345);}while(r); S_23940:; if ((qbs_cleanup(qbs_tmp_base,-((*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT)>=(_FUNC_LINEFORMAT_STRING_A->len- 2 ))))||new_error){ if(qbevent){evnt(20346);if(r)goto S_23940;} do{ goto dl_exit_2954; if(!qbevent)break;evnt(20346);}while(r); } S_23943:; dl_continue_2954:; }while((!(qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT)!= 32 ))))&&(!new_error)); dl_exit_2954:; if(qbevent){evnt(20347);if(r)goto S_23943;} do{ *_FUNC_LINEFORMAT_LONG_C2=qbs_asc(_FUNC_LINEFORMAT_STRING_A,*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20348);}while(r); S_23945:; if ((-(*_FUNC_LINEFORMAT_LONG_C== 60 ))||new_error){ if(qbevent){evnt(20349);if(r)goto S_23945;} S_23946:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 61 ))||new_error){ if(qbevent){evnt(20350);if(r)goto S_23946;} 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(20350);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20350);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20350);}while(r); } S_23951:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 62 ))||new_error){ if(qbevent){evnt(20351);if(r)goto S_23951;} 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(20351);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20351);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20351);}while(r); } S_23956:; }else{ if (-(*_FUNC_LINEFORMAT_LONG_C== 62 )){ if(qbevent){evnt(20352);if(r)goto S_23956;} S_23957:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 61 ))||new_error){ if(qbevent){evnt(20353);if(r)goto S_23957;} 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(20353);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20353);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20353);}while(r); } S_23962:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 60 ))||new_error){ if(qbevent){evnt(20354);if(r)goto S_23962;} 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(20354);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20354);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20354);}while(r); } S_23967:; }else{ if (-(*_FUNC_LINEFORMAT_LONG_C== 61 )){ if(qbevent){evnt(20355);if(r)goto S_23967;} S_23968:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 62 ))||new_error){ if(qbevent){evnt(20356);if(r)goto S_23968;} 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(20356);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20356);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20356);}while(r); } S_23973:; if ((-(*_FUNC_LINEFORMAT_LONG_C2== 60 ))||new_error){ if(qbevent){evnt(20357);if(r)goto S_23973;} 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(20357);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+*_FUNC_LINEFORMAT_LONG_COUNT+ 1 ; if(!qbevent)break;evnt(20357);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20357);}while(r); } } } } } S_23980:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_LINEFORMAT_LONG_C== 36 ))&(_FUNC_LINEFORMAT_STRING_A2->len)))||new_error){ if(qbevent){evnt(20361);if(r)goto S_23980;} do{ goto LABEL_BADUSAGE; if(!qbevent)break;evnt(20361);}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(20364);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20365);}while(r); do{ goto LABEL_LINEFORMATNEXT; if(!qbevent)break;evnt(20366);}while(r); } LABEL_BADUSAGE:; if(qbevent){evnt(20368);r=0;} S_23987:; if ((-(*_FUNC_LINEFORMAT_LONG_C!= 39 ))||new_error){ if(qbevent){evnt(20370);if(r)goto S_23987;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Unexpected character on line",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20370);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20370);}while(r); } do{ qbs_set(__STRING_LAYOUTCOMMENT,qbs_new_txt_len("'",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20373);}while(r); do{ *_FUNC_LINEFORMAT_LONG_I=*_FUNC_LINEFORMAT_LONG_I+ 1 ; if(!qbevent)break;evnt(20374);}while(r); LABEL_COMMENT:; if(qbevent){evnt(20375);r=0;} S_23993:; if ((-(*_FUNC_LINEFORMAT_LONG_I>=*_FUNC_LINEFORMAT_LONG_N))||new_error){ if(qbevent){evnt(20376);if(r)goto S_23993;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20376);}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(20377);}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(20378);}while(r); S_23998:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_C->len== 0 )))||new_error){ if(qbevent){evnt(20379);if(r)goto S_23998;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20379);}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(20380);}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(20382);}while(r); S_24003:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_C->len== 0 )))||new_error){ if(qbevent){evnt(20383);if(r)goto S_24003;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20383);}while(r); } do{ *_FUNC_LINEFORMAT_LONG_AC=qbs_asc(_FUNC_LINEFORMAT_STRING_C); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20384);}while(r); S_24007:; if ((-(*_FUNC_LINEFORMAT_LONG_AC!= 36 ))||new_error){ if(qbevent){evnt(20389);if(r)goto S_24007;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20389);}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(20390);}while(r); do{ *_FUNC_LINEFORMAT_LONG_MEMMODE= 0 ; if(!qbevent)break;evnt(20391);}while(r); do{ *_FUNC_LINEFORMAT_LONG_X= 1 ; if(!qbevent)break;evnt(20392);}while(r); S_24013:; do{ if(qbevent){evnt(20393);if(r)goto S_24013;} S_24014:; 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(20400);if(r)goto S_24014;} do{ *_FUNC_LINEFORMAT_LONG_MEMMODE= 1 ; if(!qbevent)break;evnt(20401);}while(r); S_24016:; }else{ 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)))){ if(qbevent){evnt(20402);if(r)goto S_24016;} do{ *_FUNC_LINEFORMAT_LONG_MEMMODE= 2 ; if(!qbevent)break;evnt(20403);}while(r); S_24018:; }else{ 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)))){ if(qbevent){evnt(20404);if(r)goto S_24018;} S_24019:; fornext_value2964=*_FUNC_LINEFORMAT_LONG_X+ 8 ; fornext_finalvalue2964=_FUNC_LINEFORMAT_STRING_C->len; fornext_step2964= 1 ; if (fornext_step2964<0) fornext_step_negative2964=1; else fornext_step_negative2964=0; if (new_error) goto fornext_error2964; goto fornext_entrylabel2964; while(1){ fornext_value2964=fornext_step2964+(*_FUNC_LINEFORMAT_LONG_XX); fornext_entrylabel2964: *_FUNC_LINEFORMAT_LONG_XX=fornext_value2964; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2964){ if (fornext_value2964fornext_finalvalue2964) break; } fornext_error2964:; if(qbevent){evnt(20407);if(r)goto S_24019;} 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(20408);}while(r); S_24021:; if ((-(*_FUNC_LINEFORMAT_LONG_AC== 58 ))||new_error){ if(qbevent){evnt(20409);if(r)goto S_24021;} do{ goto fornext_exit_2963; if(!qbevent)break;evnt(20409);}while(r); } S_24024:; if (((-(*_FUNC_LINEFORMAT_LONG_AC!= 32 ))&(-(*_FUNC_LINEFORMAT_LONG_AC!= 9 )))||new_error){ if(qbevent){evnt(20410);if(r)goto S_24024;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20410);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20410);}while(r); } fornext_continue_2963:; } fornext_exit_2963:; do{ *_FUNC_LINEFORMAT_LONG_X=*_FUNC_LINEFORMAT_LONG_XX; if(!qbevent)break;evnt(20412);}while(r); S_24030:; fornext_value2967=*_FUNC_LINEFORMAT_LONG_X+ 1 ; fornext_finalvalue2967=_FUNC_LINEFORMAT_STRING_C->len; fornext_step2967= 1 ; if (fornext_step2967<0) fornext_step_negative2967=1; else fornext_step_negative2967=0; if (new_error) goto fornext_error2967; goto fornext_entrylabel2967; while(1){ fornext_value2967=fornext_step2967+(*_FUNC_LINEFORMAT_LONG_XX); fornext_entrylabel2967: *_FUNC_LINEFORMAT_LONG_XX=fornext_value2967; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative2967){ if (fornext_value2967fornext_finalvalue2967) break; } fornext_error2967:; if(qbevent){evnt(20414);if(r)goto S_24030;} 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(20415);}while(r); S_24032:; if ((-(*_FUNC_LINEFORMAT_LONG_AC== 39 ))||new_error){ if(qbevent){evnt(20416);if(r)goto S_24032;} do{ goto fornext_exit_2966; if(!qbevent)break;evnt(20416);}while(r); } S_24035:; if (((-(*_FUNC_LINEFORMAT_LONG_AC!= 32 ))&(-(*_FUNC_LINEFORMAT_LONG_AC!= 9 )))||new_error){ if(qbevent){evnt(20417);if(r)goto S_24035;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20417);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20417);}while(r); } fornext_continue_2966:; } fornext_exit_2966:; do{ *_FUNC_LINEFORMAT_LONG_X=*_FUNC_LINEFORMAT_LONG_XX; if(!qbevent)break;evnt(20419);}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(20420);}while(r); S_24042:; if ((-(*_FUNC_LINEFORMAT_LONG_XX== 0 ))||new_error){ if(qbevent){evnt(20421);if(r)goto S_24042;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20421);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20421);}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(20422);}while(r); S_24047:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_ADDMETAINCLUDE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20423);if(r)goto S_24047;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected $INCLUDE:'filename'",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20423);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20423);}while(r); } } } } do{ *_FUNC_LINEFORMAT_LONG_X=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(20426);}while(r); S_24053:; dl_continue_2962:; }while((-(*_FUNC_LINEFORMAT_LONG_X!= 0 ))&&(!new_error)); dl_exit_2962:; if(qbevent){evnt(20427);if(r)goto S_24053;} S_24054:; if ((-(*_FUNC_LINEFORMAT_LONG_MEMMODE== 1 ))||new_error){ if(qbevent){evnt(20429);if(r)goto S_24054;} do{ *__INTEGER_ADDMETASTATIC= 1 ; if(!qbevent)break;evnt(20429);}while(r); } S_24057:; if ((-(*_FUNC_LINEFORMAT_LONG_MEMMODE== 2 ))||new_error){ if(qbevent){evnt(20430);if(r)goto S_24057;} do{ *__INTEGER_ADDMETADYNAMIC= 1 ; if(!qbevent)break;evnt(20430);}while(r); } do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20432);}while(r); LABEL_LINEFORMATDONE:; if(qbevent){evnt(20436);r=0;} S_24061:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_LINEFORMAT_STRING_A2->len))||new_error){ if(qbevent){evnt(20440);if(r)goto S_24061;} S_24062:; 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(20441);if(r)goto S_24062;} do{ *__LONG_LINECONTINUATION= 1 ; if(!qbevent)break;evnt(20443);}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20444);}while(r); S_24065:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_LINEFORMAT_STRING_A2->len>= 2 )))||new_error){ if(qbevent){evnt(20447);if(r)goto S_24065;} S_24066:; 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(20448);if(r)goto S_24066;} 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(20448);}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(20450);}while(r); S_24071:; if ((*__LONG_INCLEVEL)||new_error){ if(qbevent){evnt(20452);if(r)goto S_24071;} do{ *_FUNC_LINEFORMAT_LONG_FH= 99 +*__LONG_INCLEVEL; if(!qbevent)break;evnt(20453);}while(r); S_24073:; if ((func_eof(*_FUNC_LINEFORMAT_LONG_FH))||new_error){ if(qbevent){evnt(20454);if(r)goto S_24073;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20454);}while(r); } do{ tmp_fileno=*_FUNC_LINEFORMAT_LONG_FH; if (new_error) goto skip2973; sub_file_line_input_string(tmp_fileno,_FUNC_LINEFORMAT_STRING_A); if (new_error) goto skip2973; skip2973: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20455);}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(20456);}while(r); do{ goto LABEL_INCLUDECONT; if(!qbevent)break;evnt(20457);}while(r); } S_24080:; if ((*__LONG_IDEMODE)||new_error){ if(qbevent){evnt(20460);if(r)goto S_24080;} do{ qbs_set(__STRING_IDECOMMAND,func_chr( 100 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20461);}while(r); do{ *_FUNC_LINEFORMAT_LONG_IGNORE=FUNC_IDE(&(pass2974= 0 )); if(!qbevent)break;evnt(20462);}while(r); do{ *__LONG_IDEERROR= 0 ; if(!qbevent)break;evnt(20463);}while(r); do{ qbs_set(_FUNC_LINEFORMAT_STRING_A,__STRING_IDERETURN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20464);}while(r); S_24085:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20465);if(r)goto S_24085;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20465);}while(r); } }else{ do{ qbs_set(_FUNC_LINEFORMAT_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20467);}while(r); S_24090:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_LINEFORMAT_STRING_A,func_chr( 13 ))))||new_error){ if(qbevent){evnt(20468);if(r)goto S_24090;} do{ goto LABEL_LINEFORMATDONE2; if(!qbevent)break;evnt(20468);}while(r); } } do{ *__LONG_LINENUMBER=*__LONG_LINENUMBER+ 1 ; if(!qbevent)break;evnt(20471);}while(r); LABEL_INCLUDECONT:; if(qbevent){evnt(20473);r=0;} do{ *_FUNC_LINEFORMAT_LONG_CONTLINE= 1 ; if(!qbevent)break;evnt(20475);}while(r); do{ goto LABEL_CONTINUELINE; if(!qbevent)break;evnt(20476);}while(r); } } LABEL_LINEFORMATDONE2:; if(qbevent){evnt(20480);r=0;} S_24099:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_LINEFORMAT_STRING_A2, 1 ),__STRING1_SP)))||new_error){ if(qbevent){evnt(20481);if(r)goto S_24099;} 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(20481);}while(r); } S_24102:; 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(20484);if(r)goto S_24102;} 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(20484);}while(r); } S_24105:; if (( 0 )||new_error){ if(qbevent){evnt(20486);if(r)goto S_24105;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2976; 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 skip2976; skip2976: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(20486);}while(r); } S_24108:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(20487);if(r)goto S_24108;} do{ goto exit_subfunc; if(!qbevent)break;evnt(20487);}while(r); } do{ qbs_set(_FUNC_LINEFORMAT_STRING_LINEFORMAT,_FUNC_LINEFORMAT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20488);}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_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 "data29.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_MAKEIDREFER_STRING_REF,FUNC_STR2(__LONG_CURRENTID)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20494);}while(r); do{ *_SUB_MAKEIDREFER_LONG_TYP=*(int32*)(((char*)__UDT_ID)+(536))+*__LONG_ISREFERENCE; if(!qbevent)break;evnt(20495);}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; } 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 "data30.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_24114:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_NUMELEMENTS_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20499);if(r)goto S_24114;} do{ goto exit_subfunc; if(!qbevent)break;evnt(20499);}while(r); } do{ *_FUNC_NUMELEMENTS_LONG_N= 1 ; if(!qbevent)break;evnt(20500);}while(r); do{ *_FUNC_NUMELEMENTS_LONG_P= 1 ; if(!qbevent)break;evnt(20501);}while(r); LABEL_NUMELEMENTSNEXT:; if(qbevent){evnt(20502);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(20503);}while(r); S_24120:; if ((-(*_FUNC_NUMELEMENTS_LONG_I== 0 ))||new_error){ if(qbevent){evnt(20504);if(r)goto S_24120;} do{ *_FUNC_NUMELEMENTS_LONG_NUMELEMENTS=*_FUNC_NUMELEMENTS_LONG_N; if(!qbevent)break;evnt(20504);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20504);}while(r); } do{ *_FUNC_NUMELEMENTS_LONG_N=*_FUNC_NUMELEMENTS_LONG_N+ 1 ; if(!qbevent)break;evnt(20505);}while(r); do{ *_FUNC_NUMELEMENTS_LONG_P=*_FUNC_NUMELEMENTS_LONG_I+ 1 ; if(!qbevent)break;evnt(20506);}while(r); do{ goto LABEL_NUMELEMENTSNEXT; if(!qbevent)break;evnt(20507);}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; 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 "data31.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 7 ; if(!qbevent)break;evnt(20511);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 7 ; if(!qbevent)break;evnt(20511);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 0 ; if(!qbevent)break;evnt(20511);}while(r); S_24130:; if (((*_FUNC_OPERATORUSAGE_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20527);if(r)goto S_24130;} do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 4 ; if(!qbevent)break;evnt(20528);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 4 ; if(!qbevent)break;evnt(20528);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 4 ; if(!qbevent)break;evnt(20529);}while(r); S_24134:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(20530);if(r)goto S_24134;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_add",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20530);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20530);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20530);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 8 ; if(!qbevent)break;evnt(20531);}while(r); S_24140:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(20532);if(r)goto S_24140;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_equal",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20532);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20532);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20532);}while(r); } S_24145:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(20533);if(r)goto S_24145;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_notequal",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20533);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20533);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20533);}while(r); } S_24150:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(20534);if(r)goto S_24150;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_greaterthan",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20534);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20534);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20534);}while(r); } S_24155:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(20535);if(r)goto S_24155;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_lessthan",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20535);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20535);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20535);}while(r); } S_24160:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(20536);if(r)goto S_24160;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_greaterorequal",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20536);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20536);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20536);}while(r); } S_24165:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(20537);if(r)goto S_24165;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("qbs_lessorequal",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20537);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20537);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20537);}while(r); } S_24170:; if (( 0 )||new_error){ if(qbevent){evnt(20538);if(r)goto S_24170;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2981; sub_file_print(tmp_fileno,qbs_new_txt_len("INVALID STRING OPERATOR!",24), 0, 0, 1); if (new_error) goto skip2981; skip2981: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(20538);}while(r); do{ sub_end(); if(!qbevent)break;evnt(20538);}while(r); } } do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 1 + 2 ; if(!qbevent)break;evnt(20542);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 1 + 2 ; if(!qbevent)break;evnt(20542);}while(r); S_24177:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(20543);if(r)goto S_24177;} do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 2 ; if(!qbevent)break;evnt(20543);}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(20543);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 2 ; if(!qbevent)break;evnt(20543);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20543);}while(r); } S_24183:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,func_chr( 241 ))))||new_error){ if(qbevent){evnt(20544);if(r)goto S_24183;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20544);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 5 ; if(!qbevent)break;evnt(20544);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20544);}while(r); } S_24188:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(20545);if(r)goto S_24188;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("/ ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20546);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20546);}while(r); S_24191:; if (((*_FUNC_OPERATORUSAGE_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(20549);if(r)goto S_24191;} do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 2 ; if(!qbevent)break;evnt(20551);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 1 + 2 ; if(!qbevent)break;evnt(20552);}while(r); }else{ do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 1 + 2 ; if(!qbevent)break;evnt(20555);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 2 ; if(!qbevent)break;evnt(20556);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 2 ; if(!qbevent)break;evnt(20558);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20559);}while(r); } S_24201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(20561);if(r)goto S_24201;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("*",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20561);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20561);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20561);}while(r); } S_24206:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(20562);if(r)goto S_24206;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("+",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20562);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20562);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20562);}while(r); } S_24211:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(20563);if(r)goto S_24211;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20563);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20563);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20563);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 8 ; if(!qbevent)break;evnt(20565);}while(r); S_24217:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(20566);if(r)goto S_24217;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("==",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20566);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20566);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20566);}while(r); } S_24222:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(20567);if(r)goto S_24222;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20567);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20567);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20567);}while(r); } S_24227:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(20568);if(r)goto S_24227;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20568);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20568);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20568);}while(r); } S_24232:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(20569);if(r)goto S_24232;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("!=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20569);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20569);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20569);}while(r); } S_24237:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(20570);if(r)goto S_24237;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("<=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20570);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20570);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20570);}while(r); } S_24242:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(20571);if(r)goto S_24242;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20571);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 3 ; if(!qbevent)break;evnt(20571);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20571);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 1 ; if(!qbevent)break;evnt(20573);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RHS= 1 ; if(!qbevent)break;evnt(20573);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_RESULT= 1 ; if(!qbevent)break;evnt(20573);}while(r); do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_ucase(_FUNC_OPERATORUSAGE_STRING_OPERATOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20574);}while(r); S_24251:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(20575);if(r)goto S_24251;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20575);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20575);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20575);}while(r); } S_24256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(20576);if(r)goto S_24256;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("/ ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20576);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20576);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20576);}while(r); } S_24261:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(20577);if(r)goto S_24261;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("|",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20577);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 4 ; if(!qbevent)break;evnt(20577);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20577);}while(r); } S_24266:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(20578);if(r)goto S_24266;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("^",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20578);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 4 ; if(!qbevent)break;evnt(20578);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20578);}while(r); } S_24271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(20579);if(r)goto S_24271;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("^",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20579);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20579);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20579);}while(r); } S_24276:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(20580);if(r)goto S_24276;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("|",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20580);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20580);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20580);}while(r); } S_24281:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(20581);if(r)goto S_24281;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20581);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 1 ; if(!qbevent)break;evnt(20581);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20581);}while(r); } do{ *_FUNC_OPERATORUSAGE_LONG_LHS= 7 ; if(!qbevent)break;evnt(20583);}while(r); S_24287:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPERATORUSAGE_STRING_OPERATOR,qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(20584);if(r)goto S_24287;} do{ qbs_set(_FUNC_OPERATORUSAGE_STRING_INFO,qbs_new_txt_len("~",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20584);}while(r); do{ *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE= 5 ; if(!qbevent)break;evnt(20584);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20584);}while(r); } S_24292:; if (( 0 )||new_error){ if(qbevent){evnt(20586);if(r)goto S_24292;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip2982; sub_file_print(tmp_fileno,qbs_new_txt_len("INVALID NUMBERIC OPERATOR!",26), 0, 0, 1); if (new_error) goto skip2982; skip2982: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(20586);}while(r); do{ sub_end(); if(!qbevent)break;evnt(20586);}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; 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 "data32.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_REFER_LONG_TYPBAK=*_FUNC_REFER_LONG_TYP; if(!qbevent)break;evnt(20591);}while(r); do{ qbs_set(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20595);}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(20598);}while(r); S_24299:; if ((*_FUNC_REFER_LONG_I)||new_error){ if(qbevent){evnt(20599);if(r)goto S_24299;} 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(20600);}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(20600);}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(20602);}while(r); } do{ SUB_GETID(_FUNC_REFER_LONG_IDNUMBER); if(!qbevent)break;evnt(20604);}while(r); S_24306:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(20605);if(r)goto S_24306;} do{ goto exit_subfunc; if(!qbevent)break;evnt(20605);}while(r); } S_24309:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(20608);if(r)goto S_24309;} S_24310:; if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(20609);if(r)goto S_24310;} 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(20610);}while(r); S_24312:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(20611);if(r)goto S_24312;} 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(20611);}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(20612);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20613);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20614);}while(r); } do{ *_FUNC_REFER_LONG_U=qbr(func_val(_FUNC_REFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20619);}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(20620);}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(20620);}while(r); do{ *__LONG_E=qbr(func_val(_FUNC_REFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20620);}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(20621);}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(20621);}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(20622);}while(r); S_24326:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(20622);if(r)goto S_24326;} 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(20622);}while(r); } S_24329:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(20623);if(r)goto S_24329;} 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(20623);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20623);}while(r); } S_24333:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(20624);if(r)goto S_24333;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot resolve bit-length variables inside user defined types",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20624);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20624);}while(r); } S_24337:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(20626);if(r)goto S_24337;} S_24338:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(20627);if(r)goto S_24338;} 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(20628);}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(20629);}while(r); do{ *_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(20630);}while(r); }else{ do{ qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*((qbs**)((char*)",17),FUNC_SCOPE()),_FUNC_REFER_STRING_N),qbs_new_txt_len("+(",2)),_FUNC_REFER_STRING_O),qbs_new_txt_len(")))",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20632);}while(r); do{ *_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(20633);}while(r); } }else{ do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISUDT-*__LONG_ISREFERENCE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20636);}while(r); S_24348:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(20637);if(r)goto S_24348;} do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISARRAY; if(!qbevent)break;evnt(20637);}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(20638);}while(r); S_24352:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(20639);if(r)goto S_24352;} do{ goto exit_subfunc; if(!qbevent)break;evnt(20639);}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(20640);}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(20641);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20645);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20646);}while(r); } S_24361:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(20651);if(r)goto S_24361;} 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(20653);}while(r); S_24363:; if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(20654);if(r)goto S_24363;} do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20655);}while(r); do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK; if(!qbevent)break;evnt(20656);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20657);}while(r); } do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISPOINTER-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(20659);}while(r); S_24369:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20661);if(r)goto S_24369;} S_24370:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(20662);if(r)goto S_24370;} 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(20663);}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(20664);}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(20666);}while(r); } do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(20668);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20669);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20670);}while(r); } S_24380:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(20673);if(r)goto S_24380;} S_24381:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(20676);if(r)goto S_24381;} do{ qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getubits",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20676);}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(20676);}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(&(pass2987=*_FUNC_REFER_LONG_TYP& 511 ))),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20677);}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(20678);}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(20679);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20680);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20681);}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(20683);}while(r); S_24393:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(20684);if(r)goto S_24393;} S_24394:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(20685);if(r)goto S_24394;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20685);}while(r); } S_24397:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(20686);if(r)goto S_24397;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20686);}while(r); } S_24400:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 256 ))||new_error){ if(qbevent){evnt(20687);if(r)goto S_24400;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20687);}while(r); } }else{ S_24404:; if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(20689);if(r)goto S_24404;} S_24405:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(20690);if(r)goto S_24405;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint8",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20690);}while(r); } S_24408:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(20691);if(r)goto S_24408;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint16",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20691);}while(r); } S_24411:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(20692);if(r)goto S_24411;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20692);}while(r); } S_24414:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(20693);if(r)goto S_24414;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint64",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20693);}while(r); } S_24417:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(20694);if(r)goto S_24417;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20694);}while(r); } }else{ S_24421:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(20696);if(r)goto S_24421;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20696);}while(r); } S_24424:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(20697);if(r)goto S_24424;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20697);}while(r); } S_24427:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(20698);if(r)goto S_24427;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20698);}while(r); } S_24430:; if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(20699);if(r)goto S_24430;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20699);}while(r); } S_24433:; if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(20700);if(r)goto S_24433;} do{ qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20700);}while(r); } } } } S_24439:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(20704);if(r)goto S_24439;} 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(20704);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20704);}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(20705);}while(r); do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20706);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20707);}while(r); } S_24447:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(20711);if(r)goto S_24447;} 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(20712);}while(r); do{ *_FUNC_REFER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(20713);}while(r); S_24450:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(20715);if(r)goto S_24450;} do{ *_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(20715);}while(r); } S_24453:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20717);if(r)goto S_24453;} S_24454:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(20718);if(r)goto S_24454;} 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(20719);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20719);}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(20721);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20721);}while(r); } S_24461:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(20724);if(r)goto S_24461;} S_24462:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(20725);if(r)goto S_24462;} 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(&(pass2988=*_FUNC_REFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20726);}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(&(pass2989=*_FUNC_REFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20728);}while(r); } do{ goto LABEL_REF; if(!qbevent)break;evnt(20730);}while(r); } S_24469:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_BYTETYPE))||new_error){ if(qbevent){evnt(20732);if(r)goto S_24469;} 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(20732);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20732);}while(r); } S_24473:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UBYTETYPE))||new_error){ if(qbevent){evnt(20733);if(r)goto S_24473;} 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(20733);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20733);}while(r); } S_24477:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGERTYPE))||new_error){ if(qbevent){evnt(20734);if(r)goto S_24477;} 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(20734);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20734);}while(r); } S_24481:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGERTYPE))||new_error){ if(qbevent){evnt(20735);if(r)goto S_24481;} 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(20735);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20735);}while(r); } S_24485:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_LONGTYPE))||new_error){ if(qbevent){evnt(20736);if(r)goto S_24485;} 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(20736);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20736);}while(r); } S_24489:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_ULONGTYPE))||new_error){ if(qbevent){evnt(20737);if(r)goto S_24489;} 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(20737);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20737);}while(r); } S_24493:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGER64TYPE))||new_error){ if(qbevent){evnt(20738);if(r)goto S_24493;} 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(20738);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20738);}while(r); } S_24497:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGER64TYPE))||new_error){ if(qbevent){evnt(20739);if(r)goto S_24497;} 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(20739);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20739);}while(r); } S_24501:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_SINGLETYPE))||new_error){ if(qbevent){evnt(20740);if(r)goto S_24501;} 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(20740);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20740);}while(r); } S_24505:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_DOUBLETYPE))||new_error){ if(qbevent){evnt(20741);if(r)goto S_24505;} 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(20741);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20741);}while(r); } S_24509:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_FLOATTYPE))||new_error){ if(qbevent){evnt(20742);if(r)goto S_24509;} 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(20742);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20742);}while(r); } S_24513:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_OFFSETTYPE))||new_error){ if(qbevent){evnt(20743);if(r)goto S_24513;} 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(20743);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20743);}while(r); } S_24517:; if ((-(*_FUNC_REFER_LONG_T==*__LONG_UOFFSETTYPE))||new_error){ if(qbevent){evnt(20744);if(r)goto S_24517;} 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(20744);}while(r); do{ goto LABEL_REF; if(!qbevent)break;evnt(20744);}while(r); } LABEL_REF:; if(qbevent){evnt(20745);r=0;} S_24521:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(20746);if(r)goto S_24521;} do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(20746);}while(r); } S_24524:; if (((*_FUNC_REFER_LONG_T&*__LONG_ISPOINTER))||new_error){ if(qbevent){evnt(20747);if(r)goto S_24524;} do{ *_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20747);}while(r); } do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_T; if(!qbevent)break;evnt(20748);}while(r); S_24528:; if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(20749);if(r)goto S_24528;} S_24529:; 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(20750);if(r)goto S_24529;} 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(20750);}while(r); } do{ *_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK; if(!qbevent)break;evnt(20751);}while(r); } do{ qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20753);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20754);}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; 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 "data33.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_IDN=*__LONG_IDN+ 1 ; if(!qbevent)break;evnt(20762);}while(r); S_24538:; if ((-(*__LONG_IDN>*__LONG_IDS_MAX))||new_error){ if(qbevent){evnt(20764);if(r)goto S_24538;} do{ *__LONG_IDS_MAX=*__LONG_IDS_MAX* 2 ; if(!qbevent)break;evnt(20765);}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 (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_UDT_IDS[5]; if (tmp_long2id=(++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(20862);if(r)goto S_24640;} S_24641:; 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]))*2869+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20863);if(r)goto S_24641;} S_24642:; 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(20865);if(r)goto S_24642;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20865);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20865);}while(r); } }else{ do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20867);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20867);}while(r); } } S_24651:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_REGID_STRING_MUSTHAVE,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20870);if(r)goto S_24651;} S_24652:; 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]))*2869+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20871);if(r)goto S_24652;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20871);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20871);}while(r); } }else{ S_24657:; 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]))*2869+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20874);if(r)goto S_24657;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20874);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20874);}while(r); } } } S_24663:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 1024 )||new_error){ if(qbevent){evnt(20879);if(r)goto S_24663;} 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(20880);}while(r); S_24665:; if (((((-(*_SUB_REGID_LONG_SCOPE1== 0 ))&(-(*__LONG_ALLOWLOCALNAME== 0 ))))|(-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2)))||new_error){ if(qbevent){evnt(20881);if(r)goto S_24665;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20881);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20881);}while(r); } } S_24670:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 2048 )||new_error){ if(qbevent){evnt(20885);if(r)goto S_24670;} do{ *_SUB_REGID_LONG_ASTYPE1= 0 ; if(!qbevent)break;evnt(20886);}while(r); S_24672:; 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]))*2869+528)),8,1))== 32 )))||new_error){ if(qbevent){evnt(20886);if(r)goto S_24672;} do{ *_SUB_REGID_LONG_ASTYPE1= 1 ; if(!qbevent)break;evnt(20886);}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]))*2869+2641)); if(!qbevent)break;evnt(20887);}while(r); S_24676:; if (((-(*_SUB_REGID_LONG_ASTYPE1== 1 ))&(-(*_SUB_REGID_LONG_ASTYPE2== 1 )))||new_error){ if(qbevent){evnt(20888);if(r)goto S_24676;} S_24677:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20889);if(r)goto S_24677;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20889);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20889);}while(r); } } S_24682:; 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]))*2869+536))))||new_error){ if(qbevent){evnt(20892);if(r)goto S_24682;} S_24683:; 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]))*2869+540))))||new_error){ if(qbevent){evnt(20893);if(r)goto S_24683;} S_24684:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20894);if(r)goto S_24684;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20894);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20894);}while(r); } } } S_24690:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(20898);if(r)goto S_24690;} S_24691:; if ((-(*_SUB_REGID_LONG_ASTYPE2== 1 ))||new_error){ if(qbevent){evnt(20899);if(r)goto S_24691;} S_24692:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+536))&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(20900);if(r)goto S_24692;} S_24693:; if ((-((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+536))&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(20901);if(r)goto S_24693;} S_24694:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20902);if(r)goto S_24694;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20902);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20902);}while(r); } } } } } } LABEL_VARNAME_EXCEPTION:; if(qbevent){evnt(20909);r=0;} S_24703:; if ((-(*_SUB_REGID_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(20910);if(r)goto S_24703;} do{ *_SUB_REGID_LONG_HASHRES=FUNC_HASHFINDCONT(_SUB_REGID_LONG_HASHRESFLAGS,_SUB_REGID_LONG_HASHRESREF); if(!qbevent)break;evnt(20910);}while(r); }else{ do{ *_SUB_REGID_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(20910);}while(r); } dl_continue_2992:; } dl_exit_2992:; } } S_24711:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(20916);if(r)goto S_24711;} do{ *_SUB_REGID_LONG_HASHFLAGS=*_SUB_REGID_LONG_HASHFLAGS+ 4096 ; if(!qbevent)break;evnt(20917);}while(r); do{ *_SUB_REGID_LONG_ALLOW= 0 ; if(!qbevent)break;evnt(20918);}while(r); LABEL_ARY_RECHECK:; if(qbevent){evnt(20919);r=0;} do{ *_SUB_REGID_LONG_SCOPE2=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(20920);}while(r); S_24715:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1))== 32 )))||new_error){ if(qbevent){evnt(20921);if(r)goto S_24715;} do{ *_SUB_REGID_LONG_ASTYPE2= 1 ; if(!qbevent)break;evnt(20921);}while(r); } do{ *_SUB_REGID_LONG_HASHCHKFLAGS= 8 + 64 + 128 + 4096 ; if(!qbevent)break;evnt(20922);}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(20923);}while(r); S_24720:; while((*_SUB_REGID_LONG_HASHRES)||new_error){ if(qbevent){evnt(20924);if(r)goto S_24720;} S_24721:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 8 )||new_error){ if(qbevent){evnt(20927);if(r)goto S_24721;} 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(20928);}while(r); S_24723:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_REGID_STRING_MUSTHAVE,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20929);if(r)goto S_24723;} }else{ do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20933);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20933);}while(r); } } S_24729:; if ((*_SUB_REGID_LONG_HASHRESFLAGS&( 128 + 64 ))||new_error){ if(qbevent){evnt(20938);if(r)goto S_24729;} S_24730:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+548))== 0 ))||new_error){ if(qbevent){evnt(20939);if(r)goto S_24730;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20939);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20939);}while(r); } S_24734:; 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]))*2869+544))== 2 ))))||new_error){ if(qbevent){evnt(20940);if(r)goto S_24734;} do{ goto LABEL_ARRAYNAME_EXCEPTION; if(!qbevent)break;evnt(20940);}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(20941);}while(r); S_24738:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_REGID_STRING_MUSTHAVE->len== 0 )))||new_error){ if(qbevent){evnt(20943);if(r)goto S_24738;} S_24739:; 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]))*2869+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20944);if(r)goto S_24739;} S_24740:; 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(20946);if(r)goto S_24740;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20946);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20946);}while(r); } }else{ do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20948);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20948);}while(r); } } S_24749:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_REGID_STRING_MUSTHAVE,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(20951);if(r)goto S_24749;} S_24750:; 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]))*2869+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20952);if(r)goto S_24750;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20952);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20952);}while(r); } }else{ S_24755:; 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]))*2869+528)),8,1)),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(20955);if(r)goto S_24755;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20955);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20955);}while(r); } } } S_24761:; if ((*_SUB_REGID_LONG_HASHRESFLAGS& 4096 )||new_error){ if(qbevent){evnt(20960);if(r)goto S_24761;} do{ *_SUB_REGID_LONG_ASTYPE1= 0 ; if(!qbevent)break;evnt(20961);}while(r); S_24763:; 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]))*2869+528)),8,1))== 32 )))||new_error){ if(qbevent){evnt(20961);if(r)goto S_24763;} do{ *_SUB_REGID_LONG_ASTYPE1= 1 ; if(!qbevent)break;evnt(20961);}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]))*2869+2641)); if(!qbevent)break;evnt(20962);}while(r); S_24767:; if (((-(*_SUB_REGID_LONG_ASTYPE1== 1 ))&(-(*_SUB_REGID_LONG_ASTYPE2== 1 )))||new_error){ if(qbevent){evnt(20963);if(r)goto S_24767;} S_24768:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20964);if(r)goto S_24768;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20964);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20964);}while(r); } } S_24773:; 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]))*2869+512))))||new_error){ if(qbevent){evnt(20967);if(r)goto S_24773;} S_24774:; 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]))*2869+540))))||new_error){ if(qbevent){evnt(20968);if(r)goto S_24774;} S_24775:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20969);if(r)goto S_24775;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20969);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20969);}while(r); } } } S_24781:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(20973);if(r)goto S_24781;} S_24782:; if ((-(*_SUB_REGID_LONG_ASTYPE2== 1 ))||new_error){ if(qbevent){evnt(20974);if(r)goto S_24782;} S_24783:; if ((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+512))&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(20975);if(r)goto S_24783;} S_24784:; if ((-((*(int32*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_REGID_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+512))&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(20976);if(r)goto S_24784;} S_24785:; if ((-(*_SUB_REGID_LONG_SCOPE1==*_SUB_REGID_LONG_SCOPE2))||new_error){ if(qbevent){evnt(20977);if(r)goto S_24785;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Name already in use (",21),_SUB_REGID_STRING_N),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20977);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(20977);}while(r); } } } } } } LABEL_ARRAYNAME_EXCEPTION:; if(qbevent){evnt(20984);r=0;} S_24794:; if ((-(*_SUB_REGID_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(20985);if(r)goto S_24794;} do{ *_SUB_REGID_LONG_HASHRES=FUNC_HASHFINDCONT(_SUB_REGID_LONG_HASHRESFLAGS,_SUB_REGID_LONG_HASHRESREF); if(!qbevent)break;evnt(20985);}while(r); }else{ do{ *_SUB_REGID_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(20985);}while(r); } dl_continue_2994:; } dl_exit_2994:; } do{ SUB_HASHADD(_SUB_REGID_STRING_N,_SUB_REGID_LONG_HASHFLAGS,__LONG_CURRENTID); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20990);}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; } 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 "data34.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(20995);}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,28,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Asc",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,29,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,29,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,29,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,29,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,30,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Asc",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,31,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,31,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,31,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,31,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,32,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("End",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,33,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,33,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,33,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,33,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,34,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LSet",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,35,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,35,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,35,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,35,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,36,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RSet",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,37,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,37,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,37,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,37,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,38,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Mid",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,39,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,39,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,39,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,39,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,39,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,40,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Print",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,41,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,41,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,41,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,41,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,42,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Option",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,43,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,43,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,43,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,43,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,44,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Swap",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,45,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,45,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,45,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,45,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,46,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("System",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,47,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,47,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,47,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,47,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,48,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Write",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,49,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,49,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,49,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,49,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,50,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Read",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,51,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,51,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,51,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,51,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,52,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Close",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,53,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,53,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,53,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,53,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,54,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Reset",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,55,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,55,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,55,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,55,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,56,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Input",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,57,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,57,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,57,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,57,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,59,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TrOn",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,60,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,60,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,60,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,60,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,61,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("TrOff",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,62,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,62,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,62,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,62,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,63,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("List",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,64,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,64,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,64,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,64,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,65,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Def",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,66,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,66,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,66,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2125)),256,1),qbs_new_txt_len("SEG",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,66,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,66,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,67,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("IoCtl",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,68,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,68,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,68,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,68,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,69,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("IoCtl",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,70,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,71,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Fre",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,72,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,73,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SetMem",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,74,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,75,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FileAttr",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stub",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,76,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,77,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemGet",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,78,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,78,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,78,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,78,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,79,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemPut",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,80,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,80,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,80,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,80,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,81,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemFill",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,82,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,82,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,82,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,82,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,83,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Continue",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,84,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,84,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_stub",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,84,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,84,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,87,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Resize",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,88,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,89,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__resize",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,90,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,91,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,92,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{On|Off}][,{_Stretch|_Smooth}]",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,93,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RESIZE [{ON|OFF}][, {_STRETCH|_SMOOTH}]",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,94,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,95,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,97,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Resize",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,98,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,99,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__resize",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,100,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,101,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RESIZE",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,102,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,103,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,105,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ResizeWidth",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,106,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,107,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__resizewidth",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,108,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,109,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RESIZEWIDTH",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,110,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,111,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,113,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ResizeHeight",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,114,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,115,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__resizeheight",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,116,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,117,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RESIZEHEIGHT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,118,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,119,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,121,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScaledWidth",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,122,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,123,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__scaledwidth",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,124,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,125,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCALEDWIDTH",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,126,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,127,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,129,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScaledHeight",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,130,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,131,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__scaledheight",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,132,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,133,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCALEDHEIGHT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,134,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,135,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,138,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("GLRender",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,139,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,140,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__glrender",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,141,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,142,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,143,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{_Behind|_OnTop|_Only}",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,144,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_GLRENDER {_Behind|_OnTop|_Only}",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,145,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,146,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,148,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DisplayOrder",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,149,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,150,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__displayorder",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,151,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,152,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,153,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}]]]]",179)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,154,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DISPLAYORDER {_Software|_Hardware|_Hardware1|_GLRender} (any combination/order)",80)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,155,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,156,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,158,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemGet",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,159,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,160,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memget",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,161,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,162,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_UDTTYPE+( 1 )),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string( -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,163,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))= -1 ; if(!qbevent)break;evnt(20996,164,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMGET(block, offset, type)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,165,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,166,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,168,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Mem",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,169,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,170,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mem",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,171,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,174,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,175,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,176,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20996,177,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEM(referenceVariable) or _MEM(offset, byteSize)",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,178,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,179,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,182,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemElement",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,183,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,184,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mem",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,185,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,186,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,187,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20996,188,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMELEMENT(referenceVariable)",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,189,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,190,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,195,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemFree",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,196,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,197,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__memfree",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,198,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,199,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_UDTTYPE+( 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,200,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMFREE memoryVariable",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,201,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,202,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,204,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemExists",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,205,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,206,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memexists",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,207,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,208,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_UDTTYPE+( 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,209,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,210,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMEXISTS(memBlock)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,211,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,212,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,214,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemNew",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,215,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,216,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memnew",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,217,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,218,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,219,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20996,220,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMNEW(byteSize)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,221,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,222,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,224,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemImage",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,225,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,226,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memimage",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,227,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,228,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,229,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,230,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20996,231,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMIMAGE or _MEMIMAGE(imageHandle)",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,232,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,233,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,235,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemSound",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,236,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 3 ; if(!qbevent)break;evnt(20996,236,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,237,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__memsound",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,238,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,239,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,240,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ISUDT+( 1 ); if(!qbevent)break;evnt(20996,241,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMSOUND(soundHandle)",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,242,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,243,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,245,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MemCopy",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,246,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,247,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__memcopy",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,248,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,249,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,250,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?,?{To}?,?",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,251,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MEMCOPY sourceBlock, sourceBlock.OFFSET, sourceBlock.SIZE TO destBlock, destBlock.OFFSET",89)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,252,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,253,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,255,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ConsoleTitle",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,256,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,257,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__consoletitle",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,258,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,259,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,260,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONSOLETITLE title$",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,261,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,262,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,264,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenShow",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,265,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,266,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenshow",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,267,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENSHOW",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,268,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,269,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,271,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenHide",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,272,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,273,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenhide",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,274,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENHIDE",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,275,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,276,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,278,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenHide",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,279,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,280,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screenhide",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,281,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,282,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENHIDE",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,283,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,284,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,287,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Console",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,288,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,289,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__console",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,290,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,291,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONSOLE",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,292,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,293,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,295,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Console",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,296,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,297,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__console",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,298,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,299,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,300,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off}",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,301,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONSOLE {On|Off}",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,302,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,303,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,305,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ControlChr",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,306,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,307,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__controlchr",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,308,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,309,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,310,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off}",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,311,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONTROLCHR {On|Off}",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,312,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,313,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,315,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Blink",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,316,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,317,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__blink",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,318,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,319,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,320,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off}",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,321,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BLINK {On|Off}",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,322,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,323,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,325,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Blink",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,326,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,327,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blink",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,328,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,329,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BLINK",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,330,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,331,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,333,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FileExists",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,334,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,335,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fileexists",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,336,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,337,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,338,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,339,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FILEEXISTS(fileName$)",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,340,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,341,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,343,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DirExists",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,344,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,345,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__direxists",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,346,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,347,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,348,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,349,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DIREXISTS(path$)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,350,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,351,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,355,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Stick",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,356,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,356,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,357,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_stick",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,358,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,359,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,360,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,361,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,362,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("STICK(direction%) or STICK(direction%, axis_number%)",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,363,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,364,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,366,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Strig",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,367,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,367,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,368,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_strig",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,369,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,370,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,371,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,372,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,373,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("STRIG(button_function%) or STRIG(button_function%, device_number%)",66)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,374,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,375,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,377,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Strig",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,378,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,378,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,379,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_strig",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,380,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,381,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,382,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[(?[,?])]{On|Off|Stop}",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,383,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("STRIG(button%) {On|Off|Stop}",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,385,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,386,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,390,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Devices",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,391,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,391,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,392,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__devices",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,393,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,394,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEVICES",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,395,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,396,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,398,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Device",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,399,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,399,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,400,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,401,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__device",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,402,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,403,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,404,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,405,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,406,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEVICE$(device_number)",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,407,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,408,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,410,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DeviceInput",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,411,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,411,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,412,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__deviceinput",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,413,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,414,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,415,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,416,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,417,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEVICEINPUT or _DEVICEINPUT(device_number%)",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,418,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,419,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,421,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("LastButton",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,422,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,422,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,423,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__lastbutton",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,424,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,425,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,426,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,427,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,428,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_LASTBUTTON(deviceNumber)",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,429,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,430,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,432,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("LastAxis",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,433,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,433,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,434,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__lastaxis",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,435,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,436,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,437,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,438,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,439,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_LASTAXIS(deviceNumber)",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,440,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,441,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,443,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("LastWheel",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,444,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,444,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,445,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__lastwheel",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,446,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,447,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,448,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,449,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,450,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_LASTWHEEL(deviceNumber)",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,451,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,452,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,454,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Button",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,455,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,455,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,456,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__button",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,457,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,458,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,459,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,460,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,461,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BUTTON(button_number%)",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,462,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,463,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,465,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ButtonChange",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,466,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,466,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,467,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__buttonchange",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,468,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,469,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,470,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,471,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,472,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BUTTONCHANGE(button_number%)",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,473,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,474,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,476,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Axis",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,477,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,477,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,478,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__axis",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,479,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,480,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,481,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,482,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,483,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_AXIS(axis_number%)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,484,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,485,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,488,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Wheel",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,489,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 12 ; if(!qbevent)break;evnt(20996,489,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,490,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__wheel",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,491,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,492,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,493,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,494,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,495,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_WHEEL(wheelNumber%)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,496,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,497,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,508,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Key",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,509,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,510,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_key",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,511,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,512,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,513,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("(?){On|Off|Stop}",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,514,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("KEY(number) {On|Off|Stop}",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,515,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,516,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,518,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenX",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,519,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,520,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screenx",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,521,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,522,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENX",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,523,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,524,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,526,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenY",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,527,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,528,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screeny",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,529,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,530,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENY",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,531,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,532,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,534,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenMove",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,535,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,536,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenmove",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,537,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,538,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,539,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Middle}][?,?]",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,540,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENMOVE x, y or _SCREENMOVE _Middle",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,541,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,542,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,544,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseMove",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,545,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,546,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mousemove",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,547,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,548,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,549,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEMOVE x, y",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,550,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,551,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,553,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OS",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,554,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,555,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,556,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__os",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,557,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,558,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_OS$",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,559,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,560,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,562,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Title",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,563,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,564,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,565,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__title",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,566,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,567,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_TITLE$",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,568,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,569,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,571,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MapUnicode",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,572,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,573,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mapunicode",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,574,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,575,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,576,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?{To}?",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,577,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MAPUNICODE unicode& TO asciiCode%",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,578,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,579,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,581,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MapUnicode",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,582,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,583,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mapunicode",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,584,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,585,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,586,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,587,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MAPUNICODE(asciiCode%)",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,588,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,589,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,591,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("KeyDown",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,592,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,593,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__keydown",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,594,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,595,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,596,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,597,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_KEYDOWN(code&)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,598,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,599,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,601,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("KeyHit",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,602,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,603,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__keyhit",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,604,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,605,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_KEYHIT",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,606,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,607,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,609,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("WindowHandle",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,610,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,611,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__handle",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,612,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,613,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_WINDOWHANDLE",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,614,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,615,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,617,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Files",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,618,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,619,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_files",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,620,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,621,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,622,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,623,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("FILES fileSpec$",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,624,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,625,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,627,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PrintImage",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,628,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 9 ; if(!qbevent)break;evnt(20996,628,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,629,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__printimage",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,630,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,631,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,632,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PRINTIMAGE imageHandle&",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,635,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,636,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,640,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenClick",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,641,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,642,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenclick",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,643,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,644,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,645,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,646,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENCLICK x, y[, button%]",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,647,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,648,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,650,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenPrint",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,651,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,652,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__screenprint",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,653,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,654,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,655,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENPRINT text$",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,656,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,657,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,659,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenImage",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,660,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 11 ; if(!qbevent)break;evnt(20996,660,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,661,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__screenimage",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,662,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,663,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,664,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?,?,?,?]",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,665,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,666,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENIMAGE(column1, row1, column2, row2)",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,667,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,668,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,674,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Lock",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,675,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,676,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_lock",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,677,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,678,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,679,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[#]?[,[?][{To}?]]",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,680,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LOCK #fileNumber%, record& or LOCK #fileNumber% firstRecord& TO lastRecord&",75)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,681,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,682,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,684,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Unlock",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,685,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,686,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_unlock",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,687,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,688,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,689,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[#]?[,[?][{To}?]]",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,690,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("UNLOCK #fileNumber%, record& or UNLOCK #fileNumber% firstRecord& TO lastRecord&",79)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,691,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,692,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,694,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FreeTimer",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,695,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,696,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__freetimer",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,697,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,698,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FREETIMER",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,699,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,700,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,702,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Timer",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,703,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,704,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_timer",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,705,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,706,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,707,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[(?)]{On|Off|Stop|Free}",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,708,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("TIMER[(number%)] {On|Off|Stop|Free}",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,709,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,710,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,712,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FullScreen",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,713,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,714,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__fullscreen",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,715,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,716,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,717,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,718,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FULLSCREEN [{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,719,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,720,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,722,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("AllowFullScreen",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,723,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,724,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__allowfullscreen",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,725,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,726,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,727,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]",66)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,728,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ALLOWFULLSCREEN [{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]",83)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,729,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,730,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,732,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FullScreen",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,733,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,734,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fullscreen",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,735,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,736,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FULLSCREEN",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,737,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,738,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,740,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Smooth",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,741,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,742,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fullscreensmooth",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,743,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,744,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SMOOTH",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,745,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,746,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,748,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("WindowHasFocus",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,749,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,750,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__hasfocus",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,751,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,752,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_WINDOWHASFOCUS",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,753,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,754,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,756,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Clipboard",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,757,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,758,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,759,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__clipboard",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,760,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,761,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,762,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("=?",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,763,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CLIPBOARD$ = text$",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,764,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,765,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,767,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Clipboard",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,768,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,769,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,770,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__clipboard",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,771,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,772,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CLIPBOARD$",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,773,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,774,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,776,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ClipboardImage",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,777,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 11 ; if(!qbevent)break;evnt(20996,777,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,778,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__clipboardimage",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,779,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,780,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CLIPBOARDIMAGE",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,781,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,782,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,784,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ClipboardImage",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,785,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 11 ; if(!qbevent)break;evnt(20996,785,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,786,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__clipboardimage",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,787,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,788,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,789,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("=?",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,790,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CLIPBOARDIMAGE = existingImageHandle&",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,791,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,792,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,794,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Exit",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,795,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,796,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__exit",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,797,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,798,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_EXIT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,799,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,800,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,802,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OpenHost",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,803,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 8 ; if(!qbevent)break;evnt(20996,803,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,804,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__openhost",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,805,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,806,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,807,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,808,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_OPENHOST(",10),func_chr( 34 )),qbs_new_txt_len("TCP/IP:portNumber",17)),func_chr( 34 )),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,809,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,810,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,812,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Connected",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,813,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,814,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__connected",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,815,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,816,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,817,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,818,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONNECTED(connectionHandle&)",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,819,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,820,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,822,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ConnectionAddress",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,823,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,824,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,825,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__connectionaddress",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,826,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,827,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,828,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,829,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONNECTIONADDRESS(connectionHandle&)",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,830,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,831,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,833,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OpenConnection",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,834,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,835,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__openconnection",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,836,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,837,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,838,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,839,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_OPENCONNECTION(hostHandle)",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,840,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,841,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,843,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OpenClient",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,844,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 8 ; if(!qbevent)break;evnt(20996,844,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,845,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__openclient",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,846,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,847,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,848,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,849,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_OPENCLIENT(",12),func_chr( 34 )),qbs_new_txt_len("TCP/IP:port:address",19)),func_chr( 34 )),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,850,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,851,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,854,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("EnvironCount",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,855,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,856,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__environcount",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,857,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,858,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ENVIRONCOUNT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,859,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,860,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,862,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Environ",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,863,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,864,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,865,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_environ",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,866,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,867,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,868,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,869,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ENVIRON$(listIndex%) or ENVIRON$(systemID$)",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,870,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,871,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,873,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Environ",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,874,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,875,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_environ",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,876,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,877,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,878,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ENVIRON stringExpression$",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,879,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,880,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,882,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ErrorLine",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,883,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,884,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__errorline",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,885,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,886,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ERRORLINE",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,887,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,888,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,890,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("InclErrorLine",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,891,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,892,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__inclerrorline",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,893,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,894,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_INCLERRORLINE",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,895,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,896,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,898,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ErrorMessage",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,899,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,900,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,901,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__errormessage",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,902,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,903,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,904,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,905,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,906,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ERRORMESSAGE$ or _ERRORMESSAGE$(errorCode%)",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,907,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,908,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,910,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Assert",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,911,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,912,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__assert",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,913,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,914,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,915,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,916,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ASSERT condition[, errorMessage$]",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,917,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,918,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,920,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Display",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,921,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,922,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__display",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,923,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DISPLAY",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,924,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,925,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,927,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("AutoDisplay",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,928,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,929,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__autodisplay",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,930,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_AUTODISPLAY",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,931,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,932,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,934,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Limit",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,935,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,936,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__limit",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,937,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,938,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,939,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_LIMIT framesPerSecond!",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,940,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,941,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,943,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FPS",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,944,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,945,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__fps",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,946,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,947,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,948,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Auto}][?]",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,949,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FPS fps! or _FPS _Auto",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,950,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,951,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,953,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Delay",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,954,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,955,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__delay",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,956,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,957,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,958,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DELAY seconds!",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,959,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,960,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,962,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Icon",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,963,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 10 ; if(!qbevent)break;evnt(20996,963,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,964,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__icon",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,965,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,966,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,967,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?[,?]]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,968,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ICON [mainImageHandle&[, smallImageHandle&]]",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,969,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,970,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,972,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Title",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,973,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,974,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__title",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,975,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,976,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,977,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_TITLE text$",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,978,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,979,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,981,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Echo",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,982,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,983,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__echo",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,984,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,985,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,986,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ECHO text$",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,987,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,988,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,990,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("AcceptFileDrop",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,991,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,992,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__filedrop",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,993,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,994,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,995,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{On|Off}]",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,996,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ACCEPTFILEDROP [{On|Off}]",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,997,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,998,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1000,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("AcceptFileDrop",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1001,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1002,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__filedrop",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1003,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1004,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ACCEPTFILEDROP",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1005,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1006,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1008,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FinishDrop",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1009,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1010,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__finishdrop",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1011,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FINISHDROP",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1012,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1013,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1015,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("TotalDroppedFiles",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1016,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1017,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__totaldroppedfiles",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1018,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1019,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_TOTALDROPPEDFILES",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1020,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1021,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1023,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DroppedFile",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1024,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1025,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1026,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__droppedfile",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1027,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1028,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1029,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1030,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1031,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DROPPEDFILE$ or _DROPPEDFILE$(index&)",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1032,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1033,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1035,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Clear",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1036,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1037,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_clear",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1038,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,1039,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1040,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?][,[?][,?]]",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1041,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CLEAR",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1042,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1043,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1047,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("NewImage",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1048,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1049,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__newimage",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1050,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,1051,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1052,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1053,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1054,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_NEWIMAGE(width&, height&, mode)",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1055,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1056,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1058,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("LoadImage",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1059,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 6 ; if(!qbevent)break;evnt(20996,1059,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1060,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__loadimage",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1061,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1062,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1063,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1064,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1065,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_LOADIMAGE(fileName$[, mode])",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1066,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1067,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1069,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FreeImage",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1070,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1071,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__freeimage",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1072,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1073,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1074,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1075,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FREEIMAGE handle&",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1076,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1077,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1079,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CopyImage",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1080,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1081,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__copyimage",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1082,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1083,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1084,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1085,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1086,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_COPYIMAGE(imageHandle&[, mode])",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1087,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1088,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1092,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Source",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1093,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1094,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__source",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1095,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1096,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1097,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1098,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SOURCE handle&",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1099,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1100,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1102,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Dest",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1103,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1104,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__dest",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1105,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1106,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1107,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1108,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEST imageHandle&",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1109,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1110,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1112,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Source",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1113,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1114,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__source",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1115,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1116,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SOURCE",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1117,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1118,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1120,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Dest",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1121,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1122,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__dest",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1123,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1124,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEST",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1125,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1126,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1128,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Display",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1129,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1130,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__display",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1131,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1132,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DISPLAY",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1133,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1134,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1138,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Blend",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1139,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1140,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__blend",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1141,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1142,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1143,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1144,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BLEND [imageHandle&]",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1145,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1146,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1148,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DontBlend",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1149,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1150,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__dontblend",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1151,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1152,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1153,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1154,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DONTBLEND [imageHandle&]",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1155,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1156,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1158,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ClearColor",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1159,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1160,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__clearcolor",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1161,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1162,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1163,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_None}][?][,?]",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1164,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CLEARCOLOR {color&|_None}[,dest_handle&]",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1165,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1166,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1170,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PutImage",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1171,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1172,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__putimage",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1173,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 10 ; if(!qbevent)break;evnt(20996,1174,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1175,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[[{Step}](?,?)[-[{Step}](?,?)]][,[?][,[?][,[[{Step}](?,?)[-[{Step}](?,?)]][,{_Smooth}]]]]",89)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1176,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PUTIMAGE [STEP] [(dx1, dy1)-[STEP][(dx2, dy2)]][, sourceHandle&][, destHandle&][, ][STEP][(sx1, sy1)[-STEP][(sx2, sy2)]][_SMOOTH]",130)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1177,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1178,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1180,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MapTriangle",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1181,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1182,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__maptriangle",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1183,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 19 ; if(!qbevent)break;evnt(20996,1184,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__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_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__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_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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1185,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Clockwise|_AntiClockwise}][{_Seamless}](?,?)-(?,?)-(?,?)[,?]{To}(?,?[,?])-(?,?[,?])-(?,?[,?])[,[?][,{_Smooth|_SmoothShrunk|_SmoothStretched}]]",145)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1186,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MAPTRIANGLE [{_SEAMLESS}] (sx1, sy1)-(sx2, sy2)-(sx3, sy3), source& TO (dx1, dy1)-(dx2, dy2)-(dx3, dy3)[, destination&][{_SMOOTH|_SMOOTHSHRUNK|_SMOOTHSTRETCHED}]]",163)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1187,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1188,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1190,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DepthBuffer",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1191,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1192,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__depthbuffer",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1193,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1194,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1195,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off|Lock|_Clear}[,?]",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1196,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEPTHBUFFER {On|Off|Lock|_Clear}[,handle&]",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1197,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1198,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1200,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SetAlpha",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1201,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1202,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__setalpha",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1203,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,1204,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1205,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,[?[{To}?]][,?]]",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1206,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SETALPHA alpha& or _SETALPHA color1& TO color2&[, imageHandle&]",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1207,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1208,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1212,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Width",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1213,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1214,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__width",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1215,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1216,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1217,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1218,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1219,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_WIDTH(imageHandle&)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1220,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1221,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1223,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Height",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1224,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1225,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__height",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1226,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1227,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1228,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1229,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1230,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_HEIGHT(imageHandle&)",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1231,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1232,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1234,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PixelSize",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1235,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1236,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__pixelsize",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1237,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1238,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1239,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1240,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1241,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PIXELSIZE[(imageHandle&)]",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1242,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1243,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1245,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ClearColor",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1246,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1247,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__clearcolor",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1248,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1249,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1250,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1251,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1252,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CLEARCOLOR[(sourceHandle&)]",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1253,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1254,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1256,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Blend",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1257,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1258,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blend",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1259,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1260,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1261,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1262,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1263,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BLEND[(imageHandle&)]",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1264,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1265,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1267,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DefaultColor",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1268,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1269,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__defaultcolor",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1270,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1271,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1272,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1273,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1274,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEFAULTCOLOR[(imageHandle&)]",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1275,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1276,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1278,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("BackgroundColor",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1279,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1280,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__backgroundcolor",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1281,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1282,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1283,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1284,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1285,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BACKGROUNDCOLOR(imageHandle&)]",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1286,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1287,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1291,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PaletteColor",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1292,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1293,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__palettecolor",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1294,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1295,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1296,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1297,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1298,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PALETTECOLOR(attributeNumber%, imgHandle&)",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1299,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1300,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1302,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PaletteColor",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1303,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1304,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__palettecolor",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1305,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,1306,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1307,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1308,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PALETTECOLOR attribute%, newColor&[, imgHandle&]",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1309,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1310,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1312,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CopyPalette",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1313,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1314,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__copypalette",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1315,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1316,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1317,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?][,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1318,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_COPYPALETTE [sourceImageHandle&[, destinationImageHandle&]]",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1319,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1320,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1324,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("LoadFont",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1325,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 1 ; if(!qbevent)break;evnt(20996,1325,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1326,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__loadfont",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1327,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,1328,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1329,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1330,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1331,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_LOADFONT(fileName$, size%[, ",29),func_chr( 34 )),qbs_new_txt_len("{MONOSPACE|, BOLD|, ITALIC|, UNDERLINE|, UNICODE|, DONTBLEND}",61)),func_chr( 34 )),qbs_new_txt_len("])",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1332,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1333,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1335,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Font",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1336,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1337,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__font",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1338,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1339,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1340,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1341,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FONT fontHandle&[, imageHandle&]",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1342,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1343,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1345,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FontWidth",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1346,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1347,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fontwidth",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1348,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1349,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1350,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1351,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1352,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FONTWIDTH or _FONTWIDTH(fontHandle&)",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1353,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1354,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1356,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FontHeight",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1357,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1358,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__fontheight",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1359,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1360,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1361,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1362,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1363,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FONTHEIGHT or _FONTHEIGHT(fontHandle&)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1364,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1365,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1367,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Font",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1368,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1369,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__font",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1370,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1371,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1372,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1373,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1374,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FONT[(imageHandle&)]",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1375,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1376,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1378,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PrintString",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1379,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1380,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__printstring",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1381,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,1382,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1383,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?),?[,?]",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1384,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PRINTSTRING(x, y), text$[, imageHandle&]",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1385,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1386,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1388,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PrintWidth",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1389,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1390,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__printwidth",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1391,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1392,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1393,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1394,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1395,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PRINTWIDTH(textToPrint$[, destinationHandle&])",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1396,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1397,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1399,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FreeFont",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1400,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1401,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__freefont",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1402,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1403,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1404,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1405,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FREEFONT fontHandle&",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1406,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1407,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1409,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PrintMode",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1410,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1411,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__printmode",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1412,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1413,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1414,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{_FillBackground|_KeepBackground|_OnlyBackground}[,?]",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1415,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PRINTMODE {_FillBackground|_KeepBackground|_OnlyBackground}[, imageHandle&]",76)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1416,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1417,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1419,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("PrintMode",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1420,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1421,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__printmode",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1422,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1423,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1424,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1425,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1426,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PRINTMODE[(imageHandle&)]",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1427,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1428,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1432,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("RGBA",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1433,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1434,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgba",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1435,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,1436,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1437,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?,?,?[,?]",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1438,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1439,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RGBA(red&, green&, blue&, alpha&[, imageHandle&])",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1440,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1441,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1443,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("RGB",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1444,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1445,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgb",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1446,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,1447,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1448,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?,?[,?]",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1449,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1450,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RGB(red&, green&, blue&[, imageHandle&])",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1451,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1452,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1454,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Red",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1455,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1456,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__red",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1457,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1458,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1459,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1460,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1461,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RED(rgbaColorIndex&[, imageHandle&])",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1462,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1463,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1465,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Green",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1466,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1467,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__green",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1468,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1469,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1470,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1471,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1472,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_GREEN(rgbaColorIndex&[, imageHandle&])",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1473,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1474,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1476,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Blue",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1477,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1478,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blue",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1479,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1480,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1481,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1482,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1483,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BLUE(rgbaColorIndex&[, imageHandle&])",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1484,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1485,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1487,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Alpha",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1488,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1489,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__alpha",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1490,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1491,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1492,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1493,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1494,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ALPHA(color~&[, imageHandle&])",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1495,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1496,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1498,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("RGBA32",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1499,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1500,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgba32",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1501,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,1502,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1503,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1504,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RGBA32(red&, green&, blue&, alpha&)",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1505,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1506,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1508,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("RGB32",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1509,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1510,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__rgb32",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1511,"subs_functions.bas");}while(r); do{ *(int8*)(((char*)__UDT_ID)+(808))= -1 ; if(!qbevent)break;evnt(20996,1512,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(811))= 1 ; if(!qbevent)break;evnt(20996,1513,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,1514,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1515,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1516,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RGB32(red&, green&, blue&[, alpha&]) or _RGB32(intensity&[, alpha&])",69)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1517,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1518,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1520,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Red32",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1521,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1522,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__red32",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1523,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1524,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1525,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1526,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RED32(rgbaColor&)",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1527,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1528,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1530,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Green32",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1531,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1532,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__green32",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1533,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1534,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1535,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1536,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_GREEN32(rgbaColor&)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1537,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1538,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1540,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Blue32",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1541,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1542,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__blue32",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1543,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1544,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1545,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1546,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BLUE32(rgbaColor&)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1547,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1548,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1550,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Alpha32",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1551,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1552,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__alpha32",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1553,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1554,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1555,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1556,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ALPHA32(rgbaColor&)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1557,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1558,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1561,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Draw",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1562,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1563,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_draw",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1564,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1565,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1566,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("DRAW drawString$",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1567,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1568,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1570,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Play",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1571,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1571,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1572,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_play",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1573,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1574,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1575,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PLAY commandString$",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1576,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1577,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1579,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Play",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1580,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1580,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1581,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_play",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1582,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1583,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1584,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1585,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PLAY",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1586,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1587,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1590,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseShow",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1591,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1592,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mouseshow",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1593,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1594,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1595,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1596,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSESHOW [cursorShape$]",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1597,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1598,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1600,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseHide",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1601,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1602,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mousehide",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1603,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEHIDE",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1604,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1605,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1607,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseInput",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1608,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1609,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mouseinput",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1610,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1611,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1612,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1613,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1614,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEINPUT",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1615,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1616,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1618,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseX",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1619,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1620,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousex",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1621,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1622,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1623,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1624,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1625,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEX",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1626,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1627,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1629,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseY",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1630,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1631,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousey",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1632,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1633,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1634,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1635,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1636,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEY",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1637,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1638,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1640,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseMovementX",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1641,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1642,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousemovementx",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1643,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1644,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1645,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1646,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1647,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEMOVEMENTX",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1648,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1649,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1651,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseMovementY",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1652,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1653,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousemovementy",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1654,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1655,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1656,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1657,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1658,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEMOVEMENTY",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1659,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1660,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1662,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseButton",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1663,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1664,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousebutton",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1665,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1666,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1667,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1668,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1669,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEBUTTON(buttonNumber)",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1670,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1671,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1673,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseWheel",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1674,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1675,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousewheel",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1676,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1677,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1678,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1679,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1680,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEWHEEL",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1681,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1682,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1685,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MousePipeOpen",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1686,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1687,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__mousepipeopen",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1688,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1689,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEPIPEOPEN",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1690,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1691,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1693,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MouseInputPipe",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1694,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1695,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mouseinputpipe",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1696,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1697,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1698,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEINPUTPIPE(context)",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1699,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1700,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1702,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MousePipeClose",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1703,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1704,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__mousepipeclose",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1705,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1706,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1707,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MOUSEPIPECLOSE(context)",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1708,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1709,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1711,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("FreeFile",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1712,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1713,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_freefile",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1714,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1715,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_FREEFILE",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1716,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1717,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1719,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Name",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1720,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1721,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_name",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1722,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1723,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1724,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?{As}?",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1725,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("NAME oldFileOrFolderName$ AS newFileOrFolderName$",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1726,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1727,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1729,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Kill",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1730,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1731,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_kill",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1732,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1733,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1734,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("KILL fileSpec$",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1735,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1736,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1738,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("ChDir",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1739,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1740,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_chdir",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1741,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1742,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1743,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CHDIR path$",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1744,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1745,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1747,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MkDir",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1748,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1749,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_mkdir",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1750,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1751,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1752,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKDIR pathSpec$",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1753,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1754,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1756,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RmDir",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1757,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1758,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_rmdir",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1759,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1760,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1761,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("RMDIR path$",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1762,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1763,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1765,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Chain",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1766,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1767,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_chain",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1768,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1769,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1770,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CHAIN moduleName$",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1771,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1772,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1775,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Shell",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1776,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1777,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_shell2",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1778,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1779,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1780,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{_Hide}[{_DontWait}][?]",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1781,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("_Hide",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1782,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1783,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1784,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1786,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Shell",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1787,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1788,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_shell3",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1789,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1790,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1791,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{_DontWait}[{_Hide}][?]",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1792,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("_DontWait",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1793,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1794,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1795,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1797,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Shell",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1798,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1799,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_shell",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1800,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1801,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1802,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1803,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1805,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1806,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1808,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Shell",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1809,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1810,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_shell",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1811,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1812,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1813,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1814,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SHELL(commandToRun$)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1815,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1816,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1818,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ShellHide",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1819,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1820,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__shellhide",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1821,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1822,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1823,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1824,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SHELLHIDE(commandToRun$)",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1825,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1826,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1828,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Command",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1829,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1830,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1831,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_command",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1832,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1833,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1834,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1835,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1836,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("COMMAND$[(index%)]",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1837,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1838,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1840,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CommandCount",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1841,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1842,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__commandcount",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1843,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1844,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_COMMANDCOUNT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1845,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1846,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1851,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndRate",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1852,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1852,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1853,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndrate",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1854,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1855,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDRATE",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1856,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1857,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1859,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndRaw",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1860,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1860,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1861,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndraw",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1862,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,1863,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1864,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,[?][,?]]",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1865,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDRAW leftSample[, rightSample][, pipeHandle&]",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1866,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1867,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1869,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndRawDone",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1870,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1870,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1871,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndrawdone",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1872,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1873,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1874,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1875,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDRAWDONE [pipeHandle&]",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1876,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1877,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1879,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndOpenRaw",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1880,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1880,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1881,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndopenraw",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1882,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1883,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDOPENRAW",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1884,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1885,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1887,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndRawLen",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1888,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1888,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1889,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndrawlen",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1890,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1891,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1892,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1893,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1894,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDRAWLEN [pipeHandle&]",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1895,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1896,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1898,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndLen",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1899,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1899,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1900,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndlen",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1901,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1902,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1903,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1904,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDLEN(handle&)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1905,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1906,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1908,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndPaused",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1909,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1909,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1910,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndpaused",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1911,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1912,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1913,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1914,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDPAUSED(handle&)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1915,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1916,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1918,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndPlayFile",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1919,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 3 ; if(!qbevent)break;evnt(20996,1919,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1920,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndplayfile",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1921,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,1922,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1923,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,[?][,?]]",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1924,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDPLAYFILE fileName$[, , volume!]",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1925,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1926,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1928,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndPlayCopy",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1929,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1929,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1930,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndplaycopy",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1931,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1932,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1933,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1934,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDPLAYCOPY handle&[, volume!]",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1935,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1936,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1938,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndStop",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1939,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1939,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1940,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndstop",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1941,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1942,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1943,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDSTOP handle&",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1944,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1945,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1947,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndLoop",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1948,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1948,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1949,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndloop",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1950,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1951,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1952,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDLOOP handle&",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1953,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1954,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1956,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndLimit",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1957,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1957,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1958,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndlimit",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1959,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1960,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1961,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDLIMIT handle&, numberOfSeconds!",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1962,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1963,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1965,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndOpen",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1966,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 3 ; if(!qbevent)break;evnt(20996,1966,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1967,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndopen",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1968,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1969,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1970,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1971,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1972,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDOPEN(fileName$)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1973,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1974,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1976,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndSetPos",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1977,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1977,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,1978,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndsetpos",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1979,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,1980,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1981,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDSETPOS handle&, position!",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1982,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1983,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1985,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndGetPos",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1986,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1986,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1987,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndgetpos",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1988,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1989,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1990,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,1991,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDGETPOS(handle&)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1992,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,1993,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,1995,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndPlaying",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1996,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,1996,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,1997,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndplaying",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,1998,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,1999,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2000,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2001,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDPLAYING(handle&)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2002,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2003,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2005,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndPause",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2006,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2006,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2007,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndpause",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2008,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2009,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2010,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDPAUSE handle&",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2011,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2012,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2014,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndBal",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2015,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2015,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2016,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndbal",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2017,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,2018,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(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)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2019,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,[?][,[?][,[?][,[?]]]]",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2020,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDBAL handle&[, x!][, y!][, z!][, channel&]]",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2021,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2022,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2025,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndVol",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2026,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2026,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2027,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndvol",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2028,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2029,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2030,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDVOL handle&, volume!",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2031,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2032,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2034,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndPlay",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2035,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2035,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2036,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndplay",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2037,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2038,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2039,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDPLAY handle&",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2040,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2041,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2043,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndCopy",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2044,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2044,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2045,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__sndcopy",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2046,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2047,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2048,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2049,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDCOPY(handle&)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2050,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2051,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2053,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SndClose",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2054,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2054,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2055,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__sndclose",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2056,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2057,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2058,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SNDCLOSE handle&",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2059,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2060,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2062,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Input",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2063,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2064,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2065,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_input",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2066,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2067,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2068,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2069,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2070,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("INPUT$(numberOfBytes%[, fileOrPortNumber])",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2071,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2072,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2074,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Seek",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2075,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2076,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_seek",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2077,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2078,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2079,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[#]?,?",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2080,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SEEK filenumber&, position",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2081,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2082,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2084,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Seek",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2085,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2086,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_seek",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2087,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2088,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2089,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2090,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SEEK(filenumber&)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2091,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2092,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2094,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Loc",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2095,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2096,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_loc",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2097,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2098,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2099,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2100,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LOC(fileOrPortNumber%)",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2101,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2102,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2104,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("EOF",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2105,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2106,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_eof",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2107,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2108,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2109,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2110,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("EOF(fileNumber&)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2111,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2112,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2114,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LOF",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2115,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2116,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_lof",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2117,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2118,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2119,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2120,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LOF(fileNumber&)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2121,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2122,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2125,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Screen",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2126,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2127,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_screen",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2128,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2129,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2130,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2131,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2132,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SCREEN(x, y[, colorflag%])",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2133,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2134,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2136,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PMap",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2137,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2138,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_pmap",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2139,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2140,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2141,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2142,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PMAP(coordinate, function_number%)",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2143,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2144,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2147,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Point",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2148,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2149,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_point",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2150,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2151,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2152,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2153,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2154,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("POINT(x, y) or POINT({0|1|2|3})",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2155,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2156,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2159,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Tab",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2160,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2161,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_tab",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2162,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2163,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2164,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2165,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("TAB(column%)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2166,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2167,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2169,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Spc",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2170,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2171,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_spc",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2172,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2173,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2174,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2175,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SPC(count%)",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2176,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2177,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2180,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Wait",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2181,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2182,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_wait",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2183,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2184,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2185,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2186,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("WAIT port%, andMask%[, xorMask%]",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2187,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2188,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2190,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Inp",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2191,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2192,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_inp",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2193,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2194,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2195,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2196,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("INP(address)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2197,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2198,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2200,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Pos",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2201,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2202,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_pos",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2203,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2204,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2205,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2206,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("POS(0)",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2207,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2208,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2210,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Sgn",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2211,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2212,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_sgn",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2213,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2214,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2215,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2216,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SGN(value)",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2217,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2218,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2220,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LBound",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2221,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2222,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2223,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2224,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,[?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2225,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2226,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LBOUND(arrayName[, dimension%])",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2227,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2228,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2230,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("UBound",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2231,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2232,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2233,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2234,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,[?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2235,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2236,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("UBOUND(arrayName[, dimension%])",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2237,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2238,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2240,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Bin",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2241,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2242,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2243,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2244,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2245,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2246,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_BIN$(number)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2247,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2248,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2250,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Oct",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2251,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2252,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2253,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2254,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2255,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2256,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("OCT$(number)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2257,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2258,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2260,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Hex",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2261,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2262,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2263,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2264,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2265,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2266,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("HEX$(decimalNumber)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2267,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2268,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2270,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Sleep",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2271,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2272,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_sleep",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2273,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2274,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2275,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2276,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SLEEP seconds%",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2277,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2278,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2280,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Exp",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2281,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2282,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2283,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2284,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))= -1 ; if(!qbevent)break;evnt(20996,2285,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("EXP(numericExpression)",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2286,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2287,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2289,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Fix",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2290,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2291,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2292,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2293,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))= -1 ; if(!qbevent)break;evnt(20996,2294,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("FIX(expression)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2295,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2296,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2298,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Int",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2299,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2300,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2301,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2302,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))= -1 ; if(!qbevent)break;evnt(20996,2303,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("INT(expression)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2304,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2305,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2307,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CDbl",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2308,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2309,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2310,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2311,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2312,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CDBL(expression)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2313,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2314,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2316,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CSng",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2317,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2318,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2319,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2320,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2321,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CSNG(expression)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2322,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2323,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2325,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Round",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2326,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2327,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2328,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2329,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2330,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ROUND(number)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2331,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2332,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2334,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CInt",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2335,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2336,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2337,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2338,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2339,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CINT(expression)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2340,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2341,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2343,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CLng",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2344,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2345,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2346,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2347,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2348,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CLNG(expression)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2349,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2350,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2354,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Time",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2355,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2356,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2357,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_time",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2358,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2359,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2360,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("=?",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2361,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("TIME$ = timeToSet$",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2362,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2363,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2365,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Time",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2366,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2367,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2368,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_time",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2369,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2370,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("TIME$",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2371,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2372,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2376,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Date",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2377,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2378,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2379,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_date",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2380,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2381,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2382,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("=?",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2383,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("DATE$ = dateToSet$",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2384,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2385,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2387,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Date",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2388,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2389,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2390,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_date",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2391,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2392,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("DATE$",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2393,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2394,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2396,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CsrLin",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2397,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2398,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_csrlin",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2399,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2400,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CSRLIN",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2401,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2402,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2405,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Paint",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2406,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2407,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_paint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2408,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,2409,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2410,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?)[,[?][,[?][,?]]]",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2411,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PAINT [STEP] (x!, y!)[,[fillColor&] [,[bordercolor&] [,pattern$]]]",66)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2413,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2414,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2416,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Circle",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2417,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2418,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_circle",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2419,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 7 ; if(!qbevent)break;evnt(20996,2420,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2421,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[?][,[?][,[?][,?]]]]",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2422,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CIRCLE [STEP] (x!, y!), radius![, [color&] [, [start!] [, [end!] [, aspect!]]]]",79)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2424,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2425,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2427,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("BLoad",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2428,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2429,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_bload",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2430,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2431,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2432,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2433,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("BLOAD fileName$, VARPTR(imageArray%(index))",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2434,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2435,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2437,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("BSave",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2438,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2439,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_bsave",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2440,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2441,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2442,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("BSAVE saveFile$, VARPTR(array(index)), fileSize&",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2443,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2444,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2447,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Get",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2448,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2449,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_get",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2450,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 6 ; if(!qbevent)break;evnt(20996,2451,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2452,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?)-[{Step}](?,?),?[,?]",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2453,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("Step",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2454,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]",82)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2455,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2456,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2458,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Get",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2459,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2460,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_get",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2461,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 6 ; if(!qbevent)break;evnt(20996,2462,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2463,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?)-[{Step}](?,?),?[,?]",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2464,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("(",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2465,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]",82)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2466,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2467,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2470,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Put",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2471,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2472,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_put",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2473,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,2474,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2475,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]",57)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2476,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("Step",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2479,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PUT [STEP](column, row), Array([index])[,] [_CLIP] [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]",92)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2480,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2481,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2482,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Put",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2483,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2484,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_graphics_put",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2485,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,2486,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2487,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]",57)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2488,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("(",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2491,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PUT [STEP](column, row), Array([index])[,] [_CLIP] [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]",92)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2492,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2493,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2495,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Get",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2496,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2497,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_get",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2498,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2499,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2500,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2502,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("GET #fileNumber&, [position][, targetVariable|targetArray()}]",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2503,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2504,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2506,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Put",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2507,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2508,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_put",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2509,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2510,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2511,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2513,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PUT #filenumber&, [position][, {holdingvariable|holdingarray()}]",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2514,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2515,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2517,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Open",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2518,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2519,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_open",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2520,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 6 ; if(!qbevent)break;evnt(20996,2521,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2522,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2523,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("OPEN fileName$ [FOR mode] [ACCESS|LOCK|SHARED [{READ|WRITE}] AS [#]fileNumber& [LEN = recordLength]",99)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2524,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2525,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2527,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Open",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2528,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2529,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_open_gwbasic",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2530,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,2531,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2532,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,[#]?,?[,?]",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2533,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("OPEN modeLetter$, [#]fileNumber&, fileName$[, recordLength]",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2534,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2535,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2537,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Val",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2538,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2539,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_val",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2540,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2541,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2542,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2543,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("VAL(string_value$)",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2544,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2545,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2547,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKSMBF",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2548,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2549,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2550,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_mksmbf",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2551,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2552,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2553,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2554,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKSMBF$(value!)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2555,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2556,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2557,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKDMBF",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2558,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2559,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2560,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_mkdmbf",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2561,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2562,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2563,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2564,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKDMBF$(value#)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2565,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2566,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2568,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKI",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2569,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2570,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2571,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2572,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2573,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2574,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2575,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKI$(integerVariableOrLiteral%)",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2576,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2577,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2578,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKL",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2579,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2580,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2581,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2582,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2583,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2584,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2585,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKL$(longVariableOrLiteral&)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2586,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2587,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2588,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKS",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2589,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2590,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2591,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2592,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2593,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2594,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2595,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKS$(singlePrecisionVariableOrLiteral!)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2596,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2597,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2598,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("MKD",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2599,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2600,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2601,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2602,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2603,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2604,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2605,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MKD$(doublePrecisionVariableOrLiteral#)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2606,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2607,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2608,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("MK",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2609,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2610,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2611,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2612,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2613,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string( -1 ),l2string( -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2614,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2615,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_MK$(numericalType, numericalValue)",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2616,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2617,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2619,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVSMBF",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2620,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2621,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_cvsmbf",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2622,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2623,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2624,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2625,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CVSMBF(stringData$)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2626,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2627,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2628,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVDMBF",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2629,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2630,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_cvdmbf",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2631,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2632,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2633,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2634,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CVDMBF(stringData$)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2635,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2636,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2638,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVI",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2639,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2640,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2641,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2642,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2643,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2644,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CVI(stringData$)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2645,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2646,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2647,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVL",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2648,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2649,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2650,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2651,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2652,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2653,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CVL(stringData$)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2654,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2655,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2656,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVS",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2657,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2658,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2659,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2660,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2661,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2662,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CVS(stringData$)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2663,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2664,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2665,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("CVD",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2666,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2667,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2668,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2669,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2670,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2671,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CVD(stringData$)",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2672,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2673,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2674,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CV",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2675,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2676,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2677,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2678,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2679,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))= -1 ; if(!qbevent)break;evnt(20996,2680,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CV(numericalType, MKstringValue$)",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2681,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2682,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2684,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("String",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2685,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2686,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2687,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_string",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2688,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2689,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2690,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2691,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("STRING$(count&, {character$ | ASCIIcode%})",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2692,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2693,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2695,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Space",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2696,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2697,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2698,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_space",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2699,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2700,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2701,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2702,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SPACE$(count&)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2703,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2704,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2706,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("InStr",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2707,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2708,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_instr",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2709,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2710,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2711,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2712,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?],?,?",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2713,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("INSTR([start%,] baseString$, searchString$)",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2714,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2715,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2717,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("InStrRev",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2718,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2719,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__instrrev",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2720,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2721,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2722,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2723,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?],?,?",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2724,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_INSTRREV([start%,] baseString$, searchString$)",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2725,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2726,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2728,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Mid",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2729,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2730,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2731,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_mid",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2732,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,2733,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2734,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2735,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?,[?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2736,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("MID$(stringValue$, startPosition%[, bytes%])",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2737,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2738,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2740,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("SAdd",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2741,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2742,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2743,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2744,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2745,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2746,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SADD(stringVariable$)",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2747,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2748,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2750,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Cls",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2751,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2752,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_cls",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2753,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2754,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2755,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?][,?]",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2756,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CLS [method%] [, bgColor&]",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2757,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2758,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2760,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Sqr",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2761,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2762,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_sqr",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2763,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2764,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2765,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2766,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SQR(value)",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2767,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2768,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2770,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Chr",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2771,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2772,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2773,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_chr",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2774,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2775,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2776,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2777,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("CHR$(code%)",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2778,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2779,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2781,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VarPtr",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2782,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2783,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2784,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2785,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2786,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2787,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2788,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("VARPTR(variable_name[(reference_index%)])",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2789,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2790,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2792,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VarPtr",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2793,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2794,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2795,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2796,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2797,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2798,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("VARPTR(variable_name[(reference_index%)])",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2799,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2800,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2802,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Offset",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2803,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2804,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2805,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2806,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2807,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2808,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_OFFSET(variable)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2809,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2810,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2812,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("VarSeg",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2813,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2814,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2815,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2816,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2817,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2818,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("VARSEG(variable_name[(start_index)])",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2819,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2820,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2822,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Poke",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2823,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2824,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_poke",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2825,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2826,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2827,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("POKE segment_offset, offset_value",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2828,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2829,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2831,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Peek",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2832,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2833,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_peek",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2834,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2835,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2836,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2837,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PEEK(segment_offset)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2838,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2839,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2841,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Def",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2842,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2843,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_defseg",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2844,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2845,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2846,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{Seg}[=?]",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2847,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("Seg",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2848,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("DEF SEG [=][{segment|VARSEG(variable}]",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2849,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2850,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2852,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Sin",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2853,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2854,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sin",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2855,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2856,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2857,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2858,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SIN(radian_angle!)",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2859,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2860,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2862,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Cos",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2863,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2864,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("cos",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2865,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2866,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2867,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2868,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("COS(radian_angle!)",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2869,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2870,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2872,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Tan",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2873,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2874,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("tan",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2875,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2876,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2877,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2878,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("TAN(radian_angle!)",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2879,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2880,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2882,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Atn",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2883,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2884,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("atan",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2885,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2886,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2887,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2888,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ATN(tangent!)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2889,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2890,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2892,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Log",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2893,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2894,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_log",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2895,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2896,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2897,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2898,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LOG(value)",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2899,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2900,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2902,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Abs",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2903,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2904,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_abs",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2905,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2906,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2907,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2908,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ABS(numericalValue)",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2909,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2910,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2912,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Erl",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2913,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2914,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("get_error_erl",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2915,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,2916,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2917,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ERL",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2918,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2919,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2921,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Err",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2922,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2923,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("get_error_err",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2924,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,2925,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2926,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ERR",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2927,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2928,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2930,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Error",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2931,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2932,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("error",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2933,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2934,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2935,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ERROR codeNumber%",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2936,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2937,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2939,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Line",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2940,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2941,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_line",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2942,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 7 ; if(!qbevent)break;evnt(20996,2943,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2944,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[[{Step}](?,?)]-[{Step}](?,?)[,[?][,[{B|BF}][,?]]]",50)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2945,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LINE [STEP] [(column1, row1)]-[STEP] (column2, row2), color[, [{B|BF}], style%]",79)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2946,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2947,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2949,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Sound",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2950,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2950,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2951,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_sound",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2952,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,2953,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2954,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SOUND frequency, duration",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2955,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2956,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2958,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Beep",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2959,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 4 ; if(!qbevent)break;evnt(20996,2959,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2960,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_beep",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2961,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,2962,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("BEEP",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2963,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2964,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2966,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Timer",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2967,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2968,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_timer",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2969,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2970,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2971,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2972,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2973,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("TIMER[(accuracy!)]",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2974,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2975,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2977,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Rnd",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2978,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,2979,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_rnd",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2980,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2981,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2982,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,2983,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2984,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("RND[(behavior)]",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2985,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2986,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2988,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Randomize",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2989,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,2990,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_randomize",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2991,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,2992,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2993,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[[{Using}]?]",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2994,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("RANDOMIZE [USING] {seednumber|TIMER}",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2995,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,2996,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,2998,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Out",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,2999,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3000,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_out",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3001,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3002,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3003,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("OUT registerAddress%, value%",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3004,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3005,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3007,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PCopy",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3008,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3009,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_pcopy",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3010,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3011,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3012,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PCOPY sourcePage%, destinationPage%",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3013,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3014,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3016,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("View",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3017,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3018,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_view",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3019,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 6 ; if(!qbevent)break;evnt(20996,3020,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3021,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[[{Screen}](?,?)-(?,?)[,[?][,?]]]",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3022,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(2125)),256,1),qbs_new_txt_len("Print",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3023,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("VIEW [SCREEN] (column1, row1)-(column2, row2)[, color][, border]",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3024,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3025,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3027,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("View",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3028,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3029,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_view_print",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3030,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3031,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3032,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{Print}[?{To}?]",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3033,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1869)),256,1),qbs_new_txt_len("Print",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3034,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("VIEW PRINT [topRow% TO bottomRow%]",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3035,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3036,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3038,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Window",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3039,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3040,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_window",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3041,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(20996,3042,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3043,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[[{Screen}](?,?)-(?,?)]",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3044,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("WINDOW [[SCREEN] (x1!, y1!) - (x2!, y2!)]",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3045,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3046,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3048,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Locate",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3049,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3050,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_locate",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3051,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,3052,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3053,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3054,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LOCATE [row%][, column%] [, cursor%][, cursorStart%, cursorStop%]",65)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3055,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3056,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3058,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Color",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3059,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3060,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_sub_color",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3061,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,3062,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3063,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?][,[?][,?]]",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3064,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("COLOR [foreground&][, background&]",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3065,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3066,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3068,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Palette",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3069,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3070,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_palette",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3071,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3072,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3073,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3074,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PALETTE [attribute%, red% + (green% * 256) + (blue% * 65536)] or PALETTE [existingAttribute%, newAttribute%]",108)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3075,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3076,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3078,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Width",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3079,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3080,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbsub_width",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3081,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,3082,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3083,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{#|LPrint}][?][,[?][,[?][,[?]]]]",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3084,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("WIDTH [columns%][, rows%] or WIDTH {file_number|device}, columnwidth%",69)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3086,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3087,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3090,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Screen",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3091,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3092,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbg_screen",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3093,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 5 ; if(!qbevent)break;evnt(20996,3094,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3095,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,[{_ManualDisplay}?]]]]]",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3099,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("SCREEN {mode%|imagehandle&} [, , active_page, visual_page]",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3100,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3101,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3103,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PSet",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3104,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3105,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_pset",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3106,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,3107,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3108,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?)[,?]",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3109,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PSET [STEP](column%, row%)[, colorAttribute]",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3110,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3111,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3113,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("PReset",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3114,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3115,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_preset",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3116,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 3 ; if(!qbevent)break;evnt(20996,3117,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3118,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{Step}](?,?)[,?]",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3119,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PRESET [STEP](column%, row%)[, colorAttribute]",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3120,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3121,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3123,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Asc",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3124,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3125,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_asc",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3126,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3127,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3128,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3129,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("ASC(text$[, position%])",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3130,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3131,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3133,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Len",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3134,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3135,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3136,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3137,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3138,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3139,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LEN(literalTextOrVariable$)",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3140,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3141,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3143,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("InKey",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3144,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3145,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3146,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_inkey",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3147,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3148,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("INKEY$",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3149,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3150,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3152,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Str",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3153,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3154,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3155,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_str",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3156,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3157,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string( -1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3158,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3159,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("STR$(number)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3160,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3161,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3163,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("UCase",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3164,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3165,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3166,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_ucase",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3167,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3168,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3169,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3170,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("UCASE$(text$)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3171,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3172,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3174,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LCase",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3175,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3176,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3177,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_lcase",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3178,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3179,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3180,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3181,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LCASE$(text$)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3182,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3183,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3185,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Left",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3186,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3187,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3188,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_left",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3189,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3190,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3191,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3192,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LEFT$(stringValue$, numberOfCharacters%)",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3193,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3194,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3196,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Right",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3197,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3198,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3199,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_right",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3200,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3201,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3202,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3203,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("RIGHT$(stringValue$, numberOfCharacters%)",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3204,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3205,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3207,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LTrim",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3208,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3209,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3210,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_ltrim",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3211,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3212,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3213,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3214,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LTRIM$(text$)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3215,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3216,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3218,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("RTrim",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3219,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3220,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3221,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_rtrim",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3222,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3223,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3224,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3225,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("RTRIM$(text$)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3226,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3227,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3229,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Trim",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3230,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3231,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3232,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs__trim",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3233,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3234,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3235,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3236,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_TRIM$(text$)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3237,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3238,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3240,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("Print",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3241,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3242,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_print",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3243,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3244,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3245,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("PRINT [expression] [{;|,] [expression...]",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3246,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3247,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3249,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LPrint",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3250,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 9 ; if(!qbevent)break;evnt(20996,3250,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3251,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("qbs_lprint",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3252,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3253,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3254,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LPRINT [expression] [{;|,}]",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3255,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3256,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3258,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_new_txt_len("LPos",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3259,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 9 ; if(!qbevent)break;evnt(20996,3259,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3260,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_lpos",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3261,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3262,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3263,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3264,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("LPOS(index%)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3265,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3266,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3269,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CWD",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3270,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3271,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3272,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__cwd",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3273,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3274,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CWD$",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3275,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3276,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3279,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("StartDir",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3280,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3281,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3282,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__startdir",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3283,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3284,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_STARTDIR$",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3285,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3286,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3289,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Dir",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3290,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3291,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3292,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__dir",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3293,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3294,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3295,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3296,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_DIR$(",6),func_chr( 34 )),qbs_new_txt_len("folderspecification",19)),func_chr( 34 )),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3297,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3298,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3301,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("InclErrorFile",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3302,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3303,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3304,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__inclerrorfile",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3305,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3306,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_INCLERRORFILE$",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3307,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3308,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3310,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("KeyClear",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3311,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3312,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3313,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3314,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3315,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__keyclear",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3316,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_KEYCLEAR buffer&",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3317,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3318,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3320,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("D2R",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3321,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3322,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_deg2rad",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3323,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3324,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3325,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3326,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_D2R(angleInDegrees!)",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3327,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3328,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3330,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("D2G",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3331,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3332,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_deg2grad",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3333,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3334,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3335,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3336,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_D2G(angleInDegrees!)",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3337,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3338,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3340,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("R2D",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3341,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3342,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_rad2deg",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3343,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3344,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3345,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3346,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_R2D(angleInRadians!)",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3347,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3348,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3350,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("R2G",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3351,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3352,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_rad2grad",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3353,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3354,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3355,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3356,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_R2G(angleInRadians!)",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3357,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3358,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3360,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("G2D",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3361,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3362,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_grad2deg",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3363,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3364,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3365,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3366,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_G2D(gradient!)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3367,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3368,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3370,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("G2R",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3371,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3372,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_grad2rad",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3373,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3374,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3375,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3376,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_G2R(gradient!)",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3377,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3378,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3380,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Atan2",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3381,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3382,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("atan2",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3383,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3384,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3385,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3386,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ATAN2(y, x)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3387,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3388,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3390,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Hypot",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3391,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3392,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("hypot",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3393,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3394,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3395,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3396,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_HYPOT(x, y)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3397,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3398,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3400,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Asin",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3401,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3402,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("asin",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3403,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3404,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3405,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3406,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ASIN(sine_value!)",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3407,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3408,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3410,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Acos",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3411,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3412,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("acos",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3413,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3414,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3415,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3416,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ACOS(cosine_value!)",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3417,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3418,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3420,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Sinh",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3421,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3422,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sinh",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3423,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3424,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3425,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3426,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SINH(value)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3427,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3428,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3430,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Cosh",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3431,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3432,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("cosh",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3433,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3434,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3435,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3436,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_COSH(value)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3437,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3438,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3440,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Tanh",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3441,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3442,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("tanh",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3443,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3444,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3445,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3446,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_TANH(value)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3447,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3448,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3450,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Asinh",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3451,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3452,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("asinh",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3453,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3454,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3455,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3456,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ASINH(value)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3457,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3458,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3460,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Acosh",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3461,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3462,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("acosh",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3463,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3464,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3465,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3466,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ACOSH(value)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3467,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3468,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3470,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Atanh",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3471,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3472,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("atanh",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3473,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3474,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3475,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3476,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ATANH(value)",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3477,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3478,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3480,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Ceil",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3481,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3482,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("ceil",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3483,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3484,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3485,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3486,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CEIL(expression)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3487,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3488,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3490,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Pi",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3491,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3492,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_pi",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3493,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3494,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3495,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3496,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3497,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_PI[(multiplier)]",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3498,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3499,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3501,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DesktopHeight",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3502,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3503,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_screenheight",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3504,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3505,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3506,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DESKTOPHEIGHT",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3507,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3508,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3510,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("DesktopWidth",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3511,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3512,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_screenwidth",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3513,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3514,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3515,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DESKTOPWIDTH",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3516,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3517,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3519,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenIcon",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3520,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3521,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub_screenicon",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3522,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENICON",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3523,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3524,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3526,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenExists",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3527,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3528,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_windowexists",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3529,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENEXISTS",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3530,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3531,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3533,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ControlChr",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3534,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3535,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__controlchr",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3536,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3537,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3538,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONTROLCHR",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3539,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3540,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3542,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("StriCmp",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3543,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3544,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__str_nc_compare",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3545,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3546,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3547,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3548,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_STRICMP(string1$, string2$)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3549,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3550,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3552,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("StrCmp",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3553,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3554,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__str_compare",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3555,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3556,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3557,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3558,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_STRCMP(string1$, string2$)",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3559,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3560,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3562,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Arcsec",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3563,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3564,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_arcsec",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3565,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3566,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3567,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3568,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ARCSEC(value)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3569,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3570,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3572,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Arccsc",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3573,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3574,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_arccsc",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3575,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3576,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3577,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3578,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ARCCSC(value)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3579,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3580,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3582,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Arccot",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3583,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3584,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_arccot",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3585,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3586,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3587,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3588,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ARCCOT(value)",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3589,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3590,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3592,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Sech",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3593,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3594,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_sech",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3595,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3596,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3597,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3598,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SECH(value)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3599,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3600,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3602,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Csch",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3603,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3604,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_csch",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3605,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3606,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3607,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3608,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CSCH(value)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3609,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3610,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3612,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Coth",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3613,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3614,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_coth",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3615,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3616,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3617,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3618,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_COTH(value)",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3619,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3620,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3622,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Sec",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3623,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3624,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_sec",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3625,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3626,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3627,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3628,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SEC(value)",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3629,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3630,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3632,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Csc",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3633,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3634,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_csc",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3635,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3636,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3637,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3638,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CSC(value)",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3639,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3640,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3642,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Cot",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3643,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3644,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_cot",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3645,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3646,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3647,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3648,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_COT(value)",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3649,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3650,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3652,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScreenIcon",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3653,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3654,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func_screenicon",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3655,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3656,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3657,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCREENICON",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3658,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3659,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3661,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("AutoDisplay",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3662,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3663,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__autodisplay",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3664,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3665,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3666,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_AUTODISPLAY",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3667,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3668,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3670,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ShR",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3671,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3672,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__shr",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3673,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3674,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3675,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3676,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SHR(numericalVariable, numericalValue)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3677,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3678,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3680,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ShL",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3681,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3682,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__shl",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3683,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3684,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3685,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3686,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SHL(numericalVariable, numericalValue)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3687,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3688,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3691,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("RoL",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3692,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3693,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3694,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3695,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3696,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ROL(numericalVariable, numericalValue)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3697,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3698,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3700,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("RoR",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3701,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3702,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3703,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3704,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3705,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_ROR(numericalVariable, numericalValue)",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3706,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3707,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3710,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Deflate",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3711,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 13 ; if(!qbevent)break;evnt(20996,3712,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3713,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3714,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__deflate",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3715,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3716,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3717,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3718,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_DEFLATE$(stringToCompress$)",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3719,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3720,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3722,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Inflate",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3723,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(546))= 13 ; if(!qbevent)break;evnt(20996,3724,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1),qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3725,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3726,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__inflate",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3727,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3728,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3729,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?[,?]",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3730,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3731,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_INFLATE$(stringToDecompress$[, originalSize&])",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3732,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3733,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3735,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CInp",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3736,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3737,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__cinp",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3738,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3739,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3740,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[?]",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3741,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3742,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CINP",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3743,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3744,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3746,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CapsLock",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3747,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3748,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__capslock",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3749,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3750,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3751,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CAPSLOCK",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3752,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3753,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3755,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ScrollLock",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3756,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3757,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__scrolllock",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3758,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3759,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3760,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCROLLLOCK",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3761,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3762,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3764,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("NumLock",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3765,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3766,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__numlock",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3767,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3768,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3769,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_NUMLOCK",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3770,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3771,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3773,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("CapsLock",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3774,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3775,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__capslock",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3776,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3777,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3778,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3779,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CAPSLOCK {On|Off|_Toggle}",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3780,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3781,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3783,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Scrolllock",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3784,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3785,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__scrolllock",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3786,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3787,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3788,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3789,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SCROLLLOCK {On|Off|_Toggle}",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3790,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3791,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3793,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("Numlock",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3794,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3795,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__numlock",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3796,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3797,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 1 ; if(!qbevent)break;evnt(20996,3798,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3799,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_NUMLOCK {On|Off|_Toggle}",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3800,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3801,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3803,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ConsoleFont",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3804,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3805,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__consolefont",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3806,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3807,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3808,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONSOLEFONT fontFile$",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3809,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3810,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3812,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ConsoleCursor",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3813,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(20996,3814,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("sub__console_cursor",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3815,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3816,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3817,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("[{_Show|_Hide}][,?]",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3818,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONSOLECURSOR {_Show|_Hide}[, size%]",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3819,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3820,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3822,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ConsoleInput",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3823,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3824,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__getconsoleinput",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3825,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 0 ; if(!qbevent)break;evnt(20996,3826,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3827,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_CONSOLEINPUT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3828,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3829,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3831,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ReadBit",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3832,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3833,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__readbit",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3834,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3835,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3836,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3837,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_READBIT(numericalVariable, numericalValue)",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3838,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3839,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3841,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("SetBit",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3842,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3843,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__setbit",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3844,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3845,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3846,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3847,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_SETBIT(numericalVariable, numericalValue)",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3848,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3849,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3851,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ResetBit",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3852,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3853,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__resetbit",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3854,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3855,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3856,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3857,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_RESETBIT(numericalVariable, numericalValue)",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3858,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3859,"subs_functions.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(20996,3861,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("ToggleBit",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3862,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 1 ; if(!qbevent)break;evnt(20996,3863,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__togglebit",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3864,"subs_functions.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 2 ; if(!qbevent)break;evnt(20996,3865,"subs_functions.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3866,"subs_functions.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(20996,3867,"subs_functions.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_new_txt_len("_TOGGLEBIT(numericalVariable, numericalValue)",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(20996,3868,"subs_functions.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(20996,3869,"subs_functions.bas");}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(20997);}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; } 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 "data35.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21024);}while(r); do{ *_SUB_REMOVEELEMENTS_LONG_N=FUNC_NUMELEMENTS(_SUB_REMOVEELEMENTS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21029);}while(r); S_28344:; fornext_value2998= 1 ; fornext_finalvalue2998=*_SUB_REMOVEELEMENTS_LONG_N; fornext_step2998= 1 ; if (fornext_step2998<0) fornext_step_negative2998=1; else fornext_step_negative2998=0; if (new_error) goto fornext_error2998; goto fornext_entrylabel2998; while(1){ fornext_value2998=fornext_step2998+(*_SUB_REMOVEELEMENTS_LONG_I); fornext_entrylabel2998: *_SUB_REMOVEELEMENTS_LONG_I=fornext_value2998; if (fornext_step_negative2998){ if (fornext_value2998fornext_finalvalue2998) break; } fornext_error2998:; if(qbevent){evnt(21030);if(r)goto S_28344;} S_28345:; if (((-(*_SUB_REMOVEELEMENTS_LONG_I<*_SUB_REMOVEELEMENTS_LONG_FIRST))|(-(*_SUB_REMOVEELEMENTS_LONG_I>*_SUB_REMOVEELEMENTS_LONG_LAST)))||new_error){ if(qbevent){evnt(21031);if(r)goto S_28345;} 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(21032);}while(r); }else{ S_28348:; if ((*_SUB_REMOVEELEMENTS_LONG_KEEPINDEXING)||new_error){ if(qbevent){evnt(21034);if(r)goto S_28348;} 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(21034);}while(r); } } fornext_continue_2997:; } fornext_exit_2997:; S_28353:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_REMOVEELEMENTS_STRING_A2, 1 ),__STRING1_SP)))||new_error){ if(qbevent){evnt(21037);if(r)goto S_28353;} 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(21037);}while(r); } do{ qbs_set(_SUB_REMOVEELEMENTS_STRING_A,_SUB_REMOVEELEMENTS_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21039);}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; } 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 "data36.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_28357:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_SYMBOLTYPE_STRING_S->len== 0 )))||new_error){ if(qbevent){evnt(21048);if(r)goto S_28357;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21048);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_A=qbs_asc(_FUNC_SYMBOLTYPE_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21050);}while(r); do{ *_FUNC_SYMBOLTYPE_LONG_L=_FUNC_SYMBOLTYPE_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21051);}while(r); S_28362:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 37 ))||new_error){ if(qbevent){evnt(21052);if(r)goto S_28362;} S_28363:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21053);if(r)goto S_28363;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 16 ; if(!qbevent)break;evnt(21053);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21053);}while(r); } S_28367:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 2 ))||new_error){ if(qbevent){evnt(21054);if(r)goto S_28367;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21054);}while(r); } S_28370:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 37 )))||new_error){ if(qbevent){evnt(21055);if(r)goto S_28370;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 8 ; if(!qbevent)break;evnt(21055);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21055);}while(r); } S_28374:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 38 )))||new_error){ if(qbevent){evnt(21056);if(r)goto S_28374;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21056);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21056);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21057);}while(r); } S_28380:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 38 ))||new_error){ if(qbevent){evnt(21059);if(r)goto S_28380;} S_28381:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21060);if(r)goto S_28381;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 32 ; if(!qbevent)break;evnt(21060);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21060);}while(r); } S_28385:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 2 ))||new_error){ if(qbevent){evnt(21061);if(r)goto S_28385;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21061);}while(r); } S_28388:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 38 )))||new_error){ if(qbevent){evnt(21062);if(r)goto S_28388;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 ; if(!qbevent)break;evnt(21062);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21062);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21063);}while(r); } S_28394:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 33 ))||new_error){ if(qbevent){evnt(21065);if(r)goto S_28394;} S_28395:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21066);if(r)goto S_28395;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 32 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(21066);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21066);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21067);}while(r); } S_28401:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 35 ))||new_error){ if(qbevent){evnt(21069);if(r)goto S_28401;} S_28402:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21070);if(r)goto S_28402;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(21070);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21070);}while(r); } S_28406:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 2 ))||new_error){ if(qbevent){evnt(21071);if(r)goto S_28406;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21071);}while(r); } S_28409:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 )== 35 )))||new_error){ if(qbevent){evnt(21072);if(r)goto S_28409;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 +*__LONG_ISFLOAT; if(!qbevent)break;evnt(21072);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21072);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21073);}while(r); } S_28415:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 36 ))||new_error){ if(qbevent){evnt(21075);if(r)goto S_28415;} S_28416:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21076);if(r)goto S_28416;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_ISSTRING; if(!qbevent)break;evnt(21076);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21076);}while(r); } S_28420:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 1 ))))||new_error){ if(qbevent){evnt(21077);if(r)goto S_28420;} S_28421:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L>=( 1 + 10 )))||new_error){ if(qbevent){evnt(21078);if(r)goto S_28421;} S_28422:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L>( 1 + 10 )))||new_error){ if(qbevent){evnt(21079);if(r)goto S_28422;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21079);}while(r); } S_28425:; if ((qbs_cleanup(qbs_tmp_base,qbs_greaterthan(_FUNC_SYMBOLTYPE_STRING_S,qbs_new_txt_len("$2147483647",11))))||new_error){ if(qbevent){evnt(21080);if(r)goto S_28425;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21080);}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(21082);}while(r); do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(21083);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21084);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21086);}while(r); } S_28435:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 96 ))||new_error){ if(qbevent){evnt(21088);if(r)goto S_28435;} S_28436:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21089);if(r)goto S_28436;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 1 +*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(21089);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21089);}while(r); } S_28440:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 1 ))))||new_error){ if(qbevent){evnt(21090);if(r)goto S_28440;} S_28441:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 3 ))||new_error){ if(qbevent){evnt(21091);if(r)goto S_28441;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21091);}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(21092);}while(r); S_28445:; if ((-(*_FUNC_SYMBOLTYPE_LONG_N> 64 ))||new_error){ if(qbevent){evnt(21093);if(r)goto S_28445;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21093);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*_FUNC_SYMBOLTYPE_LONG_N+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(21094);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21094);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21096);}while(r); } S_28453:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 126 ))||new_error){ if(qbevent){evnt(21098);if(r)goto S_28453;} S_28454:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 1 ))||new_error){ if(qbevent){evnt(21099);if(r)goto S_28454;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21099);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_A=qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 2 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21100);}while(r); S_28458:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 37 ))||new_error){ if(qbevent){evnt(21101);if(r)goto S_28458;} S_28459:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 2 ))||new_error){ if(qbevent){evnt(21102);if(r)goto S_28459;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 16 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(21102);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21102);}while(r); } S_28463:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 3 ))||new_error){ if(qbevent){evnt(21103);if(r)goto S_28463;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21103);}while(r); } S_28466:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 3 )== 37 )))||new_error){ if(qbevent){evnt(21104);if(r)goto S_28466;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 8 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(21104);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21104);}while(r); } S_28470:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 3 )== 38 )))||new_error){ if(qbevent){evnt(21105);if(r)goto S_28470;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21105);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21105);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21106);}while(r); } S_28476:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 38 ))||new_error){ if(qbevent){evnt(21108);if(r)goto S_28476;} S_28477:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 2 ))||new_error){ if(qbevent){evnt(21109);if(r)goto S_28477;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 32 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(21109);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21109);}while(r); } S_28481:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 3 ))||new_error){ if(qbevent){evnt(21110);if(r)goto S_28481;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21110);}while(r); } S_28484:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SYMBOLTYPE_STRING_S, 3 )== 38 )))||new_error){ if(qbevent){evnt(21111);if(r)goto S_28484;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 64 +*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(21111);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21111);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21112);}while(r); } S_28490:; if ((-(*_FUNC_SYMBOLTYPE_LONG_A== 96 ))||new_error){ if(qbevent){evnt(21114);if(r)goto S_28490;} S_28491:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L== 2 ))||new_error){ if(qbevent){evnt(21115);if(r)goto S_28491;} do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE= 1 +*__LONG_ISOFFSETINBITS+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(21115);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21115);}while(r); } S_28495:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISUINTEGER(qbs_right(_FUNC_SYMBOLTYPE_STRING_S,*_FUNC_SYMBOLTYPE_LONG_L- 2 ))))||new_error){ if(qbevent){evnt(21116);if(r)goto S_28495;} S_28496:; if ((-(*_FUNC_SYMBOLTYPE_LONG_L> 4 ))||new_error){ if(qbevent){evnt(21117);if(r)goto S_28496;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21117);}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(21118);}while(r); S_28500:; if ((-(*_FUNC_SYMBOLTYPE_LONG_N> 64 ))||new_error){ if(qbevent){evnt(21119);if(r)goto S_28500;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21119);}while(r); } do{ *_FUNC_SYMBOLTYPE_LONG_SYMBOLTYPE=*_FUNC_SYMBOLTYPE_LONG_N+*__LONG_ISOFFSETINBITS+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(21120);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21120);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21122);}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; 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 "data37.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(21128);}while(r); S_28510:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21128);if(r)goto S_28510;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21128);}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(21129);}while(r); S_28514:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21129);if(r)goto S_28514;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21129);}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(21130);}while(r); S_28518:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21130);if(r)goto S_28518;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21130);}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(21131);}while(r); S_28522:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21131);if(r)goto S_28522;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21131);}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(21132);}while(r); S_28526:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21132);if(r)goto S_28526;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21132);}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(21133);}while(r); S_28530:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21133);if(r)goto S_28530;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21133);}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(21134);}while(r); S_28534:; if ((*_FUNC_REMOVESYMBOL_LONG_I)||new_error){ if(qbevent){evnt(21134);if(r)goto S_28534;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(21134);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21135);}while(r); LABEL_FOUNDSYMBOL:; if(qbevent){evnt(21136);r=0;} S_28538:; if ((-(*_FUNC_REMOVESYMBOL_LONG_I== 1 ))||new_error){ if(qbevent){evnt(21137);if(r)goto S_28538;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name before symbol",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21137);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21137);}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(21138);}while(r); S_28543:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_SYMBOLTYPE(_FUNC_REMOVESYMBOL_STRING_SYMBOL)== 0 )))||new_error){ if(qbevent){evnt(21139);if(r)goto S_28543;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid symbol",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21139);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21139);}while(r); } do{ qbs_set(_FUNC_REMOVESYMBOL_STRING_REMOVESYMBOL,_FUNC_REMOVESYMBOL_STRING_SYMBOL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21140);}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(21141);}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_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 "data38.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_28549:; if ((*(int16*)(((char*)__UDT_ID)+(2645)))||new_error){ if(qbevent){evnt(21145);if(r)goto S_28549;} 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(21145);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21145);}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(21146);}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; 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 "data39.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_SEPERATEARGS_LONG_PASS= 0 ; if(!qbevent)break;evnt(21150);}while(r); S_28555:; fornext_value3008= 1 ; fornext_finalvalue3008=*__LONG_OPTMAX; fornext_step3008= 1 ; if (fornext_step3008<0) fornext_step_negative3008=1; else fornext_step_negative3008=0; if (new_error) goto fornext_error3008; goto fornext_entrylabel3008; while(1){ fornext_value3008=fornext_step3008+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3008: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3008; if (fornext_step_negative3008){ if (fornext_value3008fornext_finalvalue3008) break; } fornext_error3008:; if(qbevent){evnt(21152);if(r)goto S_28555;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21152);}while(r); fornext_continue_3007:; } fornext_exit_3007:; S_28558:; fornext_value3010= 1 ; fornext_finalvalue3010=*__LONG_OPTMAX+ 1 ; 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_SEPERATEARGS_LONG_I); fornext_entrylabel3010: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3010; if (fornext_step_negative3010){ if (fornext_value3010fornext_finalvalue3010) break; } fornext_error3010:; if(qbevent){evnt(21153);if(r)goto S_28558;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21153);}while(r); fornext_continue_3009:; } fornext_exit_3009:; S_28561:; fornext_value3012= 1 ; fornext_finalvalue3012=*__LONG_OPTMAX; fornext_step3012= 1 ; if (fornext_step3012<0) fornext_step_negative3012=1; else fornext_step_negative3012=0; if (new_error) goto fornext_error3012; goto fornext_entrylabel3012; while(1){ fornext_value3012=fornext_step3012+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3012: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3012; if (fornext_step_negative3012){ if (fornext_value3012fornext_finalvalue3012) break; } fornext_error3012:; if(qbevent){evnt(21154);if(r)goto S_28561;} 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(21155);}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(21156);}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(21157);}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(21158);}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(21159);}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(21160);}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(21161);}while(r); fornext_continue_3011:; } fornext_exit_3011:; do{ if(!qbevent)break;evnt(21164);}while(r); do{ memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 0),(((char*)__UDT_ID)+(0)+ 0), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 256),(((char*)__UDT_ID)+(0)+ 256), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 512),(((char*)__UDT_ID)+(0)+ 512), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 516),(((char*)__UDT_ID)+(0)+ 516), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 518),(((char*)__UDT_ID)+(0)+ 518), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 520),(((char*)__UDT_ID)+(0)+ 520), 8); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 528),(((char*)__UDT_ID)+(0)+ 528), 8); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 536),(((char*)__UDT_ID)+(0)+ 536), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 540),(((char*)__UDT_ID)+(0)+ 540), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 544),(((char*)__UDT_ID)+(0)+ 544), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 546),(((char*)__UDT_ID)+(0)+ 546), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 548),(((char*)__UDT_ID)+(0)+ 548), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 550),(((char*)__UDT_ID)+(0)+ 550), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 806),(((char*)__UDT_ID)+(0)+ 806), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 808),(((char*)__UDT_ID)+(0)+ 808), 1); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 809),(((char*)__UDT_ID)+(0)+ 809), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 811),(((char*)__UDT_ID)+(0)+ 811), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 813),(((char*)__UDT_ID)+(0)+ 813), 400); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 1213),(((char*)__UDT_ID)+(0)+ 1213), 400); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 1613),(((char*)__UDT_ID)+(0)+ 1613), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 1869),(((char*)__UDT_ID)+(0)+ 1869), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2125),(((char*)__UDT_ID)+(0)+ 2125), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2381),(((char*)__UDT_ID)+(0)+ 2381), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2385),(((char*)__UDT_ID)+(0)+ 2385), 256); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2641),(((char*)__UDT_ID)+(0)+ 2641), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2645),(((char*)__UDT_ID)+(0)+ 2645), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2647),(((char*)__UDT_ID)+(0)+ 2647), 100); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2747),(((char*)__UDT_ID)+(0)+ 2747), 100); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2847),(((char*)__UDT_ID)+(0)+ 2847), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2851),(((char*)__UDT_ID)+(0)+ 2851), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2853),(((char*)__UDT_ID)+(0)+ 2853), 2); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2855),(((char*)__UDT_ID)+(0)+ 2855), 4); memcpy((((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2859),(((char*)__UDT_ID)+(0)+ 2859), 2); qbs_set(*(qbs**)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(0)+ 2861), *(qbs**)(((char*)__UDT_ID)+(0)+ 2861)); if(!qbevent)break;evnt(21166);}while(r); S_28572:; if ((-(*(int16*)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(809))== 0 ))||new_error){ if(qbevent){evnt(21168);if(r)goto S_28572;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21168);}while(r); } do{ qbs_set(_FUNC_SEPERATEARGS_STRING_S,qbs_new_fixed((((uint8*)_FUNC_SEPERATEARGS_UDT_ID2)+(1613)),256,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21171);}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(21172);}while(r); S_28577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(21175);if(r)goto S_28577;} S_28578:; fornext_value3014= 1 ; fornext_finalvalue3014=*(int16*)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(809)); fornext_step3014= 1 ; if (fornext_step3014<0) fornext_step_negative3014=1; else fornext_step_negative3014=0; if (new_error) goto fornext_error3014; goto fornext_entrylabel3014; while(1){ fornext_value3014=fornext_step3014+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3014: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3014; if (fornext_step_negative3014){ if (fornext_value3014fornext_finalvalue3014) break; } fornext_error3014:; if(qbevent){evnt(21176);if(r)goto S_28578;} S_28579:; if ((-(*_FUNC_SEPERATEARGS_LONG_I!= 1 ))||new_error){ if(qbevent){evnt(21177);if(r)goto S_28579;} 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(21177);}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(21177);}while(r); } fornext_continue_3013:; } fornext_exit_3013:; } do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG= 1 ; if(!qbevent)break;evnt(21183);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_NEXTENTRYLEVEL= 0 ; if(!qbevent)break;evnt(21184);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_NEXTENTRYLEVELSET= 1 ; if(!qbevent)break;evnt(21185);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL= 0 ; if(!qbevent)break;evnt(21186);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LASTT= 0 ; if(!qbevent)break;evnt(21187);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL= 0 ; if(!qbevent)break;evnt(21188);}while(r); S_28592:; fornext_value3016= 1 ; fornext_finalvalue3016=_FUNC_SEPERATEARGS_STRING_S->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_SEPERATEARGS_LONG_I); fornext_entrylabel3016: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3016; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3016){ if (fornext_value3016fornext_finalvalue3016) break; } fornext_error3016:; if(qbevent){evnt(21189);if(r)goto S_28592;} 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(21190);}while(r); S_28594:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("[",1))))||new_error){ if(qbevent){evnt(21192);if(r)goto S_28594;} do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL+ 1 ; if(!qbevent)break;evnt(21193);}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(21194);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(21195);}while(r); } S_28599:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(21198);if(r)goto S_28599;} do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; if(!qbevent)break;evnt(21199);}while(r); S_28601:; if ((-(*_FUNC_SEPERATEARGS_LONG_LEVEL<*_FUNC_SEPERATEARGS_LONG_DITCHLEVEL))||new_error){ if(qbevent){evnt(21200);if(r)goto S_28601;} do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(21200);}while(r); } do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(21201);}while(r); } S_28606:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("{",1))))||new_error){ if(qbevent){evnt(21204);if(r)goto S_28606;} do{ *_FUNC_SEPERATEARGS_LONG_LASTT=*_FUNC_SEPERATEARGS_LONG_LASTT+ 1 ; if(!qbevent)break;evnt(21205);}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(21205);}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(21205);}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(21206);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(21206);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I+ 1 ; if(!qbevent)break;evnt(21207);}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(21208);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_NUMOPTS= 0 ; if(!qbevent)break;evnt(21209);}while(r); LABEL_NEXTOPT:; if(qbevent){evnt(21210);r=0;} do{ *_FUNC_SEPERATEARGS_LONG_NUMOPTS=*_FUNC_SEPERATEARGS_LONG_NUMOPTS+ 1 ; if(!qbevent)break;evnt(21211);}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(21212);}while(r); S_28617:; if (((-(*_FUNC_SEPERATEARGS_LONG_I3!= 0 ))&(-(*_FUNC_SEPERATEARGS_LONG_I3<*_FUNC_SEPERATEARGS_LONG_I2)))||new_error){ if(qbevent){evnt(21213);if(r)goto S_28617;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21214);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I3+ 1 ; if(!qbevent)break;evnt(21215);}while(r); do{ goto LABEL_NEXTOPT; if(!qbevent)break;evnt(21215);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21217);}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(21218);}while(r); S_28624:; fornext_value3019= 1 ; fornext_finalvalue3019=((int16*)(__ARRAY_INTEGER_T[0]))[array_check((*_FUNC_SEPERATEARGS_LONG_LASTT)-__ARRAY_INTEGER_T[4],__ARRAY_INTEGER_T[5])]; fornext_step3019= 1 ; if (fornext_step3019<0) fornext_step_negative3019=1; else fornext_step_negative3019=0; if (new_error) goto fornext_error3019; goto fornext_entrylabel3019; while(1){ fornext_value3019=fornext_step3019+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel3019: *_FUNC_SEPERATEARGS_LONG_X=fornext_value3019; if (fornext_step_negative3019){ if (fornext_value3019fornext_finalvalue3019) break; } fornext_error3019:; if(qbevent){evnt(21220);if(r)goto S_28624;} do{ *_FUNC_SEPERATEARGS_LONG_W= 1 ; if(!qbevent)break;evnt(21221);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_X2= 1 ; if(!qbevent)break;evnt(21222);}while(r); LABEL_NEWWORD:; if(qbevent){evnt(21223);r=0;} S_28627:; 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(21224);if(r)goto S_28627;} do{ *_FUNC_SEPERATEARGS_LONG_W=*_FUNC_SEPERATEARGS_LONG_W+ 1 ; if(!qbevent)break;evnt(21224);}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(21224);}while(r); do{ goto LABEL_NEWWORD; if(!qbevent)break;evnt(21224);}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(21225);}while(r); fornext_continue_3018:; } fornext_exit_3018:; do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_I2; if(!qbevent)break;evnt(21227);}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(21230);}while(r); S_28636:; 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(21231);if(r)goto S_28636;} 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(21232);}while(r); S_28638:; fornext_value3021= 1 ; fornext_finalvalue3021=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; fornext_step3021= 1 ; 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_SEPERATEARGS_LONG_I2); fornext_entrylabel3021: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value3021; if (fornext_step_negative3021){ if (fornext_value3021fornext_finalvalue3021) break; } fornext_error3021:; if(qbevent){evnt(21233);if(r)goto S_28638;} S_28639:; 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(21234);if(r)goto S_28639;} 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(21234);}while(r); } fornext_continue_3020:; } fornext_exit_3020:; } 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(21237);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(21239);}while(r); } S_28647:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SEPERATEARGS_STRING_S2,qbs_new_txt_len("?",1))))||new_error){ if(qbevent){evnt(21242);if(r)goto S_28647;} do{ *_FUNC_SEPERATEARGS_LONG_LASTT=*_FUNC_SEPERATEARGS_LONG_LASTT+ 1 ; if(!qbevent)break;evnt(21243);}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(21243);}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(21243);}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(21244);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(21244);}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(21245);}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(21247);}while(r); S_28655:; 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(21248);if(r)goto S_28655;} 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(21249);}while(r); S_28657:; fornext_value3023= 1 ; fornext_finalvalue3023=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; fornext_step3023= 1 ; 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_SEPERATEARGS_LONG_I2); fornext_entrylabel3023: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value3023; if (fornext_step_negative3023){ if (fornext_value3023fornext_finalvalue3023) break; } fornext_error3023:; if(qbevent){evnt(21250);if(r)goto S_28657;} S_28658:; 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(21251);if(r)goto S_28658;} 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(21251);}while(r); } fornext_continue_3022:; } fornext_exit_3022:; } 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(21254);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(21256);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_LASTT=*_FUNC_SEPERATEARGS_LONG_LASTT+ 1 ; if(!qbevent)break;evnt(21260);}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(21260);}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(21260);}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(21261);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_DITCHLEVEL=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(21261);}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(21262);}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21262);}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(21262);}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(21262);}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(21265);}while(r); S_28676:; 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(21266);if(r)goto S_28676;} 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(21267);}while(r); S_28678:; fornext_value3025= 1 ; fornext_finalvalue3025=*_FUNC_SEPERATEARGS_LONG_LEVEL- 1 ; 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_SEPERATEARGS_LONG_I2); fornext_entrylabel3025: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value3025; if (fornext_step_negative3025){ if (fornext_value3025fornext_finalvalue3025) break; } fornext_error3025:; if(qbevent){evnt(21268);if(r)goto S_28678;} S_28679:; 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(21269);if(r)goto S_28679;} 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(21269);}while(r); } fornext_continue_3024:; } fornext_exit_3024:; } 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(21272);}while(r); do{ goto LABEL_NEXTSYMBOL; if(!qbevent)break;evnt(21274);}while(r); LABEL_NEXTSYMBOL:; if(qbevent){evnt(21276);r=0;} fornext_continue_3015:; } fornext_exit_3015:; S_28687:; if (( 0 )||new_error){ if(qbevent){evnt(21280);if(r)goto S_28687;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3026; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #1:1--------",46), 0, 0, 1); if (new_error) goto skip3026; skip3026: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21281);}while(r); S_28689:; fornext_value3028= 1 ; fornext_finalvalue3028=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3028= 1 ; if (fornext_step3028<0) fornext_step_negative3028=1; else fornext_step_negative3028=0; if (new_error) goto fornext_error3028; goto fornext_entrylabel3028; while(1){ fornext_value3028=fornext_step3028+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3028: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3028; if (fornext_step_negative3028){ if (fornext_value3028fornext_finalvalue3028) break; } fornext_error3028:; if(qbevent){evnt(21282);if(r)goto S_28689;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3029; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3029; 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 skip3029; skip3029: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21283);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3030; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3030; sub_file_print(tmp_fileno,qbs_new_txt_len("OPTWORDS=",9), 0, 0, 0); if (new_error) goto skip3030; 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 skip3030; skip3030: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21284);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3031; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3031; sub_file_print(tmp_fileno,qbs_new_txt_len("T=",2), 0, 0, 0); if (new_error) goto skip3031; 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 skip3031; skip3031: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21285);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3032; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3032; sub_file_print(tmp_fileno,qbs_new_txt_len("DONTPASS=",9), 0, 0, 0); if (new_error) goto skip3032; 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 skip3032; skip3032: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21286);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3033; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3033; sub_file_print(tmp_fileno,qbs_new_txt_len("PASSRULE=",9), 0, 0, 0); if (new_error) goto skip3033; 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 skip3033; skip3033: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21287);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3034; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3034; sub_file_print(tmp_fileno,qbs_new_txt_len("LEV=",4), 0, 0, 0); if (new_error) goto skip3034; 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 skip3034; skip3034: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21288);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3035; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3035; sub_file_print(tmp_fileno,qbs_new_txt_len("ENTRYLEV=",9), 0, 0, 0); if (new_error) goto skip3035; 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 skip3035; skip3035: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21289);}while(r); fornext_continue_3027:; } fornext_exit_3027:; } S_28699:; fornext_value3037= 1 ; fornext_finalvalue3037=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3037= 1 ; if (fornext_step3037<0) fornext_step_negative3037=1; else fornext_step_negative3037=0; if (new_error) goto fornext_error3037; goto fornext_entrylabel3037; while(1){ fornext_value3037=fornext_step3037+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel3037: *_FUNC_SEPERATEARGS_LONG_X=fornext_value3037; if (fornext_step_negative3037){ if (fornext_value3037fornext_finalvalue3037) break; } fornext_error3037:; if(qbevent){evnt(21297);if(r)goto S_28699;} S_28700:; 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(21298);if(r)goto S_28700;} S_28701:; 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(21299);if(r)goto S_28701;} 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(21299);}while(r); } } fornext_continue_3036:; } fornext_exit_3036:; S_28706:; if (( 0 )||new_error){ if(qbevent){evnt(21303);if(r)goto S_28706;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3038; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #1:2--------",46), 0, 0, 1); if (new_error) goto skip3038; skip3038: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21304);}while(r); S_28708:; fornext_value3040= 1 ; fornext_finalvalue3040=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3040= 1 ; if (fornext_step3040<0) fornext_step_negative3040=1; else fornext_step_negative3040=0; if (new_error) goto fornext_error3040; goto fornext_entrylabel3040; while(1){ fornext_value3040=fornext_step3040+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3040: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3040; if (fornext_step_negative3040){ if (fornext_value3040fornext_finalvalue3040) break; } fornext_error3040:; if(qbevent){evnt(21305);if(r)goto S_28708;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3041; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3041; 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 skip3041; skip3041: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21306);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3042; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3042; sub_file_print(tmp_fileno,qbs_new_txt_len("OPTWORDS=",9), 0, 0, 0); if (new_error) goto skip3042; 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 skip3042; skip3042: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21307);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3043; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3043; sub_file_print(tmp_fileno,qbs_new_txt_len("T=",2), 0, 0, 0); if (new_error) goto skip3043; 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 skip3043; skip3043: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21308);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3044; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3044; sub_file_print(tmp_fileno,qbs_new_txt_len("DONTPASS=",9), 0, 0, 0); if (new_error) goto skip3044; 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 skip3044; skip3044: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21309);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3045; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3045; sub_file_print(tmp_fileno,qbs_new_txt_len("PASSRULE=",9), 0, 0, 0); if (new_error) goto skip3045; 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 skip3045; skip3045: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21310);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3046; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3046; sub_file_print(tmp_fileno,qbs_new_txt_len("LEV=",4), 0, 0, 0); if (new_error) goto skip3046; 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 skip3046; skip3046: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21311);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3047; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3047; sub_file_print(tmp_fileno,qbs_new_txt_len("ENTRYLEV=",9), 0, 0, 0); if (new_error) goto skip3047; 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 skip3047; skip3047: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21312);}while(r); fornext_continue_3039:; } fornext_exit_3039:; } do{ *_FUNC_SEPERATEARGS_LONG_X1= 0 ; if(!qbevent)break;evnt(21319);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT= 0 ; if(!qbevent)break;evnt(21320);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 0 ; if(!qbevent)break;evnt(21321);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN= 0 ; if(!qbevent)break;evnt(21326);}while(r); S_28722:; fornext_value3049= 1 ; fornext_finalvalue3049= 32767 ; fornext_step3049= 1 ; if (fornext_step3049<0) fornext_step_negative3049=1; else fornext_step_negative3049=0; if (new_error) goto fornext_error3049; goto fornext_entrylabel3049; while(1){ fornext_value3049=fornext_step3049+(*_FUNC_SEPERATEARGS_LONG_L); fornext_entrylabel3049: *_FUNC_SEPERATEARGS_LONG_L=fornext_value3049; if (fornext_step_negative3049){ if (fornext_value3049fornext_finalvalue3049) break; } fornext_error3049:; if(qbevent){evnt(21327);if(r)goto S_28722;} do{ *_FUNC_SEPERATEARGS_LONG_SCANNEXTLEVEL= 0 ; if(!qbevent)break;evnt(21328);}while(r); S_28724:; fornext_value3051= 1 ; fornext_finalvalue3051=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3051= 1 ; if (fornext_step3051<0) fornext_step_negative3051=1; else fornext_step_negative3051=0; if (new_error) goto fornext_error3051; goto fornext_entrylabel3051; while(1){ fornext_value3051=fornext_step3051+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel3051: *_FUNC_SEPERATEARGS_LONG_X=fornext_value3051; if (fornext_step_negative3051){ if (fornext_value3051fornext_finalvalue3051) break; } fornext_error3051:; if(qbevent){evnt(21329);if(r)goto S_28724;} S_28725:; 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(21330);if(r)goto S_28725;} do{ *_FUNC_SEPERATEARGS_LONG_SCANNEXTLEVEL= 1 ; if(!qbevent)break;evnt(21330);}while(r); } S_28728:; if ((*_FUNC_SEPERATEARGS_LONG_X1)||new_error){ if(qbevent){evnt(21332);if(r)goto S_28728;} S_28729:; 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(21333);if(r)goto S_28729;} S_28730:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT)||new_error){ if(qbevent){evnt(21334);if(r)goto S_28730;} S_28731:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG)||new_error){ if(qbevent){evnt(21337);if(r)goto S_28731;} S_28732:; fornext_value3053= 1 ; fornext_finalvalue3053=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step3053= 1 ; if (fornext_step3053<0) fornext_step_negative3053=1; else fornext_step_negative3053=0; if (new_error) goto fornext_error3053; goto fornext_entrylabel3053; while(1){ fornext_value3053=fornext_step3053+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3053: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3053; if (fornext_step_negative3053){ if (fornext_value3053fornext_finalvalue3053) break; } fornext_error3053:; if(qbevent){evnt(21339);if(r)goto S_28732;} 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(21340);}while(r); fornext_continue_3052:; } fornext_exit_3052:; do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(21342);}while(r); }else{ S_28737:; fornext_value3055= 1 ; fornext_finalvalue3055=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step3055= 1 ; if (fornext_step3055<0) fornext_step_negative3055=1; else fornext_step_negative3055=0; if (new_error) goto fornext_error3055; goto fornext_entrylabel3055; while(1){ fornext_value3055=fornext_step3055+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3055: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3055; if (fornext_step_negative3055){ if (fornext_value3055fornext_finalvalue3055) break; } fornext_error3055:; if(qbevent){evnt(21346);if(r)goto S_28737;} S_28738:; 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(21347);if(r)goto S_28738;} 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(21347);}while(r); } fornext_continue_3054:; } fornext_exit_3054:; } }else{ S_28744:; fornext_value3057= 1 ; fornext_finalvalue3057=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step3057= 1 ; if (fornext_step3057<0) fornext_step_negative3057=1; else fornext_step_negative3057=0; if (new_error) goto fornext_error3057; goto fornext_entrylabel3057; while(1){ fornext_value3057=fornext_step3057+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3057: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3057; if (fornext_step_negative3057){ if (fornext_value3057fornext_finalvalue3057) break; } fornext_error3057:; if(qbevent){evnt(21352);if(r)goto S_28744;} 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(21352);}while(r); fornext_continue_3056:; } fornext_exit_3056:; S_28747:; if ((-(*_FUNC_SEPERATEARGS_LONG_TEMPLISTN!= 0 ))||new_error){ if(qbevent){evnt(21353);if(r)goto S_28747;} do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(21353);}while(r); } } do{ *_FUNC_SEPERATEARGS_LONG_X1= 0 ; if(!qbevent)break;evnt(21355);}while(r); } } S_28754:; 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(21360);if(r)goto S_28754;} S_28755:; 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(21361);if(r)goto S_28755;} do{ *_FUNC_SEPERATEARGS_LONG_X1=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(21362);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT= 0 ; if(!qbevent)break;evnt(21363);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN= 0 ; if(!qbevent)break;evnt(21364);}while(r); } } S_28761:; if ((*_FUNC_SEPERATEARGS_LONG_X1)||new_error){ if(qbevent){evnt(21368);if(r)goto S_28761;} S_28762:; 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(21369);if(r)goto S_28762;} S_28763:; 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(21371);if(r)goto S_28763;} S_28764:; if ((-(*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT== 0 ))||new_error){ if(qbevent){evnt(21373);if(r)goto S_28764;} do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(21374);}while(r); S_28766:; 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(21375);if(r)goto S_28766;} do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 1 ; if(!qbevent)break;evnt(21375);}while(r); }else{ do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 0 ; if(!qbevent)break;evnt(21375);}while(r); } }else{ S_28772:; if ((-(*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG== 1 ))||new_error){ if(qbevent){evnt(21379);if(r)goto S_28772;} S_28773:; 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(21380);if(r)goto S_28773;} do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(21381);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG= 0 ; if(!qbevent)break;evnt(21381);}while(r); } } } do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN+ 1 ; if(!qbevent)break;evnt(21386);}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(21386);}while(r); } S_28782:; 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(21389);if(r)goto S_28782;} S_28783:; 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(21395);if(r)goto S_28783;} do{ *_FUNC_SEPERATEARGS_LONG_TEMPLISTN=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN+ 1 ; if(!qbevent)break;evnt(21395);}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(21395);}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(21395);}while(r); } } } } fornext_continue_3050:; } fornext_exit_3050:; S_28792:; if ((*_FUNC_SEPERATEARGS_LONG_X1)||new_error){ if(qbevent){evnt(21404);if(r)goto S_28792;} S_28793:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPT)||new_error){ if(qbevent){evnt(21405);if(r)goto S_28793;} S_28794:; if ((*_FUNC_SEPERATEARGS_LONG_MUSTPASSOPTNEEDSFLAG)||new_error){ if(qbevent){evnt(21408);if(r)goto S_28794;} S_28795:; fornext_value3059= 1 ; fornext_finalvalue3059=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step3059= 1 ; if (fornext_step3059<0) fornext_step_negative3059=1; else fornext_step_negative3059=0; if (new_error) goto fornext_error3059; goto fornext_entrylabel3059; while(1){ fornext_value3059=fornext_step3059+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3059: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3059; if (fornext_step_negative3059){ if (fornext_value3059fornext_finalvalue3059) break; } fornext_error3059:; if(qbevent){evnt(21410);if(r)goto S_28795;} 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(21411);}while(r); fornext_continue_3058:; } fornext_exit_3058:; do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(21413);}while(r); }else{ S_28800:; fornext_value3061= 1 ; fornext_finalvalue3061=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step3061= 1 ; if (fornext_step3061<0) fornext_step_negative3061=1; else fornext_step_negative3061=0; if (new_error) goto fornext_error3061; goto fornext_entrylabel3061; while(1){ fornext_value3061=fornext_step3061+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3061: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3061; if (fornext_step_negative3061){ if (fornext_value3061fornext_finalvalue3061) break; } fornext_error3061:; if(qbevent){evnt(21417);if(r)goto S_28800;} S_28801:; 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(21418);if(r)goto S_28801;} 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(21418);}while(r); } fornext_continue_3060:; } fornext_exit_3060:; } }else{ S_28807:; fornext_value3063= 1 ; fornext_finalvalue3063=*_FUNC_SEPERATEARGS_LONG_TEMPLISTN; fornext_step3063= 1 ; if (fornext_step3063<0) fornext_step_negative3063=1; else fornext_step_negative3063=0; if (new_error) goto fornext_error3063; goto fornext_entrylabel3063; while(1){ fornext_value3063=fornext_step3063+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3063: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3063; if (fornext_step_negative3063){ if (fornext_value3063fornext_finalvalue3063) break; } fornext_error3063:; if(qbevent){evnt(21423);if(r)goto S_28807;} 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(21423);}while(r); fornext_continue_3062:; } fornext_exit_3062:; S_28810:; if ((-(*_FUNC_SEPERATEARGS_LONG_TEMPLISTN!= 0 ))||new_error){ if(qbevent){evnt(21424);if(r)goto S_28810;} do{ *_FUNC_SEPERATEARGS_LONG_PASSFLAG=*_FUNC_SEPERATEARGS_LONG_PASSFLAG* 2 ; if(!qbevent)break;evnt(21424);}while(r); } } do{ *_FUNC_SEPERATEARGS_LONG_X1= 0 ; if(!qbevent)break;evnt(21426);}while(r); } S_28816:; if ((-(*_FUNC_SEPERATEARGS_LONG_SCANNEXTLEVEL== 0 ))||new_error){ if(qbevent){evnt(21429);if(r)goto S_28816;} do{ goto fornext_exit_3048; if(!qbevent)break;evnt(21429);}while(r); } fornext_continue_3048:; } fornext_exit_3048:; S_28820:; if (( 0 )||new_error){ if(qbevent){evnt(21432);if(r)goto S_28820;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3064; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #1:3--------",46), 0, 0, 1); if (new_error) goto skip3064; skip3064: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21433);}while(r); S_28822:; fornext_value3066= 1 ; fornext_finalvalue3066=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3066= 1 ; if (fornext_step3066<0) fornext_step_negative3066=1; else fornext_step_negative3066=0; if (new_error) goto fornext_error3066; goto fornext_entrylabel3066; while(1){ fornext_value3066=fornext_step3066+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3066: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3066; if (fornext_step_negative3066){ if (fornext_value3066fornext_finalvalue3066) break; } fornext_error3066:; if(qbevent){evnt(21434);if(r)goto S_28822;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3067; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3067; 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 skip3067; skip3067: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21435);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3068; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3068; sub_file_print(tmp_fileno,qbs_new_txt_len("OPTWORDS=",9), 0, 0, 0); if (new_error) goto skip3068; 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 skip3068; skip3068: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21436);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3069; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3069; sub_file_print(tmp_fileno,qbs_new_txt_len("T=",2), 0, 0, 0); if (new_error) goto skip3069; 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 skip3069; skip3069: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21437);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3070; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3070; sub_file_print(tmp_fileno,qbs_new_txt_len("DONTPASS=",9), 0, 0, 0); if (new_error) goto skip3070; 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 skip3070; skip3070: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21438);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3071; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3071; sub_file_print(tmp_fileno,qbs_new_txt_len("PASSRULE=",9), 0, 0, 0); if (new_error) goto skip3071; 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 skip3071; skip3071: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21439);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3072; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3072; sub_file_print(tmp_fileno,qbs_new_txt_len("LEV=",4), 0, 0, 0); if (new_error) goto skip3072; 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 skip3072; skip3072: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21440);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3073; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3073; sub_file_print(tmp_fileno,qbs_new_txt_len("ENTRYLEV=",9), 0, 0, 0); if (new_error) goto skip3073; 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 skip3073; skip3073: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21441);}while(r); fornext_continue_3065:; } fornext_exit_3065:; } S_28832:; fornext_value3075= 1 ; fornext_finalvalue3075=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3075= 1 ; if (fornext_step3075<0) fornext_step_negative3075=1; else fornext_step_negative3075=0; if (new_error) goto fornext_error3075; goto fornext_entrylabel3075; while(1){ fornext_value3075=fornext_step3075+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3075: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3075; if (fornext_step_negative3075){ if (fornext_value3075fornext_finalvalue3075) break; } fornext_error3075:; if(qbevent){evnt(21447);if(r)goto S_28832;} 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("n-ll",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21447);}while(r); fornext_continue_3074:; } fornext_exit_3074:; do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES= 0 ; if(!qbevent)break;evnt(21465);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&1){ if (!error_occurred) 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(21466);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHTAKEN[2]&1){ if (!error_occurred) 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(21467);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHINPUTPOS[2]&1){ if (!error_occurred) 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(21470);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHWITHEXPRESSION[2]&1){ if (!error_occurred) 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(21471);}while(r); do{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&2){ error(10); }else{ if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHLEVEL[2]&1){ if (!error_occurred) 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(21474);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_N=FUNC_NUMELEMENTS(_FUNC_SEPERATEARGS_STRING_CA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21476);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I= 1 ; if(!qbevent)break;evnt(21477);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL= 0 ; if(!qbevent)break;evnt(21479);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION= 0 ; if(!qbevent)break;evnt(21480);}while(r); S_28845:; fornext_value3077= 1 ; fornext_finalvalue3077=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3077= 1 ; if (fornext_step3077<0) fornext_step_negative3077=1; else fornext_step_negative3077=0; if (new_error) goto fornext_error3077; goto fornext_entrylabel3077; while(1){ fornext_value3077=fornext_step3077+(*_FUNC_SEPERATEARGS_LONG_X); fornext_entrylabel3077: *_FUNC_SEPERATEARGS_LONG_X=fornext_value3077; if (fornext_step_negative3077){ if (fornext_value3077fornext_finalvalue3077) break; } fornext_error3077:; if(qbevent){evnt(21481);if(r)goto S_28845;} LABEL_CONTINUESCAN:; if(qbevent){evnt(21483);r=0;} S_28846:; 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(21485);if(r)goto S_28846;} 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(21487);}while(r); } S_28849:; 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(21490);if(r)goto S_28849;} S_28850:; 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(21493);if(r)goto S_28850;} do{ *_FUNC_SEPERATEARGS_LONG_OPTIONAL= 1 ; if(!qbevent)break;evnt(21494);}while(r); S_28852:; 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(21495);if(r)goto S_28852;} do{ *_FUNC_SEPERATEARGS_LONG_OPTIONAL= 0 ; if(!qbevent)break;evnt(21495);}while(r); } }else{ do{ *_FUNC_SEPERATEARGS_LONG_OPTIONAL= 0 ; if(!qbevent)break;evnt(21498);}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(21501);}while(r); S_28859:; if ((-(*_FUNC_SEPERATEARGS_LONG_T== 0 ))||new_error){ if(qbevent){evnt(21503);if(r)goto S_28859;} S_28860:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(21504);if(r)goto S_28860;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(21507);}while(r); } S_28863:; if ((*_FUNC_SEPERATEARGS_LONG_OPTIONAL)||new_error){ if(qbevent){evnt(21510);if(r)goto S_28863;} do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES=*_FUNC_SEPERATEARGS_LONG_BRANCHES+ 1 ; if(!qbevent)break;evnt(21511);}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(21512);}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(21513);}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(21514);}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(21515);}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(21516);}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(21517);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION=*_FUNC_SEPERATEARGS_LONG_X; if(!qbevent)break;evnt(21519);}while(r); } S_28874:; if ((*_FUNC_SEPERATEARGS_LONG_T)||new_error){ if(qbevent){evnt(21522);if(r)goto S_28874;} do{ *_FUNC_SEPERATEARGS_LONG_CURRENTLEV=*_FUNC_SEPERATEARGS_LONG_LEVEL; if(!qbevent)break;evnt(21524);}while(r); S_28876:; if ((*_FUNC_SEPERATEARGS_LONG_OPTIONAL)||new_error){ if(qbevent){evnt(21527);if(r)goto S_28876;} do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES=*_FUNC_SEPERATEARGS_LONG_BRANCHES+ 1 ; if(!qbevent)break;evnt(21528);}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(21529);}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(21530);}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(21531);}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(21532);}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(21533);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_I1=*_FUNC_SEPERATEARGS_LONG_I; if(!qbevent)break;evnt(21537);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I2=*_FUNC_SEPERATEARGS_LONG_I; if(!qbevent)break;evnt(21537);}while(r); S_28886:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(21538);if(r)goto S_28886;} do{ *_FUNC_SEPERATEARGS_LONG_I2=*_FUNC_SEPERATEARGS_LONG_N; if(!qbevent)break;evnt(21538);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_OUTOFRANGE= 2147483647 ; if(!qbevent)break;evnt(21542);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_POSITION=*_FUNC_SEPERATEARGS_LONG_OUTOFRANGE; if(!qbevent)break;evnt(21543);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_WHICH= 0 ; if(!qbevent)break;evnt(21544);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_REMOVEPREFIX= 0 ; if(!qbevent)break;evnt(21545);}while(r); S_28893:; if ((-(*_FUNC_SEPERATEARGS_LONG_I<=*_FUNC_SEPERATEARGS_LONG_N))||new_error){ if(qbevent){evnt(21546);if(r)goto S_28893;} S_28894:; fornext_value3079= 1 ; fornext_finalvalue3079=*_FUNC_SEPERATEARGS_LONG_T; fornext_step3079= 1 ; if (fornext_step3079<0) fornext_step_negative3079=1; else fornext_step_negative3079=0; if (new_error) goto fornext_error3079; goto fornext_entrylabel3079; while(1){ fornext_value3079=fornext_step3079+(*_FUNC_SEPERATEARGS_LONG_O); fornext_entrylabel3079: *_FUNC_SEPERATEARGS_LONG_O=fornext_value3079; if (fornext_step_negative3079){ if (fornext_value3079fornext_finalvalue3079) break; } fornext_error3079:; if(qbevent){evnt(21547);if(r)goto S_28894;} 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(21548);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_B= 0 ; if(!qbevent)break;evnt(21549);}while(r); S_28897:; fornext_value3081=*_FUNC_SEPERATEARGS_LONG_I1; fornext_finalvalue3081=*_FUNC_SEPERATEARGS_LONG_I2; fornext_step3081= 1 ; if (fornext_step3081<0) fornext_step_negative3081=1; else fornext_step_negative3081=0; if (new_error) goto fornext_error3081; goto fornext_entrylabel3081; while(1){ fornext_value3081=fornext_step3081+(*_FUNC_SEPERATEARGS_LONG_I3); fornext_entrylabel3081: *_FUNC_SEPERATEARGS_LONG_I3=fornext_value3081; if (fornext_step_negative3081){ if (fornext_value3081fornext_finalvalue3081) break; } fornext_error3081:; if(qbevent){evnt(21550);if(r)goto S_28897;} S_28898:; if ((-((*_FUNC_SEPERATEARGS_LONG_I3+*_FUNC_SEPERATEARGS_LONG_WORDS- 1 )<=*_FUNC_SEPERATEARGS_LONG_N))||new_error){ if(qbevent){evnt(21551);if(r)goto S_28898;} 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(21552);}while(r); S_28900:; if ((-(*_FUNC_SEPERATEARGS_LONG_B== 0 ))||new_error){ if(qbevent){evnt(21553);if(r)goto S_28900;} S_28901:; fornext_value3083= 2 ; fornext_finalvalue3083=*_FUNC_SEPERATEARGS_LONG_WORDS; fornext_step3083= 1 ; if (fornext_step3083<0) fornext_step_negative3083=1; else fornext_step_negative3083=0; if (new_error) goto fornext_error3083; goto fornext_entrylabel3083; while(1){ fornext_value3083=fornext_step3083+(*_FUNC_SEPERATEARGS_LONG_W); fornext_entrylabel3083: *_FUNC_SEPERATEARGS_LONG_W=fornext_value3083; if (fornext_step_negative3083){ if (fornext_value3083fornext_finalvalue3083) break; } fornext_error3083:; if(qbevent){evnt(21555);if(r)goto S_28901;} 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,&(pass3084=*_FUNC_SEPERATEARGS_LONG_I3+*_FUNC_SEPERATEARGS_LONG_W- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21556);}while(r); fornext_continue_3082:; } fornext_exit_3082:; do{ *_FUNC_SEPERATEARGS_LONG_NOPREFIXMATCH=(qbs_equal(qbs_left(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), 1 ),qbs_new_txt_len("_",1)))&(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_SEPERATEARGS_STRING_C,qbs_ucase(func_mid(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)), 2 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21559);}while(r); S_28905:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_SEPERATEARGS_STRING_C,qbs_ucase(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)))))|*_FUNC_SEPERATEARGS_LONG_NOPREFIXMATCH))||new_error){ if(qbevent){evnt(21560);if(r)goto S_28905;} S_28906:; if ((-(*_FUNC_SEPERATEARGS_LONG_I3<*_FUNC_SEPERATEARGS_LONG_POSITION))||new_error){ if(qbevent){evnt(21562);if(r)goto S_28906;} do{ *_FUNC_SEPERATEARGS_LONG_POSITION=*_FUNC_SEPERATEARGS_LONG_I3; if(!qbevent)break;evnt(21563);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_WHICH=*_FUNC_SEPERATEARGS_LONG_O; if(!qbevent)break;evnt(21564);}while(r); S_28909:; if ((*_FUNC_SEPERATEARGS_LONG_NOPREFIXMATCH)||new_error){ if(qbevent){evnt(21565);if(r)goto S_28909;} do{ *_FUNC_SEPERATEARGS_LONG_REMOVEPREFIX= 1 ; if(!qbevent)break;evnt(21565);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_BVALUE=*_FUNC_SEPERATEARGS_LONG_B; if(!qbevent)break;evnt(21566);}while(r); do{ goto fornext_exit_3080; if(!qbevent)break;evnt(21567);}while(r); } } } S_28917:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 44 ))&(-(*_FUNC_SEPERATEARGS_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(21572);if(r)goto S_28917;} do{ goto fornext_exit_3080; if(!qbevent)break;evnt(21573);}while(r); } S_28920:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 40 )))||new_error){ if(qbevent){evnt(21576);if(r)goto S_28920;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B+ 1 ; if(!qbevent)break;evnt(21577);}while(r); } S_28923:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 41 )))||new_error){ if(qbevent){evnt(21579);if(r)goto S_28923;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B- 1 ; if(!qbevent)break;evnt(21580);}while(r); S_28925:; if ((-(*_FUNC_SEPERATEARGS_LONG_B== -1 ))||new_error){ if(qbevent){evnt(21581);if(r)goto S_28925;} do{ goto fornext_exit_3080; if(!qbevent)break;evnt(21581);}while(r); } } } fornext_continue_3080:; } fornext_exit_3080:; fornext_continue_3078:; } fornext_exit_3078:; } S_28933:; if ((-(*_FUNC_SEPERATEARGS_LONG_POSITION!=*_FUNC_SEPERATEARGS_LONG_OUTOFRANGE))||new_error){ if(qbevent){evnt(21589);if(r)goto S_28933;} 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(21591);}while(r); S_28935:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(21592);if(r)goto S_28935;} S_28936:; if (((-(*_FUNC_SEPERATEARGS_LONG_POSITION>*_FUNC_SEPERATEARGS_LONG_I))&(-(*_FUNC_SEPERATEARGS_LONG_BVALUE== 0 )))||new_error){ if(qbevent){evnt(21595);if(r)goto S_28936;} 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,&(pass3085=*_FUNC_SEPERATEARGS_LONG_POSITION- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21597);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_EXPRESSION= 0 ; if(!qbevent)break;evnt(21598);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_POSITION; if(!qbevent)break;evnt(21599);}while(r); }else{ do{ goto LABEL_OPTCHECKBACKTRACK; if(!qbevent)break;evnt(21603);}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(21607);}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)-*_FUNC_SEPERATEARGS_LONG_REMOVEPREFIX),FUNC_SCASE(func_mid(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)),*_FUNC_SEPERATEARGS_LONG_REMOVEPREFIX+ 1 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21608);}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21609);}while(r); }else{ LABEL_OPTCHECKBACKTRACK:; if(qbevent){evnt(21613);r=0;} S_28948:; 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(21615);if(r)goto S_28948;} 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(21618);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_LEVEL=*_FUNC_SEPERATEARGS_LONG_CURRENTLEV; if(!qbevent)break;evnt(21619);}while(r); }else{ LABEL_BACKTRACK:; if(qbevent){evnt(21621);r=0;} S_28952:; fornext_value3087=*_FUNC_SEPERATEARGS_LONG_BRANCHES; fornext_finalvalue3087= 1 ; fornext_step3087= -1 ; if (fornext_step3087<0) fornext_step_negative3087=1; else fornext_step_negative3087=0; if (new_error) goto fornext_error3087; goto fornext_entrylabel3087; while(1){ fornext_value3087=fornext_step3087+(*_FUNC_SEPERATEARGS_LONG_BRANCH); fornext_entrylabel3087: *_FUNC_SEPERATEARGS_LONG_BRANCH=fornext_value3087; if (fornext_step_negative3087){ if (fornext_value3087fornext_finalvalue3087) break; } fornext_error3087:; if(qbevent){evnt(21624);if(r)goto S_28952;} S_28953:; 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(21625);if(r)goto S_28953;} do{ goto fornext_exit_3086; if(!qbevent)break;evnt(21625);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_BRANCHES=*_FUNC_SEPERATEARGS_LONG_BRANCHES- 1 ; if(!qbevent)break;evnt(21626);}while(r); fornext_continue_3086:; } fornext_exit_3086:; S_28958:; if ((-(*_FUNC_SEPERATEARGS_LONG_BRANCHES== 0 ))||new_error){ if(qbevent){evnt(21628);if(r)goto S_28958;} do{ *__LONG_SEPERATEARGS_ERROR= 1 ; if(!qbevent)break;evnt(21629);}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(21630);}while(r); S_28961:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+(2861)))->len> 0 )))||new_error){ if(qbevent){evnt(21631);if(r)goto S_28961;} do{ qbs_set(__STRING_SEPERATEARGS_ERROR_MESSAGE,qbs_add(qbs_add(__STRING_SEPERATEARGS_ERROR_MESSAGE,qbs_new_txt_len(" - Reference: ",14)),*((qbs**)((char*)_FUNC_SEPERATEARGS_UDT_ID2+(2861))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21631);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21632);}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(21635);}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(21636);}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(21637);}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(21638);}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(21639);}while(r); S_28971:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(21641);if(r)goto S_28971;} 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("n-ll",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21641);}while(r); } S_28974:; fornext_value3089=*_FUNC_SEPERATEARGS_LONG_X; fornext_finalvalue3089=*_FUNC_SEPERATEARGS_LONG_LASTT; 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+(*_FUNC_SEPERATEARGS_LONG_X2); fornext_entrylabel3089: *_FUNC_SEPERATEARGS_LONG_X2=fornext_value3089; if (fornext_step_negative3089){ if (fornext_value3089fornext_finalvalue3089) break; } fornext_error3089:; if(qbevent){evnt(21642);if(r)goto S_28974;} 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("n-ll",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21643);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21644);}while(r); fornext_continue_3088:; } fornext_exit_3088:; } } } } fornext_continue_3076:; } fornext_exit_3076:; S_28983:; if ((*_FUNC_SEPERATEARGS_LONG_EXPRESSION)||new_error){ if(qbevent){evnt(21658);if(r)goto S_28983;} S_28984:; if ((-(*_FUNC_SEPERATEARGS_LONG_I<=*_FUNC_SEPERATEARGS_LONG_N))||new_error){ if(qbevent){evnt(21659);if(r)goto S_28984;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21660);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_B= 0 ; if(!qbevent)break;evnt(21664);}while(r); S_28987:; fornext_value3091=*_FUNC_SEPERATEARGS_LONG_I; fornext_finalvalue3091=*_FUNC_SEPERATEARGS_LONG_N; fornext_step3091= 1 ; if (fornext_step3091<0) fornext_step_negative3091=1; else fornext_step_negative3091=0; if (new_error) goto fornext_error3091; goto fornext_entrylabel3091; while(1){ fornext_value3091=fornext_step3091+(*_FUNC_SEPERATEARGS_LONG_I2); fornext_entrylabel3091: *_FUNC_SEPERATEARGS_LONG_I2=fornext_value3091; if (fornext_step_negative3091){ if (fornext_value3091fornext_finalvalue3091) break; } fornext_error3091:; if(qbevent){evnt(21665);if(r)goto S_28987;} 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(21666);}while(r); S_28989:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 44 ))&(-(*_FUNC_SEPERATEARGS_LONG_B== 0 ))))||new_error){ if(qbevent){evnt(21667);if(r)goto S_28989;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(21668);}while(r); } S_28992:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 40 )))||new_error){ if(qbevent){evnt(21670);if(r)goto S_28992;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B+ 1 ; if(!qbevent)break;evnt(21671);}while(r); } S_28995:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_SEPERATEARGS_STRING_C)== 41 )))||new_error){ if(qbevent){evnt(21673);if(r)goto S_28995;} do{ *_FUNC_SEPERATEARGS_LONG_B=*_FUNC_SEPERATEARGS_LONG_B- 1 ; if(!qbevent)break;evnt(21674);}while(r); S_28997:; if ((-(*_FUNC_SEPERATEARGS_LONG_B== -1 ))||new_error){ if(qbevent){evnt(21675);if(r)goto S_28997;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(21675);}while(r); } } fornext_continue_3090:; } fornext_exit_3090:; S_29002:; if ((-(*_FUNC_SEPERATEARGS_LONG_B!= 0 ))||new_error){ if(qbevent){evnt(21678);if(r)goto S_29002;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(21678);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_I=*_FUNC_SEPERATEARGS_LONG_N+ 1 ; if(!qbevent)break;evnt(21680);}while(r); }else{ do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(21682);}while(r); } } S_29010:; if ((-(*_FUNC_SEPERATEARGS_LONG_I!=(*_FUNC_SEPERATEARGS_LONG_N+ 1 )))||new_error){ if(qbevent){evnt(21686);if(r)goto S_29010;} do{ goto LABEL_BACKTRACK; if(!qbevent)break;evnt(21686);}while(r); } S_29013:; if (( 0 )||new_error){ if(qbevent){evnt(21688);if(r)goto S_29013;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3092; sub_file_print(tmp_fileno,qbs_new_txt_len("--------SEPERATE ARGUMENTS REPORT #2--------",44), 0, 0, 1); if (new_error) goto skip3092; skip3092: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21689);}while(r); S_29015:; fornext_value3094= 1 ; fornext_finalvalue3094=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3094= 1 ; if (fornext_step3094<0) fornext_step_negative3094=1; else fornext_step_negative3094=0; if (new_error) goto fornext_error3094; goto fornext_entrylabel3094; while(1){ fornext_value3094=fornext_step3094+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3094: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3094; if (fornext_step_negative3094){ if (fornext_value3094fornext_finalvalue3094) break; } fornext_error3094:; if(qbevent){evnt(21690);if(r)goto S_29015;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3095; sub_file_print(tmp_fileno,qbs_str((int32)(*_FUNC_SEPERATEARGS_LONG_I)), 1, 1, 0); if (new_error) goto skip3095; 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 skip3095; skip3095: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(21691);}while(r); fornext_continue_3093:; } fornext_exit_3093:; } S_29019:; if ((-(*_FUNC_SEPERATEARGS_LONG_PASSFLAG!= 1 ))||new_error){ if(qbevent){evnt(21702);if(r)goto S_29019;} do{ *_FUNC_SEPERATEARGS_LONG_SEPERATEARGS= 1 ; if(!qbevent)break;evnt(21702);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_PASS= 0 ; if(!qbevent)break;evnt(21703);}while(r); do{ *_FUNC_SEPERATEARGS_LONG_X= 1 ; if(!qbevent)break;evnt(21706);}while(r); S_29024:; fornext_value3097= 1 ; fornext_finalvalue3097=*_FUNC_SEPERATEARGS_LONG_LASTT; fornext_step3097= 1 ; if (fornext_step3097<0) fornext_step_negative3097=1; else fornext_step_negative3097=0; if (new_error) goto fornext_error3097; goto fornext_entrylabel3097; while(1){ fornext_value3097=fornext_step3097+(*_FUNC_SEPERATEARGS_LONG_I); fornext_entrylabel3097: *_FUNC_SEPERATEARGS_LONG_I=fornext_value3097; if (fornext_step_negative3097){ if (fornext_value3097fornext_finalvalue3097) break; } fornext_error3097:; if(qbevent){evnt(21708);if(r)goto S_29024;} S_29025:; 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(21710);if(r)goto S_29025;} S_29026:; 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(21712);if(r)goto S_29026;} S_29027:; 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("n-ll",4))))||new_error){ if(qbevent){evnt(21713);if(r)goto S_29027;} 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(21713);}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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21716);}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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21717);}while(r); S_29033:; 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(21719);if(r)goto S_29033;} S_29034:; 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(21720);if(r)goto S_29034;} 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 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21722);}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 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21723);}while(r); } } S_29039:; 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("n-ll",4))))||new_error){ if(qbevent){evnt(21727);if(r)goto S_29039;} 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("N-LL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21727);}while(r); } do{ *_FUNC_SEPERATEARGS_LONG_X=*_FUNC_SEPERATEARGS_LONG_X+ 1 ; if(!qbevent)break;evnt(21728);}while(r); }else{ S_29044:; 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(21735);if(r)goto S_29044;} S_29045:; 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("n-ll",4))))||new_error){ if(qbevent){evnt(21736);if(r)goto S_29045;} 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(21736);}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])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21739);}while(r); } fornext_continue_3096:; } fornext_exit_3096:; 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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21743);}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; 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 "data40.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_SETREFER_STRING_A,_SUB_SETREFER_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21753);}while(r); do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP2; if(!qbevent)break;evnt(21753);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_E,_SUB_SETREFER_STRING_E2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21753);}while(r); S_29056:; if ((-(*_SUB_SETREFER_LONG_METHOD!= 1 ))||new_error){ if(qbevent){evnt(21754);if(r)goto S_29056;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21754);}while(r); } S_29059:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21755);if(r)goto S_29059;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21755);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_TL,__STRING_TLAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21756);}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(21764);}while(r); S_29064:; if ((*_SUB_SETREFER_LONG_I)||new_error){ if(qbevent){evnt(21765);if(r)goto S_29064;} 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(21766);}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(21766);}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(21768);}while(r); } do{ SUB_GETID(_SUB_SETREFER_LONG_IDNUMBER); if(!qbevent)break;evnt(21770);}while(r); S_29071:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21771);if(r)goto S_29071;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21771);}while(r); } S_29074:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(21774);if(r)goto S_29074;} do{ *_SUB_SETREFER_LONG_U=qbr(func_val(_SUB_SETREFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21777);}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(21778);}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(21778);}while(r); do{ *__LONG_E=qbr(func_val(_SUB_SETREFER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21778);}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(21779);}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(21779);}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(21780);}while(r); S_29082:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(21780);if(r)goto S_29082;} 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(21780);}while(r); } S_29085:; if (((-(*__LONG_E!= 0 ))&(-(*_SUB_SETREFER_LONG_U== 1 )))||new_error){ if(qbevent){evnt(21782);if(r)goto S_29085;} 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(21783);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21783);}while(r); } S_29089:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(21786);if(r)goto S_29089;} S_29090:; if ((-(*_SUB_SETREFER_LONG_METHOD!= 0 ))||new_error){ if(qbevent){evnt(21789);if(r)goto S_29090;} 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(21789);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21789);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_LHSSCOPE,FUNC_SCOPE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21790);}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(21791);}while(r); S_29096:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21792);if(r)goto S_29096;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21792);}while(r); } S_29099:; if ((-((*_SUB_SETREFER_LONG_T2&*__LONG_ISUDT)== 0 ))||new_error){ if(qbevent){evnt(21793);if(r)goto S_29099;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected = similar user defined type",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21793);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21793);}while(r); } S_29103:; if ((-((*_SUB_SETREFER_LONG_T2&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(21795);if(r)goto S_29103;} S_29104:; if ((*_SUB_SETREFER_LONG_T2&*__LONG_ISPOINTER)||new_error){ if(qbevent){evnt(21796);if(r)goto S_29104;} 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(21797);}while(r); do{ *_SUB_SETREFER_LONG_E2= 0 ; if(!qbevent)break;evnt(21798);}while(r); do{ *_SUB_SETREFER_LONG_U2=*_SUB_SETREFER_LONG_T2& 511 ; if(!qbevent)break;evnt(21798);}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(21800);}while(r); do{ *_SUB_SETREFER_LONG_E2= 0 ; if(!qbevent)break;evnt(21801);}while(r); do{ *_SUB_SETREFER_LONG_U2=*_SUB_SETREFER_LONG_T2& 511 ; if(!qbevent)break;evnt(21801);}while(r); } do{ goto LABEL_DIRECTUDT; if(!qbevent)break;evnt(21803);}while(r); } do{ *_SUB_SETREFER_LONG_IDNUMBER2=qbr(func_val(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21807);}while(r); do{ SUB_GETID(_SUB_SETREFER_LONG_IDNUMBER2); if(!qbevent)break;evnt(21808);}while(r); S_29117:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21811);if(r)goto S_29117;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21811);}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(21812);}while(r); S_29121:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(21812);if(r)goto S_29121;} 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(21812);}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(21813);}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(21813);}while(r); do{ *_SUB_SETREFER_LONG_U2=qbr(func_val(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21813);}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(21814);}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(21814);}while(r); do{ *_SUB_SETREFER_LONG_E2=qbr(func_val(_SUB_SETREFER_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21814);}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(21815);}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(21815);}while(r); do{ qbs_set(_SUB_SETREFER_STRING_SRC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)",8),FUNC_SCOPE()),_SUB_SETREFER_STRING_N2),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O2),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21820);}while(r); LABEL_DIRECTUDT:; if(qbevent){evnt(21821);r=0;} S_29133:; if (((-(*_SUB_SETREFER_LONG_U!=*_SUB_SETREFER_LONG_U2))|(-(*_SUB_SETREFER_LONG_E2!= 0 )))||new_error){ if(qbevent){evnt(21822);if(r)goto S_29133;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected = similar user defined type",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21822);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21822);}while(r); } do{ qbs_set(_SUB_SETREFER_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)",8),_SUB_SETREFER_STRING_LHSSCOPE),_SUB_SETREFER_STRING_N),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21823);}while(r); do{ SUB_COPY_FULL_UDT(_SUB_SETREFER_STRING_DST,_SUB_SETREFER_STRING_SRC,__LONG_MAINTXTBUF,&(pass3108= 0 ),_SUB_SETREFER_LONG_U); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21824);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21828);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21829);}while(r); } S_29142:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(21833);if(r)goto S_29142;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Cannot resolve bit-length variables inside user defined types",61)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21833);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21833);}while(r); } S_29146:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(21834);if(r)goto S_29146;} S_29147:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(21835);if(r)goto S_29147;} 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(21836);}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(21837);}while(r); }else{ do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*((qbs**)((char*)(",18),FUNC_SCOPE()),_SUB_SETREFER_STRING_N),qbs_new_txt_len(")+(",3)),_SUB_SETREFER_STRING_O),qbs_new_txt_len(")))",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21839);}while(r); } S_29153:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21841);if(r)goto S_29153;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,&(pass3109=*__LONG_STRINGTYPE-*__LONG_ISPOINTER))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21841);}while(r); } S_29156:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21842);if(r)goto S_29156;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21842);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3110=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21843);}while(r); do{ SUB_WRITEBUFLINE(&(pass3111=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21844);}while(r); }else{ do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP-*__LONG_ISUDT-*__LONG_ISREFERENCE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(21846);}while(r); S_29163:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISARRAY)||new_error){ if(qbevent){evnt(21847);if(r)goto S_29163;} do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP-*__LONG_ISARRAY; if(!qbevent)break;evnt(21847);}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(21848);}while(r); S_29167:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21849);if(r)goto S_29167;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21849);}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(21850);}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(21851);}while(r); S_29172:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21852);if(r)goto S_29172;} 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(21852);}while(r); } S_29175:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21853);if(r)goto S_29175;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21853);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3112=*__LONG_MAINTXTBUF),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(21854);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21858);}while(r); S_29181:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_SETREFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(21859);if(r)goto S_29181;} do{ qbs_set(_SUB_SETREFER_STRING_R,func_mid(_SUB_SETREFER_STRING_R, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21859);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21860);}while(r); } S_29186:; if ((*(int32*)(((char*)__UDT_ID)+(512)))||new_error){ if(qbevent){evnt(21865);if(r)goto S_29186;} 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(21866);}while(r); do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_TYP-*__LONG_ISPOINTER-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(21867);}while(r); S_29189:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(21869);if(r)goto S_29189;} S_29190:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(21870);if(r)goto S_29190;} 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(21871);}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(21872);}while(r); do{ SUB_WRITEBUFLINE(&(pass3113=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21873);}while(r); S_29194:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21874);if(r)goto S_29194;} 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(21875);}while(r); S_29196:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21876);if(r)goto S_29196;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21876);}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(21878);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3114=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21880);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3115=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21882);}while(r); S_29205:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21883);if(r)goto S_29205;} 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(21884);}while(r); S_29207:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21885);if(r)goto S_29207;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21885);}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(21887);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3116=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21889);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3117=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21891);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21892);}while(r); S_29217:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_SETREFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(21893);if(r)goto S_29217;} do{ qbs_set(_SUB_SETREFER_STRING_R,func_mid(_SUB_SETREFER_STRING_R, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21893);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21894);}while(r); } S_29222:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(21897);if(r)goto S_29222;} do{ qbs_set(_SUB_SETREFER_STRING_R,qbs_add(qbs_add(qbs_new_txt_len("setbits(",8),FUNC_STR2(&(pass3118=*_SUB_SETREFER_LONG_TYP& 511 ))),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21899);}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(21900);}while(r); do{ SUB_WRITEBUFLINE(&(pass3119=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21901);}while(r); S_29226:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21902);if(r)goto S_29226;} 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(21903);}while(r); S_29228:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21904);if(r)goto S_29228;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21904);}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(21906);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3120=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21908);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21909);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21910);}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(21912);}while(r); S_29239:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(21913);if(r)goto S_29239;} S_29240:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(21914);if(r)goto S_29240;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21914);}while(r); } S_29243:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(21915);if(r)goto S_29243;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21915);}while(r); } S_29246:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 256 ))||new_error){ if(qbevent){evnt(21916);if(r)goto S_29246;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21916);}while(r); } }else{ S_29250:; if (((*_SUB_SETREFER_LONG_TYP&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(21918);if(r)goto S_29250;} S_29251:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(21919);if(r)goto S_29251;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint8",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21919);}while(r); } S_29254:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(21920);if(r)goto S_29254;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint16",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21920);}while(r); } S_29257:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(21921);if(r)goto S_29257;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21921);}while(r); } S_29260:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(21922);if(r)goto S_29260;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uint64",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21922);}while(r); } S_29263:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(21923);if(r)goto S_29263;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21923);}while(r); } }else{ S_29267:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 8 ))||new_error){ if(qbevent){evnt(21925);if(r)goto S_29267;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21925);}while(r); } S_29270:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 16 ))||new_error){ if(qbevent){evnt(21926);if(r)goto S_29270;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21926);}while(r); } S_29273:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(21927);if(r)goto S_29273;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21927);}while(r); } S_29276:; if ((-((*_SUB_SETREFER_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(21928);if(r)goto S_29276;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21928);}while(r); } S_29279:; if ((*_SUB_SETREFER_LONG_TYP&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(21929);if(r)goto S_29279;} do{ qbs_set(_SUB_SETREFER_STRING_T,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21929);}while(r); } } } } S_29285:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_SETREFER_STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(21933);if(r)goto S_29285;} 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(21933);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21933);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3121=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tmp_long=",9),_SUB_SETREFER_STRING_A),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21934);}while(r); S_29290:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21935);if(r)goto S_29290;} 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(21936);}while(r); S_29292:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21937);if(r)goto S_29292;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21937);}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(21939);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3122=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21942);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21943);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(21944);}while(r); } S_29302:; if ((*(int32*)(((char*)__UDT_ID)+(536)))||new_error){ if(qbevent){evnt(21948);if(r)goto S_29302;} 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(21949);}while(r); do{ *_SUB_SETREFER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(21950);}while(r); S_29305:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(21952);if(r)goto S_29305;} do{ *_SUB_SETREFER_LONG_T=*_SUB_SETREFER_LONG_T-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(21952);}while(r); } do{ *_SUB_SETREFER_LONG_TYP=*_SUB_SETREFER_LONG_T; if(!qbevent)break;evnt(21953);}while(r); S_29309:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(21956);if(r)goto S_29309;} S_29310:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISFIXEDLENGTH))||new_error){ if(qbevent){evnt(21957);if(r)goto S_29310;} 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(21958);}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(21960);}while(r); } S_29315:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21962);if(r)goto S_29315;} 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(21962);}while(r); } S_29318:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21963);if(r)goto S_29318;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21963);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3123=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21964);}while(r); do{ SUB_WRITEBUFLINE(&(pass3124=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21965);}while(r); S_29323:; if ((*__INTEGER_ARRAYPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(21966);if(r)goto S_29323;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(21966);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21967);}while(r); S_29327:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_SETREFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(21968);if(r)goto S_29327;} do{ qbs_set(_SUB_SETREFER_STRING_R,func_mid(_SUB_SETREFER_STRING_R, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21968);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(21969);}while(r); } S_29332:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(21973);if(r)goto S_29332;} do{ *_SUB_SETREFER_LONG_B=*_SUB_SETREFER_LONG_T& 511 ; if(!qbevent)break;evnt(21974);}while(r); S_29334:; if (((*_SUB_SETREFER_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(21975);if(r)goto S_29334;} 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(&(pass3125=*_SUB_SETREFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21976);}while(r); S_29336:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21977);if(r)goto S_29336;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,&(pass3126= 64 +*__LONG_ISUNSIGNED))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21977);}while(r); } S_29339:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21978);if(r)goto S_29339;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21978);}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(&(pass3127=((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(21979);}while(r); do{ SUB_WRITEBUFLINE(&(pass3128=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21980);}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(&(pass3129=*_SUB_SETREFER_LONG_T& 511 ))),qbs_new_txt_len("_",1)),_SUB_SETREFER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21982);}while(r); S_29346:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(21983);if(r)goto S_29346;} do{ qbs_set(_SUB_SETREFER_STRING_E,FUNC_EVALUATETOTYP(_SUB_SETREFER_STRING_E,&(pass3130= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21983);}while(r); } S_29349:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(21984);if(r)goto S_29349;} do{ goto exit_subfunc; if(!qbevent)break;evnt(21984);}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(&(pass3131=qbr(pow2( 2 ,(*_SUB_SETREFER_LONG_B- 1 )))))),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21985);}while(r); do{ SUB_WRITEBUFLINE(&(pass3132=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21986);}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(&(pass3133=((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(21988);}while(r); do{ SUB_WRITEBUFLINE(&(pass3134=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21989);}while(r); do{ SUB_WRITEBUFLINE(&(pass3135=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21990);}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(&(pass3136=((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(21992);}while(r); do{ SUB_WRITEBUFLINE(&(pass3137=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21993);}while(r); do{ SUB_WRITEBUFLINE(&(pass3138=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21994);}while(r); } S_29361:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(21996);if(r)goto S_29361;} do{ SUB_WRITEBUFLINE(&(pass3139=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21996);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(21996);}while(r); } S_29365:; if ((*__INTEGER_ARRAYPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(21997);if(r)goto S_29365;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(21997);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21998);}while(r); S_29369:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_SETREFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(21999);if(r)goto S_29369;} do{ qbs_set(_SUB_SETREFER_STRING_R,func_mid(_SUB_SETREFER_STRING_R, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(21999);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(22000);}while(r); } S_29374:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_BYTETYPE))||new_error){ if(qbevent){evnt(22004);if(r)goto S_29374;} 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(22004);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22004);}while(r); } S_29378:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UBYTETYPE))||new_error){ if(qbevent){evnt(22005);if(r)goto S_29378;} 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(22005);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22005);}while(r); } S_29382:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_INTEGERTYPE))||new_error){ if(qbevent){evnt(22006);if(r)goto S_29382;} 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(22006);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22006);}while(r); } S_29386:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UINTEGERTYPE))||new_error){ if(qbevent){evnt(22007);if(r)goto S_29386;} 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(22007);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22007);}while(r); } S_29390:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_LONGTYPE))||new_error){ if(qbevent){evnt(22008);if(r)goto S_29390;} 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(22008);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22008);}while(r); } S_29394:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_ULONGTYPE))||new_error){ if(qbevent){evnt(22009);if(r)goto S_29394;} 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(22009);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22009);}while(r); } S_29398:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_INTEGER64TYPE))||new_error){ if(qbevent){evnt(22010);if(r)goto S_29398;} 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(22010);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22010);}while(r); } S_29402:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UINTEGER64TYPE))||new_error){ if(qbevent){evnt(22011);if(r)goto S_29402;} 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(22011);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22011);}while(r); } S_29406:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_SINGLETYPE))||new_error){ if(qbevent){evnt(22012);if(r)goto S_29406;} 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(22012);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22012);}while(r); } S_29410:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_DOUBLETYPE))||new_error){ if(qbevent){evnt(22013);if(r)goto S_29410;} 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(22013);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22013);}while(r); } S_29414:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_FLOATTYPE))||new_error){ if(qbevent){evnt(22014);if(r)goto S_29414;} 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(22014);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22014);}while(r); } S_29418:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_OFFSETTYPE))||new_error){ if(qbevent){evnt(22015);if(r)goto S_29418;} 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(22015);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22015);}while(r); } S_29422:; if ((-(*_SUB_SETREFER_LONG_T==*__LONG_UOFFSETTYPE))||new_error){ if(qbevent){evnt(22016);if(r)goto S_29422;} 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(22016);}while(r); do{ goto LABEL_SREF; if(!qbevent)break;evnt(22016);}while(r); } LABEL_SREF:; if(qbevent){evnt(22017);r=0;} do{ *_SUB_SETREFER_LONG_T2=*_SUB_SETREFER_LONG_T-*__LONG_ISPOINTER; if(!qbevent)break;evnt(22018);}while(r); S_29427:; if ((-(*_SUB_SETREFER_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(22019);if(r)goto S_29427;} 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(22019);}while(r); } S_29430:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22020);if(r)goto S_29430;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22020);}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(22021);}while(r); do{ SUB_WRITEBUFLINE(&(pass3140=*__LONG_MAINTXTBUF),_SUB_SETREFER_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22022);}while(r); S_29435:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(22023);if(r)goto S_29435;} do{ SUB_WRITEBUFLINE(&(pass3141=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22023);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(22023);}while(r); } S_29439:; if ((*__INTEGER_ARRAYPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(22024);if(r)goto S_29439;} do{ *__INTEGER_ARRAYPROCESSINGHAPPENED= 0 ; if(!qbevent)break;evnt(22024);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22025);}while(r); S_29443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_SETREFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(22027);if(r)goto S_29443;} do{ qbs_set(_SUB_SETREFER_STRING_R,func_mid(_SUB_SETREFER_STRING_R, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22027);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(22028);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_SETREFER_STRING_TL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22031);}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; } 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 "data41.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_STR2_STRING_STR2,qbs__trim(qbs_str((int32)(*_FUNC_STR2_LONG_V)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22035);}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; 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 "data42.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(22039);}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; 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 "data43.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(22043);}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; 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 "data44.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22047);}while(r); S_29453:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TSTR,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22052);if(r)goto S_29453;} S_29454:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISARRAY))||new_error){ if(qbevent){evnt(22053);if(r)goto S_29454;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22053);}while(r); } S_29457:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(22054);if(r)goto S_29457;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("qbs",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22054);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22054);}while(r); } do{ *_FUNC_TYP2CTYP_LONG_B=*_FUNC_TYP2CTYP_LONG_T& 511 ; if(!qbevent)break;evnt(22055);}while(r); S_29462:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUDT))||new_error){ if(qbevent){evnt(22056);if(r)goto S_29462;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("void",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22056);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22056);}while(r); } S_29466:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(22057);if(r)goto S_29466;} S_29467:; if ((-(*_FUNC_TYP2CTYP_LONG_B<= 32 ))||new_error){ if(qbevent){evnt(22058);if(r)goto S_29467;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22058);}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(22058);}while(r); } S_29472:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(22059);if(r)goto S_29472;} 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(22059);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22060);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22060);}while(r); } S_29478:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(22062);if(r)goto S_29478;} S_29479:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 32 ))||new_error){ if(qbevent){evnt(22063);if(r)goto S_29479;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22063);}while(r); } S_29482:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 64 ))||new_error){ if(qbevent){evnt(22064);if(r)goto S_29482;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22064);}while(r); } S_29485:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 256 ))||new_error){ if(qbevent){evnt(22065);if(r)goto S_29485;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22065);}while(r); } }else{ S_29489:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 8 ))||new_error){ if(qbevent){evnt(22067);if(r)goto S_29489;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22067);}while(r); } S_29492:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 16 ))||new_error){ if(qbevent){evnt(22068);if(r)goto S_29492;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22068);}while(r); } S_29495:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 32 ))||new_error){ if(qbevent){evnt(22069);if(r)goto S_29495;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22069);}while(r); } S_29498:; if ((-(*_FUNC_TYP2CTYP_LONG_B== 64 ))||new_error){ if(qbevent){evnt(22070);if(r)goto S_29498;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22070);}while(r); } S_29501:; if ((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(22071);if(r)goto S_29501;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22071);}while(r); } S_29504:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(22072);if(r)goto S_29504;} 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(22072);}while(r); } } S_29508:; if ((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(22074);if(r)goto S_29508;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22075);}while(r); S_29510:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(22075);if(r)goto S_29510;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22075);}while(r); } } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22077);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22077);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TS,_FUNC_TYP2CTYP_STRING_TSTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22080);}while(r); S_29518:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(22082);if(r)goto S_29518;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("qbs",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22082);}while(r); } S_29521:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(22083);if(r)goto S_29521;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("float",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22083);}while(r); } S_29524:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(22084);if(r)goto S_29524;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("double",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22084);}while(r); } S_29527:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(22085);if(r)goto S_29527;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("long double",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22085);}while(r); } S_29530:; 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(22086);if(r)goto S_29530;} do{ *_FUNC_TYP2CTYP_LONG_UNSGN= 1 ; if(!qbevent)break;evnt(22086);}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(22086);}while(r); } S_29534:; 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(22087);if(r)goto S_29534;} 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(22088);}while(r); do{ *_FUNC_TYP2CTYP_LONG_B= 1 ; if(!qbevent)break;evnt(22089);}while(r); S_29537:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_TYP2CTYP_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22090);if(r)goto S_29537;} S_29538:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYP2CTYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(22091);if(r)goto S_29538;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22091);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22091);}while(r); } do{ *_FUNC_TYP2CTYP_LONG_B=qbr(func_val(_FUNC_TYP2CTYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22092);}while(r); S_29543:; if ((-(*_FUNC_TYP2CTYP_LONG_B> 64 ))||new_error){ if(qbevent){evnt(22093);if(r)goto S_29543;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22093);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22093);}while(r); } } S_29548:; if ((-(*_FUNC_TYP2CTYP_LONG_B<= 32 ))||new_error){ if(qbevent){evnt(22095);if(r)goto S_29548;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22095);}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(22095);}while(r); } S_29553:; if ((*_FUNC_TYP2CTYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(22096);if(r)goto S_29553;} 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(22096);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22097);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22097);}while(r); } S_29559:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(22099);if(r)goto S_29559;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("ptrszint",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22100);}while(r); S_29561:; if (((*_FUNC_TYP2CTYP_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(22100);if(r)goto S_29561;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,qbs_new_txt_len("uptrszint",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22100);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(22101);}while(r); } S_29566:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(22103);if(r)goto S_29566;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int8",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22103);}while(r); } S_29569:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(22104);if(r)goto S_29569;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int16",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22104);}while(r); } S_29572:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(22105);if(r)goto S_29572;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22105);}while(r); } S_29575:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYP2CTYP_STRING_TS,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(22106);if(r)goto S_29575;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("int64",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22106);}while(r); } S_29578:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_TYP2CTYP_STRING_CTYP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22107);if(r)goto S_29578;} S_29579:; if ((*_FUNC_TYP2CTYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(22108);if(r)goto S_29579;} 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(22108);}while(r); } do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,_FUNC_TYP2CTYP_STRING_CTYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22109);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22109);}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(22112);}while(r); S_29586:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22113);if(r)goto S_29586;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22113);}while(r); } S_29589:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_TYP2CTYP_STRING_S->len))||new_error){ if(qbevent){evnt(22114);if(r)goto S_29589;} do{ qbs_set(_FUNC_TYP2CTYP_STRING_TYP2CTYP,FUNC_TYP2CTYP(&(pass3146= 0 ),_FUNC_TYP2CTYP_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22115);}while(r); S_29591:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22116);if(r)goto S_29591;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22116);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(22117);}while(r); } do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid type",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22120);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22120);}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_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 "data45.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_TYP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22125);}while(r); S_29599:; fornext_value3149= 1 ; fornext_finalvalue3149=_FUNC_TYPE2SYMBOL_STRING_T->len; 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+(*_FUNC_TYPE2SYMBOL_LONG_I); fornext_entrylabel3149: *_FUNC_TYPE2SYMBOL_LONG_I=fornext_value3149; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3149){ if (fornext_value3149fornext_finalvalue3149) break; } fornext_error3149:; if(qbevent){evnt(22126);if(r)goto S_29599;} S_29600:; 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(22127);if(r)goto S_29600;} do{ sub_mid(_FUNC_TYPE2SYMBOL_STRING_T,*_FUNC_TYPE2SYMBOL_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(22127);}while(r); } fornext_continue_3148:; } fornext_exit_3148:; 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(22129);}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(22130);}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(22130);}while(r); S_29607:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22130);if(r)goto S_29607;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22130);}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(22131);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22131);}while(r); S_29612:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22131);if(r)goto S_29612;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22131);}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(22132);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22132);}while(r); S_29617:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22132);if(r)goto S_29617;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22132);}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(22133);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22133);}while(r); S_29622:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22133);if(r)goto S_29622;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22133);}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(22134);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22134);}while(r); S_29627:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22134);if(r)goto S_29627;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22134);}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(22135);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22135);}while(r); S_29632:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22135);if(r)goto S_29632;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22135);}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(22136);}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(22136);}while(r); S_29637:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22136);if(r)goto S_29637;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22136);}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(22137);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22137);}while(r); S_29642:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22137);if(r)goto S_29642;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22137);}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(22138);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22138);}while(r); S_29647:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22138);if(r)goto S_29647;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22138);}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(22139);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22139);}while(r); S_29652:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22139);if(r)goto S_29652;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22139);}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(22140);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22140);}while(r); S_29657:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22140);if(r)goto S_29657;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22140);}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(22141);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22141);}while(r); S_29662:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22141);if(r)goto S_29662;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22141);}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(22142);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22142);}while(r); S_29667:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22142);if(r)goto S_29667;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22142);}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(22143);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22143);}while(r); S_29672:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22143);if(r)goto S_29672;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22143);}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(22144);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22144);}while(r); S_29677:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22144);if(r)goto S_29677;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22144);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED BIT",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22145);}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(22145);}while(r); S_29682:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22145);if(r)goto S_29682;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22145);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED BYTE",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22146);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22146);}while(r); S_29687:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22146);if(r)goto S_29687;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22146);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED LONG",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22147);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22147);}while(r); S_29692:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22147);if(r)goto S_29692;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22147);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED INTEGER64",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22148);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22148);}while(r); S_29697:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22148);if(r)goto S_29697;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22148);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED INTEGER",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22149);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22149);}while(r); S_29702:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22149);if(r)goto S_29702;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22149);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED OFFSET",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22150);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22150);}while(r); S_29707:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22150);if(r)goto S_29707;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22150);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED _BIT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22151);}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(22151);}while(r); S_29712:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22151);if(r)goto S_29712;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22151);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED _BYTE",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22152);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22152);}while(r); S_29717:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22152);if(r)goto S_29717;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22152);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED _INTEGER64",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22153);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22153);}while(r); S_29722:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22153);if(r)goto S_29722;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22153);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("UNSIGNED _OFFSET",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22154);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22154);}while(r); S_29727:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22154);if(r)goto S_29727;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22154);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED BIT",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22155);}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(22155);}while(r); S_29732:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22155);if(r)goto S_29732;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22155);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED BYTE",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22156);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22156);}while(r); S_29737:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22156);if(r)goto S_29737;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22156);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED INTEGER64",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22157);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22157);}while(r); S_29742:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22157);if(r)goto S_29742;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22157);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("_UNSIGNED OFFSET",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22158);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22158);}while(r); S_29747:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22158);if(r)goto S_29747;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22158);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("BIT",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22159);}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(22159);}while(r); S_29752:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22159);if(r)goto S_29752;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22159);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("BYTE",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22160);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22160);}while(r); S_29757:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22160);if(r)goto S_29757;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22160);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("INTEGER64",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22161);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22161);}while(r); S_29762:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22161);if(r)goto S_29762;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22161);}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(22162);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22162);}while(r); S_29767:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2)))||new_error){ if(qbevent){evnt(22162);if(r)goto S_29767;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22162);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("OFFSET",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22163);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22163);}while(r); S_29772:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22163);if(r)goto S_29772;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22163);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_T2,qbs_new_txt_len("FLOAT",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22164);}while(r); do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22164);}while(r); S_29777:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(_FUNC_TYPE2SYMBOL_STRING_T,_FUNC_TYPE2SYMBOL_STRING_T2))))||new_error){ if(qbevent){evnt(22164);if(r)goto S_29777;} do{ goto LABEL_T2SFOUND; if(!qbevent)break;evnt(22164);}while(r); } do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22165);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22165);}while(r); LABEL_T2SFOUND:; if(qbevent){evnt(22166);r=0;} do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_TYPE2SYMBOL,_FUNC_TYPE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22167);}while(r); S_29783:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_TYPE2SYMBOL_STRING_T2->len!=_FUNC_TYPE2SYMBOL_STRING_T->len)))||new_error){ if(qbevent){evnt(22168);if(r)goto S_29783;} S_29784:; 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(22169);if(r)goto S_29784;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22169);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22169);}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(22170);}while(r); S_29789:; 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(22171);if(r)goto S_29789;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22171);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22171);}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(22172);}while(r); S_29794:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPE2SYMBOL_STRING_T)== 0 )))||new_error){ if(qbevent){evnt(22173);if(r)goto S_29794;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22173);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22173);}while(r); } do{ *_FUNC_TYPE2SYMBOL_LONG_V=qbr(func_val(_FUNC_TYPE2SYMBOL_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22174);}while(r); S_29799:; if ((-(*_FUNC_TYPE2SYMBOL_LONG_V== 0 ))||new_error){ if(qbevent){evnt(22175);if(r)goto S_29799;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22175);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22175);}while(r); } S_29803:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1)))&(-(*_FUNC_TYPE2SYMBOL_LONG_V> 64 ))))||new_error){ if(qbevent){evnt(22176);if(r)goto S_29803;} do{ SUB_GIVE_ERROR(_FUNC_TYPE2SYMBOL_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22176);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22176);}while(r); } S_29807:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPE2SYMBOL_STRING_S,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(22177);if(r)goto S_29807;} 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(22178);}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(22180);}while(r); } do{ qbs_set(_FUNC_TYPE2SYMBOL_STRING_TYPE2SYMBOL,_FUNC_TYPE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22182);}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; 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 "data46.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_TYPECOMP_LONG_TYP2=*_FUNC_TYPECOMP_LONG_TYP; if(!qbevent)break;evnt(22188);}while(r); S_29815:; if (((*_FUNC_TYPECOMP_LONG_TYP2&*__LONG_ISINCONVENTIONALMEMORY))||new_error){ if(qbevent){evnt(22189);if(r)goto S_29815;} do{ *_FUNC_TYPECOMP_LONG_TYP2=*_FUNC_TYPECOMP_LONG_TYP2-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(22189);}while(r); } do{ *_FUNC_TYPECOMP_LONG_TYPECOMP=*_FUNC_TYPECOMP_LONG_TYP2; if(!qbevent)break;evnt(22190);}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_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 "data47.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_TYPNAME2TYPSIZE= 0 ; if(!qbevent)break;evnt(22194);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_T,_FUNC_TYPNAME2TYP_STRING_T2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22196);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_TS,_FUNC_TYPNAME2TYP_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22199);}while(r); S_29822:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(22200);if(r)goto S_29822;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(22200);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22200);}while(r); } S_29826:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(22201);if(r)goto S_29826;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(22201);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22201);}while(r); } S_29830:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(22202);if(r)goto S_29830;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(22202);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22202);}while(r); } S_29834:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(22203);if(r)goto S_29834;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(22203);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22203);}while(r); } S_29838:; 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(22206);if(r)goto S_29838;} 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(22207);}while(r); S_29840:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(22208);if(r)goto S_29840;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after STRING * type",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22208);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22208);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22209);}while(r); S_29845:; if ((-(*_FUNC_TYPNAME2TYP_LONG_B== 0 ))||new_error){ if(qbevent){evnt(22210);if(r)goto S_29845;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after STRING * type",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22210);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22210);}while(r); } do{ *__LONG_TYPNAME2TYPSIZE=*_FUNC_TYPNAME2TYP_LONG_B; if(!qbevent)break;evnt(22211);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(22212);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22213);}while(r); } S_29853:; 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(22217);if(r)goto S_29853;} do{ *_FUNC_TYPNAME2TYP_LONG_UNSGN= 1 ; if(!qbevent)break;evnt(22217);}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(22217);}while(r); } S_29857:; 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(22220);if(r)goto S_29857;} 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(22221);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_B= 1 ; if(!qbevent)break;evnt(22222);}while(r); S_29860:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_TYPNAME2TYP_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22223);if(r)goto S_29860;} S_29861:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(22224);if(r)goto S_29861;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22224);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22224);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22225);}while(r); S_29866:; if ((-(*_FUNC_TYPNAME2TYP_LONG_B> 64 ))||new_error){ if(qbevent){evnt(22226);if(r)goto S_29866;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid index after _BIT type",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22226);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22226);}while(r); } } S_29871:; if ((*_FUNC_TYPNAME2TYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(22228);if(r)goto S_29871;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_UBITTYPE+(*_FUNC_TYPNAME2TYP_LONG_B- 1 ); if(!qbevent)break;evnt(22228);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_BITTYPE+(*_FUNC_TYPNAME2TYP_LONG_B- 1 ); if(!qbevent)break;evnt(22228);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(22229);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_T= 0 ; if(!qbevent)break;evnt(22232);}while(r); S_29879:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(22233);if(r)goto S_29879;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_BYTETYPE; if(!qbevent)break;evnt(22233);}while(r); } S_29882:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(22234);if(r)goto S_29882;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(22234);}while(r); } S_29885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(22235);if(r)goto S_29885;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_LONGTYPE; if(!qbevent)break;evnt(22235);}while(r); } S_29888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(22236);if(r)goto S_29888;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(22236);}while(r); } S_29891:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_TS,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(22237);if(r)goto S_29891;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(22237);}while(r); } S_29894:; if ((*_FUNC_TYPNAME2TYP_LONG_T)||new_error){ if(qbevent){evnt(22239);if(r)goto S_29894;} S_29895:; if ((*_FUNC_TYPNAME2TYP_LONG_UNSGN)||new_error){ if(qbevent){evnt(22240);if(r)goto S_29895;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*_FUNC_TYPNAME2TYP_LONG_T+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(22240);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*_FUNC_TYPNAME2TYP_LONG_T; if(!qbevent)break;evnt(22241);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22241);}while(r); } S_29901:; fornext_value3162= 1 ; fornext_finalvalue3162=_FUNC_TYPNAME2TYP_STRING_T->len; fornext_step3162= 1 ; if (fornext_step3162<0) fornext_step_negative3162=1; else fornext_step_negative3162=0; if (new_error) goto fornext_error3162; goto fornext_entrylabel3162; while(1){ fornext_value3162=fornext_step3162+(*_FUNC_TYPNAME2TYP_LONG_I); fornext_entrylabel3162: *_FUNC_TYPNAME2TYP_LONG_I=fornext_value3162; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3162){ if (fornext_value3162fornext_finalvalue3162) break; } fornext_error3162:; if(qbevent){evnt(22246);if(r)goto S_29901;} S_29902:; 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(22247);if(r)goto S_29902;} do{ sub_mid(_FUNC_TYPNAME2TYP_STRING_T,*_FUNC_TYPNAME2TYP_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(22247);}while(r); } fornext_continue_3161:; } fornext_exit_3161:; S_29906:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(22249);if(r)goto S_29906;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE; if(!qbevent)break;evnt(22249);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22249);}while(r); } S_29910:; 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(22251);if(r)goto S_29910;} 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(22253);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_HASHFOUND= 0 ; if(!qbevent)break;evnt(22256);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_HASHNAME,_FUNC_TYPNAME2TYP_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22257);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_HASHCHKFLAGS= 1024 ; if(!qbevent)break;evnt(22258);}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(22259);}while(r); S_29916:; while((*_FUNC_TYPNAME2TYP_LONG_HASHRES)||new_error){ if(qbevent){evnt(22260);if(r)goto S_29916;} S_29917:; 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(22261);if(r)goto S_29917;} S_29918:; 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(22262);if(r)goto S_29918;} do{ *_FUNC_TYPNAME2TYP_LONG_HASHFOUND= 1 ; if(!qbevent)break;evnt(22263);}while(r); do{ goto dl_exit_3165; if(!qbevent)break;evnt(22264);}while(r); } } S_29923:; if ((-(*_FUNC_TYPNAME2TYP_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(22267);if(r)goto S_29923;} do{ *_FUNC_TYPNAME2TYP_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_TYPNAME2TYP_LONG_HASHRESFLAGS,_FUNC_TYPNAME2TYP_LONG_HASHRESREF); if(!qbevent)break;evnt(22267);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(22267);}while(r); } dl_continue_3165:; } dl_exit_3165:; S_29929:; if ((*_FUNC_TYPNAME2TYP_LONG_HASHFOUND)||new_error){ if(qbevent){evnt(22269);if(r)goto S_29929;} do{ *_FUNC_TYPNAME2TYP_LONG_I2=*_FUNC_TYPNAME2TYP_LONG_HASHRESREF; if(!qbevent)break;evnt(22270);}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(22271);}while(r); S_29932:; if ((*_FUNC_TYPNAME2TYP_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(22272);if(r)goto S_29932;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected STRING * numeric-constant",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22272);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22272);}while(r); } S_29936:; if ((*_FUNC_TYPNAME2TYP_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(22274);if(r)goto S_29936;} 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(22275);}while(r); do{ *_FUNC_TYPNAME2TYP_INTEGER64_V=qbr(*_FUNC_TYPNAME2TYP_FLOAT_V); if(!qbevent)break;evnt(22276);}while(r); do{ *_FUNC_TYPNAME2TYP_UINTEGER64_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(22277);}while(r); }else{ S_29941:; if ((*_FUNC_TYPNAME2TYP_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(22279);if(r)goto S_29941;} 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(22280);}while(r); do{ *_FUNC_TYPNAME2TYP_INTEGER64_V=*_FUNC_TYPNAME2TYP_UINTEGER64_V; if(!qbevent)break;evnt(22281);}while(r); do{ *_FUNC_TYPNAME2TYP_FLOAT_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(22282);}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(22284);}while(r); do{ *_FUNC_TYPNAME2TYP_FLOAT_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(22285);}while(r); do{ *_FUNC_TYPNAME2TYP_UINTEGER64_V=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(22286);}while(r); } } S_29951:; if (((-(*_FUNC_TYPNAME2TYP_INTEGER64_V< 1 ))|(-(*_FUNC_TYPNAME2TYP_INTEGER64_V> 9999999999ll )))||new_error){ if(qbevent){evnt(22289);if(r)goto S_29951;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("STRING * out-of-range constant",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22289);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22289);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=*_FUNC_TYPNAME2TYP_INTEGER64_V; if(!qbevent)break;evnt(22290);}while(r); do{ goto LABEL_CONSTANTLENSTR; if(!qbevent)break;evnt(22291);}while(r); } S_29958:; if ((qbs_cleanup(qbs_tmp_base,(-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 ))|(-(_FUNC_TYPNAME2TYP_STRING_N->len> 10 ))))||new_error){ if(qbevent){evnt(22294);if(r)goto S_29958;} 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(22294);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22294);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22295);}while(r); S_29963:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_TYPNAME2TYP_LONG_B== 0 ))|(-(_FUNC_TYPNAME2TYP_STRING_N->len> 10 ))))||new_error){ if(qbevent){evnt(22296);if(r)goto S_29963;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid number after STRING * type",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22296);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22296);}while(r); } LABEL_CONSTANTLENSTR:; if(qbevent){evnt(22297);r=0;} do{ *__LONG_TYPNAME2TYPSIZE=*_FUNC_TYPNAME2TYP_LONG_B; if(!qbevent)break;evnt(22298);}while(r); do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH; if(!qbevent)break;evnt(22299);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22300);}while(r); } S_29971:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(22303);if(r)goto S_29971;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_SINGLETYPE; if(!qbevent)break;evnt(22303);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22303);}while(r); } S_29975:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(22304);if(r)goto S_29975;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_DOUBLETYPE; if(!qbevent)break;evnt(22304);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22304);}while(r); } S_29979:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_FLOAT",6)))|(((qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("FLOAT",5)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22305);if(r)goto S_29979;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_FLOATTYPE; if(!qbevent)break;evnt(22305);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22305);}while(r); } S_29983:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 10 ),qbs_new_txt_len("_UNSIGNED ",10)))|(((qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 9 ),qbs_new_txt_len("UNSIGNED ",9)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22306);if(r)goto S_29983;} do{ *_FUNC_TYPNAME2TYP_LONG_U= 1 ; if(!qbevent)break;evnt(22307);}while(r); do{ qbs_set(_FUNC_TYPNAME2TYP_STRING_T,func_mid(_FUNC_TYPNAME2TYP_STRING_T,func_instr(NULL,_FUNC_TYPNAME2TYP_STRING_T,func_chr( 32 ),0)+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22308);}while(r); } S_29987:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 4 ),qbs_new_txt_len("_BIT",4)))|(((qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 3 ),qbs_new_txt_len("BIT",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22310);if(r)goto S_29987;} S_29988:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_BIT",4)))|(((qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("BIT",3)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22311);if(r)goto S_29988;} S_29989:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(22312);if(r)goto S_29989;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_UBITTYPE; if(!qbevent)break;evnt(22312);}while(r); }else{ do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_BITTYPE; if(!qbevent)break;evnt(22312);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(22313);}while(r); } S_29996:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 7 ),qbs_new_txt_len("_BIT * ",7)))|(((qbs_equal(qbs_left(_FUNC_TYPNAME2TYP_STRING_T, 6 ),qbs_new_txt_len("BIT * ",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22315);if(r)goto S_29996;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected _BIT * number",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22315);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22315);}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(22317);}while(r); S_30001:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_TYPNAME2TYP_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(22318);if(r)goto S_30001;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Invalid size after ",19),__STRING_QB64PREFIX),qbs_new_txt_len("BIT *",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22318);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22318);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_B=qbr(func_val(_FUNC_TYPNAME2TYP_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22319);}while(r); S_30006:; if (((-(*_FUNC_TYPNAME2TYP_LONG_B== 0 ))|(-(*_FUNC_TYPNAME2TYP_LONG_B> 64 )))||new_error){ if(qbevent){evnt(22320);if(r)goto S_30006;} do{ SUB_GIVE_ERROR(qbs_add(qbs_add(qbs_new_txt_len("Invalid size after ",19),__STRING_QB64PREFIX),qbs_new_txt_len("BIT *",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22320);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22320);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_BITTYPE- 1 +*_FUNC_TYPNAME2TYP_LONG_B; if(!qbevent)break;evnt(22321);}while(r); S_30011:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(22321);if(r)goto S_30011;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*_FUNC_TYPNAME2TYP_LONG_T+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(22321);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*_FUNC_TYPNAME2TYP_LONG_T; if(!qbevent)break;evnt(22322);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22323);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_T= 0 ; if(!qbevent)break;evnt(22326);}while(r); S_30018:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_BYTE",5)))|(((qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("BYTE",4)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22327);if(r)goto S_30018;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_BYTETYPE; if(!qbevent)break;evnt(22327);}while(r); } S_30021:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("INTEGER",7))))||new_error){ if(qbevent){evnt(22328);if(r)goto S_30021;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGERTYPE; if(!qbevent)break;evnt(22328);}while(r); } S_30024:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("LONG",4))))||new_error){ if(qbevent){evnt(22329);if(r)goto S_30024;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_LONGTYPE; if(!qbevent)break;evnt(22329);}while(r); } S_30027:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_INTEGER64",10)))|(((qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("INTEGER64",9)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22330);if(r)goto S_30027;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_INTEGER64TYPE; if(!qbevent)break;evnt(22330);}while(r); } S_30030:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("_OFFSET",7)))|(((qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("OFFSET",6)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))))||new_error){ if(qbevent){evnt(22331);if(r)goto S_30030;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*__LONG_OFFSETTYPE; if(!qbevent)break;evnt(22331);}while(r); } S_30033:; if ((*_FUNC_TYPNAME2TYP_LONG_T)||new_error){ if(qbevent){evnt(22332);if(r)goto S_30033;} S_30034:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(22333);if(r)goto S_30034;} do{ *_FUNC_TYPNAME2TYP_LONG_T=*_FUNC_TYPNAME2TYP_LONG_T+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(22333);}while(r); } do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*_FUNC_TYPNAME2TYP_LONG_T; if(!qbevent)break;evnt(22334);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22335);}while(r); } S_30040:; if ((*_FUNC_TYPNAME2TYP_LONG_U)||new_error){ if(qbevent){evnt(22337);if(r)goto S_30040;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22337);}while(r); } S_30043:; fornext_value3170= 1 ; fornext_finalvalue3170=*__LONG_LASTTYPE; fornext_step3170= 1 ; if (fornext_step3170<0) fornext_step_negative3170=1; else fornext_step_negative3170=0; if (new_error) goto fornext_error3170; goto fornext_entrylabel3170; while(1){ fornext_value3170=fornext_step3170+(*_FUNC_TYPNAME2TYP_LONG_I); fornext_entrylabel3170: *_FUNC_TYPNAME2TYP_LONG_I=fornext_value3170; if (fornext_step_negative3170){ if (fornext_value3170fornext_finalvalue3170) break; } fornext_error3170:; if(qbevent){evnt(22340);if(r)goto S_30043;} S_30044:; 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(22341);if(r)goto S_30044;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_ISUDT+*__LONG_ISPOINTER+*_FUNC_TYPNAME2TYP_LONG_I; if(!qbevent)break;evnt(22342);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22343);}while(r); S_30047:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(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)),qbs_new_txt_len("_MEM",4)))&(qbs_equal(_FUNC_TYPNAME2TYP_STRING_T,qbs_new_txt_len("MEM",3)))&(-(*__LONG_QB64PREFIX_SET== 1 )))){ if(qbevent){evnt(22344);if(r)goto S_30047;} do{ *_FUNC_TYPNAME2TYP_LONG_TYPNAME2TYP=*__LONG_ISUDT+*__LONG_ISPOINTER+*_FUNC_TYPNAME2TYP_LONG_I; if(!qbevent)break;evnt(22345);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22346);}while(r); } } fornext_continue_3169:; } fornext_exit_3169:; 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_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 "data48.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_UNIQUENUMBERN=*__LONG_UNIQUENUMBERN+ 1 ; if(!qbevent)break;evnt(22354);}while(r); do{ *_FUNC_UNIQUENUMBER_LONG_UNIQUENUMBER=*__LONG_UNIQUENUMBERN; if(!qbevent)break;evnt(22355);}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; 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 "data49.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_VALIDLABEL_LONG_CREATE=*__LONG_CREATINGLABEL; if(!qbevent)break;evnt(22359);}while(r); do{ *__LONG_CREATINGLABEL= 0 ; if(!qbevent)break;evnt(22359);}while(r); do{ *_FUNC_VALIDLABEL_LONG_VALIDLABEL= 0 ; if(!qbevent)break;evnt(22360);}while(r); S_30057:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_VALIDLABEL_STRING_LABEL2->len== 0 )))||new_error){ if(qbevent){evnt(22361);if(r)goto S_30057;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22361);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_CLABEL,_FUNC_VALIDLABEL_STRING_LABEL2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22362);}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(22363);}while(r); do{ *_FUNC_VALIDLABEL_LONG_N=FUNC_NUMELEMENTS(_FUNC_VALIDLABEL_STRING_LABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22365);}while(r); S_30063:; if ((-(*_FUNC_VALIDLABEL_LONG_N== 1 ))||new_error){ if(qbevent){evnt(22367);if(r)goto S_30063;} do{ *_FUNC_VALIDLABEL_LONG_HASHRES=FUNC_HASHFIND(_FUNC_VALIDLABEL_STRING_LABEL,&(pass3173= 8 + 64 + 128 ),_FUNC_VALIDLABEL_LONG_HASHRESFLAGS,_FUNC_VALIDLABEL_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22370);}while(r); S_30065:; while((*_FUNC_VALIDLABEL_LONG_HASHRES)||new_error){ if(qbevent){evnt(22371);if(r)goto S_30065;} S_30066:; if ((*_FUNC_VALIDLABEL_LONG_HASHRESFLAGS&( 64 + 128 ))||new_error){ if(qbevent){evnt(22372);if(r)goto S_30066;} S_30067:; if ((*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+548)))||new_error){ if(qbevent){evnt(22373);if(r)goto S_30067;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22373);}while(r); } S_30070:; if ((*_FUNC_VALIDLABEL_LONG_HASHRESFLAGS& 64 )||new_error){ if(qbevent){evnt(22375);if(r)goto S_30070;} S_30071:; 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]))*2869+1613)),256,1))== 32 )))||new_error){ if(qbevent){evnt(22378);if(r)goto S_30071;} S_30072:; if ((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_FUNC_VALIDLABEL_LONG_HASHRESREF)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))== 0 ))||new_error){ if(qbevent){evnt(22379);if(r)goto S_30072;} do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 1 ; if(!qbevent)break;evnt(22379);}while(r); }else{ do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 0 ; if(!qbevent)break;evnt(22379);}while(r); } }else{ S_30078:; 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]))*2869+1613)),256,1))!= 91 )))||new_error){ if(qbevent){evnt(22381);if(r)goto S_30078;} do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 0 ; if(!qbevent)break;evnt(22382);}while(r); }else{ do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 1 ; if(!qbevent)break;evnt(22384);}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]))*2869+1613)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22385);}while(r); do{ *_FUNC_VALIDLABEL_LONG_B= 1 ; if(!qbevent)break;evnt(22386);}while(r); S_30084:; fornext_value3176= 2 ; fornext_finalvalue3176=_FUNC_VALIDLABEL_STRING_A->len; fornext_step3176= 1 ; if (fornext_step3176<0) fornext_step_negative3176=1; else fornext_step_negative3176=0; if (new_error) goto fornext_error3176; goto fornext_entrylabel3176; while(1){ fornext_value3176=fornext_step3176+(*_FUNC_VALIDLABEL_LONG_X); fornext_entrylabel3176: *_FUNC_VALIDLABEL_LONG_X=fornext_value3176; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3176){ if (fornext_value3176fornext_finalvalue3176) break; } fornext_error3176:; if(qbevent){evnt(22387);if(r)goto S_30084;} 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(22388);}while(r); S_30086:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 91 ))||new_error){ if(qbevent){evnt(22389);if(r)goto S_30086;} do{ *_FUNC_VALIDLABEL_LONG_B=*_FUNC_VALIDLABEL_LONG_B+ 1 ; if(!qbevent)break;evnt(22389);}while(r); } S_30089:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 93 ))||new_error){ if(qbevent){evnt(22390);if(r)goto S_30089;} do{ *_FUNC_VALIDLABEL_LONG_B=*_FUNC_VALIDLABEL_LONG_B- 1 ; if(!qbevent)break;evnt(22390);}while(r); } S_30092:; 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(22391);if(r)goto S_30092;} do{ *_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB= 0 ; if(!qbevent)break;evnt(22391);}while(r); do{ goto fornext_exit_3175; if(!qbevent)break;evnt(22391);}while(r); } fornext_continue_3175:; } fornext_exit_3175:; } } S_30099:; if (((-(*_FUNC_VALIDLABEL_LONG_CREATE!= 0 ))&(-(*_FUNC_VALIDLABEL_LONG_ONECOMMANDSUB== 1 )))||new_error){ if(qbevent){evnt(22395);if(r)goto S_30099;} S_30100:; 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(22396);if(r)goto S_30100;} 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(22396);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22396);}while(r); } } } }else{ do{ goto exit_subfunc; if(!qbevent)break;evnt(22403);}while(r); } S_30109:; if ((-(*_FUNC_VALIDLABEL_LONG_HASHRES!= 1 ))||new_error){ if(qbevent){evnt(22405);if(r)goto S_30109;} do{ *_FUNC_VALIDLABEL_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_VALIDLABEL_LONG_HASHRESFLAGS,_FUNC_VALIDLABEL_LONG_HASHRESREF); if(!qbevent)break;evnt(22405);}while(r); }else{ do{ *_FUNC_VALIDLABEL_LONG_HASHRES= 0 ; if(!qbevent)break;evnt(22405);}while(r); } dl_continue_3174:; } dl_exit_3174:; do{ qbs_set(_FUNC_VALIDLABEL_STRING_T,_FUNC_VALIDLABEL_STRING_LABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22412);}while(r); do{ *_FUNC_VALIDLABEL_LONG_A=qbs_asc(_FUNC_VALIDLABEL_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22414);}while(r); S_30117:; if (((((-(*_FUNC_VALIDLABEL_LONG_A>= 48 ))&(-(*_FUNC_VALIDLABEL_LONG_A<= 57 ))))|(-(*_FUNC_VALIDLABEL_LONG_A== 46 )))||new_error){ if(qbevent){evnt(22415);if(r)goto S_30117;} 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(22418);}while(r); S_30119:; if ((*_FUNC_VALIDLABEL_LONG_X)||new_error){ if(qbevent){evnt(22419);if(r)goto S_30119;} 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(22420);}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(22425);}while(r); S_30123:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22426);if(r)goto S_30123;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22426);}while(r); } S_30126:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_VALIDLABEL_STRING_ADDSYMBOL->len))||new_error){ if(qbevent){evnt(22427);if(r)goto S_30126;} S_30127:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("$",1),0)))||new_error){ if(qbevent){evnt(22428);if(r)goto S_30127;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22428);}while(r); } S_30130:; 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(22429);if(r)goto S_30130;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22429);}while(r); } } S_30134:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 46 ))||new_error){ if(qbevent){evnt(22432);if(r)goto S_30134;} do{ *_FUNC_VALIDLABEL_LONG_DP= 1 ; if(!qbevent)break;evnt(22432);}while(r); } S_30137:; fornext_value3182= 2 ; fornext_finalvalue3182=_FUNC_VALIDLABEL_STRING_T->len; fornext_step3182= 1 ; if (fornext_step3182<0) fornext_step_negative3182=1; else fornext_step_negative3182=0; if (new_error) goto fornext_error3182; goto fornext_entrylabel3182; while(1){ fornext_value3182=fornext_step3182+(*_FUNC_VALIDLABEL_LONG_X); fornext_entrylabel3182: *_FUNC_VALIDLABEL_LONG_X=fornext_value3182; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3182){ if (fornext_value3182fornext_finalvalue3182) break; } fornext_error3182:; if(qbevent){evnt(22433);if(r)goto S_30137;} 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(22434);}while(r); S_30139:; if ((-(*_FUNC_VALIDLABEL_LONG_A== 46 ))||new_error){ if(qbevent){evnt(22435);if(r)goto S_30139;} do{ *_FUNC_VALIDLABEL_LONG_DP=*_FUNC_VALIDLABEL_LONG_DP+ 1 ; if(!qbevent)break;evnt(22435);}while(r); } S_30142:; if (((((-(*_FUNC_VALIDLABEL_LONG_A< 48 ))|(-(*_FUNC_VALIDLABEL_LONG_A> 57 ))))&(-(*_FUNC_VALIDLABEL_LONG_A!= 46 )))||new_error){ if(qbevent){evnt(22436);if(r)goto S_30142;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22436);}while(r); } fornext_continue_3181:; } fornext_exit_3181:; S_30146:; if ((-(*_FUNC_VALIDLABEL_LONG_DP> 1 ))||new_error){ if(qbevent){evnt(22438);if(r)goto S_30146;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22438);}while(r); } S_30149:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_VALIDLABEL_LONG_DP== 1 ))&(-(_FUNC_VALIDLABEL_STRING_T->len== 1 ))))||new_error){ if(qbevent){evnt(22439);if(r)goto S_30149;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22439);}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(22441);}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(22443);}while(r); S_30154:; if ((*_FUNC_VALIDLABEL_LONG_I)||new_error){ if(qbevent){evnt(22443);if(r)goto S_30154;} do{ sub_mid(_FUNC_VALIDLABEL_STRING_T,*_FUNC_VALIDLABEL_LONG_I, 1 ,qbs_new_txt_len("p",1),1); if(!qbevent)break;evnt(22443);}while(r); } S_30157:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(22444);if(r)goto S_30157;} 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(22444);}while(r); } S_30160:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VALIDLABEL_STRING_ADDSYMBOL,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(22445);if(r)goto S_30160;} 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(22445);}while(r); } S_30163:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_VALIDLABEL_STRING_T->len> 40 )))||new_error){ if(qbevent){evnt(22447);if(r)goto S_30163;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22447);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL2,_FUNC_VALIDLABEL_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22449);}while(r); do{ *_FUNC_VALIDLABEL_LONG_VALIDLABEL= 1 ; if(!qbevent)break;evnt(22450);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22451);}while(r); } } S_30171:; if ((-((*_FUNC_VALIDLABEL_LONG_N& 1 )== 0 ))||new_error){ if(qbevent){evnt(22460);if(r)goto S_30171;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22460);}while(r); } S_30174:; fornext_value3187= 2 ; fornext_finalvalue3187=*_FUNC_VALIDLABEL_LONG_N- 1 ; fornext_step3187= 2 ; if (fornext_step3187<0) fornext_step_negative3187=1; else fornext_step_negative3187=0; if (new_error) goto fornext_error3187; goto fornext_entrylabel3187; while(1){ fornext_value3187=fornext_step3187+(*_FUNC_VALIDLABEL_LONG_NX); fornext_entrylabel3187: *_FUNC_VALIDLABEL_LONG_NX=fornext_value3187; if (fornext_step_negative3187){ if (fornext_value3187fornext_finalvalue3187) break; } fornext_error3187:; if(qbevent){evnt(22461);if(r)goto S_30174;} 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(22462);}while(r); S_30176:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_VALIDLABEL_STRING_A,qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(22463);if(r)goto S_30176;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22463);}while(r); } fornext_continue_3186:; } fornext_exit_3186:; do{ *_FUNC_VALIDLABEL_LONG_C=qbs_asc(_FUNC_VALIDLABEL_STRING_CLABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22467);}while(r); S_30181:; if (((-(*_FUNC_VALIDLABEL_LONG_C>= 48 ))&(-(*_FUNC_VALIDLABEL_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(22467);if(r)goto S_30181;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22467);}while(r); } do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22470);}while(r); S_30185:; fornext_value3189= 1 ; fornext_finalvalue3189=*_FUNC_VALIDLABEL_LONG_N; fornext_step3189= 2 ; if (fornext_step3189<0) fornext_step_negative3189=1; else fornext_step_negative3189=0; if (new_error) goto fornext_error3189; goto fornext_entrylabel3189; while(1){ fornext_value3189=fornext_step3189+(*_FUNC_VALIDLABEL_LONG_NX); fornext_entrylabel3189: *_FUNC_VALIDLABEL_LONG_NX=fornext_value3189; if (fornext_step_negative3189){ if (fornext_value3189fornext_finalvalue3189) break; } fornext_error3189:; if(qbevent){evnt(22471);if(r)goto S_30185;} 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(22472);}while(r); S_30187:; fornext_value3191= 1 ; fornext_finalvalue3191=_FUNC_VALIDLABEL_STRING_LABEL->len; fornext_step3191= 1 ; if (fornext_step3191<0) fornext_step_negative3191=1; else fornext_step_negative3191=0; if (new_error) goto fornext_error3191; goto fornext_entrylabel3191; while(1){ fornext_value3191=fornext_step3191+(*_FUNC_VALIDLABEL_LONG_X); fornext_entrylabel3191: *_FUNC_VALIDLABEL_LONG_X=fornext_value3191; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3191){ if (fornext_value3191fornext_finalvalue3191) break; } fornext_error3191:; if(qbevent){evnt(22475);if(r)goto S_30187;} S_30188:; 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(22476);if(r)goto S_30188;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22476);}while(r); } fornext_continue_3190:; } fornext_exit_3190:; S_30192:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22480);if(r)goto S_30192;} do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL3,qbs_ucase(_FUNC_VALIDLABEL_STRING_LABEL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22480);}while(r); do{ qbs_set(__STRING_TLAYOUT,_FUNC_VALIDLABEL_STRING_LABEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22480);}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(22480);}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(22480);}while(r); } fornext_continue_3188:; } fornext_exit_3188:; do{ *_FUNC_VALIDLABEL_LONG_VALIDLABEL= 1 ; if(!qbevent)break;evnt(22483);}while(r); do{ qbs_set(_FUNC_VALIDLABEL_STRING_LABEL2,_FUNC_VALIDLABEL_STRING_LABEL3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22484);}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; 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 "data50.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_30202:; if ((-(*__LONG_VWATCHON== 1 ))||new_error){ if(qbevent){evnt(22489);if(r)goto S_30202;} S_30203:; if ((((-(((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]== 0 ))|(-(*__INTEGER_CLOSEDMAIN== 0 ))))||new_error){ if(qbevent){evnt(22491);if(r)goto S_30203;} do{ SUB_VWATCHADDLABEL(&(pass3193= 0 ),&(pass3194= -1 )); if(!qbevent)break;evnt(22491);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3195=*__LONG_MAINTXTBUF),qbs_new_txt_len("*__LONG_VWATCH_LINENUMBER= 0; SUB_VWATCH((ptrszint*)vwatch_global_vars,(ptrszint*)vwatch_local_vars);",101)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22492);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3196=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_end();",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22494);}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_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 "data51.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_XFILEPRINT_STRING_U,FUNC_STR2(&(pass3199=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22498);}while(r); do{ SUB_WRITEBUFLINE(&(pass3200=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=2;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22499);}while(r); S_30211:; if ((-(*_SUB_XFILEPRINT_LONG_N== 2 ))||new_error){ if(qbevent){evnt(22500);if(r)goto S_30211;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22500);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22500);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22501);}while(r); do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(22502);}while(r); S_30217:; fornext_value3202= 3 ; fornext_finalvalue3202=*_SUB_XFILEPRINT_LONG_N; fornext_step3202= 1 ; if (fornext_step3202<0) fornext_step_negative3202=1; else fornext_step_negative3202=0; if (new_error) goto fornext_error3202; goto fornext_entrylabel3202; while(1){ fornext_value3202=fornext_step3202+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3202: *_SUB_XFILEPRINT_LONG_I=fornext_value3202; if (fornext_step_negative3202){ if (fornext_value3202fornext_finalvalue3202) break; } fornext_error3202:; if(qbevent){evnt(22503);if(r)goto S_30217;} 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(22504);}while(r); S_30219:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22505);if(r)goto S_30219;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(22505);}while(r); } S_30222:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22506);if(r)goto S_30222;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(22506);}while(r); } S_30225:; 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(22507);if(r)goto S_30225;} S_30226:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22508);if(r)goto S_30226;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22508);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22508);}while(r); } do{ goto LABEL_PRINTGOTFN; if(!qbevent)break;evnt(22509);}while(r); } S_30232:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22511);if(r)goto S_30232;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A3,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22511);}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(22511);}while(r); } fornext_continue_3201:; } fornext_exit_3201:; do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... ,",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22513);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22513);}while(r); LABEL_PRINTGOTFN:; if(qbevent){evnt(22514);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(22515);}while(r); S_30241:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22516);if(r)goto S_30241;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22516);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(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(22517);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATETOTYP(_SUB_XFILEPRINT_STRING_E,&(pass3203= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22518);}while(r); S_30246:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22519);if(r)goto S_30246;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22519);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3204=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tab_fileno=tmp_fileno=",22),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22520);}while(r); do{ SUB_WRITEBUFLINE(&(pass3205=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22521);}while(r); do{ *_SUB_XFILEPRINT_LONG_I=*_SUB_XFILEPRINT_LONG_I+ 1 ; if(!qbevent)break;evnt(22522);}while(r); S_30252:; if ((-(*_SUB_XFILEPRINT_LONG_N>=*_SUB_XFILEPRINT_LONG_I))||new_error){ if(qbevent){evnt(22525);if(r)goto S_30252;} S_30253:; 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(22526);if(r)goto S_30253;} LABEL_FPUJUMP:; if(qbevent){evnt(22528);r=0;} do{ qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Using",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22529);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22530);}while(r); do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(22530);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22530);}while(r); S_30258:; fornext_value3207=*_SUB_XFILEPRINT_LONG_I+ 1 ; fornext_finalvalue3207=*_SUB_XFILEPRINT_LONG_N; fornext_step3207= 1 ; if (fornext_step3207<0) fornext_step_negative3207=1; else fornext_step_negative3207=0; if (new_error) goto fornext_error3207; goto fornext_entrylabel3207; while(1){ fornext_value3207=fornext_step3207+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3207: *_SUB_XFILEPRINT_LONG_I=fornext_value3207; if (fornext_step_negative3207){ if (fornext_value3207fornext_finalvalue3207) break; } fornext_error3207:; if(qbevent){evnt(22531);if(r)goto S_30258;} 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(22532);}while(r); S_30260:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22533);if(r)goto S_30260;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(22533);}while(r); } S_30263:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22534);if(r)goto S_30263;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(22534);}while(r); } S_30266:; if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(22535);if(r)goto S_30266;} S_30267:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(22536);if(r)goto S_30267;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22536);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22536);}while(r); } S_30271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(22537);if(r)goto S_30271;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22538);}while(r); S_30273:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22539);if(r)goto S_30273;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22539);}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(22540);}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(22541);}while(r); S_30278:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22542);if(r)goto S_30278;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22542);}while(r); } S_30281:; if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(22543);if(r)goto S_30281;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3208= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22543);}while(r); } S_30284:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22544);if(r)goto S_30284;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22544);}while(r); } S_30287:; if ((-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(22545);if(r)goto S_30287;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22545);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22545);}while(r); } do{ qbs_set(_SUB_XFILEPRINT_STRING_PUFORMAT,_SUB_XFILEPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22546);}while(r); do{ goto fornext_exit_3206; if(!qbevent)break;evnt(22547);}while(r); } } S_30295:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(22550);if(r)goto S_30295;} 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(22550);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22550);}while(r); } fornext_continue_3206:; } fornext_exit_3206:; S_30301:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22552);if(r)goto S_30301;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22552);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22552);}while(r); } S_30305:; if ((-(*_SUB_XFILEPRINT_LONG_I==*_SUB_XFILEPRINT_LONG_N))||new_error){ if(qbevent){evnt(22553);if(r)goto S_30305;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22553);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22553);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3210=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(0,0);",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22555);}while(r); do{ SUB_WRITEBUFLINE(&(pass3211=*__LONG_MAINTXTBUF),qbs_new_txt_len("tmp_long=0;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22557);}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(22559);}while(r); S_30312:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22560);if(r)goto S_30312;} do{ SUB_WRITEBUFLINE(&(pass3212=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static qbs *",12),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22561);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3213=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22563);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3214=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22565);}while(r); do{ SUB_WRITEBUFLINE(&(pass3215=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22566);}while(r); do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(22568);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22569);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(22570);}while(r); S_30322:; fornext_value3217=*_SUB_XFILEPRINT_LONG_I+ 1 ; fornext_finalvalue3217=*_SUB_XFILEPRINT_LONG_N; fornext_step3217= 1 ; if (fornext_step3217<0) fornext_step_negative3217=1; else fornext_step_negative3217=0; if (new_error) goto fornext_error3217; goto fornext_entrylabel3217; while(1){ fornext_value3217=fornext_step3217+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3217: *_SUB_XFILEPRINT_LONG_I=fornext_value3217; if (fornext_step_negative3217){ if (fornext_value3217fornext_finalvalue3217) break; } fornext_error3217:; if(qbevent){evnt(22571);if(r)goto S_30322;} 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(22572);}while(r); S_30324:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22573);if(r)goto S_30324;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(22573);}while(r); } S_30327:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22574);if(r)goto S_30327;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(22574);}while(r); } S_30330:; if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(22575);if(r)goto S_30330;} S_30331:; 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(22576);if(r)goto S_30331;} LABEL_FPRINTULAST:; if(qbevent){evnt(22577);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(22578);}while(r); S_30333:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22579);if(r)goto S_30333;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22579);}while(r); } S_30336:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(22580);if(r)goto S_30336;} 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(22580);}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(22580);}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(22581);}while(r); S_30342:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22582);if(r)goto S_30342;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22582);}while(r); } S_30345:; if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(22583);if(r)goto S_30345;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3218= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22583);}while(r); } S_30348:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22584);if(r)goto S_30348;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22584);}while(r); } S_30351:; if ((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(22585);if(r)goto S_30351;} S_30352:; 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(22587);if(r)goto S_30352;} do{ SUB_WRITEBUFLINE(&(pass3219=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,0);",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22592);}while(r); do{ SUB_WRITEBUFLINE(&(pass3220=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22594);}while(r); do{ SUB_WRITEBUFLINE(&(pass3221=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22595);}while(r); do{ SUB_WRITEBUFLINE(&(pass3222=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,0);",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22596);}while(r); do{ SUB_WRITEBUFLINE(&(pass3223=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs->len=0;",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22598);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3224=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22603);}while(r); } }else{ S_30362:; if ((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(22608);if(r)goto S_30362;} S_30363:; if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(22609);if(r)goto S_30363;} do{ SUB_WRITEBUFLINE(&(pass3225=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22609);}while(r); } S_30366:; if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(22610);if(r)goto S_30366;} do{ SUB_WRITEBUFLINE(&(pass3226=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22610);}while(r); } S_30369:; if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )> 64 ))||new_error){ if(qbevent){evnt(22611);if(r)goto S_30369;} do{ SUB_WRITEBUFLINE(&(pass3227=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22611);}while(r); } }else{ S_30373:; if ((((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 64 )))&(-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(22613);if(r)goto S_30373;} do{ SUB_WRITEBUFLINE(&(pass3228=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22614);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3229=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22616);}while(r); } } } do{ SUB_WRITEBUFLINE(&(pass3230=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22620);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22621);}while(r); S_30382:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(22622);if(r)goto S_30382;} do{ goto fornext_exit_3216; if(!qbevent)break;evnt(22622);}while(r); } do{ goto LABEL_FPRINTUNEXT; if(!qbevent)break;evnt(22623);}while(r); } } S_30388:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(22626);if(r)goto S_30388;} 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(22626);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22626);}while(r); } LABEL_FPRINTUNEXT:; if(qbevent){evnt(22627);r=0;} fornext_continue_3216:; } fornext_exit_3216:; S_30394:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22629);if(r)goto S_30394;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22629);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(22629);}while(r); do{ goto LABEL_FPRINTULAST; if(!qbevent)break;evnt(22629);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3232=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip_pu",7),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22630);}while(r); do{ SUB_WRITEBUFLINE(&(pass3233=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (new_error){",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22632);}while(r); do{ SUB_WRITEBUFLINE(&(pass3234=*__LONG_MAINTXTBUF),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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22633);}while(r); do{ SUB_WRITEBUFLINE(&(pass3235=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22634);}while(r); S_30403:; 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(22635);if(r)goto S_30403;} do{ *_SUB_XFILEPRINT_LONG_NL= 0 ; if(!qbevent)break;evnt(22635);}while(r); }else{ do{ *_SUB_XFILEPRINT_LONG_NL= 1 ; if(!qbevent)break;evnt(22635);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3236=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22636);}while(r); do{ SUB_WRITEBUFLINE(&(pass3237=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22637);}while(r); do{ SUB_WRITEBUFLINE(&(pass3238=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_free(tqbs);",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22638);}while(r); do{ SUB_WRITEBUFLINE(&(pass3239=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22639);}while(r); do{ SUB_WRITEBUFLINE(&(pass3240=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22640);}while(r); do{ SUB_WRITEBUFLINE(&(pass3241=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22641);}while(r); do{ SUB_WRITEBUFLINE(&(pass3242=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=1;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22642);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_XFILEPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22643);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22644);}while(r); } } S_30419:; if ((-(*_SUB_XFILEPRINT_LONG_I>*_SUB_XFILEPRINT_LONG_N))||new_error){ if(qbevent){evnt(22649);if(r)goto S_30419;} do{ SUB_WRITEBUFLINE(&(pass3243=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,0,1);",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22650);}while(r); do{ goto LABEL_PRINTBLANKLINE; if(!qbevent)break;evnt(22651);}while(r); } do{ *_SUB_XFILEPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(22653);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22654);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(22655);}while(r); S_30426:; fornext_value3245=*_SUB_XFILEPRINT_LONG_I; fornext_finalvalue3245=*_SUB_XFILEPRINT_LONG_N; fornext_step3245= 1 ; if (fornext_step3245<0) fornext_step_negative3245=1; else fornext_step_negative3245=0; if (new_error) goto fornext_error3245; goto fornext_entrylabel3245; while(1){ fornext_value3245=fornext_step3245+(*_SUB_XFILEPRINT_LONG_I); fornext_entrylabel3245: *_SUB_XFILEPRINT_LONG_I=fornext_value3245; if (fornext_step_negative3245){ if (fornext_value3245fornext_finalvalue3245) break; } fornext_error3245:; if(qbevent){evnt(22656);if(r)goto S_30426;} 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(22657);}while(r); S_30428:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22658);if(r)goto S_30428;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(22658);}while(r); } S_30431:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22659);if(r)goto S_30431;} do{ *_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(22659);}while(r); } S_30434:; if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(22660);if(r)goto S_30434;} S_30435:; 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(22661);if(r)goto S_30435;} LABEL_PRINTFILELAST:; if(qbevent){evnt(22662);r=0;} S_30436:; 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(22664);if(r)goto S_30436;} S_30437:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22665);if(r)goto S_30437;} do{ *_SUB_XFILEPRINT_LONG_GOTOFPU= 1 ; if(!qbevent)break;evnt(22665);}while(r); }else{ do{ goto LABEL_FPUJUMP; if(!qbevent)break;evnt(22665);}while(r); } } S_30443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(22668);if(r)goto S_30443;} do{ *_SUB_XFILEPRINT_LONG_USETAB= 1 ; if(!qbevent)break;evnt(22668);}while(r); }else{ do{ *_SUB_XFILEPRINT_LONG_USETAB= 0 ; if(!qbevent)break;evnt(22668);}while(r); } S_30448:; if ((-(*_SUB_XFILEPRINT_LONG_LAST== 1 ))||new_error){ if(qbevent){evnt(22669);if(r)goto S_30448;} do{ *_SUB_XFILEPRINT_LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(22669);}while(r); }else{ do{ *_SUB_XFILEPRINT_LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(22669);}while(r); } do{ *_SUB_XFILEPRINT_LONG_EXTRASPACE= 0 ; if(!qbevent)break;evnt(22670);}while(r); S_30454:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(22672);if(r)goto S_30454;} do{ qbs_set(_SUB_XFILEPRINT_STRING_EBAK,_SUB_XFILEPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22673);}while(r); do{ *_SUB_XFILEPRINT_LONG_PNRTNUM= 0 ; if(!qbevent)break;evnt(22674);}while(r); LABEL_PRINTFILENUMBER:; if(qbevent){evnt(22675);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(22676);}while(r); S_30458:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22677);if(r)goto S_30458;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22677);}while(r); } S_30461:; if ((-(*_SUB_XFILEPRINT_LONG_PNRTNUM== 0 ))||new_error){ if(qbevent){evnt(22678);if(r)goto S_30461;} S_30462:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(22679);if(r)goto S_30462;} 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(22679);}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(22679);}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(22681);}while(r); S_30469:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22682);if(r)goto S_30469;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22682);}while(r); } S_30472:; if ((-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(22683);if(r)goto S_30472;} 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(22684);}while(r); do{ *_SUB_XFILEPRINT_LONG_EXTRASPACE= 1 ; if(!qbevent)break;evnt(22685);}while(r); do{ *_SUB_XFILEPRINT_LONG_PNRTNUM= 1 ; if(!qbevent)break;evnt(22686);}while(r); do{ goto LABEL_PRINTFILENUMBER; if(!qbevent)break;evnt(22687);}while(r); } S_30478:; if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(22689);if(r)goto S_30478;} do{ qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3247= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22689);}while(r); } S_30481:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22690);if(r)goto S_30481;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22690);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3248=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_file_print(tmp_fileno,",26),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XFILEPRINT_LONG_EXTRASPACE))),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XFILEPRINT_LONG_USETAB))),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XFILEPRINT_LONG_NEWLINE))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22692);}while(r); }else{ S_30486:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(22694);if(r)goto S_30486;} 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(22694);}while(r); } S_30489:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(22695);if(r)goto S_30489;} S_30490:; 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(22696);if(r)goto S_30490;} 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(22696);}while(r); } } S_30494:; if ((*_SUB_XFILEPRINT_LONG_USETAB)||new_error){ if(qbevent){evnt(22698);if(r)goto S_30494;} do{ SUB_WRITEBUFLINE(&(pass3249=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,1,0);",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22698);}while(r); } } do{ SUB_WRITEBUFLINE(&(pass3250=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22700);}while(r); do{ qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22702);}while(r); S_30500:; if ((*_SUB_XFILEPRINT_LONG_GOTOFPU)||new_error){ if(qbevent){evnt(22703);if(r)goto S_30500;} do{ goto LABEL_FPUJUMP; if(!qbevent)break;evnt(22703);}while(r); } S_30503:; if ((*_SUB_XFILEPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(22704);if(r)goto S_30503;} do{ goto fornext_exit_3244; if(!qbevent)break;evnt(22704);}while(r); } do{ goto LABEL_PRINTFILENEXT; if(!qbevent)break;evnt(22705);}while(r); } } S_30509:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22708);if(r)goto S_30509;} 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(22708);}while(r); }else{ do{ qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22708);}while(r); } LABEL_PRINTFILENEXT:; if(qbevent){evnt(22709);r=0;} fornext_continue_3244:; } fornext_exit_3244:; S_30515:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22711);if(r)goto S_30515;} do{ qbs_set(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22711);}while(r); do{ *_SUB_XFILEPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(22711);}while(r); do{ goto LABEL_PRINTFILELAST; if(!qbevent)break;evnt(22711);}while(r); } LABEL_PRINTBLANKLINE:; if(qbevent){evnt(22712);r=0;} do{ SUB_WRITEBUFLINE(&(pass3251=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22713);}while(r); do{ SUB_WRITEBUFLINE(&(pass3252=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22714);}while(r); do{ SUB_WRITEBUFLINE(&(pass3253=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=1;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22715);}while(r); do{ qbs_set(__STRING_TLAYOUT,_SUB_XFILEPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22716);}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; } 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 "data52.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_XFILEWRITE_STRING_L,qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Write",5)),__STRING1_SP),qbs_new_txt_len("#",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22720);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_U,FUNC_STR2(&(pass3255=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22721);}while(r); do{ SUB_WRITEBUFLINE(&(pass3256=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=2;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22722);}while(r); S_30527:; if ((-(*_SUB_XFILEWRITE_LONG_N== 2 ))||new_error){ if(qbevent){evnt(22723);if(r)goto S_30527;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22723);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22723);}while(r); } do{ qbs_set(_SUB_XFILEWRITE_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22724);}while(r); do{ *_SUB_XFILEWRITE_LONG_B= 0 ; if(!qbevent)break;evnt(22725);}while(r); S_30533:; fornext_value3258= 3 ; fornext_finalvalue3258=*_SUB_XFILEWRITE_LONG_N; fornext_step3258= 1 ; if (fornext_step3258<0) fornext_step_negative3258=1; else fornext_step_negative3258=0; if (new_error) goto fornext_error3258; goto fornext_entrylabel3258; while(1){ fornext_value3258=fornext_step3258+(*_SUB_XFILEWRITE_LONG_I); fornext_entrylabel3258: *_SUB_XFILEWRITE_LONG_I=fornext_value3258; if (fornext_step_negative3258){ if (fornext_value3258fornext_finalvalue3258) break; } fornext_error3258:; if(qbevent){evnt(22726);if(r)goto S_30533;} 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(22727);}while(r); S_30535:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22728);if(r)goto S_30535;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B+ 1 ; if(!qbevent)break;evnt(22728);}while(r); } S_30538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22729);if(r)goto S_30538;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B- 1 ; if(!qbevent)break;evnt(22729);}while(r); } S_30541:; 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(22730);if(r)goto S_30541;} S_30542:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22731);if(r)goto S_30542;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22731);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22731);}while(r); } do{ goto LABEL_WRITEGOTFN; if(!qbevent)break;evnt(22732);}while(r); } S_30548:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22734);if(r)goto S_30548;} do{ qbs_set(_SUB_XFILEWRITE_STRING_A3,_SUB_XFILEWRITE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22734);}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(22734);}while(r); } fornext_continue_3257:; } fornext_exit_3257:; do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... ,",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22736);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22736);}while(r); LABEL_WRITEGOTFN:; if(qbevent){evnt(22737);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(22738);}while(r); S_30557:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22739);if(r)goto S_30557;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22739);}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(22740);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_EVALUATETOTYP(_SUB_XFILEWRITE_STRING_E,&(pass3259= 64 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22741);}while(r); S_30562:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22742);if(r)goto S_30562;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22742);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3260=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tab_fileno=tmp_fileno=",22),_SUB_XFILEWRITE_STRING_E),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22743);}while(r); do{ SUB_WRITEBUFLINE(&(pass3261=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEWRITE_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22744);}while(r); do{ *_SUB_XFILEWRITE_LONG_I=*_SUB_XFILEWRITE_LONG_I+ 1 ; if(!qbevent)break;evnt(22745);}while(r); S_30568:; if ((-(*_SUB_XFILEWRITE_LONG_I>*_SUB_XFILEWRITE_LONG_N))||new_error){ if(qbevent){evnt(22746);if(r)goto S_30568;} do{ SUB_WRITEBUFLINE(&(pass3262=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,0,1);",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22747);}while(r); do{ goto LABEL_WRITEBLANKLINE; if(!qbevent)break;evnt(22748);}while(r); } do{ *_SUB_XFILEWRITE_LONG_B= 0 ; if(!qbevent)break;evnt(22750);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22751);}while(r); do{ *_SUB_XFILEWRITE_LONG_LAST= 0 ; if(!qbevent)break;evnt(22752);}while(r); S_30575:; fornext_value3264=*_SUB_XFILEWRITE_LONG_I; fornext_finalvalue3264=*_SUB_XFILEWRITE_LONG_N; fornext_step3264= 1 ; if (fornext_step3264<0) fornext_step_negative3264=1; else fornext_step_negative3264=0; if (new_error) goto fornext_error3264; goto fornext_entrylabel3264; while(1){ fornext_value3264=fornext_step3264+(*_SUB_XFILEWRITE_LONG_I); fornext_entrylabel3264: *_SUB_XFILEWRITE_LONG_I=fornext_value3264; if (fornext_step_negative3264){ if (fornext_value3264fornext_finalvalue3264) break; } fornext_error3264:; if(qbevent){evnt(22753);if(r)goto S_30575;} 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(22754);}while(r); S_30577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22755);if(r)goto S_30577;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B+ 1 ; if(!qbevent)break;evnt(22755);}while(r); } S_30580:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22756);if(r)goto S_30580;} do{ *_SUB_XFILEWRITE_LONG_B=*_SUB_XFILEWRITE_LONG_B- 1 ; if(!qbevent)break;evnt(22756);}while(r); } S_30583:; if ((-(*_SUB_XFILEWRITE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(22757);if(r)goto S_30583;} S_30584:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(22758);if(r)goto S_30584;} LABEL_WRITEFILELAST:; if(qbevent){evnt(22759);r=0;} S_30585:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 1 ))||new_error){ if(qbevent){evnt(22760);if(r)goto S_30585;} do{ *_SUB_XFILEWRITE_LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(22760);}while(r); }else{ do{ *_SUB_XFILEWRITE_LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(22760);}while(r); } do{ qbs_set(_SUB_XFILEWRITE_STRING_EBAK,_SUB_XFILEWRITE_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22761);}while(r); do{ *_SUB_XFILEWRITE_LONG_REEVALED= 0 ; if(!qbevent)break;evnt(22762);}while(r); LABEL_WRITEFILENUMBER:; if(qbevent){evnt(22763);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(22764);}while(r); S_30593:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22765);if(r)goto S_30593;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22765);}while(r); } S_30596:; if ((-(*_SUB_XFILEWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(22766);if(r)goto S_30596;} 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(22767);}while(r); S_30598:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(22768);if(r)goto S_30598;} 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(22768);}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(22770);}while(r); S_30603:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22771);if(r)goto S_30603;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22771);}while(r); } S_30606:; if ((-(*_SUB_XFILEWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(22772);if(r)goto S_30606;} S_30607:; if ((-((*_SUB_XFILEWRITE_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(22773);if(r)goto S_30607;} 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(22774);}while(r); S_30609:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(22775);if(r)goto S_30609;} 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(22775);}while(r); } do{ *_SUB_XFILEWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(22776);}while(r); do{ goto LABEL_WRITEFILENUMBER; if(!qbevent)break;evnt(22777);}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(22779);}while(r); S_30616:; if ((-(*_SUB_XFILEWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(22780);if(r)goto S_30616;} 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(22780);}while(r); } do{ *_SUB_XFILEWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(22781);}while(r); do{ goto LABEL_WRITEFILENUMBER; if(!qbevent)break;evnt(22782);}while(r); } } S_30623:; if (((*_SUB_XFILEWRITE_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(22785);if(r)goto S_30623;} do{ qbs_set(_SUB_XFILEWRITE_STRING_E,FUNC_REFER(_SUB_XFILEWRITE_STRING_E,_SUB_XFILEWRITE_LONG_TYP,&(pass3265= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22785);}while(r); } S_30626:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22786);if(r)goto S_30626;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22786);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3266=*__LONG_MAINTXTBUF),qbs_add(qbs_add(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)),qbs_str((int32)(*_SUB_XFILEWRITE_LONG_NEWLINE))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22788);}while(r); do{ SUB_WRITEBUFLINE(&(pass3267=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XFILEWRITE_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22789);}while(r); do{ qbs_set(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22790);}while(r); S_30632:; if ((*_SUB_XFILEWRITE_LONG_LAST)||new_error){ if(qbevent){evnt(22791);if(r)goto S_30632;} do{ goto fornext_exit_3263; if(!qbevent)break;evnt(22791);}while(r); } do{ goto LABEL_WRITEFILENEXT; if(!qbevent)break;evnt(22792);}while(r); } } S_30638:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22795);if(r)goto S_30638;} 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(22795);}while(r); }else{ do{ qbs_set(_SUB_XFILEWRITE_STRING_E,_SUB_XFILEWRITE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22795);}while(r); } LABEL_WRITEFILENEXT:; if(qbevent){evnt(22796);r=0;} fornext_continue_3263:; } fornext_exit_3263:; S_30644:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22798);if(r)goto S_30644;} do{ qbs_set(_SUB_XFILEWRITE_STRING_A2,qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22798);}while(r); do{ *_SUB_XFILEWRITE_LONG_LAST= 1 ; if(!qbevent)break;evnt(22798);}while(r); do{ goto LABEL_WRITEFILELAST; if(!qbevent)break;evnt(22798);}while(r); } LABEL_WRITEBLANKLINE:; if(qbevent){evnt(22799);r=0;} do{ SUB_WRITEBUFLINE(&(pass3268=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEWRITE_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22801);}while(r); do{ SUB_WRITEBUFLINE(&(pass3269=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22802);}while(r); do{ SUB_WRITEBUFLINE(&(pass3270=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=1;",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22803);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(22804);}while(r); S_30653:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(22804);if(r)goto S_30653;} 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(22804);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XFILEWRITE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22804);}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; } void SUB_XGOSUB(qbs*_SUB_XGOSUB_STRING_CA){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_XGOSUB_STRING_A2,FUNC_GETELEMENT(_SUB_XGOSUB_STRING_CA,&(pass3273= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22808);}while(r); S_30659:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(_SUB_XGOSUB_STRING_A2)== 0 )))||new_error){ if(qbevent){evnt(22809);if(r)goto S_30659;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid label",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22809);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22809);}while(r); } do{ *_SUB_XGOSUB_LONG_V=FUNC_HASHFIND(_SUB_XGOSUB_STRING_A2,&(pass3274= 2 ),_SUB_XGOSUB_LONG_IGNORE,_SUB_XGOSUB_LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22811);}while(r); do{ *_SUB_XGOSUB_LONG_X= 1 ; if(!qbevent)break;evnt(22812);}while(r); LABEL_LABCHK200:; if(qbevent){evnt(22813);r=0;} S_30665:; if ((*_SUB_XGOSUB_LONG_V)||new_error){ if(qbevent){evnt(22814);if(r)goto S_30665;} 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]))*282+257)); if(!qbevent)break;evnt(22815);}while(r); S_30667:; if (((-(*_SUB_XGOSUB_LONG_S==*__LONG_SUBFUNCN))|(-(*_SUB_XGOSUB_LONG_S== -1 )))||new_error){ if(qbevent){evnt(22816);if(r)goto S_30667;} S_30668:; if ((-(*_SUB_XGOSUB_LONG_S== -1 ))||new_error){ if(qbevent){evnt(22817);if(r)goto S_30668;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(22817);}while(r); } do{ *_SUB_XGOSUB_LONG_X= 0 ; if(!qbevent)break;evnt(22818);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22819);}while(r); }else{ S_30674:; if ((-(*_SUB_XGOSUB_LONG_V== 2 ))||new_error){ if(qbevent){evnt(22821);if(r)goto S_30674;} do{ *_SUB_XGOSUB_LONG_V=FUNC_HASHFINDCONT(_SUB_XGOSUB_LONG_IGNORE,_SUB_XGOSUB_LONG_R); if(!qbevent)break;evnt(22821);}while(r); do{ goto LABEL_LABCHK200; if(!qbevent)break;evnt(22821);}while(r); } } } S_30680:; if ((*_SUB_XGOSUB_LONG_X)||new_error){ if(qbevent){evnt(22824);if(r)goto S_30680;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(22826);}while(r); S_30682:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(22826);if(r)goto S_30682;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(22826);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elementslen))||new_error){ if(qbevent){evnt(22837);if(r)goto S_30696;} 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(22837);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XGOSUB_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22837);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3277=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("return_point[next_return_point++]=",34),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22840);}while(r); do{ SUB_WRITEBUFLINE(&(pass3278=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (next_return_point>=return_points) more_return_points();",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22841);}while(r); do{ SUB_WRITEBUFLINE(&(pass3279=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),_SUB_XGOSUB_STRING_A2),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22842);}while(r); do{ SUB_WRITEBUFLINE(&(pass3280=*__LONG_RETTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22844);}while(r); do{ SUB_WRITEBUFLINE(&(pass3281=*__LONG_RETTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto RETURN_",12),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22845);}while(r); do{ SUB_WRITEBUFLINE(&(pass3282=*__LONG_RETTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22846);}while(r); do{ SUB_WRITEBUFLINE(&(pass3283=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("RETURN_",7),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22847);}while(r); do{ *__LONG_GOSUBID=*__LONG_GOSUBID+ 1 ; if(!qbevent)break;evnt(22848);}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; } 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 "data54.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_30709:; if ((-(*_SUB_XONGOTOGOSUB_LONG_N< 4 ))||new_error){ if(qbevent){evnt(22852);if(r)goto S_30709;} 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(22852);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22852);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_L,FUNC_SCASE(qbs_new_txt_len("On",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22853);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_B= 0 ; if(!qbevent)break;evnt(22854);}while(r); S_30715:; fornext_value3287= 2 ; fornext_finalvalue3287=*_SUB_XONGOTOGOSUB_LONG_N; 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+(*_SUB_XONGOTOGOSUB_LONG_I); fornext_entrylabel3287: *_SUB_XONGOTOGOSUB_LONG_I=fornext_value3287; if (fornext_step_negative3287){ if (fornext_value3287fornext_finalvalue3287) break; } fornext_error3287:; if(qbevent){evnt(22855);if(r)goto S_30715;} 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(22856);}while(r); S_30717:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22857);if(r)goto S_30717;} do{ *_SUB_XONGOTOGOSUB_LONG_B=*_SUB_XONGOTOGOSUB_LONG_B+ 1 ; if(!qbevent)break;evnt(22857);}while(r); } S_30720:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22858);if(r)goto S_30720;} do{ *_SUB_XONGOTOGOSUB_LONG_B=*_SUB_XONGOTOGOSUB_LONG_B- 1 ; if(!qbevent)break;evnt(22858);}while(r); } S_30723:; 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(22859);if(r)goto S_30723;} do{ goto fornext_exit_3286; if(!qbevent)break;evnt(22859);}while(r); } fornext_continue_3286:; } fornext_exit_3286:; S_30727:; if (((-(*_SUB_XONGOTOGOSUB_LONG_I>=*_SUB_XONGOTOGOSUB_LONG_N))|(-(*_SUB_XONGOTOGOSUB_LONG_I== 2 )))||new_error){ if(qbevent){evnt(22861);if(r)goto S_30727;} 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(22861);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22861);}while(r); } do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_GETELEMENTS(_SUB_XONGOTOGOSUB_STRING_CA,&(pass3288= 2 ),&(pass3289=*_SUB_XONGOTOGOSUB_LONG_I- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22862);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_G= 0 ; if(!qbevent)break;evnt(22864);}while(r); S_30733:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E2,qbs_new_txt_len("GOSUB",5))))||new_error){ if(qbevent){evnt(22864);if(r)goto S_30733;} do{ *_SUB_XONGOTOGOSUB_LONG_G= 1 ; if(!qbevent)break;evnt(22864);}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(22865);}while(r); S_30737:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22866);if(r)goto S_30737;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22866);}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(22867);}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(22868);}while(r); S_30742:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22869);if(r)goto S_30742;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22869);}while(r); } S_30745:; if (((*_SUB_XONGOTOGOSUB_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(22870);if(r)goto S_30745;} do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_E,FUNC_REFER(_SUB_XONGOTOGOSUB_STRING_E,_SUB_XONGOTOGOSUB_LONG_TYP,&(pass3290= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22870);}while(r); } S_30748:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22871);if(r)goto S_30748;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22871);}while(r); } S_30751:; if (((*_SUB_XONGOTOGOSUB_LONG_TYP&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(22872);if(r)goto S_30751;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected numeric expression",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22872);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22872);}while(r); } S_30755:; if (((*_SUB_XONGOTOGOSUB_LONG_TYP&*__LONG_ISFLOAT))||new_error){ if(qbevent){evnt(22873);if(r)goto S_30755;} 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(22874);}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(22876);}while(r); do{ qbs_set(_SUB_XONGOTOGOSUB_STRING_U,FUNC_STR2(&(pass3291=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22877);}while(r); do{ SUB_WRITEBUFLINE(&(pass3292=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static int32 ongo_",18),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("=0;",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22878);}while(r); do{ SUB_WRITEBUFLINE(&(pass3293=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22879);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_LN= 1 ; if(!qbevent)break;evnt(22880);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_LABELWASLAST= 0 ; if(!qbevent)break;evnt(22881);}while(r); S_30764:; fornext_value3295=*_SUB_XONGOTOGOSUB_LONG_I+ 1 ; fornext_finalvalue3295=*_SUB_XONGOTOGOSUB_LONG_N; fornext_step3295= 1 ; if (fornext_step3295<0) fornext_step_negative3295=1; else fornext_step_negative3295=0; if (new_error) goto fornext_error3295; goto fornext_entrylabel3295; while(1){ fornext_value3295=fornext_step3295+(*_SUB_XONGOTOGOSUB_LONG_I); fornext_entrylabel3295: *_SUB_XONGOTOGOSUB_LONG_I=fornext_value3295; if (fornext_step_negative3295){ if (fornext_value3295fornext_finalvalue3295) break; } fornext_error3295:; if(qbevent){evnt(22882);if(r)goto S_30764;} 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(22883);}while(r); S_30766:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XONGOTOGOSUB_STRING_E,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(22884);if(r)goto S_30766;} 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(22885);}while(r); S_30768:; if ((-(*_SUB_XONGOTOGOSUB_LONG_I==*_SUB_XONGOTOGOSUB_LONG_N))||new_error){ if(qbevent){evnt(22886);if(r)goto S_30768;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Trailing , invalid",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22886);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22886);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_LN=*_SUB_XONGOTOGOSUB_LONG_LN+ 1 ; if(!qbevent)break;evnt(22887);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_LABELWASLAST= 0 ; if(!qbevent)break;evnt(22888);}while(r); }else{ S_30775:; if ((*_SUB_XONGOTOGOSUB_LONG_LABELWASLAST)||new_error){ if(qbevent){evnt(22890);if(r)goto S_30775;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ,",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22890);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22890);}while(r); } S_30779:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDLABEL(_SUB_XONGOTOGOSUB_STRING_E)== 0 )))||new_error){ if(qbevent){evnt(22891);if(r)goto S_30779;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid label!",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22891);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22891);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_V=FUNC_HASHFIND(_SUB_XONGOTOGOSUB_STRING_E,&(pass3296= 2 ),_SUB_XONGOTOGOSUB_LONG_IGNORE,_SUB_XONGOTOGOSUB_LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22893);}while(r); do{ *_SUB_XONGOTOGOSUB_LONG_X= 1 ; if(!qbevent)break;evnt(22894);}while(r); LABEL_LABCHK507:; if(qbevent){evnt(22895);r=0;} S_30785:; if ((*_SUB_XONGOTOGOSUB_LONG_V)||new_error){ if(qbevent){evnt(22896);if(r)goto S_30785;} 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]))*282+257)); if(!qbevent)break;evnt(22897);}while(r); S_30787:; if (((-(*_SUB_XONGOTOGOSUB_LONG_S==*__LONG_SUBFUNCN))|(-(*_SUB_XONGOTOGOSUB_LONG_S== -1 )))||new_error){ if(qbevent){evnt(22898);if(r)goto S_30787;} S_30788:; if ((-(*_SUB_XONGOTOGOSUB_LONG_S== -1 ))||new_error){ if(qbevent){evnt(22899);if(r)goto S_30788;} do{ *(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_XONGOTOGOSUB_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+257))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(22899);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_X= 0 ; if(!qbevent)break;evnt(22900);}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]))*282+1)),256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22901);}while(r); }else{ S_30794:; if ((-(*_SUB_XONGOTOGOSUB_LONG_V== 2 ))||new_error){ if(qbevent){evnt(22903);if(r)goto S_30794;} do{ *_SUB_XONGOTOGOSUB_LONG_V=FUNC_HASHFINDCONT(_SUB_XONGOTOGOSUB_LONG_IGNORE,_SUB_XONGOTOGOSUB_LONG_R); if(!qbevent)break;evnt(22903);}while(r); do{ goto LABEL_LABCHK507; if(!qbevent)break;evnt(22903);}while(r); } } } S_30800:; if ((*_SUB_XONGOTOGOSUB_LONG_X)||new_error){ if(qbevent){evnt(22906);if(r)goto S_30800;} do{ *__LONG_NLABELS=*__LONG_NLABELS+ 1 ; if(!qbevent)break;evnt(22908);}while(r); S_30802:; if ((-(*__LONG_NLABELS>*__LONG_LABELS_UBOUND))||new_error){ if(qbevent){evnt(22908);if(r)goto S_30802;} do{ *__LONG_LABELS_UBOUND=*__LONG_LABELS_UBOUND* 2 ; if(!qbevent)break;evnt(22908);}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*2256/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*2256/8+1); memcpy((void*)(__ARRAY_UDT_LABELS[0]),redim_preserve_cmem_buffer,preserved_elements*2256/8+1); if (preserved_elements=return_points) more_return_points();",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22925);}while(r); do{ SUB_WRITEBUFLINE(&(pass3301=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto LABEL_",11),_SUB_XONGOTOGOSUB_STRING_LB),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22926);}while(r); do{ SUB_WRITEBUFLINE(&(pass3302=*__LONG_RETTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("case ",5),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22928);}while(r); do{ SUB_WRITEBUFLINE(&(pass3303=*__LONG_RETTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto RETURN_",12),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22929);}while(r); do{ SUB_WRITEBUFLINE(&(pass3304=*__LONG_RETTXTBUF),qbs_new_txt_len("break;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22930);}while(r); do{ SUB_WRITEBUFLINE(&(pass3305=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("RETURN_",7),FUNC_STR2(__LONG_GOSUBID)),qbs_new_txt_len(":;",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22931);}while(r); do{ *__LONG_GOSUBID=*__LONG_GOSUBID+ 1 ; if(!qbevent)break;evnt(22932);}while(r); do{ SUB_WRITEBUFLINE(&(pass3306=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("goto ongo_",10),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("_skip;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22933);}while(r); do{ SUB_WRITEBUFLINE(&(pass3307=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22934);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3308=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22936);}while(r); } do{ *_SUB_XONGOTOGOSUB_LONG_LABELWASLAST= 1 ; if(!qbevent)break;evnt(22938);}while(r); } fornext_continue_3294:; } fornext_exit_3294:; do{ SUB_WRITEBUFLINE(&(pass3309=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (ongo_",9),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("<0) error(5);",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22941);}while(r); S_30835:; if ((-(*_SUB_XONGOTOGOSUB_LONG_G== 1 ))||new_error){ if(qbevent){evnt(22942);if(r)goto S_30835;} do{ SUB_WRITEBUFLINE(&(pass3310=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("ongo_",5),_SUB_XONGOTOGOSUB_STRING_U),qbs_new_txt_len("_skip:;",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22942);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(22943);}while(r); S_30839:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(22943);if(r)goto S_30839;} 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(22943);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XONGOTOGOSUB_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22943);}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; } 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 "data55.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_XPRINT_STRING_U,FUNC_STR2(&(pass3314=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22947);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_L,FUNC_SCASE(qbs_new_txt_len("Print",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22949);}while(r); S_30846:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_XPRINT_STRING_A)== 76 )))||new_error){ if(qbevent){evnt(22950);if(r)goto S_30846;} do{ *_SUB_XPRINT_LONG_LP= 1 ; if(!qbevent)break;evnt(22950);}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(22950);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_L,FUNC_SCASE(qbs_new_txt_len("LPrint",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22950);}while(r); do{ SUB_WRITEBUFLINE(&(pass3315=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_LPRINT=1;",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22950);}while(r); do{ tmp_long=array_check(( 9 )-__ARRAY_LONG_DEPENDENCY[4],__ARRAY_LONG_DEPENDENCY[5]); if (!new_error) ((int32*)(__ARRAY_LONG_DEPENDENCY[0]))[tmp_long]= 1 ; if(!qbevent)break;evnt(22950);}while(r); } S_30853:; if ((-(*_SUB_XPRINT_LONG_N>= 2 ))||new_error){ if(qbevent){evnt(22953);if(r)goto S_30853;} S_30854:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_SUB_XPRINT_STRING_A,&(pass3316= 2 )),qbs_new_txt_len("USING",5))))||new_error){ if(qbevent){evnt(22954);if(r)goto S_30854;} do{ *_SUB_XPRINT_LONG_I= 3 ; if(!qbevent)break;evnt(22956);}while(r); LABEL_PUJUMP:; if(qbevent){evnt(22957);r=0;} do{ qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Using",5)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22958);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22959);}while(r); do{ *_SUB_XPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(22959);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22959);}while(r); S_30860:; fornext_value3318=*_SUB_XPRINT_LONG_I; fornext_finalvalue3318=*_SUB_XPRINT_LONG_N; fornext_step3318= 1 ; if (fornext_step3318<0) fornext_step_negative3318=1; else fornext_step_negative3318=0; if (new_error) goto fornext_error3318; goto fornext_entrylabel3318; while(1){ fornext_value3318=fornext_step3318+(*_SUB_XPRINT_LONG_I); fornext_entrylabel3318: *_SUB_XPRINT_LONG_I=fornext_value3318; if (fornext_step_negative3318){ if (fornext_value3318fornext_finalvalue3318) break; } fornext_error3318:; if(qbevent){evnt(22960);if(r)goto S_30860;} 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(22961);}while(r); S_30862:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(22962);if(r)goto S_30862;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(22962);}while(r); } S_30865:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(22963);if(r)goto S_30865;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(22963);}while(r); } S_30868:; if ((-(*_SUB_XPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(22964);if(r)goto S_30868;} S_30869:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(22965);if(r)goto S_30869;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22965);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22965);}while(r); } S_30873:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(22966);if(r)goto S_30873;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22967);}while(r); S_30875:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22968);if(r)goto S_30875;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22968);}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(22969);}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(22970);}while(r); S_30880:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22971);if(r)goto S_30880;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22971);}while(r); } S_30883:; if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(22972);if(r)goto S_30883;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3319= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22972);}while(r); } S_30886:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(22973);if(r)goto S_30886;} do{ goto exit_subfunc; if(!qbevent)break;evnt(22973);}while(r); } S_30889:; if ((-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(22974);if(r)goto S_30889;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22974);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22974);}while(r); } do{ qbs_set(_SUB_XPRINT_STRING_PUFORMAT,_SUB_XPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22975);}while(r); do{ goto fornext_exit_3317; if(!qbevent)break;evnt(22976);}while(r); } } S_30897:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(22979);if(r)goto S_30897;} 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(22979);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22979);}while(r); } fornext_continue_3317:; } fornext_exit_3317:; S_30903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22981);if(r)goto S_30903;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22981);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22981);}while(r); } S_30907:; if ((-(*_SUB_XPRINT_LONG_I==*_SUB_XPRINT_LONG_N))||new_error){ if(qbevent){evnt(22982);if(r)goto S_30907;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22982);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(22982);}while(r); } S_30911:; if ((-(*_SUB_XPRINT_LONG_TQBSSET== 0 ))||new_error){ if(qbevent){evnt(22984);if(r)goto S_30911;} do{ SUB_WRITEBUFLINE(&(pass3321=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(0,0);",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22985);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3322=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,qbs_new_txt_len(",29),func_chr( 34 )),func_chr( 34 )),qbs_new_txt_len(",0));",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22987);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3323=*__LONG_MAINTXTBUF),qbs_new_txt_len("tmp_long=0;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22990);}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(22994);}while(r); S_30918:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(22995);if(r)goto S_30918;} do{ SUB_WRITEBUFLINE(&(pass3324=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static qbs *",12),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22996);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3325=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(22998);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3326=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23000);}while(r); do{ SUB_WRITEBUFLINE(&(pass3327=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23001);}while(r); do{ *_SUB_XPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(23004);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23005);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(23006);}while(r); S_30928:; fornext_value3329=*_SUB_XPRINT_LONG_I+ 1 ; fornext_finalvalue3329=*_SUB_XPRINT_LONG_N; fornext_step3329= 1 ; if (fornext_step3329<0) fornext_step_negative3329=1; else fornext_step_negative3329=0; if (new_error) goto fornext_error3329; goto fornext_entrylabel3329; while(1){ fornext_value3329=fornext_step3329+(*_SUB_XPRINT_LONG_I); fornext_entrylabel3329: *_SUB_XPRINT_LONG_I=fornext_value3329; if (fornext_step_negative3329){ if (fornext_value3329fornext_finalvalue3329) break; } fornext_error3329:; if(qbevent){evnt(23007);if(r)goto S_30928;} 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(23008);}while(r); S_30930:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(23009);if(r)goto S_30930;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(23009);}while(r); } S_30933:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(23010);if(r)goto S_30933;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(23010);}while(r); } S_30936:; if ((-(*_SUB_XPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(23011);if(r)goto S_30936;} S_30937:; 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(23012);if(r)goto S_30937;} LABEL_PRINTULAST:; if(qbevent){evnt(23013);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(23014);}while(r); S_30939:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23015);if(r)goto S_30939;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23015);}while(r); } S_30942:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(23016);if(r)goto S_30942;} 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(23016);}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(23016);}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(23017);}while(r); S_30948:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23018);if(r)goto S_30948;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23018);}while(r); } S_30951:; if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(23019);if(r)goto S_30951;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3330= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23019);}while(r); } S_30954:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23020);if(r)goto S_30954;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23020);}while(r); } S_30957:; if ((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(23021);if(r)goto S_30957;} S_30958:; 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(23023);if(r)goto S_30958;} do{ SUB_WRITEBUFLINE(&(pass3331=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23028);}while(r); do{ SUB_WRITEBUFLINE(&(pass3332=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23030);}while(r); do{ SUB_WRITEBUFLINE(&(pass3333=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23031);}while(r); S_30962:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(23032);if(r)goto S_30962;} do{ SUB_WRITEBUFLINE(&(pass3334=*__LONG_MAINTXTBUF),qbs_new_txt_len("lprint_makefit(tqbs);",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23032);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3335=*__LONG_MAINTXTBUF),qbs_new_txt_len("makefit(tqbs);",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23032);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3336=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23033);}while(r); do{ SUB_WRITEBUFLINE(&(pass3337=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs->len=0;",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23035);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3338=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23040);}while(r); } }else{ S_30973:; if ((*_SUB_XPRINT_LONG_TYP&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23047);if(r)goto S_30973;} S_30974:; if ((-((*_SUB_XPRINT_LONG_TYP& 511 )== 32 ))||new_error){ if(qbevent){evnt(23048);if(r)goto S_30974;} do{ SUB_WRITEBUFLINE(&(pass3339=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23048);}while(r); } S_30977:; if ((-((*_SUB_XPRINT_LONG_TYP& 511 )== 64 ))||new_error){ if(qbevent){evnt(23049);if(r)goto S_30977;} do{ SUB_WRITEBUFLINE(&(pass3340=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23049);}while(r); } S_30980:; if ((-((*_SUB_XPRINT_LONG_TYP& 511 )> 64 ))||new_error){ if(qbevent){evnt(23050);if(r)goto S_30980;} do{ SUB_WRITEBUFLINE(&(pass3341=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23050);}while(r); } }else{ S_30984:; if ((((-((*_SUB_XPRINT_LONG_TYP& 511 )== 64 )))&(-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISUNSIGNED)!= 0 )))||new_error){ if(qbevent){evnt(23052);if(r)goto S_30984;} do{ SUB_WRITEBUFLINE(&(pass3342=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23053);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3343=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23055);}while(r); } } } do{ SUB_WRITEBUFLINE(&(pass3344=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip_pu",27),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23059);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23060);}while(r); S_30993:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(23061);if(r)goto S_30993;} do{ goto fornext_exit_3328; if(!qbevent)break;evnt(23061);}while(r); } do{ goto LABEL_PRINTUNEXT; if(!qbevent)break;evnt(23062);}while(r); } } S_30999:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(23065);if(r)goto S_30999;} 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(23065);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23065);}while(r); } LABEL_PRINTUNEXT:; if(qbevent){evnt(23066);r=0;} fornext_continue_3328:; } fornext_exit_3328:; S_31005:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23068);if(r)goto S_31005;} do{ qbs_set(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23068);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(23068);}while(r); do{ goto LABEL_PRINTULAST; if(!qbevent)break;evnt(23068);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3346=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip_pu",7),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23069);}while(r); do{ SUB_WRITEBUFLINE(&(pass3347=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (new_error){",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23071);}while(r); do{ SUB_WRITEBUFLINE(&(pass3348=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23072);}while(r); do{ SUB_WRITEBUFLINE(&(pass3349=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23073);}while(r); S_31014:; 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(23074);if(r)goto S_31014;} do{ *_SUB_XPRINT_LONG_NL= 0 ; if(!qbevent)break;evnt(23074);}while(r); }else{ do{ *_SUB_XPRINT_LONG_NL= 1 ; if(!qbevent)break;evnt(23074);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3350=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23075);}while(r); do{ SUB_WRITEBUFLINE(&(pass3351=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23076);}while(r); do{ SUB_WRITEBUFLINE(&(pass3352=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_free(tqbs);",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23077);}while(r); do{ SUB_WRITEBUFLINE(&(pass3353=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23078);}while(r); do{ SUB_WRITEBUFLINE(&(pass3354=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23079);}while(r); do{ SUB_WRITEBUFLINE(&(pass3355=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23080);}while(r); S_31025:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(23081);if(r)goto S_31025;} do{ SUB_WRITEBUFLINE(&(pass3356=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_LPRINT=0;",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23081);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_XPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23082);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23083);}while(r); } } do{ *_SUB_XPRINT_LONG_B= 0 ; if(!qbevent)break;evnt(23088);}while(r); do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23089);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 0 ; if(!qbevent)break;evnt(23090);}while(r); do{ SUB_WRITEBUFLINE(&(pass3357=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(0,0);",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23091);}while(r); do{ *_SUB_XPRINT_LONG_TQBSSET= -1 ; if(!qbevent)break;evnt(23092);}while(r); S_31037:; fornext_value3359= 2 ; fornext_finalvalue3359=*_SUB_XPRINT_LONG_N; fornext_step3359= 1 ; if (fornext_step3359<0) fornext_step_negative3359=1; else fornext_step_negative3359=0; if (new_error) goto fornext_error3359; goto fornext_entrylabel3359; while(1){ fornext_value3359=fornext_step3359+(*_SUB_XPRINT_LONG_I); fornext_entrylabel3359: *_SUB_XPRINT_LONG_I=fornext_value3359; if (fornext_step_negative3359){ if (fornext_value3359fornext_finalvalue3359) break; } fornext_error3359:; if(qbevent){evnt(23093);if(r)goto S_31037;} 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(23094);}while(r); S_31039:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(23095);if(r)goto S_31039;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ; if(!qbevent)break;evnt(23095);}while(r); } S_31042:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(23096);if(r)goto S_31042;} do{ *_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ; if(!qbevent)break;evnt(23096);}while(r); } S_31045:; if ((-(*_SUB_XPRINT_LONG_B== 0 ))||new_error){ if(qbevent){evnt(23097);if(r)goto S_31045;} S_31046:; 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(23098);if(r)goto S_31046;} LABEL_PRINTLAST:; if(qbevent){evnt(23099);r=0;} S_31047:; 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(23101);if(r)goto S_31047;} S_31048:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23102);if(r)goto S_31048;} do{ *_SUB_XPRINT_LONG_GOTOPU= 1 ; if(!qbevent)break;evnt(23102);}while(r); }else{ do{ *_SUB_XPRINT_LONG_I=*_SUB_XPRINT_LONG_I+ 1 ; if(!qbevent)break;evnt(23102);}while(r); do{ goto LABEL_PUJUMP; if(!qbevent)break;evnt(23102);}while(r); } } S_31055:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(23105);if(r)goto S_31055;} do{ qbs_set(_SUB_XPRINT_STRING_EBAK,_SUB_XPRINT_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23106);}while(r); do{ *_SUB_XPRINT_LONG_PNRTNUM= 0 ; if(!qbevent)break;evnt(23107);}while(r); LABEL_PRINTNUMBER:; if(qbevent){evnt(23108);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(23109);}while(r); S_31059:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23110);if(r)goto S_31059;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23110);}while(r); } S_31062:; if ((-(*_SUB_XPRINT_LONG_PNRTNUM== 0 ))||new_error){ if(qbevent){evnt(23111);if(r)goto S_31062;} S_31063:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(23112);if(r)goto S_31063;} 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(23112);}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(23112);}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(23114);}while(r); S_31070:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23115);if(r)goto S_31070;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23115);}while(r); } S_31073:; if ((-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(23116);if(r)goto S_31073;} 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(23118);}while(r); do{ *_SUB_XPRINT_LONG_PNRTNUM= 1 ; if(!qbevent)break;evnt(23119);}while(r); do{ goto LABEL_PRINTNUMBER; if(!qbevent)break;evnt(23120);}while(r); } S_31078:; if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(23122);if(r)goto S_31078;} do{ qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3361= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23122);}while(r); } S_31081:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23123);if(r)goto S_31081;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23123);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3362=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23124);}while(r); do{ SUB_WRITEBUFLINE(&(pass3363=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23125);}while(r); S_31086:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(23126);if(r)goto S_31086;} do{ SUB_WRITEBUFLINE(&(pass3364=*__LONG_MAINTXTBUF),qbs_new_txt_len("lprint_makefit(tqbs);",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23126);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3365=*__LONG_MAINTXTBUF),qbs_new_txt_len("makefit(tqbs);",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23126);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3366=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23127);}while(r); }else{ S_31093:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(23129);if(r)goto S_31093;} 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(23129);}while(r); } S_31096:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1))))||new_error){ if(qbevent){evnt(23130);if(r)goto S_31096;} S_31097:; 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(23131);if(r)goto S_31097;} 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(23131);}while(r); } } } S_31102:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(23134);if(r)goto S_31102;} do{ SUB_WRITEBUFLINE(&(pass3367=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab();",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23134);}while(r); } do{ qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23135);}while(r); S_31106:; if ((*_SUB_XPRINT_LONG_GOTOPU)||new_error){ if(qbevent){evnt(23137);if(r)goto S_31106;} do{ *_SUB_XPRINT_LONG_I=*_SUB_XPRINT_LONG_I+ 1 ; if(!qbevent)break;evnt(23137);}while(r); do{ goto LABEL_PUJUMP; if(!qbevent)break;evnt(23137);}while(r); } S_31110:; if ((*_SUB_XPRINT_LONG_LAST)||new_error){ if(qbevent){evnt(23139);if(r)goto S_31110;} do{ SUB_WRITEBUFLINE(&(pass3368=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(nothingstring,1);",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23140);}while(r); do{ goto fornext_exit_3358; if(!qbevent)break;evnt(23141);}while(r); } do{ goto LABEL_PRINTNEXT; if(!qbevent)break;evnt(23144);}while(r); } } S_31117:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(23148);if(r)goto S_31117;} 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(23148);}while(r); }else{ do{ qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23148);}while(r); } LABEL_PRINTNEXT:; if(qbevent){evnt(23149);r=0;} fornext_continue_3358:; } fornext_exit_3358:; S_31123:; if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||new_error){ if(qbevent){evnt(23151);if(r)goto S_31123;} do{ qbs_set(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23151);}while(r); do{ *_SUB_XPRINT_LONG_LAST= 1 ; if(!qbevent)break;evnt(23151);}while(r); do{ goto LABEL_PRINTLAST; if(!qbevent)break;evnt(23151);}while(r); } S_31128:; if ((-(*_SUB_XPRINT_LONG_N== 1 ))||new_error){ if(qbevent){evnt(23152);if(r)goto S_31128;} do{ SUB_WRITEBUFLINE(&(pass3371=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(nothingstring,1);",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23152);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3372=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23153);}while(r); do{ SUB_WRITEBUFLINE(&(pass3373=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_free(tqbs);",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23154);}while(r); do{ SUB_WRITEBUFLINE(&(pass3374=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23155);}while(r); S_31134:; if ((*_SUB_XPRINT_LONG_LP)||new_error){ if(qbevent){evnt(23156);if(r)goto S_31134;} do{ SUB_WRITEBUFLINE(&(pass3375=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_LPRINT=0;",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23156);}while(r); } do{ qbs_set(__STRING_TLAYOUT,_SUB_XPRINT_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23157);}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; } 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 "data56.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_XREAD_STRING_L,FUNC_SCASE(qbs_new_txt_len("Read",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23164);}while(r); S_31139:; if ((-(*_SUB_XREAD_LONG_N== 1 ))||new_error){ if(qbevent){evnt(23165);if(r)goto S_31139;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23165);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23165);}while(r); } do{ *_SUB_XREAD_LONG_I= 2 ; if(!qbevent)break;evnt(23166);}while(r); S_31144:; if ((-(*_SUB_XREAD_LONG_I>*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(23167);if(r)goto S_31144;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23167);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23167);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23168);}while(r); do{ *_SUB_XREAD_LONG_B= 0 ; if(!qbevent)break;evnt(23169);}while(r); S_31150:; fornext_value3378=*_SUB_XREAD_LONG_I; fornext_finalvalue3378=*_SUB_XREAD_LONG_N; fornext_step3378= 1 ; if (fornext_step3378<0) fornext_step_negative3378=1; else fornext_step_negative3378=0; if (new_error) goto fornext_error3378; goto fornext_entrylabel3378; while(1){ fornext_value3378=fornext_step3378+(*_SUB_XREAD_LONG_I); fornext_entrylabel3378: *_SUB_XREAD_LONG_I=fornext_value3378; if (fornext_step_negative3378){ if (fornext_value3378fornext_finalvalue3378) break; } fornext_error3378:; if(qbevent){evnt(23170);if(r)goto S_31150;} 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(23171);}while(r); S_31152:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(23172);if(r)goto S_31152;} do{ *_SUB_XREAD_LONG_B=*_SUB_XREAD_LONG_B+ 1 ; if(!qbevent)break;evnt(23172);}while(r); } S_31155:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(23173);if(r)goto S_31155;} do{ *_SUB_XREAD_LONG_B=*_SUB_XREAD_LONG_B- 1 ; if(!qbevent)break;evnt(23173);}while(r); } S_31158:; 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(23174);if(r)goto S_31158;} S_31159:; if ((-(*_SUB_XREAD_LONG_I==*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(23175);if(r)goto S_31159;} S_31160:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23176);if(r)goto S_31160;} do{ qbs_set(_SUB_XREAD_STRING_A3,_SUB_XREAD_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23176);}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(23176);}while(r); } } S_31166:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23178);if(r)goto S_31166;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected , ...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23178);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23178);}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(23179);}while(r); S_31171:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23180);if(r)goto S_31171;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23180);}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(23181);}while(r); S_31175:; if ((-(*_SUB_XREAD_LONG_I!=*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(23181);if(r)goto S_31175;} 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(23181);}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(23182);}while(r); S_31179:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23183);if(r)goto S_31179;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23183);}while(r); } S_31182:; if ((-((*_SUB_XREAD_LONG_T&*__LONG_ISREFERENCE)== 0 ))||new_error){ if(qbevent){evnt(23184);if(r)goto S_31182;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23184);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23184);}while(r); } S_31186:; if (((*_SUB_XREAD_LONG_T&*__LONG_ISSTRING))||new_error){ if(qbevent){evnt(23186);if(r)goto S_31186;} do{ qbs_set(_SUB_XREAD_STRING_E,FUNC_REFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,&(pass3379= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23187);}while(r); S_31188:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23188);if(r)goto S_31188;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23188);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3380=*__LONG_MAINTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23189);}while(r); do{ *__INTEGER_STRINGPROCESSINGHAPPENED= 1 ; if(!qbevent)break;evnt(23190);}while(r); }else{ S_31194:; if (((-((*_SUB_XREAD_LONG_T&*__LONG_ISFLOAT)!= 0 ))|(-((*_SUB_XREAD_LONG_T& 511 )!= 64 )))||new_error){ if(qbevent){evnt(23193);if(r)goto S_31194;} S_31195:; if (((*_SUB_XREAD_LONG_T&*__LONG_ISOFFSETINBITS))||new_error){ if(qbevent){evnt(23194);if(r)goto S_31195;} 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)),&(pass3381= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23195);}while(r); S_31197:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23196);if(r)goto S_31197;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23196);}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)),&(pass3382= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23198);}while(r); S_31202:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23199);if(r)goto S_31202;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23199);}while(r); } } }else{ S_31207:; if ((*_SUB_XREAD_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(23202);if(r)goto S_31207;} do{ SUB_SETREFER(_SUB_XREAD_STRING_E,_SUB_XREAD_LONG_T,qbs_new_txt_len("func_read_uint64(data,&data_offset,data_size)",45),&(pass3383= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23203);}while(r); S_31209:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23204);if(r)goto S_31209;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23204);}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),&(pass3384= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23206);}while(r); S_31214:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23207);if(r)goto S_31214;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23207);}while(r); } } } } S_31220:; if ((-(*_SUB_XREAD_LONG_I==*_SUB_XREAD_LONG_N))||new_error){ if(qbevent){evnt(23211);if(r)goto S_31220;} do{ goto fornext_exit_3377; if(!qbevent)break;evnt(23211);}while(r); } do{ qbs_set(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23212);}while(r); do{ qbs_set(_SUB_XREAD_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23212);}while(r); } S_31226:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XREAD_STRING_A3,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23214);if(r)goto S_31226;} do{ qbs_set(_SUB_XREAD_STRING_A3,_SUB_XREAD_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23214);}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(23214);}while(r); } fornext_continue_3377:; } fornext_exit_3377:; S_31232:; if ((*__INTEGER_STRINGPROCESSINGHAPPENED)||new_error){ if(qbevent){evnt(23216);if(r)goto S_31232;} do{ SUB_WRITEBUFLINE(&(pass3385=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23216);}while(r); } do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(23217);}while(r); S_31236:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(23217);if(r)goto S_31236;} 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(23217);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XREAD_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23217);}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; } 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 "data57.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_XWRITE_STRING_L,FUNC_SCASE(qbs_new_txt_len("Write",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23221);}while(r); do{ qbs_set(_SUB_XWRITE_STRING_U,FUNC_STR2(&(pass3388=FUNC_UNIQUENUMBER()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23222);}while(r); S_31243:; if ((-(*_SUB_XWRITE_LONG_N== 1 ))||new_error){ if(qbevent){evnt(23223);if(r)goto S_31243;} do{ SUB_WRITEBUFLINE(&(pass3389=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_print(nothingstring,1);",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23224);}while(r); do{ goto LABEL_WRITEBLANKLINE2; if(!qbevent)break;evnt(23225);}while(r); } do{ *_SUB_XWRITE_LONG_B= 0 ; if(!qbevent)break;evnt(23227);}while(r); do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23228);}while(r); do{ *_SUB_XWRITE_LONG_LAST= 0 ; if(!qbevent)break;evnt(23229);}while(r); S_31250:; fornext_value3391= 2 ; fornext_finalvalue3391=*_SUB_XWRITE_LONG_N; fornext_step3391= 1 ; if (fornext_step3391<0) fornext_step_negative3391=1; else fornext_step_negative3391=0; if (new_error) goto fornext_error3391; goto fornext_entrylabel3391; while(1){ fornext_value3391=fornext_step3391+(*_SUB_XWRITE_LONG_I); fornext_entrylabel3391: *_SUB_XWRITE_LONG_I=fornext_value3391; if (fornext_step_negative3391){ if (fornext_value3391fornext_finalvalue3391) break; } fornext_error3391:; if(qbevent){evnt(23230);if(r)goto S_31250;} 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(23231);}while(r); S_31252:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XWRITE_STRING_A2,qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(23232);if(r)goto S_31252;} do{ *_SUB_XWRITE_LONG_B=*_SUB_XWRITE_LONG_B+ 1 ; if(!qbevent)break;evnt(23232);}while(r); } S_31255:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XWRITE_STRING_A2,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(23233);if(r)goto S_31255;} do{ *_SUB_XWRITE_LONG_B=*_SUB_XWRITE_LONG_B- 1 ; if(!qbevent)break;evnt(23233);}while(r); } S_31258:; if ((-(*_SUB_XWRITE_LONG_B== 0 ))||new_error){ if(qbevent){evnt(23234);if(r)goto S_31258;} S_31259:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XWRITE_STRING_A2,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(23235);if(r)goto S_31259;} LABEL_WRITELAST:; if(qbevent){evnt(23236);r=0;} S_31260:; if ((-(*_SUB_XWRITE_LONG_LAST== 1 ))||new_error){ if(qbevent){evnt(23237);if(r)goto S_31260;} do{ *_SUB_XWRITE_LONG_NEWLINE= 1 ; if(!qbevent)break;evnt(23237);}while(r); }else{ do{ *_SUB_XWRITE_LONG_NEWLINE= 0 ; if(!qbevent)break;evnt(23237);}while(r); } do{ qbs_set(_SUB_XWRITE_STRING_EBAK,_SUB_XWRITE_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23238);}while(r); do{ *_SUB_XWRITE_LONG_REEVALED= 0 ; if(!qbevent)break;evnt(23239);}while(r); LABEL_WRITECHECKED:; if(qbevent){evnt(23240);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(23241);}while(r); S_31268:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23242);if(r)goto S_31268;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23242);}while(r); } S_31271:; if ((-(*_SUB_XWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(23243);if(r)goto S_31271;} 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(23244);}while(r); S_31273:; if ((-(*_SUB_XWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(23245);if(r)goto S_31273;} 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(23245);}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(23247);}while(r); S_31278:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23248);if(r)goto S_31278;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23248);}while(r); } S_31281:; if ((-(*_SUB_XWRITE_LONG_REEVALED== 0 ))||new_error){ if(qbevent){evnt(23249);if(r)goto S_31281;} S_31282:; if ((-((*_SUB_XWRITE_LONG_TYP&*__LONG_ISSTRING)== 0 ))||new_error){ if(qbevent){evnt(23250);if(r)goto S_31282;} 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(23251);}while(r); S_31284:; if ((-(*_SUB_XWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(23252);if(r)goto S_31284;} 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(23252);}while(r); } do{ *_SUB_XWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(23253);}while(r); do{ goto LABEL_WRITECHECKED; if(!qbevent)break;evnt(23254);}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(23256);}while(r); S_31291:; if ((-(*_SUB_XWRITE_LONG_LAST== 0 ))||new_error){ if(qbevent){evnt(23257);if(r)goto S_31291;} 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(23257);}while(r); } do{ *_SUB_XWRITE_LONG_REEVALED= 1 ; if(!qbevent)break;evnt(23258);}while(r); do{ goto LABEL_WRITECHECKED; if(!qbevent)break;evnt(23259);}while(r); } } S_31298:; if (((*_SUB_XWRITE_LONG_TYP&*__LONG_ISREFERENCE))||new_error){ if(qbevent){evnt(23262);if(r)goto S_31298;} do{ qbs_set(_SUB_XWRITE_STRING_E,FUNC_REFER(_SUB_XWRITE_STRING_E,_SUB_XWRITE_LONG_TYP,&(pass3392= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23262);}while(r); } S_31301:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23263);if(r)goto S_31301;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23263);}while(r); } do{ SUB_WRITEBUFLINE(&(pass3393=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_print(",10),_SUB_XWRITE_STRING_E),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XWRITE_LONG_NEWLINE))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23265);}while(r); do{ SUB_WRITEBUFLINE(&(pass3394=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (new_error) goto skip",24),_SUB_XWRITE_STRING_U),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23266);}while(r); do{ qbs_set(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23267);}while(r); S_31307:; if ((*_SUB_XWRITE_LONG_LAST)||new_error){ if(qbevent){evnt(23268);if(r)goto S_31307;} do{ goto fornext_exit_3390; if(!qbevent)break;evnt(23268);}while(r); } do{ goto LABEL_WRITENEXT; if(!qbevent)break;evnt(23269);}while(r); } } S_31313:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23272);if(r)goto S_31313;} 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(23272);}while(r); }else{ do{ qbs_set(_SUB_XWRITE_STRING_E,_SUB_XWRITE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23272);}while(r); } LABEL_WRITENEXT:; if(qbevent){evnt(23273);r=0;} fornext_continue_3390:; } fornext_exit_3390:; S_31319:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XWRITE_STRING_E,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(23275);if(r)goto S_31319;} do{ qbs_set(_SUB_XWRITE_STRING_A2,qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23275);}while(r); do{ *_SUB_XWRITE_LONG_LAST= 1 ; if(!qbevent)break;evnt(23275);}while(r); do{ goto LABEL_WRITELAST; if(!qbevent)break;evnt(23275);}while(r); } LABEL_WRITEBLANKLINE2:; if(qbevent){evnt(23276);r=0;} do{ SUB_WRITEBUFLINE(&(pass3395=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XWRITE_STRING_U),qbs_new_txt_len(":",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23277);}while(r); do{ SUB_WRITEBUFLINE(&(pass3396=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23278);}while(r); do{ *__LONG_LAYOUTDONE= 1 ; if(!qbevent)break;evnt(23279);}while(r); S_31327:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(23279);if(r)goto S_31327;} 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(23279);}while(r); }else{ do{ qbs_set(__STRING_LAYOUT,_SUB_XWRITE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23279);}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* 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 "data58.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_EVALUATECONST_STRING_A,_FUNC_EVALUATECONST_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23283);}while(r); S_31333:; if (( 0 )||new_error){ if(qbevent){evnt(23284);if(r)goto S_31333;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 9 ; if (new_error) goto skip3399; 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 skip3399; skip3399: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(23284);}while(r); } do{ if (_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[2]&2){ error(10); }else{ if (_FUNC_EVALUATECONST_ARRAY_STRING_BLOCK[2]&1){ if (!error_occurred) 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(23287);}while(r); do{ if (_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[2]&2){ error(10); }else{ if (_FUNC_EVALUATECONST_ARRAY_INTEGER_STATUS[2]&1){ if (!error_occurred) 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(23288);}while(r); do{ if (_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[2]&2){ error(10); }else{ if (_FUNC_EVALUATECONST_ARRAY_LONG_BTYPE[2]&1){ if (!error_occurred) 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(23291);}while(r); do{ *_FUNC_EVALUATECONST_LONG_N=FUNC_NUMELEMENTS(_FUNC_EVALUATECONST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23294);}while(r); S_31340:; fornext_value3401= 1 ; fornext_finalvalue3401=*_FUNC_EVALUATECONST_LONG_N; fornext_step3401= 1 ; if (fornext_step3401<0) fornext_step_negative3401=1; else fornext_step_negative3401=0; if (new_error) goto fornext_error3401; goto fornext_entrylabel3401; while(1){ fornext_value3401=fornext_step3401+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3401: *_FUNC_EVALUATECONST_LONG_I=fornext_value3401; if (fornext_step_negative3401){ if (fornext_value3401fornext_finalvalue3401) break; } fornext_error3401:; if(qbevent){evnt(23295);if(r)goto S_31340;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23296);}while(r); fornext_continue_3400:; } fornext_exit_3400:; LABEL_EVALCONSTEVALBRACK:; if(qbevent){evnt(23299);r=0;} do{ *_FUNC_EVALUATECONST_LONG_L= 0 ; if(!qbevent)break;evnt(23302);}while(r); do{ *_FUNC_EVALUATECONST_LONG_B= 0 ; if(!qbevent)break;evnt(23303);}while(r); S_31345:; fornext_value3403= 1 ; fornext_finalvalue3403=*_FUNC_EVALUATECONST_LONG_N; 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_EVALUATECONST_LONG_I); fornext_entrylabel3403: *_FUNC_EVALUATECONST_LONG_I=fornext_value3403; if (fornext_step_negative3403){ if (fornext_value3403fornext_finalvalue3403) break; } fornext_error3403:; if(qbevent){evnt(23304);if(r)goto S_31345;} S_31346:; 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(23305);if(r)goto S_31346;} do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B+ 1 ; if(!qbevent)break;evnt(23305);}while(r); } S_31349:; 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(23306);if(r)goto S_31349;} do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B- 1 ; if(!qbevent)break;evnt(23306);}while(r); } S_31352:; if ((-(*_FUNC_EVALUATECONST_LONG_B>*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(23307);if(r)goto S_31352;} do{ *_FUNC_EVALUATECONST_LONG_L=*_FUNC_EVALUATECONST_LONG_B; if(!qbevent)break;evnt(23307);}while(r); } fornext_continue_3402:; } fornext_exit_3402:; S_31356:; if ((*_FUNC_EVALUATECONST_LONG_L)||new_error){ if(qbevent){evnt(23311);if(r)goto S_31356;} do{ *_FUNC_EVALUATECONST_LONG_B= 0 ; if(!qbevent)break;evnt(23313);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23314);}while(r); S_31359:; fornext_value3405= 1 ; fornext_finalvalue3405=*_FUNC_EVALUATECONST_LONG_N; fornext_step3405= 1 ; if (fornext_step3405<0) fornext_step_negative3405=1; else fornext_step_negative3405=0; if (new_error) goto fornext_error3405; goto fornext_entrylabel3405; while(1){ fornext_value3405=fornext_step3405+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3405: *_FUNC_EVALUATECONST_LONG_I=fornext_value3405; if (fornext_step_negative3405){ if (fornext_value3405fornext_finalvalue3405) break; } fornext_error3405:; if(qbevent){evnt(23315);if(r)goto S_31359;} S_31360:; 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(23317);if(r)goto S_31360;} S_31361:; if ((-(*_FUNC_EVALUATECONST_LONG_B==*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(23318);if(r)goto S_31361;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23318);}while(r); do{ goto fornext_exit_3404; if(!qbevent)break;evnt(23318);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B- 1 ; if(!qbevent)break;evnt(23319);}while(r); } S_31367:; if ((-(*_FUNC_EVALUATECONST_LONG_B>=*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(23322);if(r)goto S_31367;} S_31368:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_EVALUATECONST_STRING_E->len== 0 )))||new_error){ if(qbevent){evnt(23323);if(r)goto S_31368;} 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(23323);}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(23323);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23324);}while(r); } S_31375:; 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(23327);if(r)goto S_31375;} do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_B+ 1 ; if(!qbevent)break;evnt(23328);}while(r); S_31377:; if ((-(*_FUNC_EVALUATECONST_LONG_B==*_FUNC_EVALUATECONST_LONG_L))||new_error){ if(qbevent){evnt(23329);if(r)goto S_31377;} do{ *_FUNC_EVALUATECONST_LONG_I2=*_FUNC_EVALUATECONST_LONG_I; if(!qbevent)break;evnt(23329);}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23329);}while(r); } } fornext_continue_3404:; } fornext_exit_3404:; 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(23334);}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])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23335);}while(r); S_31385:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(23336);if(r)goto S_31385;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23336);}while(r); } do{ goto LABEL_EVALCONSTEVALBRACK; if(!qbevent)break;evnt(23337);}while(r); } S_31390:; fornext_value3408= 1 ; fornext_finalvalue3408=*_FUNC_EVALUATECONST_LONG_N; fornext_step3408= 1 ; if (fornext_step3408<0) fornext_step_negative3408=1; else fornext_step_negative3408=0; if (new_error) goto fornext_error3408; goto fornext_entrylabel3408; while(1){ fornext_value3408=fornext_step3408+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3408: *_FUNC_EVALUATECONST_LONG_I=fornext_value3408; if (fornext_step_negative3408){ if (fornext_value3408fornext_finalvalue3408) break; } fornext_error3408:; if(qbevent){evnt(23350);if(r)goto S_31390;} S_31391:; 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(23351);if(r)goto S_31391;} S_31392:; 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(23352);if(r)goto S_31392;} 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(23354);}while(r); S_31394:; 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(23355);if(r)goto S_31394;} 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(23358);}while(r); S_31396:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~&&",3))))||new_error){ if(qbevent){evnt(23359);if(r)goto S_31396;} 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(23359);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23359);}while(r); } S_31400:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~%%",3))))||new_error){ if(qbevent){evnt(23360);if(r)goto S_31400;} 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(23360);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23360);}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(23361);}while(r); S_31405:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(23362);if(r)goto S_31405;} 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(23362);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23362);}while(r); } S_31409:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(23363);if(r)goto S_31409;} 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(23363);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23363);}while(r); } S_31413:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~%",2))))||new_error){ if(qbevent){evnt(23364);if(r)goto S_31413;} 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(23364);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23364);}while(r); } S_31417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("~&",2))))||new_error){ if(qbevent){evnt(23365);if(r)goto S_31417;} 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(23365);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23365);}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(23366);}while(r); S_31422:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(23367);if(r)goto S_31422;} 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(23367);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23367);}while(r); } S_31426:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_E,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(23368);if(r)goto S_31426;} 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(23368);}while(r); do{ goto LABEL_GOTCONSTBLKITYP; if(!qbevent)break;evnt(23368);}while(r); } S_31430:; 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(23371);if(r)goto S_31430;} 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(23372);}while(r); S_31432:; 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(23373);if(r)goto S_31432;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23373);}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(23374);}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 ))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23375);}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(23376);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(23377);}while(r); } S_31440:; 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(23381);if(r)goto S_31440;} 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(23382);}while(r); S_31442:; 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(23383);if(r)goto S_31442;} 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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23383);}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(23384);}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 ))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23385);}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(23386);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(23387);}while(r); } S_31450:; 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(23391);if(r)goto S_31450;} 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])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23392);}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(23393);}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(23394);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(23395);}while(r); } S_31456:; 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(23397);if(r)goto S_31456;} 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])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23398);}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(23399);}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(23400);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(23401);}while(r); } S_31462:; 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(23403);if(r)goto S_31462;} 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])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23404);}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(23405);}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(23406);}while(r); do{ goto LABEL_GOTCONSTBLKTYP; if(!qbevent)break;evnt(23407);}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(23410);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23410);}while(r); LABEL_GOTCONSTBLKITYP:; if(qbevent){evnt(23412);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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23413);}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])])))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23414);}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(23415);}while(r); LABEL_GOTCONSTBLKTYP:; if(qbevent){evnt(23416);r=0;} } S_31474:; if ((-(*_FUNC_EVALUATECONST_LONG_A== 34 ))||new_error){ if(qbevent){evnt(23420);if(r)goto S_31474;} 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(23422);}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(23423);}while(r); } } } fornext_continue_3407:; } fornext_exit_3407:; do{ *_FUNC_EVALUATECONST_LONG_N2= 0 ; if(!qbevent)break;evnt(23431);}while(r); S_31482:; fornext_value3418= 1 ; fornext_finalvalue3418=*_FUNC_EVALUATECONST_LONG_N; fornext_step3418= 1 ; if (fornext_step3418<0) fornext_step_negative3418=1; else fornext_step_negative3418=0; if (new_error) goto fornext_error3418; goto fornext_entrylabel3418; while(1){ fornext_value3418=fornext_step3418+(*_FUNC_EVALUATECONST_LONG_I); fornext_entrylabel3418: *_FUNC_EVALUATECONST_LONG_I=fornext_value3418; if (fornext_step_negative3418){ if (fornext_value3418fornext_finalvalue3418) break; } fornext_error3418:; if(qbevent){evnt(23432);if(r)goto S_31482;} S_31483:; 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(23433);if(r)goto S_31483;} do{ *_FUNC_EVALUATECONST_LONG_N2=*_FUNC_EVALUATECONST_LONG_N2+ 1 ; if(!qbevent)break;evnt(23434);}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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23435);}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(23436);}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(23437);}while(r); } fornext_continue_3417:; } fornext_exit_3417:; do{ *_FUNC_EVALUATECONST_LONG_N=*_FUNC_EVALUATECONST_LONG_N2; if(!qbevent)break;evnt(23440);}while(r); S_31491:; if ((-(*_FUNC_EVALUATECONST_LONG_N== 1 ))||new_error){ if(qbevent){evnt(23443);if(r)goto S_31491;} S_31492:; 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(23444);if(r)goto S_31492;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.2",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23444);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23444);}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(23445);}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(23446);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23447);}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(23453);}while(r); S_31501:; 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(23454);if(r)goto S_31501;} S_31502:; if ((-(*_FUNC_EVALUATECONST_LONG_N!= 2 ))||new_error){ if(qbevent){evnt(23455);if(r)goto S_31502;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.4",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23455);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23455);}while(r); } S_31506:; 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(23456);if(r)goto S_31506;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.5",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23456);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23456);}while(r); } S_31510:; 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(23457);if(r)goto S_31510;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.6",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23457);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23457);}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(23458);}while(r); S_31515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,func_chr( 241 ))))||new_error){ if(qbevent){evnt(23460);if(r)goto S_31515;} S_31516:; 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(23461);if(r)goto S_31516;} 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(23462);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,f2string(*_FUNC_EVALUATECONST_FLOAT_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23463);}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(23465);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23466);}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(23468);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23469);}while(r); } S_31526:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_FUNC_EVALUATECONST_STRING_O),qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(23472);if(r)goto S_31526;} S_31527:; 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(23473);if(r)goto S_31527;} 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(23474);}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(23476);}while(r); } do{ *_FUNC_EVALUATECONST_INTEGER64_R=~(*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23478);}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(23479);}while(r); S_31534:; if ((*_FUNC_EVALUATECONST_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23480);if(r)goto S_31534;} do{ *_FUNC_EVALUATECONST_LONG_T=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23480);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23481);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23482);}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(23485);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23485);}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(23491);}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(23492);}while(r); do{ *_FUNC_EVALUATECONST_LONG_I= 2 ; if(!qbevent)break;evnt(23494);}while(r); LABEL_EVALCONSTEQU:; if(qbevent){evnt(23496);r=0;} S_31546:; if ((-(*_FUNC_EVALUATECONST_LONG_I>=*_FUNC_EVALUATECONST_LONG_N))||new_error){ if(qbevent){evnt(23499);if(r)goto S_31546;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.8",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23499);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23499);}while(r); } do{ qbs_set(_FUNC_EVALUATECONST_STRING_O,qbs_ucase(((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(23500);}while(r); do{ *_FUNC_EVALUATECONST_LONG_I=*_FUNC_EVALUATECONST_LONG_I+ 1 ; if(!qbevent)break;evnt(23501);}while(r); S_31552:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISOPERATOR(_FUNC_EVALUATECONST_STRING_O)== 0 )))||new_error){ if(qbevent){evnt(23502);if(r)goto S_31552;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.9",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23502);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23502);}while(r); } S_31556:; if ((-(*_FUNC_EVALUATECONST_LONG_I>*_FUNC_EVALUATECONST_LONG_N))||new_error){ if(qbevent){evnt(23503);if(r)goto S_31556;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.10",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23503);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23503);}while(r); } S_31560:; 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(23506);if(r)goto S_31560;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.11",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23506);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23506);}while(r); } S_31564:; if ((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(23508);if(r)goto S_31564;} S_31565:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(23509);if(r)goto S_31565;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Invalid CONST expression.12",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23509);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23509);}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(23511);}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(23512);}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(23513);}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(23514);}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(23515);}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(23516);}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(&(pass3425=*_FUNC_EVALUATECONST_LONG_S1SIZE+*_FUNC_EVALUATECONST_LONG_S2SIZE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23517);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(23518);}while(r); } S_31578:; if ((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23522);if(r)goto S_31578;} do{ *_FUNC_EVALUATECONST_LONG_LINTEGER= 0 ; if(!qbevent)break;evnt(23523);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_L=string2f(_FUNC_EVALUATECONST_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23524);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_L=qbr(*_FUNC_EVALUATECONST_FLOAT_L); if(!qbevent)break;evnt(23525);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_LINTEGER= 1 ; if(!qbevent)break;evnt(23527);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_L=string2i64(_FUNC_EVALUATECONST_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23528);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_L=*_FUNC_EVALUATECONST_INTEGER64_L; if(!qbevent)break;evnt(23529);}while(r); } S_31587:; 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(23531);if(r)goto S_31587;} do{ *_FUNC_EVALUATECONST_LONG_RINTEGER= 0 ; if(!qbevent)break;evnt(23532);}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(23533);}while(r); do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23534);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_RINTEGER= 1 ; if(!qbevent)break;evnt(23536);}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(23537);}while(r); do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23538);}while(r); } S_31596:; if (((-(*_FUNC_EVALUATECONST_LONG_LINTEGER== 1 ))&(-(*_FUNC_EVALUATECONST_LONG_RINTEGER== 1 )))||new_error){ if(qbevent){evnt(23541);if(r)goto S_31596;} S_31597:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(23542);if(r)goto S_31597;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L+*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23542);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23542);}while(r); } S_31601:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23543);if(r)goto S_31601;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L-*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23543);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23543);}while(r); } S_31605:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(23544);if(r)goto S_31605;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L**_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23544);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23544);}while(r); } S_31609:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(23545);if(r)goto S_31609;} do{ *_FUNC_EVALUATECONST_FLOAT_R=pow2(*_FUNC_EVALUATECONST_INTEGER64_L,*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23545);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23545);}while(r); } S_31613:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(23546);if(r)goto S_31613;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_INTEGER64_L/ ((long double)(*_FUNC_EVALUATECONST_INTEGER64_R)); if(!qbevent)break;evnt(23546);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23546);}while(r); } S_31617:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(23547);if(r)goto S_31617;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L/ *_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23547);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23547);}while(r); } S_31621:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(23548);if(r)goto S_31621;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L%*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23548);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23548);}while(r); } S_31625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(23549);if(r)goto S_31625;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L==*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23549);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23549);}while(r); } S_31629:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(23550);if(r)goto S_31629;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L>*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23550);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23550);}while(r); } S_31633:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(23551);if(r)goto S_31633;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L<*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23551);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23551);}while(r); } S_31637:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(23552);if(r)goto S_31637;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L>=*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23552);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23552);}while(r); } S_31641:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(23553);if(r)goto S_31641;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L<=*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23553);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23553);}while(r); } S_31645:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(23554);if(r)goto S_31645;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_INTEGER64_L!=*_FUNC_EVALUATECONST_INTEGER64_R); if(!qbevent)break;evnt(23554);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23554);}while(r); } S_31649:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(23555);if(r)goto S_31649;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~*_FUNC_EVALUATECONST_INTEGER64_L|*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23555);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23555);}while(r); } S_31653:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(23556);if(r)goto S_31653;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~*_FUNC_EVALUATECONST_INTEGER64_L^*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23556);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23556);}while(r); } S_31657:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(23557);if(r)goto S_31657;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L^*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23557);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23557);}while(r); } S_31661:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(23558);if(r)goto S_31661;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L|*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23558);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23558);}while(r); } S_31665:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(23559);if(r)goto S_31665;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=*_FUNC_EVALUATECONST_INTEGER64_L&*_FUNC_EVALUATECONST_INTEGER64_R; if(!qbevent)break;evnt(23559);}while(r); do{ goto LABEL_ECONSTMARKUPI; if(!qbevent)break;evnt(23559);}while(r); } } S_31670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(23562);if(r)goto S_31670;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L+*_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(23562);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23562);}while(r); } S_31674:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23563);if(r)goto S_31674;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L-*_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(23563);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23563);}while(r); } S_31678:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(23564);if(r)goto S_31678;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L**_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(23564);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23564);}while(r); } S_31682:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(23565);if(r)goto S_31682;} do{ *_FUNC_EVALUATECONST_FLOAT_R=pow2(*_FUNC_EVALUATECONST_FLOAT_L,*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23565);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23565);}while(r); } S_31686:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(23566);if(r)goto S_31686;} do{ *_FUNC_EVALUATECONST_FLOAT_R=*_FUNC_EVALUATECONST_FLOAT_L/ *_FUNC_EVALUATECONST_FLOAT_R; if(!qbevent)break;evnt(23566);}while(r); do{ goto LABEL_ECONSTMARKUPF; if(!qbevent)break;evnt(23566);}while(r); } S_31690:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(23567);if(r)goto S_31690;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)/ qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23567);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23567);}while(r); } S_31694:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(23568);if(r)goto S_31694;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)%qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23568);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23568);}while(r); } S_31698:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(23569);if(r)goto S_31698;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L==*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23569);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23569);}while(r); } S_31702:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(23570);if(r)goto S_31702;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L>*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23570);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23570);}while(r); } S_31706:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(23571);if(r)goto S_31706;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L<*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23571);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23571);}while(r); } S_31710:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len(">=",2))))||new_error){ if(qbevent){evnt(23572);if(r)goto S_31710;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L>=*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23572);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23572);}while(r); } S_31714:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<=",2))))||new_error){ if(qbevent){evnt(23573);if(r)goto S_31714;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L<=*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23573);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23573);}while(r); } S_31718:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(23574);if(r)goto S_31718;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=-(*_FUNC_EVALUATECONST_FLOAT_L!=*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23574);}while(r); do{ goto LABEL_ECONSTMARKUPI16; if(!qbevent)break;evnt(23574);}while(r); } S_31722:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(23575);if(r)goto S_31722;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~qbr(*_FUNC_EVALUATECONST_FLOAT_L)|qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23575);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23575);}while(r); } S_31726:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(23576);if(r)goto S_31726;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=~qbr(*_FUNC_EVALUATECONST_FLOAT_L)^qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23576);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23576);}while(r); } S_31730:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(23577);if(r)goto S_31730;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)^qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23577);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23577);}while(r); } S_31734:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(23578);if(r)goto S_31734;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)|qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23578);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23578);}while(r); } S_31738:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATECONST_STRING_O,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(23579);if(r)goto S_31738;} do{ *_FUNC_EVALUATECONST_INTEGER64_R=qbr(*_FUNC_EVALUATECONST_FLOAT_L)&qbr(*_FUNC_EVALUATECONST_FLOAT_R); if(!qbevent)break;evnt(23579);}while(r); do{ goto LABEL_ECONSTMARKUPI32; if(!qbevent)break;evnt(23579);}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(23581);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23581);}while(r); LABEL_ECONSTMARKUPI16:; if(qbevent){evnt(23583);r=0;} do{ *_FUNC_EVALUATECONST_LONG_ET=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23584);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23585);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(23586);}while(r); LABEL_ECONSTMARKUPI32:; if(qbevent){evnt(23588);r=0;} do{ *_FUNC_EVALUATECONST_LONG_ET=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(23589);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23590);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(23591);}while(r); LABEL_ECONSTMARKUPI:; if(qbevent){evnt(23593);r=0;} S_31750:; 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(23594);if(r)goto S_31750;} do{ *_FUNC_EVALUATECONST_LONG_U= 0 ; if(!qbevent)break;evnt(23596);}while(r); S_31752:; 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(23596);if(r)goto S_31752;} do{ *_FUNC_EVALUATECONST_LONG_U= 1 ; if(!qbevent)break;evnt(23596);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_LB=*_FUNC_EVALUATECONST_LONG_ET& 511 ; if(!qbevent)break;evnt(23597);}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(23597);}while(r); do{ *_FUNC_EVALUATECONST_LONG_OB= 0 ; if(!qbevent)break;evnt(23598);}while(r); S_31758:; if ((-(*_FUNC_EVALUATECONST_LONG_LB==*_FUNC_EVALUATECONST_LONG_RB))||new_error){ if(qbevent){evnt(23599);if(r)goto S_31758;} S_31759:; 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(23600);if(r)goto S_31759;} do{ *_FUNC_EVALUATECONST_LONG_OB= 1 ; if(!qbevent)break;evnt(23600);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_LB; if(!qbevent)break;evnt(23601);}while(r); } S_31764:; if ((-(*_FUNC_EVALUATECONST_LONG_LB>*_FUNC_EVALUATECONST_LONG_RB))||new_error){ if(qbevent){evnt(23603);if(r)goto S_31764;} S_31765:; if ((-((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISOFFSETINBITS)!= 0 ))||new_error){ if(qbevent){evnt(23604);if(r)goto S_31765;} do{ *_FUNC_EVALUATECONST_LONG_OB= 1 ; if(!qbevent)break;evnt(23604);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_LB; if(!qbevent)break;evnt(23605);}while(r); } S_31770:; if ((-(*_FUNC_EVALUATECONST_LONG_LB<*_FUNC_EVALUATECONST_LONG_RB))||new_error){ if(qbevent){evnt(23607);if(r)goto S_31770;} S_31771:; 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(23608);if(r)goto S_31771;} do{ *_FUNC_EVALUATECONST_LONG_OB= 1 ; if(!qbevent)break;evnt(23608);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_B=*_FUNC_EVALUATECONST_LONG_RB; if(!qbevent)break;evnt(23609);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_ET=*_FUNC_EVALUATECONST_LONG_B; if(!qbevent)break;evnt(23611);}while(r); S_31777:; if ((*_FUNC_EVALUATECONST_LONG_OB)||new_error){ if(qbevent){evnt(23612);if(r)goto S_31777;} do{ *_FUNC_EVALUATECONST_LONG_ET=*_FUNC_EVALUATECONST_LONG_ET+*__LONG_ISOFFSETINBITS; if(!qbevent)break;evnt(23612);}while(r); } S_31780:; if ((*_FUNC_EVALUATECONST_LONG_U)||new_error){ if(qbevent){evnt(23613);if(r)goto S_31780;} do{ *_FUNC_EVALUATECONST_LONG_ET=*_FUNC_EVALUATECONST_LONG_ET+*__LONG_ISUNSIGNED; if(!qbevent)break;evnt(23613);}while(r); } } do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,i642string(*_FUNC_EVALUATECONST_INTEGER64_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23615);}while(r); do{ goto LABEL_ECONSTMARKEDUP; if(!qbevent)break;evnt(23616);}while(r); LABEL_ECONSTMARKUPF:; if(qbevent){evnt(23618);r=0;} do{ *_FUNC_EVALUATECONST_LONG_LFB= 0 ; if(!qbevent)break;evnt(23619);}while(r); do{ *_FUNC_EVALUATECONST_LONG_RFB= 0 ; if(!qbevent)break;evnt(23619);}while(r); do{ *_FUNC_EVALUATECONST_LONG_LIB= 0 ; if(!qbevent)break;evnt(23620);}while(r); do{ *_FUNC_EVALUATECONST_LONG_RIB= 0 ; if(!qbevent)break;evnt(23620);}while(r); S_31790:; if ((*_FUNC_EVALUATECONST_LONG_ET&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23621);if(r)goto S_31790;} do{ *_FUNC_EVALUATECONST_LONG_LFB=*_FUNC_EVALUATECONST_LONG_ET& 511 ; if(!qbevent)break;evnt(23621);}while(r); }else{ do{ *_FUNC_EVALUATECONST_LONG_LIB=*_FUNC_EVALUATECONST_LONG_ET& 511 ; if(!qbevent)break;evnt(23621);}while(r); } S_31795:; 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(23622);if(r)goto S_31795;} 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(23622);}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(23622);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_F= 32 ; if(!qbevent)break;evnt(23623);}while(r); S_31801:; if (((-(*_FUNC_EVALUATECONST_LONG_LIB> 16 ))|(-(*_FUNC_EVALUATECONST_LONG_RIB> 16 )))||new_error){ if(qbevent){evnt(23624);if(r)goto S_31801;} do{ *_FUNC_EVALUATECONST_LONG_F= 64 ; if(!qbevent)break;evnt(23624);}while(r); } S_31804:; if (((-(*_FUNC_EVALUATECONST_LONG_LFB> 32 ))|(-(*_FUNC_EVALUATECONST_LONG_RFB> 32 )))||new_error){ if(qbevent){evnt(23625);if(r)goto S_31804;} do{ *_FUNC_EVALUATECONST_LONG_F= 64 ; if(!qbevent)break;evnt(23625);}while(r); } S_31807:; if (((-(*_FUNC_EVALUATECONST_LONG_LIB> 32 ))|(-(*_FUNC_EVALUATECONST_LONG_RIB> 32 )))||new_error){ if(qbevent){evnt(23626);if(r)goto S_31807;} do{ *_FUNC_EVALUATECONST_LONG_F= 256 ; if(!qbevent)break;evnt(23626);}while(r); } S_31810:; if (((-(*_FUNC_EVALUATECONST_LONG_LFB> 64 ))|(-(*_FUNC_EVALUATECONST_LONG_RFB> 64 )))||new_error){ if(qbevent){evnt(23627);if(r)goto S_31810;} do{ *_FUNC_EVALUATECONST_LONG_F= 256 ; if(!qbevent)break;evnt(23627);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_ET=*__LONG_ISFLOAT+*_FUNC_EVALUATECONST_LONG_F; if(!qbevent)break;evnt(23628);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EV,f2string(*_FUNC_EVALUATECONST_FLOAT_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23629);}while(r); LABEL_ECONSTMARKEDUP:; if(qbevent){evnt(23631);r=0;} do{ *_FUNC_EVALUATECONST_LONG_I=*_FUNC_EVALUATECONST_LONG_I+ 1 ; if(!qbevent)break;evnt(23633);}while(r); S_31816:; if ((-(*_FUNC_EVALUATECONST_LONG_I<=*_FUNC_EVALUATECONST_LONG_N))||new_error){ if(qbevent){evnt(23635);if(r)goto S_31816;} do{ goto LABEL_EVALCONSTEQU; if(!qbevent)break;evnt(23635);}while(r); } do{ *_FUNC_EVALUATECONST_LONG_T=*_FUNC_EVALUATECONST_LONG_ET; if(!qbevent)break;evnt(23637);}while(r); do{ qbs_set(_FUNC_EVALUATECONST_STRING_EVALUATECONST,_FUNC_EVALUATECONST_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23638);}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_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 "data59.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_31821:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(23644);if(r)goto S_31821;} S_31822:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(23645);if(r)goto S_31822;} 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(23645);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23645);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,qbs_new_txt_len("$",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23646);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23647);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23650);}while(r); S_31830:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(23652);if(r)goto S_31830;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("~",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23652);}while(r); } do{ *_FUNC_TYPEVALUE2SYMBOL_LONG_B=*_FUNC_TYPEVALUE2SYMBOL_LONG_T& 511 ; if(!qbevent)break;evnt(23654);}while(r); S_31834:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(23656);if(r)goto S_31834;} S_31835:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B> 1 ))||new_error){ if(qbevent){evnt(23657);if(r)goto S_31835;} 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(23657);}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(23657);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,_FUNC_TYPEVALUE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23658);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23659);}while(r); } S_31843:; if ((*_FUNC_TYPEVALUE2SYMBOL_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23662);if(r)goto S_31843;} S_31844:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 32 ))||new_error){ if(qbevent){evnt(23663);if(r)goto S_31844;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23663);}while(r); } S_31847:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 64 ))||new_error){ if(qbevent){evnt(23664);if(r)goto S_31847;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23664);}while(r); } S_31850:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 256 ))||new_error){ if(qbevent){evnt(23665);if(r)goto S_31850;} do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_S,qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23665);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,_FUNC_TYPEVALUE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23666);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23667);}while(r); } S_31856:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 8 ))||new_error){ if(qbevent){evnt(23670);if(r)goto S_31856;} 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(23670);}while(r); } S_31859:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 16 ))||new_error){ if(qbevent){evnt(23671);if(r)goto S_31859;} 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(23671);}while(r); } S_31862:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 32 ))||new_error){ if(qbevent){evnt(23672);if(r)goto S_31862;} 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(23672);}while(r); } S_31865:; if ((-(*_FUNC_TYPEVALUE2SYMBOL_LONG_B== 64 ))||new_error){ if(qbevent){evnt(23673);if(r)goto S_31865;} 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(23673);}while(r); } do{ qbs_set(_FUNC_TYPEVALUE2SYMBOL_STRING_TYPEVALUE2SYMBOL,_FUNC_TYPEVALUE2SYMBOL_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23674);}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_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 "data60.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_ID2FULLTYPENAME_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(23680);}while(r); S_31870:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_T== 0 ))||new_error){ if(qbevent){evnt(23681);if(r)goto S_31870;} do{ *_FUNC_ID2FULLTYPENAME_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(23681);}while(r); } do{ *_FUNC_ID2FULLTYPENAME_LONG_SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(23682);}while(r); do{ *_FUNC_ID2FULLTYPENAME_LONG_BITS=*_FUNC_ID2FULLTYPENAME_LONG_T& 511 ; if(!qbevent)break;evnt(23683);}while(r); S_31875:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(23684);if(r)goto S_31875;} 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(23685);}while(r); do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23686);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23686);}while(r); } S_31880:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(23688);if(r)goto S_31880;} S_31881:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(23689);if(r)goto S_31881;} 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(23689);}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(23689);}while(r); } do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23690);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23690);}while(r); } S_31889:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(23692);if(r)goto S_31889;} S_31890:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS> 1 ))||new_error){ if(qbevent){evnt(23693);if(r)goto S_31890;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("BIT * ",6)),FUNC_STR2(_FUNC_ID2FULLTYPENAME_LONG_BITS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23693);}while(r); }else{ do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("BIT",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23693);}while(r); } S_31895:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(23694);if(r)goto S_31895;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("UNSIGNED ",9)),_FUNC_ID2FULLTYPENAME_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23694);}while(r); } do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23695);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23695);}while(r); } S_31901:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23697);if(r)goto S_31901;} S_31902:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(23698);if(r)goto S_31902;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23698);}while(r); } S_31905:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(23699);if(r)goto S_31905;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23699);}while(r); } S_31908:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(23700);if(r)goto S_31908;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FLOAT",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23700);}while(r); } }else{ S_31912:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(23702);if(r)goto S_31912;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("BYTE",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23702);}while(r); } S_31915:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(23703);if(r)goto S_31915;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("INTEGER",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23703);}while(r); } S_31918:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(23704);if(r)goto S_31918;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23704);}while(r); } S_31921:; if ((-(*_FUNC_ID2FULLTYPENAME_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(23705);if(r)goto S_31921;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("INTEGER64",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23705);}while(r); } S_31924:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(23706);if(r)goto S_31924;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("UNSIGNED ",9)),_FUNC_ID2FULLTYPENAME_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23706);}while(r); } } S_31928:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISOFFSET)||new_error){ if(qbevent){evnt(23708);if(r)goto S_31928;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("OFFSET",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23709);}while(r); S_31930:; if ((*_FUNC_ID2FULLTYPENAME_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(23710);if(r)goto S_31930;} do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_A,qbs_add(qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("UNSIGNED ",9)),_FUNC_ID2FULLTYPENAME_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23710);}while(r); } } do{ qbs_set(_FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME,_FUNC_ID2FULLTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23712);}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_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME);return _FUNC_ID2FULLTYPENAME_STRING_ID2FULLTYPENAME; } qbs* FUNC_ID2SHORTTYPENAME(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_ID2SHORTTYPENAME_LONG_T=*(int32*)(((char*)__UDT_ID)+(536)); if(!qbevent)break;evnt(23716);}while(r); S_31936:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_T== 0 ))||new_error){ if(qbevent){evnt(23717);if(r)goto S_31936;} do{ *_FUNC_ID2SHORTTYPENAME_LONG_T=*(int32*)(((char*)__UDT_ID)+(512)); if(!qbevent)break;evnt(23717);}while(r); } do{ *_FUNC_ID2SHORTTYPENAME_LONG_SIZE=*(int32*)(((char*)__UDT_ID)+(540)); if(!qbevent)break;evnt(23718);}while(r); do{ *_FUNC_ID2SHORTTYPENAME_LONG_BITS=*_FUNC_ID2SHORTTYPENAME_LONG_T& 511 ; if(!qbevent)break;evnt(23719);}while(r); S_31941:; if ((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(23720);if(r)goto S_31941;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_ID2SHORTTYPENAME_LONG_T& 511 )-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23721);}while(r); do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_ID2SHORTTYPENAME,_FUNC_ID2SHORTTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23722);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23722);}while(r); } S_31946:; if ((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(23724);if(r)goto S_31946;} S_31947:; if ((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(23725);if(r)goto S_31947;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_add(qbs_new_txt_len("STRING",6),FUNC_STR2(_FUNC_ID2SHORTTYPENAME_LONG_SIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23725);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23725);}while(r); } do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_ID2SHORTTYPENAME,_FUNC_ID2SHORTTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23726);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23726);}while(r); } S_31955:; if ((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISOFFSETINBITS)||new_error){ if(qbevent){evnt(23728);if(r)goto S_31955;} S_31956:; if ((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(23729);if(r)goto S_31956;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_U",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23729);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23729);}while(r); } S_31961:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS> 1 ))||new_error){ if(qbevent){evnt(23730);if(r)goto S_31961;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_add(qbs_add(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("BIT",3)),FUNC_STR2(_FUNC_ID2SHORTTYPENAME_LONG_BITS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23730);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_add(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("BIT1",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23730);}while(r); } do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_ID2SHORTTYPENAME,_FUNC_ID2SHORTTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23731);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23731);}while(r); } S_31969:; if ((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(23733);if(r)goto S_31969;} S_31970:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(23734);if(r)goto S_31970;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23734);}while(r); } S_31973:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(23735);if(r)goto S_31973;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23735);}while(r); } S_31976:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 256 ))||new_error){ if(qbevent){evnt(23736);if(r)goto S_31976;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_FLOAT",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23736);}while(r); } }else{ S_31980:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 8 ))||new_error){ if(qbevent){evnt(23738);if(r)goto S_31980;} S_31981:; if (((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(23739);if(r)goto S_31981;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_UBYTE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23739);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_BYTE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23739);}while(r); } } S_31987:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 16 ))||new_error){ if(qbevent){evnt(23741);if(r)goto S_31987;} S_31988:; if (((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(23742);if(r)goto S_31988;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("UINTEGER",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23742);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("INTEGER",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23742);}while(r); } } S_31994:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 32 ))||new_error){ if(qbevent){evnt(23744);if(r)goto S_31994;} S_31995:; if (((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(23745);if(r)goto S_31995;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("ULONG",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23745);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23745);}while(r); } } S_32001:; if ((-(*_FUNC_ID2SHORTTYPENAME_LONG_BITS== 64 ))||new_error){ if(qbevent){evnt(23747);if(r)goto S_32001;} S_32002:; if (((*_FUNC_ID2SHORTTYPENAME_LONG_T&*__LONG_ISUNSIGNED))||new_error){ if(qbevent){evnt(23748);if(r)goto S_32002;} do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_UINTEGER64",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23748);}while(r); }else{ do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_A,qbs_new_txt_len("_INTEGER64",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23748);}while(r); } } } do{ qbs_set(_FUNC_ID2SHORTTYPENAME_STRING_ID2SHORTTYPENAME,_FUNC_ID2SHORTTYPENAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23751);}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_ID2SHORTTYPENAME_STRING_ID2SHORTTYPENAME);return _FUNC_ID2SHORTTYPENAME_STRING_ID2SHORTTYPENAME; } 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 "data62.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,_FUNC_SYMBOL2FULLTYPENAME_STRING_S2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23756);}while(r); S_32011:; 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(23758);if(r)goto S_32011;} do{ *_FUNC_SYMBOL2FULLTYPENAME_LONG_U= 1 ; if(!qbevent)break;evnt(23759);}while(r); S_32013:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_SYMBOL2FULLTYPENAME_STRING_TYP->len== 1 )))||new_error){ if(qbevent){evnt(23760);if(r)goto S_32013;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected ~...",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23760);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23760);}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(23761);}while(r); do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("UNSIGNED ",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23762);}while(r); } S_32020:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("%%",2))))||new_error){ if(qbevent){evnt(23765);if(r)goto S_32020;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,__STRING_QB64PREFIX),qbs_new_txt_len("BYTE",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23765);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23765);}while(r); } S_32024:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("%",1))))||new_error){ if(qbevent){evnt(23766);if(r)goto S_32024;} 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(23766);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23766);}while(r); } S_32028:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("&",1))))||new_error){ if(qbevent){evnt(23767);if(r)goto S_32028;} 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(23767);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23767);}while(r); } S_32032:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("&&",2))))||new_error){ if(qbevent){evnt(23768);if(r)goto S_32032;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,__STRING_QB64PREFIX),qbs_new_txt_len("INTEGER64",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23768);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23768);}while(r); } S_32036:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("%&",2))))||new_error){ if(qbevent){evnt(23769);if(r)goto S_32036;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,__STRING_QB64PREFIX),qbs_new_txt_len("OFFSET",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23769);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23769);}while(r); } S_32040:; 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(23771);if(r)goto S_32040;} S_32041:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_SYMBOL2FULLTYPENAME_STRING_S->len== 1 )))||new_error){ if(qbevent){evnt(23772);if(r)goto S_32041;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,__STRING_QB64PREFIX),qbs_new_txt_len("BIT * 1",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23773);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23774);}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(23776);}while(r); S_32046:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_SYMBOL2FULLTYPENAME_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(23777);if(r)goto S_32046;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected number after symbol `",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23777);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23777);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(qbs_add(qbs_add(_FUNC_SYMBOL2FULLTYPENAME_STRING_U,__STRING_QB64PREFIX),qbs_new_txt_len("BIT * ",6)),_FUNC_SYMBOL2FULLTYPENAME_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23778);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23779);}while(r); } S_32053:; if ((-(*_FUNC_SYMBOL2FULLTYPENAME_LONG_U== 1 ))||new_error){ if(qbevent){evnt(23782);if(r)goto S_32053;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected type symbol after ~",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23782);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23782);}while(r); } S_32057:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("!",1))))||new_error){ if(qbevent){evnt(23784);if(r)goto S_32057;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23784);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23784);}while(r); } S_32061:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(23785);if(r)goto S_32061;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23785);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23785);}while(r); } S_32065:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("##",2))))||new_error){ if(qbevent){evnt(23786);if(r)goto S_32065;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("FLOAT",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23786);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23786);}while(r); } S_32069:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SYMBOL2FULLTYPENAME_STRING_S,qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(23787);if(r)goto S_32069;} do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23787);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23787);}while(r); } S_32073:; 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(23789);if(r)goto S_32073;} 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(23790);}while(r); S_32075:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_ISUINTEGER(_FUNC_SYMBOL2FULLTYPENAME_STRING_N)== 0 )))||new_error){ if(qbevent){evnt(23791);if(r)goto S_32075;} do{ SUB_GIVE_ERROR(qbs_new_txt_len("Expected number after symbol $",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23791);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23791);}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(23792);}while(r); do{ goto LABEL_GOTSYM2TYP; if(!qbevent)break;evnt(23793);}while(r); } do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_T,_FUNC_SYMBOL2FULLTYPENAME_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23796);}while(r); LABEL_GOTSYM2TYP:; if(qbevent){evnt(23798);r=0;} S_32083:; 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(23800);if(r)goto S_32083;} 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(23800);}while(r); } S_32086:; fornext_value3433= 1 ; fornext_finalvalue3433=_FUNC_SYMBOL2FULLTYPENAME_STRING_T->len; fornext_step3433= 1 ; if (fornext_step3433<0) fornext_step_negative3433=1; else fornext_step_negative3433=0; if (new_error) goto fornext_error3433; goto fornext_entrylabel3433; while(1){ fornext_value3433=fornext_step3433+(*_FUNC_SYMBOL2FULLTYPENAME_LONG_I); fornext_entrylabel3433: *_FUNC_SYMBOL2FULLTYPENAME_LONG_I=fornext_value3433; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3433){ if (fornext_value3433fornext_finalvalue3433) break; } fornext_error3433:; if(qbevent){evnt(23802);if(r)goto S_32086;} S_32087:; 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(23803);if(r)goto S_32087;} 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(23803);}while(r); } fornext_continue_3432:; } fornext_exit_3432:; do{ qbs_set(_FUNC_SYMBOL2FULLTYPENAME_STRING_SYMBOL2FULLTYPENAME,_FUNC_SYMBOL2FULLTYPENAME_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23806);}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; 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 "data63.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_open(_SUB_LINEINPUT3LOAD_STRING_F, 2 ,NULL,NULL, 1 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23811);}while(r); do{ *_SUB_LINEINPUT3LOAD_LONG_L=func_lof( 1 ); if(!qbevent)break;evnt(23812);}while(r); do{ qbs_set(__STRING_LINEINPUT3BUFFER,func_space(*_SUB_LINEINPUT3LOAD_LONG_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23813);}while(r); do{ sub_get2( 1 ,NULL,__STRING_LINEINPUT3BUFFER,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23814);}while(r); S_32096:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LINEINPUT3BUFFER->len))||new_error){ if(qbevent){evnt(23815);if(r)goto S_32096;} S_32097:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_LINEINPUT3BUFFER, 1 ),func_chr( 26 ))))||new_error){ if(qbevent){evnt(23815);if(r)goto S_32097;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_left(__STRING_LINEINPUT3BUFFER,__STRING_LINEINPUT3BUFFER->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23815);}while(r); } } do{ sub_close( 1 ,1); if(!qbevent)break;evnt(23816);}while(r); do{ *__LONG_LINEINPUT3INDEX= 1 ; if(!qbevent)break;evnt(23817);}while(r); 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; } 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 "data64.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_LINEINPUT3_LONG_L=__STRING_LINEINPUT3BUFFER->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23822);}while(r); S_32104:; if ((-(*__LONG_LINEINPUT3INDEX>*_FUNC_LINEINPUT3_LONG_L))||new_error){ if(qbevent){evnt(23823);if(r)goto S_32104;} do{ qbs_set(_FUNC_LINEINPUT3_STRING_LINEINPUT3,func_chr( 13 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23823);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23823);}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(23824);}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(23825);}while(r); S_32110:; if (((-(*_FUNC_LINEINPUT3_LONG_C10== 0 ))&(-(*_FUNC_LINEINPUT3_LONG_C13== 0 )))||new_error){ if(qbevent){evnt(23826);if(r)goto S_32110;} 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(23827);}while(r); do{ *__LONG_LINEINPUT3INDEX=*_FUNC_LINEINPUT3_LONG_L+ 1 ; if(!qbevent)break;evnt(23828);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23829);}while(r); } S_32115:; if ((-(*_FUNC_LINEINPUT3_LONG_C10== 0 ))||new_error){ if(qbevent){evnt(23831);if(r)goto S_32115;} do{ *_FUNC_LINEINPUT3_LONG_C10= 2147483647 ; if(!qbevent)break;evnt(23831);}while(r); } S_32118:; if ((-(*_FUNC_LINEINPUT3_LONG_C13== 0 ))||new_error){ if(qbevent){evnt(23832);if(r)goto S_32118;} do{ *_FUNC_LINEINPUT3_LONG_C13= 2147483647 ; if(!qbevent)break;evnt(23832);}while(r); } S_32121:; if ((-(*_FUNC_LINEINPUT3_LONG_C10<*_FUNC_LINEINPUT3_LONG_C13))||new_error){ if(qbevent){evnt(23833);if(r)goto S_32121;} 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(23835);}while(r); do{ *__LONG_LINEINPUT3INDEX=*_FUNC_LINEINPUT3_LONG_C10+ 1 ; if(!qbevent)break;evnt(23836);}while(r); S_32124:; if ((-(*__LONG_LINEINPUT3INDEX<=*_FUNC_LINEINPUT3_LONG_L))||new_error){ if(qbevent){evnt(23837);if(r)goto S_32124;} S_32125:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX, 1 ,1))== 13 )))||new_error){ if(qbevent){evnt(23838);if(r)goto S_32125;} do{ *__LONG_LINEINPUT3INDEX=*__LONG_LINEINPUT3INDEX+ 1 ; if(!qbevent)break;evnt(23838);}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(23842);}while(r); do{ *__LONG_LINEINPUT3INDEX=*_FUNC_LINEINPUT3_LONG_C13+ 1 ; if(!qbevent)break;evnt(23843);}while(r); S_32132:; if ((-(*__LONG_LINEINPUT3INDEX<=*_FUNC_LINEINPUT3_LONG_L))||new_error){ if(qbevent){evnt(23844);if(r)goto S_32132;} S_32133:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(func_mid(__STRING_LINEINPUT3BUFFER,*__LONG_LINEINPUT3INDEX, 1 ,1))== 10 )))||new_error){ if(qbevent){evnt(23845);if(r)goto S_32133;} do{ *__LONG_LINEINPUT3INDEX=*__LONG_LINEINPUT3INDEX+ 1 ; if(!qbevent)break;evnt(23845);}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; qbs_maketmp(_FUNC_LINEINPUT3_STRING_LINEINPUT3);return _FUNC_LINEINPUT3_STRING_LINEINPUT3; } 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 "data65.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_32138:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ELEUCASE_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(23853);if(r)goto S_32138;} do{ goto exit_subfunc; if(!qbevent)break;evnt(23853);}while(r); } do{ *_FUNC_ELEUCASE_LONG_I= 1 ; if(!qbevent)break;evnt(23854);}while(r); S_32142:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_ELEUCASE_STRING_A)== 34 )))||new_error){ if(qbevent){evnt(23855);if(r)goto S_32142;} 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(23856);}while(r); S_32144:; if ((-(*_FUNC_ELEUCASE_LONG_I2== 0 ))||new_error){ if(qbevent){evnt(23857);if(r)goto S_32144;} do{ qbs_set(_FUNC_ELEUCASE_STRING_ELEUCASE,_FUNC_ELEUCASE_STRING_A); 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(_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(23858);}while(r); do{ *_FUNC_ELEUCASE_LONG_I=*_FUNC_ELEUCASE_LONG_I2; if(!qbevent)break;evnt(23859);}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(23862);}while(r); S_32152:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_ELEUCASE_LONG_I<_FUNC_ELEUCASE_STRING_A->len)))||new_error){ if(qbevent){evnt(23863);if(r)goto S_32152;} S_32153:; 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(23864);if(r)goto S_32153;} 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(23865);}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(23866);}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(23867);}while(r); S_32157:; if ((-(*_FUNC_ELEUCASE_LONG_I3== 0 ))||new_error){ if(qbevent){evnt(23867);if(r)goto S_32157;} do{ *_FUNC_ELEUCASE_LONG_I3=_FUNC_ELEUCASE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23867);}while(r); }else{ do{ *_FUNC_ELEUCASE_LONG_I3=*_FUNC_ELEUCASE_LONG_I3- 1 ; if(!qbevent)break;evnt(23867);}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(23868);}while(r); do{ *_FUNC_ELEUCASE_LONG_I=*_FUNC_ELEUCASE_LONG_I3+ 1 ; if(!qbevent)break;evnt(23869);}while(r); S_32164:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_ELEUCASE_LONG_I>_FUNC_ELEUCASE_STRING_A->len)))||new_error){ if(qbevent){evnt(23870);if(r)goto S_32164;} do{ goto dl_exit_3442; if(!qbevent)break;evnt(23870);}while(r); } dl_continue_3442:; } dl_exit_3442:; } 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(23873);}while(r); do{ qbs_set(_FUNC_ELEUCASE_STRING_ELEUCASE,_FUNC_ELEUCASE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23874);}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; qbs_maketmp(_FUNC_ELEUCASE_STRING_ELEUCASE);return _FUNC_ELEUCASE_STRING_ELEUCASE; } 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 "data66.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_32171:; if ((*_SUB_SETDEPENDENCY_LONG_REQUIREMENT)||new_error){ if(qbevent){evnt(23879);if(r)goto S_32171;} 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(23880);}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; } qbs* FUNC_EVALUATE_EXPRESSION(qbs*_FUNC_EVALUATE_EXPRESSION_STRING_E){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_T,_FUNC_EVALUATE_EXPRESSION_STRING_E); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23886);}while(r); do{ SUB_PREPARSE(_FUNC_EVALUATE_EXPRESSION_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23887);}while(r); S_32176:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATE_EXPRESSION_STRING_T, 5 ),qbs_new_txt_len("ERROR",5))))||new_error){ if(qbevent){evnt(23890);if(r)goto S_32176;} do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION,_FUNC_EVALUATE_EXPRESSION_STRING_T); 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(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,qbs_add(qbs_add(qbs_new_txt_len("(",1),_FUNC_EVALUATE_EXPRESSION_STRING_T),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23893);}while(r); S_32181:; do{ if(qbevent){evnt(23895);if(r)goto S_32181;} do{ *_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E=func_instr(NULL,_FUNC_EVALUATE_EXPRESSION_STRING_EXP,qbs_new_txt_len(")",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23896);}while(r); S_32183:; if ((-(*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E> 0 ))||new_error){ if(qbevent){evnt(23897);if(r)goto S_32183;} do{ *_FUNC_EVALUATE_EXPRESSION_LONG_C= 0 ; if(!qbevent)break;evnt(23898);}while(r); S_32185:; while((!(-((*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E-*_FUNC_EVALUATE_EXPRESSION_LONG_C)<=( 0 ))))||new_error){ if(qbevent){evnt(23899);if(r)goto S_32185;} do{ *_FUNC_EVALUATE_EXPRESSION_LONG_C=*_FUNC_EVALUATE_EXPRESSION_LONG_C+ 1 ; if(!qbevent)break;evnt(23900);}while(r); S_32187:; if ((*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E)||new_error){ if(qbevent){evnt(23901);if(r)goto S_32187;} S_32188:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E-*_FUNC_EVALUATE_EXPRESSION_LONG_C, 1 ,1),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(23902);if(r)goto S_32188;} do{ goto dl_exit_3448; if(!qbevent)break;evnt(23902);}while(r); } } dl_continue_3448:; } dl_exit_3448:; do{ *_FUNC_EVALUATE_EXPRESSION_LONG_S=*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E-*_FUNC_EVALUATE_EXPRESSION_LONG_C+ 1 ; if(!qbevent)break;evnt(23905);}while(r); S_32194:; if ((-(*_FUNC_EVALUATE_EXPRESSION_LONG_S< 1 ))||new_error){ if(qbevent){evnt(23906);if(r)goto S_32194;} do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION,qbs_new_txt_len("ERROR -- BAD () Count",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23906);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23906);}while(r); } do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVAL,qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_mid(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,*_FUNC_EVALUATE_EXPRESSION_LONG_S,*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E-*_FUNC_EVALUATE_EXPRESSION_LONG_S,1)),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23907);}while(r); do{ SUB_PARSEEXPRESSION(_FUNC_EVALUATE_EXPRESSION_STRING_EVAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23909);}while(r); do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVAL,qbs_ltrim(qbs_rtrim(_FUNC_EVALUATE_EXPRESSION_STRING_EVAL))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23910);}while(r); S_32201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATE_EXPRESSION_STRING_EVAL, 5 ),qbs_new_txt_len("ERROR",5))))||new_error){ if(qbevent){evnt(23911);if(r)goto S_32201;} do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION,_FUNC_EVALUATE_EXPRESSION_STRING_EVAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23911);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23911);}while(r); } do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,FUNC_DWD(qbs_add(qbs_add(qbs_left(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,*_FUNC_EVALUATE_EXPRESSION_LONG_S- 2 ),_FUNC_EVALUATE_EXPRESSION_STRING_EVAL),func_mid(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E+ 1 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23912);}while(r); S_32206:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_EVALUATE_EXPRESSION_STRING_EXP, 1 , 1 ,1),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(23913);if(r)goto S_32206;} do{ sub_mid(_FUNC_EVALUATE_EXPRESSION_STRING_EXP, 1 ,0,qbs_new_txt_len("-",1),0); if(!qbevent)break;evnt(23913);}while(r); } } S_32210:; dl_continue_3447:; }while((!(-(*_FUNC_EVALUATE_EXPRESSION_LONG_EVAL_E== 0 )))&&(!new_error)); dl_exit_3447:; if(qbevent){evnt(23915);if(r)goto S_32210;} do{ *_FUNC_EVALUATE_EXPRESSION_LONG_C= 0 ; if(!qbevent)break;evnt(23916);}while(r); S_32212:; do{ if(qbevent){evnt(23917);if(r)goto S_32212;} do{ *_FUNC_EVALUATE_EXPRESSION_LONG_C=*_FUNC_EVALUATE_EXPRESSION_LONG_C+ 1 ; if(!qbevent)break;evnt(23918);}while(r); S_32214:; qbs_set(sc_3450,func_mid(_FUNC_EVALUATE_EXPRESSION_STRING_EXP,*_FUNC_EVALUATE_EXPRESSION_LONG_C, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23919);if(r)goto S_32214;} S_32215:; if ((qbs_cleanup(qbs_tmp_base,(qbs_greaterorequal(sc_3450,qbs_new_txt_len("0",1))&&qbs_lessorequal(sc_3450,qbs_new_txt_len("9",1)))||qbs_equal(sc_3450,qbs_new_txt_len(".",1))||qbs_equal(sc_3450,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23920);if(r)goto S_32215;} sc_ec_61_end:; goto sc_3450_end; } do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Unknown Diagnosis: (",28),_FUNC_EVALUATE_EXPRESSION_STRING_EXP),qbs_new_txt_len(") ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23921);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(23921);}while(r); sc_3450_end:; S_32220:; dl_continue_3449:; }while((!(qbs_cleanup(qbs_tmp_base,-(*_FUNC_EVALUATE_EXPRESSION_LONG_C>=_FUNC_EVALUATE_EXPRESSION_STRING_EXP->len))))&&(!new_error)); dl_exit_3449:; if(qbevent){evnt(23923);if(r)goto S_32220;} do{ qbs_set(_FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION,_FUNC_EVALUATE_EXPRESSION_STRING_EXP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23925);}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; qbs_maketmp(_FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION);return _FUNC_EVALUATE_EXPRESSION_STRING_EVALUATE_EXPRESSION; } void SUB_PARSEEXPRESSION(qbs*_SUB_PARSEEXPRESSION_STRING_EXP){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if (_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[2]&2){ error(10); }else{ if (_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[2]&1){ if (!error_occurred) error(10); }else{ _SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4]= 0 ; _SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]=( 10 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4]+1; _SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[6]=1; _SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]=(ptrszint)malloc(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]*8); if (!_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]) error(257); _SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[2]|=1; tmp_long=_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]; if (_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[2]&4){ while(tmp_long--) ((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(23931);}while(r); do{ qbs_set(_SUB_PARSEEXPRESSION_STRING_EXP,FUNC_DWD(_SUB_PARSEEXPRESSION_STRING_EXP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23933);}while(r); S_32224:; fornext_value3454= 1 ; fornext_finalvalue3454= 250 ; fornext_step3454= 1 ; if (fornext_step3454<0) fornext_step_negative3454=1; else fornext_step_negative3454=0; if (new_error) goto fornext_error3454; goto fornext_entrylabel3454; while(1){ fornext_value3454=fornext_step3454+(*_SUB_PARSEEXPRESSION_LONG_J); fornext_entrylabel3454: *_SUB_PARSEEXPRESSION_LONG_J=fornext_value3454; if (fornext_step_negative3454){ if (fornext_value3454fornext_finalvalue3454) break; } fornext_error3454:; if(qbevent){evnt(23936);if(r)goto S_32224;} do{ *_SUB_PARSEEXPRESSION_LONG_LOWEST= 0 ; if(!qbevent)break;evnt(23937);}while(r); S_32226:; while((!(qbs_cleanup(qbs_tmp_base,-(*_SUB_PARSEEXPRESSION_LONG_LOWEST==_SUB_PARSEEXPRESSION_STRING_EXP->len))))||new_error){ if(qbevent){evnt(23938);if(r)goto S_32226;} do{ *_SUB_PARSEEXPRESSION_LONG_LOWEST=_SUB_PARSEEXPRESSION_STRING_EXP->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23939);}while(r); do{ *_SUB_PARSEEXPRESSION_LONG_OPON= 0 ; if(!qbevent)break;evnt(23939);}while(r); S_32229:; fornext_value3459= 1 ; fornext_finalvalue3459=func_ubound(__ARRAY_STRING_ONAME,1,1); fornext_step3459= 1 ; if (fornext_step3459<0) fornext_step_negative3459=1; else fornext_step_negative3459=0; if (new_error) goto fornext_error3459; goto fornext_entrylabel3459; while(1){ fornext_value3459=fornext_step3459+(*_SUB_PARSEEXPRESSION_LONG_P); fornext_entrylabel3459: *_SUB_PARSEEXPRESSION_LONG_P=fornext_value3459; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3459){ if (fornext_value3459fornext_finalvalue3459) break; } fornext_error3459:; if(qbevent){evnt(23940);if(r)goto S_32229;} S_32230:; if ((-(*_SUB_PARSEEXPRESSION_LONG_J==((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_P)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]))||new_error){ if(qbevent){evnt(23942);if(r)goto S_32230;} S_32231:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_PARSEEXPRESSION_STRING_EXP, 1 ),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23943);if(r)goto S_32231;} do{ *_SUB_PARSEEXPRESSION_LONG_STARTAT= 2 ; if(!qbevent)break;evnt(23943);}while(r); }else{ do{ *_SUB_PARSEEXPRESSION_LONG_STARTAT= 1 ; if(!qbevent)break;evnt(23943);}while(r); } do{ *_SUB_PARSEEXPRESSION_LONG_OP=func_instr(*_SUB_PARSEEXPRESSION_LONG_STARTAT,_SUB_PARSEEXPRESSION_STRING_EXP,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23944);}while(r); S_32237:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_PARSEEXPRESSION_LONG_OP== 0 ))&(qbs_equal(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 1 ),qbs_new_txt_len("_",1)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(23945);if(r)goto S_32237;} do{ *_SUB_PARSEEXPRESSION_LONG_OP=func_instr(*_SUB_PARSEEXPRESSION_LONG_STARTAT,_SUB_PARSEEXPRESSION_STRING_EXP,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 2 ,NULL,0),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23947);}while(r); S_32239:; if ((-(*_SUB_PARSEEXPRESSION_LONG_OP> 0 ))||new_error){ if(qbevent){evnt(23948);if(r)goto S_32239;} do{ qbs_set(_SUB_PARSEEXPRESSION_STRING_EXP,qbs_add(qbs_add(qbs_left(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP- 1 ),qbs_new_txt_len("_",1)),func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23949);}while(r); do{ *_SUB_PARSEEXPRESSION_LONG_LOWEST=*_SUB_PARSEEXPRESSION_LONG_LOWEST+ 1 ; if(!qbevent)break;evnt(23950);}while(r); } } S_32244:; if (((-(*_SUB_PARSEEXPRESSION_LONG_OP> 0 ))&(-(*_SUB_PARSEEXPRESSION_LONG_OP<*_SUB_PARSEEXPRESSION_LONG_LOWEST)))||new_error){ if(qbevent){evnt(23953);if(r)goto S_32244;} do{ *_SUB_PARSEEXPRESSION_LONG_LOWEST=*_SUB_PARSEEXPRESSION_LONG_OP; if(!qbevent)break;evnt(23953);}while(r); do{ *_SUB_PARSEEXPRESSION_LONG_OPON=*_SUB_PARSEEXPRESSION_LONG_P; if(!qbevent)break;evnt(23953);}while(r); } } fornext_continue_3458:; } fornext_exit_3458:; S_32250:; if ((-(*_SUB_PARSEEXPRESSION_LONG_OPON== 0 ))||new_error){ if(qbevent){evnt(23956);if(r)goto S_32250;} do{ goto dl_exit_3456; if(!qbevent)break;evnt(23956);}while(r); } S_32253:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_PARSEEXPRESSION_STRING_EXP, 1 ),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23957);if(r)goto S_32253;} do{ *_SUB_PARSEEXPRESSION_LONG_STARTAT= 2 ; if(!qbevent)break;evnt(23957);}while(r); }else{ do{ *_SUB_PARSEEXPRESSION_LONG_STARTAT= 1 ; if(!qbevent)break;evnt(23957);}while(r); } do{ *_SUB_PARSEEXPRESSION_LONG_OP=func_instr(*_SUB_PARSEEXPRESSION_LONG_STARTAT,_SUB_PARSEEXPRESSION_STRING_EXP,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_OPON)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23958);}while(r); do{ *_SUB_PARSEEXPRESSION_LONG_NUMSET= 0 ; if(!qbevent)break;evnt(23960);}while(r); S_32260:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_OPON)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23963);if(r)goto S_32260;} S_32261:; qbs_set(sc_3460,func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP- 3 , 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23964);if(r)goto S_32261;} S_32262:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3460,qbs_new_txt_len("NOT",3))||qbs_equal(sc_3460,qbs_new_txt_len("XOR",3))||qbs_equal(sc_3460,qbs_new_txt_len("AND",3))||qbs_equal(sc_3460,qbs_new_txt_len("EQV",3))||qbs_equal(sc_3460,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(23965);if(r)goto S_32262;} do{ goto dl_exit_3456; if(!qbevent)break;evnt(23966);}while(r); sc_ec_62_end:; goto sc_3460_end; } sc_3460_end:; S_32265:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP- 3 , 2 ,1),qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(23968);if(r)goto S_32265;} do{ goto dl_exit_3456; if(!qbevent)break;evnt(23968);}while(r); } } S_32269:; if ((*_SUB_PARSEEXPRESSION_LONG_OP)||new_error){ if(qbevent){evnt(23971);if(r)goto S_32269;} do{ *_SUB_PARSEEXPRESSION_LONG_C=((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_OPON)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23972);}while(r); S_32271:; do{ if(qbevent){evnt(23973);if(r)goto S_32271;} S_32272:; qbs_set(sc_3463,func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP+*_SUB_PARSEEXPRESSION_LONG_C+ 1 , 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23974);if(r)goto S_32272;} S_32273:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3463,qbs_new_txt_len("0",1))||qbs_equal(sc_3463,qbs_new_txt_len("1",1))||qbs_equal(sc_3463,qbs_new_txt_len("2",1))||qbs_equal(sc_3463,qbs_new_txt_len("3",1))||qbs_equal(sc_3463,qbs_new_txt_len("4",1))||qbs_equal(sc_3463,qbs_new_txt_len("5",1))||qbs_equal(sc_3463,qbs_new_txt_len("6",1))||qbs_equal(sc_3463,qbs_new_txt_len("7",1))||qbs_equal(sc_3463,qbs_new_txt_len("8",1))||qbs_equal(sc_3463,qbs_new_txt_len("9",1))||qbs_equal(sc_3463,qbs_new_txt_len(".",1))||qbs_equal(sc_3463,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(23975);if(r)goto S_32273;} do{ *_SUB_PARSEEXPRESSION_LONG_NUMSET= -1 ; if(!qbevent)break;evnt(23975);}while(r); sc_ec_63_end:; goto sc_3463_end; } S_32275:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3463,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23976);if(r)goto S_32275;} S_32276:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_OPON)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])),qbs_new_txt_len("_PI",3)))|*_SUB_PARSEEXPRESSION_LONG_NUMSET))||new_error){ if(qbevent){evnt(23977);if(r)goto S_32276;} do{ goto dl_exit_3462; if(!qbevent)break;evnt(23977);}while(r); } sc_ec_64_end:; goto sc_3463_end; } S_32279:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3463,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(23978);if(r)goto S_32279;} do{ *_SUB_PARSEEXPRESSION_LONG_NUMSET= 0 ; if(!qbevent)break;evnt(23978);}while(r); sc_ec_65_end:; goto sc_3463_end; } do{ goto dl_exit_3462; if(!qbevent)break;evnt(23980);}while(r); sc_3463_end:; do{ *_SUB_PARSEEXPRESSION_LONG_C=*_SUB_PARSEEXPRESSION_LONG_C+ 1 ; if(!qbevent)break;evnt(23982);}while(r); S_32285:; dl_continue_3462:; }while((!(qbs_cleanup(qbs_tmp_base,-((*_SUB_PARSEEXPRESSION_LONG_OP+*_SUB_PARSEEXPRESSION_LONG_C)>=(_SUB_PARSEEXPRESSION_STRING_EXP->len)))))&&(!new_error)); dl_exit_3462:; if(qbevent){evnt(23983);if(r)goto S_32285;} do{ *__LONG_E=*_SUB_PARSEEXPRESSION_LONG_OP+*_SUB_PARSEEXPRESSION_LONG_C; if(!qbevent)break;evnt(23984);}while(r); do{ *_SUB_PARSEEXPRESSION_LONG_C= 0 ; if(!qbevent)break;evnt(23986);}while(r); S_32288:; do{ if(qbevent){evnt(23987);if(r)goto S_32288;} do{ *_SUB_PARSEEXPRESSION_LONG_C=*_SUB_PARSEEXPRESSION_LONG_C+ 1 ; if(!qbevent)break;evnt(23988);}while(r); S_32290:; qbs_set(sc_3466,func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP-*_SUB_PARSEEXPRESSION_LONG_C, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23989);if(r)goto S_32290;} S_32291:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3466,qbs_new_txt_len("0",1))||qbs_equal(sc_3466,qbs_new_txt_len("1",1))||qbs_equal(sc_3466,qbs_new_txt_len("2",1))||qbs_equal(sc_3466,qbs_new_txt_len("3",1))||qbs_equal(sc_3466,qbs_new_txt_len("4",1))||qbs_equal(sc_3466,qbs_new_txt_len("5",1))||qbs_equal(sc_3466,qbs_new_txt_len("6",1))||qbs_equal(sc_3466,qbs_new_txt_len("7",1))||qbs_equal(sc_3466,qbs_new_txt_len("8",1))||qbs_equal(sc_3466,qbs_new_txt_len("9",1))||qbs_equal(sc_3466,qbs_new_txt_len(".",1))||qbs_equal(sc_3466,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(23990);if(r)goto S_32291;} sc_ec_66_end:; goto sc_3466_end; } S_32292:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3466,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(23991);if(r)goto S_32292;} do{ *_SUB_PARSEEXPRESSION_LONG_C1=*_SUB_PARSEEXPRESSION_LONG_C; if(!qbevent)break;evnt(23992);}while(r); do{ *_SUB_PARSEEXPRESSION_LONG_BAD= 0 ; if(!qbevent)break;evnt(23993);}while(r); S_32295:; do{ if(qbevent){evnt(23994);if(r)goto S_32295;} do{ *_SUB_PARSEEXPRESSION_LONG_C1=*_SUB_PARSEEXPRESSION_LONG_C1+ 1 ; if(!qbevent)break;evnt(23995);}while(r); S_32297:; qbs_set(sc_3468,func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP-*_SUB_PARSEEXPRESSION_LONG_C1, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23996);if(r)goto S_32297;} S_32298:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3468,qbs_new_txt_len("0",1))||qbs_equal(sc_3468,qbs_new_txt_len("1",1))||qbs_equal(sc_3468,qbs_new_txt_len("2",1))||qbs_equal(sc_3468,qbs_new_txt_len("3",1))||qbs_equal(sc_3468,qbs_new_txt_len("4",1))||qbs_equal(sc_3468,qbs_new_txt_len("5",1))||qbs_equal(sc_3468,qbs_new_txt_len("6",1))||qbs_equal(sc_3468,qbs_new_txt_len("7",1))||qbs_equal(sc_3468,qbs_new_txt_len("8",1))||qbs_equal(sc_3468,qbs_new_txt_len("9",1))||qbs_equal(sc_3468,qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(23997);if(r)goto S_32298;} do{ *_SUB_PARSEEXPRESSION_LONG_BAD= -1 ; if(!qbevent)break;evnt(23998);}while(r); do{ goto dl_exit_3467; if(!qbevent)break;evnt(23999);}while(r); sc_ec_67_end:; goto sc_3468_end; } sc_3468_end:; S_32303:; dl_continue_3467:; }while((!(-((*_SUB_PARSEEXPRESSION_LONG_OP-*_SUB_PARSEEXPRESSION_LONG_C1)<=( 0 ))))&&(!new_error)); dl_exit_3467:; if(qbevent){evnt(24003);if(r)goto S_32303;} S_32304:; if ((*_SUB_PARSEEXPRESSION_LONG_BAD)||new_error){ if(qbevent){evnt(24004);if(r)goto S_32304;} do{ goto dl_exit_3465; if(!qbevent)break;evnt(24004);}while(r); } sc_ec_68_end:; goto sc_3466_end; } do{ goto dl_exit_3465; if(!qbevent)break;evnt(24006);}while(r); sc_3466_end:; S_32310:; dl_continue_3465:; }while((!(-((*_SUB_PARSEEXPRESSION_LONG_OP-*_SUB_PARSEEXPRESSION_LONG_C)<=( 0 ))))&&(!new_error)); dl_exit_3465:; if(qbevent){evnt(24008);if(r)goto S_32310;} do{ *_SUB_PARSEEXPRESSION_LONG_S=*_SUB_PARSEEXPRESSION_LONG_OP-*_SUB_PARSEEXPRESSION_LONG_C; if(!qbevent)break;evnt(24009);}while(r); do{ tmp_long=array_check(( 1 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[tmp_long])),func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_S+ 1 ,*_SUB_PARSEEXPRESSION_LONG_OP-*_SUB_PARSEEXPRESSION_LONG_S- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24010);}while(r); do{ tmp_long=array_check(( 2 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[tmp_long])),func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_OP+((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_OPON)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,*__LONG_E-*_SUB_PARSEEXPRESSION_LONG_OP-((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PARSEEXPRESSION_LONG_OPON)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24011);}while(r); S_32314:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 1 , 1 ,1),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(24012);if(r)goto S_32314;} do{ sub_mid(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 1 ,0,qbs_new_txt_len("-",1),0); if(!qbevent)break;evnt(24012);}while(r); } S_32317:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 1 , 1 ,1),qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(24013);if(r)goto S_32317;} do{ sub_mid(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 1 ,0,qbs_new_txt_len("-",1),0); if(!qbevent)break;evnt(24013);}while(r); } S_32320:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(24014);if(r)goto S_32320;} do{ tmp_long=array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[tmp_long])),qbs_add(qbs_new_txt_len("N",1),FUNC_EVALUATENUMBERS(_SUB_PARSEEXPRESSION_LONG_OPON,_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24015);}while(r); }else{ do{ tmp_long=array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[tmp_long])),FUNC_EVALUATENUMBERS(_SUB_PARSEEXPRESSION_LONG_OPON,_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24017);}while(r); } S_32325:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 1 , 1 ,1),qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(24019);if(r)goto S_32325;} do{ sub_mid(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 1 ,0,qbs_new_txt_len("N",1),0); if(!qbevent)break;evnt(24019);}while(r); } S_32328:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])])), 5 ),qbs_new_txt_len("ERROR",5))))||new_error){ if(qbevent){evnt(24020);if(r)goto S_32328;} do{ qbs_set(_SUB_PARSEEXPRESSION_STRING_EXP,((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24020);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24020);}while(r); } do{ qbs_set(_SUB_PARSEEXPRESSION_STRING_EXP,qbs_ltrim(FUNC_N2S(FUNC_DWD(qbs_add(qbs_add(qbs_left(_SUB_PARSEEXPRESSION_STRING_EXP,*_SUB_PARSEEXPRESSION_LONG_S),qbs_rtrim(qbs_ltrim(((qbs*)(((uint64*)(_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[0]))[array_check(( 3 )-_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[4],_SUB_PARSEEXPRESSION_ARRAY_STRING_NUM[5])]))))),func_mid(_SUB_PARSEEXPRESSION_STRING_EXP,*__LONG_E+ 1 ,NULL,0)))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24021);}while(r); } do{ *_SUB_PARSEEXPRESSION_LONG_OP= 0 ; if(!qbevent)break;evnt(24023);}while(r); dl_continue_3456:; } dl_exit_3456:; fornext_continue_3453:; } fornext_exit_3453:; 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_SET_ORDEROFOPERATIONS(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if (__ARRAY_STRING_ONAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_ONAME)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_ONAME[2]&1){ tmp_long=__ARRAY_STRING_ONAME[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long]); free((void*)(__ARRAY_STRING_ONAME[0])); } __ARRAY_STRING_ONAME[4]= 0 ; __ARRAY_STRING_ONAME[5]=( 10000 )-__ARRAY_STRING_ONAME[4]+1; __ARRAY_STRING_ONAME[6]=1; __ARRAY_STRING_ONAME[0]=(ptrszint)malloc(__ARRAY_STRING_ONAME[5]*8); if (!__ARRAY_STRING_ONAME[0]) error(257); __ARRAY_STRING_ONAME[2]|=1; tmp_long=__ARRAY_STRING_ONAME[5]; if (__ARRAY_STRING_ONAME[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if (__ARRAY_INTEGER_PL[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_INTEGER_PL)[8])->id=(++mem_lock_id); if (__ARRAY_INTEGER_PL[2]&1){ if (__ARRAY_INTEGER_PL[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_PL[0])); }else{ free((void*)(__ARRAY_INTEGER_PL[0])); } } __ARRAY_INTEGER_PL[4]= 0 ; __ARRAY_INTEGER_PL[5]=( 10000 )-__ARRAY_INTEGER_PL[4]+1; __ARRAY_INTEGER_PL[6]=1; if (__ARRAY_INTEGER_PL[2]&4){ __ARRAY_INTEGER_PL[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_INTEGER_PL[5]*2); memset((void*)(__ARRAY_INTEGER_PL[0]),0,__ARRAY_INTEGER_PL[5]*2); }else{ __ARRAY_INTEGER_PL[0]=(ptrszint)calloc(__ARRAY_INTEGER_PL[5]*2,1); if (!__ARRAY_INTEGER_PL[0]) error(257); } __ARRAY_INTEGER_PL[2]|=1; } if(!qbevent)break;evnt(24035);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24038);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_UOF",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24038);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24038);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24039);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_OF",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24039);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24039);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24040);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_UBY",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24040);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24040);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24041);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_BY",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24041);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24041);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24042);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_UIN",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24042);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24042);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24043);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_IN",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24043);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24043);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24044);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_UIF",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24044);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24044);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24045);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_IF",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24045);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24045);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24046);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_ULO",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24046);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24046);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24047);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_LO",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24047);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24047);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24048);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_SI",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24048);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24048);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24049);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_FL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24049);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24049);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24050);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_DO",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24050);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24050);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24051);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_UBI",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24051);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24051);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24052);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_BI",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24052);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 5 ; if(!qbevent)break;evnt(24052);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24055);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_PI",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24055);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24055);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24056);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ACOS",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24056);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24056);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24057);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ASIN",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24057);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24057);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24058);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ARCSEC",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24058);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24058);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24059);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ARCCSC",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24059);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24059);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24060);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ARCCOT",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24060);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24060);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24061);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_SECH",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24061);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24061);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24062);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_CSCH",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24062);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24062);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24063);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_COTH",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24063);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24063);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24064);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("COS",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24064);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24064);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24065);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("SIN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24065);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24065);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24066);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("TAN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24066);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24066);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24067);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("LOG",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24067);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24067);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24068);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("EXP",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24068);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24068);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24069);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("ATN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24069);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24069);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24070);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_D2R",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24070);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24070);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24071);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_D2G",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24071);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24071);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24072);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_R2D",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24072);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24072);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24073);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_R2G",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24073);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24073);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24074);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_G2D",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24074);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24074);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24075);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_G2R",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24075);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24075);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24076);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("ABS",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24076);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24076);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24077);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("SGN",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24077);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24077);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24078);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("INT",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24078);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24078);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24079);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ROUND",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24079);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24079);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24080);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_CEIL",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24080);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24080);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24081);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("FIX",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24081);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24081);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24082);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_SEC",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24082);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24082);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24083);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_CSC",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24083);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24083);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24084);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_COT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24084);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24084);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24085);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("ASC",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24085);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24085);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24086);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_RG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24086);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24086);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24087);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_RA",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24087);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24087);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24088);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_RGB",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24088);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24088);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24089);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_RGBA",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24089);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24089);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24090);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_RX",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24090);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24090);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24091);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_GR",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24091);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24091);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24092);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_BL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24092);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24092);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24093);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("C_AL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24093);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24093);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24094);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_RED",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24094);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24094);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24095);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_GREEN",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24095);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24095);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24096);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_BLUE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24096);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24096);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24097);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("_ALPHA",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24097);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 10 ; if(!qbevent)break;evnt(24097);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24100);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("^",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24100);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 20 ; if(!qbevent)break;evnt(24100);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24101);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("SQR",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24101);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 20 ; if(!qbevent)break;evnt(24101);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24102);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("ROOT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24102);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 20 ; if(!qbevent)break;evnt(24102);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24104);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("*",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24104);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 30 ; if(!qbevent)break;evnt(24104);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24105);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24105);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 30 ; if(!qbevent)break;evnt(24105);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24107);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24107);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 40 ; if(!qbevent)break;evnt(24107);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24109);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("MOD",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24109);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 50 ; if(!qbevent)break;evnt(24109);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24111);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("+",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24111);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 60 ; if(!qbevent)break;evnt(24111);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24112);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24112);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 60 ; if(!qbevent)break;evnt(24112);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24115);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("<>",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24115);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24115);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24116);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("><",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24116);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24116);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24117);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("<=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24117);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24117);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24118);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24118);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24118);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24119);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("=<",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24119);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24119);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24120);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("=>",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24120);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24120);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24121);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24121);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24121);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24122);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24122);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24122);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24123);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("=",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24123);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 70 ; if(!qbevent)break;evnt(24123);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24125);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("NOT",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24125);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 80 ; if(!qbevent)break;evnt(24125);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24126);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("AND",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24126);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 90 ; if(!qbevent)break;evnt(24126);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24127);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("OR",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24127);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 100 ; if(!qbevent)break;evnt(24127);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24128);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("XOR",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24128);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 110 ; if(!qbevent)break;evnt(24128);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24129);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("EQV",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24129);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 120 ; if(!qbevent)break;evnt(24129);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24130);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len("IMP",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24130);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 130 ; if(!qbevent)break;evnt(24130);}while(r); do{ *_SUB_SET_ORDEROFOPERATIONS_LONG_I=*_SUB_SET_ORDEROFOPERATIONS_LONG_I+ 1 ; if(!qbevent)break;evnt(24131);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[tmp_long])),qbs_new_txt_len(",",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24131);}while(r); do{ tmp_long=array_check((*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5]); if (!new_error) ((int16*)(__ARRAY_INTEGER_PL[0]))[tmp_long]= 1000 ; if(!qbevent)break;evnt(24131);}while(r); do{ if (__ARRAY_STRING_ONAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_ONAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_ONAME[2]&1){ preserved_elements=__ARRAY_STRING_ONAME[5]; } else preserved_elements=0; __ARRAY_STRING_ONAME[4]= 0 ; __ARRAY_STRING_ONAME[5]=(*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_STRING_ONAME[4]+1; __ARRAY_STRING_ONAME[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_ONAME[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER_PL[2]&1){ preserved_elements=__ARRAY_INTEGER_PL[5]; } else preserved_elements=0; __ARRAY_INTEGER_PL[4]= 0 ; __ARRAY_INTEGER_PL[5]=(*_SUB_SET_ORDEROFOPERATIONS_LONG_I)-__ARRAY_INTEGER_PL[4]+1; __ARRAY_INTEGER_PL[6]=1; if (__ARRAY_INTEGER_PL[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER_PL[0]),preserved_elements*2); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_PL[0])); tmp_long=__ARRAY_INTEGER_PL[5]; __ARRAY_INTEGER_PL[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2); memcpy((void*)(__ARRAY_INTEGER_PL[0]),redim_preserve_cmem_buffer,preserved_elements*2); 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; } qbs* FUNC_EVALUATENUMBERS(int32*_FUNC_EVALUATENUMBERS_LONG_P,ptrszint*_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(24137);}while(r); S_32589:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs__trim(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24140);if(r)goto S_32589;} do{ tmp_long=array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24140);}while(r); } S_32592:; if ((qbs_cleanup(qbs_tmp_base,(-(((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]>= 20 ))&(((-(((int32)(qbs__trim(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))->len)== 0 ))|(-(((int32)(qbs__trim(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))->len)== 0 ))))))||new_error){ if(qbevent){evnt(24142);if(r)goto S_32592;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Missing operand",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24143);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24143);}while(r); } S_32596:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),qbs_new_txt_len(",",1),0)))||new_error){ if(qbevent){evnt(24146);if(r)goto S_32596;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid comma (",23),((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24147);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24147);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_L2=func_instr(NULL,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24149);}while(r); S_32601:; if ((*_FUNC_EVALUATENUMBERS_LONG_L2)||new_error){ if(qbevent){evnt(24150);if(r)goto S_32601;} S_32602:; qbs_set(sc_3471,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24151);if(r)goto S_32602;} S_32603:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3471,qbs_new_txt_len("C_RG",4))||qbs_equal(sc_3471,qbs_new_txt_len("C_RA",4))||qbs_equal(sc_3471,qbs_new_txt_len("_RGB",4))||qbs_equal(sc_3471,qbs_new_txt_len("_RGBA",5))||qbs_equal(sc_3471,qbs_new_txt_len("_RED",4))||qbs_equal(sc_3471,qbs_new_txt_len("_GREEN",6))||qbs_equal(sc_3471,qbs_new_txt_len("C_BL",4))||qbs_equal(sc_3471,qbs_new_txt_len("_ALPHA",6))))||new_error){ if(qbevent){evnt(24152);if(r)goto S_32603;} sc_ec_69_end:; goto sc_3471_end; } do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_C,func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_L2,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24154);}while(r); do{ tmp_long=array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[tmp_long])),qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_L2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24155);}while(r); sc_3471_end:; } S_32609:; sc_3472=((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]; if(qbevent){evnt(24159);if(r)goto S_32609;} S_32610:; if (((sc_3472==( 5 )))||new_error){ if(qbevent){evnt(24160);if(r)goto S_32610;} S_32611:; qbs_set(sc_3473,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24162);if(r)goto S_32611;} S_32612:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_UOF",5))))||new_error){ if(qbevent){evnt(24163);if(r)goto S_32612;} do{ *_FUNC_EVALUATENUMBERS_UOFFSET_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24163);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((uint64)(*_FUNC_EVALUATENUMBERS_UOFFSET_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24163);}while(r); sc_ec_70_end:; goto sc_3473_end; } S_32615:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_ULO",5))))||new_error){ if(qbevent){evnt(24164);if(r)goto S_32615;} do{ *_FUNC_EVALUATENUMBERS_OFFSET_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24164);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int64)(*_FUNC_EVALUATENUMBERS_OFFSET_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24164);}while(r); sc_ec_71_end:; goto sc_3473_end; } S_32618:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_UBY",5))))||new_error){ if(qbevent){evnt(24165);if(r)goto S_32618;} do{ *_FUNC_EVALUATENUMBERS_UBYTE_N1=qbr_float_to_long(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24165);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((uint8)(*_FUNC_EVALUATENUMBERS_UBYTE_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24165);}while(r); sc_ec_72_end:; goto sc_3473_end; } S_32621:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_UIN",5))))||new_error){ if(qbevent){evnt(24166);if(r)goto S_32621;} do{ *_FUNC_EVALUATENUMBERS_UINTEGER_N1=qbr_float_to_long(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24166);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((uint16)(*_FUNC_EVALUATENUMBERS_UINTEGER_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24166);}while(r); sc_ec_73_end:; goto sc_3473_end; } S_32624:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_BY",4))))||new_error){ if(qbevent){evnt(24167);if(r)goto S_32624;} do{ *_FUNC_EVALUATENUMBERS_BYTE_N1=qbr_float_to_long(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24167);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int8)(*_FUNC_EVALUATENUMBERS_BYTE_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24167);}while(r); sc_ec_74_end:; goto sc_3473_end; } S_32627:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_IN",4))))||new_error){ if(qbevent){evnt(24168);if(r)goto S_32627;} do{ *_FUNC_EVALUATENUMBERS_INTEGER_N1=qbr_float_to_long(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24168);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int16)(*_FUNC_EVALUATENUMBERS_INTEGER_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24168);}while(r); sc_ec_75_end:; goto sc_3473_end; } S_32630:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_UIF",5))))||new_error){ if(qbevent){evnt(24169);if(r)goto S_32630;} do{ *_FUNC_EVALUATENUMBERS_UINTEGER64_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24169);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((uint64)(*_FUNC_EVALUATENUMBERS_UINTEGER64_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24169);}while(r); sc_ec_76_end:; goto sc_3473_end; } S_32633:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_OF",4))))||new_error){ if(qbevent){evnt(24170);if(r)goto S_32633;} do{ *_FUNC_EVALUATENUMBERS_ULONG_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24170);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((uint32)(*_FUNC_EVALUATENUMBERS_ULONG_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24170);}while(r); sc_ec_77_end:; goto sc_3473_end; } S_32636:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_IF",4))))||new_error){ if(qbevent){evnt(24171);if(r)goto S_32636;} do{ *_FUNC_EVALUATENUMBERS_INTEGER64_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24171);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int64)(*_FUNC_EVALUATENUMBERS_INTEGER64_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24171);}while(r); sc_ec_78_end:; goto sc_3473_end; } S_32639:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_LO",4))))||new_error){ if(qbevent){evnt(24172);if(r)goto S_32639;} do{ *_FUNC_EVALUATENUMBERS_LONG_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24172);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int32)(*_FUNC_EVALUATENUMBERS_LONG_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24172);}while(r); sc_ec_79_end:; goto sc_3473_end; } S_32642:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_UBI",5))))||new_error){ if(qbevent){evnt(24173);if(r)goto S_32642;} do{ *_FUNC_EVALUATENUMBERS_UBIT1_N1=(qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))))&1; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24173);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int64)(*_FUNC_EVALUATENUMBERS_UBIT1_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24173);}while(r); sc_ec_80_end:; goto sc_3473_end; } S_32645:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_BI",4))))||new_error){ if(qbevent){evnt(24174);if(r)goto S_32645;} do{ if ((*_FUNC_EVALUATENUMBERS_BIT1_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))))&1){ *_FUNC_EVALUATENUMBERS_BIT1_N1|=-2; }else{ *_FUNC_EVALUATENUMBERS_BIT1_N1&=1; } qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24174);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((int64)(*_FUNC_EVALUATENUMBERS_BIT1_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24174);}while(r); sc_ec_81_end:; goto sc_3473_end; } S_32648:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_FL",4))))||new_error){ if(qbevent){evnt(24175);if(r)goto S_32648;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24175);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((long double)(*_FUNC_EVALUATENUMBERS_FLOAT_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24175);}while(r); sc_ec_82_end:; goto sc_3473_end; } S_32651:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_DO",4))))||new_error){ if(qbevent){evnt(24176);if(r)goto S_32651;} do{ *_FUNC_EVALUATENUMBERS_DOUBLE_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24176);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((double)(*_FUNC_EVALUATENUMBERS_DOUBLE_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24176);}while(r); sc_ec_83_end:; goto sc_3473_end; } S_32654:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3473,qbs_new_txt_len("C_SI",4))))||new_error){ if(qbevent){evnt(24177);if(r)goto S_32654;} do{ *_FUNC_EVALUATENUMBERS_SINGLE_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24177);}while(r); do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((float)(*_FUNC_EVALUATENUMBERS_SINGLE_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24177);}while(r); sc_ec_84_end:; goto sc_3473_end; } sc_3473_end:; do{ goto exit_subfunc; if(!qbevent)break;evnt(24179);}while(r); sc_ec_85_end:; goto sc_3472_end; } S_32659:; if (((sc_3472==( 10 )))||new_error){ if(qbevent){evnt(24180);if(r)goto S_32659;} S_32660:; qbs_set(sc_3474,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24181);if(r)goto S_32660;} S_32661:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_PI",3))))||new_error){ if(qbevent){evnt(24182);if(r)goto S_32661;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 3.14159265358979323846264338327950288E+0L ; if(!qbevent)break;evnt(24183);}while(r); S_32663:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24184);if(r)goto S_32663;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=*_FUNC_EVALUATENUMBERS_FLOAT_N1*func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24184);}while(r); } sc_ec_86_end:; goto sc_3474_end; } S_32666:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_ACOS",5))))||new_error){ if(qbevent){evnt(24185);if(r)goto S_32666;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=acos(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24185);}while(r); sc_ec_87_end:; goto sc_3474_end; } S_32668:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_ASIN",5))))||new_error){ if(qbevent){evnt(24186);if(r)goto S_32668;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=asin(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24186);}while(r); sc_ec_88_end:; goto sc_3474_end; } S_32670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_ARCSEC",7))))||new_error){ if(qbevent){evnt(24187);if(r)goto S_32670;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_arcsec(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24187);}while(r); sc_ec_89_end:; goto sc_3474_end; } S_32672:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_ARCCSC",7))))||new_error){ if(qbevent){evnt(24188);if(r)goto S_32672;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_arccsc(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24188);}while(r); sc_ec_90_end:; goto sc_3474_end; } S_32674:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_ARCCOT",7))))||new_error){ if(qbevent){evnt(24189);if(r)goto S_32674;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_arccot(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24189);}while(r); sc_ec_91_end:; goto sc_3474_end; } S_32676:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_SECH",5))))||new_error){ if(qbevent){evnt(24190);if(r)goto S_32676;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_sech(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24190);}while(r); sc_ec_92_end:; goto sc_3474_end; } S_32678:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_CSCH",5))))||new_error){ if(qbevent){evnt(24191);if(r)goto S_32678;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_csch(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24191);}while(r); sc_ec_93_end:; goto sc_3474_end; } S_32680:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_COTH",5))))||new_error){ if(qbevent){evnt(24192);if(r)goto S_32680;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_coth(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24192);}while(r); sc_ec_94_end:; goto sc_3474_end; } S_32682:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("C_RG",4))))||new_error){ if(qbevent){evnt(24193);if(r)goto S_32682;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_N,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24194);}while(r); S_32684:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24195);if(r)goto S_32684;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Invalid null _RGB32",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24195);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24195);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_C1=func_instr(NULL,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24196);}while(r); S_32689:; if ((*_FUNC_EVALUATENUMBERS_LONG_C1)||new_error){ if(qbevent){evnt(24197);if(r)goto S_32689;} do{ *_FUNC_EVALUATENUMBERS_LONG_C2=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24197);}while(r); } S_32692:; if ((*_FUNC_EVALUATENUMBERS_LONG_C2)||new_error){ if(qbevent){evnt(24198);if(r)goto S_32692;} do{ *_FUNC_EVALUATENUMBERS_LONG_C3=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24198);}while(r); } S_32695:; if ((*_FUNC_EVALUATENUMBERS_LONG_C3)||new_error){ if(qbevent){evnt(24199);if(r)goto S_32695;} do{ *_FUNC_EVALUATENUMBERS_LONG_C4=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24199);}while(r); } S_32698:; if ((-(*_FUNC_EVALUATENUMBERS_LONG_C1== 0 ))||new_error){ if(qbevent){evnt(24200);if(r)goto S_32698;} do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24201);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgb32(*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_N); if(!qbevent)break;evnt(24202);}while(r); S_32701:; }else{ if (-(*_FUNC_EVALUATENUMBERS_LONG_C2== 0 )){ if(qbevent){evnt(24203);if(r)goto S_32701;} do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24204);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24205);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgba32(*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_N,qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N2)); if(!qbevent)break;evnt(24206);}while(r); S_32705:; }else{ if (-(*_FUNC_EVALUATENUMBERS_LONG_C3== 0 )){ if(qbevent){evnt(24207);if(r)goto S_32705;} do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24208);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24209);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N3=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24210);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgb32(*_FUNC_EVALUATENUMBERS_LONG_N,qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N2),qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N3)); if(!qbevent)break;evnt(24211);}while(r); S_32710:; }else{ if (-(*_FUNC_EVALUATENUMBERS_LONG_C4== 0 )){ if(qbevent){evnt(24212);if(r)goto S_32710;} do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24213);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24214);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N3=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24215);}while(r); do{ *_FUNC_EVALUATENUMBERS_LONG_N4=qbr(func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24216);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgba32(*_FUNC_EVALUATENUMBERS_LONG_N,qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N2),qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N3),*_FUNC_EVALUATENUMBERS_LONG_N4); if(!qbevent)break;evnt(24217);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid comma count (",29),((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24219);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24219);}while(r); } } } } sc_ec_95_end:; goto sc_3474_end; } S_32720:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("C_RA",4))))||new_error){ if(qbevent){evnt(24221);if(r)goto S_32720;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_N,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24222);}while(r); S_32722:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24223);if(r)goto S_32722;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Invalid null _RGBA32",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24223);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24223);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_C1=func_instr(NULL,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24224);}while(r); S_32727:; if ((*_FUNC_EVALUATENUMBERS_LONG_C1)||new_error){ if(qbevent){evnt(24225);if(r)goto S_32727;} do{ *_FUNC_EVALUATENUMBERS_LONG_C2=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24225);}while(r); } S_32730:; if ((*_FUNC_EVALUATENUMBERS_LONG_C2)||new_error){ if(qbevent){evnt(24226);if(r)goto S_32730;} do{ *_FUNC_EVALUATENUMBERS_LONG_C3=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24226);}while(r); } S_32733:; if ((*_FUNC_EVALUATENUMBERS_LONG_C3)||new_error){ if(qbevent){evnt(24227);if(r)goto S_32733;} do{ *_FUNC_EVALUATENUMBERS_LONG_C4=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24227);}while(r); } S_32736:; if (((-(*_FUNC_EVALUATENUMBERS_LONG_C3== 0 ))|(-(*_FUNC_EVALUATENUMBERS_LONG_C4!= 0 )))||new_error){ if(qbevent){evnt(24228);if(r)goto S_32736;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid comma count (",29),((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24228);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24228);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24230);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24231);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N3=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24232);}while(r); do{ *_FUNC_EVALUATENUMBERS_LONG_N4=qbr(func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24233);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgba32(*_FUNC_EVALUATENUMBERS_LONG_N,qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N2),qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N3),*_FUNC_EVALUATENUMBERS_LONG_N4); if(!qbevent)break;evnt(24234);}while(r); sc_ec_96_end:; goto sc_3474_end; } S_32745:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_RGB",4))))||new_error){ if(qbevent){evnt(24235);if(r)goto S_32745;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_N,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24236);}while(r); S_32747:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24237);if(r)goto S_32747;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Invalid null _RGB",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24237);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24237);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_C1=func_instr(NULL,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24238);}while(r); S_32752:; if ((*_FUNC_EVALUATENUMBERS_LONG_C1)||new_error){ if(qbevent){evnt(24239);if(r)goto S_32752;} do{ *_FUNC_EVALUATENUMBERS_LONG_C2=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24239);}while(r); } S_32755:; if ((*_FUNC_EVALUATENUMBERS_LONG_C2)||new_error){ if(qbevent){evnt(24240);if(r)goto S_32755;} do{ *_FUNC_EVALUATENUMBERS_LONG_C3=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24240);}while(r); } S_32758:; if ((*_FUNC_EVALUATENUMBERS_LONG_C3)||new_error){ if(qbevent){evnt(24241);if(r)goto S_32758;} do{ *_FUNC_EVALUATENUMBERS_LONG_C4=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24241);}while(r); } S_32761:; if (((-(*_FUNC_EVALUATENUMBERS_LONG_C3== 0 ))|(-(*_FUNC_EVALUATENUMBERS_LONG_C4!= 0 )))||new_error){ if(qbevent){evnt(24242);if(r)goto S_32761;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid comma count (",29),((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),qbs_new_txt_len("). _RGB requires 4 parameters for Red, Green, Blue, ScreenMode.",63))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24242);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24242);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24244);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24245);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N3=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24246);}while(r); do{ *_FUNC_EVALUATENUMBERS_LONG_N4=qbr(func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24247);}while(r); S_32769:; if(qbevent){evnt(24248);if(r)goto S_32769;} S_32770:; if ((((*_FUNC_EVALUATENUMBERS_LONG_N4>=( 0 ))&&(*_FUNC_EVALUATENUMBERS_LONG_N4<=( 2 )))||((*_FUNC_EVALUATENUMBERS_LONG_N4>=( 7 ))&&(*_FUNC_EVALUATENUMBERS_LONG_N4<=( 13 )))||(*_FUNC_EVALUATENUMBERS_LONG_N4==( 256 ))||(*_FUNC_EVALUATENUMBERS_LONG_N4==( 32 )))||new_error){ if(qbevent){evnt(24249);if(r)goto S_32770;} sc_ec_97_end:; goto sc_3475_end; } do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid Screen Mode (",29),qbs_str((int32)(*_FUNC_EVALUATENUMBERS_LONG_N4))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24251);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24251);}while(r); sc_3475_end:; do{ *_FUNC_EVALUATENUMBERS_LONG_T=func__newimage( 1 , 1 ,*_FUNC_EVALUATENUMBERS_LONG_N4,1); if(!qbevent)break;evnt(24253);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgb(*_FUNC_EVALUATENUMBERS_LONG_N,qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N2),qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N3),*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24254);}while(r); do{ sub__freeimage(*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24255);}while(r); sc_ec_98_end:; goto sc_3474_end; } S_32778:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_RGBA",5))))||new_error){ if(qbevent){evnt(24256);if(r)goto S_32778;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_N,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24257);}while(r); S_32780:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24258);if(r)goto S_32780;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Invalid null _RGBA",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24258);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24258);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_C1=func_instr(NULL,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24259);}while(r); S_32785:; if ((*_FUNC_EVALUATENUMBERS_LONG_C1)||new_error){ if(qbevent){evnt(24260);if(r)goto S_32785;} do{ *_FUNC_EVALUATENUMBERS_LONG_C2=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24260);}while(r); } S_32788:; if ((*_FUNC_EVALUATENUMBERS_LONG_C2)||new_error){ if(qbevent){evnt(24261);if(r)goto S_32788;} do{ *_FUNC_EVALUATENUMBERS_LONG_C3=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24261);}while(r); } S_32791:; if ((*_FUNC_EVALUATENUMBERS_LONG_C3)||new_error){ if(qbevent){evnt(24262);if(r)goto S_32791;} do{ *_FUNC_EVALUATENUMBERS_LONG_C4=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24262);}while(r); } S_32794:; if ((*_FUNC_EVALUATENUMBERS_LONG_C4)||new_error){ if(qbevent){evnt(24263);if(r)goto S_32794;} do{ *_FUNC_EVALUATENUMBERS_LONG_C5=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C4+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24263);}while(r); } S_32797:; if (((-(*_FUNC_EVALUATENUMBERS_LONG_C4== 0 ))|(-(*_FUNC_EVALUATENUMBERS_LONG_C5!= 0 )))||new_error){ if(qbevent){evnt(24264);if(r)goto S_32797;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid comma count (",29),((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),qbs_new_txt_len("). _RGBA requires 5 parameters for Red, Green, Blue, Alpha, ScreenMode.",71))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24264);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24264);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24266);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24267);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N3=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C2+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24268);}while(r); do{ *_FUNC_EVALUATENUMBERS_LONG_N4=qbr(func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C3+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24269);}while(r); do{ *_FUNC_EVALUATENUMBERS_LONG_N5=qbr(func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C4+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24270);}while(r); S_32806:; if(qbevent){evnt(24271);if(r)goto S_32806;} S_32807:; if ((((*_FUNC_EVALUATENUMBERS_LONG_N5>=( 0 ))&&(*_FUNC_EVALUATENUMBERS_LONG_N5<=( 2 )))||((*_FUNC_EVALUATENUMBERS_LONG_N5>=( 7 ))&&(*_FUNC_EVALUATENUMBERS_LONG_N5<=( 13 )))||(*_FUNC_EVALUATENUMBERS_LONG_N5==( 256 ))||(*_FUNC_EVALUATENUMBERS_LONG_N5==( 32 )))||new_error){ if(qbevent){evnt(24272);if(r)goto S_32807;} sc_ec_99_end:; goto sc_3476_end; } do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid Screen Mode (",29),qbs_str((int32)(*_FUNC_EVALUATENUMBERS_LONG_N5))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24274);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24274);}while(r); sc_3476_end:; do{ *_FUNC_EVALUATENUMBERS_LONG_T=func__newimage( 1 , 1 ,*_FUNC_EVALUATENUMBERS_LONG_N5,1); if(!qbevent)break;evnt(24276);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__rgba(*_FUNC_EVALUATENUMBERS_LONG_N,qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N2),qbr(*_FUNC_EVALUATENUMBERS_FLOAT_N3),*_FUNC_EVALUATENUMBERS_LONG_N4,*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24277);}while(r); do{ sub__freeimage(*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24278);}while(r); sc_ec_100_end:; goto sc_3474_end; } S_32815:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_RED",4))||qbs_equal(sc_3474,qbs_new_txt_len("_GREEN",6))||qbs_equal(sc_3474,qbs_new_txt_len("_BLUE",5))||qbs_equal(sc_3474,qbs_new_txt_len("_ALPHA",6))))||new_error){ if(qbevent){evnt(24279);if(r)goto S_32815;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_N,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24280);}while(r); S_32817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24281);if(r)goto S_32817;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_new_txt_len("ERROR - Invalid null ",21),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24281);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24281);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_C1=func_instr(NULL,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24282);}while(r); S_32822:; if ((-(*_FUNC_EVALUATENUMBERS_LONG_C1== 0 ))||new_error){ if(qbevent){evnt(24283);if(r)goto S_32822;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - ",8),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))),qbs_new_txt_len(" requires 2 parameters for Color, ScreenMode.",45))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24283);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24283);}while(r); } S_32826:; if ((*_FUNC_EVALUATENUMBERS_LONG_C1)||new_error){ if(qbevent){evnt(24284);if(r)goto S_32826;} do{ *_FUNC_EVALUATENUMBERS_LONG_C2=func_instr(*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24284);}while(r); } S_32829:; if ((*_FUNC_EVALUATENUMBERS_LONG_C2)||new_error){ if(qbevent){evnt(24285);if(r)goto S_32829;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - ",8),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))),qbs_new_txt_len(" requires 2 parameters for Color, ScreenMode.",45))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24285);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24285);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(qbs_left(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24286);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(func_mid(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])),*_FUNC_EVALUATENUMBERS_LONG_C1+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24287);}while(r); S_32835:; if(qbevent){evnt(24288);if(r)goto S_32835;} S_32836:; if ((((*_FUNC_EVALUATENUMBERS_FLOAT_N2>=( 0 ))&&(*_FUNC_EVALUATENUMBERS_FLOAT_N2<=( 2 )))||((*_FUNC_EVALUATENUMBERS_FLOAT_N2>=( 7 ))&&(*_FUNC_EVALUATENUMBERS_FLOAT_N2<=( 13 )))||(*_FUNC_EVALUATENUMBERS_FLOAT_N2==( 256 ))||(*_FUNC_EVALUATENUMBERS_FLOAT_N2==( 32 )))||new_error){ if(qbevent){evnt(24289);if(r)goto S_32836;} sc_ec_101_end:; goto sc_3477_end; } do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Invalid Screen Mode (",29),qbs_str((long double)(*_FUNC_EVALUATENUMBERS_FLOAT_N2))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24291);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24291);}while(r); sc_3477_end:; do{ *_FUNC_EVALUATENUMBERS_LONG_T=func__newimage( 1 , 1 ,*_FUNC_EVALUATENUMBERS_LONG_N4,1); if(!qbevent)break;evnt(24293);}while(r); S_32842:; qbs_set(sc_3478,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24294);if(r)goto S_32842;} S_32843:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3478,qbs_new_txt_len("_RED",4))))||new_error){ if(qbevent){evnt(24295);if(r)goto S_32843;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__red(*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24295);}while(r); sc_ec_102_end:; goto sc_3478_end; } S_32845:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3478,qbs_new_txt_len("_BLUE",5))))||new_error){ if(qbevent){evnt(24296);if(r)goto S_32845;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__blue(*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24296);}while(r); sc_ec_103_end:; goto sc_3478_end; } S_32847:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3478,qbs_new_txt_len("_GREEN",6))))||new_error){ if(qbevent){evnt(24297);if(r)goto S_32847;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__green(*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24297);}while(r); sc_ec_104_end:; goto sc_3478_end; } S_32849:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3478,qbs_new_txt_len("_ALPHA",6))))||new_error){ if(qbevent){evnt(24298);if(r)goto S_32849;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__alpha(*_FUNC_EVALUATENUMBERS_LONG_N,*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24298);}while(r); sc_ec_105_end:; goto sc_3478_end; } sc_3478_end:; do{ sub__freeimage(*_FUNC_EVALUATENUMBERS_LONG_T,1); if(!qbevent)break;evnt(24300);}while(r); sc_ec_106_end:; goto sc_3474_end; } S_32853:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("C_RX",4))||qbs_equal(sc_3474,qbs_new_txt_len("C_GR",4))||qbs_equal(sc_3474,qbs_new_txt_len("C_BL",4))||qbs_equal(sc_3474,qbs_new_txt_len("C_AL",4))))||new_error){ if(qbevent){evnt(24301);if(r)goto S_32853;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_N,((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24302);}while(r); S_32855:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALUATENUMBERS_STRING_N,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24303);if(r)goto S_32855;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_new_txt_len("ERROR - Invalid null ",21),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24303);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24303);}while(r); } do{ *_FUNC_EVALUATENUMBERS_LONG_N=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24304);}while(r); S_32860:; qbs_set(sc_3479,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24305);if(r)goto S_32860;} S_32861:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3479,qbs_new_txt_len("C_RX",4))))||new_error){ if(qbevent){evnt(24306);if(r)goto S_32861;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__red32(*_FUNC_EVALUATENUMBERS_LONG_N); if(!qbevent)break;evnt(24306);}while(r); sc_ec_107_end:; goto sc_3479_end; } S_32863:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3479,qbs_new_txt_len("C_BL",4))))||new_error){ if(qbevent){evnt(24307);if(r)goto S_32863;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__blue32(*_FUNC_EVALUATENUMBERS_LONG_N); if(!qbevent)break;evnt(24307);}while(r); sc_ec_108_end:; goto sc_3479_end; } S_32865:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3479,qbs_new_txt_len("C_GR",4))))||new_error){ if(qbevent){evnt(24308);if(r)goto S_32865;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__green32(*_FUNC_EVALUATENUMBERS_LONG_N); if(!qbevent)break;evnt(24308);}while(r); sc_ec_109_end:; goto sc_3479_end; } S_32867:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3479,qbs_new_txt_len("C_AL",4))))||new_error){ if(qbevent){evnt(24309);if(r)goto S_32867;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func__alpha32(*_FUNC_EVALUATENUMBERS_LONG_N); if(!qbevent)break;evnt(24309);}while(r); sc_ec_110_end:; goto sc_3479_end; } sc_3479_end:; sc_ec_111_end:; goto sc_3474_end; } S_32870:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("COS",3))))||new_error){ if(qbevent){evnt(24311);if(r)goto S_32870;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=cos(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24311);}while(r); sc_ec_112_end:; goto sc_3474_end; } S_32872:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("SIN",3))))||new_error){ if(qbevent){evnt(24312);if(r)goto S_32872;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=sin(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24312);}while(r); sc_ec_113_end:; goto sc_3474_end; } S_32874:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("TAN",3))))||new_error){ if(qbevent){evnt(24313);if(r)goto S_32874;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=tan(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24313);}while(r); sc_ec_114_end:; goto sc_3474_end; } S_32876:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("LOG",3))))||new_error){ if(qbevent){evnt(24314);if(r)goto S_32876;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_log(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24314);}while(r); sc_ec_115_end:; goto sc_3474_end; } S_32878:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("EXP",3))))||new_error){ if(qbevent){evnt(24315);if(r)goto S_32878;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_exp_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24315);}while(r); sc_ec_116_end:; goto sc_3474_end; } S_32880:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("ATN",3))))||new_error){ if(qbevent){evnt(24316);if(r)goto S_32880;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=atan(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24316);}while(r); sc_ec_117_end:; goto sc_3474_end; } S_32882:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_D2R",4))))||new_error){ if(qbevent){evnt(24317);if(r)goto S_32882;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 0.0174532925E+0 *(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24317);}while(r); sc_ec_118_end:; goto sc_3474_end; } S_32884:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_D2G",4))))||new_error){ if(qbevent){evnt(24318);if(r)goto S_32884;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 1.1111111111E+0 *(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24318);}while(r); sc_ec_119_end:; goto sc_3474_end; } S_32886:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_R2D",4))))||new_error){ if(qbevent){evnt(24319);if(r)goto S_32886;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 57.2957795E+0 *(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24319);}while(r); sc_ec_120_end:; goto sc_3474_end; } S_32888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_R2G",4))))||new_error){ if(qbevent){evnt(24320);if(r)goto S_32888;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 0.015707963E+0 *(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24320);}while(r); sc_ec_121_end:; goto sc_3474_end; } S_32890:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_G2D",4))))||new_error){ if(qbevent){evnt(24321);if(r)goto S_32890;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 0.9E+0 *(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24321);}while(r); sc_ec_122_end:; goto sc_3474_end; } S_32892:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_G2R",4))))||new_error){ if(qbevent){evnt(24322);if(r)goto S_32892;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1= 63.661977237E+0 *(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24322);}while(r); sc_ec_123_end:; goto sc_3474_end; } S_32894:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("ABS",3))))||new_error){ if(qbevent){evnt(24323);if(r)goto S_32894;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_abs((long double)(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24323);}while(r); sc_ec_124_end:; goto sc_3474_end; } S_32896:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("SGN",3))))||new_error){ if(qbevent){evnt(24324);if(r)goto S_32896;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_sgn((long double)(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24324);}while(r); sc_ec_125_end:; goto sc_3474_end; } S_32898:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("INT",3))))||new_error){ if(qbevent){evnt(24325);if(r)goto S_32898;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=floor(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24325);}while(r); sc_ec_126_end:; goto sc_3474_end; } S_32900:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_ROUND",6))))||new_error){ if(qbevent){evnt(24326);if(r)goto S_32900;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_round_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24326);}while(r); sc_ec_127_end:; goto sc_3474_end; } S_32902:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_CEIL",5))))||new_error){ if(qbevent){evnt(24327);if(r)goto S_32902;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=ceil(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24327);}while(r); sc_ec_128_end:; goto sc_3474_end; } S_32904:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("FIX",3))))||new_error){ if(qbevent){evnt(24328);if(r)goto S_32904;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_fix_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24328);}while(r); sc_ec_129_end:; goto sc_3474_end; } S_32906:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_SEC",4))))||new_error){ if(qbevent){evnt(24329);if(r)goto S_32906;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_sec(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24329);}while(r); sc_ec_130_end:; goto sc_3474_end; } S_32908:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_CSC",4))))||new_error){ if(qbevent){evnt(24330);if(r)goto S_32908;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_csc(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24330);}while(r); sc_ec_131_end:; goto sc_3474_end; } S_32910:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3474,qbs_new_txt_len("_COT",4))))||new_error){ if(qbevent){evnt(24331);if(r)goto S_32910;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_cot(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24331);}while(r); sc_ec_132_end:; goto sc_3474_end; } sc_3474_end:; sc_ec_133_end:; goto sc_3472_end; } S_32913:; if ((((sc_3472>=( 20 ))&&(sc_3472<=( 60 ))))||new_error){ if(qbevent){evnt(24333);if(r)goto S_32913;} S_32914:; qbs_set(sc_3480,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24334);if(r)goto S_32914;} S_32915:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("^",1))))||new_error){ if(qbevent){evnt(24335);if(r)goto S_32915;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=pow2(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))),func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24335);}while(r); sc_ec_134_end:; goto sc_3480_end; } S_32917:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("SQR",3))))||new_error){ if(qbevent){evnt(24336);if(r)goto S_32917;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_sqr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24336);}while(r); sc_ec_135_end:; goto sc_3480_end; } S_32919:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("ROOT",4))))||new_error){ if(qbevent){evnt(24337);if(r)goto S_32919;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24338);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N2=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24338);}while(r); S_32922:; if ((-(*_FUNC_EVALUATENUMBERS_FLOAT_N2== 1 ))||new_error){ if(qbevent){evnt(24339);if(r)goto S_32922;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_rtrim(qbs_ltrim(qbs_str((long double)(*_FUNC_EVALUATENUMBERS_FLOAT_N1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24339);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24339);}while(r); } S_32926:; if (((-(*_FUNC_EVALUATENUMBERS_FLOAT_N1< 0 ))&(-(*_FUNC_EVALUATENUMBERS_FLOAT_N2>= 1 )))||new_error){ if(qbevent){evnt(24340);if(r)goto S_32926;} do{ *_FUNC_EVALUATENUMBERS_LONG_SIGN= -1 ; if(!qbevent)break;evnt(24340);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(*_FUNC_EVALUATENUMBERS_FLOAT_N1); if(!qbevent)break;evnt(24340);}while(r); }else{ do{ *_FUNC_EVALUATENUMBERS_LONG_SIGN= 1 ; if(!qbevent)break;evnt(24340);}while(r); } do{ *_FUNC_EVALUATENUMBERS_FLOAT_N3= 1E+0L / *_FUNC_EVALUATENUMBERS_FLOAT_N2; if(!qbevent)break;evnt(24341);}while(r); S_32933:; if (((-(*_FUNC_EVALUATENUMBERS_FLOAT_N3!=floor(*_FUNC_EVALUATENUMBERS_FLOAT_N3)))&(-(*_FUNC_EVALUATENUMBERS_FLOAT_N2< 1 )))||new_error){ if(qbevent){evnt(24342);if(r)goto S_32933;} do{ *_FUNC_EVALUATENUMBERS_LONG_SIGN=func_sgn((long double)(*_FUNC_EVALUATENUMBERS_FLOAT_N1)); if(!qbevent)break;evnt(24342);}while(r); do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_abs((long double)(*_FUNC_EVALUATENUMBERS_FLOAT_N1)); if(!qbevent)break;evnt(24342);}while(r); } do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=*_FUNC_EVALUATENUMBERS_LONG_SIGN*(pow2(*_FUNC_EVALUATENUMBERS_FLOAT_N1,*_FUNC_EVALUATENUMBERS_FLOAT_N3)); if(!qbevent)break;evnt(24343);}while(r); sc_ec_136_end:; goto sc_3480_end; } S_32938:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(24344);if(r)goto S_32938;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))*func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24344);}while(r); sc_ec_137_end:; goto sc_3480_end; } S_32940:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(24345);if(r)goto S_32940;} S_32941:; if ((qbs_cleanup(qbs_tmp_base,-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))!= 0 )))||new_error){ if(qbevent){evnt(24346);if(r)goto S_32941;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))/ func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24347);}while(r); }else{ do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Division By Zero",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24349);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24350);}while(r); } sc_ec_138_end:; goto sc_3480_end; } S_32947:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(24352);if(r)goto S_32947;} S_32948:; if ((qbs_cleanup(qbs_tmp_base,-(func_fix_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))== 0 )))||new_error){ if(qbevent){evnt(24353);if(r)goto S_32948;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Division By Zero",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24354);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24355);}while(r); } do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))/ qbr(func_fix_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24358);}while(r); sc_ec_139_end:; goto sc_3480_end; } S_32953:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("MOD",3))))||new_error){ if(qbevent){evnt(24359);if(r)goto S_32953;} S_32954:; if ((qbs_cleanup(qbs_tmp_base,-(func_fix_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))== 0 )))||new_error){ if(qbevent){evnt(24360);if(r)goto S_32954;} do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_new_txt_len("ERROR - Division By Zero",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24361);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24362);}while(r); } do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))%qbr(func_fix_float(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24365);}while(r); sc_ec_140_end:; goto sc_3480_end; } S_32959:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("+",1))))||new_error){ if(qbevent){evnt(24367);if(r)goto S_32959;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))+func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24367);}while(r); sc_ec_141_end:; goto sc_3480_end; } S_32961:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3480,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(24368);if(r)goto S_32961;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))-func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24369);}while(r); sc_ec_142_end:; goto sc_3480_end; } sc_3480_end:; sc_ec_143_end:; goto sc_3472_end; } S_32964:; if (((sc_3472==( 70 )))||new_error){ if(qbevent){evnt(24371);if(r)goto S_32964;} S_32965:; qbs_set(sc_3481,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24372);if(r)goto S_32965;} S_32966:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3481,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(24373);if(r)goto S_32966;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))==func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24373);}while(r); sc_ec_144_end:; goto sc_3481_end; } S_32968:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3481,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(24374);if(r)goto S_32968;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))>func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24374);}while(r); sc_ec_145_end:; goto sc_3481_end; } S_32970:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3481,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(24375);if(r)goto S_32970;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))",2))||qbs_equal(sc_3481,qbs_new_txt_len("><",2))))||new_error){ if(qbevent){evnt(24376);if(r)goto S_32972;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))!=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24376);}while(r); sc_ec_147_end:; goto sc_3481_end; } S_32974:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3481,qbs_new_txt_len("<=",2))||qbs_equal(sc_3481,qbs_new_txt_len("=<",2))))||new_error){ if(qbevent){evnt(24377);if(r)goto S_32974;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))<=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24377);}while(r); sc_ec_148_end:; goto sc_3481_end; } S_32976:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3481,qbs_new_txt_len(">=",2))||qbs_equal(sc_3481,qbs_new_txt_len("=>",2))))||new_error){ if(qbevent){evnt(24378);if(r)goto S_32976;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=-(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))>=func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24378);}while(r); sc_ec_149_end:; goto sc_3481_end; } sc_3481_end:; sc_ec_150_end:; goto sc_3472_end; } S_32980:; qbs_set(sc_3482,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_FUNC_EVALUATENUMBERS_LONG_P)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(24381);if(r)goto S_32980;} S_32981:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3482,qbs_new_txt_len("NOT",3))))||new_error){ if(qbevent){evnt(24382);if(r)goto S_32981;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=~(qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24382);}while(r); sc_ec_151_end:; goto sc_3482_end; } S_32983:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3482,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(24383);if(r)goto S_32983;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))&qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24383);}while(r); sc_ec_152_end:; goto sc_3482_end; } S_32985:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3482,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(24384);if(r)goto S_32985;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))|qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24384);}while(r); sc_ec_153_end:; goto sc_3482_end; } S_32987:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3482,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(24385);if(r)goto S_32987;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))^qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24385);}while(r); sc_ec_154_end:; goto sc_3482_end; } S_32989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3482,qbs_new_txt_len("EQV",3))))||new_error){ if(qbevent){evnt(24386);if(r)goto S_32989;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=~qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))^qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24386);}while(r); sc_ec_155_end:; goto sc_3482_end; } S_32991:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3482,qbs_new_txt_len("IMP",3))))||new_error){ if(qbevent){evnt(24387);if(r)goto S_32991;} do{ *_FUNC_EVALUATENUMBERS_FLOAT_N1=~qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 1 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])]))))|qbr(func_val(((qbs*)(((uint64*)(_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[0]))[array_check(( 2 )-_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[4],_FUNC_EVALUATENUMBERS_ARRAY_STRING_NUM[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24387);}while(r); sc_ec_156_end:; goto sc_3482_end; } sc_3482_end:; sc_3472_end:; do{ qbs_set(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS,qbs_add(qbs_rtrim(qbs_ltrim(qbs_str((long double)(*_FUNC_EVALUATENUMBERS_FLOAT_N1)))),_FUNC_EVALUATENUMBERS_STRING_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24391);}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; qbs_maketmp(_FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS);return _FUNC_EVALUATENUMBERS_STRING_EVALUATENUMBERS; } qbs* FUNC_DWD(qbs*_FUNC_DWD_STRING_EXP){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_DWD_STRING_T,_FUNC_DWD_STRING_EXP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24400);}while(r); S_32997:; do{ if(qbevent){evnt(24401);if(r)goto S_32997;} do{ *_FUNC_DWD_LONG_BAD= 0 ; if(!qbevent)break;evnt(24402);}while(r); S_32999:; do{ if(qbevent){evnt(24403);if(r)goto S_32999;} do{ *_FUNC_DWD_LONG_L=func_instr(NULL,_FUNC_DWD_STRING_T,qbs_new_txt_len("++",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24404);}while(r); S_33001:; if ((*_FUNC_DWD_LONG_L)||new_error){ if(qbevent){evnt(24405);if(r)goto S_33001;} do{ qbs_set(_FUNC_DWD_STRING_T,qbs_add(qbs_add(qbs_left(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L- 1 ),qbs_new_txt_len("+",1)),func_mid(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L+ 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24405);}while(r); do{ *_FUNC_DWD_LONG_BAD= -1 ; if(!qbevent)break;evnt(24405);}while(r); } S_33005:; dl_continue_3485:; }while((!(-(*_FUNC_DWD_LONG_L== 0 )))&&(!new_error)); dl_exit_3485:; if(qbevent){evnt(24406);if(r)goto S_33005;} S_33006:; do{ if(qbevent){evnt(24407);if(r)goto S_33006;} do{ *_FUNC_DWD_LONG_L=func_instr(NULL,_FUNC_DWD_STRING_T,qbs_new_txt_len("+-",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24408);}while(r); S_33008:; if ((*_FUNC_DWD_LONG_L)||new_error){ if(qbevent){evnt(24409);if(r)goto S_33008;} do{ qbs_set(_FUNC_DWD_STRING_T,qbs_add(qbs_add(qbs_left(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L- 1 ),qbs_new_txt_len("-",1)),func_mid(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L+ 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24409);}while(r); do{ *_FUNC_DWD_LONG_BAD= -1 ; if(!qbevent)break;evnt(24409);}while(r); } S_33012:; dl_continue_3486:; }while((!(-(*_FUNC_DWD_LONG_L== 0 )))&&(!new_error)); dl_exit_3486:; if(qbevent){evnt(24410);if(r)goto S_33012;} S_33013:; do{ if(qbevent){evnt(24411);if(r)goto S_33013;} do{ *_FUNC_DWD_LONG_L=func_instr(NULL,_FUNC_DWD_STRING_T,qbs_new_txt_len("-+",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24412);}while(r); S_33015:; if ((*_FUNC_DWD_LONG_L)||new_error){ if(qbevent){evnt(24413);if(r)goto S_33015;} do{ qbs_set(_FUNC_DWD_STRING_T,qbs_add(qbs_add(qbs_left(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L- 1 ),qbs_new_txt_len("-",1)),func_mid(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L+ 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24413);}while(r); do{ *_FUNC_DWD_LONG_BAD= -1 ; if(!qbevent)break;evnt(24413);}while(r); } S_33019:; dl_continue_3487:; }while((!(-(*_FUNC_DWD_LONG_L== 0 )))&&(!new_error)); dl_exit_3487:; if(qbevent){evnt(24414);if(r)goto S_33019;} S_33020:; do{ if(qbevent){evnt(24415);if(r)goto S_33020;} do{ *_FUNC_DWD_LONG_L=func_instr(NULL,_FUNC_DWD_STRING_T,qbs_new_txt_len("--",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24416);}while(r); S_33022:; if ((*_FUNC_DWD_LONG_L)||new_error){ if(qbevent){evnt(24417);if(r)goto S_33022;} do{ qbs_set(_FUNC_DWD_STRING_T,qbs_add(qbs_add(qbs_left(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L- 1 ),qbs_new_txt_len("+",1)),func_mid(_FUNC_DWD_STRING_T,*_FUNC_DWD_LONG_L+ 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24417);}while(r); do{ *_FUNC_DWD_LONG_BAD= -1 ; if(!qbevent)break;evnt(24417);}while(r); } S_33026:; dl_continue_3488:; }while((!(-(*_FUNC_DWD_LONG_L== 0 )))&&(!new_error)); dl_exit_3488:; if(qbevent){evnt(24418);if(r)goto S_33026;} S_33027:; dl_continue_3484:; }while((!(~(*_FUNC_DWD_LONG_BAD)))&&(!new_error)); dl_exit_3484:; if(qbevent){evnt(24419);if(r)goto S_33027;} do{ qbs_set(_FUNC_DWD_STRING_DWD,_FUNC_DWD_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24420);}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; qbs_maketmp(_FUNC_DWD_STRING_DWD);return _FUNC_DWD_STRING_DWD; } void SUB_PREPARSE(qbs*_SUB_PREPARSE_STRING_E){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(24424);}while(r); do{ if(!qbevent)break;evnt(24425);}while(r); S_33031:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[array_check(( 0 )-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24427);if(r)goto S_33031;} do{ if (__ARRAY_STRING_PP_TYPEMOD[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_PP_TYPEMOD)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_PP_TYPEMOD[2]&1){ tmp_long=__ARRAY_STRING_PP_TYPEMOD[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long]); free((void*)(__ARRAY_STRING_PP_TYPEMOD[0])); } __ARRAY_STRING_PP_TYPEMOD[4]= 0 ; __ARRAY_STRING_PP_TYPEMOD[5]=( 100 )-__ARRAY_STRING_PP_TYPEMOD[4]+1; __ARRAY_STRING_PP_TYPEMOD[6]=1; __ARRAY_STRING_PP_TYPEMOD[0]=(ptrszint)malloc(__ARRAY_STRING_PP_TYPEMOD[5]*8); if (!__ARRAY_STRING_PP_TYPEMOD[0]) error(257); __ARRAY_STRING_PP_TYPEMOD[2]|=1; tmp_long=__ARRAY_STRING_PP_TYPEMOD[5]; if (__ARRAY_STRING_PP_TYPEMOD[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_PP_CONVERTEDMOD)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&1){ tmp_long=__ARRAY_STRING_PP_CONVERTEDMOD[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long]); free((void*)(__ARRAY_STRING_PP_CONVERTEDMOD[0])); } __ARRAY_STRING_PP_CONVERTEDMOD[4]= 0 ; __ARRAY_STRING_PP_CONVERTEDMOD[5]=( 100 )-__ARRAY_STRING_PP_CONVERTEDMOD[4]+1; __ARRAY_STRING_PP_CONVERTEDMOD[6]=1; __ARRAY_STRING_PP_CONVERTEDMOD[0]=(ptrszint)malloc(__ARRAY_STRING_PP_CONVERTEDMOD[5]*8); if (!__ARRAY_STRING_PP_CONVERTEDMOD[0]) error(257); __ARRAY_STRING_PP_CONVERTEDMOD[2]|=1; tmp_long=__ARRAY_STRING_PP_CONVERTEDMOD[5]; if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(24428);}while(r); do{ tmp_long=array_check(( 0 )-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("Initialized",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24429);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24431);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("~`",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24431);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_UBI",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24431);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24432);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("~%%",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24432);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_UBY",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24432);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24433);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("~%&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24433);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_UOF",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24433);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24434);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("~%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24434);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_UIN",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24434);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24435);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("~&&",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24435);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_UIF",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24435);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24436);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("~&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24436);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_ULO",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24436);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24437);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("`",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24437);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_BI",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24437);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24438);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("%%",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24438);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_BY",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24438);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24439);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24439);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_OF",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24439);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24440);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("%",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24440);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_IN",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24440);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24441);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("&&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24441);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_IF",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24441);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24442);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("&",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24442);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_LO",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24442);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24443);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("!",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24443);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_SI",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24443);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24444);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("##",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24444);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_FL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24444);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24445);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("#",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24445);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_DO",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24445);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24446);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("_RGB32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24446);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_RG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24446);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24447);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("_RGBA32",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24447);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_RA",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24447);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24448);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("_RED32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24448);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_RX",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24448);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24449);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("_GREEN32",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24449);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_GR",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24449);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24450);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("_BLUE32",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24450);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_BL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24450);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24451);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("_ALPHA32",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24451);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_AL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24451);}while(r); do{ *_SUB_PREPARSE_LONG_TOTALPREFIXEDPP_TYPEMOD=*_SUB_PREPARSE_LONG_I; if(!qbevent)break;evnt(24452);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24453);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("RGB32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24453);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_RG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24453);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24454);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("RGBA32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24454);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_RA",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24454);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24455);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("RED32",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24455);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_RX",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24455);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24456);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("GREEN32",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24456);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_GR",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24456);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24457);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("BLUE32",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24457);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_BL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24457);}while(r); do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(24458);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[tmp_long])),qbs_new_txt_len("ALPHA32",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24458);}while(r); do{ tmp_long=array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[tmp_long])),qbs_new_txt_len("C_AL",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24458);}while(r); do{ *_SUB_PREPARSE_LONG_TOTALPP_TYPEMOD=*_SUB_PREPARSE_LONG_I; if(!qbevent)break;evnt(24459);}while(r); do{ if (__ARRAY_STRING_PP_TYPEMOD[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_PP_TYPEMOD)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_PP_TYPEMOD[2]&1){ preserved_elements=__ARRAY_STRING_PP_TYPEMOD[5]; } else preserved_elements=0; __ARRAY_STRING_PP_TYPEMOD[4]= 0 ; __ARRAY_STRING_PP_TYPEMOD[5]=(*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_TYPEMOD[4]+1; __ARRAY_STRING_PP_TYPEMOD[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_PP_TYPEMOD[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_PP_CONVERTEDMOD[2]&1){ preserved_elements=__ARRAY_STRING_PP_CONVERTEDMOD[5]; } else preserved_elements=0; __ARRAY_STRING_PP_CONVERTEDMOD[4]= 0 ; __ARRAY_STRING_PP_CONVERTEDMOD[5]=(*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_PP_CONVERTEDMOD[4]+1; __ARRAY_STRING_PP_CONVERTEDMOD[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_PP_CONVERTEDMOD[5]; if (tmp_long2len; fornext_step3491= 1 ; if (fornext_step3491<0) fornext_step_negative3491=1; else fornext_step_negative3491=0; if (new_error) goto fornext_error3491; goto fornext_entrylabel3491; while(1){ fornext_value3491=fornext_step3491+(*_SUB_PREPARSE_LONG_I); fornext_entrylabel3491: *_SUB_PREPARSE_LONG_I=fornext_value3491; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3491){ if (fornext_value3491fornext_finalvalue3491) break; } fornext_error3491:; if(qbevent){evnt(24466);if(r)goto S_33121;} S_33122:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(_SUB_PREPARSE_STRING_E,*_SUB_PREPARSE_LONG_I, 1 ,1),qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(24467);if(r)goto S_33122;} do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(_SUB_PREPARSE_STRING_T,func_mid(_SUB_PREPARSE_STRING_E,*_SUB_PREPARSE_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24467);}while(r); } fornext_continue_3490:; } fornext_exit_3490:; do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_ucase(_SUB_PREPARSE_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24470);}while(r); S_33127:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PREPARSE_STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(24471);if(r)goto S_33127;} do{ qbs_set(_SUB_PREPARSE_STRING_E,qbs_new_txt_len("ERROR -- NULL string; nothing to evaluate",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24471);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24471);}while(r); } do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24474);}while(r); S_33132:; do{ if(qbevent){evnt(24475);if(r)goto S_33132;} do{ *_SUB_PREPARSE_LONG_L=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("(",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24476);}while(r); S_33134:; if ((*_SUB_PREPARSE_LONG_L)||new_error){ if(qbevent){evnt(24476);if(r)goto S_33134;} do{ *_SUB_PREPARSE_LONG_C=*_SUB_PREPARSE_LONG_C+ 1 ; if(!qbevent)break;evnt(24476);}while(r); } S_33137:; dl_continue_3493:; }while((!(-(*_SUB_PREPARSE_LONG_L== 0 )))&&(!new_error)); dl_exit_3493:; if(qbevent){evnt(24477);if(r)goto S_33137;} do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24478);}while(r); S_33139:; do{ if(qbevent){evnt(24479);if(r)goto S_33139;} do{ *_SUB_PREPARSE_LONG_L=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24480);}while(r); S_33141:; if ((*_SUB_PREPARSE_LONG_L)||new_error){ if(qbevent){evnt(24480);if(r)goto S_33141;} do{ *_SUB_PREPARSE_LONG_C1=*_SUB_PREPARSE_LONG_C1+ 1 ; if(!qbevent)break;evnt(24480);}while(r); } S_33144:; dl_continue_3494:; }while((!(-(*_SUB_PREPARSE_LONG_L== 0 )))&&(!new_error)); dl_exit_3494:; if(qbevent){evnt(24481);if(r)goto S_33144;} S_33145:; if ((-(*_SUB_PREPARSE_LONG_C!=*_SUB_PREPARSE_LONG_C1))||new_error){ if(qbevent){evnt(24482);if(r)goto S_33145;} do{ qbs_set(_SUB_PREPARSE_STRING_E,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ERROR -- Bad Parenthesis:",25),qbs_str((int32)(*_SUB_PREPARSE_LONG_C))),qbs_new_txt_len("( vs",4)),qbs_str((int32)(*_SUB_PREPARSE_LONG_C1))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24482);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24482);}while(r); } do{ qbs_set(_SUB_PREPARSE_STRING_SEP,qbs_new_txt_len("()+-*/\\><=^",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24485);}while(r); S_33150:; fornext_value3496= 0 ; fornext_finalvalue3496=*__LONG_CONSTLAST; fornext_step3496= 1 ; if (fornext_step3496<0) fornext_step_negative3496=1; else fornext_step_negative3496=0; if (new_error) goto fornext_error3496; goto fornext_entrylabel3496; while(1){ fornext_value3496=fornext_step3496+(*_SUB_PREPARSE_LONG_I2); fornext_entrylabel3496: *_SUB_PREPARSE_LONG_I2=fornext_value3496; if (fornext_step_negative3496){ if (fornext_value3496fornext_finalvalue3496) break; } fornext_error3496:; if(qbevent){evnt(24486);if(r)goto S_33150;} do{ qbs_set(_SUB_PREPARSE_STRING_THISCONSTNAME,((qbs*)(((uint64*)(__ARRAY_STRING_CONSTNAME[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_STRING_CONSTNAME[4],__ARRAY_STRING_CONSTNAME[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24487);}while(r); S_33152:; fornext_value3498= 1 ; fornext_finalvalue3498= 2 ; fornext_step3498= 1 ; if (fornext_step3498<0) fornext_step_negative3498=1; else fornext_step_negative3498=0; if (new_error) goto fornext_error3498; goto fornext_entrylabel3498; while(1){ fornext_value3498=fornext_step3498+(*_SUB_PREPARSE_LONG_REPLACECONSTPASS); fornext_entrylabel3498: *_SUB_PREPARSE_LONG_REPLACECONSTPASS=fornext_value3498; if (fornext_step_negative3498){ if (fornext_value3498fornext_finalvalue3498) break; } fornext_error3498:; if(qbevent){evnt(24488);if(r)goto S_33152;} do{ *_SUB_PREPARSE_LONG_FOUND= 0 ; if(!qbevent)break;evnt(24489);}while(r); S_33154:; do{ if(qbevent){evnt(24490);if(r)goto S_33154;} do{ *_SUB_PREPARSE_LONG_FOUND=func_instr(*_SUB_PREPARSE_LONG_FOUND+ 1 ,qbs_ucase(_SUB_PREPARSE_STRING_T),_SUB_PREPARSE_STRING_THISCONSTNAME,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24491);}while(r); S_33156:; if ((*_SUB_PREPARSE_LONG_FOUND)||new_error){ if(qbevent){evnt(24492);if(r)goto S_33156;} S_33157:; if ((-(*_SUB_PREPARSE_LONG_FOUND> 1 ))||new_error){ if(qbevent){evnt(24493);if(r)goto S_33157;} S_33158:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_PREPARSE_STRING_SEP,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_FOUND- 1 , 1 ,1),0)== 0 )))||new_error){ if(qbevent){evnt(24494);if(r)goto S_33158;} do{ goto dl_continue_3499; if(!qbevent)break;evnt(24494);}while(r); } } S_33162:; if ((qbs_cleanup(qbs_tmp_base,-((*_SUB_PREPARSE_LONG_FOUND+_SUB_PREPARSE_STRING_THISCONSTNAME->len)<=(_SUB_PREPARSE_STRING_T->len))))||new_error){ if(qbevent){evnt(24496);if(r)goto S_33162;} S_33163:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_PREPARSE_STRING_SEP,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_FOUND+_SUB_PREPARSE_STRING_THISCONSTNAME->len, 1 ,1),0)== 0 )))||new_error){ if(qbevent){evnt(24497);if(r)goto S_33163;} do{ goto dl_continue_3499; if(!qbevent)break;evnt(24497);}while(r); } } do{ *_SUB_PREPARSE_LONG_T=((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]; if(!qbevent)break;evnt(24499);}while(r); S_33168:; if ((*_SUB_PREPARSE_LONG_T&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(24500);if(r)goto S_33168;} do{ qbs_set(_SUB_PREPARSE_STRING_R,((qbs*)(((uint64*)(__ARRAY_STRING_CONSTSTRING[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_STRING_CONSTSTRING[4],__ARRAY_STRING_CONSTSTRING[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24501);}while(r); do{ *_SUB_PREPARSE_LONG_I4=func__instrrev(NULL,_SUB_PREPARSE_STRING_R,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24502);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_R,qbs_left(_SUB_PREPARSE_STRING_R,*_SUB_PREPARSE_LONG_I4- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24503);}while(r); }else{ S_33173:; if ((*_SUB_PREPARSE_LONG_T&*__LONG_ISFLOAT)||new_error){ if(qbevent){evnt(24505);if(r)goto S_33173;} do{ qbs_set(_SUB_PREPARSE_STRING_R,qbs_str((long double)(((long double*)(__ARRAY_FLOAT_CONSTFLOAT[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_FLOAT_CONSTFLOAT[4],__ARRAY_FLOAT_CONSTFLOAT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24506);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_R,FUNC_N2S(_SUB_PREPARSE_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24507);}while(r); }else{ S_33177:; if ((*_SUB_PREPARSE_LONG_T&*__LONG_ISUNSIGNED)||new_error){ if(qbevent){evnt(24509);if(r)goto S_33177;} do{ qbs_set(_SUB_PREPARSE_STRING_R,qbs_str((uint64)(((uint64*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_UINTEGER64_CONSTUINTEGER[4],__ARRAY_UINTEGER64_CONSTUINTEGER[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24509);}while(r); }else{ do{ qbs_set(_SUB_PREPARSE_STRING_R,qbs_str((int64)(((int64*)(__ARRAY_INTEGER64_CONSTINTEGER[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_INTEGER64_CONSTINTEGER[4],__ARRAY_INTEGER64_CONSTINTEGER[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24509);}while(r); } } } do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(qbs_add(qbs_left(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_FOUND- 1 ),qbs__trim(_SUB_PREPARSE_STRING_R)),func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_FOUND+_SUB_PREPARSE_STRING_THISCONSTNAME->len,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24512);}while(r); } S_33186:; dl_continue_3499:; }while((!(-(*_SUB_PREPARSE_LONG_FOUND== 0 )))&&(!new_error)); dl_exit_3499:; if(qbevent){evnt(24514);if(r)goto S_33186;} do{ qbs_set(_SUB_PREPARSE_STRING_THISCONSTNAME,qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_CONSTNAME[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_STRING_CONSTNAME[4],__ARRAY_STRING_CONSTNAME[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_CONSTNAMESYMBOL[0]))[array_check((*_SUB_PREPARSE_LONG_I2)-__ARRAY_STRING_CONSTNAMESYMBOL[4],__ARRAY_STRING_CONSTNAMESYMBOL[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24515);}while(r); fornext_continue_3497:; } fornext_exit_3497:; fornext_continue_3495:; } fornext_exit_3495:; do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24520);}while(r); S_33191:; do{ if(qbevent){evnt(24521);if(r)goto S_33191;} do{ *_SUB_PREPARSE_LONG_L=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("NOT ",4),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24522);}while(r); S_33193:; if ((*_SUB_PREPARSE_LONG_L)||new_error){ if(qbevent){evnt(24523);if(r)goto S_33193;} do{ *_SUB_PREPARSE_LONG_L1=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("AND",3),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24527);}while(r); S_33195:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_PREPARSE_LONG_L1== 0 ))|(((-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("OR",2),1)> 0 ))&(-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("OR",2),1)<*_SUB_PREPARSE_LONG_L1))))))||new_error){ if(qbevent){evnt(24528);if(r)goto S_33195;} do{ *_SUB_PREPARSE_LONG_L1=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("OR",2),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24528);}while(r); } S_33198:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_PREPARSE_LONG_L1== 0 ))|(((-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("XOR",3),1)> 0 ))&(-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("XOR",3),1)<*_SUB_PREPARSE_LONG_L1))))))||new_error){ if(qbevent){evnt(24529);if(r)goto S_33198;} do{ *_SUB_PREPARSE_LONG_L1=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("XOR",3),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24529);}while(r); } S_33201:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_PREPARSE_LONG_L1== 0 ))|(((-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("EQV",3),1)> 0 ))&(-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("EQV",3),1)<*_SUB_PREPARSE_LONG_L1))))))||new_error){ if(qbevent){evnt(24530);if(r)goto S_33201;} do{ *_SUB_PREPARSE_LONG_L1=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("EQV",3),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24530);}while(r); } S_33204:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_PREPARSE_LONG_L1== 0 ))|(((-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("IMP",3),1)> 0 ))&(-(func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("IMP",3),1)<*_SUB_PREPARSE_LONG_L1))))))||new_error){ if(qbevent){evnt(24531);if(r)goto S_33204;} do{ *_SUB_PREPARSE_LONG_L1=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("IMP",3),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24531);}while(r); } S_33207:; if ((-(*_SUB_PREPARSE_LONG_L1== 0 ))||new_error){ if(qbevent){evnt(24532);if(r)goto S_33207;} do{ *_SUB_PREPARSE_LONG_L1=_SUB_PREPARSE_STRING_T->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24532);}while(r); } do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(qbs_add(qbs_add(qbs_add(qbs_left(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L- 1 ),qbs_new_txt_len("(",1)),func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L,*_SUB_PREPARSE_LONG_L1-*_SUB_PREPARSE_LONG_L,1)),qbs_new_txt_len(")",1)),func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L+*_SUB_PREPARSE_LONG_L1-*_SUB_PREPARSE_LONG_L,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24533);}while(r); do{ *_SUB_PREPARSE_LONG_L=*_SUB_PREPARSE_LONG_L+ 3 ; if(!qbevent)break;evnt(24534);}while(r); } S_33213:; dl_continue_3504:; }while((!(-(*_SUB_PREPARSE_LONG_L== 0 )))&&(!new_error)); dl_exit_3504:; if(qbevent){evnt(24537);if(r)goto S_33213;} do{ *_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD=*_SUB_PREPARSE_LONG_TOTALPREFIXEDPP_TYPEMOD; if(!qbevent)break;evnt(24539);}while(r); S_33215:; if ((-(*__LONG_QB64PREFIX_SET== 1 ))||new_error){ if(qbevent){evnt(24540);if(r)goto S_33215;} do{ *_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD=*_SUB_PREPARSE_LONG_TOTALPP_TYPEMOD; if(!qbevent)break;evnt(24540);}while(r); } S_33218:; fornext_value3507= 1 ; fornext_finalvalue3507=*_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD; fornext_step3507= 1 ; if (fornext_step3507<0) fornext_step_negative3507=1; else fornext_step_negative3507=0; if (new_error) goto fornext_error3507; goto fornext_entrylabel3507; while(1){ fornext_value3507=fornext_step3507+(*_SUB_PREPARSE_LONG_J); fornext_entrylabel3507: *_SUB_PREPARSE_LONG_J=fornext_value3507; if (fornext_step_negative3507){ if (fornext_value3507fornext_finalvalue3507) break; } fornext_error3507:; if(qbevent){evnt(24541);if(r)goto S_33218;} do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24542);}while(r); S_33220:; do{ if(qbevent){evnt(24543);if(r)goto S_33220;} do{ *_SUB_PREPARSE_LONG_L=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[array_check((*_SUB_PREPARSE_LONG_J)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5])])),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24544);}while(r); S_33222:; if ((-(*_SUB_PREPARSE_LONG_L== 0 ))||new_error){ if(qbevent){evnt(24545);if(r)goto S_33222;} do{ goto dl_exit_3508; if(!qbevent)break;evnt(24545);}while(r); } do{ *_SUB_PREPARSE_LONG_I= 0 ; if(!qbevent)break;evnt(24546);}while(r); do{ *_SUB_PREPARSE_LONG_L1= 0 ; if(!qbevent)break;evnt(24546);}while(r); do{ *_SUB_PREPARSE_LONG_L2= 0 ; if(!qbevent)break;evnt(24546);}while(r); do{ *_SUB_PREPARSE_LONG_LO=((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[array_check((*_SUB_PREPARSE_LONG_J)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5])]))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24546);}while(r); S_33229:; do{ if(qbevent){evnt(24547);if(r)goto S_33229;} S_33230:; if ((-(((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]> 10 ))||new_error){ if(qbevent){evnt(24548);if(r)goto S_33230;} do{ *_SUB_PREPARSE_LONG_L2=func__instrrev(*_SUB_PREPARSE_LONG_L,_SUB_PREPARSE_STRING_T,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24549);}while(r); S_33232:; if (((-(*_SUB_PREPARSE_LONG_L2> 0 ))&(-(*_SUB_PREPARSE_LONG_L2>*_SUB_PREPARSE_LONG_L1)))||new_error){ if(qbevent){evnt(24550);if(r)goto S_33232;} do{ *_SUB_PREPARSE_LONG_L1=*_SUB_PREPARSE_LONG_L2; if(!qbevent)break;evnt(24550);}while(r); } } do{ *_SUB_PREPARSE_LONG_I=*_SUB_PREPARSE_LONG_I+*_SUB_PREPARSE_LONG_LO; if(!qbevent)break;evnt(24552);}while(r); S_33237:; dl_continue_3510:; }while((!(-(*_SUB_PREPARSE_LONG_I>func_ubound(__ARRAY_INTEGER_PL,1,1))))&&(!new_error)); dl_exit_3510:; if(qbevent){evnt(24553);if(r)goto S_33237;} do{ qbs_set(_SUB_PREPARSE_STRING_L,qbs_left(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24554);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_M,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L1+ 1 ,*_SUB_PREPARSE_LONG_L-*_SUB_PREPARSE_LONG_L1- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24555);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_R,qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_PP_CONVERTEDMOD[0]))[array_check((*_SUB_PREPARSE_LONG_J)-__ARRAY_STRING_PP_CONVERTEDMOD[4],__ARRAY_STRING_PP_CONVERTEDMOD[5])])),func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L+*_SUB_PREPARSE_LONG_LO,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24556);}while(r); S_33241:; if ((-(*_SUB_PREPARSE_LONG_J> 15 ))||new_error){ if(qbevent){evnt(24557);if(r)goto S_33241;} do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(qbs_add(_SUB_PREPARSE_STRING_L,_SUB_PREPARSE_STRING_M),_SUB_PREPARSE_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24558);}while(r); }else{ do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_PREPARSE_STRING_L,qbs_new_txt_len("(",1)),_SUB_PREPARSE_STRING_M),qbs_new_txt_len(")",1)),_SUB_PREPARSE_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24561);}while(r); } do{ *_SUB_PREPARSE_LONG_L=*_SUB_PREPARSE_LONG_L+ 2 +((qbs*)(((uint64*)(__ARRAY_STRING_PP_TYPEMOD[0]))[array_check((*_SUB_PREPARSE_LONG_J)-__ARRAY_STRING_PP_TYPEMOD[4],__ARRAY_STRING_PP_TYPEMOD[5])]))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24563);}while(r); dl_continue_3508:; }while(1); dl_exit_3508:; fornext_continue_3506:; } fornext_exit_3506:; do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24568);}while(r); S_33250:; do{ if(qbevent){evnt(24569);if(r)goto S_33250;} do{ *_SUB_PREPARSE_LONG_L=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("(",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24570);}while(r); S_33252:; if (((-(*_SUB_PREPARSE_LONG_L> 0 ))&(-(*_SUB_PREPARSE_LONG_L> 2 )))||new_error){ if(qbevent){evnt(24571);if(r)goto S_33252;} do{ *_SUB_PREPARSE_LONG_GOOD= 0 ; if(!qbevent)break;evnt(24572);}while(r); S_33254:; fornext_value3514= 1 ; fornext_finalvalue3514=func_ubound(__ARRAY_STRING_ONAME,1,1); fornext_step3514= 1 ; if (fornext_step3514<0) fornext_step_negative3514=1; else fornext_step_negative3514=0; if (new_error) goto fornext_error3514; goto fornext_entrylabel3514; while(1){ fornext_value3514=fornext_step3514+(*_SUB_PREPARSE_LONG_I); fornext_entrylabel3514: *_SUB_PREPARSE_LONG_I=fornext_value3514; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3514){ if (fornext_value3514fornext_finalvalue3514) break; } fornext_error3514:; if(qbevent){evnt(24573);if(r)goto S_33254;} do{ qbs_set(_SUB_PREPARSE_STRING_M,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L-((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24574);}while(r); S_33256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PREPARSE_STRING_M,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])))))||new_error){ if(qbevent){evnt(24575);if(r)goto S_33256;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24576);}while(r); do{ goto fornext_exit_3513; if(!qbevent)break;evnt(24576);}while(r); }else{ S_33260:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 1 ),qbs_new_txt_len("_",1)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(24578);if(r)goto S_33260;} do{ qbs_set(_SUB_PREPARSE_STRING_M,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L-(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len- 1 ),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24580);}while(r); S_33262:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PREPARSE_STRING_M,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 2 ,NULL,0))))||new_error){ if(qbevent){evnt(24581);if(r)goto S_33262;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24581);}while(r); do{ goto fornext_exit_3513; if(!qbevent)break;evnt(24581);}while(r); } } } fornext_continue_3513:; } fornext_exit_3513:; S_33269:; if ((~(*_SUB_PREPARSE_LONG_GOOD))||new_error){ if(qbevent){evnt(24585);if(r)goto S_33269;} do{ qbs_set(_SUB_PREPARSE_STRING_E,qbs_new_txt_len("ERROR - Improper operations before (.",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24585);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24585);}while(r); } do{ *_SUB_PREPARSE_LONG_L=*_SUB_PREPARSE_LONG_L+ 1 ; if(!qbevent)break;evnt(24586);}while(r); } S_33275:; dl_continue_3512:; }while((!(-(*_SUB_PREPARSE_LONG_L== 0 )))&&(!new_error)); dl_exit_3512:; if(qbevent){evnt(24588);if(r)goto S_33275;} do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24591);}while(r); S_33277:; do{ if(qbevent){evnt(24592);if(r)goto S_33277;} do{ *_SUB_PREPARSE_LONG_L=func_instr(*_SUB_PREPARSE_LONG_L+ 1 ,_SUB_PREPARSE_STRING_T,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24593);}while(r); S_33279:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_PREPARSE_LONG_L> 0 ))&(-(*_SUB_PREPARSE_LONG_L<_SUB_PREPARSE_STRING_T->len))))||new_error){ if(qbevent){evnt(24594);if(r)goto S_33279;} do{ *_SUB_PREPARSE_LONG_GOOD= 0 ; if(!qbevent)break;evnt(24595);}while(r); S_33281:; fornext_value3522= 1 ; fornext_finalvalue3522=func_ubound(__ARRAY_STRING_ONAME,1,1); fornext_step3522= 1 ; if (fornext_step3522<0) fornext_step_negative3522=1; else fornext_step_negative3522=0; if (new_error) goto fornext_error3522; goto fornext_entrylabel3522; while(1){ fornext_value3522=fornext_step3522+(*_SUB_PREPARSE_LONG_I); fornext_entrylabel3522: *_SUB_PREPARSE_LONG_I=fornext_value3522; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3522){ if (fornext_value3522fornext_finalvalue3522) break; } fornext_error3522:; if(qbevent){evnt(24596);if(r)goto S_33281;} do{ qbs_set(_SUB_PREPARSE_STRING_M,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L+ 1 ,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24597);}while(r); S_33283:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PREPARSE_STRING_M,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])))))||new_error){ if(qbevent){evnt(24598);if(r)goto S_33283;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24599);}while(r); do{ goto fornext_exit_3521; if(!qbevent)break;evnt(24599);}while(r); }else{ S_33287:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 1 ),qbs_new_txt_len("_",1)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(24601);if(r)goto S_33287;} do{ qbs_set(_SUB_PREPARSE_STRING_M,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L+ 1 ,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24603);}while(r); S_33289:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PREPARSE_STRING_M,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 2 ,NULL,0))))||new_error){ if(qbevent){evnt(24604);if(r)goto S_33289;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24604);}while(r); do{ goto fornext_exit_3521; if(!qbevent)break;evnt(24604);}while(r); } } } fornext_continue_3521:; } fornext_exit_3521:; S_33296:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L+ 1 , 1 ,1),qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(24608);if(r)goto S_33296;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24608);}while(r); } S_33299:; if ((~(*_SUB_PREPARSE_LONG_GOOD))||new_error){ if(qbevent){evnt(24609);if(r)goto S_33299;} do{ qbs_set(_SUB_PREPARSE_STRING_E,qbs_new_txt_len("ERROR - Improper operations after ).",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24609);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24609);}while(r); } do{ *_SUB_PREPARSE_LONG_L=*_SUB_PREPARSE_LONG_L+ 1 ; if(!qbevent)break;evnt(24610);}while(r); } S_33305:; dl_continue_3519:; }while((!(qbs_cleanup(qbs_tmp_base,(-(*_SUB_PREPARSE_LONG_L== 0 ))|(-(*_SUB_PREPARSE_LONG_L==_SUB_PREPARSE_STRING_T->len)))))&&(!new_error)); dl_exit_3519:; if(qbevent){evnt(24612);if(r)goto S_33305;} do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24615);}while(r); S_33307:; do{ if(qbevent){evnt(24616);if(r)goto S_33307;} do{ *_SUB_PREPARSE_LONG_L=func_instr(NULL,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("&H",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24617);}while(r); S_33309:; if ((*_SUB_PREPARSE_LONG_L)||new_error){ if(qbevent){evnt(24618);if(r)goto S_33309;} do{ *__LONG_E=*_SUB_PREPARSE_LONG_L+ 1 ; if(!qbevent)break;evnt(24619);}while(r); do{ *_SUB_PREPARSE_LONG_FINISHED= 0 ; if(!qbevent)break;evnt(24619);}while(r); S_33312:; do{ if(qbevent){evnt(24620);if(r)goto S_33312;} do{ *__LONG_E=*__LONG_E+ 1 ; if(!qbevent)break;evnt(24621);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_COMP,func_mid(_SUB_PREPARSE_STRING_T,*__LONG_E, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24622);}while(r); S_33315:; if(qbevent){evnt(24623);if(r)goto S_33315;} S_33316:; if ((qbs_cleanup(qbs_tmp_base,(qbs_greaterorequal(_SUB_PREPARSE_STRING_COMP,qbs_new_txt_len("0",1))&&qbs_lessorequal(_SUB_PREPARSE_STRING_COMP,qbs_new_txt_len("9",1)))||(qbs_greaterorequal(_SUB_PREPARSE_STRING_COMP,qbs_new_txt_len("A",1))&&qbs_lessorequal(_SUB_PREPARSE_STRING_COMP,qbs_new_txt_len("F",1)))))||new_error){ if(qbevent){evnt(24624);if(r)goto S_33316;} sc_ec_157_end:; goto sc_3528_end; } do{ *_SUB_PREPARSE_LONG_GOOD= 0 ; if(!qbevent)break;evnt(24626);}while(r); S_33319:; fornext_value3530= 1 ; fornext_finalvalue3530=func_ubound(__ARRAY_STRING_ONAME,1,1); fornext_step3530= 1 ; if (fornext_step3530<0) fornext_step_negative3530=1; else fornext_step_negative3530=0; if (new_error) goto fornext_error3530; goto fornext_entrylabel3530; while(1){ fornext_value3530=fornext_step3530+(*_SUB_PREPARSE_LONG_I); fornext_entrylabel3530: *_SUB_PREPARSE_LONG_I=fornext_value3530; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3530){ if (fornext_value3530fornext_finalvalue3530) break; } fornext_error3530:; if(qbevent){evnt(24627);if(r)goto S_33319;} S_33320:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_PREPARSE_STRING_T,*__LONG_E,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,1),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))))&(-(((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]> 1 ))&(-(((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]<= 250 ))))||new_error){ if(qbevent){evnt(24628);if(r)goto S_33320;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24628);}while(r); do{ goto fornext_exit_3529; if(!qbevent)break;evnt(24628);}while(r); } fornext_continue_3529:; } fornext_exit_3529:; S_33325:; if ((~(*_SUB_PREPARSE_LONG_GOOD))||new_error){ if(qbevent){evnt(24630);if(r)goto S_33325;} do{ qbs_set(_SUB_PREPARSE_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Improper &H value. (",28),_SUB_PREPARSE_STRING_COMP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24630);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24630);}while(r); } do{ *__LONG_E=*__LONG_E- 1 ; if(!qbevent)break;evnt(24631);}while(r); do{ *_SUB_PREPARSE_LONG_FINISHED= -1 ; if(!qbevent)break;evnt(24632);}while(r); sc_3528_end:; S_33332:; dl_continue_3527:; }while((!(qbs_cleanup(qbs_tmp_base,*_SUB_PREPARSE_LONG_FINISHED|(-(*__LONG_E==_SUB_PREPARSE_STRING_T->len)))))&&(!new_error)); dl_exit_3527:; if(qbevent){evnt(24634);if(r)goto S_33332;} do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(qbs_add(qbs_left(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L- 1 ),qbs_ltrim(qbs_rtrim(qbs_str((long double)(func_val(func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L,*__LONG_E-*_SUB_PREPARSE_LONG_L+ 1 ,1))))))),func_mid(_SUB_PREPARSE_STRING_T,*__LONG_E+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24635);}while(r); } S_33335:; dl_continue_3526:; }while((!(-(*_SUB_PREPARSE_LONG_L== 0 )))&&(!new_error)); dl_exit_3526:; if(qbevent){evnt(24637);if(r)goto S_33335;} do{ *_SUB_PREPARSE_LONG_L= 0 ; if(!qbevent)break;evnt(24640);}while(r); S_33337:; do{ if(qbevent){evnt(24641);if(r)goto S_33337;} do{ *_SUB_PREPARSE_LONG_L=func_instr(NULL,_SUB_PREPARSE_STRING_T,qbs_new_txt_len("&B",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24642);}while(r); S_33339:; if ((*_SUB_PREPARSE_LONG_L)||new_error){ if(qbevent){evnt(24643);if(r)goto S_33339;} do{ *__LONG_E=*_SUB_PREPARSE_LONG_L+ 1 ; if(!qbevent)break;evnt(24644);}while(r); do{ *_SUB_PREPARSE_LONG_FINISHED= 0 ; if(!qbevent)break;evnt(24644);}while(r); S_33342:; do{ if(qbevent){evnt(24645);if(r)goto S_33342;} do{ *__LONG_E=*__LONG_E+ 1 ; if(!qbevent)break;evnt(24646);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_COMP,func_mid(_SUB_PREPARSE_STRING_T,*__LONG_E, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24647);}while(r); S_33345:; if(qbevent){evnt(24648);if(r)goto S_33345;} S_33346:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PREPARSE_STRING_COMP,qbs_new_txt_len("0",1))||qbs_equal(_SUB_PREPARSE_STRING_COMP,qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(24649);if(r)goto S_33346;} sc_ec_158_end:; goto sc_3535_end; } do{ *_SUB_PREPARSE_LONG_GOOD= 0 ; if(!qbevent)break;evnt(24651);}while(r); S_33349:; fornext_value3537= 1 ; fornext_finalvalue3537=func_ubound(__ARRAY_STRING_ONAME,1,1); fornext_step3537= 1 ; if (fornext_step3537<0) fornext_step_negative3537=1; else fornext_step_negative3537=0; if (new_error) goto fornext_error3537; goto fornext_entrylabel3537; while(1){ fornext_value3537=fornext_step3537+(*_SUB_PREPARSE_LONG_I); fornext_entrylabel3537: *_SUB_PREPARSE_LONG_I=fornext_value3537; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3537){ if (fornext_value3537fornext_finalvalue3537) break; } fornext_error3537:; if(qbevent){evnt(24652);if(r)goto S_33349;} S_33350:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_PREPARSE_STRING_T,*__LONG_E,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,1),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))))&(-(((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]> 1 ))&(-(((int16*)(__ARRAY_INTEGER_PL[0]))[array_check((*_SUB_PREPARSE_LONG_I)-__ARRAY_INTEGER_PL[4],__ARRAY_INTEGER_PL[5])]<= 250 ))))||new_error){ if(qbevent){evnt(24653);if(r)goto S_33350;} do{ *_SUB_PREPARSE_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24653);}while(r); do{ goto fornext_exit_3536; if(!qbevent)break;evnt(24653);}while(r); } fornext_continue_3536:; } fornext_exit_3536:; S_33355:; if ((~(*_SUB_PREPARSE_LONG_GOOD))||new_error){ if(qbevent){evnt(24655);if(r)goto S_33355;} do{ qbs_set(_SUB_PREPARSE_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Improper &B value. (",28),_SUB_PREPARSE_STRING_COMP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24655);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24655);}while(r); } do{ *__LONG_E=*__LONG_E- 1 ; if(!qbevent)break;evnt(24656);}while(r); do{ *_SUB_PREPARSE_LONG_FINISHED= -1 ; if(!qbevent)break;evnt(24657);}while(r); sc_3535_end:; S_33362:; dl_continue_3534:; }while((!(qbs_cleanup(qbs_tmp_base,*_SUB_PREPARSE_LONG_FINISHED|(-(*__LONG_E==_SUB_PREPARSE_STRING_T->len)))))&&(!new_error)); dl_exit_3534:; if(qbevent){evnt(24659);if(r)goto S_33362;} do{ qbs_set(_SUB_PREPARSE_STRING_BIN,func_mid(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L+ 2 ,*__LONG_E-*_SUB_PREPARSE_LONG_L- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24660);}while(r); S_33364:; fornext_value3541= 1 ; fornext_finalvalue3541=_SUB_PREPARSE_STRING_BIN->len; 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+(*_SUB_PREPARSE_LONG_I); fornext_entrylabel3541: *_SUB_PREPARSE_LONG_I=fornext_value3541; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3541){ if (fornext_value3541fornext_finalvalue3541) break; } fornext_error3541:; if(qbevent){evnt(24661);if(r)goto S_33364;} S_33365:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_PREPARSE_STRING_BIN,*_SUB_PREPARSE_LONG_I, 1 ,1),qbs_new_txt_len("1",1))))||new_error){ if(qbevent){evnt(24662);if(r)goto S_33365;} do{ *_SUB_PREPARSE_FLOAT_F=*_SUB_PREPARSE_FLOAT_F+(pow2( 2 ,(_SUB_PREPARSE_STRING_BIN->len-*_SUB_PREPARSE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24662);}while(r); } fornext_continue_3540:; } fornext_exit_3540:; do{ qbs_set(_SUB_PREPARSE_STRING_T,qbs_add(qbs_add(qbs_left(_SUB_PREPARSE_STRING_T,*_SUB_PREPARSE_LONG_L- 1 ),qbs_ltrim(qbs_rtrim(qbs_str((long double)(*_SUB_PREPARSE_FLOAT_F))))),func_mid(_SUB_PREPARSE_STRING_T,*__LONG_E+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24664);}while(r); } S_33371:; dl_continue_3533:; }while((!(-(*_SUB_PREPARSE_LONG_L== 0 )))&&(!new_error)); dl_exit_3533:; if(qbevent){evnt(24666);if(r)goto S_33371;} do{ SUB_VERIFYSTRING(_SUB_PREPARSE_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24670);}while(r); do{ qbs_set(_SUB_PREPARSE_STRING_E,_SUB_PREPARSE_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24671);}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_VERIFYSTRING(qbs*_SUB_VERIFYSTRING_STRING_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 "data73.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_VERIFYSTRING_LONG_J= 1 ; if(!qbevent)break;evnt(24678);}while(r); S_33375:; do{ if(qbevent){evnt(24679);if(r)goto S_33375;} do{ qbs_set(_SUB_VERIFYSTRING_STRING_COMP,func_mid(_SUB_VERIFYSTRING_STRING_T,*_SUB_VERIFYSTRING_LONG_J, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24680);}while(r); S_33377:; if(qbevent){evnt(24681);if(r)goto S_33377;} S_33378:; if ((qbs_cleanup(qbs_tmp_base,(qbs_greaterorequal(_SUB_VERIFYSTRING_STRING_COMP,qbs_new_txt_len("0",1))&&qbs_lessorequal(_SUB_VERIFYSTRING_STRING_COMP,qbs_new_txt_len("9",1)))||qbs_equal(_SUB_VERIFYSTRING_STRING_COMP,qbs_new_txt_len(".",1))||qbs_equal(_SUB_VERIFYSTRING_STRING_COMP,qbs_new_txt_len("(",1))||qbs_equal(_SUB_VERIFYSTRING_STRING_COMP,qbs_new_txt_len(")",1))||qbs_equal(_SUB_VERIFYSTRING_STRING_COMP,qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(24682);if(r)goto S_33378;} do{ *_SUB_VERIFYSTRING_LONG_J=*_SUB_VERIFYSTRING_LONG_J+ 1 ; if(!qbevent)break;evnt(24682);}while(r); sc_ec_159_end:; goto sc_3546_end; } do{ *_SUB_VERIFYSTRING_LONG_GOOD= 0 ; if(!qbevent)break;evnt(24684);}while(r); do{ *_SUB_VERIFYSTRING_LONG_EXTRACHAR= 0 ; if(!qbevent)break;evnt(24685);}while(r); S_33383:; fornext_value3548= 1 ; fornext_finalvalue3548=func_ubound(__ARRAY_STRING_ONAME,1,1); fornext_step3548= 1 ; if (fornext_step3548<0) fornext_step_negative3548=1; else fornext_step_negative3548=0; if (new_error) goto fornext_error3548; goto fornext_entrylabel3548; while(1){ fornext_value3548=fornext_step3548+(*_SUB_VERIFYSTRING_LONG_I); fornext_entrylabel3548: *_SUB_VERIFYSTRING_LONG_I=fornext_value3548; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3548){ if (fornext_value3548fornext_finalvalue3548) break; } fornext_error3548:; if(qbevent){evnt(24686);if(r)goto S_33383;} S_33384:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_VERIFYSTRING_STRING_T,*_SUB_VERIFYSTRING_LONG_J,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_VERIFYSTRING_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len,1),((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_VERIFYSTRING_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])))))||new_error){ if(qbevent){evnt(24687);if(r)goto S_33384;} do{ *_SUB_VERIFYSTRING_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24688);}while(r); do{ goto fornext_exit_3547; if(!qbevent)break;evnt(24688);}while(r); }else{ S_33388:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_VERIFYSTRING_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 1 ),qbs_new_txt_len("_",1)))&(-(*__LONG_QB64PREFIX_SET== 1 ))))||new_error){ if(qbevent){evnt(24690);if(r)goto S_33388;} S_33389:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_VERIFYSTRING_STRING_T,*_SUB_VERIFYSTRING_LONG_J,((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_VERIFYSTRING_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len- 1 ,1),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_VERIFYSTRING_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])])), 2 ,NULL,0))))||new_error){ if(qbevent){evnt(24692);if(r)goto S_33389;} do{ *_SUB_VERIFYSTRING_LONG_GOOD= -1 ; if(!qbevent)break;evnt(24693);}while(r); do{ *_SUB_VERIFYSTRING_LONG_EXTRACHAR= 1 ; if(!qbevent)break;evnt(24693);}while(r); do{ goto fornext_exit_3547; if(!qbevent)break;evnt(24693);}while(r); } } } fornext_continue_3547:; } fornext_exit_3547:; S_33397:; if ((~(*_SUB_VERIFYSTRING_LONG_GOOD))||new_error){ if(qbevent){evnt(24698);if(r)goto S_33397;} do{ qbs_set(_SUB_VERIFYSTRING_STRING_T,qbs_add(qbs_add(qbs_new_txt_len("ERROR - Bad Operational value. (",32),_SUB_VERIFYSTRING_STRING_COMP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24698);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24698);}while(r); } do{ *_SUB_VERIFYSTRING_LONG_J=*_SUB_VERIFYSTRING_LONG_J+(((qbs*)(((uint64*)(__ARRAY_STRING_ONAME[0]))[array_check((*_SUB_VERIFYSTRING_LONG_I)-__ARRAY_STRING_ONAME[4],__ARRAY_STRING_ONAME[5])]))->len-*_SUB_VERIFYSTRING_LONG_EXTRACHAR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24699);}while(r); sc_3546_end:; S_33403:; dl_continue_3545:; }while((!(qbs_cleanup(qbs_tmp_base,-(*_SUB_VERIFYSTRING_LONG_J>_SUB_VERIFYSTRING_STRING_T->len))))&&(!new_error)); dl_exit_3545:; if(qbevent){evnt(24701);if(r)goto S_33403;} 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_N2S(qbs*_FUNC_N2S_STRING_EXP){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_N2S_STRING_T,qbs_ltrim(qbs_rtrim(_FUNC_N2S_STRING_EXP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24706);}while(r); S_33405:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_N2S_STRING_T, 1 ),qbs_new_txt_len("-",1)))|(qbs_equal(qbs_left(_FUNC_N2S_STRING_T, 1 ),qbs_new_txt_len("N",1)))))||new_error){ if(qbevent){evnt(24707);if(r)goto S_33405;} do{ qbs_set(_FUNC_N2S_STRING_SIGN,qbs_new_txt_len("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24707);}while(r); do{ qbs_set(_FUNC_N2S_STRING_T,func_mid(_FUNC_N2S_STRING_T, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24707);}while(r); } do{ *_FUNC_N2S_LONG_DP=func_instr(NULL,_FUNC_N2S_STRING_T,qbs_new_txt_len("D+",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24709);}while(r); do{ *_FUNC_N2S_LONG_DM=func_instr(NULL,_FUNC_N2S_STRING_T,qbs_new_txt_len("D-",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24709);}while(r); do{ *_FUNC_N2S_LONG_EP=func_instr(NULL,_FUNC_N2S_STRING_T,qbs_new_txt_len("E+",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24710);}while(r); do{ *_FUNC_N2S_LONG_EM=func_instr(NULL,_FUNC_N2S_STRING_T,qbs_new_txt_len("E-",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24710);}while(r); do{ *_FUNC_N2S_LONG_CHECK1=func_sgn((int32)(*_FUNC_N2S_LONG_DP))+func_sgn((int32)(*_FUNC_N2S_LONG_DM))+func_sgn((int32)(*_FUNC_N2S_LONG_EP))+func_sgn((int32)(*_FUNC_N2S_LONG_EM)); if(!qbevent)break;evnt(24711);}while(r); S_33414:; if (((-(*_FUNC_N2S_LONG_CHECK1< 1 ))|(-(*_FUNC_N2S_LONG_CHECK1> 1 )))||new_error){ if(qbevent){evnt(24712);if(r)goto S_33414;} do{ qbs_set(_FUNC_N2S_STRING_N2S,_FUNC_N2S_STRING_EXP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24712);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24712);}while(r); } S_33418:; if(qbevent){evnt(24714);if(r)goto S_33418;} S_33419:; if (((*_FUNC_N2S_LONG_L<(*_FUNC_N2S_LONG_DP)))||new_error){ if(qbevent){evnt(24715);if(r)goto S_33419;} do{ *_FUNC_N2S_LONG_L=*_FUNC_N2S_LONG_DP; if(!qbevent)break;evnt(24715);}while(r); sc_ec_160_end:; goto sc_3554_end; } S_33421:; if (((*_FUNC_N2S_LONG_L<(*_FUNC_N2S_LONG_DM)))||new_error){ if(qbevent){evnt(24716);if(r)goto S_33421;} do{ *_FUNC_N2S_LONG_L=*_FUNC_N2S_LONG_DM; if(!qbevent)break;evnt(24716);}while(r); sc_ec_161_end:; goto sc_3554_end; } S_33423:; if (((*_FUNC_N2S_LONG_L<(*_FUNC_N2S_LONG_EP)))||new_error){ if(qbevent){evnt(24717);if(r)goto S_33423;} do{ *_FUNC_N2S_LONG_L=*_FUNC_N2S_LONG_EP; if(!qbevent)break;evnt(24717);}while(r); sc_ec_162_end:; goto sc_3554_end; } S_33425:; if (((*_FUNC_N2S_LONG_L<(*_FUNC_N2S_LONG_EM)))||new_error){ if(qbevent){evnt(24718);if(r)goto S_33425;} do{ *_FUNC_N2S_LONG_L=*_FUNC_N2S_LONG_EM; if(!qbevent)break;evnt(24718);}while(r); sc_ec_163_end:; goto sc_3554_end; } sc_3554_end:; do{ qbs_set(_FUNC_N2S_STRING_L,qbs_left(_FUNC_N2S_STRING_T,*_FUNC_N2S_LONG_L- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24721);}while(r); do{ qbs_set(_FUNC_N2S_STRING_R,func_mid(_FUNC_N2S_STRING_T,*_FUNC_N2S_LONG_L+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24722);}while(r); do{ *_FUNC_N2S_INTEGER64_R=qbr(func_val(_FUNC_N2S_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24722);}while(r); S_33431:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_N2S_STRING_L,qbs_new_txt_len(".",1),0)))||new_error){ if(qbevent){evnt(24725);if(r)goto S_33431;} S_33432:; if ((-(*_FUNC_N2S_INTEGER64_R> 0 ))||new_error){ if(qbevent){evnt(24726);if(r)goto S_33432;} do{ *_FUNC_N2S_INTEGER64_R=*_FUNC_N2S_INTEGER64_R-_FUNC_N2S_STRING_L->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24727);}while(r); }else{ do{ *_FUNC_N2S_INTEGER64_R=*_FUNC_N2S_INTEGER64_R+ 1 ; if(!qbevent)break;evnt(24729);}while(r); } do{ qbs_set(_FUNC_N2S_STRING_L,qbs_add(qbs_left(_FUNC_N2S_STRING_L, 1 ),func_mid(_FUNC_N2S_STRING_L, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24731);}while(r); } S_33439:; if(qbevent){evnt(24734);if(r)goto S_33439;} S_33440:; if (((*_FUNC_N2S_INTEGER64_R==( 0 )))||new_error){ if(qbevent){evnt(24735);if(r)goto S_33440;} sc_ec_164_end:; goto sc_3556_end; } S_33441:; if (((*_FUNC_N2S_INTEGER64_R<( 0 )))||new_error){ if(qbevent){evnt(24737);if(r)goto S_33441;} S_33442:; fornext_value3558= 1 ; fornext_finalvalue3558=-(*_FUNC_N2S_INTEGER64_R); fornext_step3558= 1 ; if (fornext_step3558<0) fornext_step_negative3558=1; else fornext_step_negative3558=0; if (new_error) goto fornext_error3558; goto fornext_entrylabel3558; while(1){ fornext_value3558=fornext_step3558+(*_FUNC_N2S_LONG_I); fornext_entrylabel3558: *_FUNC_N2S_LONG_I=fornext_value3558; if (fornext_step_negative3558){ if (fornext_value3558fornext_finalvalue3558) break; } fornext_error3558:; if(qbevent){evnt(24738);if(r)goto S_33442;} do{ qbs_set(_FUNC_N2S_STRING_L,qbs_add(qbs_new_txt_len("0",1),_FUNC_N2S_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24739);}while(r); fornext_continue_3557:; } fornext_exit_3557:; do{ qbs_set(_FUNC_N2S_STRING_L,qbs_add(qbs_new_txt_len("0.",2),_FUNC_N2S_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24741);}while(r); sc_ec_165_end:; goto sc_3556_end; } S_33447:; fornext_value3560= 1 ; fornext_finalvalue3560=*_FUNC_N2S_INTEGER64_R; fornext_step3560= 1 ; if (fornext_step3560<0) fornext_step_negative3560=1; else fornext_step_negative3560=0; if (new_error) goto fornext_error3560; goto fornext_entrylabel3560; while(1){ fornext_value3560=fornext_step3560+(*_FUNC_N2S_LONG_I); fornext_entrylabel3560: *_FUNC_N2S_LONG_I=fornext_value3560; if (fornext_step_negative3560){ if (fornext_value3560fornext_finalvalue3560) break; } fornext_error3560:; if(qbevent){evnt(24743);if(r)goto S_33447;} do{ qbs_set(_FUNC_N2S_STRING_L,qbs_add(_FUNC_N2S_STRING_L,qbs_new_txt_len("0",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24744);}while(r); fornext_continue_3559:; } fornext_exit_3559:; sc_3556_end:; do{ qbs_set(_FUNC_N2S_STRING_N2S,qbs_add(_FUNC_N2S_STRING_SIGN,_FUNC_N2S_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24748);}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_N2S_STRING_N2S);return _FUNC_N2S_STRING_N2S; } qbs* FUNC_QUOTEDFILENAME(qbs*_FUNC_QUOTEDFILENAME_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 "data75.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_33452:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(24754);if(r)goto S_33452;} do{ qbs_set(_FUNC_QUOTEDFILENAME_STRING_QUOTEDFILENAME,qbs_add(qbs_add(func_chr( 34 ),_FUNC_QUOTEDFILENAME_STRING_F),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24755);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24756);}while(r); } S_33456:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(24759);if(r)goto S_33456;} do{ qbs_set(_FUNC_QUOTEDFILENAME_STRING_QUOTEDFILENAME,qbs_add(qbs_add(qbs_new_txt_len("'",1),_FUNC_QUOTEDFILENAME_STRING_F),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24760);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24761);}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_QUOTEDFILENAME_STRING_QUOTEDFILENAME);return _FUNC_QUOTEDFILENAME_STRING_QUOTEDFILENAME; } 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 "data76.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_HASHVALUE_LONG_L=_FUNC_HASHVALUE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24769);}while(r); S_33461:; if ((-(*_FUNC_HASHVALUE_LONG_L== 0 ))||new_error){ if(qbevent){evnt(24770);if(r)goto S_33461;} do{ goto exit_subfunc; if(!qbevent)break;evnt(24770);}while(r); } do{ *_FUNC_HASHVALUE_LONG_A=qbs_asc(_FUNC_HASHVALUE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24771);}while(r); S_33465:; if ((-(*_FUNC_HASHVALUE_LONG_A!= 95 ))||new_error){ if(qbevent){evnt(24772);if(r)goto S_33465;} S_33466:; if(qbevent){evnt(24773);if(r)goto S_33466;} S_33467:; if (((*_FUNC_HASHVALUE_LONG_L==( 1 )))||new_error){ if(qbevent){evnt(24774);if(r)goto S_33467;} 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(24775);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24776);}while(r); sc_ec_166_end:; goto sc_3564_end; } S_33470:; if (((*_FUNC_HASHVALUE_LONG_L==( 2 )))||new_error){ if(qbevent){evnt(24777);if(r)goto S_33470;} 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(24778);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24779);}while(r); sc_ec_167_end:; goto sc_3564_end; } S_33473:; if (((*_FUNC_HASHVALUE_LONG_L==( 3 )))||new_error){ if(qbevent){evnt(24780);if(r)goto S_33473;} 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(24781);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24782);}while(r); sc_ec_168_end:; goto sc_3564_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(24784);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24785);}while(r); sc_3564_end:; }else{ S_33481:; if(qbevent){evnt(24788);if(r)goto S_33481;} S_33482:; if (((*_FUNC_HASHVALUE_LONG_L==( 1 )))||new_error){ if(qbevent){evnt(24789);if(r)goto S_33482;} do{ *_FUNC_HASHVALUE_LONG_HASHVALUE=( 1048576 + 8388608 ); if(!qbevent)break;evnt(24790);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24790);}while(r); sc_ec_169_end:; goto sc_3565_end; } S_33485:; if (((*_FUNC_HASHVALUE_LONG_L==( 2 )))||new_error){ if(qbevent){evnt(24791);if(r)goto S_33485;} 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(24792);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24793);}while(r); sc_ec_170_end:; goto sc_3565_end; } S_33488:; if (((*_FUNC_HASHVALUE_LONG_L==( 3 )))||new_error){ if(qbevent){evnt(24794);if(r)goto S_33488;} 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(24795);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24796);}while(r); sc_ec_171_end:; goto sc_3565_end; } S_33491:; if (((*_FUNC_HASHVALUE_LONG_L==( 4 )))||new_error){ if(qbevent){evnt(24797);if(r)goto S_33491;} 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(24798);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24799);}while(r); sc_ec_172_end:; goto sc_3565_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(24801);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24802);}while(r); sc_3565_end:; } 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; 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 "data77.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_33499:; if ((-(*__LONG_HASHLISTFREELAST> 0 ))||new_error){ if(qbevent){evnt(24810);if(r)goto S_33499;} 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(24812);}while(r); do{ *__LONG_HASHLISTFREELAST=*__LONG_HASHLISTFREELAST- 1 ; if(!qbevent)break;evnt(24813);}while(r); }else{ S_33503:; if ((-(*__LONG_HASHLISTNEXT>*__LONG_HASHLISTSIZE))||new_error){ if(qbevent){evnt(24815);if(r)goto S_33503;} do{ *__LONG_HASHLISTSIZE=*__LONG_HASHLISTSIZE* 2 ; if(!qbevent)break;evnt(24817);}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 "data78.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(24852);}while(r); S_33528:; if ((*_FUNC_HASHFIND_LONG_I)||new_error){ if(qbevent){evnt(24853);if(r)goto S_33528;} 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(24854);}while(r); LABEL_HASHFIND_NEXT:; if(qbevent){evnt(24855);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(24856);}while(r); S_33531:; if ((*_FUNC_HASHFIND_LONG_SEARCHFLAGS&*_FUNC_HASHFIND_LONG_F)||new_error){ if(qbevent){evnt(24857);if(r)goto S_33531;} S_33532:; 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(24858);if(r)goto S_33532;} do{ *_FUNC_HASHFIND_LONG_RESULTFLAGS=*_FUNC_HASHFIND_LONG_F; if(!qbevent)break;evnt(24859);}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(24860);}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(24861);}while(r); S_33536:; if ((*_FUNC_HASHFIND_LONG_I2)||new_error){ if(qbevent){evnt(24862);if(r)goto S_33536;} do{ *_FUNC_HASHFIND_LONG_HASHFIND= 2 ; if(!qbevent)break;evnt(24863);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFIND_LONG_I2; if(!qbevent)break;evnt(24864);}while(r); do{ *__LONG_HASHFIND_REVERSE= 0 ; if(!qbevent)break;evnt(24865);}while(r); do{ *__LONG_HASHFIND_SEARCHFLAGS=*_FUNC_HASHFIND_LONG_SEARCHFLAGS; if(!qbevent)break;evnt(24866);}while(r); do{ qbs_set(__STRING_HASHFIND_NAME,_FUNC_HASHFIND_STRING_UA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24867);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFIND_LONG_I; if(!qbevent)break;evnt(24868);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24869);}while(r); }else{ do{ *_FUNC_HASHFIND_LONG_HASHFIND= 1 ; if(!qbevent)break;evnt(24871);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFIND_LONG_I; if(!qbevent)break;evnt(24872);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24873);}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(24877);}while(r); S_33552:; if ((*_FUNC_HASHFIND_LONG_I)||new_error){ if(qbevent){evnt(24878);if(r)goto S_33552;} do{ goto LABEL_HASHFIND_NEXT; if(!qbevent)break;evnt(24878);}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; 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 "data79.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(24887);}while(r); S_33557:; if ((*_FUNC_HASHFINDREV_LONG_I)||new_error){ if(qbevent){evnt(24888);if(r)goto S_33557;} 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(24889);}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(24890);}while(r); LABEL_HASHFINDREV_NEXT:; if(qbevent){evnt(24891);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(24892);}while(r); S_33561:; if ((*_FUNC_HASHFINDREV_LONG_SEARCHFLAGS&*_FUNC_HASHFINDREV_LONG_F)||new_error){ if(qbevent){evnt(24893);if(r)goto S_33561;} S_33562:; 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(24894);if(r)goto S_33562;} do{ *_FUNC_HASHFINDREV_LONG_RESULTFLAGS=*_FUNC_HASHFINDREV_LONG_F; if(!qbevent)break;evnt(24895);}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(24896);}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(24897);}while(r); S_33566:; if ((*_FUNC_HASHFINDREV_LONG_I2)||new_error){ if(qbevent){evnt(24898);if(r)goto S_33566;} do{ *_FUNC_HASHFINDREV_LONG_HASHFINDREV= 2 ; if(!qbevent)break;evnt(24899);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDREV_LONG_I2; if(!qbevent)break;evnt(24900);}while(r); do{ *__LONG_HASHFIND_REVERSE= 1 ; if(!qbevent)break;evnt(24901);}while(r); do{ *__LONG_HASHFIND_SEARCHFLAGS=*_FUNC_HASHFINDREV_LONG_SEARCHFLAGS; if(!qbevent)break;evnt(24902);}while(r); do{ qbs_set(__STRING_HASHFIND_NAME,_FUNC_HASHFINDREV_STRING_UA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(24903);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDREV_LONG_I; if(!qbevent)break;evnt(24904);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24905);}while(r); }else{ do{ *_FUNC_HASHFINDREV_LONG_HASHFINDREV= 1 ; if(!qbevent)break;evnt(24907);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDREV_LONG_I; if(!qbevent)break;evnt(24908);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24909);}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(24913);}while(r); S_33582:; if ((*_FUNC_HASHFINDREV_LONG_I)||new_error){ if(qbevent){evnt(24914);if(r)goto S_33582;} do{ goto LABEL_HASHFINDREV_NEXT; if(!qbevent)break;evnt(24914);}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; 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 "data80.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_33586:; if ((*__LONG_HASHFIND_REVERSE)||new_error){ if(qbevent){evnt(24923);if(r)goto S_33586;} do{ *_FUNC_HASHFINDCONT_LONG_I=*__LONG_HASHFIND_NEXTLISTITEM; if(!qbevent)break;evnt(24925);}while(r); LABEL_HASHFINDREVC_NEXT:; if(qbevent){evnt(24926);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(24927);}while(r); S_33589:; if ((*__LONG_HASHFIND_SEARCHFLAGS&*_FUNC_HASHFINDCONT_LONG_F)||new_error){ if(qbevent){evnt(24928);if(r)goto S_33589;} S_33590:; 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(24929);if(r)goto S_33590;} do{ *_FUNC_HASHFINDCONT_LONG_RESULTFLAGS=*_FUNC_HASHFINDCONT_LONG_F; if(!qbevent)break;evnt(24930);}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(24931);}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(24932);}while(r); S_33594:; if ((*_FUNC_HASHFINDCONT_LONG_I2)||new_error){ if(qbevent){evnt(24933);if(r)goto S_33594;} do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 2 ; if(!qbevent)break;evnt(24934);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDCONT_LONG_I2; if(!qbevent)break;evnt(24935);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(24936);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24937);}while(r); }else{ do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 1 ; if(!qbevent)break;evnt(24939);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(24940);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24941);}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(24945);}while(r); S_33607:; if ((*_FUNC_HASHFINDCONT_LONG_I)||new_error){ if(qbevent){evnt(24946);if(r)goto S_33607;} do{ goto LABEL_HASHFINDREVC_NEXT; if(!qbevent)break;evnt(24946);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(24947);}while(r); }else{ do{ *_FUNC_HASHFINDCONT_LONG_I=*__LONG_HASHFIND_NEXTLISTITEM; if(!qbevent)break;evnt(24951);}while(r); LABEL_HASHFINDC_NEXT:; if(qbevent){evnt(24952);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(24953);}while(r); S_33614:; if ((*__LONG_HASHFIND_SEARCHFLAGS&*_FUNC_HASHFINDCONT_LONG_F)||new_error){ if(qbevent){evnt(24954);if(r)goto S_33614;} S_33615:; 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(24955);if(r)goto S_33615;} do{ *_FUNC_HASHFINDCONT_LONG_RESULTFLAGS=*_FUNC_HASHFINDCONT_LONG_F; if(!qbevent)break;evnt(24956);}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(24957);}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(24958);}while(r); S_33619:; if ((*_FUNC_HASHFINDCONT_LONG_I2)||new_error){ if(qbevent){evnt(24959);if(r)goto S_33619;} do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 2 ; if(!qbevent)break;evnt(24960);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDCONT_LONG_I2; if(!qbevent)break;evnt(24961);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(24962);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24963);}while(r); }else{ do{ *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 1 ; if(!qbevent)break;evnt(24965);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I; if(!qbevent)break;evnt(24966);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(24967);}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(24971);}while(r); S_33632:; if ((*_FUNC_HASHFINDCONT_LONG_I)||new_error){ if(qbevent){evnt(24972);if(r)goto S_33632;} do{ goto LABEL_HASHFINDC_NEXT; if(!qbevent)break;evnt(24972);}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(24973);}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; 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 "data81.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_HASHREMOVE_LONG_I=*__LONG_HASHREMOVE_LASTFOUND; if(!qbevent)break;evnt(24980);}while(r); do{ *__LONG_HASHLISTFREELAST=*__LONG_HASHLISTFREELAST+ 1 ; if(!qbevent)break;evnt(24983);}while(r); S_33639:; if ((-(*__LONG_HASHLISTFREELAST>*__LONG_HASHLISTFREESIZE))||new_error){ if(qbevent){evnt(24984);if(r)goto S_33639;} do{ *__LONG_HASHLISTFREESIZE=*__LONG_HASHLISTFREESIZE* 2 ; if(!qbevent)break;evnt(24985);}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 "data82.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_HASHDUMP_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25023);}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(25024);}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(25025);}while(r); S_33669:; fornext_value3572= 0 ; fornext_finalvalue3572= 16777215 ; fornext_step3572= 1 ; if (fornext_step3572<0) fornext_step_negative3572=1; else fornext_step_negative3572=0; if (new_error) goto fornext_error3572; goto fornext_entrylabel3572; while(1){ fornext_value3572=fornext_step3572+(*_SUB_HASHDUMP_LONG_X); fornext_entrylabel3572: *_SUB_HASHDUMP_LONG_X=fornext_value3572; if (fornext_step_negative3572){ if (fornext_value3572fornext_finalvalue3572) break; } fornext_error3572:; if(qbevent){evnt(25026);if(r)goto S_33669;} S_33670:; 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(25027);if(r)goto S_33670;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip3573; sub_file_print(tmp_fileno,qbs_new_txt_len("START HashTable(",16), 0, 0, 0); if (new_error) goto skip3573; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_HASHDUMP_LONG_X)), 1, 0, 0); if (new_error) goto skip3573; sub_file_print(tmp_fileno,qbs_new_txt_len("):",2), 0, 0, 1); if (new_error) goto skip3573; skip3573: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25029);}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(25030);}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(25033);}while(r); S_33674:; 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(25034);if(r)goto S_33674;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(25034);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip3574; sub_file_print(tmp_fileno,qbs_new_txt_len(" HashList(",11), 0, 0, 0); if (new_error) goto skip3574; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_HASHDUMP_LONG_I)), 1, 0, 0); if (new_error) goto skip3574; sub_file_print(tmp_fileno,qbs_new_txt_len(").LastItem=",11), 0, 0, 0); if (new_error) goto skip3574; 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 skip3574; skip3574: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25036);}while(r); LABEL_HASHDUMPNEXTITEM:; if(qbevent){evnt(25037);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(25038);}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(25040);}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(25041);}while(r); S_33681:; fornext_value3576= 1 ; fornext_finalvalue3576= 32 ; 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+(*_SUB_HASHDUMP_LONG_Z); fornext_entrylabel3576: *_SUB_HASHDUMP_LONG_Z=fornext_value3576; if (fornext_step_negative3576){ if (fornext_value3576fornext_finalvalue3576) break; } fornext_error3576:; if(qbevent){evnt(25042);if(r)goto S_33681;} 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(25043);}while(r); do{ *_SUB_HASHDUMP_LONG_F=*_SUB_HASHDUMP_LONG_F/ 2 ; if(!qbevent)break;evnt(25044);}while(r); fornext_continue_3575:; } fornext_exit_3575:; 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(25046);}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(25048);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip3577; sub_file_print(tmp_fileno,_SUB_HASHDUMP_STRING_X, 0, 0, 1); if (new_error) goto skip3577; skip3577: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25050);}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(25053);}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(25054);}while(r); S_33690:; if ((*_SUB_HASHDUMP_LONG_I1)||new_error){ if(qbevent){evnt(25055);if(r)goto S_33690;} S_33691:; 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(25056);if(r)goto S_33691;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(25056);}while(r); } } S_33695:; if ((*_SUB_HASHDUMP_LONG_I2)||new_error){ if(qbevent){evnt(25058);if(r)goto S_33695;} S_33696:; 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(25059);if(r)goto S_33696;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(25059);}while(r); } } S_33700:; if ((-(*_SUB_HASHDUMP_LONG_I2== 0 ))||new_error){ if(qbevent){evnt(25061);if(r)goto S_33700;} S_33701:; if ((-(*_SUB_HASHDUMP_LONG_LASTI!=*_SUB_HASHDUMP_LONG_I))||new_error){ if(qbevent){evnt(25062);if(r)goto S_33701;} do{ goto LABEL_CORRUPT; if(!qbevent)break;evnt(25062);}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(25065);}while(r); S_33706:; if ((*_SUB_HASHDUMP_LONG_I)||new_error){ if(qbevent){evnt(25066);if(r)goto S_33706;} do{ goto LABEL_HASHDUMPNEXTITEM; if(!qbevent)break;evnt(25066);}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip3578; sub_file_print(tmp_fileno,qbs_new_txt_len("END HashTable(",14), 0, 0, 0); if (new_error) goto skip3578; sub_file_print(tmp_fileno,qbs_str((int32)(*_SUB_HASHDUMP_LONG_X)), 1, 0, 0); if (new_error) goto skip3578; sub_file_print(tmp_fileno,qbs_new_txt_len(")",1), 0, 0, 1); if (new_error) goto skip3578; skip3578: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25068);}while(r); } fornext_continue_3571:; } fornext_exit_3571:; do{ sub_close(*_SUB_HASHDUMP_LONG_FH,1); if(!qbevent)break;evnt(25071);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25073);}while(r); LABEL_CORRUPT:; if(qbevent){evnt(25074);r=0;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_HASHDUMP_LONG_FH; if (new_error) goto skip3579; sub_file_print(tmp_fileno,qbs_new_txt_len("HASH TABLE CORRUPT!",19), 0, 0, 1); if (new_error) goto skip3579; skip3579: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25075);}while(r); do{ sub_close(*_SUB_HASHDUMP_LONG_FH,1); if(!qbevent)break;evnt(25076);}while(r); 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; } 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 "data83.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_HASHLISTSIZE= 65536 ; if(!qbevent)break;evnt(25082);}while(r); do{ *__LONG_HASHLISTNEXT= 1 ; if(!qbevent)break;evnt(25083);}while(r); do{ *__LONG_HASHLISTFREESIZE= 1024 ; if(!qbevent)break;evnt(25084);}while(r); do{ *__LONG_HASHLISTFREELAST= 0 ; if(!qbevent)break;evnt(25085);}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(25086);}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(25087);}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(25088);}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(25089);}while(r); do{ *__LONG_HASHFIND_NEXTLISTITEM= 0 ; if(!qbevent)break;evnt(25091);}while(r); do{ *__LONG_HASHFIND_REVERSE= 0 ; if(!qbevent)break;evnt(25092);}while(r); do{ *__LONG_HASHFIND_SEARCHFLAGS= 0 ; if(!qbevent)break;evnt(25093);}while(r); do{ qbs_set(__STRING_HASHFIND_NAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25094);}while(r); do{ *__LONG_HASHREMOVE_LASTFOUND= 0 ; if(!qbevent)break;evnt(25095);}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; } 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 "data84.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_REMOVECAST_STRING_REMOVECAST,_FUNC_REMOVECAST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25100);}while(r); S_33730:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_REMOVECAST_STRING_A,qbs_new_txt_len(" )",3),0)))||new_error){ if(qbevent){evnt(25101);if(r)goto S_33730;} 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(25102);}while(r); } 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; 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 "data85.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_33733:; if ((*__LONG_IDEAUTOINDENT)||new_error){ if(qbevent){evnt(25107);if(r)goto S_33733;} do{ *_FUNC_CONVERTTABS_LONG_S=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(25107);}while(r); }else{ do{ *_FUNC_CONVERTTABS_LONG_S= 4 ; if(!qbevent)break;evnt(25107);}while(r); } do{ qbs_set(_FUNC_CONVERTTABS_STRING_A,_FUNC_CONVERTTABS_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25108);}while(r); S_33739:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_CONVERTTABS_STRING_A,__STRING_CHR_TAB,0)))||new_error){ if(qbevent){evnt(25109);if(r)goto S_33739;} 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(25110);}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(25111);}while(r); dl_continue_3583:; } dl_exit_3583:; do{ qbs_set(_FUNC_CONVERTTABS_STRING_CONVERTTABS,_FUNC_CONVERTTABS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25113);}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; qbs_maketmp(_FUNC_CONVERTTABS_STRING_CONVERTTABS);return _FUNC_CONVERTTABS_STRING_CONVERTTABS; } 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 "data86.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_NEWBYTEELEMENT_STRING_A,qbs_add(qbs_new_txt_len("byte_element_",13),FUNC_STR2(&(pass3585=FUNC_UNIQUENUMBER())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25118);}while(r); do{ qbs_set(_FUNC_NEWBYTEELEMENT_STRING_NEWBYTEELEMENT,_FUNC_NEWBYTEELEMENT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25119);}while(r); S_33746:; if ((*__LONG_USE_GLOBAL_BYTE_ELEMENTS)||new_error){ if(qbevent){evnt(25120);if(r)goto S_33746;} do{ SUB_WRITEBUFLINE(&(pass3586=*__LONG_GLOBTXTBUF),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25121);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3587=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("byte_element_struct *",21),_FUNC_NEWBYTEELEMENT_STRING_A),qbs_new_txt_len("=NULL;",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25123);}while(r); do{ SUB_WRITEBUFLINE(&(pass3588=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (!",5),_FUNC_NEWBYTEELEMENT_STRING_A),qbs_new_txt_len("){",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25124);}while(r); do{ SUB_WRITEBUFLINE(&(pass3589=*__LONG_DATATXTBUF),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 "data87.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_VALIDNAME_LONG_L=_FUNC_VALIDNAME_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25136);}while(r); S_33755:; if (((-(*_FUNC_VALIDNAME_LONG_L== 0 ))|(-(*_FUNC_VALIDNAME_LONG_L> 40 )))||new_error){ if(qbevent){evnt(25138);if(r)goto S_33755;} S_33756:; if ((-(*_FUNC_VALIDNAME_LONG_L== 0 ))||new_error){ if(qbevent){evnt(25139);if(r)goto S_33756;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25139);}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(25141);}while(r); S_33760:; while((*_FUNC_VALIDNAME_LONG_I)||new_error){ if(qbevent){evnt(25142);if(r)goto S_33760;} do{ *_FUNC_VALIDNAME_LONG_L=*_FUNC_VALIDNAME_LONG_L-__STRING_FIX046->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25143);}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(25144);}while(r); dl_continue_3593:; } dl_exit_3593:; S_33764:; if ((-(*_FUNC_VALIDNAME_LONG_L> 40 ))||new_error){ if(qbevent){evnt(25146);if(r)goto S_33764;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25146);}while(r); } do{ *_FUNC_VALIDNAME_LONG_L=_FUNC_VALIDNAME_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25147);}while(r); } S_33769:; if ((-(*_FUNC_VALIDNAME_LONG_L>= 2 ))||new_error){ if(qbevent){evnt(25151);if(r)goto S_33769;} S_33770:; 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(25152);if(r)goto S_33770;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25152);}while(r); } } S_33774:; fornext_value3597= 1 ; fornext_finalvalue3597=*_FUNC_VALIDNAME_LONG_L; fornext_step3597= 1 ; if (fornext_step3597<0) fornext_step_negative3597=1; else fornext_step_negative3597=0; if (new_error) goto fornext_error3597; goto fornext_entrylabel3597; while(1){ fornext_value3597=fornext_step3597+(*_FUNC_VALIDNAME_LONG_I); fornext_entrylabel3597: *_FUNC_VALIDNAME_LONG_I=fornext_value3597; if (fornext_step_negative3597){ if (fornext_value3597fornext_finalvalue3597) break; } fornext_error3597:; if(qbevent){evnt(25155);if(r)goto S_33774;} 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(25156);}while(r); S_33776:; 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(25157);if(r)goto S_33776;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25157);}while(r); } S_33779:; 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(25158);if(r)goto S_33779;} do{ *_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE= 0 ; if(!qbevent)break;evnt(25159);}while(r); S_33781:; if ((-(*_FUNC_VALIDNAME_LONG_ALPHABETLETTER== 0 ))||new_error){ if(qbevent){evnt(25160);if(r)goto S_33781;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25160);}while(r); } }else{ S_33785:; if ((-(*_FUNC_VALIDNAME_LONG_A== 95 ))||new_error){ if(qbevent){evnt(25162);if(r)goto S_33785;} do{ *_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE= 1 ; if(!qbevent)break;evnt(25163);}while(r); }else{ do{ *_FUNC_VALIDNAME_LONG_ALPHABETLETTER= 1 ; if(!qbevent)break;evnt(25165);}while(r); do{ *_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE= 0 ; if(!qbevent)break;evnt(25166);}while(r); } } fornext_continue_3596:; } fornext_exit_3596:; S_33793:; if ((*_FUNC_VALIDNAME_LONG_TRAILINGUNDERSCORE)||new_error){ if(qbevent){evnt(25170);if(r)goto S_33793;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25170);}while(r); } do{ *_FUNC_VALIDNAME_LONG_VALIDNAME= 1 ; if(!qbevent)break;evnt(25171);}while(r); 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; 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 "data88.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_33797:; if ((-(*_FUNC_STR_NTH_LONG_X== 1 ))||new_error){ if(qbevent){evnt(25175);if(r)goto S_33797;} 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(25175);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25175);}while(r); } S_33801:; if ((-(*_FUNC_STR_NTH_LONG_X== 2 ))||new_error){ if(qbevent){evnt(25176);if(r)goto S_33801;} 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(25176);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25176);}while(r); } S_33805:; if ((-(*_FUNC_STR_NTH_LONG_X== 3 ))||new_error){ if(qbevent){evnt(25177);if(r)goto S_33805;} 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(25177);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25177);}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(25178);}while(r); 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_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 "data89.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_ERROR_HAPPENED= 1 ; if(!qbevent)break;evnt(25182);}while(r); do{ qbs_set(__STRING_ERROR_MESSAGE,_SUB_GIVE_ERROR_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25183);}while(r); 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; } void SUB_WRITECONFIGSETTING(qbs*_SUB_WRITECONFIGSETTING_STRING_SECTION,qbs*_SUB_WRITECONFIGSETTING_STRING_ITEM,qbs*_SUB_WRITECONFIGSETTING_STRING_VALUE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ SUB_WRITESETTING(__STRING_CONFIGFILE,_SUB_WRITECONFIGSETTING_STRING_SECTION,_SUB_WRITECONFIGSETTING_STRING_ITEM,_SUB_WRITECONFIGSETTING_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25187);}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; } int32 FUNC_READCONFIGSETTING(qbs*_FUNC_READCONFIGSETTING_STRING_SECTION,qbs*_FUNC_READCONFIGSETTING_STRING_ITEM,qbs*_FUNC_READCONFIGSETTING_STRING_VALUE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_READCONFIGSETTING_STRING_VALUE,FUNC_READSETTING(__STRING_CONFIGFILE,_FUNC_READCONFIGSETTING_STRING_SECTION,_FUNC_READCONFIGSETTING_STRING_ITEM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25191);}while(r); do{ *_FUNC_READCONFIGSETTING_LONG_READCONFIGSETTING=(-(_FUNC_READCONFIGSETTING_STRING_VALUE->len> 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25192);}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; return *_FUNC_READCONFIGSETTING_LONG_READCONFIGSETTING; } uint32 FUNC_VRGBS(qbs*_FUNC_VRGBS_STRING_TEXT,uint32*_FUNC_VRGBS_ULONG_DEFAULTCOLOR){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_VRGBS_ULONG_VRGBS=*_FUNC_VRGBS_ULONG_DEFAULTCOLOR; if(!qbevent)break;evnt(25201);}while(r); S_33816:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_FUNC_VRGBS_STRING_TEXT, 4 )),qbs_new_txt_len("_RGB",4))))||new_error){ if(qbevent){evnt(25202);if(r)goto S_33816;} do{ *_FUNC_VRGBS_LONG_RPOS=func_instr(NULL,_FUNC_VRGBS_STRING_TEXT,qbs_new_txt_len("(",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25203);}while(r); do{ *_FUNC_VRGBS_LONG_GPOS=func_instr(*_FUNC_VRGBS_LONG_RPOS,_FUNC_VRGBS_STRING_TEXT,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25204);}while(r); do{ *_FUNC_VRGBS_LONG_BPOS=func_instr(*_FUNC_VRGBS_LONG_GPOS+ 1 ,_FUNC_VRGBS_STRING_TEXT,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25205);}while(r); S_33820:; if (((-(*_FUNC_VRGBS_LONG_RPOS!= 0 ))&(-(*_FUNC_VRGBS_LONG_BPOS!= 0 ))&(-(*_FUNC_VRGBS_LONG_GPOS!= 0 )))||new_error){ if(qbevent){evnt(25206);if(r)goto S_33820;} do{ *_FUNC_VRGBS_LONG_RED=qbr(func_val(qbs__trim(func_mid(_FUNC_VRGBS_STRING_TEXT,*_FUNC_VRGBS_LONG_RPOS+ 1 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25207);}while(r); do{ *_FUNC_VRGBS_LONG_GREEN=qbr(func_val(qbs__trim(func_mid(_FUNC_VRGBS_STRING_TEXT,*_FUNC_VRGBS_LONG_GPOS+ 1 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25208);}while(r); do{ *_FUNC_VRGBS_LONG_BLUE=qbr(func_val(qbs__trim(func_mid(_FUNC_VRGBS_STRING_TEXT,*_FUNC_VRGBS_LONG_BPOS+ 1 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25209);}while(r); do{ *_FUNC_VRGBS_ULONG_VRGBS=func__rgb32(*_FUNC_VRGBS_LONG_RED,*_FUNC_VRGBS_LONG_GREEN,*_FUNC_VRGBS_LONG_BLUE); if(!qbevent)break;evnt(25210);}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; return *_FUNC_VRGBS_ULONG_VRGBS; } qbs* FUNC_RGBS(uint32*_FUNC_RGBS_ULONG_C){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_RGBS_STRING_RGBS,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_RGB32(",7),qbs__trim(qbs_str((int32)(func__red32(*_FUNC_RGBS_ULONG_C))))),qbs_new_txt_len(", ",2)),qbs__trim(qbs_str((int32)(func__green32(*_FUNC_RGBS_ULONG_C))))),qbs_new_txt_len(", ",2)),qbs__trim(qbs_str((int32)(func__blue32(*_FUNC_RGBS_ULONG_C))))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25216);}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; qbs_maketmp(_FUNC_RGBS_STRING_RGBS);return _FUNC_RGBS_STRING_RGBS; } int32 FUNC_EVALPREIF(qbs*_FUNC_EVALPREIF_STRING_TEXT,qbs*_FUNC_EVALPREIF_STRING_ERR){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_EVALPREIF_STRING_TEMP,_FUNC_EVALPREIF_STRING_TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25220);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25221);}while(r); do{ if (_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]&2){ error(10); }else{ if (_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4]= 0 ; _FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]=( 3 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4]+1; _FUNC_EVALPREIF_ARRAY_STRING_PC_OP[6]=1; _FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]=(ptrszint)malloc(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]*8); if (!_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]) error(257); _FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]|=1; tmp_long=_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]; if (_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(25223);}while(r); do{ tmp_long=array_check(( 1 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len("=",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25224);}while(r); do{ tmp_long=array_check(( 2 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25225);}while(r); do{ tmp_long=array_check(( 3 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25226);}while(r); S_33834:; do{ if(qbevent){evnt(25227);if(r)goto S_33834;} do{ qbs_set(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25229);}while(r); do{ *_FUNC_EVALPREIF_LONG_FIRST= 0 ; if(!qbevent)break;evnt(25229);}while(r); S_33837:; fornext_value3611= 1 ; fornext_finalvalue3611=func_ubound(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP,1,1); fornext_step3611= 1 ; if (fornext_step3611<0) fornext_step_negative3611=1; else fornext_step_negative3611=0; if (new_error) goto fornext_error3611; goto fornext_entrylabel3611; while(1){ fornext_value3611=fornext_step3611+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3611: *_FUNC_EVALPREIF_LONG_I=fornext_value3611; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3611){ if (fornext_value3611fornext_finalvalue3611) break; } fornext_error3611:; if(qbevent){evnt(25230);if(r)goto S_33837;} do{ *_FUNC_EVALPREIF_LONG_TEMP=func_instr(NULL,_FUNC_EVALPREIF_STRING_TEMP,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25231);}while(r); S_33839:; if ((-(*_FUNC_EVALPREIF_LONG_FIRST== 0 ))||new_error){ if(qbevent){evnt(25232);if(r)goto S_33839;} do{ *_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_TEMP; if(!qbevent)break;evnt(25232);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25232);}while(r); } S_33843:; if (((-(*_FUNC_EVALPREIF_LONG_TEMP!= 0 ))&(-(*_FUNC_EVALPREIF_LONG_TEMP<*_FUNC_EVALPREIF_LONG_FIRST)))||new_error){ if(qbevent){evnt(25233);if(r)goto S_33843;} do{ *_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_TEMP; if(!qbevent)break;evnt(25233);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25233);}while(r); } fornext_continue_3610:; } fornext_exit_3610:; S_33848:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25235);if(r)goto S_33848;} do{ *_FUNC_EVALPREIF_LONG_SECONDSYMBOL= 0 ; if(!qbevent)break;evnt(25236);}while(r); do{ *_FUNC_EVALPREIF_LONG_SECOND= 0 ; if(!qbevent)break;evnt(25236);}while(r); S_33851:; fornext_value3613=*_FUNC_EVALPREIF_LONG_FIRST+ 1 ; fornext_finalvalue3613=_FUNC_EVALPREIF_STRING_TEMP->len; fornext_step3613= 1 ; if (fornext_step3613<0) fornext_step_negative3613=1; else fornext_step_negative3613=0; if (new_error) goto fornext_error3613; goto fornext_entrylabel3613; while(1){ fornext_value3613=fornext_step3613+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3613: *_FUNC_EVALPREIF_LONG_I=fornext_value3613; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3613){ if (fornext_value3613fornext_finalvalue3613) break; } fornext_error3613:; if(qbevent){evnt(25237);if(r)goto S_33851;} do{ qbs_set(_FUNC_EVALPREIF_STRING_A,func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25238);}while(r); S_33853:; if(qbevent){evnt(25239);if(r)goto S_33853;} S_33854:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(25240);if(r)goto S_33854;} sc_ec_173_end:; goto sc_3615_end; } S_33855:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len("=",1))||qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len("<",1))||qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(25241);if(r)goto S_33855;} S_33856:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_A,_FUNC_EVALPREIF_STRING_FIRSTSYMBOL)))||new_error){ if(qbevent){evnt(25242);if(r)goto S_33856;} do{ qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_add(qbs_add(qbs_new_txt_len("Duplicate operator (",20),_FUNC_EVALPREIF_STRING_A),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25242);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25242);}while(r); } do{ *_FUNC_EVALPREIF_LONG_SECOND=*_FUNC_EVALPREIF_LONG_I; if(!qbevent)break;evnt(25243);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_SECONDSYMBOL,_FUNC_EVALPREIF_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25243);}while(r); sc_ec_174_end:; goto sc_3615_end; } do{ goto fornext_exit_3612; if(!qbevent)break;evnt(25245);}while(r); sc_3615_end:; fornext_continue_3612:; } fornext_exit_3612:; } S_33867:; if ((*_FUNC_EVALPREIF_LONG_FIRST)||new_error){ if(qbevent){evnt(25249);if(r)goto S_33867;} do{ qbs_set(_FUNC_EVALPREIF_STRING_L,qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25250);}while(r); S_33869:; if ((*_FUNC_EVALPREIF_LONG_SECOND)||new_error){ if(qbevent){evnt(25251);if(r)goto S_33869;} do{ *_FUNC_EVALPREIF_LONG_RIGHTSTART=*_FUNC_EVALPREIF_LONG_SECOND+ 1 ; if(!qbevent)break;evnt(25251);}while(r); }else{ do{ *_FUNC_EVALPREIF_LONG_RIGHTSTART=*_FUNC_EVALPREIF_LONG_FIRST+ 1 ; if(!qbevent)break;evnt(25251);}while(r); } do{ qbs_set(_FUNC_EVALPREIF_STRING_R,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_RIGHTSTART,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25253);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_add(func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST, 1 ,1),func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_SECOND, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25254);}while(r); S_33876:; fornext_value3617=_FUNC_EVALPREIF_STRING_L->len; fornext_finalvalue3617= 1 ; fornext_step3617= -1 ; if (fornext_step3617<0) fornext_step_negative3617=1; else fornext_step_negative3617=0; if (new_error) goto fornext_error3617; goto fornext_entrylabel3617; while(1){ fornext_value3617=fornext_step3617+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3617: *_FUNC_EVALPREIF_LONG_I=fornext_value3617; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3617){ if (fornext_value3617fornext_finalvalue3617) break; } fornext_error3617:; if(qbevent){evnt(25256);if(r)goto S_33876;} S_33877:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_EVALPREIF_STRING_L,*_FUNC_EVALPREIF_LONG_I)== 32 )))||new_error){ if(qbevent){evnt(25257);if(r)goto S_33877;} do{ goto fornext_exit_3616; if(!qbevent)break;evnt(25257);}while(r); } fornext_continue_3616:; } fornext_exit_3616:; do{ qbs_set(_FUNC_EVALPREIF_STRING_LEFTSIDE,qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25259);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_L,qbs_ltrim(qbs_rtrim(func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_I+ 1 ,_FUNC_EVALPREIF_STRING_L->len-*_FUNC_EVALPREIF_LONG_I,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25260);}while(r); S_33883:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(_FUNC_EVALPREIF_STRING_L)== 0 )))||new_error){ if(qbevent){evnt(25261);if(r)goto S_33883;} do{ qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_new_txt_len("Invalid flag name",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25261);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25261);}while(r); } do{ *_FUNC_EVALPREIF_LONG_RIGHTSTOP=_FUNC_EVALPREIF_STRING_R->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25262);}while(r); S_33888:; fornext_value3622= 1 ; fornext_finalvalue3622=_FUNC_EVALPREIF_STRING_R->len; fornext_step3622= 1 ; if (fornext_step3622<0) fornext_step_negative3622=1; else fornext_step_negative3622=0; if (new_error) goto fornext_error3622; goto fornext_entrylabel3622; while(1){ fornext_value3622=fornext_step3622+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3622: *_FUNC_EVALPREIF_LONG_I=fornext_value3622; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3622){ if (fornext_value3622fornext_finalvalue3622) break; } fornext_error3622:; if(qbevent){evnt(25263);if(r)goto S_33888;} S_33889:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_EVALPREIF_STRING_R,*_FUNC_EVALPREIF_LONG_I)== 32 )))||new_error){ if(qbevent){evnt(25264);if(r)goto S_33889;} do{ goto fornext_exit_3621; if(!qbevent)break;evnt(25264);}while(r); } fornext_continue_3621:; } fornext_exit_3621:; do{ qbs_set(_FUNC_EVALPREIF_STRING_RIGHTSIDE,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_R,*_FUNC_EVALPREIF_LONG_I+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25266);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_R,qbs_ltrim(qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_R,*_FUNC_EVALPREIF_LONG_I- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25267);}while(r); S_33895:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("=<",2))))||new_error){ if(qbevent){evnt(25268);if(r)goto S_33895;} do{ qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25268);}while(r); } S_33898:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("=>",2))))||new_error){ if(qbevent){evnt(25269);if(r)goto S_33898;} do{ qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25269);}while(r); } S_33901:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("><",2))))||new_error){ if(qbevent){evnt(25270);if(r)goto S_33901;} do{ qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<>",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25270);}while(r); } do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25271);}while(r); S_33905:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<>",2))))||new_error){ if(qbevent){evnt(25272);if(r)goto S_33905;} S_33906:; fornext_value3625= 0 ; fornext_finalvalue3625=*__INTEGER_USERDEFINECOUNT; fornext_step3625= 1 ; if (fornext_step3625<0) fornext_step_negative3625=1; else fornext_step_negative3625=0; if (new_error) goto fornext_error3625; goto fornext_entrylabel3625; while(1){ fornext_value3625=fornext_step3625+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3625: *_FUNC_EVALPREIF_LONG_I=fornext_value3625; if (fornext_step_negative3625){ if (fornext_value3625fornext_finalvalue3625) break; } fornext_error3625:; if(qbevent){evnt(25273);if(r)goto S_33906;} S_33907:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R))))||new_error){ if(qbevent){evnt(25274);if(r)goto S_33907;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25274);}while(r); do{ goto LABEL_FINISHEDCHECK; if(!qbevent)break;evnt(25274);}while(r); } fornext_continue_3624:; } fornext_exit_3624:; } S_33913:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("=",1),0)))||new_error){ if(qbevent){evnt(25277);if(r)goto S_33913;} do{ *_FUNC_EVALPREIF_LONG_USERFOUND= 0 ; if(!qbevent)break;evnt(25278);}while(r); S_33915:; fornext_value3627= 0 ; fornext_finalvalue3627=*__INTEGER_USERDEFINECOUNT; fornext_step3627= 1 ; if (fornext_step3627<0) fornext_step_negative3627=1; else fornext_step_negative3627=0; if (new_error) goto fornext_error3627; goto fornext_entrylabel3627; while(1){ fornext_value3627=fornext_step3627+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3627: *_FUNC_EVALPREIF_LONG_I=fornext_value3627; if (fornext_step_negative3627){ if (fornext_value3627fornext_finalvalue3627) break; } fornext_error3627:; if(qbevent){evnt(25279);if(r)goto S_33915;} S_33916:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L)))||new_error){ if(qbevent){evnt(25280);if(r)goto S_33916;} do{ *_FUNC_EVALPREIF_LONG_USERFOUND= -1 ; if(!qbevent)break;evnt(25281);}while(r); S_33918:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R)))||new_error){ if(qbevent){evnt(25282);if(r)goto S_33918;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25282);}while(r); do{ goto LABEL_FINISHEDCHECK; if(!qbevent)break;evnt(25282);}while(r); } } fornext_continue_3626:; } fornext_exit_3626:; S_33924:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_EVALPREIF_LONG_USERFOUND== 0 ))&(qbs_equal(qbs_ltrim(qbs_rtrim(_FUNC_EVALPREIF_STRING_R)),qbs_new_txt_len("UNDEFINED",9)))))||new_error){ if(qbevent){evnt(25285);if(r)goto S_33924;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25285);}while(r); do{ goto LABEL_FINISHEDCHECK; if(!qbevent)break;evnt(25285);}while(r); } S_33928:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_EVALPREIF_LONG_USERFOUND== -1 ))&(qbs_equal(qbs_ltrim(qbs_rtrim(_FUNC_EVALPREIF_STRING_R)),qbs_new_txt_len("DEFINED",7)))))||new_error){ if(qbevent){evnt(25286);if(r)goto S_33928;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25286);}while(r); do{ goto LABEL_FINISHEDCHECK; if(!qbevent)break;evnt(25286);}while(r); } } S_33933:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len(">",1),0)))||new_error){ if(qbevent){evnt(25289);if(r)goto S_33933;} S_33934:; fornext_value3629= 0 ; fornext_finalvalue3629=*__INTEGER_USERDEFINECOUNT; fornext_step3629= 1 ; if (fornext_step3629<0) fornext_step_negative3629=1; else fornext_step_negative3629=0; if (new_error) goto fornext_error3629; goto fornext_entrylabel3629; while(1){ fornext_value3629=fornext_step3629+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3629: *_FUNC_EVALPREIF_LONG_I=fornext_value3629; if (fornext_step_negative3629){ if (fornext_value3629fornext_finalvalue3629) break; } fornext_error3629:; if(qbevent){evnt(25290);if(r)goto S_33934;} S_33935:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_R)&FUNC_VERIFYNUMBER(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||new_error){ if(qbevent){evnt(25291);if(r)goto S_33935;} S_33936:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(-(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))>func_val(_FUNC_EVALPREIF_STRING_R)))))||new_error){ if(qbevent){evnt(25292);if(r)goto S_33936;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25292);}while(r); do{ goto LABEL_FINISHEDCHECK; if(!qbevent)break;evnt(25292);}while(r); } }else{ S_33941:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(qbs_greaterthan(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R))))||new_error){ if(qbevent){evnt(25294);if(r)goto S_33941;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25294);}while(r); do{ goto LABEL_FINISHEDCHECK; if(!qbevent)break;evnt(25294);}while(r); } } fornext_continue_3628:; } fornext_exit_3628:; } S_33948:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<",1),0)))||new_error){ if(qbevent){evnt(25298);if(r)goto S_33948;} S_33949:; fornext_value3631= 0 ; fornext_finalvalue3631=*__INTEGER_USERDEFINECOUNT; fornext_step3631= 1 ; if (fornext_step3631<0) fornext_step_negative3631=1; else fornext_step_negative3631=0; if (new_error) goto fornext_error3631; goto fornext_entrylabel3631; while(1){ fornext_value3631=fornext_step3631+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3631: *_FUNC_EVALPREIF_LONG_I=fornext_value3631; if (fornext_step_negative3631){ if (fornext_value3631fornext_finalvalue3631) break; } fornext_error3631:; if(qbevent){evnt(25299);if(r)goto S_33949;} S_33950:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_R)&FUNC_VERIFYNUMBER(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||new_error){ if(qbevent){evnt(25300);if(r)goto S_33950;} S_33951:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(-(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))fornext_finalvalue3634) break; } fornext_error3634:; if(qbevent){evnt(25323);if(r)goto S_33971;} S_33972:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25324);if(r)goto S_33972;} do{ *_FUNC_EVALPREIF_LONG_T=func_instr(NULL,_FUNC_EVALPREIF_STRING_TEMP,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25325);}while(r); S_33974:; if ((-(*_FUNC_EVALPREIF_LONG_FIRST!= 0 ))||new_error){ if(qbevent){evnt(25326);if(r)goto S_33974;} S_33975:; if (((-(*_FUNC_EVALPREIF_LONG_T<*_FUNC_EVALPREIF_LONG_FIRST))&(-(*_FUNC_EVALPREIF_LONG_T!= 0 )))||new_error){ if(qbevent){evnt(25327);if(r)goto S_33975;} do{ *_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_T; if(!qbevent)break;evnt(25327);}while(r); do{ *_FUNC_EVALPREIF_LONG_FIRSTSYMBOL=*_FUNC_EVALPREIF_LONG_I; if(!qbevent)break;evnt(25327);}while(r); } }else{ do{ *_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_T; if(!qbevent)break;evnt(25329);}while(r); do{ *_FUNC_EVALPREIF_LONG_FIRSTSYMBOL=*_FUNC_EVALPREIF_LONG_I; if(!qbevent)break;evnt(25329);}while(r); } } fornext_continue_3633:; } fornext_exit_3633:; S_33985:; if ((-(*_FUNC_EVALPREIF_LONG_FIRST== 0 ))||new_error){ if(qbevent){evnt(25333);if(r)goto S_33985;} do{ goto dl_exit_3632; if(!qbevent)break;evnt(25333);}while(r); } do{ qbs_set(_FUNC_EVALPREIF_STRING_LEFTSIDE,qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25334);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_FIRSTSYMBOL)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])]))->len,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25335);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_T,func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST+((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_FIRSTSYMBOL)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])]))->len,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25336);}while(r); do{ *_FUNC_EVALPREIF_LONG_T=func_instr(NULL,_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len(" ",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25337);}while(r); S_33992:; if ((*_FUNC_EVALPREIF_LONG_T)||new_error){ if(qbevent){evnt(25338);if(r)goto S_33992;} do{ qbs_set(_FUNC_EVALPREIF_STRING_M,qbs_ltrim(qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_T,*_FUNC_EVALPREIF_LONG_T- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25339);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_RIGHTSIDE,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_T,*_FUNC_EVALPREIF_LONG_T,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25340);}while(r); }else{ do{ qbs_set(_FUNC_EVALPREIF_STRING_M,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_T,*_FUNC_EVALPREIF_LONG_T,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25342);}while(r); do{ qbs_set(_FUNC_EVALPREIF_STRING_RIGHTSIDE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25343);}while(r); } do{ *_FUNC_EVALPREIF_LONG_LEFTRESULT= 0 ; if(!qbevent)break;evnt(25345);}while(r); S_34000:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_LEFTSIDE)))||new_error){ if(qbevent){evnt(25346);if(r)goto S_34000;} S_34001:; if ((qbs_cleanup(qbs_tmp_base,-(func_val(_FUNC_EVALPREIF_STRING_LEFTSIDE)!= 0 )))||new_error){ if(qbevent){evnt(25347);if(r)goto S_34001;} do{ *_FUNC_EVALPREIF_LONG_LEFTRESULT= -1 ; if(!qbevent)break;evnt(25347);}while(r); } }else{ S_34005:; fornext_value3638= 0 ; fornext_finalvalue3638=*__INTEGER_USERDEFINECOUNT; fornext_step3638= 1 ; if (fornext_step3638<0) fornext_step_negative3638=1; else fornext_step_negative3638=0; if (new_error) goto fornext_error3638; goto fornext_entrylabel3638; while(1){ fornext_value3638=fornext_step3638+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3638: *_FUNC_EVALPREIF_LONG_I=fornext_value3638; if (fornext_step_negative3638){ if (fornext_value3638fornext_finalvalue3638) break; } fornext_error3638:; if(qbevent){evnt(25349);if(r)goto S_34005;} S_34006:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_LEFTSIDE)))||new_error){ if(qbevent){evnt(25350);if(r)goto S_34006;} do{ qbs_set(_FUNC_EVALPREIF_STRING_T,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25351);}while(r); S_34008:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("0",1)))&(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25352);if(r)goto S_34008;} do{ *_FUNC_EVALPREIF_LONG_LEFTRESULT= -1 ; if(!qbevent)break;evnt(25352);}while(r); do{ goto fornext_exit_3637; if(!qbevent)break;evnt(25352);}while(r); } } fornext_continue_3637:; } fornext_exit_3637:; } do{ *_FUNC_EVALPREIF_LONG_RIGHTRESULT= 0 ; if(!qbevent)break;evnt(25356);}while(r); S_34016:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_M)))||new_error){ if(qbevent){evnt(25357);if(r)goto S_34016;} S_34017:; if ((qbs_cleanup(qbs_tmp_base,-(func_val(_FUNC_EVALPREIF_STRING_M)!= 0 )))||new_error){ if(qbevent){evnt(25358);if(r)goto S_34017;} do{ *_FUNC_EVALPREIF_LONG_RIGHTRESULT= -1 ; if(!qbevent)break;evnt(25358);}while(r); } }else{ S_34021:; fornext_value3640= 0 ; fornext_finalvalue3640=*__INTEGER_USERDEFINECOUNT; fornext_step3640= 1 ; if (fornext_step3640<0) fornext_step_negative3640=1; else fornext_step_negative3640=0; if (new_error) goto fornext_error3640; goto fornext_entrylabel3640; while(1){ fornext_value3640=fornext_step3640+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3640: *_FUNC_EVALPREIF_LONG_I=fornext_value3640; if (fornext_step_negative3640){ if (fornext_value3640fornext_finalvalue3640) break; } fornext_error3640:; if(qbevent){evnt(25360);if(r)goto S_34021;} S_34022:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_M)))||new_error){ if(qbevent){evnt(25361);if(r)goto S_34022;} do{ qbs_set(_FUNC_EVALPREIF_STRING_T,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25362);}while(r); S_34024:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("0",1)))&(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25363);if(r)goto S_34024;} do{ *_FUNC_EVALPREIF_LONG_RIGHTRESULT= -1 ; if(!qbevent)break;evnt(25363);}while(r); do{ goto fornext_exit_3639; if(!qbevent)break;evnt(25363);}while(r); } } fornext_continue_3639:; } fornext_exit_3639:; } S_34031:; qbs_set(sc_3641,qbs_ltrim(qbs_rtrim(_FUNC_EVALPREIF_STRING_SYMBOL))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25367);if(r)goto S_34031;} S_34032:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3641,qbs_new_txt_len("AND",3))))||new_error){ if(qbevent){evnt(25368);if(r)goto S_34032;} S_34033:; if (((-(*_FUNC_EVALPREIF_LONG_LEFTRESULT!= 0 ))&(-(*_FUNC_EVALPREIF_LONG_RIGHTRESULT!= 0 )))||new_error){ if(qbevent){evnt(25369);if(r)goto S_34033;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25369);}while(r); }else{ do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25369);}while(r); } sc_ec_175_end:; goto sc_3641_end; } S_34038:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3641,qbs_new_txt_len("OR",2))))||new_error){ if(qbevent){evnt(25370);if(r)goto S_34038;} S_34039:; if (((-(*_FUNC_EVALPREIF_LONG_LEFTRESULT!= 0 ))|(-(*_FUNC_EVALPREIF_LONG_RIGHTRESULT!= 0 )))||new_error){ if(qbevent){evnt(25371);if(r)goto S_34039;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25371);}while(r); }else{ do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25371);}while(r); } sc_ec_176_end:; goto sc_3641_end; } S_34044:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3641,qbs_new_txt_len("XOR",3))))||new_error){ if(qbevent){evnt(25372);if(r)goto S_34044;} S_34045:; if ((-(*_FUNC_EVALPREIF_LONG_LEFTRESULT!=*_FUNC_EVALPREIF_LONG_RIGHTRESULT))||new_error){ if(qbevent){evnt(25373);if(r)goto S_34045;} do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25373);}while(r); }else{ do{ qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25373);}while(r); } sc_ec_177_end:; goto sc_3641_end; } sc_3641_end:; do{ qbs_set(_FUNC_EVALPREIF_STRING_TEMP,qbs_add(_FUNC_EVALPREIF_STRING_RESULT,_FUNC_EVALPREIF_STRING_RIGHTSIDE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25375);}while(r); dl_continue_3632:; }while(1); dl_exit_3632:; S_34053:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_TEMP)))||new_error){ if(qbevent){evnt(25378);if(r)goto S_34053;} do{ *_FUNC_EVALPREIF_LONG_EVALPREIF=qbr(func_val(_FUNC_EVALPREIF_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25379);}while(r); }else{ S_34056:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_TEMP,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(25381);if(r)goto S_34056;} do{ qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_new_txt_len("Invalid Resolution of $IF; check statements",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25381);}while(r); } S_34059:; fornext_value3643= 0 ; fornext_finalvalue3643=*__INTEGER_USERDEFINECOUNT; fornext_step3643= 1 ; if (fornext_step3643<0) fornext_step_negative3643=1; else fornext_step_negative3643=0; if (new_error) goto fornext_error3643; goto fornext_entrylabel3643; while(1){ fornext_value3643=fornext_step3643+(*_FUNC_EVALPREIF_LONG_I); fornext_entrylabel3643: *_FUNC_EVALPREIF_LONG_I=fornext_value3643; if (fornext_step_negative3643){ if (fornext_value3643fornext_finalvalue3643) break; } fornext_error3643:; if(qbevent){evnt(25382);if(r)goto S_34059;} S_34060:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_TEMP)))||new_error){ if(qbevent){evnt(25383);if(r)goto S_34060;} do{ qbs_set(_FUNC_EVALPREIF_STRING_T,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25384);}while(r); S_34062:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("0",1)))&(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25385);if(r)goto S_34062;} do{ *_FUNC_EVALPREIF_LONG_EVALPREIF= -1 ; if(!qbevent)break;evnt(25385);}while(r); do{ goto fornext_exit_3642; if(!qbevent)break;evnt(25385);}while(r); } } fornext_continue_3642:; } fornext_exit_3642:; } 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; return *_FUNC_EVALPREIF_LONG_EVALPREIF; } int32 FUNC_VERIFYNUMBER(qbs*_FUNC_VERIFYNUMBER_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 "data95.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_VERIFYNUMBER_STRING_T,qbs_ltrim(qbs_rtrim(_FUNC_VERIFYNUMBER_STRING_TEXT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25393);}while(r); do{ *_FUNC_VERIFYNUMBER_LONG_V=qbr(func_val(_FUNC_VERIFYNUMBER_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25394);}while(r); do{ qbs_set(_FUNC_VERIFYNUMBER_STRING_T1,qbs_ltrim(qbs_str((int32)(*_FUNC_VERIFYNUMBER_LONG_V)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25395);}while(r); S_34072:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_VERIFYNUMBER_STRING_T,_FUNC_VERIFYNUMBER_STRING_T1)))||new_error){ if(qbevent){evnt(25396);if(r)goto S_34072;} do{ *_FUNC_VERIFYNUMBER_LONG_VERIFYNUMBER= -1 ; if(!qbevent)break;evnt(25396);}while(r); } 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; return *_FUNC_VERIFYNUMBER_LONG_VERIFYNUMBER; } void SUB_INITIALISE_UDT_VARSTRINGS(qbs*_SUB_INITIALISE_UDT_VARSTRINGS_STRING_N,int32*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_UDT,int32*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_BUF,int32*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_BASE_OFFSET){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34075:; if ((~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(25400);if(r)goto S_34075;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25400);}while(r); } do{ *_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25401);}while(r); do{ *_SUB_INITIALISE_UDT_VARSTRINGS_LONG_OFFSET= 0 ; if(!qbevent)break;evnt(25402);}while(r); S_34080:; while((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)||new_error){ if(qbevent){evnt(25403);if(r)goto S_34080;} S_34081:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25404);if(r)goto S_34081;} S_34082:; if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25405);if(r)goto S_34082;} do{ SUB_WRITEBUFLINE(&(pass3647=*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*(qbs**)(((char*)",17),_SUB_INITIALISE_UDT_VARSTRINGS_STRING_N),qbs_new_txt_len(")+",2)),qbs_str((int64)(*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_BASE_OFFSET+*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len(") = qbs_new(0,0);",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25406);}while(r); } S_34085:; }else{ if (((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT){ if(qbevent){evnt(25408);if(r)goto S_34085;} do{ SUB_INITIALISE_UDT_VARSTRINGS(_SUB_INITIALISE_UDT_VARSTRINGS_STRING_N,&(pass3648=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ),_SUB_INITIALISE_UDT_VARSTRINGS_LONG_BUF,_SUB_INITIALISE_UDT_VARSTRINGS_LONG_OFFSET); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25409);}while(r); } } do{ *_SUB_INITIALISE_UDT_VARSTRINGS_LONG_OFFSET=*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_OFFSET+(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ); if(!qbevent)break;evnt(25411);}while(r); do{ *_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_INITIALISE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(25412);}while(r); dl_continue_3646:; } dl_exit_3646:; 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; } void SUB_FREE_UDT_VARSTRINGS(qbs*_SUB_FREE_UDT_VARSTRINGS_STRING_N,int32*_SUB_FREE_UDT_VARSTRINGS_LONG_UDT,int32*_SUB_FREE_UDT_VARSTRINGS_LONG_BUF,int32*_SUB_FREE_UDT_VARSTRINGS_LONG_BASE_OFFSET){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34091:; if ((~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(25417);if(r)goto S_34091;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25417);}while(r); } do{ *_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25418);}while(r); do{ *_SUB_FREE_UDT_VARSTRINGS_LONG_OFFSET= 0 ; if(!qbevent)break;evnt(25419);}while(r); S_34096:; while((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)||new_error){ if(qbevent){evnt(25420);if(r)goto S_34096;} S_34097:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25421);if(r)goto S_34097;} S_34098:; if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25422);if(r)goto S_34098;} do{ SUB_WRITEBUFLINE(&(pass3651=*_SUB_FREE_UDT_VARSTRINGS_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_free(*((qbs**)(((char*)",27),_SUB_FREE_UDT_VARSTRINGS_STRING_N),qbs_new_txt_len(")+",2)),qbs_str((int64)(*_SUB_FREE_UDT_VARSTRINGS_LONG_BASE_OFFSET+*_SUB_FREE_UDT_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len(")));",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25423);}while(r); } S_34101:; }else{ if (((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT){ if(qbevent){evnt(25425);if(r)goto S_34101;} do{ SUB_INITIALISE_UDT_VARSTRINGS(_SUB_FREE_UDT_VARSTRINGS_STRING_N,&(pass3652=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ),_SUB_FREE_UDT_VARSTRINGS_LONG_BUF,_SUB_FREE_UDT_VARSTRINGS_LONG_OFFSET); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25426);}while(r); } } do{ *_SUB_FREE_UDT_VARSTRINGS_LONG_OFFSET=*_SUB_FREE_UDT_VARSTRINGS_LONG_OFFSET+(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ); if(!qbevent)break;evnt(25428);}while(r); do{ *_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_FREE_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(25429);}while(r); dl_continue_3650:; } dl_exit_3650:; 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; } void SUB_CLEAR_UDT_WITH_VARSTRINGS(qbs*_SUB_CLEAR_UDT_WITH_VARSTRINGS_STRING_N,int32*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_UDT,int32*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BUF,int32*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BASE_OFFSET){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34107:; if ((~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(25434);if(r)goto S_34107;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25434);}while(r); } do{ *_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25435);}while(r); do{ *_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET= 0 ; if(!qbevent)break;evnt(25436);}while(r); S_34112:; while((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)||new_error){ if(qbevent){evnt(25437);if(r)goto S_34112;} S_34113:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25438);if(r)goto S_34113;} S_34114:; if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25439);if(r)goto S_34114;} do{ SUB_WRITEBUFLINE(&(pass3655=*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)(((char*)",18),_SUB_CLEAR_UDT_WITH_VARSTRINGS_STRING_N),qbs_new_txt_len(")+",2)),qbs_str((int64)(*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BASE_OFFSET+*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len("))->len=0;",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25440);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3656=*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset((char*)",14),_SUB_CLEAR_UDT_WITH_VARSTRINGS_STRING_N),qbs_new_txt_len("+",1)),qbs_str((int64)(*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BASE_OFFSET+*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len(",0,",3)),qbs_str((int64)(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25442);}while(r); } }else{ S_34120:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)||new_error){ if(qbevent){evnt(25445);if(r)goto S_34120;} do{ SUB_CLEAR_UDT_WITH_VARSTRINGS(_SUB_CLEAR_UDT_WITH_VARSTRINGS_STRING_N,&(pass3657=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ),_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BUF,&(pass3658=*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BASE_OFFSET+*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25446);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3659=*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memset((char*)",14),_SUB_CLEAR_UDT_WITH_VARSTRINGS_STRING_N),qbs_new_txt_len("+",1)),qbs_str((int64)(*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_BASE_OFFSET+*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len(",0,",3)),qbs_str((int64)(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25448);}while(r); } } do{ *_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET=*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_OFFSET+(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ); if(!qbevent)break;evnt(25451);}while(r); do{ *_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_CLEAR_UDT_WITH_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(25452);}while(r); dl_continue_3654:; } dl_exit_3654:; 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; } void SUB_INITIALISE_ARRAY_UDT_VARSTRINGS(qbs*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_N,int32*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_UDT,int32*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_BASE_OFFSET,qbs*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_BYTESPERELEMENT,qbs*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_ACC){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34129:; if ((~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(25458);if(r)goto S_34129;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25458);}while(r); } do{ *_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET=*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_BASE_OFFSET; if(!qbevent)break;evnt(25459);}while(r); do{ *_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25460);}while(r); S_34134:; while((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)||new_error){ if(qbevent){evnt(25461);if(r)goto S_34134;} S_34135:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25462);if(r)goto S_34135;} S_34136:; if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25463);if(r)goto S_34136;} do{ qbs_set(_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_ACC,func_chr( 13 )),func_chr( 10 )),qbs_new_txt_len("*(qbs**)(",9)),_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_N),qbs_new_txt_len("[0]+(",5)),_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_BYTESPERELEMENT),qbs_new_txt_len("-1)*tmp_long+",13)),qbs_str((int32)(*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len(")=qbs_new(0,0);",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25464);}while(r); } S_34139:; }else{ if (((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT){ if(qbevent){evnt(25466);if(r)goto S_34139;} do{ SUB_INITIALISE_ARRAY_UDT_VARSTRINGS(_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_N,&(pass3664=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ),_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET,_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_BYTESPERELEMENT,_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_STRING_ACC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25467);}while(r); } } do{ *_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET=*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET+(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ); if(!qbevent)break;evnt(25469);}while(r); do{ *_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_INITIALISE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(25470);}while(r); dl_continue_3663:; } dl_exit_3663:; 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; } void SUB_FREE_ARRAY_UDT_VARSTRINGS(qbs*_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_N,int32*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_UDT,int32*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_BASE_OFFSET,qbs*_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_BYTESPERELEMENT,qbs*_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_ACC){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34145:; if ((~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(25475);if(r)goto S_34145;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25475);}while(r); } do{ *_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET=*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_BASE_OFFSET; if(!qbevent)break;evnt(25476);}while(r); do{ *_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25477);}while(r); S_34150:; while((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)||new_error){ if(qbevent){evnt(25478);if(r)goto S_34150;} S_34151:; if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25479);if(r)goto S_34151;} S_34152:; if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25480);if(r)goto S_34152;} do{ qbs_set(_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_ACC,func_chr( 13 )),func_chr( 10 )),qbs_new_txt_len("qbs_free(*(qbs**)(",18)),_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_N),qbs_new_txt_len("[0]+(",5)),_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_BYTESPERELEMENT),qbs_new_txt_len("-1)*tmp_long+",13)),qbs_str((int32)(*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET))),qbs_new_txt_len("));",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25481);}while(r); } S_34155:; }else{ if (((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT){ if(qbevent){evnt(25483);if(r)goto S_34155;} do{ SUB_FREE_ARRAY_UDT_VARSTRINGS(_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_N,&(pass3669=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 ),_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET,_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_BYTESPERELEMENT,_SUB_FREE_ARRAY_UDT_VARSTRINGS_STRING_ACC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25484);}while(r); } } do{ *_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET=*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_OFFSET+(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ); if(!qbevent)break;evnt(25486);}while(r); do{ *_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_FREE_ARRAY_UDT_VARSTRINGS_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(25487);}while(r); dl_continue_3668:; } dl_exit_3668:; 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; } void SUB_COPY_FULL_UDT(qbs*_SUB_COPY_FULL_UDT_STRING_DST,qbs*_SUB_COPY_FULL_UDT_STRING_SRC,int32*_SUB_COPY_FULL_UDT_LONG_BUF,int32*_SUB_COPY_FULL_UDT_LONG_BASE_OFFSET,int32*_SUB_COPY_FULL_UDT_LONG_UDT){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34161:; if ((~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]))||new_error){ if(qbevent){evnt(25492);if(r)goto S_34161;} do{ SUB_WRITEBUFLINE(&(pass3672=*_SUB_COPY_FULL_UDT_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memcpy(",7),_SUB_COPY_FULL_UDT_STRING_DST),qbs_new_txt_len("+",1)),qbs_str((int32)(*_SUB_COPY_FULL_UDT_LONG_BASE_OFFSET))),qbs_new_txt_len(",",1)),_SUB_COPY_FULL_UDT_STRING_SRC),qbs_new_txt_len("+",1)),qbs_str((int32)(*_SUB_COPY_FULL_UDT_LONG_BASE_OFFSET))),qbs_new_txt_len(",",1)),qbs_str((int64)(((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_UDT)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/ 8 ))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25493);}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25494);}while(r); } do{ *_SUB_COPY_FULL_UDT_LONG_OFFSET=*_SUB_COPY_FULL_UDT_LONG_BASE_OFFSET; if(!qbevent)break;evnt(25496);}while(r); do{ *_SUB_COPY_FULL_UDT_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25497);}while(r); S_34167:; while((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)||new_error){ if(qbevent){evnt(25498);if(r)goto S_34167;} S_34168:; if ((((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)> 0 )))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 )))||new_error){ if(qbevent){evnt(25499);if(r)goto S_34168;} do{ SUB_WRITEBUFLINE(&(pass3674=*_SUB_COPY_FULL_UDT_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(*(qbs**)(",17),_SUB_COPY_FULL_UDT_STRING_DST),qbs_new_txt_len("+",1)),qbs_str((int32)(*_SUB_COPY_FULL_UDT_LONG_OFFSET))),qbs_new_txt_len("), *(qbs**)(",12)),_SUB_COPY_FULL_UDT_STRING_SRC),qbs_new_txt_len("+",1)),qbs_str((int32)(*_SUB_COPY_FULL_UDT_LONG_OFFSET))),qbs_new_txt_len("));",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25500);}while(r); S_34170:; }else{ if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)> 0 ))){ if(qbevent){evnt(25501);if(r)goto S_34170;} do{ SUB_COPY_FULL_UDT(_SUB_COPY_FULL_UDT_STRING_DST,_SUB_COPY_FULL_UDT_STRING_SRC,__LONG_MAINTXTBUF,_SUB_COPY_FULL_UDT_LONG_OFFSET,&(pass3675=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 511 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25502);}while(r); }else{ do{ SUB_WRITEBUFLINE(&(pass3676=*_SUB_COPY_FULL_UDT_LONG_BUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("memcpy((",8),_SUB_COPY_FULL_UDT_STRING_DST),qbs_new_txt_len("+",1)),qbs_str((int32)(*_SUB_COPY_FULL_UDT_LONG_OFFSET))),qbs_new_txt_len("),(",3)),_SUB_COPY_FULL_UDT_STRING_SRC),qbs_new_txt_len("+",1)),qbs_str((int32)(*_SUB_COPY_FULL_UDT_LONG_OFFSET))),qbs_new_txt_len("),",2)),qbs_str((int64)(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ))),qbs_new_txt_len(");",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25504);}while(r); } } do{ *_SUB_COPY_FULL_UDT_LONG_OFFSET=*_SUB_COPY_FULL_UDT_LONG_OFFSET+(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/ 8 ); if(!qbevent)break;evnt(25506);}while(r); do{ *_SUB_COPY_FULL_UDT_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_COPY_FULL_UDT_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])]; if(!qbevent)break;evnt(25507);}while(r); dl_continue_3673:; } dl_exit_3673:; 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; } void SUB_DUMP_UDTS(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_DUMP_UDTS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25512);}while(r); do{ sub_open(qbs_new_txt_len("types.txt",9), 4 ,NULL,NULL,*_SUB_DUMP_UDTS_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25513);}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_DUMP_UDTS_LONG_FH; if (new_error) goto skip3677; sub_file_print(tmp_fileno,qbs_new_txt_len("Name Size Align? Next Var?",32), 0, 0, 1); if (new_error) goto skip3677; skip3677: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25514);}while(r); S_34181:; fornext_value3679= 1 ; fornext_finalvalue3679=*__LONG_LASTTYPE; fornext_step3679= 1 ; if (fornext_step3679<0) fornext_step_negative3679=1; else fornext_step_negative3679=0; if (new_error) goto fornext_error3679; goto fornext_entrylabel3679; while(1){ fornext_value3679=fornext_step3679+(*_SUB_DUMP_UDTS_LONG_I); fornext_entrylabel3679: *_SUB_DUMP_UDTS_LONG_I=fornext_value3679; if (fornext_step_negative3679){ if (fornext_value3679fornext_finalvalue3679) break; } fornext_error3679:; if(qbevent){evnt(25515);if(r)goto S_34181;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_DUMP_UDTS_LONG_FH; if (new_error) goto skip3680; sub_file_print(tmp_fileno,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXNAME[0]))[(array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_STRING256_UDTXNAME[4],__ARRAY_STRING256_UDTXNAME[5]))*256],256,1)), 0, 1, 0); if (new_error) goto skip3680; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])])), 1, 1, 0); if (new_error) goto skip3680; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])), 1, 1, 0); if (new_error) goto skip3680; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])])), 1, 1, 0); if (new_error) goto skip3680; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])), 1, 0, 1); if (new_error) goto skip3680; skip3680: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25516);}while(r); fornext_continue_3678:; } fornext_exit_3678:; do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_DUMP_UDTS_LONG_FH; if (new_error) goto skip3681; sub_file_print(tmp_fileno,qbs_new_txt_len("Name Size Align? Next Type Tsize Arr",45), 0, 0, 1); if (new_error) goto skip3681; skip3681: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25518);}while(r); S_34185:; fornext_value3683= 1 ; fornext_finalvalue3683=*__LONG_LASTTYPEELEMENT; fornext_step3683= 1 ; if (fornext_step3683<0) fornext_step_negative3683=1; else fornext_step_negative3683=0; if (new_error) goto fornext_error3683; goto fornext_entrylabel3683; while(1){ fornext_value3683=fornext_step3683+(*_SUB_DUMP_UDTS_LONG_I); fornext_entrylabel3683: *_SUB_DUMP_UDTS_LONG_I=fornext_value3683; if (fornext_step_negative3683){ if (fornext_value3683fornext_finalvalue3683) break; } fornext_error3683:; if(qbevent){evnt(25519);if(r)goto S_34185;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_DUMP_UDTS_LONG_FH; if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTENAME[0]))[(array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_STRING256_UDTENAME[4],__ARRAY_STRING256_UDTENAME[5]))*256],256,1)), 0, 1, 0); if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])])), 1, 1, 0); if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_str((int16)(((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_INTEGER_UDTEBYTEALIGN[4],__ARRAY_INTEGER_UDTEBYTEALIGN[5])])), 1, 1, 0); if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])])), 1, 1, 0); if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])])), 1, 1, 0); if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])])), 1, 1, 0); if (new_error) goto skip3684; sub_file_print(tmp_fileno,qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_DUMP_UDTS_LONG_I)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])])), 1, 0, 1); if (new_error) goto skip3684; skip3684: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25520);}while(r); fornext_continue_3682:; } fornext_exit_3682:; do{ sub_close(*_SUB_DUMP_UDTS_LONG_FH,1); if(!qbevent)break;evnt(25522);}while(r); 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_MANAGEVARIABLELIST(qbs*_SUB_MANAGEVARIABLELIST_STRING___NAME,qbs*_SUB_MANAGEVARIABLELIST_STRING___CNAME,int32*_SUB_MANAGEVARIABLELIST_LONG_LOCALINDEX,int8*_SUB_MANAGEVARIABLELIST_BYTE_ACTION){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25526);}while(r); do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_rtrim(_SUB_MANAGEVARIABLELIST_STRING___NAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25527);}while(r); do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_CNAME,qbs_rtrim(_SUB_MANAGEVARIABLELIST_STRING___CNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25528);}while(r); S_34192:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_MANAGEVARIABLELIST_STRING_CNAME->len== 0 )))||new_error){ if(qbevent){evnt(25530);if(r)goto S_34192;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25530);}while(r); } do{ *_SUB_MANAGEVARIABLELIST_LONG_FINDITEM=func_instr(NULL,_SUB_MANAGEVARIABLELIST_STRING_CNAME,qbs_new_txt_len("[",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25532);}while(r); S_34196:; if ((*_SUB_MANAGEVARIABLELIST_LONG_FINDITEM)||new_error){ if(qbevent){evnt(25533);if(r)goto S_34196;} do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_CNAME,qbs_left(_SUB_MANAGEVARIABLELIST_STRING_CNAME,*_SUB_MANAGEVARIABLELIST_LONG_FINDITEM- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25534);}while(r); } do{ *_SUB_MANAGEVARIABLELIST_LONG_FOUND= 0 ; if(!qbevent)break;evnt(25537);}while(r); S_34200:; fornext_value3689= 1 ; fornext_finalvalue3689=*__LONG_TOTALVARIABLESCREATED; fornext_step3689= 1 ; if (fornext_step3689<0) fornext_step_negative3689=1; else fornext_step_negative3689=0; if (new_error) goto fornext_error3689; goto fornext_entrylabel3689; while(1){ fornext_value3689=fornext_step3689+(*_SUB_MANAGEVARIABLELIST_LONG_I); fornext_entrylabel3689: *_SUB_MANAGEVARIABLELIST_LONG_I=fornext_value3689; if (fornext_step_negative3689){ if (fornext_value3689fornext_finalvalue3689) break; } fornext_error3689:; if(qbevent){evnt(25538);if(r)goto S_34200;} S_34201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+40))),_SUB_MANAGEVARIABLELIST_STRING_CNAME)))||new_error){ if(qbevent){evnt(25539);if(r)goto S_34201;} do{ *_SUB_MANAGEVARIABLELIST_LONG_FOUND= -1 ; if(!qbevent)break;evnt(25539);}while(r); do{ goto fornext_exit_3688; if(!qbevent)break;evnt(25539);}while(r); } fornext_continue_3688:; } fornext_exit_3688:; S_34206:; if(qbevent){evnt(25542);if(r)goto S_34206;} S_34207:; if (((*_SUB_MANAGEVARIABLELIST_BYTE_ACTION==( 0 )))||new_error){ if(qbevent){evnt(25543);if(r)goto S_34207;} S_34208:; if ((-(*_SUB_MANAGEVARIABLELIST_LONG_FOUND== 0 ))||new_error){ if(qbevent){evnt(25544);if(r)goto S_34208;} S_34209:; if ((-(*_SUB_MANAGEVARIABLELIST_LONG_I>func_ubound(__ARRAY_UDT_USEDVARIABLELIST,1,1)))||new_error){ if(qbevent){evnt(25545);if(r)goto S_34209;} do{ if (__ARRAY_UDT_USEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_USEDVARIABLELIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_USEDVARIABLELIST[2]&1){ preserved_elements=__ARRAY_UDT_USEDVARIABLELIST[5]; } else preserved_elements=0; __ARRAY_UDT_USEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_USEDVARIABLELIST[5]=(func_ubound(__ARRAY_UDT_USEDVARIABLELIST,1,1)+ 999 )-__ARRAY_UDT_USEDVARIABLELIST[4]+1; __ARRAY_UDT_USEDVARIABLELIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_UDT_USEDVARIABLELIST[5]; if (tmp_long2 0 ))||new_error){ if(qbevent){evnt(25556);if(r)goto S_34219;} do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12))=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])]; if(!qbevent)break;evnt(25557);}while(r); do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME,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(25558);}while(r); do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])),_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25559);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+56))),_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25560);}while(r); }else{ do{ *__LONG_TOTALMAINVARIABLESCREATED=*__LONG_TOTALMAINVARIABLESCREATED+ 1 ; if(!qbevent)break;evnt(25562);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12))= 0 ; if(!qbevent)break;evnt(25563);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+56))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25564);}while(r); } do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+16))=*__LONG_SUBFUNCN; if(!qbevent)break;evnt(25566);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),__STRING_SUBFUNC); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25567);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),FUNC_ID2FULLTYPENAME()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25568);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+40))),_SUB_MANAGEVARIABLELIST_STRING_CNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25569);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+20))=*_SUB_MANAGEVARIABLELIST_LONG_LOCALINDEX; if(!qbevent)break;evnt(25570);}while(r); S_34234:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_MANAGEVARIABLELIST_STRING_NAME,__STRING_FIX046,0)))||new_error){ if(qbevent){evnt(25573);if(r)goto S_34234;} do{ *_SUB_MANAGEVARIABLELIST_LONG_X=func_instr(NULL,_SUB_MANAGEVARIABLELIST_STRING_NAME,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25574);}while(r); do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_add(qbs_add(qbs_left(_SUB_MANAGEVARIABLELIST_STRING_NAME,*_SUB_MANAGEVARIABLELIST_LONG_X- 1 ),qbs_new_txt_len(".",1)),qbs_right(_SUB_MANAGEVARIABLELIST_STRING_NAME,_SUB_MANAGEVARIABLELIST_STRING_NAME->len-*_SUB_MANAGEVARIABLELIST_LONG_X+ 1 -__STRING_FIX046->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25574);}while(r); dl_continue_3692:; } dl_exit_3692:; S_34238:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))->len)> 0 )))||new_error){ if(qbevent){evnt(25577);if(r)goto S_34238;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_add(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(528)),8,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25578);}while(r); S_34240:; }else{ if (qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1)))->len)> 0 ))){ if(qbevent){evnt(25579);if(r)goto S_34240;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_add(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(520)),8,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25580);}while(r); }else{ do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),_SUB_MANAGEVARIABLELIST_STRING_NAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25582);}while(r); } } S_34245:; if (((-(*(int16*)(((char*)__UDT_ID)+(516))> 0 )))||new_error){ if(qbevent){evnt(25585);if(r)goto S_34245;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))= -1 ; if(!qbevent)break;evnt(25586);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_new_txt_len("()",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25587);}while(r); }else{ do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))= 0 ; if(!qbevent)break;evnt(25589);}while(r); } do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25591);}while(r); do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))= 0 ; if(!qbevent)break;evnt(25592);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25593);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25594);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25595);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25596);}while(r); do{ *__LONG_TOTALVARIABLESCREATED=*__LONG_TOTALVARIABLESCREATED+ 1 ; if(!qbevent)break;evnt(25597);}while(r); do{ qbs_set(_SUB_MANAGEVARIABLELIST_STRING_TEMP,qbs_add(qbs_add(l2string( -1 ),l2string(_SUB_MANAGEVARIABLELIST_STRING_CNAME->len)),_SUB_MANAGEVARIABLELIST_STRING_CNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25599);}while(r); do{ *_SUB_MANAGEVARIABLELIST_LONG_FOUND=func_instr(NULL,__STRING_BACKUPVARIABLEWATCHLIST,_SUB_MANAGEVARIABLELIST_STRING_TEMP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25600);}while(r); S_34260:; if ((*_SUB_MANAGEVARIABLELIST_LONG_FOUND)||new_error){ if(qbevent){evnt(25601);if(r)goto S_34260;} do{ *_SUB_MANAGEVARIABLELIST_LONG_J=string2l(func_mid(__STRING_BACKUPVARIABLEWATCHLIST,*_SUB_MANAGEVARIABLELIST_LONG_FOUND+_SUB_MANAGEVARIABLELIST_STRING_TEMP->len, 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25604);}while(r); S_34262:; if ((qbs_cleanup(qbs_tmp_base,((-((*(qbs**)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+88)))->len> 0 ))&(qbs_equal(__STRING_BACKUPTYPEDEFINITIONS,__STRING_TYPEDEFINITIONS)))|(-((*(qbs**)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+88)))->len== 0 ))))||new_error){ if(qbevent){evnt(25608);if(r)goto S_34262;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))=*(int8*)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+29)); if(!qbevent)break;evnt(25609);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+72)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25610);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+80)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25611);}while(r); do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))=*(int8*)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+31)); if(!qbevent)break;evnt(25612);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+88)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25613);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+96)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25614);}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*120+104)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25615);}while(r); } } } sc_ec_178_end:; goto sc_3690_end; } S_34274:; if ((*_SUB_MANAGEVARIABLELIST_LONG_FOUND)||new_error){ if(qbevent){evnt(25620);if(r)goto S_34274;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+28))= -1 ; if(!qbevent)break;evnt(25621);}while(r); } sc_3690_end:; 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_ADDWARNING(int32*_SUB_ADDWARNING_LONG_WHICHLINENUMBER,int32*_SUB_ADDWARNING_LONG_INCLUDELEVEL,int32*_SUB_ADDWARNING_LONG_INCLINENUMBER,qbs*_SUB_ADDWARNING_STRING_INCFILENAME,qbs*_SUB_ADDWARNING_STRING_HEADER,qbs*_SUB_ADDWARNING_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 "data104.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__BYTE_WARNINGSISSUED= -1 ; if(!qbevent)break;evnt(25627);}while(r); do{ *__LONG_TOTALWARNINGS=*__LONG_TOTALWARNINGS+ 1 ; if(!qbevent)break;evnt(25628);}while(r); S_34280:; if (((-(*__LONG_IDEMODE== 0 ))&*__BYTE_SHOWWARNINGS)||new_error){ if(qbevent){evnt(25630);if(r)goto S_34280;} do{ qbs_set(_SUB_ADDWARNING_STRING_THISSOURCE,FUNC_GETFILEPATH(__STRING_CMDLINEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25631);}while(r); do{ qbs_set(_SUB_ADDWARNING_STRING_THISSOURCE,func_mid(__STRING_CMDLINEFILE,_SUB_ADDWARNING_STRING_THISSOURCE->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25632);}while(r); do{ qbs_set(_SUB_ADDWARNING_STRING_THISINCNAME,FUNC_GETFILEPATH(_SUB_ADDWARNING_STRING_INCFILENAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25633);}while(r); do{ qbs_set(_SUB_ADDWARNING_STRING_THISINCNAME,func_mid(_SUB_ADDWARNING_STRING_INCFILENAME,_SUB_ADDWARNING_STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25634);}while(r); S_34285:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(25636);if(r)goto S_34285;} do{ qbg_sub_color( 15 ,NULL,NULL,1); if(!qbevent)break;evnt(25636);}while(r); } S_34288:; if (((-(*_SUB_ADDWARNING_LONG_INCLUDELEVEL> 0 ))&(-(*_SUB_ADDWARNING_LONG_INCLINENUMBER> 0 )))||new_error){ if(qbevent){evnt(25637);if(r)goto S_34288;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_ADDWARNING_STRING_THISINCNAME); if (new_error) goto skip3702; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len(":",1)); if (new_error) goto skip3702; makefit(tqbs); qbs_print(tqbs,0); skip3702: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25638);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,FUNC_STR2(_SUB_ADDWARNING_LONG_INCLINENUMBER)); if (new_error) goto skip3703; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len(": ",2)); if (new_error) goto skip3703; makefit(tqbs); qbs_print(tqbs,0); skip3703: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25639);}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_ADDWARNING_STRING_THISSOURCE); if (new_error) goto skip3704; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len(":",1)); if (new_error) goto skip3704; makefit(tqbs); qbs_print(tqbs,0); skip3704: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25641);}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,FUNC_STR2(_SUB_ADDWARNING_LONG_WHICHLINENUMBER)); if (new_error) goto skip3705; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,qbs_new_txt_len(": ",2)); if (new_error) goto skip3705; makefit(tqbs); qbs_print(tqbs,0); skip3705: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25642);}while(r); } S_34295:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(25645);if(r)goto S_34295;} do{ qbg_sub_color( 13 ,NULL,NULL,1); if(!qbevent)break;evnt(25645);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("warning: ",9)); if (new_error) goto skip3706; makefit(tqbs); qbs_print(tqbs,0); skip3706: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25646);}while(r); S_34299:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(25647);if(r)goto S_34299;} do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(25647);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_ADDWARNING_STRING_HEADER); if (new_error) goto skip3707; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip3707: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25648);}while(r); S_34303:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_ADDWARNING_STRING_TEXT->len> 0 )))||new_error){ if(qbevent){evnt(25650);if(r)goto S_34303;} S_34304:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(25651);if(r)goto S_34304;} do{ qbg_sub_color( 2 ,NULL,NULL,1); if(!qbevent)break;evnt(25651);}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space( 4 )); if (new_error) goto skip3709; makefit(tqbs); qbs_print(tqbs,0); qbs_set(tqbs,_SUB_ADDWARNING_STRING_TEXT); if (new_error) goto skip3709; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip3709: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25652);}while(r); S_34308:; if ((~(*__BYTE_MONOCHROMELOGGINGMODE))||new_error){ if(qbevent){evnt(25653);if(r)goto S_34308;} do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(25653);}while(r); } } S_34312:; }else{ if (*__LONG_IDEMODE){ if(qbevent){evnt(25655);if(r)goto S_34312;} S_34313:; if ((~(*__BYTE_IGNOREWARNINGS))||new_error){ if(qbevent){evnt(25656);if(r)goto S_34313;} S_34314:; if ((-(*_SUB_ADDWARNING_LONG_WHICHLINENUMBER>*__LONG_MAXLINENUMBER))||new_error){ if(qbevent){evnt(25657);if(r)goto S_34314;} do{ *__LONG_MAXLINENUMBER=*_SUB_ADDWARNING_LONG_WHICHLINENUMBER; if(!qbevent)break;evnt(25657);}while(r); } S_34317:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_LASTWARNINGHEADER,_SUB_ADDWARNING_STRING_HEADER)))||new_error){ if(qbevent){evnt(25658);if(r)goto S_34317;} do{ qbs_set(__STRING_LASTWARNINGHEADER,_SUB_ADDWARNING_STRING_HEADER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25659);}while(r); do{ return_point[next_return_point++]=6; if (next_return_point>=return_points) more_return_points(); goto LABEL_INCREASEWARNINGCOUNT; RETURN_6:; if(!qbevent)break;evnt(25660);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_STRING_WARNING[4],__ARRAY_STRING_WARNING[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_WARNING[0]))[tmp_long])),_SUB_ADDWARNING_STRING_HEADER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25661);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5]); if (!new_error) ((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25662);}while(r); } do{ return_point[next_return_point++]=7; if (next_return_point>=return_points) more_return_points(); goto LABEL_INCREASEWARNINGCOUNT; RETURN_7:; if(!qbevent)break;evnt(25665);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_STRING_WARNING[4],__ARRAY_STRING_WARNING[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_WARNING[0]))[tmp_long])),_SUB_ADDWARNING_STRING_TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25666);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5]); if (!new_error) ((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[tmp_long]=*_SUB_ADDWARNING_LONG_WHICHLINENUMBER; if(!qbevent)break;evnt(25667);}while(r); S_34326:; if ((-(*_SUB_ADDWARNING_LONG_INCLUDELEVEL> 0 ))||new_error){ if(qbevent){evnt(25668);if(r)goto S_34326;} do{ qbs_set(_SUB_ADDWARNING_STRING_THISINCNAME,FUNC_GETFILEPATH(_SUB_ADDWARNING_STRING_INCFILENAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25669);}while(r); do{ qbs_set(_SUB_ADDWARNING_STRING_THISINCNAME,func_mid(_SUB_ADDWARNING_STRING_INCFILENAME,_SUB_ADDWARNING_STRING_THISINCNAME->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25670);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5]); if (!new_error) ((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[tmp_long]=*_SUB_ADDWARNING_LONG_INCLINENUMBER; if(!qbevent)break;evnt(25671);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_STRING_WARNINGINCFILES[4],__ARRAY_STRING_WARNINGINCFILES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[tmp_long])),_SUB_ADDWARNING_STRING_THISINCNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25672);}while(r); }else{ do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5]); if (!new_error) ((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25674);}while(r); do{ tmp_long=array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_STRING_WARNINGINCFILES[4],__ARRAY_STRING_WARNINGINCFILES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25675);}while(r); } } } } do{ goto exit_subfunc; if(!qbevent)break;evnt(25679);}while(r); LABEL_INCREASEWARNINGCOUNT:; if(qbevent){evnt(25680);r=0;} do{ *__LONG_WARNINGLISTITEMS=*__LONG_WARNINGLISTITEMS+ 1 ; if(!qbevent)break;evnt(25681);}while(r); S_34339:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_WARNINGLISTITEMS>func_ubound(__ARRAY_STRING_WARNING,1,1))))||new_error){ if(qbevent){evnt(25682);if(r)goto S_34339;} do{ if (__ARRAY_STRING_WARNING[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_WARNING)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_WARNING[2]&1){ preserved_elements=__ARRAY_STRING_WARNING[5]; } else preserved_elements=0; __ARRAY_STRING_WARNING[4]= 0 ; __ARRAY_STRING_WARNING[5]=(*__LONG_WARNINGLISTITEMS+ 999 )-__ARRAY_STRING_WARNING[4]+1; __ARRAY_STRING_WARNING[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_WARNING[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_WARNINGLINES[2]&1){ preserved_elements=__ARRAY_LONG_WARNINGLINES[5]; } else preserved_elements=0; __ARRAY_LONG_WARNINGLINES[4]= 0 ; __ARRAY_LONG_WARNINGLINES[5]=(*__LONG_WARNINGLISTITEMS+ 999 )-__ARRAY_LONG_WARNINGLINES[4]+1; __ARRAY_LONG_WARNINGLINES[6]=1; if (__ARRAY_LONG_WARNINGLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_WARNINGLINES[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_WARNINGLINES[0])); tmp_long=__ARRAY_LONG_WARNINGLINES[5]; __ARRAY_LONG_WARNINGLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_WARNINGLINES[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_WARNINGINCLINES[2]&1){ preserved_elements=__ARRAY_LONG_WARNINGINCLINES[5]; } else preserved_elements=0; __ARRAY_LONG_WARNINGINCLINES[4]= 0 ; __ARRAY_LONG_WARNINGINCLINES[5]=(*__LONG_WARNINGLISTITEMS+ 999 )-__ARRAY_LONG_WARNINGINCLINES[4]+1; __ARRAY_LONG_WARNINGINCLINES[6]=1; if (__ARRAY_LONG_WARNINGINCLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_WARNINGINCLINES[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_WARNINGINCLINES[0])); tmp_long=__ARRAY_LONG_WARNINGINCLINES[5]; __ARRAY_LONG_WARNINGINCLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_WARNINGINCLINES[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_WARNINGINCFILES[2]&1){ preserved_elements=__ARRAY_STRING_WARNINGINCFILES[5]; } else preserved_elements=0; __ARRAY_STRING_WARNINGINCFILES[4]= 0 ; __ARRAY_STRING_WARNINGINCFILES[5]=(*__LONG_WARNINGLISTITEMS+ 999 )-__ARRAY_STRING_WARNINGINCFILES[4]+1; __ARRAY_STRING_WARNINGINCFILES[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_WARNINGINCFILES[5]; if (tmp_long2=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_SCASE(qbs*_FUNC_SCASE_STRING_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 "data105.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34346:; if ((*__BYTE_IDEAUTOLAYOUTKWCAPITALS)||new_error){ if(qbevent){evnt(25692);if(r)goto S_34346;} do{ qbs_set(_FUNC_SCASE_STRING_SCASE,qbs_ucase(_FUNC_SCASE_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25692);}while(r); }else{ do{ qbs_set(_FUNC_SCASE_STRING_SCASE,_FUNC_SCASE_STRING_T); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25692);}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; qbs_maketmp(_FUNC_SCASE_STRING_SCASE);return _FUNC_SCASE_STRING_SCASE; } qbs* FUNC_SCASE2(qbs*_FUNC_SCASE2_STRING_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 "data106.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_SCASE2_STRING_SEPARATOR,__STRING1_SP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25696);}while(r); S_34352:; if ((*__BYTE_IDEAUTOLAYOUTKWCAPITALS)||new_error){ if(qbevent){evnt(25697);if(r)goto S_34352;} do{ qbs_set(_FUNC_SCASE2_STRING_SCASE2,qbs_ucase(_FUNC_SCASE2_STRING_T)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25698);}while(r); }else{ do{ *_FUNC_SCASE2_LONG_NEWWORD= -1 ; if(!qbevent)break;evnt(25700);}while(r); do{ qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25701);}while(r); S_34357:; fornext_value3714= 1 ; fornext_finalvalue3714=_FUNC_SCASE2_STRING_T->len; fornext_step3714= 1 ; if (fornext_step3714<0) fornext_step_negative3714=1; else fornext_step_negative3714=0; if (new_error) goto fornext_error3714; goto fornext_entrylabel3714; while(1){ fornext_value3714=fornext_step3714+(*_FUNC_SCASE2_LONG_I); fornext_entrylabel3714: *_FUNC_SCASE2_LONG_I=fornext_value3714; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3714){ if (fornext_value3714fornext_finalvalue3714) break; } fornext_error3714:; if(qbevent){evnt(25702);if(r)goto S_34357;} do{ qbs_set(_FUNC_SCASE2_STRING_S,func_mid(_FUNC_SCASE2_STRING_T,*_FUNC_SCASE2_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25703);}while(r); S_34359:; if ((*_FUNC_SCASE2_LONG_NEWWORD)||new_error){ if(qbevent){evnt(25704);if(r)goto S_34359;} S_34360:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_SCASE2_STRING_S,qbs_new_txt_len("_",1)))|(qbs_equal(_FUNC_SCASE2_STRING_S,_FUNC_SCASE2_STRING_SEPARATOR))))||new_error){ if(qbevent){evnt(25705);if(r)goto S_34360;} do{ qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,_FUNC_SCASE2_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25706);}while(r); }else{ do{ qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,qbs_ucase(_FUNC_SCASE2_STRING_S))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25708);}while(r); do{ *_FUNC_SCASE2_LONG_NEWWORD= 0 ; if(!qbevent)break;evnt(25709);}while(r); } }else{ S_34367:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SCASE2_STRING_S,_FUNC_SCASE2_STRING_SEPARATOR)))||new_error){ if(qbevent){evnt(25712);if(r)goto S_34367;} do{ qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,_FUNC_SCASE2_STRING_SEPARATOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25713);}while(r); do{ *_FUNC_SCASE2_LONG_NEWWORD= -1 ; if(!qbevent)break;evnt(25714);}while(r); }else{ do{ qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,qbs_lcase(_FUNC_SCASE2_STRING_S))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25716);}while(r); } } fornext_continue_3713:; } fornext_exit_3713:; do{ qbs_set(_FUNC_SCASE2_STRING_SCASE2,_FUNC_SCASE2_STRING_TEMP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25720);}while(r); } 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_maketmp(_FUNC_SCASE2_STRING_SCASE2);return _FUNC_SCASE2_STRING_SCASE2; } void SUB_INCREASEUDTARRAYS(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_INCREASEUDTARRAYS_LONG_X=func_ubound(__ARRAY_STRING256_UDTXNAME,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25725);}while(r); do{ if (__ARRAY_STRING256_UDTXNAME[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING256_UDTXNAME)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING256_UDTXNAME[2]&1){ preserved_elements=__ARRAY_STRING256_UDTXNAME[5]; } else preserved_elements=0; __ARRAY_STRING256_UDTXNAME[4]= 0 ; __ARRAY_STRING256_UDTXNAME[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_STRING256_UDTXNAME[4]+1; __ARRAY_STRING256_UDTXNAME[6]=1; if (__ARRAY_STRING256_UDTXNAME[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_STRING256_UDTXNAME[0]),preserved_elements*256); cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTXNAME[0])); tmp_long=__ARRAY_STRING256_UDTXNAME[5]; __ARRAY_STRING256_UDTXNAME[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*256); memcpy((void*)(__ARRAY_STRING256_UDTXNAME[0]),redim_preserve_cmem_buffer,preserved_elements*256); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING256_UDTXCNAME[2]&1){ preserved_elements=__ARRAY_STRING256_UDTXCNAME[5]; } else preserved_elements=0; __ARRAY_STRING256_UDTXCNAME[4]= 0 ; __ARRAY_STRING256_UDTXCNAME[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_STRING256_UDTXCNAME[4]+1; __ARRAY_STRING256_UDTXCNAME[6]=1; if (__ARRAY_STRING256_UDTXCNAME[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_STRING256_UDTXCNAME[0]),preserved_elements*256); cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTXCNAME[0])); tmp_long=__ARRAY_STRING256_UDTXCNAME[5]; __ARRAY_STRING256_UDTXCNAME[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*256); memcpy((void*)(__ARRAY_STRING256_UDTXCNAME[0]),redim_preserve_cmem_buffer,preserved_elements*256); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTXSIZE[2]&1){ preserved_elements=__ARRAY_LONG_UDTXSIZE[5]; } else preserved_elements=0; __ARRAY_LONG_UDTXSIZE[4]= 0 ; __ARRAY_LONG_UDTXSIZE[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTXSIZE[4]+1; __ARRAY_LONG_UDTXSIZE[6]=1; if (__ARRAY_LONG_UDTXSIZE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTXSIZE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTXSIZE[0])); tmp_long=__ARRAY_LONG_UDTXSIZE[5]; __ARRAY_LONG_UDTXSIZE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTXSIZE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&1){ preserved_elements=__ARRAY_INTEGER_UDTXBYTEALIGN[5]; } else preserved_elements=0; __ARRAY_INTEGER_UDTXBYTEALIGN[4]= 0 ; __ARRAY_INTEGER_UDTXBYTEALIGN[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_INTEGER_UDTXBYTEALIGN[4]+1; __ARRAY_INTEGER_UDTXBYTEALIGN[6]=1; if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]),preserved_elements*2); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0])); tmp_long=__ARRAY_INTEGER_UDTXBYTEALIGN[5]; __ARRAY_INTEGER_UDTXBYTEALIGN[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2); memcpy((void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]),redim_preserve_cmem_buffer,preserved_elements*2); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTXNEXT[2]&1){ preserved_elements=__ARRAY_LONG_UDTXNEXT[5]; } else preserved_elements=0; __ARRAY_LONG_UDTXNEXT[4]= 0 ; __ARRAY_LONG_UDTXNEXT[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTXNEXT[4]+1; __ARRAY_LONG_UDTXNEXT[6]=1; if (__ARRAY_LONG_UDTXNEXT[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTXNEXT[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTXNEXT[0])); tmp_long=__ARRAY_LONG_UDTXNEXT[5]; __ARRAY_LONG_UDTXNEXT[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTXNEXT[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER_UDTXVARIABLE[2]&1){ preserved_elements=__ARRAY_INTEGER_UDTXVARIABLE[5]; } else preserved_elements=0; __ARRAY_INTEGER_UDTXVARIABLE[4]= 0 ; __ARRAY_INTEGER_UDTXVARIABLE[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_INTEGER_UDTXVARIABLE[4]+1; __ARRAY_INTEGER_UDTXVARIABLE[6]=1; if (__ARRAY_INTEGER_UDTXVARIABLE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER_UDTXVARIABLE[0]),preserved_elements*2); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTXVARIABLE[0])); tmp_long=__ARRAY_INTEGER_UDTXVARIABLE[5]; __ARRAY_INTEGER_UDTXVARIABLE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2); memcpy((void*)(__ARRAY_INTEGER_UDTXVARIABLE[0]),redim_preserve_cmem_buffer,preserved_elements*2); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING256_UDTENAME[2]&1){ preserved_elements=__ARRAY_STRING256_UDTENAME[5]; } else preserved_elements=0; __ARRAY_STRING256_UDTENAME[4]= 0 ; __ARRAY_STRING256_UDTENAME[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_STRING256_UDTENAME[4]+1; __ARRAY_STRING256_UDTENAME[6]=1; if (__ARRAY_STRING256_UDTENAME[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_STRING256_UDTENAME[0]),preserved_elements*256); cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTENAME[0])); tmp_long=__ARRAY_STRING256_UDTENAME[5]; __ARRAY_STRING256_UDTENAME[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*256); memcpy((void*)(__ARRAY_STRING256_UDTENAME[0]),redim_preserve_cmem_buffer,preserved_elements*256); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING256_UDTECNAME[2]&1){ preserved_elements=__ARRAY_STRING256_UDTECNAME[5]; } else preserved_elements=0; __ARRAY_STRING256_UDTECNAME[4]= 0 ; __ARRAY_STRING256_UDTECNAME[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_STRING256_UDTECNAME[4]+1; __ARRAY_STRING256_UDTECNAME[6]=1; if (__ARRAY_STRING256_UDTECNAME[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_STRING256_UDTECNAME[0]),preserved_elements*256); cmem_dynamic_free((uint8*)(__ARRAY_STRING256_UDTECNAME[0])); tmp_long=__ARRAY_STRING256_UDTECNAME[5]; __ARRAY_STRING256_UDTECNAME[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*256); memcpy((void*)(__ARRAY_STRING256_UDTECNAME[0]),redim_preserve_cmem_buffer,preserved_elements*256); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&1){ preserved_elements=__ARRAY_INTEGER_UDTEBYTEALIGN[5]; } else preserved_elements=0; __ARRAY_INTEGER_UDTEBYTEALIGN[4]= 0 ; __ARRAY_INTEGER_UDTEBYTEALIGN[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_INTEGER_UDTEBYTEALIGN[4]+1; __ARRAY_INTEGER_UDTEBYTEALIGN[6]=1; if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]),preserved_elements*2); cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0])); tmp_long=__ARRAY_INTEGER_UDTEBYTEALIGN[5]; __ARRAY_INTEGER_UDTEBYTEALIGN[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*2); memcpy((void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]),redim_preserve_cmem_buffer,preserved_elements*2); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTESIZE[2]&1){ preserved_elements=__ARRAY_LONG_UDTESIZE[5]; } else preserved_elements=0; __ARRAY_LONG_UDTESIZE[4]= 0 ; __ARRAY_LONG_UDTESIZE[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTESIZE[4]+1; __ARRAY_LONG_UDTESIZE[6]=1; if (__ARRAY_LONG_UDTESIZE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTESIZE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTESIZE[0])); tmp_long=__ARRAY_LONG_UDTESIZE[5]; __ARRAY_LONG_UDTESIZE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTESIZE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTETYPE[2]&1){ preserved_elements=__ARRAY_LONG_UDTETYPE[5]; } else preserved_elements=0; __ARRAY_LONG_UDTETYPE[4]= 0 ; __ARRAY_LONG_UDTETYPE[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTETYPE[4]+1; __ARRAY_LONG_UDTETYPE[6]=1; if (__ARRAY_LONG_UDTETYPE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTETYPE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTETYPE[0])); tmp_long=__ARRAY_LONG_UDTETYPE[5]; __ARRAY_LONG_UDTETYPE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTETYPE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTETYPESIZE[2]&1){ preserved_elements=__ARRAY_LONG_UDTETYPESIZE[5]; } else preserved_elements=0; __ARRAY_LONG_UDTETYPESIZE[4]= 0 ; __ARRAY_LONG_UDTETYPESIZE[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTETYPESIZE[4]+1; __ARRAY_LONG_UDTETYPESIZE[6]=1; if (__ARRAY_LONG_UDTETYPESIZE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTETYPESIZE[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTETYPESIZE[0])); tmp_long=__ARRAY_LONG_UDTETYPESIZE[5]; __ARRAY_LONG_UDTETYPESIZE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTETYPESIZE[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&1){ preserved_elements=__ARRAY_LONG_UDTEARRAYELEMENTS[5]; } else preserved_elements=0; __ARRAY_LONG_UDTEARRAYELEMENTS[4]= 0 ; __ARRAY_LONG_UDTEARRAYELEMENTS[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTEARRAYELEMENTS[4]+1; __ARRAY_LONG_UDTEARRAYELEMENTS[6]=1; if (__ARRAY_LONG_UDTEARRAYELEMENTS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0])); tmp_long=__ARRAY_LONG_UDTEARRAYELEMENTS[5]; __ARRAY_LONG_UDTEARRAYELEMENTS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_LONG_UDTENEXT[2]&1){ preserved_elements=__ARRAY_LONG_UDTENEXT[5]; } else preserved_elements=0; __ARRAY_LONG_UDTENEXT[4]= 0 ; __ARRAY_LONG_UDTENEXT[5]=(*_SUB_INCREASEUDTARRAYS_LONG_X+ 1000 )-__ARRAY_LONG_UDTENEXT[4]+1; __ARRAY_LONG_UDTENEXT[6]=1; if (__ARRAY_LONG_UDTENEXT[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_LONG_UDTENEXT[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTENEXT[0])); tmp_long=__ARRAY_LONG_UDTENEXT[5]; __ARRAY_LONG_UDTENEXT[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(__ARRAY_LONG_UDTENEXT[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; } qbs* FUNC_STRREMOVE(qbs*_FUNC_STRREMOVE_STRING_MYSTRING,qbs*_FUNC_STRREMOVE_STRING_WHATTOREMOVE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25743,6,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,7,"strings.bas");}while(r); do{ qbs_set(_FUNC_STRREMOVE_STRING_A,_FUNC_STRREMOVE_STRING_MYSTRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,9,"strings.bas");}while(r); do{ qbs_set(_FUNC_STRREMOVE_STRING_B,qbs_lcase(_FUNC_STRREMOVE_STRING_WHATTOREMOVE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,10,"strings.bas");}while(r); do{ *_FUNC_STRREMOVE_LONG_I=func_instr(NULL,qbs_lcase(_FUNC_STRREMOVE_STRING_A),_FUNC_STRREMOVE_STRING_B,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,11,"strings.bas");}while(r); S_34397:; while((*_FUNC_STRREMOVE_LONG_I)||new_error){ if(qbevent){evnt(25743,12,"strings.bas");if(r)goto S_34397;} do{ qbs_set(_FUNC_STRREMOVE_STRING_A,qbs_add(qbs_left(_FUNC_STRREMOVE_STRING_A,*_FUNC_STRREMOVE_LONG_I- 1 ),qbs_right(_FUNC_STRREMOVE_STRING_A,_FUNC_STRREMOVE_STRING_A->len-*_FUNC_STRREMOVE_LONG_I-_FUNC_STRREMOVE_STRING_B->len+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,13,"strings.bas");}while(r); do{ *_FUNC_STRREMOVE_LONG_I=func_instr(NULL,qbs_lcase(_FUNC_STRREMOVE_STRING_A),_FUNC_STRREMOVE_STRING_B,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,14,"strings.bas");}while(r); dl_continue_3718:; } dl_exit_3718:; do{ qbs_set(_FUNC_STRREMOVE_STRING_STRREMOVE,_FUNC_STRREMOVE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,16,"strings.bas");}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_maketmp(_FUNC_STRREMOVE_STRING_STRREMOVE);return _FUNC_STRREMOVE_STRING_STRREMOVE; } qbs* FUNC_STRREPLACE(qbs*_FUNC_STRREPLACE_STRING_MYSTRING,qbs*_FUNC_STRREPLACE_STRING_FIND,qbs*_FUNC_STRREPLACE_STRING_REPLACEWITH){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25743,20,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,21,"strings.bas");}while(r); S_34404:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_STRREPLACE_STRING_MYSTRING->len== 0 )))||new_error){ if(qbevent){evnt(25743,22,"strings.bas");if(r)goto S_34404;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25743,22,"strings.bas");}while(r); } do{ qbs_set(_FUNC_STRREPLACE_STRING_A,_FUNC_STRREPLACE_STRING_MYSTRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,23,"strings.bas");}while(r); do{ qbs_set(_FUNC_STRREPLACE_STRING_B,qbs_lcase(_FUNC_STRREPLACE_STRING_FIND)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,24,"strings.bas");}while(r); do{ *_FUNC_STRREPLACE_LONG_BASEI= 1 ; if(!qbevent)break;evnt(25743,25,"strings.bas");}while(r); do{ *_FUNC_STRREPLACE_LONG_I=func_instr(*_FUNC_STRREPLACE_LONG_BASEI,qbs_lcase(_FUNC_STRREPLACE_STRING_A),_FUNC_STRREPLACE_STRING_B,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,26,"strings.bas");}while(r); S_34411:; while((*_FUNC_STRREPLACE_LONG_I)||new_error){ if(qbevent){evnt(25743,27,"strings.bas");if(r)goto S_34411;} do{ qbs_set(_FUNC_STRREPLACE_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_STRREPLACE_STRING_A,*_FUNC_STRREPLACE_LONG_I- 1 ),_FUNC_STRREPLACE_STRING_REPLACEWITH),qbs_right(_FUNC_STRREPLACE_STRING_A,_FUNC_STRREPLACE_STRING_A->len-*_FUNC_STRREPLACE_LONG_I-_FUNC_STRREPLACE_STRING_B->len+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,28,"strings.bas");}while(r); do{ *_FUNC_STRREPLACE_LONG_BASEI=*_FUNC_STRREPLACE_LONG_I+_FUNC_STRREPLACE_STRING_REPLACEWITH->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,29,"strings.bas");}while(r); do{ *_FUNC_STRREPLACE_LONG_I=func_instr(*_FUNC_STRREPLACE_LONG_BASEI,qbs_lcase(_FUNC_STRREPLACE_STRING_A),_FUNC_STRREPLACE_STRING_B,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,30,"strings.bas");}while(r); dl_continue_3725:; } dl_exit_3725:; do{ qbs_set(_FUNC_STRREPLACE_STRING_STRREPLACE,_FUNC_STRREPLACE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,32,"strings.bas");}while(r); 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_STRREPLACE_STRING_STRREPLACE);return _FUNC_STRREPLACE_STRING_STRREPLACE; } qbs* FUNC_ADDQUOTES(qbs*_FUNC_ADDQUOTES_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 "data110.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_ADDQUOTES_STRING_ADDQUOTES,qbs_add(qbs_add(func_chr( 34 ),_FUNC_ADDQUOTES_STRING_S),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,36,"strings.bas");}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_maketmp(_FUNC_ADDQUOTES_STRING_ADDQUOTES);return _FUNC_ADDQUOTES_STRING_ADDQUOTES; } qbs* FUNC_BOOLTOTFSTRING(int32*_FUNC_BOOLTOTFSTRING_LONG_B){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34418:; if ((*_FUNC_BOOLTOTFSTRING_LONG_B)||new_error){ if(qbevent){evnt(25743,43,"strings.bas");if(r)goto S_34418;} do{ qbs_set(_FUNC_BOOLTOTFSTRING_STRING_BOOLTOTFSTRING,qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,44,"strings.bas");}while(r); }else{ do{ qbs_set(_FUNC_BOOLTOTFSTRING_STRING_BOOLTOTFSTRING,qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,46,"strings.bas");}while(r); } 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_BOOLTOTFSTRING_STRING_BOOLTOTFSTRING);return _FUNC_BOOLTOTFSTRING_STRING_BOOLTOTFSTRING; } int16 FUNC_TFSTRINGTOBOOL(qbs*_FUNC_TFSTRINGTOBOOL_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 "data112.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25743,56,"strings.bas");}while(r); do{ qbs_set(_FUNC_TFSTRINGTOBOOL_STRING_S2,qbs__trim(qbs_ucase(_FUNC_TFSTRINGTOBOOL_STRING_S))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,57,"strings.bas");}while(r); S_34425:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TFSTRINGTOBOOL_STRING_S2,qbs_new_txt_len("TRUE",4))))||new_error){ if(qbevent){evnt(25743,59,"strings.bas");if(r)goto S_34425;} do{ *_FUNC_TFSTRINGTOBOOL_INTEGER_TFSTRINGTOBOOL= -1 ; if(!qbevent)break;evnt(25743,60,"strings.bas");}while(r); S_34427:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_TFSTRINGTOBOOL_STRING_S2,qbs_new_txt_len("FALSE",5)))){ if(qbevent){evnt(25743,61,"strings.bas");if(r)goto S_34427;} do{ *_FUNC_TFSTRINGTOBOOL_INTEGER_TFSTRINGTOBOOL= 0 ; if(!qbevent)break;evnt(25743,62,"strings.bas");}while(r); }else{ do{ *_FUNC_TFSTRINGTOBOOL_INTEGER_TFSTRINGTOBOOL= -2 ; if(!qbevent)break;evnt(25743,64,"strings.bas");}while(r); } } 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; return *_FUNC_TFSTRINGTOBOOL_INTEGER_TFSTRINGTOBOOL; } int16 FUNC_READWRITEBOOLEANSETTINGVALUE(qbs*_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_SECTION,qbs*_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_SETTING,int16*_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_DEFAULT){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25743,72,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,73,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,74,"strings.bas");}while(r); do{ *_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_RESULT=FUNC_READCONFIGSETTING(_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_SECTION,_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_SETTING,_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,76,"strings.bas");}while(r); do{ *_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_CHECKRESULT=FUNC_TFSTRINGTOBOOL(_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,78,"strings.bas");}while(r); S_34437:; if ((-(*_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_CHECKRESULT== -2 ))||new_error){ if(qbevent){evnt(25743,80,"strings.bas");if(r)goto S_34437;} do{ SUB_WRITECONFIGSETTING(_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_SECTION,_FUNC_READWRITEBOOLEANSETTINGVALUE_STRING_SETTING,FUNC_BOOLTOTFSTRING(&(pass3733=*_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_DEFAULT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,81,"strings.bas");}while(r); do{ *_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_READWRITEBOOLEANSETTINGVALUE=*_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_DEFAULT; if(!qbevent)break;evnt(25743,82,"strings.bas");}while(r); }else{ do{ *_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_READWRITEBOOLEANSETTINGVALUE=*_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_CHECKRESULT; if(!qbevent)break;evnt(25743,84,"strings.bas");}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; return *_FUNC_READWRITEBOOLEANSETTINGVALUE_INTEGER_READWRITEBOOLEANSETTINGVALUE; } qbs* FUNC_READWRITESTRINGSETTINGVALUE(qbs*_FUNC_READWRITESTRINGSETTINGVALUE_STRING_SECTION,qbs*_FUNC_READWRITESTRINGSETTINGVALUE_STRING_SETTING,qbs*_FUNC_READWRITESTRINGSETTINGVALUE_STRING_DEFAULT){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25743,92,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,93,"strings.bas");}while(r); do{ *_FUNC_READWRITESTRINGSETTINGVALUE_INTEGER_RESULT=FUNC_READCONFIGSETTING(_FUNC_READWRITESTRINGSETTINGVALUE_STRING_SECTION,_FUNC_READWRITESTRINGSETTINGVALUE_STRING_SETTING,_FUNC_READWRITESTRINGSETTINGVALUE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,95,"strings.bas");}while(r); S_34446:; if ((-(*_FUNC_READWRITESTRINGSETTINGVALUE_INTEGER_RESULT== 0 ))||new_error){ if(qbevent){evnt(25743,97,"strings.bas");if(r)goto S_34446;} do{ SUB_WRITECONFIGSETTING(_FUNC_READWRITESTRINGSETTINGVALUE_STRING_SECTION,_FUNC_READWRITESTRINGSETTINGVALUE_STRING_SETTING,_FUNC_READWRITESTRINGSETTINGVALUE_STRING_DEFAULT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,98,"strings.bas");}while(r); do{ qbs_set(_FUNC_READWRITESTRINGSETTINGVALUE_STRING_READWRITESTRINGSETTINGVALUE,_FUNC_READWRITESTRINGSETTINGVALUE_STRING_DEFAULT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,99,"strings.bas");}while(r); }else{ do{ qbs_set(_FUNC_READWRITESTRINGSETTINGVALUE_STRING_READWRITESTRINGSETTINGVALUE,_FUNC_READWRITESTRINGSETTINGVALUE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,101,"strings.bas");}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_maketmp(_FUNC_READWRITESTRINGSETTINGVALUE_STRING_READWRITESTRINGSETTINGVALUE);return _FUNC_READWRITESTRINGSETTINGVALUE_STRING_READWRITESTRINGSETTINGVALUE; } int32 FUNC_READWRITELONGSETTINGVALUE(qbs*_FUNC_READWRITELONGSETTINGVALUE_STRING_SECTION,qbs*_FUNC_READWRITELONGSETTINGVALUE_STRING_SETTING,int32*_FUNC_READWRITELONGSETTINGVALUE_LONG_DEFAULT){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25743,111,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,112,"strings.bas");}while(r); do{ if(!qbevent)break;evnt(25743,113,"strings.bas");}while(r); do{ *_FUNC_READWRITELONGSETTINGVALUE_INTEGER_RESULT=FUNC_READCONFIGSETTING(_FUNC_READWRITELONGSETTINGVALUE_STRING_SECTION,_FUNC_READWRITELONGSETTINGVALUE_STRING_SETTING,_FUNC_READWRITELONGSETTINGVALUE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,115,"strings.bas");}while(r); do{ *_FUNC_READWRITELONGSETTINGVALUE_LONG_CHECKRESULT=qbr(func_val(_FUNC_READWRITELONGSETTINGVALUE_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,117,"strings.bas");}while(r); S_34457:; if (((-(*_FUNC_READWRITELONGSETTINGVALUE_INTEGER_RESULT== 0 ))|(-(*_FUNC_READWRITELONGSETTINGVALUE_LONG_CHECKRESULT<= 0 )))||new_error){ if(qbevent){evnt(25743,119,"strings.bas");if(r)goto S_34457;} do{ SUB_WRITECONFIGSETTING(_FUNC_READWRITELONGSETTINGVALUE_STRING_SECTION,_FUNC_READWRITELONGSETTINGVALUE_STRING_SETTING,FUNC_STR2(_FUNC_READWRITELONGSETTINGVALUE_LONG_DEFAULT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25743,120,"strings.bas");}while(r); do{ *_FUNC_READWRITELONGSETTINGVALUE_LONG_READWRITELONGSETTINGVALUE=*_FUNC_READWRITELONGSETTINGVALUE_LONG_DEFAULT; if(!qbevent)break;evnt(25743,121,"strings.bas");}while(r); }else{ do{ *_FUNC_READWRITELONGSETTINGVALUE_LONG_READWRITELONGSETTINGVALUE=*_FUNC_READWRITELONGSETTINGVALUE_LONG_CHECKRESULT; if(!qbevent)break;evnt(25743,123,"strings.bas");}while(r); } 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; return *_FUNC_READWRITELONGSETTINGVALUE_LONG_READWRITELONGSETTINGVALUE; } int32 FUNC_COPYFILE(qbs*_FUNC_COPYFILE_STRING_SOURCEFILE,qbs*_FUNC_COPYFILE_STRING_DESTFILE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25744,7,"file.bas");}while(r); do{ if(!qbevent)break;evnt(25744,8,"file.bas");}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(25744,10,"file.bas");}while(r); do{ *_FUNC_COPYFILE_LONG_SOURCEFILENO=func_freefile(); if(!qbevent)break;evnt(25744,11,"file.bas");}while(r); do{ sub_open(_FUNC_COPYFILE_STRING_SOURCEFILE, 2 ,NULL,NULL,*_FUNC_COPYFILE_LONG_SOURCEFILENO,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,12,"file.bas");}while(r); S_34468:; if ((-(*__LONG_E== 1 ))||new_error){ if(qbevent){evnt(25744,13,"file.bas");if(r)goto S_34468;} do{ goto LABEL_ERRORCLEANUP; if(!qbevent)break;evnt(25744,13,"file.bas");}while(r); } do{ *_FUNC_COPYFILE_INTEGER64_FILELENGTH=func_lof(*_FUNC_COPYFILE_LONG_SOURCEFILENO); if(!qbevent)break;evnt(25744,15,"file.bas");}while(r); do{ *_FUNC_COPYFILE_LONG_DESTFILENO=func_freefile(); if(!qbevent)break;evnt(25744,17,"file.bas");}while(r); do{ sub_open(_FUNC_COPYFILE_STRING_DESTFILE, 2 ,NULL,NULL,*_FUNC_COPYFILE_LONG_DESTFILENO,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,18,"file.bas");}while(r); S_34474:; if ((-(*__LONG_E== 1 ))||new_error){ if(qbevent){evnt(25744,19,"file.bas");if(r)goto S_34474;} do{ goto LABEL_ERRORCLEANUP; if(!qbevent)break;evnt(25744,19,"file.bas");}while(r); } do{ qbs_set(_FUNC_COPYFILE_STRING_BUFFER,func_space(*_FUNC_COPYFILE_INTEGER64_FILELENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,22,"file.bas");}while(r); do{ sub_get2(*_FUNC_COPYFILE_LONG_SOURCEFILENO,NULL,_FUNC_COPYFILE_STRING_BUFFER,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,24,"file.bas");}while(r); do{ sub_put2(*_FUNC_COPYFILE_LONG_DESTFILENO,NULL,byte_element((uint64)_FUNC_COPYFILE_STRING_BUFFER->chr,_FUNC_COPYFILE_STRING_BUFFER->len,byte_element_3741),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,25,"file.bas");}while(r); LABEL_ERRORCLEANUP:; if(qbevent){evnt(25744,27,"file.bas");r=0;} S_34480:; if ((-(*_FUNC_COPYFILE_LONG_SOURCEFILENO!= 0 ))||new_error){ if(qbevent){evnt(25744,28,"file.bas");if(r)goto S_34480;} do{ sub_close(*_FUNC_COPYFILE_LONG_SOURCEFILENO,1); if(!qbevent)break;evnt(25744,28,"file.bas");}while(r); } S_34483:; if ((-(*_FUNC_COPYFILE_LONG_DESTFILENO!= 0 ))||new_error){ if(qbevent){evnt(25744,29,"file.bas");if(r)goto S_34483;} do{ sub_close(*_FUNC_COPYFILE_LONG_DESTFILENO,1); if(!qbevent)break;evnt(25744,29,"file.bas");}while(r); } do{ *_FUNC_COPYFILE_LONG_COPYFILE=*__LONG_E; if(!qbevent)break;evnt(25744,31,"file.bas");}while(r); 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_COPYFILE_LONG_COPYFILE; } 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 "data117.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34487:; fornext_value3744=_FUNC_GETFILEPATH_STRING_F->len; fornext_finalvalue3744= 1 ; fornext_step3744= -1 ; if (fornext_step3744<0) fornext_step_negative3744=1; else fornext_step_negative3744=0; if (new_error) goto fornext_error3744; goto fornext_entrylabel3744; while(1){ fornext_value3744=fornext_step3744+(*_FUNC_GETFILEPATH_LONG_I); fornext_entrylabel3744: *_FUNC_GETFILEPATH_LONG_I=fornext_value3744; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3744){ if (fornext_value3744fornext_finalvalue3744) break; } fornext_error3744:; if(qbevent){evnt(25744,39,"file.bas");if(r)goto S_34487;} 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(25744,40,"file.bas");}while(r); S_34489:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_GETFILEPATH_STRING_A,qbs_new_txt_len("/",1)))|(qbs_equal(_FUNC_GETFILEPATH_STRING_A,qbs_new_txt_len("\\",1)))))||new_error){ if(qbevent){evnt(25744,41,"file.bas");if(r)goto S_34489;} 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(25744,42,"file.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25744,43,"file.bas");}while(r); } fornext_continue_3743:; } fornext_exit_3743:; do{ qbs_set(_FUNC_GETFILEPATH_STRING_GETFILEPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,46,"file.bas");}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; qbs_maketmp(_FUNC_GETFILEPATH_STRING_GETFILEPATH);return _FUNC_GETFILEPATH_STRING_GETFILEPATH; } 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 "data118.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34495:; fornext_value3748=_FUNC_FILEHASEXTENSION_STRING_F->len; fornext_finalvalue3748= 1 ; fornext_step3748= -1 ; if (fornext_step3748<0) fornext_step_negative3748=1; else fornext_step_negative3748=0; if (new_error) goto fornext_error3748; goto fornext_entrylabel3748; while(1){ fornext_value3748=fornext_step3748+(*_FUNC_FILEHASEXTENSION_LONG_I); fornext_entrylabel3748: *_FUNC_FILEHASEXTENSION_LONG_I=fornext_value3748; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3748){ if (fornext_value3748fornext_finalvalue3748) break; } fornext_error3748:; if(qbevent){evnt(25744,54,"file.bas");if(r)goto S_34495;} 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(25744,55,"file.bas");}while(r); S_34497:; if (((-(*_FUNC_FILEHASEXTENSION_LONG_A== 47 ))|(-(*_FUNC_FILEHASEXTENSION_LONG_A== 92 )))||new_error){ if(qbevent){evnt(25744,56,"file.bas");if(r)goto S_34497;} do{ goto fornext_exit_3747; if(!qbevent)break;evnt(25744,56,"file.bas");}while(r); } S_34500:; if ((-(*_FUNC_FILEHASEXTENSION_LONG_A== 46 ))||new_error){ if(qbevent){evnt(25744,57,"file.bas");if(r)goto S_34500;} do{ *_FUNC_FILEHASEXTENSION_LONG_FILEHASEXTENSION= -1 ; if(!qbevent)break;evnt(25744,57,"file.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25744,57,"file.bas");}while(r); } fornext_continue_3747:; } fornext_exit_3747:; 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_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 "data119.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34505:; fornext_value3752=_FUNC_REMOVEFILEEXTENSION_STRING_F->len; fornext_finalvalue3752= 1 ; fornext_step3752= -1 ; if (fornext_step3752<0) fornext_step_negative3752=1; else fornext_step_negative3752=0; if (new_error) goto fornext_error3752; goto fornext_entrylabel3752; while(1){ fornext_value3752=fornext_step3752+(*_FUNC_REMOVEFILEEXTENSION_LONG_I); fornext_entrylabel3752: *_FUNC_REMOVEFILEEXTENSION_LONG_I=fornext_value3752; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3752){ if (fornext_value3752fornext_finalvalue3752) break; } fornext_error3752:; if(qbevent){evnt(25744,66,"file.bas");if(r)goto S_34505;} 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(25744,67,"file.bas");}while(r); S_34507:; if (((-(*_FUNC_REMOVEFILEEXTENSION_LONG_A== 47 ))|(-(*_FUNC_REMOVEFILEEXTENSION_LONG_A== 92 )))||new_error){ if(qbevent){evnt(25744,68,"file.bas");if(r)goto S_34507;} do{ goto fornext_exit_3751; if(!qbevent)break;evnt(25744,68,"file.bas");}while(r); } S_34510:; if ((-(*_FUNC_REMOVEFILEEXTENSION_LONG_A== 46 ))||new_error){ if(qbevent){evnt(25744,69,"file.bas");if(r)goto S_34510;} 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(25744,69,"file.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25744,69,"file.bas");}while(r); } fornext_continue_3751:; } fornext_exit_3751:; do{ qbs_set(_FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION,_FUNC_REMOVEFILEEXTENSION_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25744,71,"file.bas");}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; qbs_maketmp(_FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION);return _FUNC_REMOVEFILEEXTENSION_STRING_REMOVEFILEEXTENSION; } 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 "data120.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34516:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25744,78,"file.bas");if(r)goto S_34516;} S_34517:; fornext_value3756= 1 ; fornext_finalvalue3756=_SUB_PATH_SLASH_CORRECT_STRING_A->len; fornext_step3756= 1 ; if (fornext_step3756<0) fornext_step_negative3756=1; else fornext_step_negative3756=0; if (new_error) goto fornext_error3756; goto fornext_entrylabel3756; while(1){ fornext_value3756=fornext_step3756+(*_SUB_PATH_SLASH_CORRECT_LONG_X); fornext_entrylabel3756: *_SUB_PATH_SLASH_CORRECT_LONG_X=fornext_value3756; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3756){ if (fornext_value3756fornext_finalvalue3756) break; } fornext_error3756:; if(qbevent){evnt(25744,79,"file.bas");if(r)goto S_34517;} S_34518:; 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(25744,80,"file.bas");if(r)goto S_34518;} 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(25744,80,"file.bas");}while(r); } fornext_continue_3755:; } fornext_exit_3755:; }else{ S_34523:; fornext_value3759= 1 ; fornext_finalvalue3759=_SUB_PATH_SLASH_CORRECT_STRING_A->len; fornext_step3759= 1 ; if (fornext_step3759<0) fornext_step_negative3759=1; else fornext_step_negative3759=0; if (new_error) goto fornext_error3759; goto fornext_entrylabel3759; while(1){ fornext_value3759=fornext_step3759+(*_SUB_PATH_SLASH_CORRECT_LONG_X); fornext_entrylabel3759: *_SUB_PATH_SLASH_CORRECT_LONG_X=fornext_value3759; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3759){ if (fornext_value3759fornext_finalvalue3759) break; } fornext_error3759:; if(qbevent){evnt(25744,83,"file.bas");if(r)goto S_34523;} S_34524:; 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(25744,84,"file.bas");if(r)goto S_34524;} 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(25744,84,"file.bas");}while(r); } fornext_continue_3758:; } fornext_exit_3758:; } 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_PURGETEMPORARYBUILDFILES(qbs*_SUB_PURGETEMPORARYBUILDFILES_STRING_OS,int32*_SUB_PURGETEMPORARYBUILDFILES_LONG_MAC){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_PURGETEMPORARYBUILDFILES_STRING_MAKE,FUNC_GETMAKEEXECUTABLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745,6,"build.bas");}while(r); S_34530:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PURGETEMPORARYBUILDFILES_STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25745,8,"build.bas");if(r)goto S_34530;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("cmd /c ",7),_SUB_PURGETEMPORARYBUILDFILES_STRING_MAKE),qbs_new_txt_len(" OS=win clean",13)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745,9,"build.bas");}while(r); S_34532:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_PURGETEMPORARYBUILDFILES_STRING_OS,qbs_new_txt_len("LNX",3)))){ if(qbevent){evnt(25745,10,"build.bas");if(r)goto S_34532;} S_34533:; if ((*_SUB_PURGETEMPORARYBUILDFILES_LONG_MAC)||new_error){ if(qbevent){evnt(25745,11,"build.bas");if(r)goto S_34533;} do{ sub_shell2(qbs_add(_SUB_PURGETEMPORARYBUILDFILES_STRING_MAKE,qbs_new_txt_len(" OS=osx clean",13)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745,12,"build.bas");}while(r); }else{ do{ sub_shell2(qbs_add(_SUB_PURGETEMPORARYBUILDFILES_STRING_MAKE,qbs_new_txt_len(" OS=lnx clean",13)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745,14,"build.bas");}while(r); } } } 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_GETMAKEEXECUTABLE(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34539:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25745,23,"build.bas");if(r)goto S_34539;} do{ qbs_set(_FUNC_GETMAKEEXECUTABLE_STRING_GETMAKEEXECUTABLE,qbs_new_txt_len("internal\\c\\c_compiler\\bin\\mingw32-make.exe",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745,24,"build.bas");}while(r); }else{ do{ qbs_set(_FUNC_GETMAKEEXECUTABLE_STRING_GETMAKEEXECUTABLE,qbs_new_txt_len("make",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25745,26,"build.bas");}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_GETMAKEEXECUTABLE_STRING_GETMAKEEXECUTABLE);return _FUNC_GETMAKEEXECUTABLE_STRING_GETMAKEEXECUTABLE; } 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 "data123.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_GL2QB_TYPE_CONVERT_STRING_SYMBOL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,2,"opengl_methods.bas");}while(r); S_34545:; 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(25746,5,"opengl_methods.bas");if(r)goto S_34545;} 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(25746,5,"opengl_methods.bas");}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(25746,5,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,5,"opengl_methods.bas");}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(25746,5,"opengl_methods.bas");}while(r); } S_34551:; 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(25746,6,"opengl_methods.bas");if(r)goto S_34551;} 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(25746,6,"opengl_methods.bas");}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(25746,6,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,6,"opengl_methods.bas");}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(25746,6,"opengl_methods.bas");}while(r); } S_34557:; 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(25746,7,"opengl_methods.bas");if(r)goto S_34557;} 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(25746,7,"opengl_methods.bas");}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(25746,7,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_ULONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,7,"opengl_methods.bas");}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(25746,7,"opengl_methods.bas");}while(r); } S_34563:; 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(25746,10,"opengl_methods.bas");if(r)goto S_34563;} 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(25746,10,"opengl_methods.bas");}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(25746,10,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,10,"opengl_methods.bas");}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(25746,10,"opengl_methods.bas");}while(r); } S_34569:; 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(25746,11,"opengl_methods.bas");if(r)goto S_34569;} 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(25746,11,"opengl_methods.bas");}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(25746,11,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_LONGTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,11,"opengl_methods.bas");}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(25746,11,"opengl_methods.bas");}while(r); } S_34575:; 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(25746,14,"opengl_methods.bas");if(r)goto S_34575;} 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(25746,14,"opengl_methods.bas");}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(25746,14,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,14,"opengl_methods.bas");}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(25746,14,"opengl_methods.bas");}while(r); } S_34581:; 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(25746,15,"opengl_methods.bas");if(r)goto S_34581;} 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(25746,15,"opengl_methods.bas");}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(25746,15,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_UBYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,15,"opengl_methods.bas");}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(25746,15,"opengl_methods.bas");}while(r); } S_34587:; 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(25746,18,"opengl_methods.bas");if(r)goto S_34587;} 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(25746,18,"opengl_methods.bas");}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(25746,18,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_BYTETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,18,"opengl_methods.bas");}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(25746,18,"opengl_methods.bas");}while(r); } S_34593:; 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(25746,21,"opengl_methods.bas");if(r)goto S_34593;} 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(25746,21,"opengl_methods.bas");}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(25746,21,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_UINTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,21,"opengl_methods.bas");}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(25746,21,"opengl_methods.bas");}while(r); } S_34599:; 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(25746,24,"opengl_methods.bas");if(r)goto S_34599;} 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(25746,24,"opengl_methods.bas");}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(25746,24,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,24,"opengl_methods.bas");}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(25746,24,"opengl_methods.bas");}while(r); } S_34605:; 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(25746,27,"opengl_methods.bas");if(r)goto S_34605;} 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(25746,27,"opengl_methods.bas");}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(25746,27,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,27,"opengl_methods.bas");}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(25746,27,"opengl_methods.bas");}while(r); } S_34611:; 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(25746,28,"opengl_methods.bas");if(r)goto S_34611;} 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(25746,28,"opengl_methods.bas");}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(25746,28,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_SINGLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,28,"opengl_methods.bas");}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(25746,28,"opengl_methods.bas");}while(r); } S_34617:; 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(25746,31,"opengl_methods.bas");if(r)goto S_34617;} 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(25746,31,"opengl_methods.bas");}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(25746,31,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,31,"opengl_methods.bas");}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(25746,31,"opengl_methods.bas");}while(r); } S_34623:; 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(25746,32,"opengl_methods.bas");if(r)goto S_34623;} 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(25746,32,"opengl_methods.bas");}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(25746,32,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,32,"opengl_methods.bas");}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(25746,32,"opengl_methods.bas");}while(r); } S_34629:; 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(25746,35,"opengl_methods.bas");if(r)goto S_34629;} 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(25746,35,"opengl_methods.bas");}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(25746,35,"opengl_methods.bas");}while(r); do{ *_FUNC_GL2QB_TYPE_CONVERT_LONG_TYP=*__LONG_OFFSETTYPE-*__LONG_ISPOINTER; if(!qbevent)break;evnt(25746,35,"opengl_methods.bas");}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(25746,35,"opengl_methods.bas");}while(r); } S_34635:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GL2QB_TYPE_CONVERT_STRING_B,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25746,53,"opengl_methods.bas");if(r)goto S_34635;} 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 skip3765; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip3765: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,53,"opengl_methods.bas");}while(r); do{ sub_end(); if(!qbevent)break;evnt(25746,53,"opengl_methods.bas");}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(25746,54,"opengl_methods.bas");}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_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 "data124.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(25746,58,"opengl_methods.bas");}while(r); S_34641:; fornext_value3769= 1 ; fornext_finalvalue3769=_FUNC_READCHUNK_STRING_A->len; fornext_step3769= 1 ; if (fornext_step3769<0) fornext_step_negative3769=1; else fornext_step_negative3769=0; if (new_error) goto fornext_error3769; goto fornext_entrylabel3769; while(1){ fornext_value3769=fornext_step3769+(*_FUNC_READCHUNK_LONG_X); fornext_entrylabel3769: *_FUNC_READCHUNK_LONG_X=fornext_value3769; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3769){ if (fornext_value3769fornext_finalvalue3769) break; } fornext_error3769:; if(qbevent){evnt(25746,59,"opengl_methods.bas");if(r)goto S_34641;} 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(25746,60,"opengl_methods.bas");}while(r); S_34643:; 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(25746,61,"opengl_methods.bas");if(r)goto S_34643;} do{ qbs_set(_FUNC_READCHUNK_STRING_LAST_CHARACTER,func_chr(*_FUNC_READCHUNK_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,61,"opengl_methods.bas");}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(25746,61,"opengl_methods.bas");}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(25746,61,"opengl_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25746,61,"opengl_methods.bas");}while(r); } fornext_continue_3768:; } fornext_exit_3768:; do{ qbs_set(_FUNC_READCHUNK_STRING_READCHUNK,_FUNC_READCHUNK_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,63,"opengl_methods.bas");}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(25746,63,"opengl_methods.bas");}while(r); do{ qbs_set(_FUNC_READCHUNK_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,63,"opengl_methods.bas");}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_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 "data125.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34653:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,69,"opengl_methods.bas");if(r)goto S_34653;} do{ *_SUB_GL_SCAN_HEADER_LONG_HK=func_freefile(); if(!qbevent)break;evnt(25746,69,"opengl_methods.bas");}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(25746,69,"opengl_methods.bas");}while(r); } S_34657:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,70,"opengl_methods.bas");if(r)goto S_34657;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3772; sub_file_print(tmp_fileno,qbs_new_txt_len("DECLARE LIBRARY",15), 0, 0, 1); if (new_error) goto skip3772; skip3772: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,70,"opengl_methods.bas");}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_D= 0 ; if(!qbevent)break;evnt(25746,72,"opengl_methods.bas");}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(25746,72,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_H=func_freefile(); if(!qbevent)break;evnt(25746,73,"opengl_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len("internal\\c\\parts\\core\\gl_header_for_parsing\\gl.h",48), 2 ,NULL,NULL,*_SUB_GL_SCAN_HEADER_LONG_H,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,74,"opengl_methods.bas");}while(r); S_34664:; while((!(func_eof(*_SUB_GL_SCAN_HEADER_LONG_H)))||new_error){ if(qbevent){evnt(25746,75,"opengl_methods.bas");if(r)goto S_34664;} do{ tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_H; if (new_error) goto skip3774; sub_file_line_input_string(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_A); if (new_error) goto skip3774; skip3774: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,76,"opengl_methods.bas");}while(r); S_34666:; if ((qbs_cleanup(qbs_tmp_base,_SUB_GL_SCAN_HEADER_STRING_A->len))||new_error){ if(qbevent){evnt(25746,77,"opengl_methods.bas");if(r)goto S_34666;} 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(25746,78,"opengl_methods.bas");}while(r); S_34668:; 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(25746,79,"opengl_methods.bas");if(r)goto S_34668;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,80,"opengl_methods.bas");}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(25746,81,"opengl_methods.bas");}while(r); S_34671:; fornext_value3777= 1 ; fornext_finalvalue3777=_SUB_GL_SCAN_HEADER_STRING_A->len; fornext_step3777= 1 ; if (fornext_step3777<0) fornext_step_negative3777=1; else fornext_step_negative3777=0; if (new_error) goto fornext_error3777; goto fornext_entrylabel3777; while(1){ fornext_value3777=fornext_step3777+(*_SUB_GL_SCAN_HEADER_LONG_X); fornext_entrylabel3777: *_SUB_GL_SCAN_HEADER_LONG_X=fornext_value3777; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3777){ if (fornext_value3777fornext_finalvalue3777) break; } fornext_error3777:; if(qbevent){evnt(25746,82,"opengl_methods.bas");if(r)goto S_34671;} 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(25746,83,"opengl_methods.bas");}while(r); S_34673:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_C== 32 ))||new_error){ if(qbevent){evnt(25746,84,"opengl_methods.bas");if(r)goto S_34673;} S_34674:; fornext_value3780= 1 ; fornext_finalvalue3780=_SUB_GL_SCAN_HEADER_STRING_A2->len; fornext_step3780= 1 ; if (fornext_step3780<0) fornext_step_negative3780=1; else fornext_step_negative3780=0; if (new_error) goto fornext_error3780; goto fornext_entrylabel3780; while(1){ fornext_value3780=fornext_step3780+(*_SUB_GL_SCAN_HEADER_LONG_X2); fornext_entrylabel3780: *_SUB_GL_SCAN_HEADER_LONG_X2=fornext_value3780; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3780){ if (fornext_value3780fornext_finalvalue3780) break; } fornext_error3780:; if(qbevent){evnt(25746,85,"opengl_methods.bas");if(r)goto S_34674;} 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(25746,86,"opengl_methods.bas");}while(r); S_34676:; if (((-(*_SUB_GL_SCAN_HEADER_LONG_C2>= 65 ))&(-(*_SUB_GL_SCAN_HEADER_LONG_C2<= 90 )))||new_error){ if(qbevent){evnt(25746,87,"opengl_methods.bas");if(r)goto S_34676;} do{ goto LABEL_DEFINE_OK; if(!qbevent)break;evnt(25746,87,"opengl_methods.bas");}while(r); } S_34679:; 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(25746,88,"opengl_methods.bas");if(r)goto S_34679;} do{ goto LABEL_DEFINE_OK; if(!qbevent)break;evnt(25746,88,"opengl_methods.bas");}while(r); } S_34682:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_C2== 95 ))||new_error){ if(qbevent){evnt(25746,89,"opengl_methods.bas");if(r)goto S_34682;} do{ goto LABEL_DEFINE_OK; if(!qbevent)break;evnt(25746,89,"opengl_methods.bas");}while(r); } do{ goto LABEL_DEFINE_NOT_OK; if(!qbevent)break;evnt(25746,90,"opengl_methods.bas");}while(r); LABEL_DEFINE_OK:; if(qbevent){evnt(25746,91,"opengl_methods.bas");r=0;} fornext_continue_3779:; } fornext_exit_3779:; 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(25746,93,"opengl_methods.bas");}while(r); S_34688:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_GL_SCAN_HEADER_STRING_VALUE->len== 0 )))||new_error){ if(qbevent){evnt(25746,94,"opengl_methods.bas");if(r)goto S_34688;} do{ goto LABEL_DEFINE_NOT_OK; if(!qbevent)break;evnt(25746,94,"opengl_methods.bas");}while(r); } S_34691:; 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(25746,96,"opengl_methods.bas");if(r)goto S_34691;} 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(25746,97,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ; if(!qbevent)break;evnt(25746,99,"opengl_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,99,"opengl_methods.bas");}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(25746,99,"opengl_methods.bas");}while(r); S_34696:; }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(25746,100,"opengl_methods.bas");if(r)goto S_34696;} 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(25746,101,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ; if(!qbevent)break;evnt(25746,103,"opengl_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,103,"opengl_methods.bas");}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(25746,103,"opengl_methods.bas");}while(r); }else{ S_34702:; fornext_value3786= 1 ; fornext_finalvalue3786=*_SUB_GL_SCAN_HEADER_LONG_D; fornext_step3786= 1 ; if (fornext_step3786<0) fornext_step_negative3786=1; else fornext_step_negative3786=0; if (new_error) goto fornext_error3786; goto fornext_entrylabel3786; while(1){ fornext_value3786=fornext_step3786+(*_SUB_GL_SCAN_HEADER_LONG_I); fornext_entrylabel3786: *_SUB_GL_SCAN_HEADER_LONG_I=fornext_value3786; if (fornext_step_negative3786){ if (fornext_value3786fornext_finalvalue3786) break; } fornext_error3786:; if(qbevent){evnt(25746,106,"opengl_methods.bas");if(r)goto S_34702;} S_34703:; 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(25746,107,"opengl_methods.bas");if(r)goto S_34703;} do{ *_SUB_GL_SCAN_HEADER_LONG_D=*_SUB_GL_SCAN_HEADER_LONG_D+ 1 ; if(!qbevent)break;evnt(25746,108,"opengl_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,108,"opengl_methods.bas");}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(25746,108,"opengl_methods.bas");}while(r); do{ goto fornext_exit_3785; if(!qbevent)break;evnt(25746,110,"opengl_methods.bas");}while(r); } fornext_continue_3785:; } fornext_exit_3785:; } } do{ goto LABEL_GOT_DEFINE; if(!qbevent)break;evnt(25746,114,"opengl_methods.bas");}while(r); LABEL_DEFINE_NOT_OK:; if(qbevent){evnt(25746,115,"opengl_methods.bas");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(25746,116,"opengl_methods.bas");}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(25746,118,"opengl_methods.bas");}while(r); } fornext_continue_3776:; } fornext_exit_3776:; LABEL_GOT_DEFINE:; if(qbevent){evnt(25746,121,"opengl_methods.bas");r=0;} } S_34718:; 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(25746,125,"opengl_methods.bas");if(r)goto S_34718;} 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(25746,126,"opengl_methods.bas");}while(r); S_34720:; 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(25746,126,"opengl_methods.bas");if(r)goto S_34720;} do{ goto LABEL_DISCARD; if(!qbevent)break;evnt(25746,126,"opengl_methods.bas");}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(25746,127,"opengl_methods.bas");}while(r); S_34724:; 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(25746,128,"opengl_methods.bas");if(r)goto S_34724;} 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(25746,128,"opengl_methods.bas");}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_IS_FUNC= 0 ; if(!qbevent)break;evnt(25746,130,"opengl_methods.bas");}while(r); S_34728:; 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(25746,130,"opengl_methods.bas");if(r)goto S_34728;} do{ *_SUB_GL_SCAN_HEADER_LONG_IS_FUNC= 1 ; if(!qbevent)break;evnt(25746,130,"opengl_methods.bas");}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(25746,132,"opengl_methods.bas");}while(r); S_34732:; 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(25746,133,"opengl_methods.bas");if(r)goto S_34732;} 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(25746,133,"opengl_methods.bas");}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(25746,133,"opengl_methods.bas");}while(r); } S_34736:; 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(25746,134,"opengl_methods.bas");if(r)goto S_34736;} do{ goto LABEL_DISCARD; if(!qbevent)break;evnt(25746,134,"opengl_methods.bas");}while(r); } do{ *__LONG_GL_COMMANDS_LAST=*__LONG_GL_COMMANDS_LAST+ 1 ; if(!qbevent)break;evnt(25746,136,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_C=*__LONG_GL_COMMANDS_LAST; if(!qbevent)break;evnt(25746,137,"opengl_methods.bas");}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(25746,139,"opengl_methods.bas");}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(25746,140,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 0 ; if(!qbevent)break;evnt(25746,141,"opengl_methods.bas");}while(r); S_34744:; if ((*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC)||new_error){ if(qbevent){evnt(25746,143,"opengl_methods.bas");if(r)goto S_34744;} 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(25746,144,"opengl_methods.bas");}while(r); S_34746:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,145,"opengl_methods.bas");if(r)goto S_34746;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3787; sub_file_print(tmp_fileno,qbs_new_txt_len("FUNCTION ",9), 0, 0, 0); if (new_error) goto skip3787; skip3787: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,145,"opengl_methods.bas");}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(25746,147,"opengl_methods.bas");}while(r); S_34751:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,148,"opengl_methods.bas");if(r)goto S_34751;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3788; sub_file_print(tmp_fileno,qbs_new_txt_len("SUB ",4), 0, 0, 0); if (new_error) goto skip3788; skip3788: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,148,"opengl_methods.bas");}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(25746,151,"opengl_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,153,"opengl_methods.bas");}while(r); S_34757:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,153,"opengl_methods.bas");if(r)goto S_34757;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3789; sub_file_print(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_PROC_NAME, 0, 0, 0); if (new_error) goto skip3789; skip3789: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,153,"opengl_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,154,"opengl_methods.bas");}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(25746,156,"opengl_methods.bas");}while(r); S_34762:; if ((*_SUB_GL_SCAN_HEADER_LONG_IS_FUNC)||new_error){ if(qbevent){evnt(25746,157,"opengl_methods.bas");if(r)goto S_34762;} do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 0 ; if(!qbevent)break;evnt(25746,158,"opengl_methods.bas");}while(r); S_34764:; 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(25746,158,"opengl_methods.bas");if(r)goto S_34764;} do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 1 ; if(!qbevent)break;evnt(25746,158,"opengl_methods.bas");}while(r); } S_34767:; if ((*_SUB_GL_SCAN_HEADER_LONG_POINTER)||new_error){ if(qbevent){evnt(25746,159,"opengl_methods.bas");if(r)goto S_34767;} 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(25746,160,"opengl_methods.bas");}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(25746,160,"opengl_methods.bas");}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(25746,161,"opengl_methods.bas");}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(25746,162,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 1 ; if(!qbevent)break;evnt(25746,163,"opengl_methods.bas");}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(25746,165,"opengl_methods.bas");}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(25746,166,"opengl_methods.bas");}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(25746,167,"opengl_methods.bas");}while(r); } S_34778:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,169,"opengl_methods.bas");if(r)goto S_34778;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3790; sub_file_print(tmp_fileno,_SUB_GL_SCAN_HEADER_STRING_S, 0, 0, 0); if (new_error) goto skip3790; skip3790: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,169,"opengl_methods.bas");}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(25746,170,"opengl_methods.bas");}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(25746,172,"opengl_methods.bas");}while(r); } S_34785:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,175,"opengl_methods.bas");if(r)goto S_34785;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3791; sub_file_print(tmp_fileno,qbs_new_txt_len("(",1), 0, 0, 0); if (new_error) goto skip3791; skip3791: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,175,"opengl_methods.bas");}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(25746,177,"opengl_methods.bas");}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(25746,178,"opengl_methods.bas");}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(25746,181,"opengl_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,182,"opengl_methods.bas");}while(r); S_34792:; do{ if(qbevent){evnt(25746,184,"opengl_methods.bas");if(r)goto S_34792;} 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(25746,186,"opengl_methods.bas");}while(r); S_34794:; 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(25746,187,"opengl_methods.bas");if(r)goto S_34794;} 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(25746,187,"opengl_methods.bas");}while(r); } S_34797:; 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(25746,188,"opengl_methods.bas");if(r)goto S_34797;} 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(25746,188,"opengl_methods.bas");}while(r); } S_34800:; 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(25746,189,"opengl_methods.bas");if(r)goto S_34800;} do{ goto LABEL_NO_ARGUMENTS; if(!qbevent)break;evnt(25746,189,"opengl_methods.bas");}while(r); } S_34803:; 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(25746,190,"opengl_methods.bas");if(r)goto S_34803;} 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(25746,191,"opengl_methods.bas");}while(r); S_34805:; 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(25746,192,"opengl_methods.bas");if(r)goto S_34805;} 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(25746,192,"opengl_methods.bas");}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(25746,192,"opengl_methods.bas");}while(r); } S_34809:; 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(25746,193,"opengl_methods.bas");if(r)goto S_34809;} 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(25746,193,"opengl_methods.bas");}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(25746,193,"opengl_methods.bas");}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(25746,196,"opengl_methods.bas");}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(25746,199,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 0 ; if(!qbevent)break;evnt(25746,201,"opengl_methods.bas");}while(r); S_34818:; 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(25746,203,"opengl_methods.bas");if(r)goto S_34818;} 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(25746,204,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 1 ; if(!qbevent)break;evnt(25746,205,"opengl_methods.bas");}while(r); } S_34822:; 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(25746,207,"opengl_methods.bas");if(r)goto S_34822;} 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(25746,208,"opengl_methods.bas");}while(r); do{ *_SUB_GL_SCAN_HEADER_LONG_POINTER= 2 ; if(!qbevent)break;evnt(25746,209,"opengl_methods.bas");}while(r); } S_34826:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 2 ))||new_error){ if(qbevent){evnt(25746,212,"opengl_methods.bas");if(r)goto S_34826;} 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(25746,213,"opengl_methods.bas");}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(25746,215,"opengl_methods.bas");}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION= 1 ; if(!qbevent)break;evnt(25746,219,"opengl_methods.bas");}while(r); S_34832:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,221,"opengl_methods.bas");if(r)goto S_34832;} S_34833:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 0 ))||new_error){ if(qbevent){evnt(25746,222,"opengl_methods.bas");if(r)goto S_34833;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3797; sub_file_print(tmp_fileno,qbs_new_txt_len("BYVAL ",6), 0, 0, 0); if (new_error) goto skip3797; skip3797: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,222,"opengl_methods.bas");}while(r); } do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3798; 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 skip3798; skip3798: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,223,"opengl_methods.bas");}while(r); S_34837:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25746,224,"opengl_methods.bas");if(r)goto S_34837;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3799; sub_file_print(tmp_fileno,qbs_new_txt_len(",",1), 0, 0, 0); if (new_error) goto skip3799; skip3799: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,224,"opengl_methods.bas");}while(r); } } S_34841:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 0 ))||new_error){ if(qbevent){evnt(25746,227,"opengl_methods.bas");if(r)goto S_34841;} 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(25746,228,"opengl_methods.bas");}while(r); } S_34844:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 1 ))||new_error){ if(qbevent){evnt(25746,230,"opengl_methods.bas");if(r)goto S_34844;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,231,"opengl_methods.bas");}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(25746,232,"opengl_methods.bas");}while(r); } S_34848:; if ((-(*_SUB_GL_SCAN_HEADER_LONG_POINTER== 2 ))||new_error){ if(qbevent){evnt(25746,234,"opengl_methods.bas");if(r)goto S_34848;} do{ qbs_set(_SUB_GL_SCAN_HEADER_STRING_ARG,l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,235,"opengl_methods.bas");}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(25746,236,"opengl_methods.bas");}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(25746,243,"opengl_methods.bas");}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(25746,245,"opengl_methods.bas");}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(25746,250,"opengl_methods.bas");}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(25746,252,"opengl_methods.bas");}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(25746,253,"opengl_methods.bas");}while(r); S_34857:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1))))||new_error){ if(qbevent){evnt(25746,257,"opengl_methods.bas");if(r)goto S_34857;} 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(25746,257,"opengl_methods.bas");}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(25746,257,"opengl_methods.bas");}while(r); } S_34861:; dl_continue_3792:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_GL_SCAN_HEADER_STRING_L,qbs_new_txt_len(")",1)))))&&(!new_error)); dl_exit_3792:; if(qbevent){evnt(25746,259,"opengl_methods.bas");if(r)goto S_34861;} LABEL_NO_ARGUMENTS:; if(qbevent){evnt(25746,260,"opengl_methods.bas");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(25746,263,"opengl_methods.bas");}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(25746,264,"opengl_methods.bas");}while(r); S_34864:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,265,"opengl_methods.bas");if(r)goto S_34864;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3800; sub_file_print(tmp_fileno,qbs_new_txt_len(")",1), 0, 0, 1); if (new_error) goto skip3800; skip3800: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,265,"opengl_methods.bas");}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(25746,266,"opengl_methods.bas");}while(r); S_34868:; if ((*_SUB_GL_SCAN_HEADER_LONG_NEED_HELPER_FUNCTION)||new_error){ if(qbevent){evnt(25746,268,"opengl_methods.bas");if(r)goto S_34868;} 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(25746,269,"opengl_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,270,"opengl_methods.bas");}while(r); } S_34872:; 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(25746,274,"opengl_methods.bas");if(r)goto S_34872;} 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(25746,275,"opengl_methods.bas");}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)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,276,"opengl_methods.bas");}while(r); } } } LABEL_DISCARD:; if(qbevent){evnt(25746,290,"opengl_methods.bas");r=0;} dl_continue_3773:; } dl_exit_3773:; do{ sub_close(*_SUB_GL_SCAN_HEADER_LONG_H,1); if(!qbevent)break;evnt(25746,292,"opengl_methods.bas");}while(r); S_34880:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,294,"opengl_methods.bas");if(r)goto S_34880;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3801; sub_file_print(tmp_fileno,qbs_new_txt_len("END DECLARE",11), 0, 0, 1); if (new_error) goto skip3801; skip3801: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,294,"opengl_methods.bas");}while(r); } do{ *__LONG_GL_DEFINES_LAST=*_SUB_GL_SCAN_HEADER_LONG_D; if(!qbevent)break;evnt(25746,296,"opengl_methods.bas");}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_long2=__ARRAY_STRING_GL_DEFINES[5]; if (tmp_long2id=(++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_finalvalue3803) break; } fornext_error3803:; if(qbevent){evnt(25746,304,"opengl_methods.bas");if(r)goto S_34887;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_HK; if (new_error) goto skip3804; 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 skip3804; 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 skip3804; skip3804: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,305,"opengl_methods.bas");}while(r); fornext_continue_3802:; } fornext_exit_3802:; } S_34891:; if ((*__LONG_GL_KIT)||new_error){ if(qbevent){evnt(25746,320,"opengl_methods.bas");if(r)goto S_34891;} do{ sub_close(*_SUB_GL_SCAN_HEADER_LONG_HK,1); if(!qbevent)break;evnt(25746,320,"opengl_methods.bas");}while(r); } do{ *_SUB_GL_SCAN_HEADER_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25746,323,"opengl_methods.bas");}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(25746,324,"opengl_methods.bas");}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_GL_SCAN_HEADER_LONG_FH; if (new_error) goto skip3805; sub_file_print(tmp_fileno,__STRING_GL_HELPER_CODE, 0, 0, 1); if (new_error) goto skip3805; skip3805: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25746,325,"opengl_methods.bas");}while(r); do{ sub_close(*_SUB_GL_SCAN_HEADER_LONG_FH,1); if(!qbevent)break;evnt(25746,326,"opengl_methods.bas");}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; } 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 "data126.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_34898:; fornext_value3807= 1 ; fornext_finalvalue3807=*__LONG_GL_DEFINES_LAST; fornext_step3807= 1 ; if (fornext_step3807<0) fornext_step_negative3807=1; else fornext_step_negative3807=0; if (new_error) goto fornext_error3807; goto fornext_entrylabel3807; while(1){ fornext_value3807=fornext_step3807+(*_SUB_GL_INCLUDE_CONTENT_LONG_D); fornext_entrylabel3807: *_SUB_GL_INCLUDE_CONTENT_LONG_D=fornext_value3807; if (fornext_step_negative3807){ if (fornext_value3807fornext_finalvalue3807) break; } fornext_error3807:; if(qbevent){evnt(25746,334,"opengl_methods.bas");if(r)goto S_34898;} do{ *__LONG_CONSTLAST=*__LONG_CONSTLAST+ 1 ; if(!qbevent)break;evnt(25746,338,"opengl_methods.bas");}while(r); S_34900:; if ((-(*__LONG_CONSTLAST>*__LONG_CONSTMAX))||new_error){ if(qbevent){evnt(25746,339,"opengl_methods.bas");if(r)goto S_34900;} do{ *__LONG_CONSTMAX=*__LONG_CONSTMAX* 2 ; if(!qbevent)break;evnt(25746,340,"opengl_methods.bas");}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_long2=__ARRAY_STRING_CONSTNAME[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_CONSTCNAME[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_CONSTNAMESYMBOL[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_CONSTSTRING[5]; if (tmp_long2id=(++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_finalvalue3810) break; } fornext_error3810:; if(qbevent){evnt(25746,366,"opengl_methods.bas");if(r)goto S_34923;} do{ if(!qbevent)break;evnt(25746,367,"opengl_methods.bas");}while(r); do{ memcpy(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(0)+ 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)+ 0, 216); if(!qbevent)break;evnt(25746,376,"opengl_methods.bas");}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(25746,378,"opengl_methods.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(25746,379,"opengl_methods.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(806))= 1 ; if(!qbevent)break;evnt(25746,380,"opengl_methods.bas");}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,381,"opengl_methods.bas");}while(r); S_34930:; if ((-(*__LONG_QB64PREFIX_SET== 1 ))||new_error){ if(qbevent){evnt(25746,382,"opengl_methods.bas");if(r)goto S_34930;} do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),func_mid(qbs_rtrim(qbs_new_fixed((((uint8*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(0)),64,1)), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,382,"opengl_methods.bas");}while(r); } do{ *_SUB_GL_INCLUDE_CONTENT_LONG_S=*(int16*)(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(64)); if(!qbevent)break;evnt(25746,383,"opengl_methods.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))=*_SUB_GL_INCLUDE_CONTENT_LONG_S; if(!qbevent)break;evnt(25746,384,"opengl_methods.bas");}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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,385,"opengl_methods.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))=*(int16*)(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(130)); if(!qbevent)break;evnt(25746,386,"opengl_methods.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_new_fixed((((uint8*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(132)),80,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,387,"opengl_methods.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(2381))=*(int32*)(((char*)_SUB_GL_INCLUDE_CONTENT_UDT_G)+(212)); if(!qbevent)break;evnt(25746,388,"opengl_methods.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(25746,389,"opengl_methods.bas");}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(25746,390,"opengl_methods.bas");}while(r); fornext_continue_3809:; } fornext_exit_3809:; do{ *__LONG_REGINTERNALSUBFUNC= 1 ; if(!qbevent)break;evnt(25746,396,"opengl_methods.bas");}while(r); do{ SUB_CLEARID(); if(!qbevent)break;evnt(25746,397,"opengl_methods.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1),qbs_add(__STRING_QB64PREFIX,qbs_new_txt_len("gluPerspective",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,398,"opengl_methods.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(544))= 2 ; if(!qbevent)break;evnt(25746,399,"opengl_methods.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("gluPerspective",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,400,"opengl_methods.bas");}while(r); do{ *(int16*)(((char*)__UDT_ID)+(809))= 4 ; if(!qbevent)break;evnt(25746,401,"opengl_methods.bas");}while(r); do{ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),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))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25746,402,"opengl_methods.bas");}while(r); do{ SUB_REGID(); if(!qbevent)break;evnt(25746,403,"opengl_methods.bas");}while(r); do{ *__LONG_REGINTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(25746,404,"opengl_methods.bas");}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; } void SUB_INICOMMIT(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,5,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,6,"ini.bm");}while(r); S_34953:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CURRENTINIFILENAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,8,"ini.bm");if(r)goto S_34953;} do{ *__LONG_INICODE= 18 ; if(!qbevent)break;evnt(25747,8,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,8,"ini.bm");}while(r); } do{ qbs_set(__STRING_INIWHOLEFILE,__STRING_ININEWFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,10,"ini.bm");}while(r); do{ *__ULONG_CURRENTINIFILELOF=__STRING_ININEWFILE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,11,"ini.bm");}while(r); S_34959:; if ((~(*__LONG_INIDISABLEAUTOCOMMIT))||new_error){ if(qbevent){evnt(25747,13,"ini.bm");if(r)goto S_34959;} do{ if(!qbevent)break;evnt(25747,14,"ini.bm");}while(r); do{ *_SUB_INICOMMIT_INTEGER_FILENUM=func_freefile(); if(!qbevent)break;evnt(25747,16,"ini.bm");}while(r); do{ sub_open(__STRING_CURRENTINIFILENAME, 2 ,NULL,NULL,*_SUB_INICOMMIT_INTEGER_FILENUM,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,17,"ini.bm");}while(r); S_34963:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_INIWHOLEFILE->lenchr,__STRING_ININEWFILE->len,byte_element_3813),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,25,"ini.bm");}while(r); do{ sub_close(*_SUB_INICOMMIT_INTEGER_FILENUM,1); if(!qbevent)break;evnt(25747,26,"ini.bm");}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* FUNC_INIGETSECTION(qbs*_FUNC_INIGETSECTION_STRING___SECTION){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,31,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,32,"ini.bm");}while(r); S_34974:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CURRENTINIFILENAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,34,"ini.bm");if(r)goto S_34974;} do{ *__LONG_INICODE= 18 ; if(!qbevent)break;evnt(25747,34,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,34,"ini.bm");}while(r); } S_34978:; if ((qbs_cleanup(qbs_tmp_base,(-(*__ULONG_CURRENTINIFILELOF== 0 ))|(-(((int32)(qbs_ltrim(qbs_rtrim(__STRING_INIWHOLEFILE)))->len)== 0 ))))||new_error){ if(qbevent){evnt(25747,35,"ini.bm");if(r)goto S_34978;} do{ *__LONG_INICODE= 17 ; if(!qbevent)break;evnt(25747,35,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,35,"ini.bm");}while(r); } do{ *__LONG_INICODE= 0 ; if(!qbevent)break;evnt(25747,37,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,39,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,40,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,41,"ini.bm");}while(r); do{ qbs_set(_FUNC_INIGETSECTION_STRING_SECTION,FUNC_INIFORMATSECTION(_FUNC_INIGETSECTION_STRING___SECTION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,43,"ini.bm");}while(r); S_34987:; if ((*__LONG_INICODE)||new_error){ if(qbevent){evnt(25747,44,"ini.bm");if(r)goto S_34987;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,44,"ini.bm");}while(r); } S_34990:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_INIGETSECTION_STRING_SECTION,qbs_new_txt_len("[]",2))))||new_error){ if(qbevent){evnt(25747,46,"ini.bm");if(r)goto S_34990;} do{ *_FUNC_INIGETSECTION_ULONG_SECTIONSTART=func_instr(NULL,__STRING_INIWHOLEFILE,qbs_new_txt_len("[",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,48,"ini.bm");}while(r); S_34992:; if ((-(*_FUNC_INIGETSECTION_ULONG_SECTIONSTART== 0 ))||new_error){ if(qbevent){evnt(25747,49,"ini.bm");if(r)goto S_34992;} do{ qbs_set(_FUNC_INIGETSECTION_STRING_INIGETSECTION,__STRING_INIWHOLEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,49,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,49,"ini.bm");}while(r); } S_34996:; fornext_value3816=*_FUNC_INIGETSECTION_ULONG_SECTIONSTART- 1 ; fornext_finalvalue3816= 1 ; 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_INIGETSECTION_ULONG_I); fornext_entrylabel3816: *_FUNC_INIGETSECTION_ULONG_I=fornext_value3816; if (fornext_step_negative3816){ if (fornext_value3816fornext_finalvalue3816) break; } fornext_error3816:; if(qbevent){evnt(25747,51,"ini.bm");if(r)goto S_34996;} S_34997:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,52,"ini.bm");if(r)goto S_34997;} do{ *_FUNC_INIGETSECTION_ULONG_FOUNDSECTION=*_FUNC_INIGETSECTION_ULONG_I+ 1 ; if(!qbevent)break;evnt(25747,52,"ini.bm");}while(r); do{ goto fornext_exit_3815; if(!qbevent)break;evnt(25747,52,"ini.bm");}while(r); } S_35001:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)!= 32 )))||new_error){ if(qbevent){evnt(25747,53,"ini.bm");if(r)goto S_35001;} do{ goto fornext_exit_3815; if(!qbevent)break;evnt(25747,53,"ini.bm");}while(r); } fornext_continue_3815:; } fornext_exit_3815:; S_35005:; if ((-(*_FUNC_INIGETSECTION_ULONG_I== 0 ))||new_error){ if(qbevent){evnt(25747,56,"ini.bm");if(r)goto S_35005;} do{ *_FUNC_INIGETSECTION_ULONG_FOUNDSECTION= 1 ; if(!qbevent)break;evnt(25747,56,"ini.bm");}while(r); } do{ qbs_set(_FUNC_INIGETSECTION_STRING_INIGETSECTION,qbs_left(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_FOUNDSECTION- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,58,"ini.bm");}while(r); }else{ S_35010:; do{ if(qbevent){evnt(25747,60,"ini.bm");if(r)goto S_35010;} do{ *_FUNC_INIGETSECTION_ULONG_SECTIONSTART=func_instr(*_FUNC_INIGETSECTION_ULONG_SECTIONSTART+ 1 ,qbs_lcase(__STRING_INIWHOLEFILE),qbs_lcase(_FUNC_INIGETSECTION_STRING_SECTION),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,61,"ini.bm");}while(r); S_35012:; if ((-(*_FUNC_INIGETSECTION_ULONG_SECTIONSTART== 0 ))||new_error){ if(qbevent){evnt(25747,62,"ini.bm");if(r)goto S_35012;} do{ *__LONG_INICODE= 14 ; if(!qbevent)break;evnt(25747,62,"ini.bm");}while(r); do{ goto dl_exit_3817; if(!qbevent)break;evnt(25747,62,"ini.bm");}while(r); } do{ *_FUNC_INIGETSECTION_ULONG_FOUNDSECTION= 0 ; if(!qbevent)break;evnt(25747,65,"ini.bm");}while(r); S_35017:; fornext_value3819=*_FUNC_INIGETSECTION_ULONG_SECTIONSTART- 1 ; fornext_finalvalue3819= 1 ; fornext_step3819= -1 ; if (fornext_step3819<0) fornext_step_negative3819=1; else fornext_step_negative3819=0; if (new_error) goto fornext_error3819; goto fornext_entrylabel3819; while(1){ fornext_value3819=fornext_step3819+(*_FUNC_INIGETSECTION_ULONG_I); fornext_entrylabel3819: *_FUNC_INIGETSECTION_ULONG_I=fornext_value3819; if (fornext_step_negative3819){ if (fornext_value3819fornext_finalvalue3819) break; } fornext_error3819:; if(qbevent){evnt(25747,66,"ini.bm");if(r)goto S_35017;} S_35018:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,67,"ini.bm");if(r)goto S_35018;} do{ *_FUNC_INIGETSECTION_ULONG_FOUNDSECTION=*_FUNC_INIGETSECTION_ULONG_I+ 1 ; if(!qbevent)break;evnt(25747,67,"ini.bm");}while(r); do{ goto fornext_exit_3818; if(!qbevent)break;evnt(25747,67,"ini.bm");}while(r); } S_35022:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)!= 32 )))||new_error){ if(qbevent){evnt(25747,68,"ini.bm");if(r)goto S_35022;} do{ goto fornext_exit_3818; if(!qbevent)break;evnt(25747,68,"ini.bm");}while(r); } fornext_continue_3818:; } fornext_exit_3818:; S_35026:; if ((-(*_FUNC_INIGETSECTION_ULONG_I== 0 ))||new_error){ if(qbevent){evnt(25747,71,"ini.bm");if(r)goto S_35026;} do{ *_FUNC_INIGETSECTION_ULONG_FOUNDSECTION= 1 ; if(!qbevent)break;evnt(25747,71,"ini.bm");}while(r); } S_35029:; if ((-(*_FUNC_INIGETSECTION_ULONG_FOUNDSECTION> 0 ))||new_error){ if(qbevent){evnt(25747,73,"ini.bm");if(r)goto S_35029;} do{ *_FUNC_INIGETSECTION_ULONG_BRACKET1=*_FUNC_INIGETSECTION_ULONG_SECTIONSTART; if(!qbevent)break;evnt(25747,76,"ini.bm");}while(r); LABEL_CHECKAGAIN:; if(qbevent){evnt(25747,77,"ini.bm");r=0;} do{ *_FUNC_INIGETSECTION_ULONG_BRACKET1=func_instr(*_FUNC_INIGETSECTION_ULONG_BRACKET1+ 1 ,__STRING_INIWHOLEFILE,qbs_new_txt_len("[",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,78,"ini.bm");}while(r); S_35032:; if ((-(*_FUNC_INIGETSECTION_ULONG_BRACKET1> 0 ))||new_error){ if(qbevent){evnt(25747,80,"ini.bm");if(r)goto S_35032;} do{ *_FUNC_INIGETSECTION_BYTE_INQUOTE= 0 ; if(!qbevent)break;evnt(25747,82,"ini.bm");}while(r); S_35034:; fornext_value3821= 1 ; fornext_finalvalue3821=*_FUNC_INIGETSECTION_ULONG_BRACKET1- 1 ; fornext_step3821= 1 ; if (fornext_step3821<0) fornext_step_negative3821=1; else fornext_step_negative3821=0; if (new_error) goto fornext_error3821; goto fornext_entrylabel3821; while(1){ fornext_value3821=fornext_step3821+(*_FUNC_INIGETSECTION_ULONG_I); fornext_entrylabel3821: *_FUNC_INIGETSECTION_ULONG_I=fornext_value3821; if (fornext_step_negative3821){ if (fornext_value3821fornext_finalvalue3821) break; } fornext_error3821:; if(qbevent){evnt(25747,83,"ini.bm");if(r)goto S_35034;} S_35035:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)== 34 )))||new_error){ if(qbevent){evnt(25747,84,"ini.bm");if(r)goto S_35035;} do{ *_FUNC_INIGETSECTION_BYTE_INQUOTE=~(*_FUNC_INIGETSECTION_BYTE_INQUOTE); if(!qbevent)break;evnt(25747,84,"ini.bm");}while(r); } fornext_continue_3820:; } fornext_exit_3820:; S_35039:; if ((*_FUNC_INIGETSECTION_BYTE_INQUOTE)||new_error){ if(qbevent){evnt(25747,86,"ini.bm");if(r)goto S_35039;} do{ goto LABEL_CHECKAGAIN; if(!qbevent)break;evnt(25747,86,"ini.bm");}while(r); } S_35042:; fornext_value3823=*_FUNC_INIGETSECTION_ULONG_BRACKET1- 1 ; fornext_finalvalue3823= 1 ; fornext_step3823= -1 ; if (fornext_step3823<0) fornext_step_negative3823=1; else fornext_step_negative3823=0; if (new_error) goto fornext_error3823; goto fornext_entrylabel3823; while(1){ fornext_value3823=fornext_step3823+(*_FUNC_INIGETSECTION_ULONG_I); fornext_entrylabel3823: *_FUNC_INIGETSECTION_ULONG_I=fornext_value3823; if (fornext_step_negative3823){ if (fornext_value3823fornext_finalvalue3823) break; } fornext_error3823:; if(qbevent){evnt(25747,88,"ini.bm");if(r)goto S_35042;} S_35043:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,89,"ini.bm");if(r)goto S_35043;} do{ *_FUNC_INIGETSECTION_ULONG_ENDSECTION=*_FUNC_INIGETSECTION_ULONG_I+ 1 -__STRING_INILF->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,89,"ini.bm");}while(r); do{ goto fornext_exit_3822; if(!qbevent)break;evnt(25747,89,"ini.bm");}while(r); } S_35047:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_I)== 61 )))||new_error){ if(qbevent){evnt(25747,90,"ini.bm");if(r)goto S_35047;} do{ goto LABEL_CHECKAGAIN; if(!qbevent)break;evnt(25747,90,"ini.bm");}while(r); } S_35050:; if ((-(*_FUNC_INIGETSECTION_ULONG_I<=*_FUNC_INIGETSECTION_ULONG_FOUNDSECTION))||new_error){ if(qbevent){evnt(25747,91,"ini.bm");if(r)goto S_35050;} do{ goto fornext_exit_3822; if(!qbevent)break;evnt(25747,91,"ini.bm");}while(r); } fornext_continue_3822:; } fornext_exit_3822:; do{ qbs_set(_FUNC_INIGETSECTION_STRING_INIGETSECTION,func_mid(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_FOUNDSECTION,*_FUNC_INIGETSECTION_ULONG_ENDSECTION-*_FUNC_INIGETSECTION_ULONG_FOUNDSECTION,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,93,"ini.bm");}while(r); }else{ do{ qbs_set(_FUNC_INIGETSECTION_STRING_INIGETSECTION,func_mid(__STRING_INIWHOLEFILE,*_FUNC_INIGETSECTION_ULONG_FOUNDSECTION,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,95,"ini.bm");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,97,"ini.bm");}while(r); } dl_continue_3817:; }while(1); dl_exit_3817:; } 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_INIGETSECTION_STRING_INIGETSECTION);return _FUNC_INIGETSECTION_STRING_INIGETSECTION; } qbs* FUNC_INIFORMATSECTION(qbs*_FUNC_INIFORMATSECTION_STRING___SECTION){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,104,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,106,"ini.bm");}while(r); do{ qbs_set(_FUNC_INIFORMATSECTION_STRING_SECTION,qbs_ltrim(qbs_rtrim(_FUNC_INIFORMATSECTION_STRING___SECTION))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,108,"ini.bm");}while(r); S_35065:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_INIFORMATSECTION_STRING_SECTION, 1 ),qbs_new_txt_len("[",1))))||new_error){ if(qbevent){evnt(25747,111,"ini.bm");if(r)goto S_35065;} do{ qbs_set(_FUNC_INIFORMATSECTION_STRING_SECTION,qbs_add(qbs_new_txt_len("[",1),_FUNC_INIFORMATSECTION_STRING_SECTION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,111,"ini.bm");}while(r); } S_35068:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_FUNC_INIFORMATSECTION_STRING_SECTION, 1 ),qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(25747,112,"ini.bm");if(r)goto S_35068;} do{ qbs_set(_FUNC_INIFORMATSECTION_STRING_SECTION,qbs_add(_FUNC_INIFORMATSECTION_STRING_SECTION,qbs_new_txt_len("]",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,112,"ini.bm");}while(r); } S_35071:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func_mid(_FUNC_INIFORMATSECTION_STRING_SECTION, 2 ,_FUNC_INIFORMATSECTION_STRING_SECTION->len- 3 ,1),qbs_new_txt_len("[",1),0)|func_instr(NULL,func_mid(_FUNC_INIFORMATSECTION_STRING_SECTION, 2 ,_FUNC_INIFORMATSECTION_STRING_SECTION->len- 3 ,1),qbs_new_txt_len("]",1),0)))||new_error){ if(qbevent){evnt(25747,114,"ini.bm");if(r)goto S_35071;} do{ *__LONG_INICODE= 15 ; if(!qbevent)break;evnt(25747,115,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,116,"ini.bm");}while(r); } do{ qbs_set(_FUNC_INIFORMATSECTION_STRING_INIFORMATSECTION,_FUNC_INIFORMATSECTION_STRING_SECTION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,119,"ini.bm");}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; qbs_maketmp(_FUNC_INIFORMATSECTION_STRING_INIFORMATSECTION);return _FUNC_INIFORMATSECTION_STRING_INIFORMATSECTION; } qbs* FUNC_READSETTING(qbs*_FUNC_READSETTING_STRING_FILE,qbs*_FUNC_READSETTING_STRING___SECTION,qbs*_FUNC_READSETTING_STRING___KEY){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,123,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,124,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,125,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,126,"ini.bm");}while(r); do{ SUB_INILOAD(_FUNC_READSETTING_STRING_FILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,128,"ini.bm");}while(r); S_35081:; if ((*__LONG_INICODE)||new_error){ if(qbevent){evnt(25747,129,"ini.bm");if(r)goto S_35081;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,129,"ini.bm");}while(r); } S_35084:; if ((qbs_cleanup(qbs_tmp_base,(-(*__ULONG_CURRENTINIFILELOF== 0 ))|(-(((int32)(qbs_ltrim(qbs_rtrim(__STRING_INIWHOLEFILE)))->len)== 0 ))))||new_error){ if(qbevent){evnt(25747,131,"ini.bm");if(r)goto S_35084;} do{ *__LONG_INICODE= 17 ; if(!qbevent)break;evnt(25747,131,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,131,"ini.bm");}while(r); } do{ if(!qbevent)break;evnt(25747,133,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,134,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,135,"ini.bm");}while(r); do{ qbs_set(_FUNC_READSETTING_STRING_SECTION,FUNC_INIFORMATSECTION(_FUNC_READSETTING_STRING___SECTION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,137,"ini.bm");}while(r); S_35092:; if ((*__LONG_INICODE)||new_error){ if(qbevent){evnt(25747,138,"ini.bm");if(r)goto S_35092;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,138,"ini.bm");}while(r); } do{ qbs_set(__STRING_INISECTIONDATA,FUNC_INIGETSECTION(_FUNC_READSETTING_STRING_SECTION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,141,"ini.bm");}while(r); S_35096:; if (((-(*__LONG_INICODE> 0 ))&(-(*__LONG_INICODE!= 17 )))||new_error){ if(qbevent){evnt(25747,142,"ini.bm");if(r)goto S_35096;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,142,"ini.bm");}while(r); } S_35099:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_INISECTIONDATA->len== 0 ))&(qbs_notequal(_FUNC_READSETTING_STRING_SECTION,qbs_new_txt_len("[]",2)))))||new_error){ if(qbevent){evnt(25747,144,"ini.bm");if(r)goto S_35099;} do{ *__LONG_INICODE= 14 ; if(!qbevent)break;evnt(25747,144,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,144,"ini.bm");}while(r); } do{ qbs_set(__STRING_INILASTSECTION,_FUNC_READSETTING_STRING_SECTION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,146,"ini.bm");}while(r); do{ *__ULONG_INIPOSITION= 0 ; if(!qbevent)break;evnt(25747,148,"ini.bm");}while(r); do{ qbs_set(_FUNC_READSETTING_STRING_KEY,qbs_ltrim(qbs_rtrim(_FUNC_READSETTING_STRING___KEY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,150,"ini.bm");}while(r); do{ qbs_set(__STRING_INILASTKEY,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,151,"ini.bm");}while(r); S_35107:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_READSETTING_STRING_KEY,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,152,"ini.bm");if(r)goto S_35107;} do{ *__LONG_INICODE= 12 ; if(!qbevent)break;evnt(25747,152,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,152,"ini.bm");}while(r); } S_35111:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_READSETTING_STRING_KEY, 1 ),qbs_new_txt_len(";",1)))|(qbs_equal(qbs_left(_FUNC_READSETTING_STRING_KEY, 1 ),qbs_new_txt_len("'",1)))|(-(func_instr(NULL,_FUNC_READSETTING_STRING_KEY,qbs_new_txt_len("[",1),0)> 0 ))|(-(func_instr(NULL,_FUNC_READSETTING_STRING_KEY,qbs_new_txt_len("]",1),0)> 0 ))|(-(func_instr(NULL,_FUNC_READSETTING_STRING_KEY,qbs_new_txt_len("=",1),0)> 0 ))))||new_error){ if(qbevent){evnt(25747,154,"ini.bm");if(r)goto S_35111;} do{ *__LONG_INICODE= 12 ; if(!qbevent)break;evnt(25747,155,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,156,"ini.bm");}while(r); } do{ qbs_set(__STRING_INILASTKEY,_FUNC_READSETTING_STRING_KEY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,159,"ini.bm");}while(r); S_35116:; if ((-(*__ULONG_INIPOSITION> 0 ))||new_error){ if(qbevent){evnt(25747,161,"ini.bm");if(r)goto S_35116;} do{ *_FUNC_READSETTING_ULONG_EQUAL=*__ULONG_INIPOSITION; if(!qbevent)break;evnt(25747,161,"ini.bm");}while(r); do{ goto LABEL_KEYFOUND; if(!qbevent)break;evnt(25747,161,"ini.bm");}while(r); } LABEL_CHECKKEY:; if(qbevent){evnt(25747,162,"ini.bm");r=0;} do{ *__ULONG_INIPOSITION=func_instr(*__ULONG_INIPOSITION+ 1 ,qbs_lcase(__STRING_INISECTIONDATA),qbs_lcase(_FUNC_READSETTING_STRING_KEY),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,163,"ini.bm");}while(r); S_35121:; if ((-(*__ULONG_INIPOSITION> 0 ))||new_error){ if(qbevent){evnt(25747,165,"ini.bm");if(r)goto S_35121;} S_35122:; fornext_value3833=*__ULONG_INIPOSITION- 1 ; fornext_finalvalue3833= 1 ; 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+(*_FUNC_READSETTING_LONG_I); fornext_entrylabel3833: *_FUNC_READSETTING_LONG_I=fornext_value3833; if (fornext_step_negative3833){ if (fornext_value3833fornext_finalvalue3833) break; } fornext_error3833:; if(qbevent){evnt(25747,167,"ini.bm");if(r)goto S_35122;} S_35123:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INISECTIONDATA,*_FUNC_READSETTING_LONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,168,"ini.bm");if(r)goto S_35123;} do{ goto fornext_exit_3832; if(!qbevent)break;evnt(25747,168,"ini.bm");}while(r); } S_35126:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_INISECTIONDATA,*_FUNC_READSETTING_LONG_I)!= 10 ))&(-(qbs_asc(__STRING_INISECTIONDATA,*_FUNC_READSETTING_LONG_I)!= 32 ))))||new_error){ if(qbevent){evnt(25747,169,"ini.bm");if(r)goto S_35126;} do{ goto LABEL_CHECKKEY; if(!qbevent)break;evnt(25747,171,"ini.bm");}while(r); } fornext_continue_3832:; } fornext_exit_3832:; S_35130:; fornext_value3835=*__ULONG_INIPOSITION+_FUNC_READSETTING_STRING_KEY->len; fornext_finalvalue3835=__STRING_INISECTIONDATA->len; fornext_step3835= 1 ; if (fornext_step3835<0) fornext_step_negative3835=1; else fornext_step_negative3835=0; if (new_error) goto fornext_error3835; goto fornext_entrylabel3835; while(1){ fornext_value3835=fornext_step3835+(*_FUNC_READSETTING_LONG_I); fornext_entrylabel3835: *_FUNC_READSETTING_LONG_I=fornext_value3835; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3835){ if (fornext_value3835fornext_finalvalue3835) break; } fornext_error3835:; if(qbevent){evnt(25747,176,"ini.bm");if(r)goto S_35130;} S_35131:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INISECTIONDATA,*_FUNC_READSETTING_LONG_I)==qbs_asc(qbs_new_txt_len("=",1)))))||new_error){ if(qbevent){evnt(25747,177,"ini.bm");if(r)goto S_35131;} do{ goto fornext_exit_3834; if(!qbevent)break;evnt(25747,177,"ini.bm");}while(r); } S_35134:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_INISECTIONDATA,*_FUNC_READSETTING_LONG_I)!=qbs_asc(qbs_new_txt_len("=",1))))&(-(qbs_asc(__STRING_INISECTIONDATA,*_FUNC_READSETTING_LONG_I)!= 32 ))))||new_error){ if(qbevent){evnt(25747,178,"ini.bm");if(r)goto S_35134;} do{ goto LABEL_CHECKKEY; if(!qbevent)break;evnt(25747,180,"ini.bm");}while(r); } fornext_continue_3834:; } fornext_exit_3834:; do{ *_FUNC_READSETTING_ULONG_EQUAL=func_instr(*__ULONG_INIPOSITION,__STRING_INISECTIONDATA,qbs_new_txt_len("=",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,185,"ini.bm");}while(r); LABEL_KEYFOUND:; if(qbevent){evnt(25747,186,"ini.bm");r=0;} do{ *_FUNC_READSETTING_ULONG_FOUNDLF=func_instr(*__ULONG_INIPOSITION,__STRING_INISECTIONDATA,__STRING_INILF,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,187,"ini.bm");}while(r); S_35140:; if ((-(*_FUNC_READSETTING_ULONG_FOUNDLF> 0 ))||new_error){ if(qbevent){evnt(25747,189,"ini.bm");if(r)goto S_35140;} S_35141:; if ((-(*_FUNC_READSETTING_ULONG_EQUAL>*_FUNC_READSETTING_ULONG_FOUNDLF))||new_error){ if(qbevent){evnt(25747,190,"ini.bm");if(r)goto S_35141;} do{ goto LABEL_CHECKKEY; if(!qbevent)break;evnt(25747,190,"ini.bm");}while(r); } }else{ do{ *_FUNC_READSETTING_ULONG_FOUNDLF=__STRING_INISECTIONDATA->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,192,"ini.bm");}while(r); S_35146:; if ((-(*_FUNC_READSETTING_ULONG_EQUAL== 0 ))||new_error){ if(qbevent){evnt(25747,193,"ini.bm");if(r)goto S_35146;} do{ goto LABEL_CHECKKEY; if(!qbevent)break;evnt(25747,193,"ini.bm");}while(r); } } do{ qbs_set(_FUNC_READSETTING_STRING_TEMPVALUE,qbs_ltrim(qbs_rtrim(func_mid(__STRING_INISECTIONDATA,*_FUNC_READSETTING_ULONG_EQUAL+ 1 ,*_FUNC_READSETTING_ULONG_FOUNDLF-*_FUNC_READSETTING_ULONG_EQUAL- 1 ,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,196,"ini.bm");}while(r); S_35151:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_READSETTING_STRING_TEMPVALUE->len> 0 )))||new_error){ if(qbevent){evnt(25747,198,"ini.bm");if(r)goto S_35151;} S_35152:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_READSETTING_STRING_TEMPVALUE, 1 ),func_chr( 34 ))))||new_error){ if(qbevent){evnt(25747,199,"ini.bm");if(r)goto S_35152;} do{ qbs_set(_FUNC_READSETTING_STRING_TEMPVALUE,func_mid(_FUNC_READSETTING_STRING_TEMPVALUE, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,200,"ini.bm");}while(r); do{ *_FUNC_READSETTING_ULONG_QUOTE=func_instr(NULL,_FUNC_READSETTING_STRING_TEMPVALUE,func_chr( 34 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,201,"ini.bm");}while(r); S_35155:; if ((-(*_FUNC_READSETTING_ULONG_QUOTE> 0 ))||new_error){ if(qbevent){evnt(25747,202,"ini.bm");if(r)goto S_35155;} do{ qbs_set(_FUNC_READSETTING_STRING_TEMPVALUE,qbs_left(_FUNC_READSETTING_STRING_TEMPVALUE,*_FUNC_READSETTING_ULONG_QUOTE- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,203,"ini.bm");}while(r); } }else{ S_35159:; if ((*__LONG_INIALLOWBASICCOMMENTS)||new_error){ if(qbevent){evnt(25747,206,"ini.bm");if(r)goto S_35159;} do{ *_FUNC_READSETTING_ULONG_COMMENT=func_instr(NULL,_FUNC_READSETTING_STRING_TEMPVALUE,qbs_new_txt_len("'",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,206,"ini.bm");}while(r); } S_35162:; if ((-(*_FUNC_READSETTING_ULONG_COMMENT== 0 ))||new_error){ if(qbevent){evnt(25747,207,"ini.bm");if(r)goto S_35162;} do{ *_FUNC_READSETTING_ULONG_COMMENT=func_instr(NULL,_FUNC_READSETTING_STRING_TEMPVALUE,qbs_new_txt_len(";",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,207,"ini.bm");}while(r); } S_35165:; if ((-(*_FUNC_READSETTING_ULONG_COMMENT> 0 ))||new_error){ if(qbevent){evnt(25747,208,"ini.bm");if(r)goto S_35165;} do{ qbs_set(_FUNC_READSETTING_STRING_TEMPVALUE,qbs_ltrim(qbs_rtrim(qbs_left(_FUNC_READSETTING_STRING_TEMPVALUE,*_FUNC_READSETTING_ULONG_COMMENT- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,209,"ini.bm");}while(r); } } }else{ do{ *__LONG_INICODE= 2 ; if(!qbevent)break;evnt(25747,213,"ini.bm");}while(r); } }else{ do{ *__LONG_INICODE= 3 ; if(!qbevent)break;evnt(25747,216,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,217,"ini.bm");}while(r); } do{ qbs_set(_FUNC_READSETTING_STRING_READSETTING,_FUNC_READSETTING_STRING_TEMPVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,220,"ini.bm");}while(r); do{ qbs_set(__STRING_INILASTSECTION,FUNC_INICURRENTSECTION()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,221,"ini.bm");}while(r); 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; qbs_maketmp(_FUNC_READSETTING_STRING_READSETTING);return _FUNC_READSETTING_STRING_READSETTING; } qbs* FUNC_INICURRENTSECTION(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,225,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,227,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,228,"ini.bm");}while(r); do{ *_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION=func_instr(NULL,__STRING_INIWHOLEFILE,__STRING_INISECTIONDATA,0)+*__ULONG_INIPOSITION- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,230,"ini.bm");}while(r); LABEL_CHECKSECTION:; if(qbevent){evnt(25747,232,"ini.bm");r=0;} S_35182:; fornext_value3841=*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION- 1 ; fornext_finalvalue3841= 1 ; 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+(*_FUNC_INICURRENTSECTION_ULONG_I); fornext_entrylabel3841: *_FUNC_INICURRENTSECTION_ULONG_I=fornext_value3841; if (fornext_step_negative3841){ if (fornext_value3841fornext_finalvalue3841) break; } fornext_error3841:; if(qbevent){evnt(25747,233,"ini.bm");if(r)goto S_35182;} S_35183:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)==qbs_asc(qbs_new_txt_len("[",1)))))||new_error){ if(qbevent){evnt(25747,234,"ini.bm");if(r)goto S_35183;} do{ *_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION=*_FUNC_INICURRENTSECTION_ULONG_I; if(!qbevent)break;evnt(25747,235,"ini.bm");}while(r); do{ goto fornext_exit_3840; if(!qbevent)break;evnt(25747,235,"ini.bm");}while(r); } fornext_continue_3840:; } fornext_exit_3840:; S_35188:; if ((-(*_FUNC_INICURRENTSECTION_ULONG_I== 0 ))||new_error){ if(qbevent){evnt(25747,239,"ini.bm");if(r)goto S_35188;} do{ qbs_set(_FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION,qbs_new_txt_len("[]",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,239,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,239,"ini.bm");}while(r); } S_35192:; fornext_value3843=*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION- 1 ; fornext_finalvalue3843= 1 ; 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_INICURRENTSECTION_ULONG_I); fornext_entrylabel3843: *_FUNC_INICURRENTSECTION_ULONG_I=fornext_value3843; if (fornext_step_negative3843){ if (fornext_value3843fornext_finalvalue3843) break; } fornext_error3843:; if(qbevent){evnt(25747,242,"ini.bm");if(r)goto S_35192;} S_35193:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,243,"ini.bm");if(r)goto S_35193;} do{ goto fornext_exit_3842; if(!qbevent)break;evnt(25747,243,"ini.bm");}while(r); } S_35196:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)!= 10 ))&(-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)!= 32 ))))||new_error){ if(qbevent){evnt(25747,244,"ini.bm");if(r)goto S_35196;} do{ goto LABEL_CHECKSECTION; if(!qbevent)break;evnt(25747,246,"ini.bm");}while(r); } fornext_continue_3842:; } fornext_exit_3842:; do{ *_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET=func_instr(*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION,__STRING_INIWHOLEFILE,qbs_new_txt_len("]",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,250,"ini.bm");}while(r); S_35201:; if ((-(*_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET> 0 ))||new_error){ if(qbevent){evnt(25747,251,"ini.bm");if(r)goto S_35201;} do{ qbs_set(_FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION,func_mid(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION,*_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET-*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,252,"ini.bm");}while(r); } 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; qbs_maketmp(_FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION);return _FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION; } void SUB_WRITESETTING(qbs*_SUB_WRITESETTING_STRING_FILE,qbs*_SUB_WRITESETTING_STRING___SECTION,qbs*_SUB_WRITESETTING_STRING___KEY,qbs*_SUB_WRITESETTING_STRING___VALUE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,257,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,258,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,259,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,260,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,262,"ini.bm");}while(r); do{ *__LONG_INICODE= 0 ; if(!qbevent)break;evnt(25747,264,"ini.bm");}while(r); do{ qbs_set(_SUB_WRITESETTING_STRING_SECTION,FUNC_INIFORMATSECTION(_SUB_WRITESETTING_STRING___SECTION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,267,"ini.bm");}while(r); S_35211:; if ((*__LONG_INICODE)||new_error){ if(qbevent){evnt(25747,268,"ini.bm");if(r)goto S_35211;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,268,"ini.bm");}while(r); } do{ qbs_set(_SUB_WRITESETTING_STRING_KEY,qbs_ltrim(qbs_rtrim(_SUB_WRITESETTING_STRING___KEY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,270,"ini.bm");}while(r); S_35215:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WRITESETTING_STRING_KEY,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,271,"ini.bm");if(r)goto S_35215;} do{ *__LONG_INICODE= 12 ; if(!qbevent)break;evnt(25747,271,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,271,"ini.bm");}while(r); } do{ qbs_set(__STRING_INILASTKEY,_SUB_WRITESETTING_STRING_KEY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,272,"ini.bm");}while(r); do{ qbs_set(_SUB_WRITESETTING_STRING_VALUE,qbs_ltrim(qbs_rtrim(_SUB_WRITESETTING_STRING___VALUE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,274,"ini.bm");}while(r); S_35221:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_ltrim(qbs_str((long double)(func_val(_SUB_WRITESETTING_STRING_VALUE)))),_SUB_WRITESETTING_STRING_VALUE)))||new_error){ if(qbevent){evnt(25747,275,"ini.bm");if(r)goto S_35221;} S_35222:; if ((~(*__LONG_INIDISABLEADDQUOTES))||new_error){ if(qbevent){evnt(25747,276,"ini.bm");if(r)goto S_35222;} S_35223:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WRITESETTING_STRING_VALUE,func_chr( 32 ),0)))||new_error){ if(qbevent){evnt(25747,278,"ini.bm");if(r)goto S_35223;} do{ qbs_set(_SUB_WRITESETTING_STRING_VALUE,qbs_add(qbs_add(func_chr( 34 ),_SUB_WRITESETTING_STRING_VALUE),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,278,"ini.bm");}while(r); } } } do{ qbs_set(_SUB_WRITESETTING_STRING_TEMPVALUE,FUNC_READSETTING(_SUB_WRITESETTING_STRING_FILE,_SUB_WRITESETTING_STRING_SECTION,_SUB_WRITESETTING_STRING_KEY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,283,"ini.bm");}while(r); do{ *__ULONG_INIPOSITION=func_instr(NULL,__STRING_INIWHOLEFILE,__STRING_INISECTIONDATA,0)+*__ULONG_INIPOSITION- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,286,"ini.bm");}while(r); S_35230:; if (((-(*__LONG_INICODE== 1 ))|(-(*__LONG_INICODE== 17 )))||new_error){ if(qbevent){evnt(25747,288,"ini.bm");if(r)goto S_35230;} S_35231:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WRITESETTING_STRING_FILE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,290,"ini.bm");if(r)goto S_35231;} do{ qbs_set(_SUB_WRITESETTING_STRING_FILE,__STRING_CURRENTINIFILENAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,290,"ini.bm");}while(r); } S_35234:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WRITESETTING_STRING_FILE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,291,"ini.bm");if(r)goto S_35234;} do{ *__LONG_INICODE= 21 ; if(!qbevent)break;evnt(25747,291,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,291,"ini.bm");}while(r); } do{ qbs_set(__STRING_CURRENTINIFILENAME,_SUB_WRITESETTING_STRING_FILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,293,"ini.bm");}while(r); S_35239:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_WRITESETTING_STRING_SECTION,qbs_new_txt_len("[]",2))))||new_error){ if(qbevent){evnt(25747,295,"ini.bm");if(r)goto S_35239;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(_SUB_WRITESETTING_STRING_SECTION,__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,296,"ini.bm");}while(r); } do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,299,"ini.bm");}while(r); do{ *__LONG_INICODE= 0 ; if(!qbevent)break;evnt(25747,301,"ini.bm");}while(r); do{ SUB_INICOMMIT(); if(!qbevent)break;evnt(25747,302,"ini.bm");}while(r); do{ SUB_INILOAD(_SUB_WRITESETTING_STRING_FILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,303,"ini.bm");}while(r); S_35246:; if ((-(*__LONG_INICODE== 0 ))||new_error){ if(qbevent){evnt(25747,304,"ini.bm");if(r)goto S_35246;} do{ *__LONG_INICODE= 11 ; if(!qbevent)break;evnt(25747,304,"ini.bm");}while(r); } do{ qbs_set(__STRING_INILASTSECTION,_SUB_WRITESETTING_STRING_SECTION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,305,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,306,"ini.bm");}while(r); } S_35252:; if (((-(*__LONG_INICODE== 0 ))|(-(*__LONG_INICODE== 2 )))||new_error){ if(qbevent){evnt(25747,309,"ini.bm");if(r)goto S_35252;} S_35253:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(__STRING_INILASTSECTION),qbs_lcase(_SUB_WRITESETTING_STRING_SECTION))))||new_error){ if(qbevent){evnt(25747,310,"ini.bm");if(r)goto S_35253;} S_35254:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ltrim(qbs_rtrim(_SUB_WRITESETTING_STRING___VALUE)),_SUB_WRITESETTING_STRING_TEMPVALUE))&(-(((int32)(qbs_ltrim(qbs_rtrim(_SUB_WRITESETTING_STRING___VALUE)))->len)> 0 ))))||new_error){ if(qbevent){evnt(25747,311,"ini.bm");if(r)goto S_35254;} do{ *__LONG_INICODE= 8 ; if(!qbevent)break;evnt(25747,313,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,314,"ini.bm");}while(r); } do{ if(!qbevent)break;evnt(25747,317,"ini.bm");}while(r); do{ *_SUB_WRITESETTING_ULONG_NEXTLINE=func_instr(*__ULONG_INIPOSITION+ 1 ,__STRING_INIWHOLEFILE,__STRING_INILF,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,318,"ini.bm");}while(r); do{ qbs_set(__STRING_ININEWFILE,qbs_left(__STRING_INIWHOLEFILE,*__ULONG_INIPOSITION- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,321,"ini.bm");}while(r); do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,322,"ini.bm");}while(r); S_35262:; if ((-(*_SUB_WRITESETTING_ULONG_NEXTLINE> 0 ))||new_error){ if(qbevent){evnt(25747,324,"ini.bm");if(r)goto S_35262;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(__STRING_ININEWFILE,func_mid(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_NEXTLINE,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,325,"ini.bm");}while(r); } do{ SUB_INICOMMIT(); if(!qbevent)break;evnt(25747,328,"ini.bm");}while(r); do{ *__LONG_INICODE= 4 ; if(!qbevent)break;evnt(25747,330,"ini.bm");}while(r); } S_35268:; }else{ if ((-(*__LONG_INICODE== 3 ))|(-(*__LONG_INICODE== 14 ))){ if(qbevent){evnt(25747,332,"ini.bm");if(r)goto S_35268;} do{ *__LONG_INICODE= 0 ; if(!qbevent)break;evnt(25747,333,"ini.bm");}while(r); S_35270:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(__STRING_INILASTSECTION),qbs_lcase(_SUB_WRITESETTING_STRING_SECTION))))||new_error){ if(qbevent){evnt(25747,334,"ini.bm");if(r)goto S_35270;} do{ if(!qbevent)break;evnt(25747,336,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,337,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,338,"ini.bm");}while(r); do{ *_SUB_WRITESETTING_ULONG_BEGINSECTION= 0 ; if(!qbevent)break;evnt(25747,340,"ini.bm");}while(r); do{ *_SUB_WRITESETTING_ULONG_ENDSECTION= 0 ; if(!qbevent)break;evnt(25747,341,"ini.bm");}while(r); LABEL_CHECKSECTION:; if(qbevent){evnt(25747,343,"ini.bm");r=0;} do{ *_SUB_WRITESETTING_ULONG_BEGINSECTION=func_instr(*_SUB_WRITESETTING_ULONG_BEGINSECTION+ 1 ,qbs_lcase(__STRING_INIWHOLEFILE),qbs_lcase(_SUB_WRITESETTING_STRING_SECTION),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,344,"ini.bm");}while(r); S_35277:; if ((-(*_SUB_WRITESETTING_ULONG_BEGINSECTION== 0 ))||new_error){ if(qbevent){evnt(25747,345,"ini.bm");if(r)goto S_35277;} do{ goto LABEL_CREATESECTION; if(!qbevent)break;evnt(25747,345,"ini.bm");}while(r); } S_35280:; fornext_value3849=*_SUB_WRITESETTING_ULONG_BEGINSECTION- 1 ; fornext_finalvalue3849= 1 ; fornext_step3849= -1 ; if (fornext_step3849<0) fornext_step_negative3849=1; else fornext_step_negative3849=0; if (new_error) goto fornext_error3849; goto fornext_entrylabel3849; while(1){ fornext_value3849=fornext_step3849+(*_SUB_WRITESETTING_ULONG_I); fornext_entrylabel3849: *_SUB_WRITESETTING_ULONG_I=fornext_value3849; if (fornext_step_negative3849){ if (fornext_value3849fornext_finalvalue3849) break; } fornext_error3849:; if(qbevent){evnt(25747,348,"ini.bm");if(r)goto S_35280;} S_35281:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,349,"ini.bm");if(r)goto S_35281;} do{ goto fornext_exit_3848; if(!qbevent)break;evnt(25747,349,"ini.bm");}while(r); } S_35284:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_I)!= 10 ))&(-(qbs_asc(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_I)!= 32 ))))||new_error){ if(qbevent){evnt(25747,350,"ini.bm");if(r)goto S_35284;} do{ goto LABEL_CHECKSECTION; if(!qbevent)break;evnt(25747,352,"ini.bm");}while(r); } fornext_continue_3848:; } fornext_exit_3848:; do{ *_SUB_WRITESETTING_ULONG_BRACKET1=func_instr(*_SUB_WRITESETTING_ULONG_BEGINSECTION+ 1 ,__STRING_INIWHOLEFILE,qbs_new_txt_len("[",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,358,"ini.bm");}while(r); S_35289:; if ((-(*_SUB_WRITESETTING_ULONG_BRACKET1> 0 ))||new_error){ if(qbevent){evnt(25747,359,"ini.bm");if(r)goto S_35289;} S_35290:; fornext_value3851=*_SUB_WRITESETTING_ULONG_BRACKET1- 1 ; fornext_finalvalue3851= 1 ; fornext_step3851= -1 ; if (fornext_step3851<0) fornext_step_negative3851=1; else fornext_step_negative3851=0; if (new_error) goto fornext_error3851; goto fornext_entrylabel3851; while(1){ fornext_value3851=fornext_step3851+(*_SUB_WRITESETTING_ULONG_I); fornext_entrylabel3851: *_SUB_WRITESETTING_ULONG_I=fornext_value3851; if (fornext_step_negative3851){ if (fornext_value3851fornext_finalvalue3851) break; } fornext_error3851:; if(qbevent){evnt(25747,360,"ini.bm");if(r)goto S_35290;} S_35291:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_I)== 10 )))||new_error){ if(qbevent){evnt(25747,361,"ini.bm");if(r)goto S_35291;} do{ *_SUB_WRITESETTING_ULONG_ENDSECTION=*_SUB_WRITESETTING_ULONG_I+ 1 -__STRING_INILF->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,361,"ini.bm");}while(r); do{ goto fornext_exit_3850; if(!qbevent)break;evnt(25747,361,"ini.bm");}while(r); } S_35295:; if ((-(*_SUB_WRITESETTING_ULONG_I<=*_SUB_WRITESETTING_ULONG_BEGINSECTION))||new_error){ if(qbevent){evnt(25747,362,"ini.bm");if(r)goto S_35295;} do{ goto fornext_exit_3850; if(!qbevent)break;evnt(25747,362,"ini.bm");}while(r); } fornext_continue_3850:; } fornext_exit_3850:; } S_35300:; if ((-(*_SUB_WRITESETTING_ULONG_ENDSECTION> 0 ))||new_error){ if(qbevent){evnt(25747,366,"ini.bm");if(r)goto S_35300;} do{ qbs_set(__STRING_ININEWFILE,qbs_left(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_ENDSECTION- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,368,"ini.bm");}while(r); do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE),__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,369,"ini.bm");}while(r); S_35303:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_ENDSECTION,__STRING_INILF->len,1),__STRING_INILF)))||new_error){ if(qbevent){evnt(25747,370,"ini.bm");if(r)goto S_35303;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(__STRING_ININEWFILE,__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,370,"ini.bm");}while(r); } do{ qbs_set(__STRING_ININEWFILE,qbs_add(__STRING_ININEWFILE,func_mid(__STRING_INIWHOLEFILE,*_SUB_WRITESETTING_ULONG_ENDSECTION,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,371,"ini.bm");}while(r); }else{ do{ qbs_set(__STRING_ININEWFILE,__STRING_INIWHOLEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,374,"ini.bm");}while(r); S_35309:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_ININEWFILE,__STRING_INILF->len),__STRING_INILF)))||new_error){ if(qbevent){evnt(25747,375,"ini.bm");if(r)goto S_35309;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,376,"ini.bm");}while(r); }else{ do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,__STRING_INILF),_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,378,"ini.bm");}while(r); } } do{ SUB_INICOMMIT(); if(!qbevent)break;evnt(25747,382,"ini.bm");}while(r); S_35316:; if ((-(*__LONG_INICODE== 0 ))||new_error){ if(qbevent){evnt(25747,384,"ini.bm");if(r)goto S_35316;} do{ *__LONG_INICODE= 7 ; if(!qbevent)break;evnt(25747,384,"ini.bm");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,385,"ini.bm");}while(r); }else{ LABEL_CREATESECTION:; if(qbevent){evnt(25747,387,"ini.bm");r=0;} do{ qbs_set(__STRING_ININEWFILE,__STRING_INIWHOLEFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,388,"ini.bm");}while(r); S_35322:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WRITESETTING_STRING_SECTION,qbs_new_txt_len("[]",2))))||new_error){ if(qbevent){evnt(25747,389,"ini.bm");if(r)goto S_35322;} do{ goto LABEL_WRITEATTOP; if(!qbevent)break;evnt(25747,389,"ini.bm");}while(r); } S_35325:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(__STRING_ININEWFILE,__STRING_INILF->len* 2 )),(qbs_add(__STRING_INILF,__STRING_INILF)))))||new_error){ if(qbevent){evnt(25747,391,"ini.bm");if(r)goto S_35325;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,_SUB_WRITESETTING_STRING_SECTION),__STRING_INILF),_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE),__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,392,"ini.bm");}while(r); S_35327:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_ININEWFILE,__STRING_INILF->len),__STRING_INILF))){ if(qbevent){evnt(25747,393,"ini.bm");if(r)goto S_35327;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,__STRING_INILF),_SUB_WRITESETTING_STRING_SECTION),__STRING_INILF),_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE),__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,394,"ini.bm");}while(r); }else{ do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_ININEWFILE,__STRING_INILF),__STRING_INILF),_SUB_WRITESETTING_STRING_SECTION),__STRING_INILF),_SUB_WRITESETTING_STRING_KEY),qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE),__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,396,"ini.bm");}while(r); } } do{ SUB_INICOMMIT(); if(!qbevent)break;evnt(25747,399,"ini.bm");}while(r); S_35333:; if ((-(*__LONG_INICODE== 0 ))||new_error){ if(qbevent){evnt(25747,401,"ini.bm");if(r)goto S_35333;} do{ *__LONG_INICODE= 9 ; if(!qbevent)break;evnt(25747,401,"ini.bm");}while(r); }else{ do{ *__LONG_INICODE= 16 ; if(!qbevent)break;evnt(25747,401,"ini.bm");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,402,"ini.bm");}while(r); } LABEL_WRITEATTOP:; if(qbevent){evnt(25747,406,"ini.bm");r=0;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(qbs_add(qbs_add(_SUB_WRITESETTING_STRING_KEY,qbs_new_txt_len("=",1)),_SUB_WRITESETTING_STRING_VALUE),__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,407,"ini.bm");}while(r); S_35341:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(qbs_ltrim(__STRING_INIWHOLEFILE), 1 ),qbs_new_txt_len("[",1))))||new_error){ if(qbevent){evnt(25747,408,"ini.bm");if(r)goto S_35341;} do{ qbs_set(__STRING_ININEWFILE,qbs_add(__STRING_ININEWFILE,__STRING_INILF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,408,"ini.bm");}while(r); } do{ qbs_set(__STRING_ININEWFILE,qbs_add(__STRING_ININEWFILE,__STRING_INIWHOLEFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,409,"ini.bm");}while(r); do{ SUB_INICOMMIT(); if(!qbevent)break;evnt(25747,411,"ini.bm");}while(r); do{ *__LONG_INICODE= 5 ; if(!qbevent)break;evnt(25747,413,"ini.bm");}while(r); } } 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; } void SUB_INISETADDQUOTES(int8*_SUB_INISETADDQUOTES_BYTE_STATE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,418,"ini.bm");}while(r); S_35349:; if ((*_SUB_INISETADDQUOTES_BYTE_STATE)||new_error){ if(qbevent){evnt(25747,419,"ini.bm");if(r)goto S_35349;} do{ *__LONG_INIDISABLEADDQUOTES= 0 ; if(!qbevent)break;evnt(25747,420,"ini.bm");}while(r); }else{ do{ *__LONG_INIDISABLEADDQUOTES= -1 ; if(!qbevent)break;evnt(25747,422,"ini.bm");}while(r); } 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; } void SUB_INISETFORCERELOAD(int8*_SUB_INISETFORCERELOAD_BYTE_STATE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,427,"ini.bm");}while(r); S_35355:; if ((*_SUB_INISETFORCERELOAD_BYTE_STATE)||new_error){ if(qbevent){evnt(25747,428,"ini.bm");if(r)goto S_35355;} do{ *__LONG_INIFORCERELOAD= -1 ; if(!qbevent)break;evnt(25747,429,"ini.bm");}while(r); }else{ do{ *__LONG_INIFORCERELOAD= 0 ; if(!qbevent)break;evnt(25747,431,"ini.bm");}while(r); } 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; } void SUB_INISETALLOWBASICCOMMENTS(int8*_SUB_INISETALLOWBASICCOMMENTS_BYTE_STATE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,436,"ini.bm");}while(r); S_35361:; if ((*_SUB_INISETALLOWBASICCOMMENTS_BYTE_STATE)||new_error){ if(qbevent){evnt(25747,437,"ini.bm");if(r)goto S_35361;} do{ *__LONG_INIALLOWBASICCOMMENTS= -1 ; if(!qbevent)break;evnt(25747,438,"ini.bm");}while(r); }else{ do{ *__LONG_INIALLOWBASICCOMMENTS= 0 ; if(!qbevent)break;evnt(25747,440,"ini.bm");}while(r); } 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; } void SUB_INISETAUTOCOMMIT(int8*_SUB_INISETAUTOCOMMIT_BYTE_STATE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,445,"ini.bm");}while(r); S_35367:; if ((*_SUB_INISETAUTOCOMMIT_BYTE_STATE)||new_error){ if(qbevent){evnt(25747,446,"ini.bm");if(r)goto S_35367;} do{ *__LONG_INIDISABLEAUTOCOMMIT= 0 ; if(!qbevent)break;evnt(25747,447,"ini.bm");}while(r); }else{ do{ *__LONG_INIDISABLEAUTOCOMMIT= -1 ; if(!qbevent)break;evnt(25747,449,"ini.bm");}while(r); } 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; } void SUB_INILOAD(qbs*_SUB_INILOAD_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 "data137.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25747,454,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,455,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,456,"ini.bm");}while(r); do{ if(!qbevent)break;evnt(25747,457,"ini.bm");}while(r); do{ *__LONG_INICODE= 0 ; if(!qbevent)break;evnt(25747,460,"ini.bm");}while(r); S_35377:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_SUB_INILOAD_STRING_FILE,qbs_new_txt_len("",0)))&(qbs_notequal(__STRING_CURRENTINIFILENAME,_SUB_INILOAD_STRING_FILE))))||new_error){ if(qbevent){evnt(25747,462,"ini.bm");if(r)goto S_35377;} do{ qbs_set(__STRING_CURRENTINIFILENAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,462,"ini.bm");}while(r); } S_35380:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_INIFORCERELOAD&(-(__STRING_CURRENTINIFILENAME->len> 0 ))))||new_error){ if(qbevent){evnt(25747,464,"ini.bm");if(r)goto S_35380;} do{ qbs_set(_SUB_INILOAD_STRING_FILE,__STRING_CURRENTINIFILENAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,465,"ini.bm");}while(r); do{ qbs_set(__STRING_CURRENTINIFILENAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,466,"ini.bm");}while(r); } S_35384:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_CURRENTINIFILENAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25747,471,"ini.bm");if(r)goto S_35384;} S_35385:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_SUB_INILOAD_STRING_FILE)))||new_error){ if(qbevent){evnt(25747,473,"ini.bm");if(r)goto S_35385;} do{ qbs_set(__STRING_CURRENTINIFILENAME,_SUB_INILOAD_STRING_FILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,474,"ini.bm");}while(r); do{ *_SUB_INILOAD_INTEGER_FILENUM=func_freefile(); if(!qbevent)break;evnt(25747,477,"ini.bm");}while(r); do{ sub_open(__STRING_CURRENTINIFILENAME, 2 ,NULL,NULL,*_SUB_INILOAD_INTEGER_FILENUM,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,478,"ini.bm");}while(r); do{ *__ULONG_CURRENTINIFILELOF=func_lof(*_SUB_INILOAD_INTEGER_FILENUM); if(!qbevent)break;evnt(25747,479,"ini.bm");}while(r); do{ qbs_set(__STRING_INIWHOLEFILE,func_space(*__ULONG_CURRENTINIFILELOF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,480,"ini.bm");}while(r); do{ sub_get2(*_SUB_INILOAD_INTEGER_FILENUM, 1 ,__STRING_INIWHOLEFILE,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,481,"ini.bm");}while(r); do{ sub_close(*_SUB_INILOAD_INTEGER_FILENUM,1); if(!qbevent)break;evnt(25747,482,"ini.bm");}while(r); S_35393:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_INIWHOLEFILE,func_chr( 13 ),0)))||new_error){ if(qbevent){evnt(25747,485,"ini.bm");if(r)goto S_35393;} do{ qbs_set(__STRING_INILF,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,485,"ini.bm");}while(r); }else{ do{ qbs_set(__STRING_INILF,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,485,"ini.bm");}while(r); } }else{ LABEL_INIFILENOTFOUND:; if(qbevent){evnt(25747,487,"ini.bm");r=0;} do{ *__LONG_INICODE= 1 ; if(!qbevent)break;evnt(25747,488,"ini.bm");}while(r); do{ qbs_set(__STRING_INILF,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,493,"ini.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25747,495,"ini.bm");}while(r); } S_35403:; }else{ if (qbs_cleanup(qbs_tmp_base,~(func__fileexists(__STRING_CURRENTINIFILENAME)))){ if(qbevent){evnt(25747,497,"ini.bm");if(r)goto S_35403;} do{ qbs_set(__STRING_CURRENTINIFILENAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25747,498,"ini.bm");}while(r); do{ goto LABEL_INIFILENOTFOUND; if(!qbevent)break;evnt(25747,499,"ini.bm");}while(r); } } 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; } int16 FUNC_CREATEBUF(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,14,"simplebuffer.bm");}while(r); do{ *_FUNC_CREATEBUF_LONG_AUB=func_ubound(__ARRAY_STRING_SIMPLEBUFFER_ARRAY,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,16,"simplebuffer.bm");}while(r); do{ *_FUNC_CREATEBUF_LONG_BUF= 0 ; if(!qbevent)break;evnt(25748,17,"simplebuffer.bm");}while(r); do{ *_FUNC_CREATEBUF_INTEGER_CREATEBUF= -1 ; if(!qbevent)break;evnt(25748,17,"simplebuffer.bm");}while(r); S_35411:; while((-(*_FUNC_CREATEBUF_LONG_BUF<*_FUNC_CREATEBUF_LONG_AUB))||new_error){ if(qbevent){evnt(25748,18,"simplebuffer.bm");if(r)goto S_35411;} S_35412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_CREATEBUF_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25748,19,"simplebuffer.bm");if(r)goto S_35412;} do{ goto ww_exit_3859; if(!qbevent)break;evnt(25748,19,"simplebuffer.bm");}while(r); } do{ *_FUNC_CREATEBUF_LONG_BUF=*_FUNC_CREATEBUF_LONG_BUF+ 106 ; if(!qbevent)break;evnt(25748,20,"simplebuffer.bm");}while(r); S_35416:; if ((-(*_FUNC_CREATEBUF_LONG_BUF>= 3473408 ))||new_error){ if(qbevent){evnt(25748,21,"simplebuffer.bm");if(r)goto S_35416;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25748,21,"simplebuffer.bm");}while(r); } ww_continue_3859:; } ww_exit_3859:; S_35420:; if ((-(*_FUNC_CREATEBUF_LONG_AUB<(*_FUNC_CREATEBUF_LONG_BUF+ 105 )))||new_error){ if(qbevent){evnt(25748,24,"simplebuffer.bm");if(r)goto S_35420;} do{ if (__ARRAY_STRING_SIMPLEBUFFER_ARRAY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SIMPLEBUFFER_ARRAY)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_SIMPLEBUFFER_ARRAY[2]&1){ preserved_elements=__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]; } else preserved_elements=0; __ARRAY_STRING_SIMPLEBUFFER_ARRAY[4]= 0 ; __ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]=(*_FUNC_CREATEBUF_LONG_BUF+ 10599 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4]+1; __ARRAY_STRING_SIMPLEBUFFER_ARRAY[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]; if (tmp_long2=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_CREATEBUF_INTEGER_CREATEBUF; } void SUB_DISPOSEBUF(int16*_SUB_DISPOSEBUF_INTEGER_HANDLE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,35,"simplebuffer.bm");}while(r); do{ *_SUB_DISPOSEBUF_LONG_BUF=*_SUB_DISPOSEBUF_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,37,"simplebuffer.bm");}while(r); do{ tmp_long=array_check((*_SUB_DISPOSEBUF_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,38,"simplebuffer.bm");}while(r); do{ tmp_long=array_check((*_SUB_DISPOSEBUF_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,39,"simplebuffer.bm");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free139.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_BUFTOFILE(int16*_SUB_BUFTOFILE_INTEGER_HANDLE,qbs*_SUB_BUFTOFILE_STRING_FILESPEC){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,45,"simplebuffer.bm");}while(r); do{ *_SUB_BUFTOFILE_LONG_BUF=*_SUB_BUFTOFILE_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,47,"simplebuffer.bm");}while(r); do{ *_SUB_BUFTOFILE_INTEGER_FF=func_freefile(); if(!qbevent)break;evnt(25748,48,"simplebuffer.bm");}while(r); do{ qbs_set(_SUB_BUFTOFILE_STRING_OP,qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_BUFTOFILE_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),FUNC_GETBUFLEN(_SUB_BUFTOFILE_INTEGER_HANDLE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,48,"simplebuffer.bm");}while(r); do{ sub_open(_SUB_BUFTOFILE_STRING_FILESPEC, 4 ,NULL, 4 ,*_SUB_BUFTOFILE_INTEGER_FF,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,49,"simplebuffer.bm");}while(r); do{ sub_close(*_SUB_BUFTOFILE_INTEGER_FF,1); if(!qbevent)break;evnt(25748,49,"simplebuffer.bm");}while(r); do{ sub_open(_SUB_BUFTOFILE_STRING_FILESPEC, 2 ,NULL, 4 ,*_SUB_BUFTOFILE_INTEGER_FF,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,50,"simplebuffer.bm");}while(r); do{ sub_put2(*_SUB_BUFTOFILE_INTEGER_FF,NULL,byte_element((uint64)_SUB_BUFTOFILE_STRING_OP->chr,_SUB_BUFTOFILE_STRING_OP->len,byte_element_3861),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,51,"simplebuffer.bm");}while(r); do{ sub_close(*_SUB_BUFTOFILE_INTEGER_FF,1); if(!qbevent)break;evnt(25748,52,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_BUFTOFILE_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 13 , 4 ,l2string( 0 ),1); if(!qbevent)break;evnt(25748,54,"simplebuffer.bm");}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; } void SUB_WRITEBUFLINE(int16*_SUB_WRITEBUFLINE_INTEGER_HANDLE,qbs*_SUB_WRITEBUFLINE_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 "data141.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,60,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFLINE_LONG_BUF=*_SUB_WRITEBUFLINE_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,62,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFLINE_LONG_CUR=FUNC_GETBUFPOS(_SUB_WRITEBUFLINE_INTEGER_HANDLE); if(!qbevent)break;evnt(25748,63,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFLINE_LONG_TXL=_SUB_WRITEBUFLINE_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,63,"simplebuffer.bm");}while(r); do{ qbs_set(_SUB_WRITEBUFLINE_STRING_BRC,FUNC_BUFEOLSEQ(_SUB_WRITEBUFLINE_INTEGER_HANDLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,64,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFLINE_INTEGER_BRL=_SUB_WRITEBUFLINE_STRING_BRC->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,64,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFLINE_INTEGER64_CBL=FUNC_GETBUFLEN(_SUB_WRITEBUFLINE_INTEGER_HANDLE); if(!qbevent)break;evnt(25748,65,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFLINE_LONG_CHG=*_SUB_WRITEBUFLINE_LONG_TXL+*_SUB_WRITEBUFLINE_INTEGER_BRL; if(!qbevent)break;evnt(25748,65,"simplebuffer.bm");}while(r); S_35448:; while((qbs_cleanup(qbs_tmp_base,-((*_SUB_WRITEBUFLINE_INTEGER64_CBL+*_SUB_WRITEBUFLINE_LONG_CHG)>(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])]))->len))))||new_error){ if(qbevent){evnt(25748,67,"simplebuffer.bm");if(r)goto S_35448;} do{ tmp_long=array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),func_space( 10000 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,68,"simplebuffer.bm");}while(r); ww_continue_3865:; } ww_exit_3865:; do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_SUB_WRITEBUFLINE_LONG_CUR,0,qbs_add(qbs_add(_SUB_WRITEBUFLINE_STRING_TEXT,_SUB_WRITEBUFLINE_STRING_BRC),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_SUB_WRITEBUFLINE_LONG_CUR,*_SUB_WRITEBUFLINE_INTEGER64_CBL-*_SUB_WRITEBUFLINE_LONG_CUR+ 1 ,1)),0); if(!qbevent)break;evnt(25748,71,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 1 , 4 ,l2string(*_SUB_WRITEBUFLINE_LONG_CUR+*_SUB_WRITEBUFLINE_LONG_CHG),1); if(!qbevent)break;evnt(25748,72,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 5 , 4 ,l2string(*_SUB_WRITEBUFLINE_INTEGER64_CBL+*_SUB_WRITEBUFLINE_LONG_CHG),1); if(!qbevent)break;evnt(25748,73,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFLINE_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 13 , 4 ,l2string( -1 ),1); if(!qbevent)break;evnt(25748,74,"simplebuffer.bm");}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; } qbs* FUNC_READBUFRAWDATA(int16*_FUNC_READBUFRAWDATA_INTEGER_HANDLE,int32*_FUNC_READBUFRAWDATA_LONG_SIZE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,80,"simplebuffer.bm");}while(r); do{ *_FUNC_READBUFRAWDATA_LONG_BUF=*_FUNC_READBUFRAWDATA_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,82,"simplebuffer.bm");}while(r); do{ *_FUNC_READBUFRAWDATA_LONG_CUR=FUNC_GETBUFPOS(_FUNC_READBUFRAWDATA_INTEGER_HANDLE); if(!qbevent)break;evnt(25748,83,"simplebuffer.bm");}while(r); do{ *_FUNC_READBUFRAWDATA_LONG_EOB=FUNC_GETBUFLEN(_FUNC_READBUFRAWDATA_INTEGER_HANDLE)+ 1 ; if(!qbevent)break;evnt(25748,83,"simplebuffer.bm");}while(r); S_35459:; if ((-(*_FUNC_READBUFRAWDATA_LONG_SIZE>(*_FUNC_READBUFRAWDATA_LONG_EOB-*_FUNC_READBUFRAWDATA_LONG_CUR)))||new_error){ if(qbevent){evnt(25748,84,"simplebuffer.bm");if(r)goto S_35459;} do{ *_FUNC_READBUFRAWDATA_LONG_SIZE=*_FUNC_READBUFRAWDATA_LONG_EOB-*_FUNC_READBUFRAWDATA_LONG_CUR; if(!qbevent)break;evnt(25748,84,"simplebuffer.bm");}while(r); } do{ qbs_set(_FUNC_READBUFRAWDATA_STRING_READBUFRAWDATA,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_READBUFRAWDATA_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_READBUFRAWDATA_LONG_CUR,*_FUNC_READBUFRAWDATA_LONG_SIZE,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,86,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_READBUFRAWDATA_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 1 , 4 ,l2string(*_FUNC_READBUFRAWDATA_LONG_CUR+*_FUNC_READBUFRAWDATA_LONG_SIZE),1); if(!qbevent)break;evnt(25748,87,"simplebuffer.bm");}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; qbs_maketmp(_FUNC_READBUFRAWDATA_STRING_READBUFRAWDATA);return _FUNC_READBUFRAWDATA_STRING_READBUFRAWDATA; } void SUB_WRITEBUFRAWDATA(int16*_SUB_WRITEBUFRAWDATA_INTEGER_HANDLE,qbs*_SUB_WRITEBUFRAWDATA_STRING_RAWDATA){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,93,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFRAWDATA_LONG_BUF=*_SUB_WRITEBUFRAWDATA_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,95,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFRAWDATA_LONG_CUR=FUNC_GETBUFPOS(_SUB_WRITEBUFRAWDATA_INTEGER_HANDLE); if(!qbevent)break;evnt(25748,96,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFRAWDATA_LONG_RDL=_SUB_WRITEBUFRAWDATA_STRING_RAWDATA->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,96,"simplebuffer.bm");}while(r); do{ *_SUB_WRITEBUFRAWDATA_INTEGER64_CBL=FUNC_GETBUFLEN(_SUB_WRITEBUFRAWDATA_INTEGER_HANDLE); if(!qbevent)break;evnt(25748,97,"simplebuffer.bm");}while(r); S_35469:; while((qbs_cleanup(qbs_tmp_base,-((*_SUB_WRITEBUFRAWDATA_INTEGER64_CBL+*_SUB_WRITEBUFRAWDATA_LONG_RDL)>(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])]))->len))))||new_error){ if(qbevent){evnt(25748,99,"simplebuffer.bm");if(r)goto S_35469;} do{ tmp_long=array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[tmp_long])),qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),func_space( 10000 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,100,"simplebuffer.bm");}while(r); ww_continue_3869:; } ww_exit_3869:; do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_SUB_WRITEBUFRAWDATA_LONG_CUR,0,qbs_add(_SUB_WRITEBUFRAWDATA_STRING_RAWDATA,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_SUB_WRITEBUFRAWDATA_LONG_CUR,*_SUB_WRITEBUFRAWDATA_INTEGER64_CBL-*_SUB_WRITEBUFRAWDATA_LONG_CUR+ 1 ,1)),0); if(!qbevent)break;evnt(25748,103,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 1 , 4 ,l2string(*_SUB_WRITEBUFRAWDATA_LONG_CUR+*_SUB_WRITEBUFRAWDATA_LONG_RDL),1); if(!qbevent)break;evnt(25748,104,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 5 , 4 ,l2string(*_SUB_WRITEBUFRAWDATA_INTEGER64_CBL+*_SUB_WRITEBUFRAWDATA_LONG_RDL),1); if(!qbevent)break;evnt(25748,105,"simplebuffer.bm");}while(r); S_35475:; if ((-(*_SUB_WRITEBUFRAWDATA_LONG_RDL> 0 ))||new_error){ if(qbevent){evnt(25748,106,"simplebuffer.bm");if(r)goto S_35475;} do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 9 , 4 ,qbs_new_txt_len("EolU",4),1); if(!qbevent)break;evnt(25748,107,"simplebuffer.bm");}while(r); do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_SUB_WRITEBUFRAWDATA_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 13 , 4 ,l2string( -1 ),1); if(!qbevent)break;evnt(25748,108,"simplebuffer.bm");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free143.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_SEEKBUF(int16*_FUNC_SEEKBUF_INTEGER_HANDLE,int32*_FUNC_SEEKBUF_LONG_DISPLACE,int16*_FUNC_SEEKBUF_INTEGER_MODE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,115,"simplebuffer.bm");}while(r); do{ *_FUNC_SEEKBUF_LONG_BUF=*_FUNC_SEEKBUF_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,117,"simplebuffer.bm");}while(r); do{ *_FUNC_SEEKBUF_LONG_CUR=FUNC_GETBUFPOS(_FUNC_SEEKBUF_INTEGER_HANDLE); if(!qbevent)break;evnt(25748,118,"simplebuffer.bm");}while(r); do{ *_FUNC_SEEKBUF_LONG_EOB=FUNC_GETBUFLEN(_FUNC_SEEKBUF_INTEGER_HANDLE)+ 1 ; if(!qbevent)break;evnt(25748,118,"simplebuffer.bm");}while(r); do{ qbs_set(_FUNC_SEEKBUF_STRING_BRC,FUNC_BUFEOLSEQ(_FUNC_SEEKBUF_INTEGER_HANDLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,119,"simplebuffer.bm");}while(r); do{ *_FUNC_SEEKBUF_INTEGER_BRL=_FUNC_SEEKBUF_STRING_BRC->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,119,"simplebuffer.bm");}while(r); S_35485:; if(qbevent){evnt(25748,121,"simplebuffer.bm");if(r)goto S_35485;} S_35486:; if (((*_FUNC_SEEKBUF_INTEGER_MODE==( -22 )))||new_error){ if(qbevent){evnt(25748,122,"simplebuffer.bm");if(r)goto S_35486;} do{ *_FUNC_SEEKBUF_LONG_ORIGIN= 1 ; if(!qbevent)break;evnt(25748,122,"simplebuffer.bm");}while(r); sc_ec_179_end:; goto sc_3872_end; } S_35488:; if (((*_FUNC_SEEKBUF_INTEGER_MODE==( -23 )))||new_error){ if(qbevent){evnt(25748,123,"simplebuffer.bm");if(r)goto S_35488;} do{ *_FUNC_SEEKBUF_LONG_ORIGIN=*_FUNC_SEEKBUF_LONG_CUR; if(!qbevent)break;evnt(25748,123,"simplebuffer.bm");}while(r); sc_ec_180_end:; goto sc_3872_end; } S_35490:; if (((*_FUNC_SEEKBUF_INTEGER_MODE==( -24 )))||new_error){ if(qbevent){evnt(25748,124,"simplebuffer.bm");if(r)goto S_35490;} do{ *_FUNC_SEEKBUF_LONG_ORIGIN=*_FUNC_SEEKBUF_LONG_EOB; if(!qbevent)break;evnt(25748,124,"simplebuffer.bm");}while(r); sc_ec_181_end:; goto sc_3872_end; } do{ *_FUNC_SEEKBUF_LONG_SEEKBUF= -11 ; if(!qbevent)break;evnt(25748,126,"simplebuffer.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25748,127,"simplebuffer.bm");}while(r); sc_3872_end:; do{ *_FUNC_SEEKBUF_LONG_NEWPOS=*_FUNC_SEEKBUF_LONG_ORIGIN+*_FUNC_SEEKBUF_LONG_DISPLACE; if(!qbevent)break;evnt(25748,130,"simplebuffer.bm");}while(r); S_35497:; if (((-(*_FUNC_SEEKBUF_LONG_NEWPOS< 1 ))|(-(*_FUNC_SEEKBUF_LONG_NEWPOS>*_FUNC_SEEKBUF_LONG_EOB)))||new_error){ if(qbevent){evnt(25748,131,"simplebuffer.bm");if(r)goto S_35497;} do{ *_FUNC_SEEKBUF_LONG_SEEKBUF= -12 ; if(!qbevent)break;evnt(25748,132,"simplebuffer.bm");}while(r); }else{ do{ sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_SEEKBUF_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 1 , 4 ,l2string(*_FUNC_SEEKBUF_LONG_NEWPOS),1); if(!qbevent)break;evnt(25748,134,"simplebuffer.bm");}while(r); do{ *_FUNC_SEEKBUF_LONG_SEEKBUF=*_FUNC_SEEKBUF_LONG_CUR; if(!qbevent)break;evnt(25748,135,"simplebuffer.bm");}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; return *_FUNC_SEEKBUF_LONG_SEEKBUF; } int32 FUNC_GETBUFPOS(int16*_FUNC_GETBUFPOS_INTEGER_HANDLE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,142,"simplebuffer.bm");}while(r); do{ *_FUNC_GETBUFPOS_LONG_BUF=*_FUNC_GETBUFPOS_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,144,"simplebuffer.bm");}while(r); do{ *_FUNC_GETBUFPOS_LONG_GETBUFPOS=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_GETBUFPOS_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,145,"simplebuffer.bm");}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; return *_FUNC_GETBUFPOS_LONG_GETBUFPOS; } int32 FUNC_GETBUFLEN(int16*_FUNC_GETBUFLEN_INTEGER_HANDLE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,151,"simplebuffer.bm");}while(r); do{ *_FUNC_GETBUFLEN_LONG_BUF=*_FUNC_GETBUFLEN_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,153,"simplebuffer.bm");}while(r); do{ *_FUNC_GETBUFLEN_LONG_GETBUFLEN=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_GETBUFLEN_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,154,"simplebuffer.bm");}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; return *_FUNC_GETBUFLEN_LONG_GETBUFLEN; } int16 FUNC_ISBUFCHANGED(int16*_FUNC_ISBUFCHANGED_INTEGER_HANDLE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,160,"simplebuffer.bm");}while(r); do{ *_FUNC_ISBUFCHANGED_LONG_BUF=*_FUNC_ISBUFCHANGED_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,162,"simplebuffer.bm");}while(r); do{ *_FUNC_ISBUFCHANGED_INTEGER_ISBUFCHANGED=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_ISBUFCHANGED_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 13 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,163,"simplebuffer.bm");}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; return *_FUNC_ISBUFCHANGED_INTEGER_ISBUFCHANGED; } qbs* FUNC_BUFEOLSEQ(int16*_FUNC_BUFEOLSEQ_INTEGER_HANDLE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,169,"simplebuffer.bm");}while(r); do{ *_FUNC_BUFEOLSEQ_LONG_BUF=*_FUNC_BUFEOLSEQ_INTEGER_HANDLE* 106 ; if(!qbevent)break;evnt(25748,171,"simplebuffer.bm");}while(r); S_35514:; qbs_set(sc_3873,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_BUFEOLSEQ_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 9 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25748,172,"simplebuffer.bm");if(r)goto S_35514;} S_35515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3873,qbs_new_txt_len("EolU",4))||qbs_equal(sc_3873,qbs_new_txt_len("EolN",4))))||new_error){ if(qbevent){evnt(25748,173,"simplebuffer.bm");if(r)goto S_35515;} do{ qbs_set(_FUNC_BUFEOLSEQ_STRING_BUFEOLSEQ,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,174,"simplebuffer.bm");}while(r); S_35517:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func__os(),qbs_new_txt_len("[LINUX]",7),0)> 0 )))||new_error){ if(qbevent){evnt(25748,175,"simplebuffer.bm");if(r)goto S_35517;} do{ qbs_set(_FUNC_BUFEOLSEQ_STRING_BUFEOLSEQ,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,175,"simplebuffer.bm");}while(r); } sc_ec_182_end:; goto sc_3873_end; } S_35520:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3873,qbs_new_txt_len("EolL",4))))||new_error){ if(qbevent){evnt(25748,176,"simplebuffer.bm");if(r)goto S_35520;} do{ qbs_set(_FUNC_BUFEOLSEQ_STRING_BUFEOLSEQ,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,177,"simplebuffer.bm");}while(r); sc_ec_183_end:; goto sc_3873_end; } S_35522:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3873,qbs_new_txt_len("EolW",4))))||new_error){ if(qbevent){evnt(25748,178,"simplebuffer.bm");if(r)goto S_35522;} do{ qbs_set(_FUNC_BUFEOLSEQ_STRING_BUFEOLSEQ,qbs_add(func_chr( 13 ),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,179,"simplebuffer.bm");}while(r); sc_ec_184_end:; goto sc_3873_end; } sc_3873_end:; 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_BUFEOLSEQ_STRING_BUFEOLSEQ);return _FUNC_BUFEOLSEQ_STRING_BUFEOLSEQ; } int16 FUNC_OPENBUFFER(qbs*_FUNC_OPENBUFFER_STRING_SBMODE,qbs*_FUNC_OPENBUFFER_STRING_SBNAME){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,15,"sb_qb64pe_extension.bm");}while(r); S_35526:; fornext_value3877= 0 ; fornext_finalvalue3877=func_ubound(__ARRAY_STRING_SBUFN,1,1); fornext_step3877= 1 ; if (fornext_step3877<0) fornext_step_negative3877=1; else fornext_step_negative3877=0; if (new_error) goto fornext_error3877; goto fornext_entrylabel3877; while(1){ fornext_value3877=fornext_step3877+(*_FUNC_OPENBUFFER_INTEGER_BUF); fornext_entrylabel3877: *_FUNC_OPENBUFFER_INTEGER_BUF=fornext_value3877; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3877){ if (fornext_value3877fornext_finalvalue3877) break; } fornext_error3877:; if(qbevent){evnt(25748,17,"sb_qb64pe_extension.bm");if(r)goto S_35526;} S_35527:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_FUNC_OPENBUFFER_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])])),_FUNC_OPENBUFFER_STRING_SBNAME)))||new_error){ if(qbevent){evnt(25748,18,"sb_qb64pe_extension.bm");if(r)goto S_35527;} do{ goto fornext_exit_3876; if(!qbevent)break;evnt(25748,18,"sb_qb64pe_extension.bm");}while(r); } fornext_continue_3876:; } fornext_exit_3876:; S_35531:; qbs_set(sc_3878,qbs_ucase(qbs_left(_FUNC_OPENBUFFER_STRING_SBMODE, 1 ))); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25748,21,"sb_qb64pe_extension.bm");if(r)goto S_35531;} S_35532:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3878,qbs_new_txt_len("A",1))))||new_error){ if(qbevent){evnt(25748,22,"sb_qb64pe_extension.bm");if(r)goto S_35532;} S_35533:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_OPENBUFFER_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,23,"sb_qb64pe_extension.bm");if(r)goto S_35533;} do{ return_point[next_return_point++]=8; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWBUF; RETURN_8:; if(!qbevent)break;evnt(25748,23,"sb_qb64pe_extension.bm");}while(r); } do{ *_FUNC_OPENBUFFER_LONG_NUL=FUNC_SEEKBUF(_FUNC_OPENBUFFER_INTEGER_BUF,&(pass3879= 0 ),&(pass3880= -24 )); if(!qbevent)break;evnt(25748,24,"sb_qb64pe_extension.bm");}while(r); sc_ec_185_end:; goto sc_3878_end; } S_35537:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3878,qbs_new_txt_len("B",1))))||new_error){ if(qbevent){evnt(25748,25,"sb_qb64pe_extension.bm");if(r)goto S_35537;} S_35538:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_OPENBUFFER_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,26,"sb_qb64pe_extension.bm");if(r)goto S_35538;} do{ return_point[next_return_point++]=9; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWBUF; RETURN_9:; if(!qbevent)break;evnt(25748,26,"sb_qb64pe_extension.bm");}while(r); } do{ *_FUNC_OPENBUFFER_LONG_NUL=FUNC_SEEKBUF(_FUNC_OPENBUFFER_INTEGER_BUF,&(pass3881= 0 ),&(pass3882= -22 )); if(!qbevent)break;evnt(25748,27,"sb_qb64pe_extension.bm");}while(r); sc_ec_186_end:; goto sc_3878_end; } S_35542:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3878,qbs_new_txt_len("I",1))))||new_error){ if(qbevent){evnt(25748,28,"sb_qb64pe_extension.bm");if(r)goto S_35542;} S_35543:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_OPENBUFFER_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,29,"sb_qb64pe_extension.bm");if(r)goto S_35543;} do{ error( 53 ); if(!qbevent)break;evnt(25748,29,"sb_qb64pe_extension.bm");}while(r); } do{ *_FUNC_OPENBUFFER_LONG_NUL=FUNC_SEEKBUF(_FUNC_OPENBUFFER_INTEGER_BUF,&(pass3883= 0 ),&(pass3884= -22 )); if(!qbevent)break;evnt(25748,30,"sb_qb64pe_extension.bm");}while(r); sc_ec_187_end:; goto sc_3878_end; } S_35547:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3878,qbs_new_txt_len("O",1))))||new_error){ if(qbevent){evnt(25748,31,"sb_qb64pe_extension.bm");if(r)goto S_35547;} S_35548:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_OPENBUFFER_INTEGER_BUF<=func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,32,"sb_qb64pe_extension.bm");if(r)goto S_35548;} do{ SUB_DISPOSEBUF(_FUNC_OPENBUFFER_INTEGER_BUF); if(!qbevent)break;evnt(25748,32,"sb_qb64pe_extension.bm");}while(r); do{ tmp_long=array_check((*_FUNC_OPENBUFFER_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,32,"sb_qb64pe_extension.bm");}while(r); } do{ return_point[next_return_point++]=10; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWBUF; RETURN_10:; if(!qbevent)break;evnt(25748,33,"sb_qb64pe_extension.bm");}while(r); sc_ec_188_end:; goto sc_3878_end; } do{ *_FUNC_OPENBUFFER_INTEGER_BUF= -1 ; if(!qbevent)break;evnt(25748,35,"sb_qb64pe_extension.bm");}while(r); sc_3878_end:; do{ *_FUNC_OPENBUFFER_INTEGER_OPENBUFFER=*_FUNC_OPENBUFFER_INTEGER_BUF; if(!qbevent)break;evnt(25748,37,"sb_qb64pe_extension.bm");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25748,38,"sb_qb64pe_extension.bm");}while(r); LABEL_NEWBUF:; if(qbevent){evnt(25748,40,"sb_qb64pe_extension.bm");r=0;} do{ *_FUNC_OPENBUFFER_INTEGER_BUF=FUNC_CREATEBUF(); if(!qbevent)break;evnt(25748,41,"sb_qb64pe_extension.bm");}while(r); S_35559:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_OPENBUFFER_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,42,"sb_qb64pe_extension.bm");if(r)goto S_35559;} do{ if (__ARRAY_STRING_SBUFN[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SBUFN)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_SBUFN[2]&1){ preserved_elements=__ARRAY_STRING_SBUFN[5]; } else preserved_elements=0; __ARRAY_STRING_SBUFN[4]= 0 ; __ARRAY_STRING_SBUFN[5]=(*_FUNC_OPENBUFFER_INTEGER_BUF+ 99 )-__ARRAY_STRING_SBUFN[4]+1; __ARRAY_STRING_SBUFN[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_SBUFN[5]; if (tmp_long2=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_OPENBUFFER_INTEGER_OPENBUFFER; } void SUB_CLEARBUFFERS(qbs*_SUB_CLEARBUFFERS_STRING_SBNAME){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,56,"sb_qb64pe_extension.bm");}while(r); S_35565:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_CLEARBUFFERS_STRING_SBNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25748,58,"sb_qb64pe_extension.bm");if(r)goto S_35565;} S_35566:; fornext_value3887= 0 ; fornext_finalvalue3887=func_ubound(__ARRAY_STRING_SBUFN,1,1); fornext_step3887= 1 ; if (fornext_step3887<0) fornext_step_negative3887=1; else fornext_step_negative3887=0; if (new_error) goto fornext_error3887; goto fornext_entrylabel3887; while(1){ fornext_value3887=fornext_step3887+(*_SUB_CLEARBUFFERS_INTEGER_BUF); fornext_entrylabel3887: *_SUB_CLEARBUFFERS_INTEGER_BUF=fornext_value3887; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3887){ if (fornext_value3887fornext_finalvalue3887) break; } fornext_error3887:; if(qbevent){evnt(25748,59,"sb_qb64pe_extension.bm");if(r)goto S_35566;} S_35567:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_SUB_CLEARBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])])),_SUB_CLEARBUFFERS_STRING_SBNAME)))||new_error){ if(qbevent){evnt(25748,60,"sb_qb64pe_extension.bm");if(r)goto S_35567;} do{ goto fornext_exit_3886; if(!qbevent)break;evnt(25748,60,"sb_qb64pe_extension.bm");}while(r); } fornext_continue_3886:; } fornext_exit_3886:; S_35571:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_CLEARBUFFERS_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,62,"sb_qb64pe_extension.bm");if(r)goto S_35571;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25748,62,"sb_qb64pe_extension.bm");}while(r); } do{ SUB_DISPOSEBUF(_SUB_CLEARBUFFERS_INTEGER_BUF); if(!qbevent)break;evnt(25748,63,"sb_qb64pe_extension.bm");}while(r); do{ tmp_long=array_check((*_SUB_CLEARBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,63,"sb_qb64pe_extension.bm");}while(r); }else{ S_35577:; fornext_value3889= 0 ; fornext_finalvalue3889=func_ubound(__ARRAY_STRING_SBUFN,1,1); fornext_step3889= 1 ; if (fornext_step3889<0) fornext_step_negative3889=1; else fornext_step_negative3889=0; if (new_error) goto fornext_error3889; goto fornext_entrylabel3889; while(1){ fornext_value3889=fornext_step3889+(*_SUB_CLEARBUFFERS_INTEGER_BUF); fornext_entrylabel3889: *_SUB_CLEARBUFFERS_INTEGER_BUF=fornext_value3889; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3889){ if (fornext_value3889fornext_finalvalue3889) break; } fornext_error3889:; if(qbevent){evnt(25748,65,"sb_qb64pe_extension.bm");if(r)goto S_35577;} S_35578:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_SUB_CLEARBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25748,66,"sb_qb64pe_extension.bm");if(r)goto S_35578;} do{ SUB_DISPOSEBUF(_SUB_CLEARBUFFERS_INTEGER_BUF); if(!qbevent)break;evnt(25748,66,"sb_qb64pe_extension.bm");}while(r); do{ tmp_long=array_check((*_SUB_CLEARBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,66,"sb_qb64pe_extension.bm");}while(r); } fornext_continue_3888:; } fornext_exit_3888:; } 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; } void SUB_WRITEBUFFERS(qbs*_SUB_WRITEBUFFERS_STRING_SBNAME){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25748,82,"sb_qb64pe_extension.bm");}while(r); S_35585:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_WRITEBUFFERS_STRING_SBNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25748,84,"sb_qb64pe_extension.bm");if(r)goto S_35585;} S_35586:; fornext_value3892= 0 ; fornext_finalvalue3892=func_ubound(__ARRAY_STRING_SBUFN,1,1); fornext_step3892= 1 ; if (fornext_step3892<0) fornext_step_negative3892=1; else fornext_step_negative3892=0; if (new_error) goto fornext_error3892; goto fornext_entrylabel3892; while(1){ fornext_value3892=fornext_step3892+(*_SUB_WRITEBUFFERS_INTEGER_BUF); fornext_entrylabel3892: *_SUB_WRITEBUFFERS_INTEGER_BUF=fornext_value3892; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3892){ if (fornext_value3892fornext_finalvalue3892) break; } fornext_error3892:; if(qbevent){evnt(25748,85,"sb_qb64pe_extension.bm");if(r)goto S_35586;} S_35587:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_SUB_WRITEBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])])),_SUB_WRITEBUFFERS_STRING_SBNAME)))||new_error){ if(qbevent){evnt(25748,86,"sb_qb64pe_extension.bm");if(r)goto S_35587;} do{ goto fornext_exit_3891; if(!qbevent)break;evnt(25748,86,"sb_qb64pe_extension.bm");}while(r); } fornext_continue_3891:; } fornext_exit_3891:; S_35591:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_WRITEBUFFERS_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||new_error){ if(qbevent){evnt(25748,88,"sb_qb64pe_extension.bm");if(r)goto S_35591;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25748,88,"sb_qb64pe_extension.bm");}while(r); } S_35594:; if ((FUNC_ISBUFCHANGED(_SUB_WRITEBUFFERS_INTEGER_BUF))||new_error){ if(qbevent){evnt(25748,89,"sb_qb64pe_extension.bm");if(r)goto S_35594;} do{ SUB_BUFTOFILE(_SUB_WRITEBUFFERS_INTEGER_BUF,((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_SUB_WRITEBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,89,"sb_qb64pe_extension.bm");}while(r); } }else{ S_35598:; fornext_value3894= 0 ; fornext_finalvalue3894=func_ubound(__ARRAY_STRING_SBUFN,1,1); 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_WRITEBUFFERS_INTEGER_BUF); fornext_entrylabel3894: *_SUB_WRITEBUFFERS_INTEGER_BUF=fornext_value3894; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3894){ if (fornext_value3894fornext_finalvalue3894) break; } fornext_error3894:; if(qbevent){evnt(25748,91,"sb_qb64pe_extension.bm");if(r)goto S_35598;} S_35599:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_SUB_WRITEBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])])),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25748,92,"sb_qb64pe_extension.bm");if(r)goto S_35599;} S_35600:; if ((FUNC_ISBUFCHANGED(_SUB_WRITEBUFFERS_INTEGER_BUF))||new_error){ if(qbevent){evnt(25748,93,"sb_qb64pe_extension.bm");if(r)goto S_35600;} do{ SUB_BUFTOFILE(_SUB_WRITEBUFFERS_INTEGER_BUF,((qbs*)(((uint64*)(__ARRAY_STRING_SBUFN[0]))[array_check((*_SUB_WRITEBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25748,93,"sb_qb64pe_extension.bm");}while(r); } } fornext_continue_3893:; } fornext_exit_3893:; } 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; } 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 "data152.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_IDE_LONG_IGNORE=*_FUNC_IDE_LONG_IGNORE; if(!qbevent)break;evnt(25753,4,"ide_methods.bas");}while(r); S_35607:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMMAND,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,5,"ide_methods.bas");if(r)goto S_35607;} do{ *_FUNC_IDE_LONG_CMD=qbs_asc(__STRING_IDECOMMAND); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5,"ide_methods.bas");}while(r); } S_35610:; if ((-(*_FUNC_IDE_LONG_CMD== 3 ))||new_error){ if(qbevent){evnt(25753,6,"ide_methods.bas");if(r)goto S_35610;} S_35611:; if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,7,"ide_methods.bas");if(r)goto S_35611;} S_35612:; if (((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDESY))|(-(*__LONG_IDECOMPILEDLINE>(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||new_error){ if(qbevent){evnt(25753,8,"ide_methods.bas");if(r)goto S_35612;} S_35613:; if ((func__exit()& 1 )||new_error){ if(qbevent){evnt(25753,9,"ide_methods.bas");if(r)goto S_35613;} do{ *__LONG_IDEEXIT= 1 ; if(!qbevent)break;evnt(25753,9,"ide_methods.bas");}while(r); } S_35616:; if ((-(*__LONG_IDEEXIT== 0 ))||new_error){ if(qbevent){evnt(25753,10,"ide_methods.bas");if(r)goto S_35616;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,11,"ide_methods.bas");}while(r); S_35618:; if (((-(*__LONG_ICHANGED== 0 ))&(-(*__LONG_MB== 0 )))||new_error){ if(qbevent){evnt(25753,12,"ide_methods.bas");if(r)goto S_35618;} S_35619:; if (((-(*__LONG_IDEAUTOLAYOUT!= 0 ))|(-(*__LONG_IDEAUTOINDENT!= 0 )))||new_error){ if(qbevent){evnt(25753,16,"ide_methods.bas");if(r)goto S_35619;} S_35620:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(25753,17,"ide_methods.bas");if(r)goto S_35620;} do{ *_FUNC_IDE_LONG_L=__STRING_LAYOUT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20,"ide_methods.bas");}while(r); S_35622:; fornext_value3898= 1 ; fornext_finalvalue3898=*_FUNC_IDE_LONG_L; fornext_step3898= 1 ; if (fornext_step3898<0) fornext_step_negative3898=1; else fornext_step_negative3898=0; if (new_error) goto fornext_error3898; goto fornext_entrylabel3898; while(1){ fornext_value3898=fornext_step3898+(*_FUNC_IDE_LONG_I); fornext_entrylabel3898: *_FUNC_IDE_LONG_I=fornext_value3898; if (fornext_step_negative3898){ if (fornext_value3898fornext_finalvalue3898) break; } fornext_error3898:; if(qbevent){evnt(25753,21,"ide_methods.bas");if(r)goto S_35622;} S_35623:; 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(25753,22,"ide_methods.bas");if(r)goto S_35623;} S_35624:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_LAYOUT,*_FUNC_IDE_LONG_I)== 32 )))||new_error){ if(qbevent){evnt(25753,23,"ide_methods.bas");if(r)goto S_35624;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,24,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_INDENT=*_FUNC_IDE_LONG_I; if(!qbevent)break;evnt(25753,24,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE_LONG_INDENT=*_FUNC_IDE_LONG_I- 1 ; if(!qbevent)break;evnt(25753,26,"ide_methods.bas");}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(25753,27,"ide_methods.bas");}while(r); } do{ goto fornext_exit_3897; if(!qbevent)break;evnt(25753,29,"ide_methods.bas");}while(r); } fornext_continue_3897:; } fornext_exit_3897:; S_35634:; if ((*__LONG_IDEAUTOLAYOUT)||new_error){ if(qbevent){evnt(25753,33,"ide_methods.bas");if(r)goto S_35634;} do{ qbs_set(_FUNC_IDE_STRING_LAYOUT2,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,34,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_I2= 1 ; if(!qbevent)break;evnt(25753,34,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(25753,35,"ide_methods.bas");}while(r); S_35638:; fornext_value3901= 1 ; fornext_finalvalue3901=__STRING_LAYOUT->len; fornext_step3901= 1 ; if (fornext_step3901<0) fornext_step_negative3901=1; else fornext_step_negative3901=0; if (new_error) goto fornext_error3901; goto fornext_entrylabel3901; while(1){ fornext_value3901=fornext_step3901+(*_FUNC_IDE_LONG_I); fornext_entrylabel3901: *_FUNC_IDE_LONG_I=fornext_value3901; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3901){ if (fornext_value3901fornext_finalvalue3901) break; } fornext_error3901:; if(qbevent){evnt(25753,36,"ide_methods.bas");if(r)goto S_35638;} do{ *_FUNC_IDE_LONG_A=qbs_asc(__STRING_LAYOUT,*_FUNC_IDE_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,37,"ide_methods.bas");}while(r); S_35640:; if ((-(*_FUNC_IDE_LONG_A== 34 ))||new_error){ if(qbevent){evnt(25753,38,"ide_methods.bas");if(r)goto S_35640;} do{ *_FUNC_IDE_LONG_IGNORESP=*_FUNC_IDE_LONG_IGNORESP+ 1 ; if(!qbevent)break;evnt(25753,39,"ide_methods.bas");}while(r); S_35642:; if ((-(*_FUNC_IDE_LONG_IGNORESP== 2 ))||new_error){ if(qbevent){evnt(25753,39,"ide_methods.bas");if(r)goto S_35642;} do{ *_FUNC_IDE_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(25753,39,"ide_methods.bas");}while(r); } } S_35646:; if ((-(*_FUNC_IDE_LONG_IGNORESP== 0 ))||new_error){ if(qbevent){evnt(25753,41,"ide_methods.bas");if(r)goto S_35646;} S_35647:; if ((-(*_FUNC_IDE_LONG_A==*__LONG_SP_ASC))||new_error){ if(qbevent){evnt(25753,42,"ide_methods.bas");if(r)goto S_35647;} 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(25753,42,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_I2=*_FUNC_IDE_LONG_I2+ 1 ; if(!qbevent)break;evnt(25753,42,"ide_methods.bas");}while(r); do{ goto LABEL_SKIPCHAR; if(!qbevent)break;evnt(25753,42,"ide_methods.bas");}while(r); } S_35652:; if ((-(*_FUNC_IDE_LONG_A==*__LONG_SP2_ASC))||new_error){ if(qbevent){evnt(25753,43,"ide_methods.bas");if(r)goto S_35652;} do{ goto LABEL_SKIPCHAR; if(!qbevent)break;evnt(25753,43,"ide_methods.bas");}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(25753,45,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_I2=*_FUNC_IDE_LONG_I2+ 1 ; if(!qbevent)break;evnt(25753,45,"ide_methods.bas");}while(r); LABEL_SKIPCHAR:; if(qbevent){evnt(25753,46,"ide_methods.bas");r=0;} fornext_continue_3900:; } fornext_exit_3900:; 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(25753,48,"ide_methods.bas");}while(r); } S_35661:; if ((-(*__LONG_IDEAUTOINDENT== 0 ))||new_error){ if(qbevent){evnt(25753,51,"ide_methods.bas");if(r)goto S_35661;} do{ *_FUNC_IDE_LONG_INDENT= 0 ; if(!qbevent)break;evnt(25753,54,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_L=__STRING_IDECOMPILEDLINE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,55,"ide_methods.bas");}while(r); S_35664:; fornext_value3905= 1 ; fornext_finalvalue3905=*_FUNC_IDE_LONG_L; fornext_step3905= 1 ; if (fornext_step3905<0) fornext_step_negative3905=1; else fornext_step_negative3905=0; if (new_error) goto fornext_error3905; goto fornext_entrylabel3905; while(1){ fornext_value3905=fornext_step3905+(*_FUNC_IDE_LONG_I); fornext_entrylabel3905: *_FUNC_IDE_LONG_I=fornext_value3905; if (fornext_step_negative3905){ if (fornext_value3905fornext_finalvalue3905) break; } fornext_error3905:; if(qbevent){evnt(25753,56,"ide_methods.bas");if(r)goto S_35664;} S_35665:; 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(25753,57,"ide_methods.bas");if(r)goto S_35665;} do{ *_FUNC_IDE_LONG_INDENT=*_FUNC_IDE_LONG_I- 1 ; if(!qbevent)break;evnt(25753,58,"ide_methods.bas");}while(r); do{ goto fornext_exit_3904; if(!qbevent)break;evnt(25753,59,"ide_methods.bas");}while(r); } fornext_continue_3904:; } fornext_exit_3904:; do{ qbs_set(_FUNC_IDE_STRING_INDENT,func_space(*_FUNC_IDE_LONG_INDENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,62,"ide_methods.bas");}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(25753,64,"ide_methods.bas");}while(r); } S_35674:; if ((-(*__LONG_IDEAUTOLAYOUT== 0 ))||new_error){ if(qbevent){evnt(25753,67,"ide_methods.bas");if(r)goto S_35674;} do{ *_FUNC_IDE_LONG_L=__STRING_IDECOMPILEDLINE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,69,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,70,"ide_methods.bas");}while(r); S_35677:; fornext_value3908= 1 ; fornext_finalvalue3908=*_FUNC_IDE_LONG_L; fornext_step3908= 1 ; if (fornext_step3908<0) fornext_step_negative3908=1; else fornext_step_negative3908=0; if (new_error) goto fornext_error3908; goto fornext_entrylabel3908; while(1){ fornext_value3908=fornext_step3908+(*_FUNC_IDE_LONG_I); fornext_entrylabel3908: *_FUNC_IDE_LONG_I=fornext_value3908; if (fornext_step_negative3908){ if (fornext_value3908fornext_finalvalue3908) break; } fornext_error3908:; if(qbevent){evnt(25753,71,"ide_methods.bas");if(r)goto S_35677;} S_35678:; 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(25753,72,"ide_methods.bas");if(r)goto S_35678;} 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(25753,73,"ide_methods.bas");}while(r); do{ goto fornext_exit_3907; if(!qbevent)break;evnt(25753,74,"ide_methods.bas");}while(r); } fornext_continue_3907:; } fornext_exit_3907:; } S_35684:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(25753,79,"ide_methods.bas");if(r)goto S_35684;} do{ qbs_set(__STRING_LAYOUT,qbs_add(_FUNC_IDE_STRING_INDENT,__STRING_LAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,80,"ide_methods.bas");}while(r); S_35686:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMPILEDLINE,__STRING_LAYOUT)))||new_error){ if(qbevent){evnt(25753,81,"ide_methods.bas");if(r)goto S_35686;} do{ SUB_IDESETLINE(__LONG_IDECOMPILEDLINE,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,82,"ide_methods.bas");}while(r); } } } } do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ; if(!qbevent)break;evnt(25753,91,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,92,"ide_methods.bas");}while(r); do{ *_FUNC_IDE_LONG_IDE= 4 ; if(!qbevent)break;evnt(25753,93,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,94,"ide_methods.bas");}while(r); S_35696:; if ((-(*__LONG_IDEAUTORUN!= 0 ))||new_error){ if(qbevent){evnt(25753,97,"ide_methods.bas");if(r)goto S_35696;} S_35697:; if ((*__LONG_PREPASS)||new_error){ if(qbevent){evnt(25753,98,"ide_methods.bas");if(r)goto S_35697;} do{ qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,FUNC_STR2(&(pass3910=qbr(floor((*__LONG_IDECOMPILEDLINE* 100 )/ ((long double)((*__LONG_IDEN* 2 )))))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,99,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,qbs_add(qbs_add(func_string( 3 -_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS->len, 32 ),_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS),qbs_new_txt_len("%",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,100,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,FUNC_STR2(&(pass3912=qbr(floor(((*__LONG_IDEN+*__LONG_IDECOMPILEDLINE)* 100 )/ ((long double)((*__LONG_IDEN* 2 )))))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,102,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,qbs_add(qbs_add(func_string( 3 -_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS->len, 32 ),_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS),qbs_new_txt_len("%",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,103,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_IDEINFO,qbs_add(func_chr( 0 ),_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,105,"ide_methods.bas");}while(r); } do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,118,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,120,"ide_methods.bas");}while(r); } S_35709:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(25753,122,"ide_methods.bas");if(r)goto S_35709;} do{ *__LONG_ICHECKLATER= 1 ; if(!qbevent)break;evnt(25753,122,"ide_methods.bas");}while(r); } } } }else{ S_35715:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDESYSTEM!= 3 ))|(qbs_notequal(qbs_left(__STRING_IDEINFO, 19 ),qbs_new_txt_len("Selection length = ",19)))))||new_error){ if(qbevent){evnt(25753,126,"ide_methods.bas");if(r)goto S_35715;} do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,126,"ide_methods.bas");}while(r); } do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,127,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE_LONG_IDE=FUNC_IDE2(&(pass3914= 0 )); if(!qbevent)break;evnt(25753,131,"ide_methods.bas");}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; 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 "data153.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,135,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,136,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,137,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,138,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,139,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,140,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,141,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,142,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,143,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,144,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,145,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,146,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,147,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IGNORE=*_FUNC_IDE2_LONG_IGNORE; if(!qbevent)break;evnt(25753,149,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,qbs_add(func_chr( 34 ),qbs_new_txt_len(" =<>+-/\\^:;,*().",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,151,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_C,__STRING_IDECOMMAND); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,153,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGNEXTLINE= 0 ; if(!qbevent)break;evnt(25753,154,"ide_methods.bas");}while(r); LABEL_IDEERRORMESSAGE:; if(qbevent){evnt(25753,156,"ide_methods.bas");r=0;} S_35739:; if ((*__LONG_IDEERROR)||new_error){ if(qbevent){evnt(25753,158,"ide_methods.bas");if(r)goto S_35739;} S_35740:; if ((*__LONG_IDEDEBUGMODE)||new_error){ if(qbevent){evnt(25753,159,"ide_methods.bas");if(r)goto S_35740;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,160,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,160,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_MUSTDISPLAY= 1 ; if(!qbevent)break;evnt(25753,162,"ide_methods.bas");}while(r); S_35745:; if ((-(*__LONG_IDEERROR== 1 ))||new_error){ if(qbevent){evnt(25753,163,"ide_methods.bas");if(r)goto S_35745;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("Internal IDE error",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,163,"ide_methods.bas");}while(r); } S_35748:; if ((-(*__LONG_IDEERROR== 2 ))||new_error){ if(qbevent){evnt(25753,164,"ide_methods.bas");if(r)goto S_35748;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("File not found",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,164,"ide_methods.bas");}while(r); } S_35751:; if ((-(*__LONG_IDEERROR== 3 ))||new_error){ if(qbevent){evnt(25753,165,"ide_methods.bas");if(r)goto S_35751;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("File access error",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,165,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,165,"ide_methods.bas");}while(r); } S_35755:; if ((-(*__LONG_IDEERROR== 4 ))||new_error){ if(qbevent){evnt(25753,166,"ide_methods.bas");if(r)goto S_35755;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("Path not found",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,166,"ide_methods.bas");}while(r); } S_35758:; if ((-(*__LONG_IDEERROR== 5 ))||new_error){ if(qbevent){evnt(25753,167,"ide_methods.bas");if(r)goto S_35758;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("Cannot create folder",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,167,"ide_methods.bas");}while(r); } S_35761:; if ((-(*__LONG_IDEERROR== 6 ))||new_error){ if(qbevent){evnt(25753,168,"ide_methods.bas");if(r)goto S_35761;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("Cannot save file",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,168,"ide_methods.bas");}while(r); } S_35764:; if ((-(*__LONG_IDEERROR== -1 ))||new_error){ if(qbevent){evnt(25753,169,"ide_methods.bas");if(r)goto S_35764;} do{ goto LABEL_ERRORREPORTDONE; if(!qbevent)break;evnt(25753,169,"ide_methods.bas");}while(r); } do{ *__INTEGER_QBERRORCODE=get_error_err(); if(!qbevent)break;evnt(25753,171,"ide_methods.bas");}while(r); S_35768:; if ((*__INTEGER_QBERRORCODE)||new_error){ if(qbevent){evnt(25753,172,"ide_methods.bas");if(r)goto S_35768;} do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_add(qbs_new_txt_len("Error ",6),FUNC_STR2(&(pass3915=*__INTEGER_QBERRORCODE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,173,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_new_txt_len("Error",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,175,"ide_methods.bas");}while(r); } S_35773:; if (((-(*__LONG_IDEERROR> 1 )))||new_error){ if(qbevent){evnt(25753,178,"ide_methods.bas");if(r)goto S_35773;} do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_add(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_new_txt_len(" (",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,180,"ide_methods.bas");}while(r); S_35775:; if (((-(func__errorline()> 0 ))|(-(func__inclerrorline()> 0 )))||new_error){ if(qbevent){evnt(25753,181,"ide_methods.bas");if(r)goto S_35775;} do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,FUNC_STR2(&(pass3916=func__errorline()))),qbs_new_txt_len("-",1)),FUNC_STR2(&(pass3917=func__inclerrorline())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,182,"ide_methods.bas");}while(r); } S_35778:; if ((*__BYTE_ISCIVERSION)||new_error){ if(qbevent){evnt(25753,184,"ide_methods.bas");if(r)goto S_35778;} do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_add(qbs_add(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_new_txt_len("-",1)),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,184,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_add(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,185,"ide_methods.bas");}while(r); S_35782:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_new_txt_len("Error ()",8))))||new_error){ if(qbevent){evnt(25753,186,"ide_methods.bas");if(r)goto S_35782;} do{ qbs_set(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_new_txt_len("Error",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,186,"ide_methods.bas");}while(r); } S_35785:; if ((-(*_FUNC_IDE2_BYTE_ATTEMPTTOLOADRECENT== -1 ))||new_error){ if(qbevent){evnt(25753,187,"ide_methods.bas");if(r)goto S_35785;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,189,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len(".",1)),func_chr( 10 )),func_chr( 10 )),qbs_new_txt_len("Remove broken links from recent files?",38)),qbs_new_txt_len("#Yes;#No",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,190,"ide_methods.bas");}while(r); S_35788:; if ((-(*_FUNC_IDE2_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,191,"ide_methods.bas");if(r)goto S_35788;} do{ return_point[next_return_point++]=11; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLEANUPRECENTLIST; RETURN_11:; if(!qbevent)break;evnt(25753,192,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,194,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,194,"ide_methods.bas");}while(r); do{ goto LABEL_ERRORREPORTDONE; if(!qbevent)break;evnt(25753,195,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDE2_LONG_INCLERRORLINE=func__inclerrorline(); if(!qbevent)break;evnt(25753,199,"ide_methods.bas");}while(r); S_35797:; if ((*_FUNC_IDE2_LONG_INCLERRORLINE)||new_error){ if(qbevent){evnt(25753,200,"ide_methods.bas");if(r)goto S_35797;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_ERRORAT,func_chr( 10 )),qbs_new_txt_len(" ",1)),func_chr( 10 )),qbs_new_txt_len("(module: ",9)),FUNC_REMOVEFILEEXTENSION(qbs_left(func__inclerrorfile(), 60 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,202,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(qbs_add(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len(", on line: ",11)),FUNC_STR2(_FUNC_IDE2_LONG_INCLERRORLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,203,"ide_methods.bas");}while(r); S_35800:; if ((*__BYTE_ISCIVERSION)||new_error){ if(qbevent){evnt(25753,204,"ide_methods.bas");if(r)goto S_35800;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(qbs_add(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len(", ",2)),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,204,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,205,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_ERRORAT,func_chr( 10 )),qbs_new_txt_len(" ",1)),func_chr( 10 )),qbs_new_txt_len("(on line: ",10)),FUNC_STR2(&(pass3918=func__errorline())))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,207,"ide_methods.bas");}while(r); S_35806:; if ((*__BYTE_ISCIVERSION)||new_error){ if(qbevent){evnt(25753,208,"ide_methods.bas");if(r)goto S_35806;} do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(qbs_add(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len(", ",2)),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,208,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_ERRORAT,qbs_add(_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,209,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,213,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDE2_STRING_IDEERRORMESSAGETITLE,_FUNC_IDE2_STRING_ERRORAT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,214,"ide_methods.bas");}while(r); LABEL_ERRORREPORTDONE:; if(qbevent){evnt(25753,215,"ide_methods.bas");r=0;} } do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,218,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_ATTEMPTTOLOADRECENT= 0 ; if(!qbevent)break;evnt(25753,219,"ide_methods.bas");}while(r); S_35817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 12 ))))||new_error){ if(qbevent){evnt(25753,221,"ide_methods.bas");if(r)goto S_35817;} 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(25753,222,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,223,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass3920= 0 )); if(!qbevent)break;evnt(25753,224,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass3921= 1 )); if(!qbevent)break;evnt(25753,226,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BKPIDESYSTEM=*__LONG_IDESYSTEM; if(!qbevent)break;evnt(25753,227,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(25753,227,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,227,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM=*_FUNC_IDE2_LONG_BKPIDESYSTEM; if(!qbevent)break;evnt(25753,227,"ide_methods.bas");}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,228,"ide_methods.bas");}while(r); do{ sub__printstring((*__LONG_IDEWX- 8 )/ ((long double)( 2 )),*__LONG_IDEWY- 4 ,qbs_new_txt_len(" Status ",8),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,228,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,229,"ide_methods.bas");}while(r); S_35829:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,231,"ide_methods.bas");if(r)goto S_35829;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,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)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,232,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,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)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,234,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,237,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDE2= 9 ; if(!qbevent)break;evnt(25753,238,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,238,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,239,"ide_methods.bas");}while(r); } S_35839:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 100 ))))||new_error){ if(qbevent){evnt(25753,242,"ide_methods.bas");if(r)goto S_35839;} do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ; if(!qbevent)break;evnt(25753,243,"ide_methods.bas");}while(r); S_35841:; if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,244,"ide_methods.bas");if(r)goto S_35841;} do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,245,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,246,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDECOMPILEDLINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,248,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,249,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,251,"ide_methods.bas");}while(r); } S_35850:; if ((-(*__LONG_IDELAUNCHED== 0 ))||new_error){ if(qbevent){evnt(25753,254,"ide_methods.bas");if(r)goto S_35850;} do{ *__LONG_IDELAUNCHED= 1 ; if(!qbevent)break;evnt(25753,255,"ide_methods.bas");}while(r); do{ qbsub_width(NULL,*__LONG_IDEWX,*__LONG_IDEWY,NULL,NULL,3); if(!qbevent)break;evnt(25753,257,"ide_methods.bas");}while(r); S_35853:; if ((*__BYTE_IDE_USEFONT8)||new_error){ if(qbevent){evnt(25753,258,"ide_methods.bas");if(r)goto S_35853;} do{ sub__font( 8 ,NULL,0); if(!qbevent)break;evnt(25753,258,"ide_methods.bas");}while(r); }else{ do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(25753,258,"ide_methods.bas");}while(r); } S_35858:; if ((*__LONG_IDECPINDEX)||new_error){ if(qbevent){evnt(25753,261,"ide_methods.bas");if(r)goto S_35858;} S_35859:; fornext_value3923= 128 ; fornext_finalvalue3923= 255 ; fornext_step3923= 1 ; if (fornext_step3923<0) fornext_step_negative3923=1; else fornext_step_negative3923=0; if (new_error) goto fornext_error3923; goto fornext_entrylabel3923; while(1){ fornext_value3923=fornext_step3923+(*_FUNC_IDE2_LONG_X); fornext_entrylabel3923: *_FUNC_IDE2_LONG_X=fornext_value3923; if (fornext_step_negative3923){ if (fornext_value3923fornext_finalvalue3923) break; } fornext_error3923:; if(qbevent){evnt(25753,262,"ide_methods.bas");if(r)goto S_35859;} 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(25753,263,"ide_methods.bas");}while(r); S_35861:; if ((-(*_FUNC_IDE2_LONG_U== 0 ))||new_error){ if(qbevent){evnt(25753,264,"ide_methods.bas");if(r)goto S_35861;} do{ *_FUNC_IDE2_LONG_U= 9744 ; if(!qbevent)break;evnt(25753,264,"ide_methods.bas");}while(r); } do{ sub__mapunicode(*_FUNC_IDE2_LONG_U,*_FUNC_IDE2_LONG_X); if(!qbevent)break;evnt(25753,265,"ide_methods.bas");}while(r); fornext_continue_3922:; } fornext_exit_3922:; } S_35867:; if ((*__LONG_IDECUSTOMFONT)||new_error){ if(qbevent){evnt(25753,269,"ide_methods.bas");if(r)goto S_35867;} 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(25753,270,"ide_methods.bas");}while(r); S_35869:; if ((-(*__LONG_IDECUSTOMFONTHANDLE== -1 ))||new_error){ if(qbevent){evnt(25753,271,"ide_methods.bas");if(r)goto S_35869;} do{ *__LONG_IDECUSTOMFONT= 0 ; if(!qbevent)break;evnt(25753,273,"ide_methods.bas");}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(25753,273,"ide_methods.bas");}while(r); do{ *__LONG_IDECUSTOMFONTHEIGHT= 21 ; if(!qbevent)break;evnt(25753,273,"ide_methods.bas");}while(r); }else{ do{ sub__font(*__LONG_IDECUSTOMFONTHANDLE,NULL,0); if(!qbevent)break;evnt(25753,275,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(25753,279,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,279,"ide_methods.bas");}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(25753,280,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,282,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,282,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEEDITMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,283,"ide_methods.bas");}while(r); do{ SUB_IDEMAKEEDITMENU(); if(!qbevent)break;evnt(25753,284,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,286,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,286,"ide_methods.bas");}while(r); do{ *__INTEGER_VIEWMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,286,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,287,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,287,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,288,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,288,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays a list of SUB/FUNCTION procedures",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,289,"ide_methods.bas");}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_add(qbs_new_txt_len("#Line Numbers ",15),func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,290,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,290,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles and customizes line numbers (side bar)",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,291,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,292,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,292,"ide_methods.bas");}while(r); do{ *__INTEGER_VIEWMENUCOMPILERWARNINGS=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,294,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_VIEWMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUCOMPILERWARNINGS)-__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("Compiler #Warnings... Ctrl+W",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,295,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,295,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays a list of recent code warnings",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,296,"ide_methods.bas");}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(25753,297,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,299,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,299,"ide_methods.bas");}while(r); do{ *__INTEGER_SEARCHMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,299,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,300,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,300,"ide_methods.bas");}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... Ctrl+F3",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,301,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,301,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Finds specified text",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,302,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,303,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,303,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Finds next occurrence of text specified in previous search",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,304,"ide_methods.bas");}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... Alt+F3",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,305,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,305,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Finds and changes specified text",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,306,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,307,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,307,"ide_methods.bas");}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("Clear Search #History...",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,308,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,308,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Clears history of searched text items",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,309,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,310,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,310,"ide_methods.bas");}while(r); do{ *__INTEGER_SEARCHMENUENABLEQUICKNAV=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,312,"ide_methods.bas");}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("#Quick Navigation",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,313,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,313,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles Quick Navigation (back arrow)",37)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,314,"ide_methods.bas");}while(r); S_35927:; if ((*__BYTE_ENABLEQUICKNAV)||new_error){ if(qbevent){evnt(25753,315,"ide_methods.bas");if(r)goto S_35927;} do{ tmp_long=array_check((*__INTEGER_SEARCHMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_SEARCHMENUENABLEQUICKNAV)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_SEARCHMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_SEARCHMENUENABLEQUICKNAV)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,316,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,318,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,318,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,319,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,319,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles a bookmark in the current line",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,320,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,321,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,321,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Navigates to the next bookmark",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,322,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,323,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,323,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Navigates to the previous bookmark",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,324,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,325,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,325,"ide_methods.bas");}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... Ctrl+G",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,326,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,326,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Jumps to the specified line number",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,327,"ide_methods.bas");}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(25753,329,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,331,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,331,"ide_methods.bas");}while(r); do{ *__INTEGER_RUNMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,331,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,332,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,332,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,333,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,333,"ide_methods.bas");}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 only (No exe)",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,334,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,334,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Compiles current program and runs it",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,335,"ide_methods.bas");}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("Modify #COMMAND$...",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,336,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,336,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets string returned by COMMAND$ function",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,337,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,338,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,338,"ide_methods.bas");}while(r); do{ *__INTEGER_RUNMENUSAVEEXEWITHSOURCE=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,340,"ide_methods.bas");}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("Output EXE to Source #Folder",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,341,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,341,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles compiling program to QB64-PE's folder or to source folder",65)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,342,"ide_methods.bas");}while(r); S_35966:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(25753,343,"ide_methods.bas");if(r)goto S_35966;} do{ tmp_long=array_check((*__INTEGER_RUNMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_RUNMENUSAVEEXEWITHSOURCE)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_RUNMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_RUNMENUSAVEEXEWITHSOURCE)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,344,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,346,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,346,"ide_methods.bas");}while(r); S_35971:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,348,"ide_methods.bas");if(r)goto S_35971;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,349,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,349,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,351,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,351,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Compiles current program without running it",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,353,"ide_methods.bas");}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(25753,354,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,356,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,356,"ide_methods.bas");}while(r); do{ *__INTEGER_DEBUGMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,356,"ide_methods.bas");}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("Debug",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,357,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,357,"ide_methods.bas");}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 #Paused F7 or F8",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,358,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,358,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Compiles current program and starts it in pause mode",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,359,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,360,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,360,"ide_methods.bas");}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("Toggle #Breakpoint F9",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,361,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,361,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets/clears breakpoint at cursor location",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,362,"ide_methods.bas");}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("#Clear All Breakpoints F10",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,363,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,363,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes all breakpoints",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,364,"ide_methods.bas");}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("Toggle #Skip Line Ctrl+P",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,365,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,365,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets/clears flag to skip line",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,366,"ide_methods.bas");}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("#Unskip All Lines Ctrl+F10",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,367,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,367,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes all line skip flags",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,368,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,369,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,369,"ide_methods.bas");}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("#Watch List... F4",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,370,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,370,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Adds variables to watch list",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,371,"ide_methods.bas");}while(r); do{ *__INTEGER_DEBUGMENUCALLSTACK=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,372,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUCALLSTACK)-__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("Call #Stack... F12",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,373,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,373,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays the call stack of the current program's last execution",63)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,374,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,375,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,375,"ide_methods.bas");}while(r); do{ *__INTEGER_DEBUGMENUAUTOADDCOMMAND=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,376,"ide_methods.bas");}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("Auto-add $#Debug Metacommand",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,377,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,377,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles whether the IDE will auto-add the $Debug metacommand as required",72)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,378,"ide_methods.bas");}while(r); S_36017:; if ((*__BYTE_AUTOADDDEBUGCOMMAND)||new_error){ if(qbevent){evnt(25753,379,"ide_methods.bas");if(r)goto S_36017;} do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,380,"ide_methods.bas");}while(r); } do{ *__INTEGER_DEBUGMENUWATCHLISTTOCONSOLE=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,382,"ide_methods.bas");}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("#Output Watch List to Console",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,383,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,383,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles directing the output of the watch list to the console window",68)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,384,"ide_methods.bas");}while(r); S_36024:; if ((*__BYTE_WATCHLISTTOCONSOLE)||new_error){ if(qbevent){evnt(25753,385,"ide_methods.bas");if(r)goto S_36024;} do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUWATCHLISTTOCONSOLE)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUWATCHLISTTOCONSOLE)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,386,"ide_methods.bas");}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("Set Base #TCP/IP Port Number...",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,388,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,388,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets the initial port number for TCP/IP communication with the debuggee",71)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,389,"ide_methods.bas");}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("Purge C++ #Libraries",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,390,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,390,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Purges all pre-compiled content",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,391,"ide_methods.bas");}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(25753,392,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,394,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,394,"ide_methods.bas");}while(r); do{ *__INTEGER_OPTIONSMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,394,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,395,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,395,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,396,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,396,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Changes screen size and font",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,397,"ide_methods.bas");}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("IDE C#olors...",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,398,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,398,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Changes or customizes IDE color scheme",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,399,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,400,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,400,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Changes auto-format features",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,401,"ide_methods.bas");}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("Co#mpiler Settings...",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,402,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,402,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Change settings for compiling your code",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,403,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,404,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,404,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,405,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,405,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Changes code page to use with TTF fonts",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,406,"ide_methods.bas");}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("#Backup/Undo...",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,407,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,407,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets size of backup/undo buffer",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,408,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,409,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,409,"ide_methods.bas");}while(r); do{ *__INTEGER_OPTIONSMENUDISABLESYNTAX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,411,"ide_methods.bas");}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("Syntax #Highlighter",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,412,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,412,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles syntax highlighter",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,413,"ide_methods.bas");}while(r); S_36065:; if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||new_error){ if(qbevent){evnt(25753,414,"ide_methods.bas");if(r)goto S_36065;} do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,415,"ide_methods.bas");}while(r); } do{ *__INTEGER_OPTIONSMENUSWAPMOUSE=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,418,"ide_methods.bas");}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("#Swap Mouse Buttons",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,419,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,419,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Swaps functionality of left/right mouse buttons",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,420,"ide_methods.bas");}while(r); S_36072:; if ((*__BYTE_MOUSEBUTTONSWAPPED)||new_error){ if(qbevent){evnt(25753,421,"ide_methods.bas");if(r)goto S_36072;} do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSWAPMOUSE)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSWAPMOUSE)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,422,"ide_methods.bas");}while(r); } do{ *__INTEGER_OPTIONSMENUPASTECURSOR=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,425,"ide_methods.bas");}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("Cursor After #Paste",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,426,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,426,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles placing the cursor before/after the pasted content",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,427,"ide_methods.bas");}while(r); S_36079:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,428,"ide_methods.bas");if(r)goto S_36079;} do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUPASTECURSOR)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUPASTECURSOR)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,429,"ide_methods.bas");}while(r); } do{ *__INTEGER_OPTIONSMENUSHOWERRORSIMMEDIATELY=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,432,"ide_methods.bas");}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("Syntax Ch#ecker",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,433,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,433,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles instant syntax checker (status area)",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,434,"ide_methods.bas");}while(r); S_36086:; if ((*__BYTE_IDESHOWERRORSIMMEDIATELY)||new_error){ if(qbevent){evnt(25753,435,"ide_methods.bas");if(r)goto S_36086;} do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSHOWERRORSIMMEDIATELY)-__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_add(func_chr( 7 ),((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSHOWERRORSIMMEDIATELY)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,436,"ide_methods.bas");}while(r); } do{ *__INTEGER_OPTIONSMENUIGNOREWARNINGS=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,439,"ide_methods.bas");}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("Ignore #Warnings",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,440,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,440,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles display of warning messages (unused variables, etc)",59)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,441,"ide_methods.bas");}while(r); S_36093:; if ((*__BYTE_IGNOREWARNINGS)||new_error){ if(qbevent){evnt(25753,442,"ide_methods.bas");if(r)goto S_36093;} do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUIGNOREWARNINGS)-__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_add(func_chr( 7 ),qbs_new_txt_len("Ignore #Warnings",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,442,"ide_methods.bas");}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(25753,449,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,451,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,451,"ide_methods.bas");}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("Tools",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,452,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,452,"ide_methods.bas");}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 Chart...",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,453,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,453,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays ASCII characters and allows inserting in current program",65)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,454,"ide_methods.bas");}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("Insert Quick #Keycode Ctrl+K",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,455,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,455,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Captures key codes and inserts in current program",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,456,"ide_methods.bas");}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("#Math Evaluator...",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,457,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,457,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays the math evaluator dialog",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,458,"ide_methods.bas");}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("#RGB Color Mixer...",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,459,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,459,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Allows mixing colors to edit/insert _RGB statements",51)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,460,"ide_methods.bas");}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(25753,461,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,463,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,463,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,464,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,464,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,465,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,465,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays help window",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,466,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,467,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,467,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays help contents page",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,468,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,469,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,469,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays keyword index page",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,470,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,471,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,471,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays keywords index by usage",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,472,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,473,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,473,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,474,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,474,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Downloads the latest version of an article from the wiki",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,475,"ide_methods.bas");}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...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,476,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,476,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Downloads the latest version of all articles from the wiki",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,477,"ide_methods.bas");}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 Current Page On #Wiki",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,478,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,478,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Launches the default browser and navigates to the current article on the wiki",77)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,479,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,480,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,480,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,483,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,483,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays the current version of QB64-PE",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,484,"ide_methods.bas");}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(25753,485,"ide_methods.bas");}while(r); do{ *__INTEGER_MENUS=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,487,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,490,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECONTEXTUALMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,491,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,494,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,494,"ide_methods.bas");}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("ViewMenuShowLineNumbersSubMenu",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,495,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,495,"ide_methods.bas");}while(r); do{ *__INTEGER_VIEWMENUSHOWLINENUMBERSSUBMENUID=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,496,"ide_methods.bas");}while(r); S_36155:; if ((*__BYTE_SHOWLINENUMBERS)||new_error){ if(qbevent){evnt(25753,497,"ide_methods.bas");if(r)goto S_36155;} 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("#Hide Line Numbers",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,497,"ide_methods.bas");}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("#Show Line Numbers",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,497,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles displaying line numbers (side bar)",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,498,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,499,"ide_methods.bas");}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("#Background Color",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,500,"ide_methods.bas");}while(r); S_36163:; if ((*__BYTE_SHOWLINENUMBERSUSEBG)||new_error){ if(qbevent){evnt(25753,500,"ide_methods.bas");if(r)goto S_36163;} 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_add(func_chr( 7 ),((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(25753,500,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles displaying a different background (side bar)",52)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,501,"ide_methods.bas");}while(r); do{ *__INTEGER_VIEWMENUSHOWBGID=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,502,"ide_methods.bas");}while(r); S_36168:; if ((-(*__BYTE_SHOWLINENUMBERS== 0 ))||new_error){ if(qbevent){evnt(25753,503,"ide_methods.bas");if(r)goto S_36168;} 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_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((*_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(25753,503,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,504,"ide_methods.bas");}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("Sho#w Separator",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,505,"ide_methods.bas");}while(r); S_36173:; if ((*__BYTE_SHOWLINENUMBERSSEPARATOR)||new_error){ if(qbevent){evnt(25753,505,"ide_methods.bas");if(r)goto S_36173;} 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_add(func_chr( 7 ),((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(25753,505,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles showing a separator line (side bar)",43)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,506,"ide_methods.bas");}while(r); do{ *__INTEGER_VIEWMENUSHOWSEPARATORID=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,507,"ide_methods.bas");}while(r); S_36178:; if ((-(*__BYTE_SHOWLINENUMBERS== 0 ))||new_error){ if(qbevent){evnt(25753,508,"ide_methods.bas");if(r)goto S_36178;} 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_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((*_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(25753,508,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,509,"ide_methods.bas");}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(25753,510,"ide_methods.bas");}while(r); S_36183:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,512,"ide_methods.bas");if(r)goto S_36183;} do{ qbs_set(__STRING1_IDEPATHSEP,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,513,"ide_methods.bas");}while(r); } S_36186:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,515,"ide_methods.bas");if(r)goto S_36186;} do{ qbs_set(__STRING1_IDEPATHSEP,qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,516,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_IDEROOT,FUNC_IDEZGETROOT()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,519,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPATH,func__startdir()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,520,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,523,"ide_methods.bas");}while(r); do{ *__LONG_IDEL= 1 ; if(!qbevent)break;evnt(25753,523,"ide_methods.bas");}while(r); do{ *__LONG_IDELI= 1 ; if(!qbevent)break;evnt(25753,523,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(25753,523,"ide_methods.bas");}while(r); do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(25753,523,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(25753,524,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(25753,525,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,526,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,527,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); } } __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]) error(257); __ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,527,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,528,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,529,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,530,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= 0 ; if(!qbevent)break;evnt(25753,530,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNSAVED= -1 ; if(!qbevent)break;evnt(25753,531,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,532,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,533,"ide_methods.bas");}while(r); LABEL_REDRAWEVERYTHING:; if(qbevent){evnt(25753,535,"ide_methods.bas");r=0;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,536,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,537,"ide_methods.bas");}while(r); do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(25753,538,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,539,"ide_methods.bas");}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,540,"ide_methods.bas");}while(r); LABEL_REDRAWEVERYTHING2:; if(qbevent){evnt(25753,542,"ide_methods.bas");r=0;} do{ return_point[next_return_point++]=12; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_12:; if(!qbevent)break;evnt(25753,543,"ide_methods.bas");}while(r); S_36214:; if ((-(*_FUNC_IDE2_LONG_RETVAL== 1 ))||new_error){ if(qbevent){evnt(25753,545,"ide_methods.bas");if(r)goto S_36214;} do{ goto LABEL_SKIPLOAD; if(!qbevent)break;evnt(25753,545,"ide_methods.bas");}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(25753,549,"ide_methods.bas");}while(r); S_36218:; if ((-(func_lof( 150 )== 1 ))||new_error){ if(qbevent){evnt(25753,550,"ide_methods.bas");if(r)goto S_36218;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,551,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDERESTORE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,552,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,553,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,553,"ide_methods.bas");}while(r); S_36223:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,554,"ide_methods.bas");if(r)goto S_36223;} 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(25753,556,"ide_methods.bas");}while(r); S_36225:; if ((func_lof( 150 ))||new_error){ if(qbevent){evnt(25753,557,"ide_methods.bas");if(r)goto S_36225;} do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(25753,558,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,559,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,559,"ide_methods.bas");}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(25753,559,"ide_methods.bas");}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(25753,559,"ide_methods.bas");}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(25753,559,"ide_methods.bas");}while(r); do{ sub_seek( 150 ,*_FUNC_IDE2_LONG_P2); if(!qbevent)break;evnt(25753,561,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_L,4,byte_element_3924),0); if(!qbevent)break;evnt(25753,562,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESX,4,byte_element_3925),0); if(!qbevent)break;evnt(25753,563,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESY,4,byte_element_3926),0); if(!qbevent)break;evnt(25753,563,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECX,4,byte_element_3927),0); if(!qbevent)break;evnt(25753,564,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECY,4,byte_element_3928),0); if(!qbevent)break;evnt(25753,564,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECT,4,byte_element_3929),0); if(!qbevent)break;evnt(25753,565,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTX1,4,byte_element_3930),0); if(!qbevent)break;evnt(25753,565,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTY1,4,byte_element_3931),0); if(!qbevent)break;evnt(25753,565,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEN,4,byte_element_3932),0); if(!qbevent)break;evnt(25753,566,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEL,4,byte_element_3933),0); if(!qbevent)break;evnt(25753,567,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDELI,4,byte_element_3934),0); if(!qbevent)break;evnt(25753,568,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEBMKN,4,byte_element_3935),0); if(!qbevent)break;evnt(25753,570,"ide_methods.bas");}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(25753,570,"ide_methods.bas");}while(r); S_36246:; fornext_value3937= 1 ; fornext_finalvalue3937=*__LONG_IDEBMKN; 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+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel3937: *_FUNC_IDE2_LONG_BI=fornext_value3937; if (fornext_step_negative3937){ if (fornext_value3937fornext_finalvalue3937) break; } fornext_error3937:; if(qbevent){evnt(25753,571,"ide_methods.bas");if(r)goto S_36246;} 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_3938),0); if(!qbevent)break;evnt(25753,571,"ide_methods.bas");}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_3939),0); if(!qbevent)break;evnt(25753,571,"ide_methods.bas");}while(r); fornext_continue_3936:; } fornext_exit_3936:; do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_X,4,byte_element_3940),0); if(!qbevent)break;evnt(25753,572,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,func_space(*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,572,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,__STRING_IDET,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,572,"ide_methods.bas");}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,574,"ide_methods.bas");}while(r); } }else{ do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,577,"ide_methods.bas");}while(r); } S_36259:; if ((-(*__LONG_IDEUNSAVED!= 1 ))||new_error){ if(qbevent){evnt(25753,580,"ide_methods.bas");if(r)goto S_36259;} S_36260:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 1 ))))||new_error){ if(qbevent){evnt(25753,581,"ide_methods.bas");if(r)goto S_36260;} 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(25753,582,"ide_methods.bas");}while(r); S_36262:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(_FUNC_IDE2_STRING_F)== 0 )))||new_error){ if(qbevent){evnt(25753,583,"ide_methods.bas");if(r)goto S_36262;} 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(25753,583,"ide_methods.bas");}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(25753,584,"ide_methods.bas");}while(r); S_36266:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,585,"ide_methods.bas");if(r)goto S_36266;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,585,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,585,"ide_methods.bas");}while(r); do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,585,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 2 ; if(!qbevent)break;evnt(25753,588,"ide_methods.bas");}while(r); S_36272:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_add(_FUNC_IDE2_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDE2_STRING_F))== 0 )))||new_error){ if(qbevent){evnt(25753,589,"ide_methods.bas");if(r)goto S_36272;} do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,589,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,590,"ide_methods.bas");}while(r); S_36276:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_BINARYFORMATCHECK(_FUNC_IDE2_STRING_PATH,__STRING1_IDEPATHSEP,_FUNC_IDE2_STRING_F)> 0 )))||new_error){ if(qbevent){evnt(25753,591,"ide_methods.bas");if(r)goto S_36276;} do{ goto LABEL_SKIPLOAD; if(!qbevent)break;evnt(25753,591,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 3 ; if(!qbevent)break;evnt(25753,592,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_IDE2_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,593,"ide_methods.bas");}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(25753,594,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,func_space(__STRING_LINEINPUT3BUFFER->len* 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,595,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I2= 1 ; if(!qbevent)break;evnt(25753,596,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_N= 0 ; if(!qbevent)break;evnt(25753,597,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHRTAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,598,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE1,qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,599,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE2,qbs_new_txt_len(" ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,599,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE3,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,599,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SPACE4,qbs_new_txt_len(" ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,599,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR7,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR11,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR12,func_chr( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR28,func_chr( 28 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR29,func_chr( 29 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR30,func_chr( 30 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CHR31,func_chr( 31 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,600,"ide_methods.bas");}while(r); S_36297:; do{ if(qbevent){evnt(25753,601,"ide_methods.bas");if(r)goto S_36297;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,602,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_L=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,603,"ide_methods.bas");}while(r); S_36300:; if ((*_FUNC_IDE2_LONG_L)||new_error){ if(qbevent){evnt(25753,604,"ide_methods.bas");if(r)goto S_36300;} do{ *_FUNC_IDE2_LONG_ASCA=qbs_asc(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,604,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_ASCA= -1 ; if(!qbevent)break;evnt(25753,604,"ide_methods.bas");}while(r); } S_36305:; if ((-(*_FUNC_IDE2_LONG_ASCA!= 13 ))||new_error){ if(qbevent){evnt(25753,605,"ide_methods.bas");if(r)goto S_36305;} S_36306:; if ((-(*_FUNC_IDE2_LONG_ASCA!= -1 ))||new_error){ if(qbevent){evnt(25753,606,"ide_methods.bas");if(r)goto S_36306;} LABEL_IDEOPENFIXTABSX:; if(qbevent){evnt(25753,608,"ide_methods.bas");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(25753,609,"ide_methods.bas");}while(r); S_36308:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,610,"ide_methods.bas");if(r)goto S_36308;} do{ *_FUNC_IDE2_LONG_X2=(*_FUNC_IDE2_LONG_X- 1 )% 4 ; if(!qbevent)break;evnt(25753,611,"ide_methods.bas");}while(r); S_36310:; if ((-(*_FUNC_IDE2_LONG_X2== 0 ))||new_error){ if(qbevent){evnt(25753,612,"ide_methods.bas");if(r)goto S_36310;} 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(25753,612,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 3 ; if(!qbevent)break;evnt(25753,612,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(25753,612,"ide_methods.bas");}while(r); } S_36315:; if ((-(*_FUNC_IDE2_LONG_X2== 1 ))||new_error){ if(qbevent){evnt(25753,613,"ide_methods.bas");if(r)goto S_36315;} 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(25753,613,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 2 ; if(!qbevent)break;evnt(25753,613,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(25753,613,"ide_methods.bas");}while(r); } S_36320:; if ((-(*_FUNC_IDE2_LONG_X2== 2 ))||new_error){ if(qbevent){evnt(25753,614,"ide_methods.bas");if(r)goto S_36320;} 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(25753,614,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 1 ; if(!qbevent)break;evnt(25753,614,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(25753,614,"ide_methods.bas");}while(r); } S_36325:; if ((-(*_FUNC_IDE2_LONG_X2== 3 ))||new_error){ if(qbevent){evnt(25753,615,"ide_methods.bas");if(r)goto S_36325;} 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(25753,615,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABSX; if(!qbevent)break;evnt(25753,615,"ide_methods.bas");}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(25753,618,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I2=*_FUNC_IDE2_LONG_I2+*_FUNC_IDE2_LONG_L+ 8 ; if(!qbevent)break;evnt(25753,618,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_N=*_FUNC_IDE2_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,618,"ide_methods.bas");}while(r); } S_36335:; dl_continue_3943:; }while((!(-(*_FUNC_IDE2_LONG_ASCA== 13 )))&&(!new_error)); dl_exit_3943:; if(qbevent){evnt(25753,620,"ide_methods.bas");if(r)goto S_36335;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,621,"ide_methods.bas");}while(r); do{ *__LONG_IDEN=*_FUNC_IDE2_LONG_N; if(!qbevent)break;evnt(25753,622,"ide_methods.bas");}while(r); S_36338:; if ((-(*_FUNC_IDE2_LONG_N== 0 ))||new_error){ if(qbevent){evnt(25753,622,"ide_methods.bas");if(r)goto S_36338;} do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,622,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(25753,622,"ide_methods.bas");}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(25753,622,"ide_methods.bas");}while(r); } do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(25753,623,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(25753,624,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,625,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,626,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); } } __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]) error(257); __ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,626,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,627,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,628,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,629,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= 0 ; if(!qbevent)break;evnt(25753,629,"ide_methods.bas");}while(r); S_36353:; if (((-(*__LONG_IDESTARTATLINE> 0 ))&(-(*__LONG_IDESTARTATLINE<=*__LONG_IDEN)))||new_error){ if(qbevent){evnt(25753,630,"ide_methods.bas");if(r)goto S_36353;} do{ *__LONG_IDECY=*__LONG_IDESTARTATLINE; if(!qbevent)break;evnt(25753,631,"ide_methods.bas");}while(r); S_36355:; if ((-((*__LONG_IDECY- 10 )>=( 1 )))||new_error){ if(qbevent){evnt(25753,632,"ide_methods.bas");if(r)goto S_36355;} do{ *__LONG_IDESY=*__LONG_IDECY- 10 ; if(!qbevent)break;evnt(25753,632,"ide_methods.bas");}while(r); } do{ *__LONG_IDEGOTOBOX_LASTLINENUM=*__LONG_IDESTARTATLINE; if(!qbevent)break;evnt(25753,633,"ide_methods.bas");}while(r); do{ *__LONG_IDESTARTATLINE= 0 ; if(!qbevent)break;evnt(25753,634,"ide_methods.bas");}while(r); } do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(25753,636,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,637,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,638,"ide_methods.bas");}while(r); do{ sub__title(qbs_add(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - ",3)),__STRING_WINDOWTITLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,638,"ide_methods.bas");}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(25753,639,"ide_methods.bas");}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(25753,640,"ide_methods.bas");}while(r); } } LABEL_SKIPLOAD:; if(qbevent){evnt(25753,645,"ide_methods.bas");r=0;} } S_36370:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 3 ))))||new_error){ if(qbevent){evnt(25753,659,"ide_methods.bas");if(r)goto S_36370;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 1 ; if(!qbevent)break;evnt(25753,660,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SENDNEXTLINE= 1 ; if(!qbevent)break;evnt(25753,661,"ide_methods.bas");}while(r); S_36373:; if (((-(*__LONG_IDEAUTOLAYOUT== 0 ))&(-(*__LONG_IDEAUTOINDENT== 0 )))||new_error){ if(qbevent){evnt(25753,665,"ide_methods.bas");if(r)goto S_36373;} do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,667,"ide_methods.bas");}while(r); do{ *__LONG_IDELAYOUTALLOW= 0 ; if(!qbevent)break;evnt(25753,668,"ide_methods.bas");}while(r); }else{ S_36377:; if ((qbs_cleanup(qbs_tmp_base,__STRING_LAYOUT->len))||new_error){ if(qbevent){evnt(25753,672,"ide_methods.bas");if(r)goto S_36377;} S_36378:; fornext_value3947= 1 ; fornext_finalvalue3947=__STRING_LAYOUT->len; fornext_step3947= 1 ; if (fornext_step3947<0) fornext_step_negative3947=1; else fornext_step_negative3947=0; if (new_error) goto fornext_error3947; goto fornext_entrylabel3947; while(1){ fornext_value3947=fornext_step3947+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3947: *_FUNC_IDE2_LONG_I=fornext_value3947; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3947){ if (fornext_value3947fornext_finalvalue3947) break; } fornext_error3947:; if(qbevent){evnt(25753,675,"ide_methods.bas");if(r)goto S_36378;} S_36379:; 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(25753,676,"ide_methods.bas");if(r)goto S_36379;} do{ *_FUNC_IDE2_LONG_INDENT=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(25753,677,"ide_methods.bas");}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(25753,678,"ide_methods.bas");}while(r); do{ goto fornext_exit_3946; if(!qbevent)break;evnt(25753,679,"ide_methods.bas");}while(r); } fornext_continue_3946:; } fornext_exit_3946:; S_36385:; if ((*__LONG_IDEAUTOLAYOUT)||new_error){ if(qbevent){evnt(25753,683,"ide_methods.bas");if(r)goto S_36385;} LABEL_SPACELAYOUT:; if(qbevent){evnt(25753,684,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(25753,685,"ide_methods.bas");}while(r); S_36387:; fornext_value3952= 1 ; fornext_finalvalue3952=__STRING_LAYOUT->len; 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_IDE2_LONG_I); fornext_entrylabel3952: *_FUNC_IDE2_LONG_I=fornext_value3952; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3952){ if (fornext_value3952fornext_finalvalue3952) break; } fornext_error3952:; if(qbevent){evnt(25753,686,"ide_methods.bas");if(r)goto S_36387;} S_36388:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I)== 34 )))||new_error){ if(qbevent){evnt(25753,687,"ide_methods.bas");if(r)goto S_36388;} do{ *_FUNC_IDE2_LONG_IGNORESP=*_FUNC_IDE2_LONG_IGNORESP+ 1 ; if(!qbevent)break;evnt(25753,688,"ide_methods.bas");}while(r); S_36390:; if ((-(*_FUNC_IDE2_LONG_IGNORESP== 2 ))||new_error){ if(qbevent){evnt(25753,688,"ide_methods.bas");if(r)goto S_36390;} do{ *_FUNC_IDE2_LONG_IGNORESP= 0 ; if(!qbevent)break;evnt(25753,688,"ide_methods.bas");}while(r); } } S_36394:; if ((-(*_FUNC_IDE2_LONG_IGNORESP== 0 ))||new_error){ if(qbevent){evnt(25753,690,"ide_methods.bas");if(r)goto S_36394;} S_36395:; 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(25753,691,"ide_methods.bas");if(r)goto S_36395;} do{ sub_mid(__STRING_LAYOUT,*_FUNC_IDE2_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(25753,691,"ide_methods.bas");}while(r); } S_36398:; 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(25753,692,"ide_methods.bas");if(r)goto S_36398;} 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(25753,692,"ide_methods.bas");}while(r); do{ goto LABEL_SPACELAYOUT; if(!qbevent)break;evnt(25753,692,"ide_methods.bas");}while(r); } } fornext_continue_3951:; } fornext_exit_3951:; } S_36405:; if ((-(*__LONG_IDEAUTOINDENT== 0 ))||new_error){ if(qbevent){evnt(25753,697,"ide_methods.bas");if(r)goto S_36405;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,700,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_INDENT= 0 ; if(!qbevent)break;evnt(25753,701,"ide_methods.bas");}while(r); S_36408:; fornext_value3956= 1 ; fornext_finalvalue3956=_FUNC_IDE2_STRING_A->len; fornext_step3956= 1 ; if (fornext_step3956<0) fornext_step_negative3956=1; else fornext_step_negative3956=0; if (new_error) goto fornext_error3956; goto fornext_entrylabel3956; while(1){ fornext_value3956=fornext_step3956+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3956: *_FUNC_IDE2_LONG_I=fornext_value3956; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3956){ if (fornext_value3956fornext_finalvalue3956) break; } fornext_error3956:; if(qbevent){evnt(25753,702,"ide_methods.bas");if(r)goto S_36408;} S_36409:; 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(25753,703,"ide_methods.bas");if(r)goto S_36409;} do{ *_FUNC_IDE2_LONG_INDENT=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(25753,704,"ide_methods.bas");}while(r); do{ goto fornext_exit_3955; if(!qbevent)break;evnt(25753,705,"ide_methods.bas");}while(r); } fornext_continue_3955:; } fornext_exit_3955:; do{ qbs_set(_FUNC_IDE2_STRING_INDENT,func_space(*_FUNC_IDE2_LONG_INDENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,708,"ide_methods.bas");}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(25753,710,"ide_methods.bas");}while(r); } S_36418:; if ((-(*__LONG_IDEAUTOLAYOUT== 0 ))||new_error){ if(qbevent){evnt(25753,713,"ide_methods.bas");if(r)goto S_36418;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,715,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LAYOUT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,716,"ide_methods.bas");}while(r); S_36421:; fornext_value3960= 1 ; fornext_finalvalue3960=_FUNC_IDE2_STRING_A->len; fornext_step3960= 1 ; if (fornext_step3960<0) fornext_step_negative3960=1; else fornext_step_negative3960=0; if (new_error) goto fornext_error3960; goto fornext_entrylabel3960; while(1){ fornext_value3960=fornext_step3960+(*_FUNC_IDE2_LONG_I); fornext_entrylabel3960: *_FUNC_IDE2_LONG_I=fornext_value3960; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative3960){ if (fornext_value3960fornext_finalvalue3960) break; } fornext_error3960:; if(qbevent){evnt(25753,717,"ide_methods.bas");if(r)goto S_36421;} S_36422:; 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(25753,718,"ide_methods.bas");if(r)goto S_36422;} 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(25753,719,"ide_methods.bas");}while(r); do{ goto fornext_exit_3959; if(!qbevent)break;evnt(25753,720,"ide_methods.bas");}while(r); } fornext_continue_3959:; } fornext_exit_3959:; } do{ qbs_set(__STRING_LAYOUT,qbs_add(_FUNC_IDE2_STRING_INDENT,__STRING_LAYOUT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,725,"ide_methods.bas");}while(r); S_36429:; if (((-(*__LONG_IDECY!=*__LONG_IDECOMPILEDLINE))|(-(*__LONG_IDELAYOUTALLOW!= 0 )))||new_error){ if(qbevent){evnt(25753,727,"ide_methods.bas");if(r)goto S_36429;} do{ *__LONG_IDELAYOUTALLOW= 0 ; if(!qbevent)break;evnt(25753,728,"ide_methods.bas");}while(r); S_36431:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMPILEDLINE,__STRING_LAYOUT)))||new_error){ if(qbevent){evnt(25753,730,"ide_methods.bas");if(r)goto S_36431;} do{ SUB_IDESETLINE(__LONG_IDECOMPILEDLINE,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,731,"ide_methods.bas");}while(r); S_36433:; if (((-(*__LONG_IDECOMPILEDLINE>=*__LONG_IDESY))&(-(*__LONG_IDECOMPILEDLINE<=(*__LONG_IDESY+ 16 ))))||new_error){ if(qbevent){evnt(25753,732,"ide_methods.bas");if(r)goto S_36433;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,732,"ide_methods.bas");}while(r); } } }else{ S_36438:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMPILEDLINE,__STRING_LAYOUT)))||new_error){ if(qbevent){evnt(25753,737,"ide_methods.bas");if(r)goto S_36438;} do{ qbs_set(__STRING_IDECURRENTLINELAYOUT,__STRING_LAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,738,"ide_methods.bas");}while(r); do{ *__LONG_IDECURRENTLINELAYOUTI=*__LONG_IDECY; if(!qbevent)break;evnt(25753,739,"ide_methods.bas");}while(r); } } } } } S_36446:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 6 ))))||new_error){ if(qbevent){evnt(25753,750,"ide_methods.bas");if(r)goto S_36446;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(25753,751,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_READY= 1 ; if(!qbevent)break;evnt(25753,752,"ide_methods.bas");}while(r); S_36449:; if ((*__LONG_IDEAUTORUN)||new_error){ if(qbevent){evnt(25753,753,"ide_methods.bas");if(r)goto S_36449;} do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(25753,753,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMRUNSPECIAL; if(!qbevent)break;evnt(25753,753,"ide_methods.bas");}while(r); } } do{ if(!qbevent)break;evnt(25753,756,"ide_methods.bas");}while(r); S_36455:; if (((-(*__LONG_VWATCHON== 1 ))&(-(*_FUNC_IDE2_BYTE_ATTEMPTTOHOST== 0 )))||new_error){ if(qbevent){evnt(25753,757,"ide_methods.bas");if(r)goto S_36455;} S_36456:; if ((-(*__LONG_HOST== 0 ))||new_error){ if(qbevent){evnt(25753,758,"ide_methods.bas");if(r)goto S_36456;} do{ qbs_set(__STRING_HOSTPORT,qbs__trim(qbs_str((int64)(*__LONG_IDEBASETCPPORT+*__LONG_TEMPFOLDERINDEX)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,759,"ide_methods.bas");}while(r); do{ sub_environ(qbs_add(qbs_new_txt_len("QB64DEBUGPORT=",14),__STRING_HOSTPORT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,760,"ide_methods.bas");}while(r); do{ *__LONG_HOST=func__openhost(qbs_add(qbs_new_txt_len("TCP/IP:",7),__STRING_HOSTPORT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,761,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_ATTEMPTTOHOST= -1 ; if(!qbevent)break;evnt(25753,762,"ide_methods.bas");}while(r); } S_36462:; if ((*_FUNC_IDE2_BYTE_CHANGINGTCPPORT&(-(*__LONG_HOST== 0 )))||new_error){ if(qbevent){evnt(25753,764,"ide_methods.bas");if(r)goto S_36462;} do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("$DEBUG MODE",11),qbs_add(qbs_add(qbs_new_txt_len("Cannot receive connections on port",34),qbs_str((int32)(*__LONG_IDEBASETCPPORT))),qbs_new_txt_len(".\\nCheck your firewall permissions.",35)),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,765,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,766,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,766,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_BYTE_CHANGINGTCPPORT= 0 ; if(!qbevent)break;evnt(25753,768,"ide_methods.bas");}while(r); } S_36469:; if ((*__LONG_IDEDEBUGMODE)||new_error){ if(qbevent){evnt(25753,771,"ide_methods.bas");if(r)goto S_36469;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(25753,772,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_READY= 1 ; if(!qbevent)break;evnt(25753,773,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=13; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_13:; if(!qbevent)break;evnt(25753,774,"ide_methods.bas");}while(r); do{ goto LABEL_EXITDEBUGMODE; if(!qbevent)break;evnt(25753,775,"ide_methods.bas");}while(r); } S_36475:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 254 ))))||new_error){ if(qbevent){evnt(25753,778,"ide_methods.bas");if(r)goto S_36475;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,780,"ide_methods.bas");}while(r); do{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_VWATCHRECEIVEDDATA)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&1){ tmp_long=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long]); free((void*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0])); } __ARRAY_STRING_VWATCHRECEIVEDDATA[4]= 1 ; __ARRAY_STRING_VWATCHRECEIVEDDATA[5]=(func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1))-__ARRAY_STRING_VWATCHRECEIVEDDATA[4]+1; __ARRAY_STRING_VWATCHRECEIVEDDATA[6]=1; __ARRAY_STRING_VWATCHRECEIVEDDATA[0]=(ptrszint)malloc(__ARRAY_STRING_VWATCHRECEIVEDDATA[5]*8); if (!__ARRAY_STRING_VWATCHRECEIVEDDATA[0]) error(257); __ARRAY_STRING_VWATCHRECEIVEDDATA[2]|=1; tmp_long=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,782,"ide_methods.bas");}while(r); LABEL_ENTERDEBUGMODE:; if(qbevent){evnt(25753,784,"ide_methods.bas");r=0;} S_36478:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(25753,785,"ide_methods.bas");if(r)goto S_36478;} do{ *__LONG_IDEWY=*__LONG_IDEWY+*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,786,"ide_methods.bas");}while(r); do{ *__LONG_IDEHELP= 0 ; if(!qbevent)break;evnt(25753,787,"ide_methods.bas");}while(r); do{ *__LONG_IDESUBWINDOW= 0 ; if(!qbevent)break;evnt(25753,788,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,789,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,790,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,791,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=14; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_14:; if(!qbevent)break;evnt(25753,794,"ide_methods.bas");}while(r); do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(25753,795,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_READY= 1 ; if(!qbevent)break;evnt(25753,796,"ide_methods.bas");}while(r); do{ sub__resize( 2 ,NULL); if(!qbevent)break;evnt(25753,797,"ide_methods.bas");}while(r); do{ SUB_DEBUGMODE(); if(!qbevent)break;evnt(25753,798,"ide_methods.bas");}while(r); LABEL_EXITDEBUGMODE:; if(qbevent){evnt(25753,799,"ide_methods.bas");r=0;} S_36491:; if ((*__BYTE_WATCHLISTTOCONSOLE)||new_error){ if(qbevent){evnt(25753,800,"ide_methods.bas");if(r)goto S_36491;} do{ sub__console( 2 ); if(!qbevent)break;evnt(25753,800,"ide_methods.bas");}while(r); } do{ SUB_UPDATEMENUHELPLINE(qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,801,"ide_methods.bas");}while(r); S_36495:; if(qbevent){evnt(25753,802,"ide_methods.bas");if(r)goto S_36495;} S_36496:; if (((*__LONG_IDEDEBUGMODE==( 1 )))||new_error){ if(qbevent){evnt(25753,803,"ide_methods.bas");if(r)goto S_36496;} do{ *__LONG_IDEDEBUGMODE= 0 ; if(!qbevent)break;evnt(25753,804,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,805,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGNEXTLINE= 0 ; if(!qbevent)break;evnt(25753,806,"ide_methods.bas");}while(r); sc_ec_189_end:; goto sc_3964_end; } S_36500:; if (((*__LONG_IDEDEBUGMODE==( 2 )))||new_error){ if(qbevent){evnt(25753,807,"ide_methods.bas");if(r)goto S_36500;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,808,"ide_methods.bas");}while(r); do{ SUB_IDEMAKECONTEXTUALMENU(); if(!qbevent)break;evnt(25753,809,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 1 ; if(!qbevent)break;evnt(25753,810,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,811,"ide_methods.bas");}while(r); sc_ec_190_end:; goto sc_3964_end; } sc_3964_end:; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,813,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,813,"ide_methods.bas");}while(r); S_36508:; if ((-(*__LONG_IDESUBWINDOW!= 0 ))||new_error){ if(qbevent){evnt(25753,814,"ide_methods.bas");if(r)goto S_36508;} do{ sub__resize( 2 ,NULL); if(!qbevent)break;evnt(25753,814,"ide_methods.bas");}while(r); }else{ do{ sub__resize( 1 ,NULL); if(!qbevent)break;evnt(25753,814,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,815,"ide_methods.bas");}while(r); } S_36515:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 11 ))))||new_error){ if(qbevent){evnt(25753,818,"ide_methods.bas");if(r)goto S_36515;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(25753,819,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_READY= 1 ; if(!qbevent)break;evnt(25753,820,"ide_methods.bas");}while(r); do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(25753,821,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SHOWEXECREATED= 1 ; if(!qbevent)break;evnt(25753,822,"ide_methods.bas");}while(r); } S_36521:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_C,func_chr( 7 ))))||new_error){ if(qbevent){evnt(25753,825,"ide_methods.bas");if(r)goto S_36521;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 1 ; if(!qbevent)break;evnt(25753,826,"ide_methods.bas");}while(r); do{ *__LONG_IDECOMPILEDLINE= 0 ; if(!qbevent)break;evnt(25753,827,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SENDNEXTLINE= 1 ; if(!qbevent)break;evnt(25753,828,"ide_methods.bas");}while(r); } S_36526:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 8 ))))||new_error){ if(qbevent){evnt(25753,831,"ide_methods.bas");if(r)goto S_36526;} do{ *__LONG_IDECOMPILING= 0 ; if(!qbevent)break;evnt(25753,832,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FAILED= 1 ; if(!qbevent)break;evnt(25753,833,"ide_methods.bas");}while(r); do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(25753,834,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_PASSBACK= 0 ; if(!qbevent)break;evnt(25753,837,"ide_methods.bas");}while(r); S_36532:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_C, 1 ),func_chr( 10 ))))||new_error){ if(qbevent){evnt(25753,838,"ide_methods.bas");if(r)goto S_36532;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 1 ; if(!qbevent)break;evnt(25753,839,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SENDNEXTLINE= 1 ; if(!qbevent)break;evnt(25753,840,"ide_methods.bas");}while(r); do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE- 1 ; if(!qbevent)break;evnt(25753,841,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PASSBACK= 1 ; if(!qbevent)break;evnt(25753,842,"ide_methods.bas");}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(25753,843,"ide_methods.bas");}while(r); } S_36539:; if ((*_FUNC_IDE2_LONG_MUSTDISPLAY)||new_error){ if(qbevent){evnt(25753,846,"ide_methods.bas");if(r)goto S_36539;} do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,846,"ide_methods.bas");}while(r); } S_36542:; if ((-(*_FUNC_IDE2_LONG_SKIPDISPLAY== 0 ))||new_error){ if(qbevent){evnt(25753,848,"ide_methods.bas");if(r)goto S_36542;} do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,850,"ide_methods.bas");}while(r); S_36544:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_C,func_chr( 3 ))))||new_error){ if(qbevent){evnt(25753,855,"ide_methods.bas");if(r)goto S_36544;} do{ SUB_CLEARSTATUSWINDOW(&(pass3966= 0 )); if(!qbevent)break;evnt(25753,856,"ide_methods.bas");}while(r); S_36546:; if ((*_FUNC_IDE2_LONG_READY)||new_error){ if(qbevent){evnt(25753,857,"ide_methods.bas");if(r)goto S_36546;} S_36547:; if ((*__BYTE_IDESHOWERRORSIMMEDIATELY)||new_error){ if(qbevent){evnt(25753,858,"ide_methods.bas");if(r)goto S_36547;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("OK",2),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,859,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 0 ; if(!qbevent)break;evnt(25753,860,"ide_methods.bas");}while(r); S_36550:; if (((-(*__LONG_TOTALWARNINGS> 0 ))&(-(*_FUNC_IDE2_LONG_SHOWEXECREATED== 0 )))||new_error){ if(qbevent){evnt(25753,861,"ide_methods.bas");if(r)goto S_36550;} do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,862,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_add(qbs_new_txt_len(" (",2),qbs_ltrim(qbs_str((int32)(*__LONG_TOTALWARNINGS)))),qbs_new_txt_len(" warning",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,863,"ide_methods.bas");}while(r); S_36553:; if ((-(*__LONG_TOTALWARNINGS> 1 ))||new_error){ if(qbevent){evnt(25753,864,"ide_methods.bas");if(r)goto S_36553;} do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(_FUNC_IDE2_STRING_MSG,qbs_new_txt_len("s",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,864,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(_FUNC_IDE2_STRING_MSG,qbs_new_txt_len(" - click here or Ctrl+W to view)",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,865,"ide_methods.bas");}while(r); do{ sub__printstring( 4 ,*__LONG_IDEWY- 3 ,_FUNC_IDE2_STRING_MSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,866,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 4 ; if(!qbevent)break;evnt(25753,867,"ide_methods.bas");}while(r); } S_36560:; if ((*_FUNC_IDE2_BYTE_WAITINGFORVARLIST)||new_error){ if(qbevent){evnt(25753,869,"ide_methods.bas");if(r)goto S_36560;} do{ return_point[next_return_point++]=15; if (next_return_point>=return_points) more_return_points(); goto LABEL_SHOWVARLISTREADY; RETURN_15:; if(!qbevent)break;evnt(25753,869,"ide_methods.bas");}while(r); } } } S_36565:; if ((*_FUNC_IDE2_LONG_SHOWEXECREATED)||new_error){ if(qbevent){evnt(25753,872,"ide_methods.bas");if(r)goto S_36565;} do{ *_FUNC_IDE2_LONG_SHOWEXECREATED= 0 ; if(!qbevent)break;evnt(25753,873,"ide_methods.bas");}while(r); S_36567:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,875,"ide_methods.bas");if(r)goto S_36567;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Executable file created",23),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,876,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len(".EXE file created",17),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,878,"ide_methods.bas");}while(r); } S_36572:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(25753,881,"ide_methods.bas");if(r)goto S_36572;} do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,882,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LOCATION,__STRING_LASTBINARYGENERATED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,883,"ide_methods.bas");}while(r); S_36575:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,884,"ide_methods.bas");if(r)goto S_36575;} do{ qbs_set(_FUNC_IDE2_STRING_LOCATION,qbs_add(qbs_add(func__startdir(),__STRING1_PATHSEP),_FUNC_IDE2_STRING_LOCATION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,884,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_new_txt_len("Location: ",10),_FUNC_IDE2_STRING_LOCATION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,885,"ide_methods.bas");}while(r); S_36579:; if ((qbs_cleanup(qbs_tmp_base,-(( 2 +_FUNC_IDE2_STRING_MSG->len)>*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,886,"ide_methods.bas");if(r)goto S_36579;} do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_add(qbs_new_txt_len("Location: ",10),func_string( 3 , 250 )),qbs_right(_FUNC_IDE2_STRING_LOCATION,*__LONG_IDEWX- 15 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,887,"ide_methods.bas");}while(r); } do{ sub__printstring( 2 ,*__LONG_IDEWY- 2 ,_FUNC_IDE2_STRING_MSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,889,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 3 ; if(!qbevent)break;evnt(25753,890,"ide_methods.bas");}while(r); } } } } do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,898,"ide_methods.bas");}while(r); S_36589:; do{ if(qbevent){evnt(25753,929,"ide_methods.bas");if(r)goto S_36589;} LABEL_IDELOOP:; if(qbevent){evnt(25753,930,"ide_methods.bas");r=0;} S_36590:; if ((*__BYTE_SHOWLINENUMBERS)||new_error){ if(qbevent){evnt(25753,931,"ide_methods.bas");if(r)goto S_36590;} do{ *__LONG_MAXLINENUMBERLENGTH=((int32)(qbs_str((int32)(*__LONG_IDEN)))->len)+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,931,"ide_methods.bas");}while(r); }else{ do{ *__LONG_MAXLINENUMBERLENGTH= 0 ; if(!qbevent)break;evnt(25753,931,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,932,"ide_methods.bas");}while(r); do{ SUB_IDEDELTXT(); if(!qbevent)break;evnt(25753,933,"ide_methods.bas");}while(r); S_36597:; if ((-(*__LONG_IDESUBWINDOW!= 0 ))||new_error){ if(qbevent){evnt(25753,934,"ide_methods.bas");if(r)goto S_36597;} do{ sub__resize( 2 ,NULL); if(!qbevent)break;evnt(25753,934,"ide_methods.bas");}while(r); }else{ do{ sub__resize( 1 ,NULL); if(!qbevent)break;evnt(25753,934,"ide_methods.bas");}while(r); } S_36602:; if ((((func__resize()|*_FUNC_IDE2_LONG_FORCERESIZE))&(-(((float)(FUNC_TIMEELAPSEDSINCE(__SINGLE_QB64_UPTIME)))>((float)( 1.5E+0 )))))||new_error){ if(qbevent){evnt(25753,936,"ide_methods.bas");if(r)goto S_36602;} S_36603:; if ((-(*__LONG_IDESUBWINDOW!= 0 ))||new_error){ if(qbevent){evnt(25753,937,"ide_methods.bas");if(r)goto S_36603;} do{ *_FUNC_IDE2_LONG_FORCERESIZE= -1 ; if(!qbevent)break;evnt(25753,938,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_RETVAL= 0 ; if(!qbevent)break;evnt(25753,940,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FORCERESIZE= 0 ; if(!qbevent)break;evnt(25753,941,"ide_methods.bas");}while(r); S_36608:; do{ if(qbevent){evnt(25753,942,"ide_methods.bas");if(r)goto S_36608;} do{ *_FUNC_IDE2_BYTE_TOOSMALL= 0 ; if(!qbevent)break;evnt(25753,943,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_INTEGER_V=func__resizewidth()/ func__fontwidth(NULL,0); if(!qbevent)break;evnt(25753,944,"ide_methods.bas");}while(r); S_36611:; if (((-(*_FUNC_IDE2_INTEGER_V< 80 ))|(-(*_FUNC_IDE2_INTEGER_V> 1000 )))||new_error){ if(qbevent){evnt(25753,944,"ide_methods.bas");if(r)goto S_36611;} do{ *_FUNC_IDE2_INTEGER_V= 80 ; if(!qbevent)break;evnt(25753,944,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_TOOSMALL= -1 ; if(!qbevent)break;evnt(25753,944,"ide_methods.bas");}while(r); } S_36615:; if ((-(*_FUNC_IDE2_INTEGER_V!=*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,945,"ide_methods.bas");if(r)goto S_36615;} do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,945,"ide_methods.bas");}while(r); do{ *__LONG_IDEWX=*_FUNC_IDE2_INTEGER_V; if(!qbevent)break;evnt(25753,945,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_INTEGER_V=func__resizeheight()/ func__fontheight(NULL,0); if(!qbevent)break;evnt(25753,946,"ide_methods.bas");}while(r); S_36620:; if (((-(*_FUNC_IDE2_INTEGER_V< 25 ))|(-(*_FUNC_IDE2_INTEGER_V> 1000 )))||new_error){ if(qbevent){evnt(25753,946,"ide_methods.bas");if(r)goto S_36620;} do{ *_FUNC_IDE2_INTEGER_V= 25 ; if(!qbevent)break;evnt(25753,946,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_TOOSMALL= -1 ; if(!qbevent)break;evnt(25753,946,"ide_methods.bas");}while(r); } S_36624:; if ((-(*_FUNC_IDE2_INTEGER_V!=*__LONG_IDEWY))||new_error){ if(qbevent){evnt(25753,947,"ide_methods.bas");if(r)goto S_36624;} do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,947,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*_FUNC_IDE2_INTEGER_V; if(!qbevent)break;evnt(25753,947,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_TEMPF=func__font(NULL,0); if(!qbevent)break;evnt(25753,949,"ide_methods.bas");}while(r); do{ qbsub_width(NULL,*__LONG_IDEWX,*__LONG_IDEWY,NULL,NULL,3); if(!qbevent)break;evnt(25753,950,"ide_methods.bas");}while(r); do{ sub__font(*_FUNC_IDE2_LONG_TEMPF,NULL,0); if(!qbevent)break;evnt(25753,951,"ide_methods.bas");}while(r); do{ sub__palettecolor( 1 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,953,"ide_methods.bas");}while(r); do{ sub__palettecolor( 2 ,func__rgb32( 84 , 84 , 84 ), 0 ,1); if(!qbevent)break;evnt(25753,954,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,955,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1); if(!qbevent)break;evnt(25753,956,"ide_methods.bas");}while(r); do{ sub__palettecolor( 7 ,*__ULONG_IDECHROMACOLOR, 0 ,1); if(!qbevent)break;evnt(25753,957,"ide_methods.bas");}while(r); do{ sub__palettecolor( 8 ,*__ULONG_IDENUMBERSCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,958,"ide_methods.bas");}while(r); do{ sub__palettecolor( 10 ,*__ULONG_IDEMETACOMMANDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,959,"ide_methods.bas");}while(r); do{ sub__palettecolor( 11 ,*__ULONG_IDECOMMENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,960,"ide_methods.bas");}while(r); do{ sub__palettecolor( 12 ,*__ULONG_IDEKEYWORDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,961,"ide_methods.bas");}while(r); do{ sub__palettecolor( 13 ,*__ULONG_IDETEXTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,962,"ide_methods.bas");}while(r); do{ sub__palettecolor( 14 ,*__ULONG_IDEQUOTECOLOR, 0 ,1); if(!qbevent)break;evnt(25753,963,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,965,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,967,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,func_space(*__LONG_IDEWX),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,968,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,qbs_left(__STRING_MENUBAR,*__LONG_IDEWX),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,969,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,970,"ide_methods.bas");}while(r); do{ SUB_IDEBOX(&(pass3970= 1 ),&(pass3971= 2 ),__LONG_IDEWX,&(pass3972=*__LONG_IDEWY- 5 )); if(!qbevent)break;evnt(25753,970,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,972,"ide_methods.bas");}while(r); do{ SUB_IDEBOX(&(pass3973= 1 ),&(pass3974=*__LONG_IDEWY- 4 ),__LONG_IDEWX,&(pass3975= 5 )); if(!qbevent)break;evnt(25753,972,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,974,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*__LONG_IDEWY- 4 ,func_chr( 195 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,974,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX,*__LONG_IDEWY- 4 ,func_chr( 180 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,974,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=16; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_16:; if(!qbevent)break;evnt(25753,976,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,979,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,func_space(*__LONG_IDEWX),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,979,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,980,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3976=*__LONG_IDEWY- 3 ),&(pass3977= 3 ),&(pass3978= 1 ),&(pass3979= 1 )); if(!qbevent)break;evnt(25753,981,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass3980= 3 ),&(pass3981=*__LONG_IDEWY- 8 ),&(pass3982= 1 ),&(pass3983= 1 )); if(!qbevent)break;evnt(25753,982,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEHBAR(&(pass3984= 2 ),&(pass3985=*__LONG_IDEWY- 5 ),&(pass3986=*__LONG_IDEWX- 2 ),&(pass3987= 1 ),&(pass3988= 1 )); if(!qbevent)break;evnt(25753,983,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,985,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,987,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Resizing...",11),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,988,"ide_methods.bas");}while(r); S_36663:; if ((*_FUNC_IDE2_BYTE_TOOSMALL)||new_error){ if(qbevent){evnt(25753,989,"ide_methods.bas");if(r)goto S_36663;} do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,990,"ide_methods.bas");}while(r); do{ sub__printstring( 2 , 3 ,qbs_new_txt_len("ERROR: Minimum window size is 80x25",35),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,991,"ide_methods.bas");}while(r); }else{ do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,993,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,996,"ide_methods.bas");}while(r); do{ sub__display(); if(!qbevent)break;evnt(25753,998,"ide_methods.bas");}while(r); do{ sub__limit( 15 ); if(!qbevent)break;evnt(25753,999,"ide_methods.bas");}while(r); S_36672:; dl_continue_3969:; }while((func__resize())&&(!new_error)); dl_exit_3969:; if(qbevent){evnt(25753,1000,"ide_methods.bas");if(r)goto S_36672;} S_36673:; if ((-(*_FUNC_IDE2_LONG_RETVAL== 1 ))||new_error){ if(qbevent){evnt(25753,1002,"ide_methods.bas");if(r)goto S_36673;} do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Width",9),qbs_str((int32)(*__LONG_IDEWX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1003,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Height",10),qbs_str((int32)(*__LONG_IDEWY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1004,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,1007,"ide_methods.bas");}while(r); do{ sub__autodisplay(); if(!qbevent)break;evnt(25753,1008,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=17; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_17:; if(!qbevent)break;evnt(25753,1009,"ide_methods.bas");}while(r); } }else{ do{ sub__autodisplay(); if(!qbevent)break;evnt(25753,1012,"ide_methods.bas");}while(r); } S_36684:; if ((-(*_FUNC_IDE2_LONG_SKIPDISPLAY== 0 ))||new_error){ if(qbevent){evnt(25753,1015,"ide_methods.bas");if(r)goto S_36684;} do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1017,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,1020,"ide_methods.bas");}while(r); S_36687:; if ((*__BYTE_ENABLEQUICKNAV)||new_error){ if(qbevent){evnt(25753,1023,"ide_methods.bas");if(r)goto S_36687;} do{ return_point[next_return_point++]=18; if (next_return_point>=return_points) more_return_points(); goto LABEL_DRAWQUICKNAV; RETURN_18:; if(!qbevent)break;evnt(25753,1023,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=19; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_19:; if(!qbevent)break;evnt(25753,1026,"ide_methods.bas");}while(r); S_36691:; if ((*__INTEGER_IDEINSERT)||new_error){ if(qbevent){evnt(25753,1029,"ide_methods.bas");if(r)goto S_36691;} do{ qbg_sub_locate(NULL,NULL,NULL, 0 , 31 ,24); if(!qbevent)break;evnt(25753,1029,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_locate(NULL,NULL,NULL,*__LONG_IDENORMALCURSORSTART,*__LONG_IDENORMALCURSOREND,24); if(!qbevent)break;evnt(25753,1029,"ide_methods.bas");}while(r); } S_36696:; if ((*_FUNC_IDE2_LONG_FAILED)||new_error){ if(qbevent){evnt(25753,1032,"ide_methods.bas");if(r)goto S_36696;} S_36697:; if (((-(*__BYTE_IDESHOWERRORSIMMEDIATELY!= 0 ))|(-(*_FUNC_IDE2_BYTE_IDECOMPILATIONREQUESTED!= 0 ))|(-(*__LONG_COMPFAILED!= 0 )))||new_error){ if(qbevent){evnt(25753,1033,"ide_methods.bas");if(r)goto S_36697;} S_36698:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(__STRING_IDEINFO, 19 ),qbs_new_txt_len("Selection length = ",19))))||new_error){ if(qbevent){evnt(25753,1034,"ide_methods.bas");if(r)goto S_36698;} do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1034,"ide_methods.bas");}while(r); } do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,1035,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass3989= 0 )); if(!qbevent)break;evnt(25753,1037,"ide_methods.bas");}while(r); S_36703:; if ((*__LONG_COMPFAILED)||new_error){ if(qbevent){evnt(25753,1039,"ide_methods.bas");if(r)goto S_36703;} 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(25753,1040,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,1041,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 3 ; if(!qbevent)break;evnt(25753,1042,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass3991=*_FUNC_IDE2_LONG_X),&(pass3992=*_FUNC_IDE2_LONG_Y),&(pass3993=*_FUNC_IDE2_LONG_X),_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1043,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 1 ; if(!qbevent)break;evnt(25753,1044,"ide_methods.bas");}while(r); }else{ 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(25753,1046,"ide_methods.bas");}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(25753,1048,"ide_methods.bas");}while(r); S_36712:; if ((-(*_FUNC_IDE2_LONG_L!= 0 ))||new_error){ if(qbevent){evnt(25753,1048,"ide_methods.bas");if(r)goto S_36712;} do{ *__LONG_IDEFOCUSLINE=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,1048,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,1050,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 3 ; if(!qbevent)break;evnt(25753,1051,"ide_methods.bas");}while(r); S_36717:; if (((-(*_FUNC_IDE2_LONG_L!= 0 ))&(-(*__LONG_IDECY==*_FUNC_IDE2_LONG_L)))||new_error){ if(qbevent){evnt(25753,1053,"ide_methods.bas");if(r)goto S_36717;} do{ *_FUNC_IDE2_LONG_ONCURRENTLINE=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1053,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,func_chr( 1 )),qbs_new_txt_len(" on current line",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1053,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_HASREFERENCE=func_instr(NULL,_FUNC_IDE2_STRING_A,qbs_new_txt_len(" - Reference: ",14),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1055,"ide_methods.bas");}while(r); S_36722:; if ((*_FUNC_IDE2_LONG_HASREFERENCE)||new_error){ if(qbevent){evnt(25753,1056,"ide_methods.bas");if(r)goto S_36722;} do{ *_FUNC_IDE2_LONG_HASREFERENCE=*_FUNC_IDE2_LONG_HASREFERENCE+ 13 ; if(!qbevent)break;evnt(25753,1057,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_HASREFERENCE),func_chr( 2 )),func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_HASREFERENCE+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1058,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_HASREFERENCE=func_instr(NULL,_FUNC_IDE2_STRING_A,qbs_new_txt_len("Expected ",9),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1060,"ide_methods.bas");}while(r); S_36727:; if ((*_FUNC_IDE2_LONG_HASREFERENCE)||new_error){ if(qbevent){evnt(25753,1061,"ide_methods.bas");if(r)goto S_36727;} do{ *_FUNC_IDE2_LONG_HASREFERENCE=*_FUNC_IDE2_LONG_HASREFERENCE+ 8 ; if(!qbevent)break;evnt(25753,1062,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_HASREFERENCE),func_chr( 2 )),func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_HASREFERENCE+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1063,"ide_methods.bas");}while(r); } } do{ SUB_PRINTWRAPSTATUS(&(pass3996=*_FUNC_IDE2_LONG_X),&(pass3997=*_FUNC_IDE2_LONG_Y),&(pass3998=*_FUNC_IDE2_LONG_X),_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1067,"ide_methods.bas");}while(r); S_36733:; if (((-(*_FUNC_IDE2_LONG_L!= 0 ))&(-(*__LONG_IDECY!=*_FUNC_IDE2_LONG_L)))||new_error){ if(qbevent){evnt(25753,1069,"ide_methods.bas");if(r)goto S_36733;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_new_txt_len(" on line",8),qbs_str((int32)(*_FUNC_IDE2_LONG_L))),qbs_new_txt_len(" (click here or Ctrl+Shift+G to jump there)",43))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1070,"ide_methods.bas");}while(r); do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1071,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass3999=func_pos( 0 )),&(pass4000=func_csrlin()),&(pass4001= 2 ),_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1072,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 2 ; if(!qbevent)break;evnt(25753,1073,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_Y=func_csrlin(); if(!qbevent)break;evnt(25753,1076,"ide_methods.bas");}while(r); S_36740:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDE2_LONG_Y<(*__LONG_IDEWY- 1 )))&(qbs_notequal(__STRING_LINEFRAGMENT,qbs_new_txt_len("[INFORMATION UNAVAILABLE]",25)))))||new_error){ if(qbevent){evnt(25753,1077,"ide_methods.bas");if(r)goto S_36740;} do{ qbs_set(_FUNC_IDE2_STRING_TEMP,__STRING_LINEFRAGMENT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1078,"ide_methods.bas");}while(r); S_36742:; fornext_value4003= 1 ; fornext_finalvalue4003=_FUNC_IDE2_STRING_TEMP->len; 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_IDE2_LONG_I); fornext_entrylabel4003: *_FUNC_IDE2_LONG_I=fornext_value4003; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4003){ if (fornext_value4003fornext_finalvalue4003) break; } fornext_error4003:; if(qbevent){evnt(25753,1079,"ide_methods.bas");if(r)goto S_36742;} S_36743:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_IDE2_STRING_TEMP,*_FUNC_IDE2_LONG_I, 1 ,1),__STRING1_SP)))||new_error){ if(qbevent){evnt(25753,1080,"ide_methods.bas");if(r)goto S_36743;} do{ sub_mid(_FUNC_IDE2_STRING_TEMP,*_FUNC_IDE2_LONG_I, 1 ,qbs_new_txt_len(" ",1),1); if(!qbevent)break;evnt(25753,1080,"ide_methods.bas");}while(r); } fornext_continue_4002:; } fornext_exit_4002:; do{ qbs_set(_FUNC_IDE2_STRING_TEMP,qbs__trim(_FUNC_IDE2_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1082,"ide_methods.bas");}while(r); S_36748:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_TEMP->len))||new_error){ if(qbevent){evnt(25753,1083,"ide_methods.bas");if(r)goto S_36748;} do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,1084,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 1 ; if(!qbevent)break;evnt(25753,1084,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_TEMP,qbs_add(qbs_add(qbs_new_txt_len("Caused by (or after): ",22),func_chr( 1 )),_FUNC_IDE2_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1085,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1087,"ide_methods.bas");}while(r); S_36753:; fornext_value4007= 1 ; fornext_finalvalue4007=_FUNC_IDE2_STRING_TEMP->len; 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_IDE2_LONG_I); fornext_entrylabel4007: *_FUNC_IDE2_LONG_I=fornext_value4007; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4007){ if (fornext_value4007fornext_finalvalue4007) break; } fornext_error4007:; if(qbevent){evnt(25753,1088,"ide_methods.bas");if(r)goto S_36753;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,1089,"ide_methods.bas");}while(r); S_36755:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,1089,"ide_methods.bas");if(r)goto S_36755;} do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,1089,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,1089,"ide_methods.bas");}while(r); } S_36759:; if ((-(*_FUNC_IDE2_LONG_Y>(*__LONG_IDEWY- 1 )))||new_error){ if(qbevent){evnt(25753,1090,"ide_methods.bas");if(r)goto S_36759;} do{ goto fornext_exit_4006; if(!qbevent)break;evnt(25753,1090,"ide_methods.bas");}while(r); } S_36762:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_TEMP,*_FUNC_IDE2_LONG_I)== 1 )))||new_error){ if(qbevent){evnt(25753,1091,"ide_methods.bas");if(r)goto S_36762;} do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,1091,"ide_methods.bas");}while(r); do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1091,"ide_methods.bas");}while(r); } do{ sub__printstring(*_FUNC_IDE2_LONG_X,*_FUNC_IDE2_LONG_Y,func_chr(qbs_asc(_FUNC_IDE2_STRING_TEMP,*_FUNC_IDE2_LONG_I)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1092,"ide_methods.bas");}while(r); fornext_continue_4006:; } fornext_exit_4006:; } } } } } S_36773:; if ((*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(25753,1101,"ide_methods.bas");if(r)goto S_36773;} S_36774:; if ((*__BYTE_IDESHOWERRORSIMMEDIATELY|*_FUNC_IDE2_BYTE_IDECOMPILATIONREQUESTED)||new_error){ if(qbevent){evnt(25753,1102,"ide_methods.bas");if(r)goto S_36774;} do{ SUB_CLEARSTATUSWINDOW(&(pass4009= 0 )); if(!qbevent)break;evnt(25753,1103,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1104,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,func_string( 3 , 250 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1105,"ide_methods.bas");}while(r); } } do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,1109,"ide_methods.bas");}while(r); S_36781:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(25753,1111,"ide_methods.bas");if(r)goto S_36781;} do{ SUB_HELP_SHOWTEXT(); if(!qbevent)break;evnt(25753,1116,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEHBAR(&(pass4010= 2 ),&(pass4011=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass4012=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass4013=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(25753,1118,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4014=*__LONG_IDEWY+ 1 ),&(pass4015=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass4016=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(25753,1119,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=20; if (next_return_point>=return_points) more_return_points(); goto LABEL_HELPAREASHOWBACKLINKS; RETURN_20:; if(!qbevent)break;evnt(25753,1123,"ide_methods.bas");}while(r); S_36786:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDESYSTEM== 3 ))&(qbs_notequal(qbs_left(__STRING_IDEINFO, 1 ),func_chr( 0 )))))||new_error){ if(qbevent){evnt(25753,1126,"ide_methods.bas");if(r)goto S_36786;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1127,"ide_methods.bas");}while(r); S_36788:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HELP_SEARCH_STR->len))||new_error){ if(qbevent){evnt(25753,1128,"ide_methods.bas");if(r)goto S_36788;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_HELP_SEARCH_STR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1129,"ide_methods.bas");}while(r); S_36790:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len> 20 )))||new_error){ if(qbevent){evnt(25753,1130,"ide_methods.bas");if(r)goto S_36790;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(func_string( 3 , 250 ),qbs_right(_FUNC_IDE2_STRING_A, 17 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1130,"ide_methods.bas");}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("] (TAB=next)",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1131,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEINFO,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1132,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("Start typing to search for text in this help page",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1134,"ide_methods.bas");}while(r); } do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,1136,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(__STRING_HELP_SEARCH_STR,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1139,"ide_methods.bas");}while(r); } S_36803:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,1142,"ide_methods.bas");if(r)goto S_36803;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1143,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_TX=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,1144,"ide_methods.bas");}while(r); S_36806:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_IDEFINDTEXT->len> 20 )))||new_error){ if(qbevent){evnt(25753,1145,"ide_methods.bas");if(r)goto S_36806;} S_36807:; if ((-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1> 20 ))||new_error){ if(qbevent){evnt(25753,1146,"ide_methods.bas");if(r)goto S_36807;} do{ *_FUNC_IDE2_LONG_TX= 20 ; if(!qbevent)break;evnt(25753,1147,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_TX=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,1149,"ide_methods.bas");}while(r); } } do{ qbg_sub_locate(*__LONG_IDEWY- 4 ,*__LONG_IDEWX-( 20 + 8 )+ 4 +*_FUNC_IDE2_LONG_TX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,1152,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1153,"ide_methods.bas");}while(r); } S_36816:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,1156,"ide_methods.bas");if(r)goto S_36816;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1157,"ide_methods.bas");}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(25753,1158,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1159,"ide_methods.bas");}while(r); } do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1162,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1165,"ide_methods.bas");}while(r); } S_36824:; if ((-(*__BYTE_WHITELISTQB64FIRSTTIMEMSG== 0 ))||new_error){ if(qbevent){evnt(25753,1169,"ide_methods.bas");if(r)goto S_36824;} S_36825:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,1170,"ide_methods.bas");if(r)goto S_36825;} do{ qbs_set(_FUNC_IDE2_STRING_WHITELISTPROCESS,qbs_new_txt_len("and the process 'qb64pe.exe' ",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1170,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_WHITELISTPROCESS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1170,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Welcome to QB64-PE",18),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_new_txt_len("QB64-PE is an independently distributed program, and as such",60),func_chr( 10 )),qbs_new_txt_len("both 'qb64pe",12)),__STRING_EXTENSION),qbs_new_txt_len("' and the programs you create with it may",41)),func_chr( 10 )),qbs_new_txt_len("eventually be flagged as false positives by your",48)),func_chr( 10 )),qbs_new_txt_len("antivirus/antimalware software.",31)),func_chr( 10 )),func_chr( 10 )),qbs_new_txt_len("It is advisable to whitelist your whole 'qb64pe' folder",55)),func_chr( 10 )),_FUNC_IDE2_STRING_WHITELISTPROCESS),qbs_new_txt_len("to avoid operation errors.",26)),qbs_new_txt_len("#OK;#Don't show this again",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1176,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1178,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1178,"ide_methods.bas");}while(r); S_36833:; if ((-(*_FUNC_IDE2_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(25753,1179,"ide_methods.bas");if(r)goto S_36833;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("WhiteListQB64FirstTimeMsg",25),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1180,"ide_methods.bas");}while(r); } do{ *__BYTE_WHITELISTQB64FIRSTTIMEMSG= -1 ; if(!qbevent)break;evnt(25753,1182,"ide_methods.bas");}while(r); } S_36838:; if ((*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(25753,1185,"ide_methods.bas");if(r)goto S_36838;} S_36839:; if ((*__LONG_IDELAYOUTALLOW)||new_error){ if(qbevent){evnt(25753,1187,"ide_methods.bas");if(r)goto S_36839;} do{ *__LONG_IDELAYOUTALLOW=*__LONG_IDELAYOUTALLOW- 1 ; if(!qbevent)break;evnt(25753,1187,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1189,"ide_methods.bas");}while(r); do{ *__LONG_IDECURRENTLINELAYOUTI= 0 ; if(!qbevent)break;evnt(25753,1190,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,1191,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 0 ; if(!qbevent)break;evnt(25753,1192,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDECOMPILATIONREQUESTED= 0 ; if(!qbevent)break;evnt(25753,1193,"ide_methods.bas");}while(r); do{ *__LONG_COMPFAILED= 0 ; if(!qbevent)break;evnt(25753,1194,"ide_methods.bas");}while(r); S_36848:; if ((-(*__LONG_IDEUNSAVED== -1 ))||new_error){ if(qbevent){evnt(25753,1195,"ide_methods.bas");if(r)goto S_36848;} do{ *__LONG_IDEUNSAVED= 0 ; if(!qbevent)break;evnt(25753,1195,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(25753,1195,"ide_methods.bas");}while(r); } S_36853:; if ((-(*__LONG_IDENOUNDO== 0 ))||new_error){ if(qbevent){evnt(25753,1197,"ide_methods.bas");if(r)goto S_36853;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1201,"ide_methods.bas");}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(25753,1202,"ide_methods.bas");}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(25753,1203,"ide_methods.bas");}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(25753,1204,"ide_methods.bas");}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(25753,1205,"ide_methods.bas");}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(25753,1206,"ide_methods.bas");}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(25753,1207,"ide_methods.bas");}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(25753,1209,"ide_methods.bas");}while(r); S_36862:; fornext_value4021= 1 ; fornext_finalvalue4021=*__LONG_IDEBMKN; fornext_step4021= 1 ; if (fornext_step4021<0) fornext_step_negative4021=1; else fornext_step_negative4021=0; if (new_error) goto fornext_error4021; goto fornext_entrylabel4021; while(1){ fornext_value4021=fornext_step4021+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel4021: *_FUNC_IDE2_LONG_BI=fornext_value4021; if (fornext_step_negative4021){ if (fornext_value4021fornext_finalvalue4021) break; } fornext_error4021:; if(qbevent){evnt(25753,1210,"ide_methods.bas");if(r)goto S_36862;} 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(25753,1210,"ide_methods.bas");}while(r); fornext_continue_4020:; } fornext_exit_4020:; do{ *_FUNC_IDE2_LONG_L=__STRING_IDET->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1211,"ide_methods.bas");}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(25753,1212,"ide_methods.bas");}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(25753,1213,"ide_methods.bas");}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(25753,1217,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1219,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1219,"ide_methods.bas");}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(25753,1219,"ide_methods.bas");}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(25753,1219,"ide_methods.bas");}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(25753,1219,"ide_methods.bas");}while(r); S_36874:; if ((*__LONG_IDEMERGEUNDO)||new_error){ if(qbevent){evnt(25753,1221,"ide_methods.bas");if(r)goto S_36874;} do{ *__LONG_IDEMERGEUNDO= 0 ; if(!qbevent)break;evnt(25753,1222,"ide_methods.bas");}while(r); S_36876:; if ((-(*_FUNC_IDE2_LONG_P2!=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,1223,"ide_methods.bas");if(r)goto S_36876;} S_36877:; if ((-(*_FUNC_IDE2_LONG_P2== 13 ))||new_error){ if(qbevent){evnt(25753,1224,"ide_methods.bas");if(r)goto S_36877;} do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_PLAST; if(!qbevent)break;evnt(25753,1225,"ide_methods.bas");}while(r); }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P2- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_PP2L,4,byte_element_4025),1); if(!qbevent)break;evnt(25753,1228,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_P2- 4 -*_FUNC_IDE2_LONG_PP2L- 4 ; if(!qbevent)break;evnt(25753,1229,"ide_methods.bas");}while(r); } } } S_36885:; if ((-(*_FUNC_IDE2_LONG_P1== 0 ))||new_error){ if(qbevent){evnt(25753,1234,"ide_methods.bas");if(r)goto S_36885;} do{ *_FUNC_IDE2_LONG_P1= 13 ; if(!qbevent)break;evnt(25753,1235,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P2= 13 ; if(!qbevent)break;evnt(25753,1235,"ide_methods.bas");}while(r); }else{ S_36889:; if ((-(*_FUNC_IDE2_LONG_P2>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,1237,"ide_methods.bas");if(r)goto S_36889;} S_36890:; if ((-(*_FUNC_IDE2_LONG_P2>=(*__LONG_IDEBACKUPSIZE* 1000000 )))||new_error){ if(qbevent){evnt(25753,1240,"ide_methods.bas");if(r)goto S_36890;} do{ *_FUNC_IDE2_LONG_PLAST=*_FUNC_IDE2_LONG_P2; if(!qbevent)break;evnt(25753,1243,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P2= 13 ; if(!qbevent)break;evnt(25753,1244,"ide_methods.bas");}while(r); S_36893:; 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(25753,1246,"ide_methods.bas");if(r)goto S_36893;} S_36894:; if ((-(*_FUNC_IDE2_LONG_P1==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(25753,1247,"ide_methods.bas");if(r)goto S_36894;} do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(25753,1247,"ide_methods.bas");}while(r); } do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P1,byte_element((uint64)_FUNC_IDE2_LONG_P1L,4,byte_element_4028),1); if(!qbevent)break;evnt(25753,1250,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P1=*_FUNC_IDE2_LONG_P1+ 4 +*_FUNC_IDE2_LONG_P1L+ 4 ; if(!qbevent)break;evnt(25753,1251,"ide_methods.bas");}while(r); dl_continue_4027:; } dl_exit_4027:; }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P2,byte_element((uint64)_FUNC_IDE2_LONG_P2L,4,byte_element_4029),1); if(!qbevent)break;evnt(25753,1257,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_P2+ 4 +*_FUNC_IDE2_LONG_P2L+ 4 ; if(!qbevent)break;evnt(25753,1258,"ide_methods.bas");}while(r); } }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P2,byte_element((uint64)_FUNC_IDE2_LONG_P2L,4,byte_element_4030),1); if(!qbevent)break;evnt(25753,1264,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OP2=*_FUNC_IDE2_LONG_P2; if(!qbevent)break;evnt(25753,1265,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P2=*_FUNC_IDE2_LONG_P2+ 4 +*_FUNC_IDE2_LONG_P2L+ 4 ; if(!qbevent)break;evnt(25753,1266,"ide_methods.bas");}while(r); S_36908:; 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(25753,1268,"ide_methods.bas");if(r)goto S_36908;} S_36909:; if ((-(*_FUNC_IDE2_LONG_P1==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(25753,1269,"ide_methods.bas");if(r)goto S_36909;} do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(25753,1269,"ide_methods.bas");}while(r); } S_36912:; if ((-(*_FUNC_IDE2_LONG_P1==*_FUNC_IDE2_LONG_PLAST))||new_error){ if(qbevent){evnt(25753,1271,"ide_methods.bas");if(r)goto S_36912;} do{ *_FUNC_IDE2_LONG_P1= 13 ; if(!qbevent)break;evnt(25753,1272,"ide_methods.bas");}while(r); do{ goto dl_exit_4032; if(!qbevent)break;evnt(25753,1273,"ide_methods.bas");}while(r); }else{ do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P1,byte_element((uint64)_FUNC_IDE2_LONG_P1L,4,byte_element_4033),1); if(!qbevent)break;evnt(25753,1275,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P1=*_FUNC_IDE2_LONG_P1+ 4 +*_FUNC_IDE2_LONG_P1L+ 4 ; if(!qbevent)break;evnt(25753,1276,"ide_methods.bas");}while(r); } dl_continue_4032:; } dl_exit_4032:; S_36920:; if ((-(*_FUNC_IDE2_LONG_P2>=(*__LONG_IDEBACKUPSIZE* 1000000 )))||new_error){ if(qbevent){evnt(25753,1280,"ide_methods.bas");if(r)goto S_36920;} do{ *_FUNC_IDE2_LONG_PLAST=*_FUNC_IDE2_LONG_OP2; if(!qbevent)break;evnt(25753,1283,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P2= 13 ; if(!qbevent)break;evnt(25753,1284,"ide_methods.bas");}while(r); S_36923:; 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(25753,1286,"ide_methods.bas");if(r)goto S_36923;} S_36924:; if ((-(*_FUNC_IDE2_LONG_P1==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(25753,1287,"ide_methods.bas");if(r)goto S_36924;} do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(25753,1287,"ide_methods.bas");}while(r); } do{ sub_get( 150 ,*_FUNC_IDE2_LONG_P1,byte_element((uint64)_FUNC_IDE2_LONG_P1L,4,byte_element_4036),1); if(!qbevent)break;evnt(25753,1290,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_P1=*_FUNC_IDE2_LONG_P1+ 4 +*_FUNC_IDE2_LONG_P1L+ 4 ; if(!qbevent)break;evnt(25753,1291,"ide_methods.bas");}while(r); dl_continue_4035:; } dl_exit_4035:; } } } 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(25753,1299,"ide_methods.bas");}while(r); do{ sub_put2( 150 , 1 ,byte_element((uint64)_FUNC_IDE2_STRING_H->chr,_FUNC_IDE2_STRING_H->len,byte_element_4037),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1300,"ide_methods.bas");}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_4038),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1303,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,1305,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOPOS=*_FUNC_IDE2_LONG_P2; if(!qbevent)break;evnt(25753,1307,"ide_methods.bas");}while(r); S_36938:; if ((-(*__LONG_IDEUNDOBASE== 0 ))||new_error){ if(qbevent){evnt(25753,1308,"ide_methods.bas");if(r)goto S_36938;} do{ *__LONG_IDEUNDOBASE=*__LONG_IDEUNDOPOS; if(!qbevent)break;evnt(25753,1308,"ide_methods.bas");}while(r); } S_36941:; if ((-(*__LONG_IDEUNDOFLAG== 0 ))||new_error){ if(qbevent){evnt(25753,1313,"ide_methods.bas");if(r)goto S_36941;} do{ *__LONG_IDEUNDOFLAG= 1 ; if(!qbevent)break;evnt(25753,1314,"ide_methods.bas");}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(25753,1315,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,func_chr( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1315,"ide_methods.bas");}while(r); do{ sub_put2( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_STRING_A->chr,_FUNC_IDE2_STRING_A->len,byte_element_4039),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1315,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,1315,"ide_methods.bas");}while(r); } }else{ do{ *__LONG_IDENOUNDO= 0 ; if(!qbevent)break;evnt(25753,1319,"ide_methods.bas");}while(r); } S_36951:; if ((-(*__LONG_IDEBUILDMODECHANGED== 0 ))||new_error){ if(qbevent){evnt(25753,1323,"ide_methods.bas");if(r)goto S_36951;} do{ *__LONG_IDEAUTORUN= 0 ; if(!qbevent)break;evnt(25753,1324,"ide_methods.bas");}while(r); } do{ *__LONG_IDEBUILDMODECHANGED= 0 ; if(!qbevent)break;evnt(25753,1326,"ide_methods.bas");}while(r); do{ *__LONG_IDECOMPILING= 1 ; if(!qbevent)break;evnt(25753,1328,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDE2= 2 ; if(!qbevent)break;evnt(25753,1329,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(&(pass4040= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1330,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1331,"ide_methods.bas");}while(r); do{ *__LONG_IDECOMPILEDLINE= 1 ; if(!qbevent)break;evnt(25753,1332,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,1333,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,1337,"ide_methods.bas");}while(r); LABEL_WAITFORINPUT:; if(qbevent){evnt(25753,1338,"ide_methods.bas");r=0;} S_36963:; if ((*__BYTE_STARTPAUSEDPENDING)||new_error){ if(qbevent){evnt(25753,1339,"ide_methods.bas");if(r)goto S_36963;} do{ goto LABEL_IDEMRUN; if(!qbevent)break;evnt(25753,1339,"ide_methods.bas");}while(r); } S_36966:; if ((*__LONG_IDECURRENTLINELAYOUTI)||new_error){ if(qbevent){evnt(25753,1340,"ide_methods.bas");if(r)goto S_36966;} S_36967:; if ((-(*__LONG_IDECY!=*__LONG_IDECURRENTLINELAYOUTI))||new_error){ if(qbevent){evnt(25753,1341,"ide_methods.bas");if(r)goto S_36967;} do{ SUB_IDESETLINE(__LONG_IDECURRENTLINELAYOUTI,__STRING_IDECURRENTLINELAYOUT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1342,"ide_methods.bas");}while(r); do{ *__LONG_IDECURRENTLINELAYOUTI= 0 ; if(!qbevent)break;evnt(25753,1343,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1344,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_EXITVALUE=func__exit(); if(!qbevent)break;evnt(25753,1348,"ide_methods.bas");}while(r); S_36974:; if (((-((*_FUNC_IDE2_LONG_EXITVALUE& 1 )!= 0 ))|(-(*__LONG_IDEEXIT!= 0 )))||new_error){ if(qbevent){evnt(25753,1349,"ide_methods.bas");if(r)goto S_36974;} do{ *__LONG_IDEEXIT= 0 ; if(!qbevent)break;evnt(25753,1349,"ide_methods.bas");}while(r); do{ goto LABEL_QUICKEXIT; if(!qbevent)break;evnt(25753,1349,"ide_methods.bas");}while(r); } do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,1351,"ide_methods.bas");}while(r); S_36979:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(25753,1352,"ide_methods.bas");if(r)goto S_36979;} do{ if(!qbevent)break;evnt(25753,1353,"ide_methods.bas");}while(r); S_36981:; if (((((-(*__LONG_MX!=*_FUNC_IDE2_LONG_MOX))|(-(*__LONG_MY!=*_FUNC_IDE2_LONG_MOY))))&(-(*__LONG_MB!= 0 )))||new_error){ if(qbevent){evnt(25753,1354,"ide_methods.bas");if(r)goto S_36981;} do{ *_FUNC_IDE2_LONG_MOX=*__LONG_MX; if(!qbevent)break;evnt(25753,1355,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_MOY=*__LONG_MY; if(!qbevent)break;evnt(25753,1356,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1357,"ide_methods.bas");}while(r); } S_36986:; if ((-(*__LONG_MB!=*__LONG_MOB))||new_error){ if(qbevent){evnt(25753,1359,"ide_methods.bas");if(r)goto S_36986;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1359,"ide_methods.bas");}while(r); } S_36989:; if ((-(*__LONG_MB2!=*__LONG_MOB2))||new_error){ if(qbevent){evnt(25753,1360,"ide_methods.bas");if(r)goto S_36989;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1360,"ide_methods.bas");}while(r); } S_36992:; if (((-(*__LONG_MCLICK!= 0 ))|(-(*__LONG_MCLICK2!= 0 )))||new_error){ if(qbevent){evnt(25753,1361,"ide_methods.bas");if(r)goto S_36992;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1361,"ide_methods.bas");}while(r); } S_36995:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,1362,"ide_methods.bas");if(r)goto S_36995;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1362,"ide_methods.bas");}while(r); } S_36998:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,1363,"ide_methods.bas");if(r)goto S_36998;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1363,"ide_methods.bas");}while(r); } S_37001:; if ((*__LONG_KSTATECHANGED)||new_error){ if(qbevent){evnt(25753,1364,"ide_methods.bas");if(r)goto S_37001;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1364,"ide_methods.bas");}while(r); } } S_37005:; if (((-(*__LONG_MB!= 0 ))&(-(*__LONG_IDEMBMONITOR== 1 )))||new_error){ if(qbevent){evnt(25753,1366,"ide_methods.bas");if(r)goto S_37005;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,1366,"ide_methods.bas");}while(r); } S_37008:; if ((-(*__LONG_MB== 0 ))||new_error){ if(qbevent){evnt(25753,1367,"ide_methods.bas");if(r)goto S_37008;} do{ *__LONG_IDEMOUSESELECT= 0 ; if(!qbevent)break;evnt(25753,1367,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 0 ; if(!qbevent)break;evnt(25753,1367,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT= 0 ; if(!qbevent)break;evnt(25753,1367,"ide_methods.bas");}while(r); } S_37013:; if ((func__resize())||new_error){ if(qbevent){evnt(25753,1369,"ide_methods.bas");if(r)goto S_37013;} do{ *_FUNC_IDE2_LONG_FORCERESIZE= -1 ; if(!qbevent)break;evnt(25753,1370,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,1370,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,1370,"ide_methods.bas");}while(r); } S_37018:; if ((*__BYTE_IDE_AUTOPOSITION)||new_error){ if(qbevent){evnt(25753,1373,"ide_methods.bas");if(r)goto S_37018;} S_37019:; if (((-(*__INTEGER_IDE_TOPPOSITION!=func__screeny()))|(-(*__INTEGER_IDE_LEFTPOSITION!=func__screenx())))||new_error){ if(qbevent){evnt(25753,1374,"ide_methods.bas");if(r)goto S_37019;} S_37020:; if (((-((func__screeny())>=((-(func__height(NULL,0)))*(func__fontheight(NULL,0)))))&(-((func__screenx())>=((-(func__width(NULL,0)))*(func__fontwidth(NULL,0))))))||new_error){ if(qbevent){evnt(25753,1375,"ide_methods.bas");if(r)goto S_37020;} do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_TopPosition",15),qbs_str((int32)(func__screeny()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1376,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_LeftPosition",16),qbs_str((int32)(func__screenx()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1377,"ide_methods.bas");}while(r); do{ *__INTEGER_IDE_TOPPOSITION=func__screeny(); if(!qbevent)break;evnt(25753,1378,"ide_methods.bas");}while(r); do{ *__INTEGER_IDE_LEFTPOSITION=func__screenx(); if(!qbevent)break;evnt(25753,1378,"ide_methods.bas");}while(r); } } } S_37028:; if ((-(func__totaldroppedfiles()> 0 ))||new_error){ if(qbevent){evnt(25753,1383,"ide_methods.bas");if(r)goto S_37028;} S_37029:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(func__droppedfile( 1 ,1))))||new_error){ if(qbevent){evnt(25753,1384,"ide_methods.bas");if(r)goto S_37029;} do{ qbs_set(__STRING_IDEOPENFILE,func__droppedfile( 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1385,"ide_methods.bas");}while(r); do{ sub__finishdrop(); if(!qbevent)break;evnt(25753,1386,"ide_methods.bas");}while(r); do{ goto LABEL_CTRLOPEN; if(!qbevent)break;evnt(25753,1387,"ide_methods.bas");}while(r); } do{ sub__finishdrop(); if(!qbevent)break;evnt(25753,1389,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_UPDATEHOVER= 0 ; if(!qbevent)break;evnt(25753,1393,"ide_methods.bas");}while(r); S_37037:; if ((-(*__LONG_QUICKNAVTOTAL> 0 ))||new_error){ if(qbevent){evnt(25753,1394,"ide_methods.bas");if(r)goto S_37037;} S_37038:; while((!(-(*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+12))<=*__LONG_IDEN)))||new_error){ if(qbevent){evnt(25753,1395,"ide_methods.bas");if(r)goto S_37038;} do{ *__LONG_QUICKNAVTOTAL=*__LONG_QUICKNAVTOTAL- 1 ; if(!qbevent)break;evnt(25753,1397,"ide_methods.bas");}while(r); S_37040:; if ((-(*__LONG_QUICKNAVTOTAL== 0 ))||new_error){ if(qbevent){evnt(25753,1398,"ide_methods.bas");if(r)goto S_37040;} do{ goto dl_exit_4041; if(!qbevent)break;evnt(25753,1398,"ide_methods.bas");}while(r); } dl_continue_4041:; } dl_exit_4041:; } S_37045:; if (((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_QUICKNAVTOTAL> 0 ))&*__BYTE_ENABLEQUICKNAV)||new_error){ if(qbevent){evnt(25753,1402,"ide_methods.bas");if(r)goto S_37045;} S_37046:; if ((-(*__LONG_MY== 2 ))||new_error){ if(qbevent){evnt(25753,1403,"ide_methods.bas");if(r)goto S_37046;} S_37047:; if (((-(*__LONG_MX>= 4 ))&(-(*__LONG_MX<= 6 )))||new_error){ if(qbevent){evnt(25753,1404,"ide_methods.bas");if(r)goto S_37047;} S_37048:; if ((-(*_FUNC_IDE2_BYTE_QUICKNAVHOVER== 0 ))||new_error){ if(qbevent){evnt(25753,1405,"ide_methods.bas");if(r)goto S_37048;} do{ *_FUNC_IDE2_BYTE_QUICKNAVHOVER= -1 ; if(!qbevent)break;evnt(25753,1406,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,1407,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_POPUP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_chr( 17 )),qbs_new_txt_len(" back to line ",14)),FUNC_STR2((int32*)(void*)( ((char*)(__ARRAY_UDT_QUICKNAVHISTORY[0])) + ((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+12) ))),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1408,"ide_methods.bas");}while(r); do{ sub__printstring( 4 , 2 ,_FUNC_IDE2_STRING_POPUP,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1409,"ide_methods.bas");}while(r); do{ qbg_sub_color( 2 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,1412,"ide_methods.bas");}while(r); S_37054:; fornext_value4043= 6 ; fornext_finalvalue4043= 4 +_FUNC_IDE2_STRING_POPUP->len; fornext_step4043= 1 ; if (fornext_step4043<0) fornext_step_negative4043=1; else fornext_step_negative4043=0; if (new_error) goto fornext_error4043; goto fornext_entrylabel4043; while(1){ fornext_value4043=fornext_step4043+(*_FUNC_IDE2_LONG_X2); fornext_entrylabel4043: *_FUNC_IDE2_LONG_X2=fornext_value4043; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4043){ if (fornext_value4043fornext_finalvalue4043) break; } fornext_error4043:; if(qbevent){evnt(25753,1413,"ide_methods.bas");if(r)goto S_37054;} do{ sub__printstring(*_FUNC_IDE2_LONG_X2, 3 ,func_chr(func_screen( 3 ,*_FUNC_IDE2_LONG_X2,NULL,0)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1414,"ide_methods.bas");}while(r); fornext_continue_4042:; } fornext_exit_4042:; do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1416,"ide_methods.bas");}while(r); } S_37059:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,1419,"ide_methods.bas");if(r)goto S_37059;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,1420,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+12)); if(!qbevent)break;evnt(25753,1421,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+8)); if(!qbevent)break;evnt(25753,1422,"ide_methods.bas");}while(r); do{ *__LONG_IDESX=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16)); if(!qbevent)break;evnt(25753,1423,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,1424,"ide_methods.bas");}while(r); do{ *__LONG_QUICKNAVTOTAL=*__LONG_QUICKNAVTOTAL- 1 ; if(!qbevent)break;evnt(25753,1425,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,1426,"ide_methods.bas");}while(r); } }else{ do{ goto LABEL_RESTOREBGQUICKNAV; if(!qbevent)break;evnt(25753,1429,"ide_methods.bas");}while(r); } }else{ LABEL_RESTOREBGQUICKNAV:; if(qbevent){evnt(25753,1432,"ide_methods.bas");r=0;} S_37072:; if ((-(*_FUNC_IDE2_BYTE_QUICKNAVHOVER== -1 ))||new_error){ if(qbevent){evnt(25753,1433,"ide_methods.bas");if(r)goto S_37072;} do{ *_FUNC_IDE2_BYTE_QUICKNAVHOVER= 0 ; if(!qbevent)break;evnt(25753,1434,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,1435,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=21; if (next_return_point>=return_points) more_return_points(); goto LABEL_DRAWQUICKNAV; RETURN_21:; if(!qbevent)break;evnt(25753,1436,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,1437,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1438,"ide_methods.bas");}while(r); } } } S_37081:; if (((-(*__LONG_MY==(*__LONG_IDEWY- 4 )))&(-(*__LONG_MX>(*__LONG_IDEWX-( 20 + 10 ))))&(-(*__LONG_MX<=(*__LONG_IDEWX-( 20 + 8 )+ 2 ))))||new_error){ if(qbevent){evnt(25753,1443,"ide_methods.bas");if(r)goto S_37081;} S_37082:; if ((-(*_FUNC_IDE2_BYTE_FINDFIELDHOVER== 0 ))||new_error){ if(qbevent){evnt(25753,1444,"ide_methods.bas");if(r)goto S_37082;} do{ qbg_sub_color( 1 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,1446,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX-( 20 + 9 ),*__LONG_IDEWY- 4 ,qbs_new_txt_len("Find",4),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1447,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1448,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_FINDFIELDHOVER= -1 ; if(!qbevent)break;evnt(25753,1449,"ide_methods.bas");}while(r); } }else{ S_37089:; if ((-(*_FUNC_IDE2_BYTE_FINDFIELDHOVER== -1 ))||new_error){ if(qbevent){evnt(25753,1452,"ide_methods.bas");if(r)goto S_37089;} do{ *_FUNC_IDE2_BYTE_FINDFIELDHOVER= 0 ; if(!qbevent)break;evnt(25753,1454,"ide_methods.bas");}while(r); do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1455,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX-( 20 + 9 ),*__LONG_IDEWY- 4 ,qbs_new_txt_len("Find",4),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1456,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1457,"ide_methods.bas");}while(r); } } S_37096:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_MY==(*__LONG_IDEWY+*__LONG_IDESUBWINDOW)))&(-(*__LONG_MX>=(*__LONG_IDEWX- 21 -__STRING_VERSIONSTRINGSTATUS->len)))&(-(*__LONG_MX<(*__LONG_IDEWX- 21 )))))||new_error){ if(qbevent){evnt(25753,1461,"ide_methods.bas");if(r)goto S_37096;} S_37097:; if ((-(*_FUNC_IDE2_BYTE_VERSIONINFOHOVER== 0 ))||new_error){ if(qbevent){evnt(25753,1463,"ide_methods.bas");if(r)goto S_37097;} do{ qbg_sub_color( 13 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,1464,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 21 -__STRING_VERSIONSTRINGSTATUS->len,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_VERSIONSTRINGSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1465,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1466,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_VERSIONINFOHOVER= -1 ; if(!qbevent)break;evnt(25753,1467,"ide_methods.bas");}while(r); } S_37103:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,1469,"ide_methods.bas");if(r)goto S_37103;} do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,1469,"ide_methods.bas");}while(r); do{ goto LABEL_HELPABOUT; if(!qbevent)break;evnt(25753,1469,"ide_methods.bas");}while(r); } }else{ S_37108:; if ((-(*_FUNC_IDE2_BYTE_VERSIONINFOHOVER== -1 ))||new_error){ if(qbevent){evnt(25753,1471,"ide_methods.bas");if(r)goto S_37108;} do{ *_FUNC_IDE2_BYTE_VERSIONINFOHOVER= 0 ; if(!qbevent)break;evnt(25753,1473,"ide_methods.bas");}while(r); do{ qbg_sub_color( 2 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,1474,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 21 -__STRING_VERSIONSTRINGSTATUS->len,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_VERSIONSTRINGSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1475,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1476,"ide_methods.bas");}while(r); } } S_37115:; if (((-(*__LONG_MY==(*__LONG_IDEWY+*__LONG_IDESUBWINDOW)))&(-(*__LONG_MX>=(*__LONG_IDEWX- 20 )))&(-(*__LONG_MX<=*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,1480,"ide_methods.bas");if(r)goto S_37115;} S_37116:; if ((-(*_FUNC_IDE2_BYTE_LINENUMBERHOVER== 0 ))||new_error){ if(qbevent){evnt(25753,1482,"ide_methods.bas");if(r)goto S_37116;} do{ qbg_sub_color( 13 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,1483,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 20 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_LINENUMBERSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1484,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_LINENUMBERHOVER= -1 ; if(!qbevent)break;evnt(25753,1485,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1486,"ide_methods.bas");}while(r); } S_37122:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,1488,"ide_methods.bas");if(r)goto S_37122;} do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,1489,"ide_methods.bas");}while(r); do{ SUB_IDEGOTOBOX(); if(!qbevent)break;evnt(25753,1490,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1491,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1491,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,1492,"ide_methods.bas");}while(r); } }else{ S_37130:; if ((-(*_FUNC_IDE2_BYTE_LINENUMBERHOVER== -1 ))||new_error){ if(qbevent){evnt(25753,1495,"ide_methods.bas");if(r)goto S_37130;} do{ *_FUNC_IDE2_BYTE_LINENUMBERHOVER= 0 ; if(!qbevent)break;evnt(25753,1497,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,1498,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 20 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_LINENUMBERSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1499,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UPDATEHOVER= -1 ; if(!qbevent)break;evnt(25753,1500,"ide_methods.bas");}while(r); } } S_37137:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))|(-(*__LONG_MACOSX== 1 ))))||new_error){ if(qbevent){evnt(25753,1504,"ide_methods.bas");if(r)goto S_37137;} S_37138:; if ((func__hasfocus())||new_error){ if(qbevent){evnt(25753,1505,"ide_methods.bas");if(r)goto S_37138;} do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1506,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,1507,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1); if(!qbevent)break;evnt(25753,1508,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1510,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,1511,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,1512,"ide_methods.bas");}while(r); } } S_37148:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(25753,1516,"ide_methods.bas");if(r)goto S_37148;} S_37149:; if (((-(*__LONG_IDEALTHIGHLIGHT== 0 ))&(-(*__LONG_KALTPRESS== -1 ))&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,1518,"ide_methods.bas");if(r)goto S_37149;} do{ *__LONG_IDEALTHIGHLIGHT= 1 ; if(!qbevent)break;evnt(25753,1520,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1521,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,1521,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(25753,1521,"ide_methods.bas");}while(r); S_37154:; fornext_value4049= 1 ; fornext_finalvalue4049=*__INTEGER_MENUS; fornext_step4049= 1 ; if (fornext_step4049<0) fornext_step_negative4049=1; else fornext_step_negative4049=0; if (new_error) goto fornext_error4049; goto fornext_entrylabel4049; while(1){ fornext_value4049=fornext_step4049+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4049: *_FUNC_IDE2_LONG_I=fornext_value4049; if (fornext_step_negative4049){ if (fornext_value4049fornext_finalvalue4049) break; } fornext_error4049:; if(qbevent){evnt(25753,1522,"ide_methods.bas");if(r)goto S_37154;} do{ sub__printstring(*_FUNC_IDE2_LONG_X, 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 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1523,"ide_methods.bas");}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(25753,1524,"ide_methods.bas");}while(r); S_37157:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(25753,1525,"ide_methods.bas");if(r)goto S_37157;} 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(25753,1525,"ide_methods.bas");}while(r); } fornext_continue_4048:; } fornext_exit_4048:; do{ *__LONG_IDEENTERMENU= 1 ; if(!qbevent)break;evnt(25753,1527,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,1529,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,1529,"ide_methods.bas");}while(r); } }else{ S_37166:; if ((-(*__LONG_IDEALTHIGHLIGHT== 1 ))||new_error){ if(qbevent){evnt(25753,1533,"ide_methods.bas");if(r)goto S_37166;} do{ *__LONG_IDEALTHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,1535,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1536,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,1536,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1536,"ide_methods.bas");}while(r); S_37171:; if (((-(*__LONG_IDEENTERMENU== 1 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(25753,1537,"ide_methods.bas");if(r)goto S_37171;} S_37172:; if ((qbs_cleanup(qbs_tmp_base,(func__hasfocus())|(qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3)))))||new_error){ if(qbevent){evnt(25753,1538,"ide_methods.bas");if(r)goto S_37172;} do{ qbg_sub_locate(NULL,NULL,NULL,*__LONG_IDENORMALCURSORSTART,*__LONG_IDENORMALCURSOREND,24); if(!qbevent)break;evnt(25753,1539,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,1540,"ide_methods.bas");}while(r); do{ *__LONG_IDEENTERMENU= 0 ; if(!qbevent)break;evnt(25753,1541,"ide_methods.bas");}while(r); do{ goto LABEL_STARTMENU; if(!qbevent)break;evnt(25753,1542,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,1544,"ide_methods.bas");}while(r); } } } } S_37183:; if ((*_FUNC_IDE2_LONG_UPDATEHOVER)||new_error){ if(qbevent){evnt(25753,1551,"ide_methods.bas");if(r)goto S_37183;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1551,"ide_methods.bas");}while(r); } S_37186:; if ((-(*_FUNC_IDE2_LONG_CHANGE== 0 ))||new_error){ if(qbevent){evnt(25753,1553,"ide_methods.bas");if(r)goto S_37186;} S_37187:; if ((*__LONG_IDECOMPILING)||new_error){ if(qbevent){evnt(25753,1556,"ide_methods.bas");if(r)goto S_37187;} S_37188:; if ((*_FUNC_IDE2_LONG_SENDNEXTLINE)||new_error){ if(qbevent){evnt(25753,1557,"ide_methods.bas");if(r)goto S_37188;} S_37189:; if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,1558,"ide_methods.bas");if(r)goto S_37189;} do{ *__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ; if(!qbevent)break;evnt(25753,1559,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDE2= 4 ; if(!qbevent)break;evnt(25753,1560,"ide_methods.bas");}while(r); S_37192:; if ((*_FUNC_IDE2_LONG_PASSBACK)||new_error){ if(qbevent){evnt(25753,1561,"ide_methods.bas");if(r)goto S_37192;} do{ qbs_set(__STRING_IDECOMPILEDLINE,_FUNC_IDE2_STRING_PASSBACK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1562,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1563,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1565,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1566,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,1568,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_IDE2= 5 ; if(!qbevent)break;evnt(25753,1571,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,1575,"ide_methods.bas");}while(r); } } } do{ sub__limit( 16 ); if(!qbevent)break;evnt(25753,1580,"ide_methods.bas");}while(r); do{ goto LABEL_WAITFORINPUT; if(!qbevent)break;evnt(25753,1581,"ide_methods.bas");}while(r); } do{ *__LONG_IDEENTERMENU= 0 ; if(!qbevent)break;evnt(25753,1584,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO- 1 ; if(!qbevent)break;evnt(25753,1586,"ide_methods.bas");}while(r); S_37211:; if ((-(*__LONG_IDEUNDOCOMBO< 0 ))||new_error){ if(qbevent){evnt(25753,1587,"ide_methods.bas");if(r)goto S_37211;} do{ *__LONG_IDEUNDOCOMBO= 0 ; if(!qbevent)break;evnt(25753,1587,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,1589,"ide_methods.bas");}while(r); S_37215:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,1593,"ide_methods.bas");if(r)goto S_37215;} S_37216:; if (((-(*__LONG_MX>= 2 ))&(-(*__LONG_MX<=*__LONG_IDEWX))&(-(*__LONG_MY>=(*__LONG_IDEWY- 3 )))&(-(*__LONG_MY<=(*__LONG_IDEWY- 1 ))))||new_error){ if(qbevent){evnt(25753,1594,"ide_methods.bas");if(r)goto S_37216;} S_37217:; if ((-((func_screen(*__LONG_MY,*__LONG_MX, 1 ,1))==(( 11 )+( 1 * 16 ))))||new_error){ if(qbevent){evnt(25753,1595,"ide_methods.bas");if(r)goto S_37217;} S_37218:; if(qbevent){evnt(25753,1597,"ide_methods.bas");if(r)goto S_37218;} S_37219:; if (((*__INTEGER_STATUSAREALINK==( 1 )))||new_error){ if(qbevent){evnt(25753,1598,"ide_methods.bas");if(r)goto S_37219;} S_37220:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,1600,"ide_methods.bas");if(r)goto S_37220;} do{ sub_shell3(FUNC_QUOTEDFILENAME(__STRING_COMPILELOG),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1601,"ide_methods.bas");}while(r); S_37222:; }else{ if (qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))){ if(qbevent){evnt(25753,1602,"ide_methods.bas");if(r)goto S_37222;} do{ sub_shell3(qbs_add(qbs_new_txt_len("open ",5),FUNC_QUOTEDFILENAME(__STRING_COMPILELOG)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1603,"ide_methods.bas");}while(r); }else{ do{ sub_shell3(qbs_add(qbs_new_txt_len("xdg-open ",9),FUNC_QUOTEDFILENAME(__STRING_COMPILELOG)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1605,"ide_methods.bas");}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1607,"ide_methods.bas");}while(r); sc_ec_191_end:; goto sc_4052_end; } S_37228:; if (((*__INTEGER_STATUSAREALINK==( 2 )))||new_error){ if(qbevent){evnt(25753,1608,"ide_methods.bas");if(r)goto S_37228;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,1610,"ide_methods.bas");}while(r); do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,1611,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDEFOCUSLINE; if(!qbevent)break;evnt(25753,1612,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,1613,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1614,"ide_methods.bas");}while(r); sc_ec_192_end:; goto sc_4052_end; } S_37234:; if (((*__INTEGER_STATUSAREALINK==( 3 )))||new_error){ if(qbevent){evnt(25753,1615,"ide_methods.bas");if(r)goto S_37234;} S_37235:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,1617,"ide_methods.bas");if(r)goto S_37235;} do{ sub_shell3(qbs_add(qbs_new_txt_len("explorer /select,",17),FUNC_QUOTEDFILENAME(__STRING_LASTBINARYGENERATED)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1618,"ide_methods.bas");}while(r); S_37237:; }else{ if (qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))){ if(qbevent){evnt(25753,1619,"ide_methods.bas");if(r)goto S_37237;} do{ sub_shell3(qbs_add(qbs_new_txt_len("open ",5),FUNC_QUOTEDFILENAME(__STRING_PATH__ASCII_CHR_046__EXE)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1620,"ide_methods.bas");}while(r); }else{ do{ sub_shell3(qbs_add(qbs_new_txt_len("xdg-open ",9),FUNC_QUOTEDFILENAME(__STRING_PATH__ASCII_CHR_046__EXE)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1622,"ide_methods.bas");}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1624,"ide_methods.bas");}while(r); sc_ec_193_end:; goto sc_4052_end; } S_37243:; if (((*__INTEGER_STATUSAREALINK==( 4 )))||new_error){ if(qbevent){evnt(25753,1625,"ide_methods.bas");if(r)goto S_37243;} do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEWARNINGBOX(); if(!qbevent)break;evnt(25753,1627,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1629,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1629,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1630,"ide_methods.bas");}while(r); sc_ec_194_end:; goto sc_4052_end; } sc_4052_end:; } } } S_37252:; if (((-(*__LONG_KB== 16640 ))|(-(*__LONG_KB== 16896 )))||new_error){ if(qbevent){evnt(25753,1636,"ide_methods.bas");if(r)goto S_37252;} do{ goto LABEL_STARTPAUSEDMENUHANDLER; if(!qbevent)break;evnt(25753,1637,"ide_methods.bas");}while(r); } S_37255:; if ((-(*__LONG_KB== 17152 ))||new_error){ if(qbevent){evnt(25753,1640,"ide_methods.bas");if(r)goto S_37255;} do{ goto LABEL_TOGGLEBREAKPOINT; if(!qbevent)break;evnt(25753,1641,"ide_methods.bas");}while(r); } S_37258:; if ((-(*__LONG_KB== 17408 ))||new_error){ if(qbevent){evnt(25753,1644,"ide_methods.bas");if(r)goto S_37258;} S_37259:; if ((*__LONG_KCTRL)||new_error){ if(qbevent){evnt(25753,1645,"ide_methods.bas");if(r)goto S_37259;} do{ goto LABEL_UNSKIPALLLINES; if(!qbevent)break;evnt(25753,1646,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_CLEARALLBREAKPOINTS; if(!qbevent)break;evnt(25753,1648,"ide_methods.bas");}while(r); } } S_37265:; if ((-(*__LONG_KB== 34048 ))||new_error){ if(qbevent){evnt(25753,1652,"ide_methods.bas");if(r)goto S_37265;} LABEL_IDEMEXE:; if(qbevent){evnt(25753,1653,"ide_methods.bas");r=0;} do{ *__LONG_IDERUNMODE= 2 ; if(!qbevent)break;evnt(25753,1654,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMRUNSPECIAL; if(!qbevent)break;evnt(25753,1655,"ide_methods.bas");}while(r); } S_37269:; if ((-(*__LONG_KB== 34304 ))||new_error){ if(qbevent){evnt(25753,1658,"ide_methods.bas");if(r)goto S_37269;} S_37270:; if ((-(*__LONG_CALLSTACKLENGTH> 0 ))||new_error){ if(qbevent){evnt(25753,1659,"ide_methods.bas");if(r)goto S_37270;} do{ goto LABEL_SHOWCALLSTACKDIALOG; if(!qbevent)break;evnt(25753,1660,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("$DEBUG MODE",11),qbs_new_txt_len("No call stack log available.",28),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1662,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1663,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1663,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,1664,"ide_methods.bas");}while(r); } } S_37279:; if ((-(*__LONG_KB== 15872 ))||new_error){ if(qbevent){evnt(25753,1668,"ide_methods.bas");if(r)goto S_37279;} do{ goto LABEL_SHOWWATCHLIST; if(!qbevent)break;evnt(25753,1669,"ide_methods.bas");}while(r); } S_37282:; if ((-(*__LONG_KB== 16128 ))||new_error){ if(qbevent){evnt(25753,1672,"ide_methods.bas");if(r)goto S_37282;} do{ *__LONG_STARTPAUSED= 0 ; if(!qbevent)break;evnt(25753,1673,"ide_methods.bas");}while(r); LABEL_IDEMRUN:; if(qbevent){evnt(25753,1674,"ide_methods.bas");r=0;} do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,1675,"ide_methods.bas");}while(r); do{ *__LONG_IDERUNMODE= 1 ; if(!qbevent)break;evnt(25753,1676,"ide_methods.bas");}while(r); LABEL_IDEMRUNSPECIAL:; if(qbevent){evnt(25753,1677,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_BYTE_IDECOMPILATIONREQUESTED= -1 ; if(!qbevent)break;evnt(25753,1679,"ide_methods.bas");}while(r); S_37287:; if ((-(*__BYTE_EXETOSOURCEFOLDERFIRSTTIMEMSG== 0 ))||new_error){ if(qbevent){evnt(25753,1681,"ide_methods.bas");if(r)goto S_37287;} S_37288:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(25753,1682,"ide_methods.bas");if(r)goto S_37288;} do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Run",3),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Your program will be compiled to the same folder where your",59),func_chr( 10 )),qbs_new_txt_len("source code is saved. You can change that by unchecking the",59)),func_chr( 10 )),qbs_new_txt_len("option 'Output EXE to Source Folder' in the Run menu.",53)),qbs_new_txt_len("#OK;#Don't show this again;#Cancel",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1685,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Run",3),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Your program will be compiled to your 'qb64pe' folder. You can",62),func_chr( 10 )),qbs_new_txt_len("change that by checking the option 'Output EXE to Source",56)),func_chr( 10 )),qbs_new_txt_len("Folder' in the Run menu.",24)),qbs_new_txt_len("#OK;#Don't show this again;#Cancel",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1689,"ide_methods.bas");}while(r); } S_37293:; if ((-(*_FUNC_IDE2_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(25753,1691,"ide_methods.bas");if(r)goto S_37293;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ExeToSourceFolderFirstTimeMsg",29),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1692,"ide_methods.bas");}while(r); do{ *__BYTE_EXETOSOURCEFOLDERFIRSTTIMEMSG= -1 ; if(!qbevent)break;evnt(25753,1693,"ide_methods.bas");}while(r); S_37296:; }else{ if (-(*_FUNC_IDE2_LONG_RESULT== 3 )){ if(qbevent){evnt(25753,1694,"ide_methods.bas");if(r)goto S_37296;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1695,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1695,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1696,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4053= 0 )); if(!qbevent)break;evnt(25753,1697,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Compilation request canceled.",29),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1698,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1699,"ide_methods.bas");}while(r); } } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1702,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,1702,"ide_methods.bas");}while(r); S_37307:; if (((-(*_FUNC_IDE2_LONG_READY!= 0 ))&(-(*__INTEGER_IDECHANGEMADE== 0 )))||new_error){ if(qbevent){evnt(25753,1705,"ide_methods.bas");if(r)goto S_37307;} do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1707,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4054= 0 )); if(!qbevent)break;evnt(25753,1708,"ide_methods.bas");}while(r); S_37310:; if ((*__INTEGER_NOEXESAVED)||new_error){ if(qbevent){evnt(25753,1709,"ide_methods.bas");if(r)goto S_37310;} do{ *__LONG_IDECOMPILED= 0 ; if(!qbevent)break;evnt(25753,1709,"ide_methods.bas");}while(r); do{ goto LABEL_MUSTGENERATEEXE; if(!qbevent)break;evnt(25753,1709,"ide_methods.bas");}while(r); } S_37314:; if ((*__LONG_IDECOMPILED)||new_error){ if(qbevent){evnt(25753,1710,"ide_methods.bas");if(r)goto S_37314;} S_37315:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDERUNMODE== 2 ))&(func__fileexists(__STRING_LASTBINARYGENERATED))))||new_error){ if(qbevent){evnt(25753,1712,"ide_methods.bas");if(r)goto S_37315;} S_37316:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,1713,"ide_methods.bas");if(r)goto S_37316;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Already created executable file!",32),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1714,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Already created .EXE file!",26),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1716,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1719,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LOCATION,__STRING_LASTBINARYGENERATED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1720,"ide_methods.bas");}while(r); S_37323:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_PATH__ASCII_CHR_046__EXE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,1721,"ide_methods.bas");if(r)goto S_37323;} do{ qbs_set(_FUNC_IDE2_STRING_LOCATION,qbs_add(qbs_add(func__startdir(),__STRING1_PATHSEP),_FUNC_IDE2_STRING_LOCATION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1721,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_new_txt_len("Location: ",10),_FUNC_IDE2_STRING_LOCATION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1722,"ide_methods.bas");}while(r); S_37327:; if ((qbs_cleanup(qbs_tmp_base,-(( 2 +_FUNC_IDE2_STRING_MSG->len)>*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,1723,"ide_methods.bas");if(r)goto S_37327;} do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_add(qbs_new_txt_len("Location: ",10),func_string( 3 , 250 )),qbs_right(_FUNC_IDE2_STRING_LOCATION,*__LONG_IDEWX- 15 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1724,"ide_methods.bas");}while(r); } do{ sub__printstring( 2 ,*__LONG_IDEWY- 2 ,_FUNC_IDE2_STRING_MSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1726,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 3 ; if(!qbevent)break;evnt(25753,1727,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1730,"ide_methods.bas");}while(r); S_37333:; }else{ if (qbs_cleanup(qbs_tmp_base,-(func__fileexists(__STRING_LASTBINARYGENERATED)== 0 ))){ if(qbevent){evnt(25753,1731,"ide_methods.bas");if(r)goto S_37333;} do{ *__LONG_IDECOMPILED= 0 ; if(!qbevent)break;evnt(25753,1732,"ide_methods.bas");}while(r); do{ goto LABEL_MUSTGENERATEEXE; if(!qbevent)break;evnt(25753,1733,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4056= 1 )); if(!qbevent)break;evnt(25753,1736,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BKPIDESYSTEM=*__LONG_IDESYSTEM; if(!qbevent)break;evnt(25753,1737,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(25753,1737,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,1737,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM=*_FUNC_IDE2_LONG_BKPIDESYSTEM; if(!qbevent)break;evnt(25753,1737,"ide_methods.bas");}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,1738,"ide_methods.bas");}while(r); do{ sub__printstring((*__LONG_IDEWX- 8 )/ ((long double)( 2 )),*__LONG_IDEWY- 4 ,qbs_new_txt_len(" Status ",8),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1738,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1739,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Starting program...",19),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1740,"ide_methods.bas");}while(r); }else{ LABEL_MUSTGENERATEEXE:; if(qbevent){evnt(25753,1742,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4057= 1 )); if(!qbevent)break;evnt(25753,1743,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BKPIDESYSTEM=*__LONG_IDESYSTEM; if(!qbevent)break;evnt(25753,1744,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(25753,1744,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,1744,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM=*_FUNC_IDE2_LONG_BKPIDESYSTEM; if(!qbevent)break;evnt(25753,1744,"ide_methods.bas");}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,1745,"ide_methods.bas");}while(r); do{ sub__printstring((*__LONG_IDEWX- 8 )/ ((long double)( 2 )),*__LONG_IDEWY- 4 ,qbs_new_txt_len(" Status ",8),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1745,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,1746,"ide_methods.bas");}while(r); S_37355:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,1747,"ide_methods.bas");if(r)goto S_37355;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Creating executable file...",27),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1748,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Creating .EXE file...",21),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1750,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1754,"ide_methods.bas");}while(r); S_37362:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,1758,"ide_methods.bas");if(r)goto S_37362;} 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(25753,1759,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_F,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1761,"ide_methods.bas");}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(25753,1762,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_IDE2= 9 ; if(!qbevent)break;evnt(25753,1764,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDERETURN,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1764,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,1765,"ide_methods.bas");}while(r); } S_37372:; if ((-(*_FUNC_IDE2_LONG_FAILED== 1 ))||new_error){ if(qbevent){evnt(25753,1768,"ide_methods.bas");if(r)goto S_37372;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1768,"ide_methods.bas");}while(r); } do{ *__LONG_IDEAUTORUN= 1 ; if(!qbevent)break;evnt(25753,1770,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1773,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4058= 0 )); if(!qbevent)break;evnt(25753,1774,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Checking program... (editing program will cancel request)",57),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1776,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,1779,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1780,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1781,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1783,"ide_methods.bas");}while(r); } do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,1786,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL,NULL,*__LONG_IDENORMALCURSORSTART,*__LONG_IDENORMALCURSOREND,24); if(!qbevent)break;evnt(25753,1787,"ide_methods.bas");}while(r); S_37386:; if ((((*__LONG_MCLICK|*__LONG_MCLICK2))&(-(*__LONG_IDEMOUSESELECT== 0 )))||new_error){ if(qbevent){evnt(25753,1789,"ide_methods.bas");if(r)goto S_37386;} S_37387:; if ((-(*__LONG_MY== 1 ))||new_error){ if(qbevent){evnt(25753,1790,"ide_methods.bas");if(r)goto S_37387;} do{ *_FUNC_IDE2_LONG_X= 3 ; if(!qbevent)break;evnt(25753,1791,"ide_methods.bas");}while(r); S_37389:; fornext_value4060= 1 ; fornext_finalvalue4060=*__INTEGER_MENUS; fornext_step4060= 1 ; if (fornext_step4060<0) fornext_step_negative4060=1; else fornext_step_negative4060=0; if (new_error) goto fornext_error4060; goto fornext_entrylabel4060; while(1){ fornext_value4060=fornext_step4060+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4060: *_FUNC_IDE2_LONG_I=fornext_value4060; if (fornext_step_negative4060){ if (fornext_value4060fornext_finalvalue4060) break; } fornext_error4060:; if(qbevent){evnt(25753,1792,"ide_methods.bas");if(r)goto S_37389;} 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(25753,1793,"ide_methods.bas");}while(r); S_37391:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2))))||new_error){ if(qbevent){evnt(25753,1794,"ide_methods.bas");if(r)goto S_37391;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,1795,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,1796,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(25753,1798,"ide_methods.bas");}while(r); S_37396:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(25753,1799,"ide_methods.bas");if(r)goto S_37396;} 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(25753,1799,"ide_methods.bas");}while(r); } fornext_continue_4059:; } fornext_exit_4059:; } } S_37402:; fornext_value4064= 1 ; fornext_finalvalue4064=*__INTEGER_MENUS; 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_IDE2_LONG_I); fornext_entrylabel4064: *_FUNC_IDE2_LONG_I=fornext_value4064; if (fornext_step_negative4064){ if (fornext_value4064fornext_finalvalue4064) break; } fornext_error4064:; if(qbevent){evnt(25753,1804,"ide_methods.bas");if(r)goto S_37402;} 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(25753,1805,"ide_methods.bas");}while(r); S_37404:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KALT&(qbs_equal(qbs_ucase(__STRING_K),_FUNC_IDE2_STRING_A))))||new_error){ if(qbevent){evnt(25753,1806,"ide_methods.bas");if(r)goto S_37404;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,1807,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,1808,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1808,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,1809,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,1810,"ide_methods.bas");}while(r); } fornext_continue_4063:; } fornext_exit_4063:; S_37412:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCTRL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("F",1)))))||new_error){ if(qbevent){evnt(25753,1814,"ide_methods.bas");if(r)goto S_37412;} do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1815,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(25753,1816,"ide_methods.bas");}while(r); S_37415:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEFINDTEXT->len))||new_error){ if(qbevent){evnt(25753,1817,"ide_methods.bas");if(r)goto S_37415;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= -1 ; if(!qbevent)break;evnt(25753,1817,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1= 0 ; if(!qbevent)break;evnt(25753,1817,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=__STRING_IDEFINDTEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1817,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1818,"ide_methods.bas");}while(r); } S_37422:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCTRL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("K",1)))))||new_error){ if(qbevent){evnt(25753,1821,"ide_methods.bas");if(r)goto S_37422;} do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1822,"ide_methods.bas");}while(r); do{ goto LABEL_IDEQUICKKEYCODE; if(!qbevent)break;evnt(25753,1823,"ide_methods.bas");}while(r); } S_37426:; if ((*__LONG_KCTRL&(-(*__LONG_KB== 15616 )))||new_error){ if(qbevent){evnt(25753,1827,"ide_methods.bas");if(r)goto S_37426;} S_37427:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,1828,"ide_methods.bas");if(r)goto S_37427;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,1828,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDJMP; if(!qbevent)break;evnt(25753,1829,"ide_methods.bas");}while(r); } S_37432:; if ((*__LONG_KALT&(-(*__LONG_KB== 15616 )))||new_error){ if(qbevent){evnt(25753,1832,"ide_methods.bas");if(r)goto S_37432;} S_37433:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,1833,"ide_methods.bas");if(r)goto S_37433;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,1833,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDCHANGEJMP; if(!qbevent)break;evnt(25753,1834,"ide_methods.bas");}while(r); } S_37438:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KB== 15616 ))|(qbs_equal(__STRING_K,func_chr( 28 )))))||new_error){ if(qbevent){evnt(25753,1837,"ide_methods.bas");if(r)goto S_37438;} S_37439:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,1838,"ide_methods.bas");if(r)goto S_37439;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,1838,"ide_methods.bas");}while(r); } LABEL_IDEMF3:; if(qbevent){evnt(25753,1839,"ide_methods.bas");r=0;} S_37442:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDEFINDTEXT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,1840,"ide_methods.bas");if(r)goto S_37442;} S_37443:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,1841,"ide_methods.bas");if(r)goto S_37443;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1= 0 ; if(!qbevent)break;evnt(25753,1842,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=__STRING_IDEFINDTEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1843,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= -1 ; if(!qbevent)break;evnt(25753,1844,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=22; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_22:; if(!qbevent)break;evnt(25753,1846,"ide_methods.bas");}while(r); S_37449:; if ((*__LONG_KSHIFT)||new_error){ if(qbevent){evnt(25753,1847,"ide_methods.bas");if(r)goto S_37449;} do{ *__INTEGER_IDEFINDINVERT= 1 ; if(!qbevent)break;evnt(25753,1847,"ide_methods.bas");}while(r); } do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1848,"ide_methods.bas");}while(r); do{ SUB_IDEFINDAGAIN(&(pass4068= -1 )); if(!qbevent)break;evnt(25753,1849,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_IDEFINDJMP; if(!qbevent)break;evnt(25753,1851,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1853,"ide_methods.bas");}while(r); } S_37459:; if ((*__LONG_KSHIFT&(-(*__LONG_KB== 15104 )))||new_error){ if(qbevent){evnt(25753,1856,"ide_methods.bas");if(r)goto S_37459;} S_37460:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(25753,1857,"ide_methods.bas");if(r)goto S_37460;} do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(25753,1858,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,1858,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(25753,1859,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(25753,1859,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(25753,1859,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(25753,1859,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(25753,1859,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(25753,1859,"ide_methods.bas");}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(25753,1860,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,1861,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,1862,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,1863,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=23; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_23:; if(!qbevent)break;evnt(25753,1863,"ide_methods.bas");}while(r); } do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,1865,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,1866,"ide_methods.bas");}while(r); } do{ if(!qbevent)break;evnt(25753,1871,"ide_methods.bas");}while(r); S_37479:; if ((-(*__LONG_MB== 0 ))||new_error){ if(qbevent){evnt(25753,1873,"ide_methods.bas");if(r)goto S_37479;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR= 0 ; if(!qbevent)break;evnt(25753,1873,"ide_methods.bas");}while(r); } S_37482:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(25753,1874,"ide_methods.bas");if(r)goto S_37482;} S_37483:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,1875,"ide_methods.bas");if(r)goto S_37483;} S_37484:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,1878,"ide_methods.bas");if(r)goto S_37484;} S_37485:; if (((-(*__LONG_MX>= 2 ))&(-(*__LONG_MX<=(*__LONG_IDEWX- 1 )))&(-(*__LONG_MY==(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ))))||new_error){ if(qbevent){evnt(25753,1879,"ide_methods.bas");if(r)goto S_37485;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR= 1 ; if(!qbevent)break;evnt(25753,1880,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_V=FUNC_IDEHBAR(&(pass4069= 2 ),&(pass4070=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass4071=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass4072=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(25753,1881,"ide_methods.bas");}while(r); S_37488:; if ((-(*_FUNC_IDE2_LONG_V!=*__LONG_MX))||new_error){ if(qbevent){evnt(25753,1882,"ide_methods.bas");if(r)goto S_37488;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 3 ; if(!qbevent)break;evnt(25753,1882,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 4 ; if(!qbevent)break;evnt(25753,1882,"ide_methods.bas");}while(r); } S_37493:; if ((-(*__LONG_MX== 2 ))||new_error){ if(qbevent){evnt(25753,1883,"ide_methods.bas");if(r)goto S_37493;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 1 ; if(!qbevent)break;evnt(25753,1883,"ide_methods.bas");}while(r); } S_37496:; if ((-(*__LONG_MX==(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(25753,1884,"ide_methods.bas");if(r)goto S_37496;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 2 ; if(!qbevent)break;evnt(25753,1884,"ide_methods.bas");}while(r); } } S_37500:; if (((-(*__LONG_MY>=(*__LONG_IDEWY+ 1 )))&(-(*__LONG_MY<=(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 )))&(-(*__LONG_MX==*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,1886,"ide_methods.bas");if(r)goto S_37500;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR= 2 ; if(!qbevent)break;evnt(25753,1887,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_V=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4073=*__LONG_IDEWY+ 1 ),&(pass4074=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass4075=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(25753,1888,"ide_methods.bas");}while(r); S_37503:; if ((-(*_FUNC_IDE2_LONG_V!=*__LONG_MY))||new_error){ if(qbevent){evnt(25753,1889,"ide_methods.bas");if(r)goto S_37503;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 3 ; if(!qbevent)break;evnt(25753,1889,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 4 ; if(!qbevent)break;evnt(25753,1889,"ide_methods.bas");}while(r); } S_37508:; if ((-(*__LONG_MY==(*__LONG_IDEWY+ 1 )))||new_error){ if(qbevent){evnt(25753,1890,"ide_methods.bas");if(r)goto S_37508;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 1 ; if(!qbevent)break;evnt(25753,1890,"ide_methods.bas");}while(r); } S_37511:; if ((-(*__LONG_MY==(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 )))||new_error){ if(qbevent){evnt(25753,1891,"ide_methods.bas");if(r)goto S_37511;} do{ *_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD= 2 ; if(!qbevent)break;evnt(25753,1891,"ide_methods.bas");}while(r); } } } S_37516:; if ((*_FUNC_IDE2_LONG_HELP_SCROLLBAR)||new_error){ if(qbevent){evnt(25753,1895,"ide_methods.bas");if(r)goto S_37516;} do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,1896,"ide_methods.bas");}while(r); S_37518:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 1 ))||new_error){ if(qbevent){evnt(25753,1897,"ide_methods.bas");if(r)goto S_37518;} S_37519:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(25753,1898,"ide_methods.bas");if(r)goto S_37519;} do{ *__LONG_KB= 19200 ; if(!qbevent)break;evnt(25753,1898,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1898,"ide_methods.bas");}while(r); } S_37523:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(25753,1899,"ide_methods.bas");if(r)goto S_37523;} do{ *__LONG_KB= 18432 ; if(!qbevent)break;evnt(25753,1899,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1899,"ide_methods.bas");}while(r); } } S_37528:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 2 ))||new_error){ if(qbevent){evnt(25753,1901,"ide_methods.bas");if(r)goto S_37528;} S_37529:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(25753,1902,"ide_methods.bas");if(r)goto S_37529;} do{ *__LONG_KB= 19712 ; if(!qbevent)break;evnt(25753,1902,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1902,"ide_methods.bas");}while(r); } S_37533:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(25753,1903,"ide_methods.bas");if(r)goto S_37533;} do{ *__LONG_KB= 20480 ; if(!qbevent)break;evnt(25753,1903,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1903,"ide_methods.bas");}while(r); } } S_37538:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 3 ))||new_error){ if(qbevent){evnt(25753,1905,"ide_methods.bas");if(r)goto S_37538;} S_37539:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(25753,1906,"ide_methods.bas");if(r)goto S_37539;} do{ *_FUNC_IDE2_LONG_V=FUNC_IDEHBAR(&(pass4076= 2 ),&(pass4077=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass4078=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass4079=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(25753,1907,"ide_methods.bas");}while(r); S_37541:; if ((-(*__LONG_MX<*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(25753,1908,"ide_methods.bas");if(r)goto S_37541;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX- 8 ; if(!qbevent)break;evnt(25753,1909,"ide_methods.bas");}while(r); S_37543:; if ((-(*__LONG_HELP_CX< 1 ))||new_error){ if(qbevent){evnt(25753,1910,"ide_methods.bas");if(r)goto S_37543;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,1910,"ide_methods.bas");}while(r); } S_37546:; if ((-(*__LONG_HELP_SX>*__LONG_HELP_CX))||new_error){ if(qbevent){evnt(25753,1911,"ide_methods.bas");if(r)goto S_37546;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,1911,"ide_methods.bas");}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1912,"ide_methods.bas");}while(r); } S_37551:; if ((-(*__LONG_MX>*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(25753,1914,"ide_methods.bas");if(r)goto S_37551;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX+ 8 ; if(!qbevent)break;evnt(25753,1915,"ide_methods.bas");}while(r); S_37553:; if ((-(*__LONG_HELP_CX>(*__LONG_HELP_W+ 1 )))||new_error){ if(qbevent){evnt(25753,1916,"ide_methods.bas");if(r)goto S_37553;} do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(25753,1916,"ide_methods.bas");}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1917,"ide_methods.bas");}while(r); } } S_37559:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(25753,1920,"ide_methods.bas");if(r)goto S_37559;} do{ *_FUNC_IDE2_LONG_V=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4080=*__LONG_IDEWY+ 1 ),&(pass4081=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass4082=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(25753,1921,"ide_methods.bas");}while(r); S_37561:; if ((-(*__LONG_MY<*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(25753,1922,"ide_methods.bas");if(r)goto S_37561;} do{ *__LONG_KB= 18688 ; if(!qbevent)break;evnt(25753,1922,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1922,"ide_methods.bas");}while(r); } S_37565:; if ((-(*__LONG_MY>*_FUNC_IDE2_LONG_V))||new_error){ if(qbevent){evnt(25753,1923,"ide_methods.bas");if(r)goto S_37565;} do{ *__LONG_KB= 20736 ; if(!qbevent)break;evnt(25753,1923,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,1923,"ide_methods.bas");}while(r); } } } S_37571:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR_METHOD== 4 ))||new_error){ if(qbevent){evnt(25753,1930,"ide_methods.bas");if(r)goto S_37571;} S_37572:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 1 ))||new_error){ if(qbevent){evnt(25753,1931,"ide_methods.bas");if(r)goto S_37572;} S_37573:; if ((-(*__LONG_HELP_W> 1 ))||new_error){ if(qbevent){evnt(25753,1932,"ide_methods.bas");if(r)goto S_37573;} S_37574:; if ((-(*__LONG_MX<= 3 ))||new_error){ if(qbevent){evnt(25753,1933,"ide_methods.bas");if(r)goto S_37574;} do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(25753,1934,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,1934,"ide_methods.bas");}while(r); S_37577:; }else{ if (-(*__LONG_MX>=(*__LONG_IDEWX- 2 ))){ if(qbevent){evnt(25753,1935,"ide_methods.bas");if(r)goto S_37577;} do{ *__LONG_HELP_SX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(25753,1936,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(25753,1936,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_X=*__LONG_MX; if(!qbevent)break;evnt(25753,1938,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_X- 4 + 0.5E+0 ; if(!qbevent)break;evnt(25753,1939,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ (*__LONG_IDEWX- 3 - 3 ); if(!qbevent)break;evnt(25753,1940,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P**__LONG_HELP_W)+( 1 )); if(!qbevent)break;evnt(25753,1941,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,1942,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,1942,"ide_methods.bas");}while(r); } } } } S_37590:; if ((-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 2 ))||new_error){ if(qbevent){evnt(25753,1946,"ide_methods.bas");if(r)goto S_37590;} S_37591:; if ((-(*__LONG_HELP_H> 1 ))||new_error){ if(qbevent){evnt(25753,1947,"ide_methods.bas");if(r)goto S_37591;} S_37592:; if ((-(*__LONG_MY<=(*__LONG_IDEWY+ 2 )))||new_error){ if(qbevent){evnt(25753,1949,"ide_methods.bas");if(r)goto S_37592;} do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(25753,1950,"ide_methods.bas");}while(r); S_37594:; }else{ if (-(*__LONG_MY>=(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 3 ))){ if(qbevent){evnt(25753,1951,"ide_methods.bas");if(r)goto S_37594;} do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(25753,1952,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY; if(!qbevent)break;evnt(25753,1954,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_Y-*__LONG_IDEWY- 3 + 0.5E+0 ; if(!qbevent)break;evnt(25753,1955,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ (*__LONG_IDESUBWINDOW- 3 - 3 ); if(!qbevent)break;evnt(25753,1956,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P**__LONG_HELP_H)+( 1 )); if(!qbevent)break;evnt(25753,1957,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,1958,"ide_methods.bas");}while(r); } } S_37603:; if ((-(*__LONG_HELP_CX< 1 ))||new_error){ if(qbevent){evnt(25753,1961,"ide_methods.bas");if(r)goto S_37603;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,1961,"ide_methods.bas");}while(r); } S_37606:; if ((-(*__LONG_HELP_CX>(*__LONG_HELP_W+ 1 )))||new_error){ if(qbevent){evnt(25753,1962,"ide_methods.bas");if(r)goto S_37606;} do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(25753,1962,"ide_methods.bas");}while(r); } S_37609:; if ((-(*__LONG_HELP_CY< 1 ))||new_error){ if(qbevent){evnt(25753,1963,"ide_methods.bas");if(r)goto S_37609;} do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(25753,1963,"ide_methods.bas");}while(r); } S_37612:; if ((-(*__LONG_HELP_CY>(*__LONG_HELP_H+ 1 )))||new_error){ if(qbevent){evnt(25753,1964,"ide_methods.bas");if(r)goto S_37612;} do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(25753,1964,"ide_methods.bas");}while(r); } S_37615:; if ((-(*__LONG_HELP_CX<*__LONG_HELP_SX))||new_error){ if(qbevent){evnt(25753,1966,"ide_methods.bas");if(r)goto S_37615;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,1966,"ide_methods.bas");}while(r); } S_37618:; if ((-(*__LONG_HELP_CX>=(*__LONG_HELP_SX+*__LONG_HELP_WW)))||new_error){ if(qbevent){evnt(25753,1967,"ide_methods.bas");if(r)goto S_37618;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX-*__LONG_HELP_WW+ 1 ; if(!qbevent)break;evnt(25753,1967,"ide_methods.bas");}while(r); } S_37621:; if ((-(*__LONG_HELP_CY<*__LONG_HELP_SY))||new_error){ if(qbevent){evnt(25753,1968,"ide_methods.bas");if(r)goto S_37621;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,1968,"ide_methods.bas");}while(r); } S_37624:; if ((-(*__LONG_HELP_CY>=(*__LONG_HELP_SY+*__LONG_HELP_WH)))||new_error){ if(qbevent){evnt(25753,1969,"ide_methods.bas");if(r)goto S_37624;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY-*__LONG_HELP_WH+ 1 ; if(!qbevent)break;evnt(25753,1969,"ide_methods.bas");}while(r); } S_37627:; if ((-(*__LONG_HELP_SX< 1 ))||new_error){ if(qbevent){evnt(25753,1971,"ide_methods.bas");if(r)goto S_37627;} do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(25753,1971,"ide_methods.bas");}while(r); } S_37630:; if ((-(*__LONG_HELP_SY< 1 ))||new_error){ if(qbevent){evnt(25753,1972,"ide_methods.bas");if(r)goto S_37630;} do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(25753,1972,"ide_methods.bas");}while(r); } } } } S_37636:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,1993,"ide_methods.bas");if(r)goto S_37636;} do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(25753,1993,"ide_methods.bas");}while(r); } } } } S_37642:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,2004,"ide_methods.bas");if(r)goto S_37642;} S_37643:; if (((-(*__LONG_MY==(*__LONG_IDEWY- 4 )))&(-(*__LONG_MX>(*__LONG_IDEWX-( 20 + 10 ))))&(-(*__LONG_MX<(*__LONG_IDEWX- 1 ))))||new_error){ if(qbevent){evnt(25753,2005,"ide_methods.bas");if(r)goto S_37643;} S_37644:; if ((-(*__LONG_MX<=(*__LONG_IDEWX-( 20 + 8 )+ 2 )))||new_error){ if(qbevent){evnt(25753,2006,"ide_methods.bas");if(r)goto S_37644;} S_37645:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_IDEFINDTEXT->len== 0 )))||new_error){ if(qbevent){evnt(25753,2007,"ide_methods.bas");if(r)goto S_37645;} do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(25753,2008,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2009,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1= 0 ; if(!qbevent)break;evnt(25753,2009,"ide_methods.bas");}while(r); }else{ do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2011,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2012,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(25753,2012,"ide_methods.bas");}while(r); } }else{ S_37655:; if ((-(*__LONG_MX==(*__LONG_IDEWX- 3 )))||new_error){ if(qbevent){evnt(25753,2015,"ide_methods.bas");if(r)goto S_37655;} LABEL_SHOWRECENTLYSEARCHEDBOX:; if(qbevent){evnt(25753,2016,"ide_methods.bas");r=0;} do{ sub_pcopy( 0 , 3 ); if(!qbevent)break;evnt(25753,2017,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=24; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_24:; if(!qbevent)break;evnt(25753,2018,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,FUNC_IDESEARCHEDBOX()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2019,"ide_methods.bas");}while(r); S_37659:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_F->len))||new_error){ if(qbevent){evnt(25753,2020,"ide_methods.bas");if(r)goto S_37659;} do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2020,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,2021,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,2021,"ide_methods.bas");}while(r); do{ *__LONG_IDEALTHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,2022,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,2023,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,2023,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2023,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2024,"ide_methods.bas");}while(r); S_37669:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_F->len))||new_error){ if(qbevent){evnt(25753,2025,"ide_methods.bas");if(r)goto S_37669;} do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(25753,2025,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2026,"ide_methods.bas");}while(r); }else{ S_37674:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,2028,"ide_methods.bas");if(r)goto S_37674;} S_37675:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2029,"ide_methods.bas");if(r)goto S_37675;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2029,"ide_methods.bas");}while(r); } S_37678:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_IDEFINDTEXT->len<= 20 )))||new_error){ if(qbevent){evnt(25753,2031,"ide_methods.bas");if(r)goto S_37678;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*__LONG_MX-(*__LONG_IDEWX-( 20 + 4 )); if(!qbevent)break;evnt(25753,2032,"ide_methods.bas");}while(r); }else{ S_37681:; if ((-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1> 20 ))||new_error){ if(qbevent){evnt(25753,2034,"ide_methods.bas");if(r)goto S_37681;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=(*__LONG_MX-(*__LONG_IDEWX-( 20 + 4 )))+(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1- 20 ); if(!qbevent)break;evnt(25753,2035,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*__LONG_MX-(*__LONG_IDEWX-( 20 + 4 )); if(!qbevent)break;evnt(25753,2037,"ide_methods.bas");}while(r); } } }else{ do{ *__LONG_IDESYSTEM= 2 ; if(!qbevent)break;evnt(25753,2041,"ide_methods.bas");}while(r); S_37689:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEFINDTEXT->len))||new_error){ if(qbevent){evnt(25753,2042,"ide_methods.bas");if(r)goto S_37689;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= -1 ; if(!qbevent)break;evnt(25753,2042,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1= 0 ; if(!qbevent)break;evnt(25753,2042,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=__STRING_IDEFINDTEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2042,"ide_methods.bas");}while(r); } } } } } } S_37699:; if ((-(*__LONG_KB== 16384 ))||new_error){ if(qbevent){evnt(25753,2051,"ide_methods.bas");if(r)goto S_37699;} S_37700:; if ((-(*__LONG_IDEHELP== 1 ))||new_error){ if(qbevent){evnt(25753,2052,"ide_methods.bas");if(r)goto S_37700;} S_37701:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,2053,"ide_methods.bas");if(r)goto S_37701;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2054,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2056,"ide_methods.bas");}while(r); } } } S_37708:; if ((-(*__LONG_IDEHELP== 1 ))||new_error){ if(qbevent){evnt(25753,2061,"ide_methods.bas");if(r)goto S_37708;} S_37709:; if ((*__LONG_MCLICK|*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,2062,"ide_methods.bas");if(r)goto S_37709;} S_37710:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,2063,"ide_methods.bas");if(r)goto S_37710;} S_37711:; if (((-(*__LONG_MY>= 2 ))&(-(*__LONG_MY<*__LONG_IDEWY)))||new_error){ if(qbevent){evnt(25753,2064,"ide_methods.bas");if(r)goto S_37711;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2065,"ide_methods.bas");}while(r); } }else{ S_37715:; if (((-(*__LONG_MY>=*__LONG_IDEWY))&(-(*__LONG_MY<(*__LONG_IDEWY+*__LONG_IDESUBWINDOW))))||new_error){ if(qbevent){evnt(25753,2068,"ide_methods.bas");if(r)goto S_37715;} do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2069,"ide_methods.bas");}while(r); } } S_37719:; if ((*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,2073,"ide_methods.bas");if(r)goto S_37719;} do{ goto LABEL_INVOKECONTEXTUALMENU; if(!qbevent)break;evnt(25753,2074,"ide_methods.bas");}while(r); } } } S_37724:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,2079,"ide_methods.bas");if(r)goto S_37724;} do{ *_FUNC_IDE2_LONG_Z= 0 ; if(!qbevent)break;evnt(25753,2080,"ide_methods.bas");}while(r); S_37726:; if (((*__LONG_KALT&(-(*__LONG_KB== 18432 )))|(*__LONG_KALT&(-(*__LONG_KB== 20480 ))))||new_error){ if(qbevent){evnt(25753,2081,"ide_methods.bas");if(r)goto S_37726;} do{ goto LABEL_SHOWRECENTLYSEARCHEDBOX; if(!qbevent)break;evnt(25753,2081,"ide_methods.bas");}while(r); } S_37729:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(25753,2082,"ide_methods.bas");if(r)goto S_37729;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(25753,2082,"ide_methods.bas");}while(r); } S_37732:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(25753,2083,"ide_methods.bas");if(r)goto S_37732;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(25753,2083,"ide_methods.bas");}while(r); } S_37735:; if ((-(*__LONG_KB== 18688 ))||new_error){ if(qbevent){evnt(25753,2084,"ide_methods.bas");if(r)goto S_37735;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(25753,2084,"ide_methods.bas");}while(r); } S_37738:; if ((-(*__LONG_KB== 20736 ))||new_error){ if(qbevent){evnt(25753,2085,"ide_methods.bas");if(r)goto S_37738;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(25753,2085,"ide_methods.bas");}while(r); } S_37741:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,2086,"ide_methods.bas");if(r)goto S_37741;} do{ *_FUNC_IDE2_LONG_Z= 1 ; if(!qbevent)break;evnt(25753,2086,"ide_methods.bas");}while(r); } S_37744:; if ((-(*_FUNC_IDE2_LONG_Z== 1 ))||new_error){ if(qbevent){evnt(25753,2087,"ide_methods.bas");if(r)goto S_37744;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2087,"ide_methods.bas");}while(r); } } S_37748:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,2090,"ide_methods.bas");if(r)goto S_37748;} do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2091,"ide_methods.bas");}while(r); S_37750:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_K->len== 1 ))|(((-(*__LONG_KB== 20992 ))|(-(*__LONG_KB== 21248 ))))))||new_error){ if(qbevent){evnt(25753,2092,"ide_methods.bas");if(r)goto S_37750;} S_37751:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,2093,"ide_methods.bas");if(r)goto S_37751;} do{ *_FUNC_IDE2_LONG_K=qbs_asc(__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2093,"ide_methods.bas");}while(r); } S_37754:; 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(25753,2094,"ide_methods.bas");if(r)goto S_37754;} LABEL_PASTEINTOSEARCHFIELD:; if(qbevent){evnt(25753,2095,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2096,"ide_methods.bas");}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(25753,2097,"ide_methods.bas");}while(r); S_37757:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,2098,"ide_methods.bas");if(r)goto S_37757;} 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(25753,2098,"ide_methods.bas");}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(25753,2099,"ide_methods.bas");}while(r); S_37761:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,2100,"ide_methods.bas");if(r)goto S_37761;} 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(25753,2100,"ide_methods.bas");}while(r); } S_37764:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_CLIP->len))||new_error){ if(qbevent){evnt(25753,2101,"ide_methods.bas");if(r)goto S_37764;} S_37765:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2102,"ide_methods.bas");if(r)goto S_37765;} do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,2103,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,2103,"ide_methods.bas");}while(r); S_37768:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,2104,"ide_methods.bas");if(r)goto S_37768;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,2104,"ide_methods.bas");}while(r); } S_37771:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,2105,"ide_methods.bas");if(r)goto S_37771;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1),_FUNC_IDE2_STRING_CLIP),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2106,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_SX1; if(!qbevent)break;evnt(25753,2107,"ide_methods.bas");}while(r); S_37774:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,2108,"ide_methods.bas");if(r)goto S_37774;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_SX1+_FUNC_IDE2_STRING_CLIP->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2109,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2111,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1),_FUNC_IDE2_STRING_CLIP),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2114,"ide_methods.bas");}while(r); S_37781:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,2115,"ide_methods.bas");if(r)goto S_37781;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1+_FUNC_IDE2_STRING_CLIP->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2115,"ide_methods.bas");}while(r); } } } do{ *_FUNC_IDE2_LONG_K= 255 ; if(!qbevent)break;evnt(25753,2118,"ide_methods.bas");}while(r); } S_37788:; 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(25753,2121,"ide_methods.bas");if(r)goto S_37788;} LABEL_SELECTALLINSEARCHFIELD:; if(qbevent){evnt(25753,2122,"ide_methods.bas");r=0;} S_37789:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len> 0 )))||new_error){ if(qbevent){evnt(25753,2123,"ide_methods.bas");if(r)goto S_37789;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= -1 ; if(!qbevent)break;evnt(25753,2124,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1= 0 ; if(!qbevent)break;evnt(25753,2125,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2126,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_K= 255 ; if(!qbevent)break;evnt(25753,2128,"ide_methods.bas");}while(r); } S_37796:; 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(25753,2131,"ide_methods.bas");if(r)goto S_37796;} LABEL_COPYSEARCHTERM2CLIP:; if(qbevent){evnt(25753,2132,"ide_methods.bas");r=0;} S_37797:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2133,"ide_methods.bas");if(r)goto S_37797;} do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,2134,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,2134,"ide_methods.bas");}while(r); S_37800:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,2135,"ide_methods.bas");if(r)goto S_37800;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,2135,"ide_methods.bas");}while(r); } S_37803:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,2136,"ide_methods.bas");if(r)goto S_37803;} do{ sub__clipboard(func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1+ 1 ,*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2136,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_K= 255 ; if(!qbevent)break;evnt(25753,2138,"ide_methods.bas");}while(r); } S_37809:; 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)))))))||new_error){ if(qbevent){evnt(25753,2141,"ide_methods.bas");if(r)goto S_37809;} LABEL_CUTTOCLIPBOARDSEARCHFIELD:; if(qbevent){evnt(25753,2142,"ide_methods.bas");r=0;} S_37810:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2143,"ide_methods.bas");if(r)goto S_37810;} do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,2144,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,2144,"ide_methods.bas");}while(r); S_37813:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,2145,"ide_methods.bas");if(r)goto S_37813;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,2145,"ide_methods.bas");}while(r); } S_37816:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,2146,"ide_methods.bas");if(r)goto S_37816;} do{ sub__clipboard(func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1+ 1 ,*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2147,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2149,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_SX1; if(!qbevent)break;evnt(25753,2150,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2151,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_K= 255 ; if(!qbevent)break;evnt(25753,2154,"ide_methods.bas");}while(r); } S_37825:; if ((-(*_FUNC_IDE2_LONG_K== 8 ))||new_error){ if(qbevent){evnt(25753,2157,"ide_methods.bas");if(r)goto S_37825;} S_37826:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2158,"ide_methods.bas");if(r)goto S_37826;} do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,2159,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,2159,"ide_methods.bas");}while(r); S_37829:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,2160,"ide_methods.bas");if(r)goto S_37829;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,2160,"ide_methods.bas");}while(r); } S_37832:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,2161,"ide_methods.bas");if(r)goto S_37832;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2163,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2164,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_SX1; if(!qbevent)break;evnt(25753,2165,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2166,"ide_methods.bas");}while(r); } S_37838:; }else{ if (-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1> 0 )){ if(qbevent){evnt(25753,2168,"ide_methods.bas");if(r)goto S_37838;} do{ qbs_set(_FUNC_IDE2_STRING_A1,qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2169,"ide_methods.bas");}while(r); S_37840:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,2170,"ide_methods.bas");if(r)goto S_37840;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2170,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2170,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A1,_FUNC_IDE2_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2171,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1- 1 ; if(!qbevent)break;evnt(25753,2171,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2172,"ide_methods.bas");}while(r); } } } S_37850:; if ((-(*_FUNC_IDE2_LONG_K== 27 ))||new_error){ if(qbevent){evnt(25753,2175,"ide_methods.bas");if(r)goto S_37850;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2176,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2177,"ide_methods.bas");}while(r); } S_37854:; if ((-(*_FUNC_IDE2_LONG_K== 9 ))||new_error){ if(qbevent){evnt(25753,2179,"ide_methods.bas");if(r)goto S_37854;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2180,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2181,"ide_methods.bas");}while(r); } S_37858:; if ((-(*_FUNC_IDE2_LONG_K== 13 ))||new_error){ if(qbevent){evnt(25753,2183,"ide_methods.bas");if(r)goto S_37858;} S_37859:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEFINDTEXT->len))||new_error){ if(qbevent){evnt(25753,2184,"ide_methods.bas");if(r)goto S_37859;} do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2185,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(25753,2186,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2188,"ide_methods.bas");}while(r); } S_37865:; if (((-(*_FUNC_IDE2_LONG_K!= 8 ))&(-(*_FUNC_IDE2_LONG_K!= 9 ))&(-(*_FUNC_IDE2_LONG_K!= 0 ))&(-(*_FUNC_IDE2_LONG_K!= 10 ))&(-(*_FUNC_IDE2_LONG_K!= 13 ))&(-(*_FUNC_IDE2_LONG_K!= 26 ))&(-(*_FUNC_IDE2_LONG_K!= 255 )))||new_error){ if(qbevent){evnt(25753,2190,"ide_methods.bas");if(r)goto S_37865;} S_37866:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2191,"ide_methods.bas");if(r)goto S_37866;} do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,2192,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,2192,"ide_methods.bas");}while(r); S_37869:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,2193,"ide_methods.bas");if(r)goto S_37869;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,2193,"ide_methods.bas");}while(r); } S_37872:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,2194,"ide_methods.bas");if(r)goto S_37872;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2196,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2197,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2198,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_SX1; if(!qbevent)break;evnt(25753,2199,"ide_methods.bas");}while(r); } } S_37879:; if ((-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1> 0 ))||new_error){ if(qbevent){evnt(25753,2202,"ide_methods.bas");if(r)goto S_37879;} do{ qbs_set(_FUNC_IDE2_STRING_A1,qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2202,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2202,"ide_methods.bas");}while(r); } S_37884:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,2203,"ide_methods.bas");if(r)goto S_37884;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2203,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2203,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A1,__STRING_K),_FUNC_IDE2_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2204,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1+ 1 ; if(!qbevent)break;evnt(25753,2204,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2206,"ide_methods.bas");}while(r); } S_37894:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 60 ))))))||new_error){ if(qbevent){evnt(25753,2209,"ide_methods.bas");if(r)goto S_37894;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2210,"ide_methods.bas");}while(r); do{ goto LABEL_IDESUBSJMP; if(!qbevent)break;evnt(25753,2211,"ide_methods.bas");}while(r); } S_37898:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),qbs_new_txt_len("S",1))))))||new_error){ if(qbevent){evnt(25753,2214,"ide_methods.bas");if(r)goto S_37898;} LABEL_DELETESELECTIONSEARCHFIELD:; if(qbevent){evnt(25753,2215,"ide_methods.bas");r=0;} S_37899:; if ((*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL)||new_error){ if(qbevent){evnt(25753,2216,"ide_methods.bas");if(r)goto S_37899;} do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,2217,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,2217,"ide_methods.bas");}while(r); S_37902:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,2218,"ide_methods.bas");if(r)goto S_37902;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,2218,"ide_methods.bas");}while(r); } S_37905:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,2219,"ide_methods.bas");if(r)goto S_37905;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2221,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2222,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_SX1; if(!qbevent)break;evnt(25753,2223,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2224,"ide_methods.bas");}while(r); } }else{ S_37912:; if ((-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1> 0 ))||new_error){ if(qbevent){evnt(25753,2227,"ide_methods.bas");if(r)goto S_37912;} do{ qbs_set(_FUNC_IDE2_STRING_A1,qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2227,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2227,"ide_methods.bas");}while(r); } S_37917:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1<_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,2228,"ide_methods.bas");if(r)goto S_37917;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2228,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2228,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A1,_FUNC_IDE2_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2229,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2230,"ide_methods.bas");}while(r); } } S_37926:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),qbs_new_txt_len("K",1))))))||new_error){ if(qbevent){evnt(25753,2235,"ide_methods.bas");if(r)goto S_37926;} do{ return_point[next_return_point++]=25; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_25:; if(!qbevent)break;evnt(25753,2235,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1- 1 ; if(!qbevent)break;evnt(25753,2235,"ide_methods.bas");}while(r); } S_37930:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),qbs_new_txt_len("M",1))))))||new_error){ if(qbevent){evnt(25753,2236,"ide_methods.bas");if(r)goto S_37930;} do{ return_point[next_return_point++]=26; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_26:; if(!qbevent)break;evnt(25753,2236,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1+ 1 ; if(!qbevent)break;evnt(25753,2236,"ide_methods.bas");}while(r); } S_37934:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),qbs_new_txt_len("G",1))))))||new_error){ if(qbevent){evnt(25753,2237,"ide_methods.bas");if(r)goto S_37934;} do{ return_point[next_return_point++]=27; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_27:; if(!qbevent)break;evnt(25753,2237,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1= 0 ; if(!qbevent)break;evnt(25753,2237,"ide_methods.bas");}while(r); } S_37938:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),qbs_new_txt_len("O",1))))))||new_error){ if(qbevent){evnt(25753,2238,"ide_methods.bas");if(r)goto S_37938;} do{ return_point[next_return_point++]=28; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_28:; if(!qbevent)break;evnt(25753,2238,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2238,"ide_methods.bas");}while(r); } S_37942:; if ((-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1< 0 ))||new_error){ if(qbevent){evnt(25753,2239,"ide_methods.bas");if(r)goto S_37942;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1= 0 ; if(!qbevent)break;evnt(25753,2239,"ide_methods.bas");}while(r); } S_37945:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,2240,"ide_methods.bas");if(r)goto S_37945;} do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1=_FUNC_IDE2_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2240,"ide_methods.bas");}while(r); } S_37948:; if ((-(*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1==*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1))||new_error){ if(qbevent){evnt(25753,2241,"ide_methods.bas");if(r)goto S_37948;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,2241,"ide_methods.bas");}while(r); } S_37951:; if ((*__LONG_MCLICK|*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,2243,"ide_methods.bas");if(r)goto S_37951;} S_37952:; if (((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(25753,2244,"ide_methods.bas");if(r)goto S_37952;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2245,"ide_methods.bas");}while(r); S_37954:; if ((*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,2246,"ide_methods.bas");if(r)goto S_37954;} do{ goto LABEL_INVOKECONTEXTUALMENU; if(!qbevent)break;evnt(25753,2246,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2246,"ide_methods.bas");}while(r); } S_37959:; }else{ if ((-(*__LONG_MY>=*__LONG_IDEWY))&(-(*__LONG_MY<(*__LONG_IDEWY+*__LONG_IDESUBWINDOW)))){ if(qbevent){evnt(25753,2247,"ide_methods.bas");if(r)goto S_37959;} do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2248,"ide_methods.bas");}while(r); S_37961:; if ((*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,2249,"ide_methods.bas");if(r)goto S_37961;} do{ goto LABEL_INVOKECONTEXTUALMENU; if(!qbevent)break;evnt(25753,2249,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2249,"ide_methods.bas");}while(r); } } } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2253,"ide_methods.bas");}while(r); } S_37970:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,2256,"ide_methods.bas");if(r)goto S_37970;} S_37971:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_MCLICK|(qbs_equal(__STRING_K,func_chr( 27 )))))||new_error){ if(qbevent){evnt(25753,2258,"ide_methods.bas");if(r)goto S_37971;} S_37972:; if ((qbs_cleanup(qbs_tmp_base,(((-(*__LONG_MY==*__LONG_IDEWY))&(((-(*__LONG_MX>=(*__LONG_IDEWX- 3 )))&(-(*__LONG_MX<=(*__LONG_IDEWX- 1 )))))))|(qbs_equal(__STRING_K,func_chr( 27 )))))||new_error){ if(qbevent){evnt(25753,2259,"ide_methods.bas");if(r)goto S_37972;} LABEL_CLOSEHELP:; if(qbevent){evnt(25753,2260,"ide_methods.bas");r=0;} do{ *__LONG_IDEWY=*__LONG_IDEWY+*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,2261,"ide_methods.bas");}while(r); do{ *__LONG_IDEHELP= 0 ; if(!qbevent)break;evnt(25753,2262,"ide_methods.bas");}while(r); do{ *__LONG_IDESUBWINDOW= 0 ; if(!qbevent)break;evnt(25753,2263,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,2264,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,2265,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,2266,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=29; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_29:; if(!qbevent)break;evnt(25753,2266,"ide_methods.bas");}while(r); } } S_37982:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,2271,"ide_methods.bas");if(r)goto S_37982;} S_37983:; if ((((-(*__LONG_MY==*__LONG_IDEWY))&(((-(*__LONG_MX>=(*__LONG_IDEWX- 17 )))&(-(*__LONG_MX<=(*__LONG_IDEWX- 4 )))))))||new_error){ if(qbevent){evnt(25753,2272,"ide_methods.bas");if(r)goto S_37983;} LABEL_LAUNCHWIKI:; if(qbevent){evnt(25753,2273,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_URL,qbs_add(qbs_add(__STRING_WIKIBASEADDRESS,qbs_new_txt_len("/index.php?title=",17)),((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(25753,2274,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len(" ",1),qbs_new_txt_len("%20",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2275,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len("&",1),qbs_new_txt_len("%26",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2275,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len("+",1),qbs_new_txt_len("%2B",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2276,"ide_methods.bas");}while(r); S_37988:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)== 0 )))||new_error){ if(qbevent){evnt(25753,2277,"ide_methods.bas");if(r)goto S_37988;} do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len("$",1),qbs_new_txt_len("\\$",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2278,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len("&",1),qbs_new_txt_len("\\&",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2279,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len("(",1),qbs_new_txt_len("\\(",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2280,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_URL,FUNC_STRREPLACE(_FUNC_IDE2_STRING_URL,qbs_new_txt_len(")",1),qbs_new_txt_len("\\)",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2281,"ide_methods.bas");}while(r); } S_37994:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,2284,"ide_methods.bas");if(r)goto S_37994;} do{ sub_shell2(qbs_add(qbs_new_txt_len("start ",6),_FUNC_IDE2_STRING_URL),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2285,"ide_methods.bas");}while(r); S_37996:; }else{ if (qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))){ if(qbevent){evnt(25753,2286,"ide_methods.bas");if(r)goto S_37996;} do{ sub_shell2(qbs_add(qbs_new_txt_len("open ",5),_FUNC_IDE2_STRING_URL),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2287,"ide_methods.bas");}while(r); }else{ do{ sub_shell2(qbs_add(qbs_new_txt_len("xdg-open ",9),_FUNC_IDE2_STRING_URL),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2289,"ide_methods.bas");}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2291,"ide_methods.bas");}while(r); } S_38003:; if ((-(*__LONG_MY==*__LONG_IDEWY))||new_error){ if(qbevent){evnt(25753,2294,"ide_methods.bas");if(r)goto S_38003;} do{ *_FUNC_IDE2_LONG_SX= 2 ; if(!qbevent)break;evnt(25753,2296,"ide_methods.bas");}while(r); S_38005:; fornext_value4113=*_FUNC_IDE2_LONG_BACK_STR_POS; fornext_finalvalue4113=*_FUNC_IDE2_LONG_BACK_STR_POS+*__LONG_IDEWX- 6 ; fornext_step4113= 1 ; if (fornext_step4113<0) fornext_step_negative4113=1; else fornext_step_negative4113=0; if (new_error) goto fornext_error4113; goto fornext_entrylabel4113; while(1){ fornext_value4113=fornext_step4113+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4113: *_FUNC_IDE2_LONG_X=fornext_value4113; if (fornext_step_negative4113){ if (fornext_value4113fornext_finalvalue4113) break; } fornext_error4113:; if(qbevent){evnt(25753,2297,"ide_methods.bas");if(r)goto S_38005;} S_38006:; if ((-(*__LONG_MX==*_FUNC_IDE2_LONG_SX))||new_error){ if(qbevent){evnt(25753,2298,"ide_methods.bas");if(r)goto S_38006;} 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(25753,2299,"ide_methods.bas");}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(25753,2300,"ide_methods.bas");}while(r); S_38009:; if (((-(*_FUNC_IDE2_LONG_A!= 0 ))&(-(*_FUNC_IDE2_LONG_I!=*__LONG_HELP_BACK_POS)))||new_error){ if(qbevent){evnt(25753,2301,"ide_methods.bas");if(r)goto S_38009;} 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(25753,2302,"ide_methods.bas");}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(25753,2303,"ide_methods.bas");}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(25753,2304,"ide_methods.bas");}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(25753,2305,"ide_methods.bas");}while(r); do{ *__LONG_HELP_BACK_POS=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,2306,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(25753,2307,"ide_methods.bas");}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(25753,2307,"ide_methods.bas");}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(25753,2308,"ide_methods.bas");}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(25753,2309,"ide_methods.bas");}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(25753,2310,"ide_methods.bas");}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(25753,2311,"ide_methods.bas");}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(25753,2312,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2313,"ide_methods.bas");}while(r); do{ goto LABEL_NEWPAGEPARSED; if(!qbevent)break;evnt(25753,2314,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_SX=*_FUNC_IDE2_LONG_SX+ 1 ; if(!qbevent)break;evnt(25753,2317,"ide_methods.bas");}while(r); fornext_continue_4112:; } fornext_exit_4112:; } } S_38030:; 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(25753,2339,"ide_methods.bas");if(r)goto S_38030;} LABEL_SELECTALLINHELP:; if(qbevent){evnt(25753,2340,"ide_methods.bas");r=0;} S_38031:; if ((*__LONG_HELP_H)||new_error){ if(qbevent){evnt(25753,2341,"ide_methods.bas");if(r)goto S_38031;} do{ *__LONG_HELP_SELECT= 2 ; if(!qbevent)break;evnt(25753,2342,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELX1= 1 ; if(!qbevent)break;evnt(25753,2343,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELY1= 1 ; if(!qbevent)break;evnt(25753,2344,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELX2= 10000000 ; if(!qbevent)break;evnt(25753,2345,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_H; if(!qbevent)break;evnt(25753,2346,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2347,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(25753,2347,"ide_methods.bas");}while(r); do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(25753,2348,"ide_methods.bas");}while(r); } } S_38042:; 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(25753,2352,"ide_methods.bas");if(r)goto S_38042;} LABEL_COPYHELP2CLIP:; if(qbevent){evnt(25753,2353,"ide_methods.bas");r=0;} do{ *__LONG_IDEERROR= -1 ; if(!qbevent)break;evnt(25753,2354,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2355,"ide_methods.bas");}while(r); S_38045:; fornext_value4115=*__LONG_HELP_SELY1; fornext_finalvalue4115=*__LONG_HELP_SELY2; fornext_step4115= 1 ; if (fornext_step4115<0) fornext_step_negative4115=1; else fornext_step_negative4115=0; if (new_error) goto fornext_error4115; goto fornext_entrylabel4115; while(1){ fornext_value4115=fornext_step4115+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4115: *_FUNC_IDE2_LONG_Y=fornext_value4115; if (fornext_step_negative4115){ if (fornext_value4115fornext_finalvalue4115) break; } fornext_error4115:; if(qbevent){evnt(25753,2356,"ide_methods.bas");if(r)goto S_38045;} S_38046:; if ((-(*_FUNC_IDE2_LONG_Y!=*__LONG_HELP_SELY1))||new_error){ if(qbevent){evnt(25753,2357,"ide_methods.bas");if(r)goto S_38046;} 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(25753,2357,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2358,"ide_methods.bas");}while(r); S_38050:; if ((-(*_FUNC_IDE2_LONG_Y<=*__LONG_HELP_H))||new_error){ if(qbevent){evnt(25753,2359,"ide_methods.bas");if(r)goto S_38050;} 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(25753,2360,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,2361,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X3= 1 ; if(!qbevent)break;evnt(25753,2362,"ide_methods.bas");}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(25753,2363,"ide_methods.bas");}while(r); S_38055:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(25753,2364,"ide_methods.bas");if(r)goto S_38055;} S_38056:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(25753,2365,"ide_methods.bas");if(r)goto S_38056;} S_38057:; if (((-(*_FUNC_IDE2_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_FUNC_IDE2_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(25753,2366,"ide_methods.bas");if(r)goto S_38057;} S_38058:; if (((-(*_FUNC_IDE2_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_FUNC_IDE2_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(25753,2367,"ide_methods.bas");if(r)goto S_38058;} 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(25753,2368,"ide_methods.bas");}while(r); } } } do{ *_FUNC_IDE2_LONG_X3=*_FUNC_IDE2_LONG_X3+ 1 ; if(!qbevent)break;evnt(25753,2372,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(25753,2372,"ide_methods.bas");}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(25753,2372,"ide_methods.bas");}while(r); dl_continue_4116:; } dl_exit_4116:; } 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(25753,2375,"ide_methods.bas");}while(r); fornext_continue_4114:; } fornext_exit_4114:; S_38070:; if (((-(*__LONG_HELP_SELY1==*__LONG_HELP_SELY2))&(-(*__LONG_HELP_CY>*__LONG_HELP_CY1)))||new_error){ if(qbevent){evnt(25753,2377,"ide_methods.bas");if(r)goto S_38070;} 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(25753,2377,"ide_methods.bas");}while(r); } S_38073:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,2378,"ide_methods.bas");if(r)goto S_38073;} do{ sub__clipboard(_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2378,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,2379,"ide_methods.bas");}while(r); do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(25753,2380,"ide_methods.bas");}while(r); } S_38079:; 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(25753,2384,"ide_methods.bas");if(r)goto S_38079;} S_38080:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,2385,"ide_methods.bas");if(r)goto S_38080;} do{ *__LONG_HELP_CX=*__LONG_HELP_SX+(*__LONG_MX-*__LONG_HELP_WX1); if(!qbevent)break;evnt(25753,2386,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_SY+(*__LONG_MY-*__LONG_HELP_WY1); if(!qbevent)break;evnt(25753,2387,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELECT= 1 ; if(!qbevent)break;evnt(25753,2388,"ide_methods.bas");}while(r); do{ *__LONG_HELP_MSELECT= 1 ; if(!qbevent)break;evnt(25753,2389,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX1=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,2390,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2390,"ide_methods.bas");}while(r); do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(25753,2391,"ide_methods.bas");}while(r); } S_38089:; if (((*__LONG_MB&(-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 0 ))))||new_error){ if(qbevent){evnt(25753,2393,"ide_methods.bas");if(r)goto S_38089;} do{ *__LONG_HELP_CX=*__LONG_HELP_SX+(*__LONG_MX-*__LONG_HELP_WX1); if(!qbevent)break;evnt(25753,2394,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_SY+(*__LONG_MY-*__LONG_HELP_WY1); if(!qbevent)break;evnt(25753,2395,"ide_methods.bas");}while(r); S_38092:; if ((*__LONG_HELP_SELECT)||new_error){ if(qbevent){evnt(25753,2396,"ide_methods.bas");if(r)goto S_38092;} do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(25753,2396,"ide_methods.bas");}while(r); } } }else{ S_38097:; if ((((*__LONG_MB&(-(*_FUNC_IDE2_LONG_HELP_SCROLLBAR== 0 ))))&(-(*__LONG_HELP_MSELECT== 1 ))&(-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(25753,2400,"ide_methods.bas");if(r)goto S_38097;} S_38098:; if ((-(*__LONG_MX<*__LONG_HELP_WX1))||new_error){ if(qbevent){evnt(25753,2401,"ide_methods.bas");if(r)goto S_38098;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX- 1 ; if(!qbevent)break;evnt(25753,2401,"ide_methods.bas");}while(r); } S_38101:; if ((-(*__LONG_MX>*__LONG_HELP_WX2))||new_error){ if(qbevent){evnt(25753,2402,"ide_methods.bas");if(r)goto S_38101;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX+ 1 ; if(!qbevent)break;evnt(25753,2402,"ide_methods.bas");}while(r); } S_38104:; if ((-(*__LONG_MY<*__LONG_HELP_WY1))||new_error){ if(qbevent){evnt(25753,2403,"ide_methods.bas");if(r)goto S_38104;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY- 1 ; if(!qbevent)break;evnt(25753,2403,"ide_methods.bas");}while(r); } S_38107:; if ((-(*__LONG_MY>*__LONG_HELP_WY2))||new_error){ if(qbevent){evnt(25753,2404,"ide_methods.bas");if(r)goto S_38107;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY+ 1 ; if(!qbevent)break;evnt(25753,2404,"ide_methods.bas");}while(r); } do{ goto LABEL_KEEP_SELECT; if(!qbevent)break;evnt(25753,2405,"ide_methods.bas");}while(r); } } S_38113:; if ((*__LONG_KSHIFT)||new_error){ if(qbevent){evnt(25753,2409,"ide_methods.bas");if(r)goto S_38113;} S_38114:; if ((-(*__LONG_HELP_SELECT== 0 ))||new_error){ if(qbevent){evnt(25753,2410,"ide_methods.bas");if(r)goto S_38114;} do{ *__LONG_HELP_SELECT= 1 ; if(!qbevent)break;evnt(25753,2411,"ide_methods.bas");}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(25753,2412,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX1=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,2413,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2413,"ide_methods.bas");}while(r); } }else{ S_38121:; if (((((-(*__LONG_KB> 0 ))|(-(*__LONG_MWHEEL!= 0 ))))&(-(*__LONG_KSTATECHANGED== 0 )))||new_error){ if(qbevent){evnt(25753,2416,"ide_methods.bas");if(r)goto S_38121;} do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(25753,2416,"ide_methods.bas");}while(r); } } LABEL_KEEP_SELECT:; if(qbevent){evnt(25753,2418,"ide_methods.bas");r=0;} S_38125:; if ((-(*__LONG_KB== 9 ))||new_error){ if(qbevent){evnt(25753,2420,"ide_methods.bas");if(r)goto S_38125;} S_38126:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HELP_SEARCH_STR->len))||new_error){ if(qbevent){evnt(25753,2421,"ide_methods.bas");if(r)goto S_38126;} do{ *_FUNC_IDE2_LONG_NOREP= 1 ; if(!qbevent)break;evnt(25753,2421,"ide_methods.bas");}while(r); do{ goto LABEL_DELSRCHAGAIN; if(!qbevent)break;evnt(25753,2421,"ide_methods.bas");}while(r); } } S_38131:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_K->len== 1 ))&(-(*__LONG_KCONTROL== 0 ))))||new_error){ if(qbevent){evnt(25753,2424,"ide_methods.bas");if(r)goto S_38131;} do{ *_FUNC_IDE2_LONG_K=qbs_asc(__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2425,"ide_methods.bas");}while(r); S_38133:; 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(25753,2426,"ide_methods.bas");if(r)goto S_38133;} do{ *_FUNC_IDE2_LONG_NOREP= 0 ; if(!qbevent)break;evnt(25753,2427,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_DOUBLE_T=func_timer( 0.001E+0 ,1); if(!qbevent)break;evnt(25753,2428,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDK= 0 ; if(!qbevent)break;evnt(25753,2429,"ide_methods.bas");}while(r); S_38137:; if ((qbs_cleanup(qbs_tmp_base,__STRING_HELP_SEARCH_STR->len))||new_error){ if(qbevent){evnt(25753,2429,"ide_methods.bas");if(r)goto S_38137;} 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(25753,2429,"ide_methods.bas");}while(r); } S_38140:; 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(25753,2430,"ide_methods.bas");if(r)goto S_38140;} S_38141:; if ((-(*_FUNC_IDE2_LONG_K==*_FUNC_IDE2_LONG_OLDK))||new_error){ if(qbevent){evnt(25753,2431,"ide_methods.bas");if(r)goto S_38141;} do{ *_FUNC_IDE2_LONG_NOREP= 1 ; if(!qbevent)break;evnt(25753,2431,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_HELP_SEARCH_STR,__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2432,"ide_methods.bas");}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(25753,2434,"ide_methods.bas");}while(r); } do{ *__DOUBLE_HELP_SEARCH_TIME=*_FUNC_IDE2_DOUBLE_T; if(!qbevent)break;evnt(25753,2436,"ide_methods.bas");}while(r); LABEL_DELSRCHAGAIN:; if(qbevent){evnt(25753,2438,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_OX=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,2439,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OY=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2440,"ide_methods.bas");}while(r); S_38151:; if ((-(*_FUNC_IDE2_LONG_OY>*__LONG_HELP_H))||new_error){ if(qbevent){evnt(25753,2441,"ide_methods.bas");if(r)goto S_38151;} do{ *_FUNC_IDE2_LONG_OY= 1 ; if(!qbevent)break;evnt(25753,2441,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_CY=*_FUNC_IDE2_LONG_OY; if(!qbevent)break;evnt(25753,2442,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_OX; if(!qbevent)break;evnt(25753,2443,"ide_methods.bas");}while(r); S_38156:; if ((-(*_FUNC_IDE2_LONG_NOREP== 1 ))||new_error){ if(qbevent){evnt(25753,2444,"ide_methods.bas");if(r)goto S_38156;} do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_CX+ 1 ; if(!qbevent)break;evnt(25753,2444,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_LOOPED= 0 ; if(!qbevent)break;evnt(25753,2445,"ide_methods.bas");}while(r); S_38160:; do{ if(qbevent){evnt(25753,2446,"ide_methods.bas");if(r)goto S_38160;} 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(25753,2448,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,2449,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2450,"ide_methods.bas");}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(25753,2451,"ide_methods.bas");}while(r); S_38165:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(25753,2452,"ide_methods.bas");if(r)goto S_38165;} 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(25753,2453,"ide_methods.bas");}while(r); S_38167:; if ((*_FUNC_IDE2_LONG_LNK)||new_error){ if(qbevent){evnt(25753,2454,"ide_methods.bas");if(r)goto S_38167;} 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(25753,2454,"ide_methods.bas");}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(25753,2454,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(25753,2455,"ide_methods.bas");}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(25753,2455,"ide_methods.bas");}while(r); dl_continue_4123:; } dl_exit_4123:; LABEL_HELPSCANROW:; if(qbevent){evnt(25753,2458,"ide_methods.bas");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(25753,2459,"ide_methods.bas");}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(25753,2460,"ide_methods.bas");}while(r); S_38177:; 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(25753,2461,"ide_methods.bas");if(r)goto S_38177;} do{ *_FUNC_IDE2_LONG_PX=*_FUNC_IDE2_LONG_PX2; if(!qbevent)break;evnt(25753,2461,"ide_methods.bas");}while(r); } S_38180:; if (((-(*_FUNC_IDE2_LONG_LOOPED== 1 ))&(-(*_FUNC_IDE2_LONG_CY==*_FUNC_IDE2_LONG_OY))&(-(*_FUNC_IDE2_LONG_PX== 0 )))||new_error){ if(qbevent){evnt(25753,2463,"ide_methods.bas");if(r)goto S_38180;} do{ goto LABEL_STRNOTFOUND; if(!qbevent)break;evnt(25753,2463,"ide_methods.bas");}while(r); } S_38183:; if ((*_FUNC_IDE2_LONG_PX)||new_error){ if(qbevent){evnt(25753,2464,"ide_methods.bas");if(r)goto S_38183;} 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(25753,2466,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,2467,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2= 1 ; if(!qbevent)break;evnt(25753,2468,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2469,"ide_methods.bas");}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(25753,2470,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDLNK= 0 ; if(!qbevent)break;evnt(25753,2471,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LNKX1= 0 ; if(!qbevent)break;evnt(25753,2472,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LNKX2= 0 ; if(!qbevent)break;evnt(25753,2472,"ide_methods.bas");}while(r); S_38192:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(25753,2473,"ide_methods.bas");if(r)goto S_38192;} 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(25753,2474,"ide_methods.bas");}while(r); S_38194:; 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(25753,2475,"ide_methods.bas");if(r)goto S_38194;} do{ *_FUNC_IDE2_LONG_LNKX1=*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(25753,2475,"ide_methods.bas");}while(r); } S_38197:; if (((-(*_FUNC_IDE2_LONG_LNKX1!= 0 ))&(-(*_FUNC_IDE2_LONG_LNK== 0 ))&(-(*_FUNC_IDE2_LONG_LNKX2== 0 )))||new_error){ if(qbevent){evnt(25753,2476,"ide_methods.bas");if(r)goto S_38197;} do{ *_FUNC_IDE2_LONG_LNKX2=*_FUNC_IDE2_LONG_X2- 1 ; if(!qbevent)break;evnt(25753,2476,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(25753,2477,"ide_methods.bas");}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(25753,2477,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,2478,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDLNK=*_FUNC_IDE2_LONG_LNK; if(!qbevent)break;evnt(25753,2479,"ide_methods.bas");}while(r); dl_continue_4124:; } dl_exit_4124:; S_38205:; 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(25753,2482,"ide_methods.bas");if(r)goto S_38205;} S_38206:; if ((-(*_FUNC_IDE2_LONG_LNKX1!= 3 ))||new_error){ if(qbevent){evnt(25753,2483,"ide_methods.bas");if(r)goto S_38206;} do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_PX+ 1 ; if(!qbevent)break;evnt(25753,2484,"ide_methods.bas");}while(r); do{ goto LABEL_HELPSCANROW; if(!qbevent)break;evnt(25753,2485,"ide_methods.bas");}while(r); } } S_38211:; if ((*_FUNC_IDE2_LONG_LNKX1)||new_error){ if(qbevent){evnt(25753,2489,"ide_methods.bas");if(r)goto S_38211;} S_38212:; if ((-(*_FUNC_IDE2_LONG_LNKX2== 0 ))||new_error){ if(qbevent){evnt(25753,2490,"ide_methods.bas");if(r)goto S_38212;} do{ *_FUNC_IDE2_LONG_LNKX2=*_FUNC_IDE2_LONG_X2- 1 ; if(!qbevent)break;evnt(25753,2490,"ide_methods.bas");}while(r); } do{ *__LONG_HELP_SELECT= 2 ; if(!qbevent)break;evnt(25753,2491,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX1=*_FUNC_IDE2_LONG_LNKX2+ 1 ; if(!qbevent)break;evnt(25753,2492,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX=*_FUNC_IDE2_LONG_LNKX1; if(!qbevent)break;evnt(25753,2493,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY=*_FUNC_IDE2_LONG_CY; if(!qbevent)break;evnt(25753,2494,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY1=*_FUNC_IDE2_LONG_CY; if(!qbevent)break;evnt(25753,2495,"ide_methods.bas");}while(r); do{ goto LABEL_FOUNDSSTR; if(!qbevent)break;evnt(25753,2496,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_CX=*_FUNC_IDE2_LONG_PX+ 1 ; if(!qbevent)break;evnt(25753,2499,"ide_methods.bas");}while(r); do{ goto LABEL_HELPSCANROW; if(!qbevent)break;evnt(25753,2500,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_CX= 1 ; if(!qbevent)break;evnt(25753,2502,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CY=*_FUNC_IDE2_LONG_CY+ 1 ; if(!qbevent)break;evnt(25753,2503,"ide_methods.bas");}while(r); S_38227:; if ((-(*_FUNC_IDE2_LONG_CY>*__LONG_HELP_H))||new_error){ if(qbevent){evnt(25753,2504,"ide_methods.bas");if(r)goto S_38227;} do{ *_FUNC_IDE2_LONG_CY= 1 ; if(!qbevent)break;evnt(25753,2504,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(25753,2504,"ide_methods.bas");}while(r); } dl_continue_4122:; }while(1); dl_exit_4122:; } } LABEL_FOUNDSSTR:; if(qbevent){evnt(25753,2508,"ide_methods.bas");r=0;} LABEL_STRNOTFOUND:; if(qbevent){evnt(25753,2509,"ide_methods.bas");r=0;} S_38234:; if (((-(*__LONG_KB== 18176 ))&*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,2511,"ide_methods.bas");if(r)goto S_38234;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2512,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(25753,2512,"ide_methods.bas");}while(r); } S_38238:; if (((-(*__LONG_KB== 20224 ))&*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,2514,"ide_methods.bas");if(r)goto S_38238;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2515,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(25753,2515,"ide_methods.bas");}while(r); } S_38242:; if (((-(*__LONG_KB== 18176 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(25753,2518,"ide_methods.bas");if(r)goto S_38242;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2518,"ide_methods.bas");}while(r); } S_38245:; if (((-(*__LONG_KB== 20224 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(25753,2519,"ide_methods.bas");if(r)goto S_38245;} 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(25753,2520,"ide_methods.bas");}while(r); } S_38248:; if ((-(*__LONG_KB== 18688 ))||new_error){ if(qbevent){evnt(25753,2523,"ide_methods.bas");if(r)goto S_38248;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY-(*__LONG_HELP_WH- 1 ); if(!qbevent)break;evnt(25753,2524,"ide_methods.bas");}while(r); } S_38251:; if ((-(*__LONG_KB== 20736 ))||new_error){ if(qbevent){evnt(25753,2527,"ide_methods.bas");if(r)goto S_38251;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY+(*__LONG_HELP_WH- 1 ); if(!qbevent)break;evnt(25753,2528,"ide_methods.bas");}while(r); } S_38254:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(25753,2531,"ide_methods.bas");if(r)goto S_38254;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY+ 1 ; if(!qbevent)break;evnt(25753,2531,"ide_methods.bas");}while(r); } S_38257:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(25753,2532,"ide_methods.bas");if(r)goto S_38257;} do{ *__LONG_HELP_CY=*__LONG_HELP_CY- 1 ; if(!qbevent)break;evnt(25753,2532,"ide_methods.bas");}while(r); } S_38260:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(25753,2533,"ide_methods.bas");if(r)goto S_38260;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX- 1 ; if(!qbevent)break;evnt(25753,2533,"ide_methods.bas");}while(r); } S_38263:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(25753,2534,"ide_methods.bas");if(r)goto S_38263;} do{ *__LONG_HELP_CX=*__LONG_HELP_CX+ 1 ; if(!qbevent)break;evnt(25753,2534,"ide_methods.bas");}while(r); } S_38266:; if ((-(*__LONG_MWHEEL< 0 ))||new_error){ if(qbevent){evnt(25753,2537,"ide_methods.bas");if(r)goto S_38266;} do{ *__LONG_HELP_CY=*__LONG_HELP_SY; if(!qbevent)break;evnt(25753,2537,"ide_methods.bas");}while(r); } S_38269:; if ((-(*__LONG_MWHEEL> 0 ))||new_error){ if(qbevent){evnt(25753,2538,"ide_methods.bas");if(r)goto S_38269;} do{ *__LONG_HELP_CY=*__LONG_HELP_SY+(*__LONG_HELP_WH- 1 ); if(!qbevent)break;evnt(25753,2538,"ide_methods.bas");}while(r); } do{ *__LONG_HELP_CY=*__LONG_HELP_CY+(*__LONG_MWHEEL* 3 ); if(!qbevent)break;evnt(25753,2539,"ide_methods.bas");}while(r); S_38273:; if ((-(*__LONG_HELP_CX< 1 ))||new_error){ if(qbevent){evnt(25753,2542,"ide_methods.bas");if(r)goto S_38273;} do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2542,"ide_methods.bas");}while(r); } S_38276:; if ((-(*__LONG_HELP_CX>(*__LONG_HELP_W+ 1 )))||new_error){ if(qbevent){evnt(25753,2543,"ide_methods.bas");if(r)goto S_38276;} do{ *__LONG_HELP_CX=*__LONG_HELP_W+ 1 ; if(!qbevent)break;evnt(25753,2543,"ide_methods.bas");}while(r); } S_38279:; if ((-(*__LONG_HELP_CY< 1 ))||new_error){ if(qbevent){evnt(25753,2544,"ide_methods.bas");if(r)goto S_38279;} do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(25753,2544,"ide_methods.bas");}while(r); } S_38282:; if ((-(*__LONG_HELP_CY>(*__LONG_HELP_H+ 1 )))||new_error){ if(qbevent){evnt(25753,2545,"ide_methods.bas");if(r)goto S_38282;} do{ *__LONG_HELP_CY=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(25753,2545,"ide_methods.bas");}while(r); } S_38285:; if ((-(*__LONG_HELP_CX<*__LONG_HELP_SX))||new_error){ if(qbevent){evnt(25753,2548,"ide_methods.bas");if(r)goto S_38285;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,2548,"ide_methods.bas");}while(r); } S_38288:; if ((-(*__LONG_HELP_CX>=(*__LONG_HELP_SX+*__LONG_HELP_WW)))||new_error){ if(qbevent){evnt(25753,2549,"ide_methods.bas");if(r)goto S_38288;} do{ *__LONG_HELP_SX=*__LONG_HELP_CX-*__LONG_HELP_WW+ 1 ; if(!qbevent)break;evnt(25753,2549,"ide_methods.bas");}while(r); } S_38291:; if ((-(*__LONG_HELP_CY<*__LONG_HELP_SY))||new_error){ if(qbevent){evnt(25753,2551,"ide_methods.bas");if(r)goto S_38291;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2551,"ide_methods.bas");}while(r); } S_38294:; if ((-(*__LONG_HELP_CY>=(*__LONG_HELP_SY+*__LONG_HELP_WH)))||new_error){ if(qbevent){evnt(25753,2552,"ide_methods.bas");if(r)goto S_38294;} do{ *__LONG_HELP_SY=*__LONG_HELP_CY-*__LONG_HELP_WH+ 1 ; if(!qbevent)break;evnt(25753,2552,"ide_methods.bas");}while(r); } S_38297:; if ((-(*__LONG_HELP_SX< 1 ))||new_error){ if(qbevent){evnt(25753,2555,"ide_methods.bas");if(r)goto S_38297;} do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(25753,2555,"ide_methods.bas");}while(r); } S_38300:; if ((-(*__LONG_HELP_SY< 1 ))||new_error){ if(qbevent){evnt(25753,2556,"ide_methods.bas");if(r)goto S_38300;} do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(25753,2556,"ide_methods.bas");}while(r); } S_38303:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 8 ))))||new_error){ if(qbevent){evnt(25753,2558,"ide_methods.bas");if(r)goto S_38303;} S_38304:; if ((-(*__LONG_HELP_BACK_POS> 1 ))||new_error){ if(qbevent){evnt(25753,2559,"ide_methods.bas");if(r)goto S_38304;} 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(25753,2560,"ide_methods.bas");}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(25753,2561,"ide_methods.bas");}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(25753,2562,"ide_methods.bas");}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(25753,2563,"ide_methods.bas");}while(r); do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS- 1 ; if(!qbevent)break;evnt(25753,2564,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(25753,2565,"ide_methods.bas");}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(25753,2565,"ide_methods.bas");}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(25753,2566,"ide_methods.bas");}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(25753,2567,"ide_methods.bas");}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(25753,2568,"ide_methods.bas");}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(25753,2569,"ide_methods.bas");}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(25753,2570,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2571,"ide_methods.bas");}while(r); do{ goto LABEL_NEWPAGEPARSED; if(!qbevent)break;evnt(25753,2572,"ide_methods.bas");}while(r); } } S_38321:; if (((-(*__LONG_HELP_CY>= 1 ))&(-(*__LONG_HELP_CY<=*__LONG_HELP_H)))||new_error){ if(qbevent){evnt(25753,2576,"ide_methods.bas");if(r)goto S_38321;} 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(25753,2577,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,2578,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2= 1 ; if(!qbevent)break;evnt(25753,2579,"ide_methods.bas");}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(25753,2580,"ide_methods.bas");}while(r); S_38326:; while((!(-(*_FUNC_IDE2_LONG_C== 13 )))||new_error){ if(qbevent){evnt(25753,2581,"ide_methods.bas");if(r)goto S_38326;} S_38327:; if ((-(*_FUNC_IDE2_LONG_X2==*__LONG_HELP_CX))||new_error){ if(qbevent){evnt(25753,2583,"ide_methods.bas");if(r)goto S_38327;} 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(25753,2584,"ide_methods.bas");}while(r); S_38329:; if ((*_FUNC_IDE2_LONG_LNK)||new_error){ if(qbevent){evnt(25753,2585,"ide_methods.bas");if(r)goto S_38329;} do{ *_FUNC_IDE2_LONG_L1= 1 ; if(!qbevent)break;evnt(25753,2587,"ide_methods.bas");}while(r); S_38331:; fornext_value4127= 1 ; fornext_finalvalue4127=*_FUNC_IDE2_LONG_LNK- 1 ; 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_IDE2_LONG_LX); fornext_entrylabel4127: *_FUNC_IDE2_LONG_LX=fornext_value4127; if (fornext_step_negative4127){ if (fornext_value4127fornext_finalvalue4127) break; } fornext_error4127:; if(qbevent){evnt(25753,2588,"ide_methods.bas");if(r)goto S_38331;} 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(25753,2589,"ide_methods.bas");}while(r); fornext_continue_4126:; } fornext_exit_4126:; 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(25753,2591,"ide_methods.bas");}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(25753,2592,"ide_methods.bas");}while(r); S_38336:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_MCLICK|(qbs_equal(__STRING_K,func_chr( 13 )))))||new_error){ if(qbevent){evnt(25753,2594,"ide_methods.bas");if(r)goto S_38336;} do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(25753,2595,"ide_methods.bas");}while(r); S_38338:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_L, 5 ),qbs_new_txt_len("EXTL:",5))))||new_error){ if(qbevent){evnt(25753,2597,"ide_methods.bas");if(r)goto S_38338;} S_38339:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|((-(*__LONG_MY==(*__LONG_HELP_CY-*__LONG_HELP_SY+*__LONG_HELP_WY1)))&(-(*__LONG_MX==(*__LONG_HELP_CX-*__LONG_HELP_SX+*__LONG_HELP_WX1))))))||new_error){ if(qbevent){evnt(25753,2598,"ide_methods.bas");if(r)goto S_38339;} 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(25753,2599,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_STRREPLACE(_FUNC_IDE2_STRING_L,qbs_new_txt_len(" ",1),qbs_new_txt_len("%20",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2600,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_STRREPLACE(_FUNC_IDE2_STRING_L,qbs_new_txt_len("&",1),qbs_new_txt_len("%26",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2601,"ide_methods.bas");}while(r); S_38343:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)== 0 )))||new_error){ if(qbevent){evnt(25753,2602,"ide_methods.bas");if(r)goto S_38343;} do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_STRREPLACE(_FUNC_IDE2_STRING_L,qbs_new_txt_len("$",1),qbs_new_txt_len("\\$",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2603,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_STRREPLACE(_FUNC_IDE2_STRING_L,qbs_new_txt_len("&",1),qbs_new_txt_len("\\&",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2604,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_STRREPLACE(_FUNC_IDE2_STRING_L,qbs_new_txt_len("(",1),qbs_new_txt_len("\\(",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2605,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_STRREPLACE(_FUNC_IDE2_STRING_L,qbs_new_txt_len(")",1),qbs_new_txt_len("\\)",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2606,"ide_methods.bas");}while(r); } S_38349:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,2608,"ide_methods.bas");if(r)goto S_38349;} do{ sub_shell2(qbs_add(qbs_new_txt_len("start ",6),_FUNC_IDE2_STRING_L),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2609,"ide_methods.bas");}while(r); S_38351:; }else{ if (qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))){ if(qbevent){evnt(25753,2610,"ide_methods.bas");if(r)goto S_38351;} do{ sub_shell2(qbs_add(qbs_new_txt_len("open ",5),_FUNC_IDE2_STRING_L),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2611,"ide_methods.bas");}while(r); }else{ do{ sub_shell2(qbs_add(qbs_new_txt_len("xdg-open ",9),_FUNC_IDE2_STRING_L),3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2613,"ide_methods.bas");}while(r); } } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2616,"ide_methods.bas");}while(r); S_38358:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_L, 5 ),qbs_new_txt_len("PAGE:",5)))){ if(qbevent){evnt(25753,2617,"ide_methods.bas");if(r)goto S_38358;} 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(25753,2618,"ide_methods.bas");}while(r); S_38360:; 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(25753,2619,"ide_methods.bas");if(r)goto S_38360;} do{ *__LONG_HELP_SELECT= 0 ; if(!qbevent)break;evnt(25753,2620,"ide_methods.bas");}while(r); do{ *__LONG_HELP_MSELECT= 0 ; if(!qbevent)break;evnt(25753,2620,"ide_methods.bas");}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(25753,2623,"ide_methods.bas");}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(25753,2624,"ide_methods.bas");}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(25753,2625,"ide_methods.bas");}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(25753,2626,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_TOP=func_ubound(__ARRAY_STRING_BACK,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2628,"ide_methods.bas");}while(r); S_38368:; if ((-(*__LONG_HELP_BACK_POS<*_FUNC_IDE2_LONG_TOP))||new_error){ if(qbevent){evnt(25753,2630,"ide_methods.bas");if(r)goto S_38368;} S_38369:; 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(25753,2631,"ide_methods.bas");if(r)goto S_38369;} do{ goto LABEL_USENEXTENTRY; if(!qbevent)break;evnt(25753,2632,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_TOP=*_FUNC_IDE2_LONG_TOP+ 1 ; if(!qbevent)break;evnt(25753,2636,"ide_methods.bas");}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_long2=__ARRAY_STRING_BACK[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_BACK_NAME[5]; if (tmp_long2fornext_finalvalue4131) break; } fornext_error4131:; if(qbevent){evnt(25753,2641,"ide_methods.bas");if(r)goto S_38377;} 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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2642,"ide_methods.bas");}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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2643,"ide_methods.bas");}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(25753,2644,"ide_methods.bas");}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(25753,2645,"ide_methods.bas");}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(25753,2646,"ide_methods.bas");}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(25753,2647,"ide_methods.bas");}while(r); fornext_continue_4130:; } fornext_exit_4130:; LABEL_USENEXTENTRY:; if(qbevent){evnt(25753,2649,"ide_methods.bas");r=0;} do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS+ 1 ; if(!qbevent)break;evnt(25753,2650,"ide_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2651,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2652,"ide_methods.bas");}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(25753,2653,"ide_methods.bas");}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(25753,2654,"ide_methods.bas");}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(25753,2655,"ide_methods.bas");}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(25753,2656,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(25753,2657,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(25753,2657,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2657,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(25753,2657,"ide_methods.bas");}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(25753,2658,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2659,"ide_methods.bas");}while(r); do{ goto LABEL_NEWPAGEPARSED; if(!qbevent)break;evnt(25753,2660,"ide_methods.bas");}while(r); } } } } } } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 4 ; if(!qbevent)break;evnt(25753,2667,"ide_methods.bas");}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(25753,2667,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,2668,"ide_methods.bas");}while(r); dl_continue_4125:; } dl_exit_4125:; } S_38409:; if ((*__LONG_HELP_SELECT)||new_error){ if(qbevent){evnt(25753,2672,"ide_methods.bas");if(r)goto S_38409;} do{ *__LONG_HELP_SELECT= 1 ; if(!qbevent)break;evnt(25753,2673,"ide_methods.bas");}while(r); S_38411:; if (((-(*__LONG_HELP_CX!=*__LONG_HELP_CX1))|(-(*__LONG_HELP_CY!=*__LONG_HELP_CY1)))||new_error){ if(qbevent){evnt(25753,2674,"ide_methods.bas");if(r)goto S_38411;} do{ *__LONG_HELP_SELECT= 2 ; if(!qbevent)break;evnt(25753,2674,"ide_methods.bas");}while(r); } } S_38415:; if ((-(*__LONG_HELP_SELECT== 2 ))||new_error){ if(qbevent){evnt(25753,2678,"ide_methods.bas");if(r)goto S_38415;} S_38416:; if ((-(*__LONG_HELP_CY==*__LONG_HELP_CY1))||new_error){ if(qbevent){evnt(25753,2679,"ide_methods.bas");if(r)goto S_38416;} do{ *__LONG_HELP_SELY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2680,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2680,"ide_methods.bas");}while(r); S_38419:; if ((-(*__LONG_HELP_CX>*__LONG_HELP_CX1))||new_error){ if(qbevent){evnt(25753,2681,"ide_methods.bas");if(r)goto S_38419;} do{ *__LONG_HELP_SELX1=*__LONG_HELP_CX1; if(!qbevent)break;evnt(25753,2682,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELX2=*__LONG_HELP_CX- 1 ; if(!qbevent)break;evnt(25753,2682,"ide_methods.bas");}while(r); }else{ do{ *__LONG_HELP_SELX1=*__LONG_HELP_CX; if(!qbevent)break;evnt(25753,2684,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELX2=*__LONG_HELP_CX1- 1 ; if(!qbevent)break;evnt(25753,2684,"ide_methods.bas");}while(r); } }else{ do{ *__LONG_HELP_SELX1= 1 ; if(!qbevent)break;evnt(25753,2687,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELX2= 10000000 ; if(!qbevent)break;evnt(25753,2687,"ide_methods.bas");}while(r); S_38429:; if ((-(*__LONG_HELP_CY>*__LONG_HELP_CY1))||new_error){ if(qbevent){evnt(25753,2688,"ide_methods.bas");if(r)goto S_38429;} do{ *__LONG_HELP_SELY1=*__LONG_HELP_CY1; if(!qbevent)break;evnt(25753,2689,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2689,"ide_methods.bas");}while(r); S_38432:; if ((-(*__LONG_HELP_CX== 1 ))||new_error){ if(qbevent){evnt(25753,2690,"ide_methods.bas");if(r)goto S_38432;} do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY- 1 ; if(!qbevent)break;evnt(25753,2690,"ide_methods.bas");}while(r); } }else{ do{ *__LONG_HELP_SELY1=*__LONG_HELP_CY; if(!qbevent)break;evnt(25753,2692,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SELY2=*__LONG_HELP_CY1; if(!qbevent)break;evnt(25753,2692,"ide_methods.bas");}while(r); } } } LABEL_NEWPAGEPARSED:; if(qbevent){evnt(25753,2697,"ide_methods.bas");r=0;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2698,"ide_methods.bas");}while(r); } S_38443:; if ((-(*__LONG_KB== 15104 ))||new_error){ if(qbevent){evnt(25753,2703,"ide_methods.bas");if(r)goto S_38443;} LABEL_CONTEXTUALHELP:; if(qbevent){evnt(25753,2704,"ide_methods.bas");r=0;} do{ *__BYTE_IDECONTEXTHELPSF= 0 ; if(!qbevent)break;evnt(25753,2705,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_ucase(FUNC_GETWORDATCURSOR())); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2707,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LNKS= 0 ; if(!qbevent)break;evnt(25753,2708,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNKS,FUNC_FINDHELPTOPIC(_FUNC_IDE2_STRING_A2,_FUNC_IDE2_LONG_LNKS,&(pass4132= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2709,"ide_methods.bas");}while(r); S_38448:; if ((*_FUNC_IDE2_LONG_LNKS)||new_error){ if(qbevent){evnt(25753,2711,"ide_methods.bas");if(r)goto S_38448;} 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(25753,2712,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_LNK,_FUNC_IDE2_STRING_LNKS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2713,"ide_methods.bas");}while(r); S_38451:; if ((-(*_FUNC_IDE2_LONG_LNKS> 1 ))||new_error){ if(qbevent){evnt(25753,2714,"ide_methods.bas");if(r)goto S_38451;} 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(25753,2716,"ide_methods.bas");}while(r); S_38453:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_LNK,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,2717,"ide_methods.bas");if(r)goto S_38453;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2717,"ide_methods.bas");}while(r); } } S_38457:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,qbs_ucase(_FUNC_IDE2_STRING_LNK),qbs_new_txt_len("PARENTHESIS",11),0)))||new_error){ if(qbevent){evnt(25753,2720,"ide_methods.bas");if(r)goto S_38457;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2720,"ide_methods.bas");}while(r); } LABEL_OPENHELPLNK:; if(qbevent){evnt(25753,2722,"ide_methods.bas");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(25753,2725,"ide_methods.bas");}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(25753,2726,"ide_methods.bas");}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(25753,2727,"ide_methods.bas");}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(25753,2728,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_TOP=func_ubound(__ARRAY_STRING_BACK,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2730,"ide_methods.bas");}while(r); S_38465:; 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(25753,2733,"ide_methods.bas");if(r)goto S_38465;} do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS- 1 ; if(!qbevent)break;evnt(25753,2733,"ide_methods.bas");}while(r); do{ goto LABEL_USENEXTENTRY2; if(!qbevent)break;evnt(25753,2733,"ide_methods.bas");}while(r); } S_38469:; if ((-(*__LONG_HELP_BACK_POS<*_FUNC_IDE2_LONG_TOP))||new_error){ if(qbevent){evnt(25753,2734,"ide_methods.bas");if(r)goto S_38469;} S_38470:; 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(25753,2735,"ide_methods.bas");if(r)goto S_38470;} do{ goto LABEL_USENEXTENTRY2; if(!qbevent)break;evnt(25753,2736,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_TOP=*_FUNC_IDE2_LONG_TOP+ 1 ; if(!qbevent)break;evnt(25753,2741,"ide_methods.bas");}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_long2=__ARRAY_STRING_BACK[5]; if (tmp_long2id=(++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_long2=__ARRAY_STRING_BACK_NAME[5]; if (tmp_long2fornext_finalvalue4135) break; } fornext_error4135:; if(qbevent){evnt(25753,2746,"ide_methods.bas");if(r)goto S_38478;} 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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2747,"ide_methods.bas");}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])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2748,"ide_methods.bas");}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(25753,2749,"ide_methods.bas");}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(25753,2750,"ide_methods.bas");}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(25753,2751,"ide_methods.bas");}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(25753,2752,"ide_methods.bas");}while(r); fornext_continue_4134:; } fornext_exit_4134:; LABEL_USENEXTENTRY2:; if(qbevent){evnt(25753,2754,"ide_methods.bas");r=0;} do{ *__LONG_HELP_BACK_POS=*__LONG_HELP_BACK_POS+ 1 ; if(!qbevent)break;evnt(25753,2755,"ide_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2756,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2757,"ide_methods.bas");}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(25753,2758,"ide_methods.bas");}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(25753,2759,"ide_methods.bas");}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(25753,2760,"ide_methods.bas");}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(25753,2761,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SX= 1 ; if(!qbevent)break;evnt(25753,2762,"ide_methods.bas");}while(r); do{ *__LONG_HELP_SY= 1 ; if(!qbevent)break;evnt(25753,2762,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CX= 1 ; if(!qbevent)break;evnt(25753,2762,"ide_methods.bas");}while(r); do{ *__LONG_HELP_CY= 1 ; if(!qbevent)break;evnt(25753,2762,"ide_methods.bas");}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(25753,2764,"ide_methods.bas");}while(r); S_38498:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(25753,2766,"ide_methods.bas");if(r)goto S_38498;} S_38499:; if ((*__LONG_IDESUBWINDOW)||new_error){ if(qbevent){evnt(25753,2767,"ide_methods.bas");if(r)goto S_38499;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,2767,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,2767,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2767,"ide_methods.bas");}while(r); } do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(25753,2768,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,2768,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(25753,2769,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(25753,2769,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(25753,2769,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(25753,2769,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(25753,2769,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(25753,2769,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2770,"ide_methods.bas");}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(25753,2771,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,2772,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2773,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,2774,"ide_methods.bas");}while(r); }else{ do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2776,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2777,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=30; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_30:; if(!qbevent)break;evnt(25753,2780,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2781,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_ltrim(qbs_rtrim(_FUNC_IDE2_STRING_A2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2785,"ide_methods.bas");}while(r); S_38525:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(25753,2786,"ide_methods.bas");if(r)goto S_38525;} S_38526:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_FUNC_IDE2_STRING_A2, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,2787,"ide_methods.bas");if(r)goto S_38526;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_left(_FUNC_IDE2_STRING_A2,_FUNC_IDE2_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2788,"ide_methods.bas");}while(r); S_38528:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A2->len== 0 )))||new_error){ if(qbevent){evnt(25753,2789,"ide_methods.bas");if(r)goto S_38528;} do{ goto LABEL_NOKEYWORDFOUND; if(!qbevent)break;evnt(25753,2789,"ide_methods.bas");}while(r); } dl_continue_4137:; } dl_exit_4137:; S_38532:; fornext_value4141= 1 ; fornext_finalvalue4141=*__LONG_IDEN; fornext_step4141= 1 ; if (fornext_step4141<0) fornext_step_negative4141=1; else fornext_step_negative4141=0; if (new_error) goto fornext_error4141; goto fornext_entrylabel4141; while(1){ fornext_value4141=fornext_step4141+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4141: *_FUNC_IDE2_LONG_Y=fornext_value4141; if (fornext_step_negative4141){ if (fornext_value4141fornext_finalvalue4141) break; } fornext_error4141:; if(qbevent){evnt(25753,2792,"ide_methods.bas");if(r)goto S_38532;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2793,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_ltrim(qbs_rtrim(_FUNC_IDE2_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2794,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SF= 0 ; if(!qbevent)break;evnt(25753,2795,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_NCA,qbs_ucase(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2796,"ide_methods.bas");}while(r); S_38537:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_NCA, 4 ),qbs_new_txt_len("SUB ",4))))||new_error){ if(qbevent){evnt(25753,2797,"ide_methods.bas");if(r)goto S_38537;} do{ *_FUNC_IDE2_LONG_SF= 1 ; if(!qbevent)break;evnt(25753,2797,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SF,qbs_new_txt_len("SUB ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2797,"ide_methods.bas");}while(r); } S_38541:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_NCA, 9 ),qbs_new_txt_len("FUNCTION ",9))))||new_error){ if(qbevent){evnt(25753,2798,"ide_methods.bas");if(r)goto S_38541;} do{ *_FUNC_IDE2_LONG_SF= 2 ; if(!qbevent)break;evnt(25753,2798,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_SF,qbs_new_txt_len("FUNCTION ",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2798,"ide_methods.bas");}while(r); } S_38545:; if ((*_FUNC_IDE2_LONG_SF)||new_error){ if(qbevent){evnt(25753,2799,"ide_methods.bas");if(r)goto S_38545;} S_38546:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDE2_STRING_NCA, 7 ),qbs_new_txt_len(" STATIC",7))))||new_error){ if(qbevent){evnt(25753,2800,"ide_methods.bas");if(r)goto S_38546;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_rtrim(qbs_left(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2801,"ide_methods.bas");}while(r); } S_38549:; if ((-(*_FUNC_IDE2_LONG_SF== 1 ))||new_error){ if(qbevent){evnt(25753,2804,"ide_methods.bas");if(r)goto S_38549;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2805,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len- 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2807,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_ltrim(qbs_rtrim(_FUNC_IDE2_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2809,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_A,qbs_new_txt_len("(",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2810,"ide_methods.bas");}while(r); S_38556:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,2811,"ide_methods.bas");if(r)goto S_38556;} do{ qbs_set(_FUNC_IDE2_STRING_N,qbs_rtrim(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2812,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_ARGS,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2813,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X=func_instr(NULL,_FUNC_IDE2_STRING_ARGS,qbs_new_txt_len(")",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2814,"ide_methods.bas");}while(r); S_38560:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,2814,"ide_methods.bas");if(r)goto S_38560;} do{ qbs_set(_FUNC_IDE2_STRING_ARGS,qbs_left(_FUNC_IDE2_STRING_ARGS,*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2814,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDE2_STRING_N,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2816,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_ARGS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2817,"ide_methods.bas");}while(r); do{ SUB_CLEANSUBNAME(_FUNC_IDE2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2818,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_BACKUPN,_FUNC_IDE2_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2821,"ide_methods.bas");}while(r); S_38569:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_FUNC_IDE2_STRING_N, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,2823,"ide_methods.bas");if(r)goto S_38569;} do{ qbs_set(_FUNC_IDE2_STRING_N,qbs_left(_FUNC_IDE2_STRING_N,_FUNC_IDE2_STRING_N->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2824,"ide_methods.bas");}while(r); dl_continue_4146:; } dl_exit_4146:; S_38572:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_FUNC_IDE2_STRING_N),_FUNC_IDE2_STRING_A2)))||new_error){ if(qbevent){evnt(25753,2827,"ide_methods.bas");if(r)goto S_38572;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("{{DISPLAYTITLE:agp@",19),_FUNC_IDE2_STRING_BACKUPN),qbs_new_txt_len("}}",2)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2828,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,qbs_new_txt_len("This is a subroutine or function that is used in your program as follows:",73)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2829,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_A,func_chr( 10 )),func_chr( 10 )),qbs_new_txt_len("{{PageSyntax}}",14)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2830,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_A,qbs_new_txt_len(": [[",4)),qbs_left(_FUNC_IDE2_STRING_SF,_FUNC_IDE2_STRING_SF->len- 1 )),qbs_new_txt_len("]] '''",6)),_FUNC_IDE2_STRING_BACKUPN),qbs_new_txt_len("''' ",4)),_FUNC_IDE2_STRING_ARGS),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2831,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_A,func_chr( 10 )),func_chr( 10 )),qbs_new_txt_len("{{PageSeeAlso}}",15)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2832,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,qbs_new_txt_len("* [[Sub (explanatory)]]",23)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2833,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(_FUNC_IDE2_STRING_A,qbs_new_txt_len("* [[Function (explanatory)]]",28)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2834,"ide_methods.bas");}while(r); do{ *__BYTE_IDECONTEXTHELPSF= -1 ; if(!qbevent)break;evnt(25753,2836,"ide_methods.bas");}while(r); S_38581:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(25753,2838,"ide_methods.bas");if(r)goto S_38581;} S_38582:; if ((*__LONG_IDESUBWINDOW)||new_error){ if(qbevent){evnt(25753,2839,"ide_methods.bas");if(r)goto S_38582;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,2839,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,2839,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,2839,"ide_methods.bas");}while(r); } do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(25753,2840,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,2840,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(25753,2841,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(25753,2841,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(25753,2841,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(25753,2841,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(25753,2841,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(25753,2841,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2842,"ide_methods.bas");}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(25753,2843,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,2844,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2845,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,2846,"ide_methods.bas");}while(r); } do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2849,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,2850,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=31; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_31:; if(!qbevent)break;evnt(25753,2851,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2852,"ide_methods.bas");}while(r); do{ goto fornext_exit_4140; if(!qbevent)break;evnt(25753,2854,"ide_methods.bas");}while(r); } } fornext_continue_4140:; } fornext_exit_4140:; } LABEL_NOKEYWORDFOUND:; if(qbevent){evnt(25753,2859,"ide_methods.bas");r=0;} } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2861,"ide_methods.bas");}while(r); } S_38613:; if ((*__LONG_KALT&(-(*__LONG_KB== 19200 )))||new_error){ if(qbevent){evnt(25753,2866,"ide_methods.bas");if(r)goto S_38613;} do{ *_FUNC_IDE2_LONG_BMKREMOVED= 0 ; if(!qbevent)break;evnt(25753,2867,"ide_methods.bas");}while(r); LABEL_BMKREMOVE:; if(qbevent){evnt(25753,2868,"ide_methods.bas");r=0;} S_38615:; fornext_value4150= 1 ; fornext_finalvalue4150=*__LONG_IDEBMKN; fornext_step4150= 1 ; if (fornext_step4150<0) fornext_step_negative4150=1; else fornext_step_negative4150=0; if (new_error) goto fornext_error4150; goto fornext_entrylabel4150; while(1){ fornext_value4150=fornext_step4150+(*_FUNC_IDE2_LONG_B); fornext_entrylabel4150: *_FUNC_IDE2_LONG_B=fornext_value4150; if (fornext_step_negative4150){ if (fornext_value4150fornext_finalvalue4150) break; } fornext_error4150:; if(qbevent){evnt(25753,2869,"ide_methods.bas");if(r)goto S_38615;} S_38616:; 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(25753,2870,"ide_methods.bas");if(r)goto S_38616;} S_38617:; fornext_value4152=*_FUNC_IDE2_LONG_B; fornext_finalvalue4152=*__LONG_IDEBMKN- 1 ; fornext_step4152= 1 ; if (fornext_step4152<0) fornext_step_negative4152=1; else fornext_step_negative4152=0; if (new_error) goto fornext_error4152; goto fornext_entrylabel4152; while(1){ fornext_value4152=fornext_step4152+(*_FUNC_IDE2_LONG_B2); fornext_entrylabel4152: *_FUNC_IDE2_LONG_B2=fornext_value4152; if (fornext_step_negative4152){ if (fornext_value4152fornext_finalvalue4152) break; } fornext_error4152:; if(qbevent){evnt(25753,2871,"ide_methods.bas");if(r)goto S_38617;} do{ memcpy(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)+ 0,((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2+ 1 )-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)+ 0, 16); if(!qbevent)break;evnt(25753,2872,"ide_methods.bas");}while(r); fornext_continue_4151:; } fornext_exit_4151:; do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN- 1 ; if(!qbevent)break;evnt(25753,2874,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BMKREMOVED= 1 ; if(!qbevent)break;evnt(25753,2875,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(25753,2876,"ide_methods.bas");}while(r); do{ goto LABEL_BMKREMOVE; if(!qbevent)break;evnt(25753,2877,"ide_methods.bas");}while(r); } fornext_continue_4149:; } fornext_exit_4149:; S_38626:; if ((-(*_FUNC_IDE2_LONG_BMKREMOVED== 0 ))||new_error){ if(qbevent){evnt(25753,2880,"ide_methods.bas");if(r)goto S_38626;} do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN+ 1 ; if(!qbevent)break;evnt(25753,2881,"ide_methods.bas");}while(r); S_38628:; if ((-(*__LONG_IDEBMKN>func_ubound(__ARRAY_UDT_IDEBMK,1,1)))||new_error){ if(qbevent){evnt(25753,2882,"ide_methods.bas");if(r)goto S_38628;} do{ *_FUNC_IDE2_LONG_X=func_ubound(__ARRAY_UDT_IDEBMK,1,1)* 2 ; if(!qbevent)break;evnt(25753,2882,"ide_methods.bas");}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(25753,2912,"ide_methods.bas");if(r)goto S_38671;} do{ *_FUNC_IDE2_LONG_L= 1 ; if(!qbevent)break;evnt(25753,2912,"ide_methods.bas");}while(r); } S_38674:; fornext_value4155= 1 ; fornext_finalvalue4155=*__LONG_IDEBMKN; fornext_step4155= 1 ; if (fornext_step4155<0) fornext_step_negative4155=1; else fornext_step_negative4155=0; if (new_error) goto fornext_error4155; goto fornext_entrylabel4155; while(1){ fornext_value4155=fornext_step4155+(*_FUNC_IDE2_LONG_B); fornext_entrylabel4155: *_FUNC_IDE2_LONG_B=fornext_value4155; if (fornext_step_negative4155){ if (fornext_value4155fornext_finalvalue4155) break; } fornext_error4155:; if(qbevent){evnt(25753,2913,"ide_methods.bas");if(r)goto S_38674;} S_38675:; 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(25753,2914,"ide_methods.bas");if(r)goto S_38675;} do{ goto dl_exit_4153; if(!qbevent)break;evnt(25753,2914,"ide_methods.bas");}while(r); } fornext_continue_4154:; } fornext_exit_4154:; dl_continue_4153:; }while(1); dl_exit_4153:; do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,2917,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,2918,"ide_methods.bas");}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(25753,2919,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,2920,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,2921,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2922,"ide_methods.bas");}while(r); } S_38687:; if ((*__LONG_KALT&(-(*__LONG_KB== 19712 )))||new_error){ if(qbevent){evnt(25753,2925,"ide_methods.bas");if(r)goto S_38687;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2927,"ide_methods.bas");}while(r); } S_38690:; if ((*__LONG_KALT&(-(*__LONG_KB>= 48 ))&(-(*__LONG_KB<= 57 )))||new_error){ if(qbevent){evnt(25753,2931,"ide_methods.bas");if(r)goto S_38690;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,2931,"ide_methods.bas");}while(r); } S_38693:; if (((-(*__LONG_IDESELECT== 1 ))&(-(*_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT< 0 ))&(-(*__LONG_MY==*_FUNC_IDE2_LONG_OLD__ASCII_CHR_046__MY)))||new_error){ if(qbevent){evnt(25753,2933,"ide_methods.bas");if(r)goto S_38693;} S_38694:; if ((-(*_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT== -2 ))||new_error){ if(qbevent){evnt(25753,2937,"ide_methods.bas");if(r)goto S_38694;} do{ *_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT= -1 ; if(!qbevent)break;evnt(25753,2940,"ide_methods.bas");}while(r); do{ *__LONG_IDEMOUSESELECT= 0 ; if(!qbevent)break;evnt(25753,2941,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1=*_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__SELECTX1; if(!qbevent)break;evnt(25753,2942,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__IDECX; if(!qbevent)break;evnt(25753,2943,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__SELECTY1; if(!qbevent)break;evnt(25753,2944,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__IDECY; if(!qbevent)break;evnt(25753,2945,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_NEWPOSITION=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,2947,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2948,"ide_methods.bas");}while(r); S_38704:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_NEWPOSITION>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,2949,"ide_methods.bas");if(r)goto S_38704;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_NEWPOSITION; if(!qbevent)break;evnt(25753,2949,"ide_methods.bas");}while(r); do{ goto LABEL_DONEWHOLEWORD; if(!qbevent)break;evnt(25753,2949,"ide_methods.bas");}while(r); } S_38708:; if ((-(*_FUNC_IDE2_LONG_NEWPOSITION== 1 ))||new_error){ if(qbevent){evnt(25753,2950,"ide_methods.bas");if(r)goto S_38708;} do{ *__LONG_IDESELECTX1= 1 ; if(!qbevent)break;evnt(25753,2950,"ide_methods.bas");}while(r); do{ goto LABEL_DONEWHOLEWORD; if(!qbevent)break;evnt(25753,2950,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__CLICKED,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_NEWPOSITION, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2951,"ide_methods.bas");}while(r); S_38713:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__CLICKED->len> 0 )))||new_error){ if(qbevent){evnt(25753,2952,"ide_methods.bas");if(r)goto S_38713;} S_38714:; if ((-(*_FUNC_IDE2_LONG_NEWPOSITION<*_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__IDECX))||new_error){ if(qbevent){evnt(25753,2953,"ide_methods.bas");if(r)goto S_38714;} S_38715:; fornext_value4159=*_FUNC_IDE2_LONG_NEWPOSITION; fornext_finalvalue4159= 1 ; fornext_step4159= -1 ; if (fornext_step4159<0) fornext_step_negative4159=1; else fornext_step_negative4159=0; if (new_error) goto fornext_error4159; goto fornext_entrylabel4159; while(1){ fornext_value4159=fornext_step4159+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4159: *_FUNC_IDE2_LONG_I=fornext_value4159; if (fornext_step_negative4159){ if (fornext_value4159fornext_finalvalue4159) break; } fornext_error4159:; if(qbevent){evnt(25753,2955,"ide_methods.bas");if(r)goto S_38715;} S_38716:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1),0)))||new_error){ if(qbevent){evnt(25753,2956,"ide_methods.bas");if(r)goto S_38716;} do{ goto fornext_exit_4158; if(!qbevent)break;evnt(25753,2956,"ide_methods.bas");}while(r); } fornext_continue_4158:; } fornext_exit_4158:; do{ *__LONG_IDESELECTX1=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,2958,"ide_methods.bas");}while(r); S_38721:; }else{ if (-(*_FUNC_IDE2_LONG_NEWPOSITION>*_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__SELECTX1)){ if(qbevent){evnt(25753,2959,"ide_methods.bas");if(r)goto S_38721;} S_38722:; fornext_value4161=*_FUNC_IDE2_LONG_NEWPOSITION; fornext_finalvalue4161=_FUNC_IDE2_STRING_A->len; fornext_step4161= 1 ; if (fornext_step4161<0) fornext_step_negative4161=1; else fornext_step_negative4161=0; if (new_error) goto fornext_error4161; goto fornext_entrylabel4161; while(1){ fornext_value4161=fornext_step4161+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4161: *_FUNC_IDE2_LONG_I=fornext_value4161; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4161){ if (fornext_value4161fornext_finalvalue4161) break; } fornext_error4161:; if(qbevent){evnt(25753,2961,"ide_methods.bas");if(r)goto S_38722;} S_38723:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1),0)))||new_error){ if(qbevent){evnt(25753,2962,"ide_methods.bas");if(r)goto S_38723;} do{ goto fornext_exit_4160; if(!qbevent)break;evnt(25753,2962,"ide_methods.bas");}while(r); } fornext_continue_4160:; } fornext_exit_4160:; do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,2964,"ide_methods.bas");}while(r); } } } S_38730:; }else{ if ((-(*__LONG_IDESELECT== 1 ))&(-(*_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT== -1 ))&(-(*__LONG_MY!=*_FUNC_IDE2_LONG_OLD__ASCII_CHR_046__MY))){ if(qbevent){evnt(25753,2967,"ide_methods.bas");if(r)goto S_38730;} do{ *__LONG_IDEMOUSESELECT= 1 ; if(!qbevent)break;evnt(25753,2968,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT= -2 ; if(!qbevent)break;evnt(25753,2969,"ide_methods.bas");}while(r); } } S_38734:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,2972,"ide_methods.bas");if(r)goto S_38734;} S_38735:; if (((-(*__LONG_MX>( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(25753,2973,"ide_methods.bas");if(r)goto S_38735;} S_38736:; if (((-(*_FUNC_IDE2_LONG_OLD__ASCII_CHR_046__MX==*__LONG_MX))&(-(*_FUNC_IDE2_LONG_OLD__ASCII_CHR_046__MY==*__LONG_MY)))||new_error){ if(qbevent){evnt(25753,2974,"ide_methods.bas");if(r)goto S_38736;} S_38737:; if ((-(((float)(FUNC_TIMEELAPSEDSINCE(&(pass4163=*_FUNC_IDE2_DOUBLE_LAST__ASCII_CHR_046__TBCLICK))))>((float)( 0.5E+0 ))))||new_error){ if(qbevent){evnt(25753,2975,"ide_methods.bas");if(r)goto S_38737;} do{ goto LABEL_REGULARTEXTBOX_CLICK; if(!qbevent)break;evnt(25753,2975,"ide_methods.bas");}while(r); } do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,2977,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,2978,"ide_methods.bas");}while(r); S_38742:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,2979,"ide_methods.bas");if(r)goto S_38742;} do{ goto LABEL_REGULARTEXTBOX_CLICK; if(!qbevent)break;evnt(25753,2980,"ide_methods.bas");}while(r); S_38744:; }else{ if (-(*__LONG_ACTIVEINCLUDELINK> 0 )){ if(qbevent){evnt(25753,2981,"ide_methods.bas");if(r)goto S_38744;} do{ qbs_set(_FUNC_IDE2_STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2984,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(_FUNC_IDE2_STRING_P,__STRING_ACTIVEINCLUDELINKFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2985,"ide_methods.bas");}while(r); S_38747:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(_FUNC_IDE2_STRING_F)== 0 )))||new_error){ if(qbevent){evnt(25753,2986,"ide_methods.bas");if(r)goto S_38747;} do{ qbs_set(_FUNC_IDE2_STRING_F,__STRING_ACTIVEINCLUDELINKFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2986,"ide_methods.bas");}while(r); } S_38750:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_FUNC_IDE2_STRING_F)))||new_error){ if(qbevent){evnt(25753,2987,"ide_methods.bas");if(r)goto S_38750;} do{ *_FUNC_IDE2_LONG_BACKUPINCLUDEFILE=func_freefile(); if(!qbevent)break;evnt(25753,2988,"ide_methods.bas");}while(r); do{ sub_open(_FUNC_IDE2_STRING_F, 2 ,NULL,NULL,*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2989,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_TEMPINCLUDE1,func_space(func_lof(*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2990,"ide_methods.bas");}while(r); do{ sub_get2(*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE, 1 ,_FUNC_IDE2_STRING_TEMPINCLUDE1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2991,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE,1); if(!qbevent)break;evnt(25753,2992,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,2994,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4164= 0 )); if(!qbevent)break;evnt(25753,2995,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,2996,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Editing $INCLUDE file...",24),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2997,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4165= 1 )); if(!qbevent)break;evnt(25753,2998,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,2999,"ide_methods.bas");}while(r); do{ sub__delay( 0.2E+0 ); if(!qbevent)break;evnt(25753,3001,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_P,qbs_add(qbs_add(FUNC_QUOTEDFILENAME(func_command( 0 ,1)),qbs_new_txt_len(" ",1)),FUNC_QUOTEDFILENAME(_FUNC_IDE2_STRING_F))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3002,"ide_methods.bas");}while(r); S_38764:; if (((-(*__LONG_ERRORLINEININCLUDE> 0 ))&(-(*__LONG_IDEFOCUSLINE==*__LONG_IDECY)))||new_error){ if(qbevent){evnt(25753,3003,"ide_methods.bas");if(r)goto S_38764;} do{ qbs_set(_FUNC_IDE2_STRING_P,qbs_add(qbs_add(_FUNC_IDE2_STRING_P,qbs_new_txt_len(" -l:",4)),FUNC_STR2(__LONG_ERRORLINEININCLUDE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3004,"ide_methods.bas");}while(r); S_38766:; }else{ if ((-(*__LONG_WARNINGININCLUDELINE> 0 ))&(-(*__LONG_WARNINGININCLUDE==*__LONG_IDECY))){ if(qbevent){evnt(25753,3005,"ide_methods.bas");if(r)goto S_38766;} do{ qbs_set(_FUNC_IDE2_STRING_P,qbs_add(qbs_add(_FUNC_IDE2_STRING_P,qbs_new_txt_len(" -l:",4)),FUNC_STR2(__LONG_WARNINGININCLUDELINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3006,"ide_methods.bas");}while(r); } } do{ sub_shell(_FUNC_IDE2_STRING_P,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3008,"ide_methods.bas");}while(r); do{ sub_open(_FUNC_IDE2_STRING_F, 2 ,NULL,NULL,*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3010,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_TEMPINCLUDE2,func_space(func_lof(*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3011,"ide_methods.bas");}while(r); do{ sub_get2(*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE, 1 ,_FUNC_IDE2_STRING_TEMPINCLUDE2,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3012,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_BACKUPINCLUDEFILE,1); if(!qbevent)break;evnt(25753,3013,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4166= 0 )); if(!qbevent)break;evnt(25753,3015,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4167= 0 )); if(!qbevent)break;evnt(25753,3016,"ide_methods.bas");}while(r); S_38776:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_TEMPINCLUDE1,_FUNC_IDE2_STRING_TEMPINCLUDE2)))||new_error){ if(qbevent){evnt(25753,3018,"ide_methods.bas");if(r)goto S_38776;} S_38777:; if ((*__BYTE_IDESHOWERRORSIMMEDIATELY)||new_error){ if(qbevent){evnt(25753,3019,"ide_methods.bas");if(r)goto S_38777;} S_38778:; if ((-(*__LONG_IDECOMPILING== 1 ))||new_error){ if(qbevent){evnt(25753,3020,"ide_methods.bas");if(r)goto S_38778;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,func_string( 3 , 250 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3021,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("OK",2),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3023,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 0 ; if(!qbevent)break;evnt(25753,3024,"ide_methods.bas");}while(r); S_38783:; if ((-(*__LONG_TOTALWARNINGS> 0 ))||new_error){ if(qbevent){evnt(25753,3025,"ide_methods.bas");if(r)goto S_38783;} do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,3026,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_add(qbs_new_txt_len(" (",2),qbs_ltrim(qbs_str((int32)(*__LONG_TOTALWARNINGS)))),qbs_new_txt_len(" warning",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3027,"ide_methods.bas");}while(r); S_38786:; if ((-(*__LONG_TOTALWARNINGS> 1 ))||new_error){ if(qbevent){evnt(25753,3028,"ide_methods.bas");if(r)goto S_38786;} do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(_FUNC_IDE2_STRING_MSG,qbs_new_txt_len("s",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3028,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(_FUNC_IDE2_STRING_MSG,qbs_new_txt_len(" - click here or Ctrl+W to view)",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3029,"ide_methods.bas");}while(r); do{ sub__printstring( 4 ,*__LONG_IDEWY- 3 ,_FUNC_IDE2_STRING_MSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3030,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 4 ; if(!qbevent)break;evnt(25753,3031,"ide_methods.bas");}while(r); } S_38793:; if ((*_FUNC_IDE2_BYTE_WAITINGFORVARLIST)||new_error){ if(qbevent){evnt(25753,3033,"ide_methods.bas");if(r)goto S_38793;} do{ return_point[next_return_point++]=32; if (next_return_point>=return_points) more_return_points(); goto LABEL_SHOWVARLISTREADY; RETURN_32:; if(!qbevent)break;evnt(25753,3033,"ide_methods.bas");}while(r); } } } }else{ do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3037,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3038,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3041,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_TEMPINCLUDE1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3043,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_TEMPINCLUDE2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3044,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3047,"ide_methods.bas");}while(r); S_38808:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(25753,3048,"ide_methods.bas");if(r)goto S_38808;} do{ goto LABEL_REGULARTEXTBOX_CLICK; if(!qbevent)break;evnt(25753,3048,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__CLICKED,func_mid(_FUNC_IDE2_STRING_A,*__LONG_IDECX, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3049,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,3050,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3051,"ide_methods.bas");}while(r); S_38814:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__CLICKED->len> 0 ))&(qbs_notequal(_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__CLICKED,func_chr( 32 )))))||new_error){ if(qbevent){evnt(25753,3052,"ide_methods.bas");if(r)goto S_38814;} S_38815:; fornext_value4171=*__LONG_IDECX; fornext_finalvalue4171= 1 ; fornext_step4171= -1 ; if (fornext_step4171<0) fornext_step_negative4171=1; else fornext_step_negative4171=0; if (new_error) goto fornext_error4171; goto fornext_entrylabel4171; while(1){ fornext_value4171=fornext_step4171+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4171: *_FUNC_IDE2_LONG_I=fornext_value4171; if (fornext_step_negative4171){ if (fornext_value4171fornext_finalvalue4171) break; } fornext_error4171:; if(qbevent){evnt(25753,3053,"ide_methods.bas");if(r)goto S_38815;} S_38816:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1),0)))||new_error){ if(qbevent){evnt(25753,3054,"ide_methods.bas");if(r)goto S_38816;} do{ goto fornext_exit_4170; if(!qbevent)break;evnt(25753,3054,"ide_methods.bas");}while(r); } fornext_continue_4170:; } fornext_exit_4170:; do{ *__LONG_IDESELECTX1=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,3056,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__SELECTX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,3057,"ide_methods.bas");}while(r); S_38822:; fornext_value4173=*__LONG_IDECX; fornext_finalvalue4173=_FUNC_IDE2_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+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4173: *_FUNC_IDE2_LONG_I=fornext_value4173; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4173){ if (fornext_value4173fornext_finalvalue4173) break; } fornext_error4173:; if(qbevent){evnt(25753,3058,"ide_methods.bas");if(r)goto S_38822;} S_38823:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1),0)))||new_error){ if(qbevent){evnt(25753,3059,"ide_methods.bas");if(r)goto S_38823;} do{ goto fornext_exit_4172; if(!qbevent)break;evnt(25753,3059,"ide_methods.bas");}while(r); } fornext_continue_4172:; } fornext_exit_4172:; do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,3061,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__IDECX=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3062,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT= -1 ; if(!qbevent)break;evnt(25753,3063,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__IDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3064,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_WHOLEWORD__ASCII_CHR_046__SELECTY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,3065,"ide_methods.bas");}while(r); } } } }else{ LABEL_REGULARTEXTBOX_CLICK:; if(qbevent){evnt(25753,3069,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_OLD__ASCII_CHR_046__MX=*__LONG_MX; if(!qbevent)break;evnt(25753,3070,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLD__ASCII_CHR_046__MY=*__LONG_MY; if(!qbevent)break;evnt(25753,3070,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_DOUBLE_LAST__ASCII_CHR_046__TBCLICK=func_timer(NULL,0); if(!qbevent)break;evnt(25753,3070,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,3071,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3072,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3073,"ide_methods.bas");}while(r); S_38841:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3074,"ide_methods.bas");if(r)goto S_38841;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3074,"ide_methods.bas");}while(r); } do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,3075,"ide_methods.bas");}while(r); S_38845:; if (((~(*__LONG_KSHIFT)))||new_error){ if(qbevent){evnt(25753,3076,"ide_methods.bas");if(r)goto S_38845;} do{ *__LONG_IDESELECTX1=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3076,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3076,"ide_methods.bas");}while(r); } do{ *__LONG_IDEMOUSESELECT= 1 ; if(!qbevent)break;evnt(25753,3077,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT= 0 ; if(!qbevent)break;evnt(25753,3078,"ide_methods.bas");}while(r); } S_38852:; }else{ if (((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<=( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))&*__BYTE_SHOWLINENUMBERS)|((-(*__LONG_MX== 1 ))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))&(-(*__BYTE_SHOWLINENUMBERS== 0 )))){ if(qbevent){evnt(25753,3081,"ide_methods.bas");if(r)goto S_38852;} S_38853:; if (((-(*__BYTE_AUTOADDDEBUGCOMMAND!= 0 ))|(-(*__LONG_VWATCHON!= 0 )))||new_error){ if(qbevent){evnt(25753,3084,"ide_methods.bas");if(r)goto S_38853;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3085,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECYTEMP=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3086,"ide_methods.bas");}while(r); S_38856:; if ((-(*_FUNC_IDE2_LONG_IDECYTEMP<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3087,"ide_methods.bas");if(r)goto S_38856;} do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_IDECYTEMP; if(!qbevent)break;evnt(25753,3088,"ide_methods.bas");}while(r); S_38858:; if ((func__keydown( 100304 )|func__keydown( 100303 ))||new_error){ if(qbevent){evnt(25753,3089,"ide_methods.bas");if(r)goto S_38858;} do{ goto LABEL_TOGGLESKIPLINE; if(!qbevent)break;evnt(25753,3090,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_TOGGLEBREAKPOINT; if(!qbevent)break;evnt(25753,3092,"ide_methods.bas");}while(r); } } }else{ do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,3096,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3097,"ide_methods.bas");}while(r); S_38867:; if ((-(*__LONG_IDECY<*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3098,"ide_methods.bas");if(r)goto S_38867;} S_38868:; if (((~(*__LONG_KSHIFT)))||new_error){ if(qbevent){evnt(25753,3099,"ide_methods.bas");if(r)goto S_38868;} do{ *__LONG_IDESELECTX1= 1 ; if(!qbevent)break;evnt(25753,3099,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3099,"ide_methods.bas");}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,3100,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3101,"ide_methods.bas");}while(r); S_38874:; }else{ if (-(*__LONG_IDECY==*__LONG_IDEN)){ if(qbevent){evnt(25753,3102,"ide_methods.bas");if(r)goto S_38874;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3103,"ide_methods.bas");}while(r); S_38876:; if (((~(*__LONG_KSHIFT)))||new_error){ if(qbevent){evnt(25753,3104,"ide_methods.bas");if(r)goto S_38876;} do{ *__LONG_IDESELECTX1= 1 ; if(!qbevent)break;evnt(25753,3104,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3104,"ide_methods.bas");}while(r); } do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3105,"ide_methods.bas");}while(r); S_38881:; }else{ if (-(*__LONG_IDECY>*__LONG_IDEN)){ if(qbevent){evnt(25753,3106,"ide_methods.bas");if(r)goto S_38881;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3107,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3108,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3109,"ide_methods.bas");}while(r); } } } do{ *_FUNC_IDE2_BYTE_WHOLEWORD__ASCII_CHR_046__SELECT= 0 ; if(!qbevent)break;evnt(25753,3111,"ide_methods.bas");}while(r); do{ *__LONG_IDEMOUSESELECT= 0 ; if(!qbevent)break;evnt(25753,3112,"ide_methods.bas");}while(r); } } } } LABEL_DONEWHOLEWORD:; if(qbevent){evnt(25753,3117,"ide_methods.bas");r=0;} S_38891:; if ((*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,3119,"ide_methods.bas");if(r)goto S_38891;} LABEL_INVOKECONTEXTUALMENU:; if(qbevent){evnt(25753,3120,"ide_methods.bas");r=0;} S_38892:; if (((-(*__LONG_MX>( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(25753,3121,"ide_methods.bas");if(r)goto S_38892;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,3122,"ide_methods.bas");}while(r); S_38894:; if ((-(*__LONG_IDESELECT== 0 ))||new_error){ if(qbevent){evnt(25753,3123,"ide_methods.bas");if(r)goto S_38894;} do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3124,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3125,"ide_methods.bas");}while(r); S_38897:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3126,"ide_methods.bas");if(r)goto S_38897;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3126,"ide_methods.bas");}while(r); } }else{ S_38901:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,3128,"ide_methods.bas");if(r)goto S_38901;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3129,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3130,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,3131,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3131,"ide_methods.bas");}while(r); S_38906:; if ((-(*_FUNC_IDE2_LONG_SX2<*_FUNC_IDE2_LONG_SX1))||new_error){ if(qbevent){evnt(25753,3132,"ide_methods.bas");if(r)goto S_38906;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,3132,"ide_methods.bas");}while(r); } S_38909:; fornext_value4177=*_FUNC_IDE2_LONG_SX1; fornext_finalvalue4177=*_FUNC_IDE2_LONG_SX2- 1 ; fornext_step4177= 1 ; if (fornext_step4177<0) fornext_step_negative4177=1; else fornext_step_negative4177=0; if (new_error) goto fornext_error4177; goto fornext_entrylabel4177; while(1){ fornext_value4177=fornext_step4177+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4177: *_FUNC_IDE2_LONG_X=fornext_value4177; if (fornext_step_negative4177){ if (fornext_value4177fornext_finalvalue4177) break; } fornext_error4177:; if(qbevent){evnt(25753,3133,"ide_methods.bas");if(r)goto S_38909;} S_38910:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,3134,"ide_methods.bas");if(r)goto S_38910;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3134,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3134,"ide_methods.bas");}while(r); } fornext_continue_4176:; } fornext_exit_4176:; S_38916:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,3136,"ide_methods.bas");if(r)goto S_38916;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3138,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3139,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3140,"ide_methods.bas");}while(r); S_38920:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3141,"ide_methods.bas");if(r)goto S_38920;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3141,"ide_methods.bas");}while(r); } }else{ S_38924:; if (((-(((*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH)<*_FUNC_IDE2_LONG_SX1))|(-(((*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH)>*_FUNC_IDE2_LONG_SX2)))||new_error){ if(qbevent){evnt(25753,3144,"ide_methods.bas");if(r)goto S_38924;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3145,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3146,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3147,"ide_methods.bas");}while(r); S_38928:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3148,"ide_methods.bas");if(r)goto S_38928;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3148,"ide_methods.bas");}while(r); } } S_38932:; if (((-((*__LONG_MY- 2 +*__LONG_IDESY- 1 )<*__LONG_IDECY))|(-((*__LONG_MY- 2 +*__LONG_IDESY- 1 )>*__LONG_IDECY)))||new_error){ if(qbevent){evnt(25753,3150,"ide_methods.bas");if(r)goto S_38932;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3151,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3152,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3153,"ide_methods.bas");}while(r); S_38936:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3154,"ide_methods.bas");if(r)goto S_38936;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3154,"ide_methods.bas");}while(r); } } } }else{ do{ *_FUNC_IDE2_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,3159,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3160,"ide_methods.bas");}while(r); S_38944:; if ((-(*_FUNC_IDE2_LONG_SY1>*_FUNC_IDE2_LONG_SY2))||new_error){ if(qbevent){evnt(25753,3161,"ide_methods.bas");if(r)goto S_38944;} do{ swap_32(&*_FUNC_IDE2_LONG_SY1,&*_FUNC_IDE2_LONG_SY2); if(!qbevent)break;evnt(25753,3161,"ide_methods.bas");}while(r); } S_38947:; if (((-((*__LONG_MY- 2 +*__LONG_IDESY- 1 )<*_FUNC_IDE2_LONG_SY1))|(-((*__LONG_MY- 2 +*__LONG_IDESY- 1 )>*_FUNC_IDE2_LONG_SY2)))||new_error){ if(qbevent){evnt(25753,3162,"ide_methods.bas");if(r)goto S_38947;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3163,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3164,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3165,"ide_methods.bas");}while(r); S_38951:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3166,"ide_methods.bas");if(r)goto S_38951;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3166,"ide_methods.bas");}while(r); } } } } do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,3170,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3171,"ide_methods.bas");}while(r); do{ SUB_IDEMAKECONTEXTUALMENU(); if(!qbevent)break;evnt(25753,3172,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 1 ; if(!qbevent)break;evnt(25753,3173,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,3174,"ide_methods.bas");}while(r); S_38962:; }else{ if ((-(*__LONG_IDEHELP== 1 ))&(-(*__LONG_MY>=*__LONG_IDEWY))&(-(*__LONG_MY<(*__LONG_IDEWY+*__LONG_IDESUBWINDOW)))){ if(qbevent){evnt(25753,3175,"ide_methods.bas");if(r)goto S_38962;} do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,3176,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,3177,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3178,"ide_methods.bas");}while(r); do{ SUB_IDEMAKECONTEXTUALMENU(); if(!qbevent)break;evnt(25753,3179,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 1 ; if(!qbevent)break;evnt(25753,3180,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,3181,"ide_methods.bas");}while(r); } } } S_38971:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,3185,"ide_methods.bas");if(r)goto S_38971;} S_38972:; if ((-(*__LONG_MX==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,3186,"ide_methods.bas");if(r)goto S_38972;} S_38973:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(25753,3187,"ide_methods.bas");if(r)goto S_38973;} do{ *_FUNC_IDE2_LONG_Y=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4179= 3 ),&(pass4180=*__LONG_IDEWY- 8 ),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(25753,3188,"ide_methods.bas");}while(r); S_38975:; if ((-(*_FUNC_IDE2_LONG_Y==*__LONG_MY))||new_error){ if(qbevent){evnt(25753,3189,"ide_methods.bas");if(r)goto S_38975;} do{ *__LONG_IDEMOUSESELECT= 2 ; if(!qbevent)break;evnt(25753,3190,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3191,"ide_methods.bas");}while(r); } } } } S_38982:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,3197,"ide_methods.bas");if(r)goto S_38982;} S_38983:; if ((-(*__LONG_MY==(*__LONG_IDEWY- 5 )))||new_error){ if(qbevent){evnt(25753,3198,"ide_methods.bas");if(r)goto S_38983;} do{ *_FUNC_IDE2_LONG_X=FUNC_IDEHBAR(&(pass4181= 2 ),&(pass4182=*__LONG_IDEWY- 5 ),&(pass4183=*__LONG_IDEWX- 2 ),__LONG_IDESX,&(pass4184= 608 )); if(!qbevent)break;evnt(25753,3199,"ide_methods.bas");}while(r); S_38985:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_MX))||new_error){ if(qbevent){evnt(25753,3200,"ide_methods.bas");if(r)goto S_38985;} do{ *__LONG_IDEMOUSESELECT= 3 ; if(!qbevent)break;evnt(25753,3201,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3202,"ide_methods.bas");}while(r); } } } S_38991:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 0 )))||new_error){ if(qbevent){evnt(25753,3207,"ide_methods.bas");if(r)goto S_38991;} S_38992:; if (((-(*__LONG_MX==*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(25753,3208,"ide_methods.bas");if(r)goto S_38992;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3209,"ide_methods.bas");}while(r); S_38994:; if ((-(*__LONG_MY== 3 ))||new_error){ if(qbevent){evnt(25753,3210,"ide_methods.bas");if(r)goto S_38994;} do{ *__LONG_KB= 18432 ; if(!qbevent)break;evnt(25753,3210,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3210,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3210,"ide_methods.bas");}while(r); } S_38999:; if ((-(*__LONG_MY==(*__LONG_IDEWY- 6 )))||new_error){ if(qbevent){evnt(25753,3211,"ide_methods.bas");if(r)goto S_38999;} do{ *__LONG_KB= 20480 ; if(!qbevent)break;evnt(25753,3211,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3211,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3211,"ide_methods.bas");}while(r); } S_39004:; if (((-(*__LONG_MY> 3 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 6 ))))||new_error){ if(qbevent){evnt(25753,3212,"ide_methods.bas");if(r)goto S_39004;} S_39005:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(25753,3214,"ide_methods.bas");if(r)goto S_39005;} do{ *_FUNC_IDE2_LONG_Y=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4185= 3 ),&(pass4186=*__LONG_IDEWY- 8 ),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(25753,3215,"ide_methods.bas");}while(r); S_39007:; if ((-(*_FUNC_IDE2_LONG_Y!=*__LONG_MY))||new_error){ if(qbevent){evnt(25753,3216,"ide_methods.bas");if(r)goto S_39007;} S_39008:; if ((-(*__LONG_MY<*_FUNC_IDE2_LONG_Y))||new_error){ if(qbevent){evnt(25753,3217,"ide_methods.bas");if(r)goto S_39008;} do{ *__LONG_KB= 18688 ; if(!qbevent)break;evnt(25753,3218,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3218,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3218,"ide_methods.bas");}while(r); }else{ do{ *__LONG_KB= 20736 ; if(!qbevent)break;evnt(25753,3220,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3220,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3220,"ide_methods.bas");}while(r); } } } } } } S_39022:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 0 )))||new_error){ if(qbevent){evnt(25753,3228,"ide_methods.bas");if(r)goto S_39022;} S_39023:; if (((-(*__LONG_MY==(*__LONG_IDEWY- 5 )))&(-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,3229,"ide_methods.bas");if(r)goto S_39023;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3230,"ide_methods.bas");}while(r); S_39025:; if ((-(*__LONG_MX== 2 ))||new_error){ if(qbevent){evnt(25753,3231,"ide_methods.bas");if(r)goto S_39025;} do{ *__LONG_KB= 19200 ; if(!qbevent)break;evnt(25753,3231,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3231,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3231,"ide_methods.bas");}while(r); } S_39030:; if ((-(*__LONG_MX==(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(25753,3232,"ide_methods.bas");if(r)goto S_39030;} do{ *__LONG_KB= 19712 ; if(!qbevent)break;evnt(25753,3232,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3232,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3232,"ide_methods.bas");}while(r); } S_39035:; if (((-(*__LONG_MX> 2 ))&(-(*__LONG_MX<(*__LONG_IDEWX- 1 ))))||new_error){ if(qbevent){evnt(25753,3233,"ide_methods.bas");if(r)goto S_39035;} do{ *_FUNC_IDE2_LONG_X=FUNC_IDEHBAR(&(pass4187= 2 ),&(pass4188=*__LONG_IDEWY- 5 ),&(pass4189=*__LONG_IDEWX- 2 ),__LONG_IDESX,&(pass4190= 608 )); if(!qbevent)break;evnt(25753,3235,"ide_methods.bas");}while(r); S_39037:; if ((-(*_FUNC_IDE2_LONG_X!=*__LONG_MX))||new_error){ if(qbevent){evnt(25753,3236,"ide_methods.bas");if(r)goto S_39037;} S_39038:; if ((-(*__LONG_MX<*_FUNC_IDE2_LONG_X))||new_error){ if(qbevent){evnt(25753,3237,"ide_methods.bas");if(r)goto S_39038;} do{ *__LONG_IDECX=*__LONG_IDECX- 8 ; if(!qbevent)break;evnt(25753,3238,"ide_methods.bas");}while(r); S_39040:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(25753,3239,"ide_methods.bas");if(r)goto S_39040;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3239,"ide_methods.bas");}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3240,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3240,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDECX=*__LONG_IDECX+ 8 ; if(!qbevent)break;evnt(25753,3242,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3243,"ide_methods.bas");}while(r); do{ *__LONG_IDEMBMONITOR= 1 ; if(!qbevent)break;evnt(25753,3243,"ide_methods.bas");}while(r); } } } } } S_39054:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 2 )))||new_error){ if(qbevent){evnt(25753,3251,"ide_methods.bas");if(r)goto S_39054;} S_39055:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(25753,3253,"ide_methods.bas");if(r)goto S_39055;} S_39056:; if ((-(*__LONG_MY<= 4 ))||new_error){ if(qbevent){evnt(25753,3254,"ide_methods.bas");if(r)goto S_39056;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,3254,"ide_methods.bas");}while(r); } S_39059:; if ((-(*__LONG_MY>=(*__LONG_IDEWY- 7 )))||new_error){ if(qbevent){evnt(25753,3255,"ide_methods.bas");if(r)goto S_39059;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3255,"ide_methods.bas");}while(r); } S_39062:; if (((-(*__LONG_MY> 4 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 7 ))))||new_error){ if(qbevent){evnt(25753,3256,"ide_methods.bas");if(r)goto S_39062;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY; if(!qbevent)break;evnt(25753,3257,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_Y- 3 - 2 + 0.5E+0 ; if(!qbevent)break;evnt(25753,3258,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ ((*__LONG_IDEWY- 8 )- 4 ); if(!qbevent)break;evnt(25753,3259,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P*(*__LONG_IDEN- 1 ))+( 1 )); if(!qbevent)break;evnt(25753,3260,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,3261,"ide_methods.bas");}while(r); } } } S_39071:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT== 3 )))||new_error){ if(qbevent){evnt(25753,3266,"ide_methods.bas");if(r)goto S_39071;} S_39072:; if ((-(*__LONG_MX<= 3 ))||new_error){ if(qbevent){evnt(25753,3268,"ide_methods.bas");if(r)goto S_39072;} do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,3268,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(25753,3268,"ide_methods.bas");}while(r); } S_39076:; if ((-(*__LONG_MX>=(*__LONG_IDEWX- 2 )))||new_error){ if(qbevent){evnt(25753,3269,"ide_methods.bas");if(r)goto S_39076;} do{ *__LONG_IDESX= 608 ; if(!qbevent)break;evnt(25753,3269,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(25753,3269,"ide_methods.bas");}while(r); } S_39080:; if (((-(*__LONG_MX> 3 ))&(-(*__LONG_MX<(*__LONG_IDEWX- 2 ))))||new_error){ if(qbevent){evnt(25753,3270,"ide_methods.bas");if(r)goto S_39080;} do{ *_FUNC_IDE2_LONG_X=*__LONG_MX; if(!qbevent)break;evnt(25753,3271,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_LONG_X- 2 - 2 + 0.5E+0 ; if(!qbevent)break;evnt(25753,3272,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_SINGLE_P=*_FUNC_IDE2_SINGLE_P/ ((*__LONG_IDEWX- 2 )- 4 ); if(!qbevent)break;evnt(25753,3273,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=qbr((*_FUNC_IDE2_SINGLE_P*( 608 - 1 ))+( 1 )); if(!qbevent)break;evnt(25753,3274,"ide_methods.bas");}while(r); do{ *__LONG_IDESX=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,3275,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(25753,3276,"ide_methods.bas");}while(r); } } S_39089:; if ((*__LONG_MB&(-(*__LONG_IDEMOUSESELECT<= 1 )))||new_error){ if(qbevent){evnt(25753,3280,"ide_methods.bas");if(r)goto S_39089;} S_39090:; if (((-(*__LONG_MX>( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(25753,3281,"ide_methods.bas");if(r)goto S_39090;} S_39091:; if ((-(*__LONG_IDEMOUSESELECT== 1 ))||new_error){ if(qbevent){evnt(25753,3282,"ide_methods.bas");if(r)goto S_39091;} do{ *__LONG_IDECX=(*__LONG_MX- 1 +*__LONG_IDESX- 1 )-*__LONG_MAXLINENUMBERLENGTH; if(!qbevent)break;evnt(25753,3283,"ide_methods.bas");}while(r); S_39093:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(25753,3284,"ide_methods.bas");if(r)goto S_39093;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3284,"ide_methods.bas");}while(r); } do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3285,"ide_methods.bas");}while(r); S_39097:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3286,"ide_methods.bas");if(r)goto S_39097;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3286,"ide_methods.bas");}while(r); } } } } S_39103:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,3291,"ide_methods.bas");if(r)goto S_39103;} S_39104:; if ((((((-(*__LONG_MX== 1 ))&(-(*__BYTE_SHOWLINENUMBERS== 0 )))|((-(*__LONG_MX<=( 1 +*__LONG_MAXLINENUMBERLENGTH)))&*__BYTE_SHOWLINENUMBERS)))|(-(*__LONG_MX==*__LONG_IDEWX))|(-(*__LONG_MY<= 2 ))|(-(*__LONG_MY>=(*__LONG_IDEWY- 5 ))))||new_error){ if(qbevent){evnt(25753,3292,"ide_methods.bas");if(r)goto S_39104;} S_39105:; if ((-(*__LONG_IDEMOUSESELECT== 1 ))||new_error){ if(qbevent){evnt(25753,3293,"ide_methods.bas");if(r)goto S_39105;} S_39106:; if ((-(*__LONG_MY>=(*__LONG_IDEWY- 5 )))||new_error){ if(qbevent){evnt(25753,3296,"ide_methods.bas");if(r)goto S_39106;} do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,3296,"ide_methods.bas");}while(r); S_39108:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3296,"ide_methods.bas");if(r)goto S_39108;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3296,"ide_methods.bas");}while(r); } } S_39112:; if ((-(*__LONG_MY<= 2 ))||new_error){ if(qbevent){evnt(25753,3297,"ide_methods.bas");if(r)goto S_39112;} do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(25753,3297,"ide_methods.bas");}while(r); S_39114:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,3297,"ide_methods.bas");if(r)goto S_39114;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,3297,"ide_methods.bas");}while(r); } } S_39118:; if (((((-(*__LONG_MX== 1 ))&(-(*__BYTE_SHOWLINENUMBERS== 0 )))|((-(*__LONG_MX<=( 1 +*__LONG_MAXLINENUMBERLENGTH)))&*__BYTE_SHOWLINENUMBERS)))||new_error){ if(qbevent){evnt(25753,3298,"ide_methods.bas");if(r)goto S_39118;} do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,3298,"ide_methods.bas");}while(r); S_39120:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(25753,3298,"ide_methods.bas");if(r)goto S_39120;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3298,"ide_methods.bas");}while(r); } } S_39124:; if ((-(*__LONG_MX==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,3299,"ide_methods.bas");if(r)goto S_39124;} do{ *__LONG_IDECX=*__LONG_IDECX+ 1 ; if(!qbevent)break;evnt(25753,3299,"ide_methods.bas");}while(r); } do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,3300,"ide_methods.bas");}while(r); } } } S_39131:; 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(25753,3311,"ide_methods.bas");if(r)goto S_39131;} LABEL_IDEMSELECTALL:; if(qbevent){evnt(25753,3312,"ide_methods.bas");r=0;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,3313,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1= 1 ; if(!qbevent)break;evnt(25753,3313,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1= 1 ; if(!qbevent)break;evnt(25753,3313,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3314,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3315,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3316,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3317,"ide_methods.bas");}while(r); } S_39140:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("G",1)))))||new_error){ if(qbevent){evnt(25753,3320,"ide_methods.bas");if(r)goto S_39140;} S_39141:; if ((*__LONG_KSHIFT&(-(*__LONG_IDEFOCUSLINE> 0 )))||new_error){ if(qbevent){evnt(25753,3321,"ide_methods.bas");if(r)goto S_39141;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3322,"ide_methods.bas");}while(r); do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,3323,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDEFOCUSLINE; if(!qbevent)break;evnt(25753,3324,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3325,"ide_methods.bas");}while(r); }else{ do{ SUB_IDEGOTOBOX(); if(!qbevent)break;evnt(25753,3327,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3329,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3329,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3331,"ide_methods.bas");}while(r); } S_39153:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("N",1)))))||new_error){ if(qbevent){evnt(25753,3334,"ide_methods.bas");if(r)goto S_39153;} do{ goto LABEL_CTRLNEW; if(!qbevent)break;evnt(25753,3335,"ide_methods.bas");}while(r); } S_39156:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("O",1)))))||new_error){ if(qbevent){evnt(25753,3338,"ide_methods.bas");if(r)goto S_39156;} do{ qbs_set(__STRING_IDEOPENFILE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3339,"ide_methods.bas");}while(r); do{ goto LABEL_CTRLOPEN; if(!qbevent)break;evnt(25753,3340,"ide_methods.bas");}while(r); } S_39160:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("P",1)))))||new_error){ if(qbevent){evnt(25753,3343,"ide_methods.bas");if(r)goto S_39160;} do{ goto LABEL_TOGGLESKIPLINE; if(!qbevent)break;evnt(25753,3344,"ide_methods.bas");}while(r); } S_39163:; if ((qbs_cleanup(qbs_tmp_base,((~(*__LONG_KSHIFT)))&*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("R",1)))))||new_error){ if(qbevent){evnt(25753,3347,"ide_methods.bas");if(r)goto S_39163;} do{ goto LABEL_CTRLADDCOMMENT; if(!qbevent)break;evnt(25753,3348,"ide_methods.bas");}while(r); } S_39166:; if ((qbs_cleanup(qbs_tmp_base,((~(*__LONG_KSHIFT)))&*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("T",1)))))||new_error){ if(qbevent){evnt(25753,3351,"ide_methods.bas");if(r)goto S_39166;} do{ goto LABEL_CTRLTOGGLECOMMENT; if(!qbevent)break;evnt(25753,3352,"ide_methods.bas");}while(r); } S_39169:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT&*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("R",1)))))||new_error){ if(qbevent){evnt(25753,3355,"ide_methods.bas");if(r)goto S_39169;} do{ goto LABEL_CTRLREMOVECOMMENT; if(!qbevent)break;evnt(25753,3356,"ide_methods.bas");}while(r); } S_39172:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("S",1)))))||new_error){ if(qbevent){evnt(25753,3359,"ide_methods.bas");if(r)goto S_39172;} S_39173:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,3360,"ide_methods.bas");if(r)goto S_39173;} do{ qbs_set(_FUNC_IDE2_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3361,"ide_methods.bas");}while(r); S_39175:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,3362,"ide_methods.bas");if(r)goto S_39175;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),&(pass4192= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3363,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(qbs_add(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len(".bas",4)),&(pass4193= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3365,"ide_methods.bas");}while(r); } S_39180:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,3367,"ide_methods.bas");if(r)goto S_39180;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3367,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3367,"ide_methods.bas");}while(r); do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,3367,"ide_methods.bas");}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(25753,3369,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3371,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3371,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,3371,"ide_methods.bas");}while(r); } S_39192:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 60 ))))))||new_error){ if(qbevent){evnt(25753,3374,"ide_methods.bas");if(r)goto S_39192;} S_39193:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,3375,"ide_methods.bas");if(r)goto S_39193;} S_39194:; if ((-(*__LONG_QUICKNAVTOTAL> 0 ))||new_error){ if(qbevent){evnt(25753,3376,"ide_methods.bas");if(r)goto S_39194;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3377,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+12)); if(!qbevent)break;evnt(25753,3378,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+8)); if(!qbevent)break;evnt(25753,3379,"ide_methods.bas");}while(r); do{ *__LONG_IDESY=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+4)); if(!qbevent)break;evnt(25753,3380,"ide_methods.bas");}while(r); do{ *__LONG_IDESX=*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16)); if(!qbevent)break;evnt(25753,3381,"ide_methods.bas");}while(r); do{ *__LONG_QUICKNAVTOTAL=*__LONG_QUICKNAVTOTAL- 1 ; if(!qbevent)break;evnt(25753,3382,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,3383,"ide_methods.bas");}while(r); } }else{ do{ goto LABEL_IDESUBSJMP; if(!qbevent)break;evnt(25753,3386,"ide_methods.bas");}while(r); } } S_39207:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KCONTROL&(qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("W",1)))))||new_error){ if(qbevent){evnt(25753,3390,"ide_methods.bas");if(r)goto S_39207;} S_39208:; if ((-(*__LONG_TOTALWARNINGS> 0 ))||new_error){ if(qbevent){evnt(25753,3391,"ide_methods.bas");if(r)goto S_39208;} do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEWARNINGBOX(); if(!qbevent)break;evnt(25753,3392,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3394,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3394,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3395,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Compilation status",18),qbs_new_txt_len("No warnings to display.",23),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3397,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3398,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3398,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,3399,"ide_methods.bas");}while(r); } } S_39220:; 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(25753,3403,"ide_methods.bas");if(r)goto S_39220;} LABEL_IDEMUNDO:; if(qbevent){evnt(25753,3404,"ide_methods.bas");r=0;} S_39221:; if ((*__LONG_IDEUNDOPOS)||new_error){ if(qbevent){evnt(25753,3405,"ide_methods.bas");if(r)goto S_39221;} 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(25753,3406,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3407,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3407,"ide_methods.bas");}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(25753,3407,"ide_methods.bas");}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(25753,3407,"ide_methods.bas");}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(25753,3407,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U= 0 ; if(!qbevent)break;evnt(25753,3410,"ide_methods.bas");}while(r); S_39229:; if ((-(*_FUNC_IDE2_LONG_P2>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,3411,"ide_methods.bas");if(r)goto S_39229;} S_39230:; if ((-(*__LONG_IDEUNDOPOS>*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,3413,"ide_methods.bas");if(r)goto S_39230;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_4194),1); if(!qbevent)break;evnt(25753,3414,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS- 4 -*_FUNC_IDE2_LONG_UPL- 4 ; if(!qbevent)break;evnt(25753,3415,"ide_methods.bas");}while(r); } }else{ S_39235:; if ((-(*__LONG_IDEUNDOPOS>*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,3419,"ide_methods.bas");if(r)goto S_39235;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_4195),1); if(!qbevent)break;evnt(25753,3420,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS- 4 -*_FUNC_IDE2_LONG_UPL- 4 ; if(!qbevent)break;evnt(25753,3421,"ide_methods.bas");}while(r); } S_39239:; if ((-(*__LONG_IDEUNDOPOS<=*_FUNC_IDE2_LONG_P2))||new_error){ if(qbevent){evnt(25753,3423,"ide_methods.bas");if(r)goto S_39239;} S_39240:; if ((-(*__LONG_IDEUNDOPOS== 13 ))||new_error){ if(qbevent){evnt(25753,3424,"ide_methods.bas");if(r)goto S_39240;} do{ *_FUNC_IDE2_LONG_U=*_FUNC_IDE2_LONG_PLAST; if(!qbevent)break;evnt(25753,3425,"ide_methods.bas");}while(r); }else{ do{ sub_get( 150 ,*__LONG_IDEUNDOPOS- 4 ,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_4196),1); if(!qbevent)break;evnt(25753,3427,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS- 4 -*_FUNC_IDE2_LONG_UPL- 4 ; if(!qbevent)break;evnt(25753,3428,"ide_methods.bas");}while(r); } } } S_39248:; if ((*_FUNC_IDE2_LONG_U)||new_error){ if(qbevent){evnt(25753,3433,"ide_methods.bas");if(r)goto S_39248;} S_39249:; if ((-(*__LONG_IDEUNDOPOS==*__LONG_IDEUNDOBASE))||new_error){ if(qbevent){evnt(25753,3435,"ide_methods.bas");if(r)goto S_39249;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3438,"ide_methods.bas");}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(25753,3439,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3440,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3440,"ide_methods.bas");}while(r); S_39254:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_WHAT,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(25753,3441,"ide_methods.bas");if(r)goto S_39254;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,3442,"ide_methods.bas");}while(r); do{ goto LABEL_SKIPUNDO; if(!qbevent)break;evnt(25753,3443,"ide_methods.bas");}while(r); } S_39258:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDEUNSAVED== 1 ))&(qbs_notequal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25753,3445,"ide_methods.bas");if(r)goto S_39258;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3446,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3447,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,3448,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,3448,"ide_methods.bas");}while(r); S_39263:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,3449,"ide_methods.bas");if(r)goto S_39263;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,3449,"ide_methods.bas");}while(r); do{ goto LABEL_SKIPUNDO; if(!qbevent)break;evnt(25753,3449,"ide_methods.bas");}while(r); } S_39267:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,3450,"ide_methods.bas");if(r)goto S_39267;} do{ SUB_IDESAVE(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3451,"ide_methods.bas");}while(r); } } do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(25753,3454,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPROGNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3455,"ide_methods.bas");}while(r); do{ sub__title(__STRING_WINDOWTITLE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3456,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOBASE= -1 ; if(!qbevent)break;evnt(25753,3457,"ide_methods.bas");}while(r); } do{ *__LONG_IDEUNDOPOS=*_FUNC_IDE2_LONG_U; if(!qbevent)break;evnt(25753,3460,"ide_methods.bas");}while(r); do{ sub_seek( 150 ,*_FUNC_IDE2_LONG_U); if(!qbevent)break;evnt(25753,3463,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_L2,4,byte_element_4197),0); if(!qbevent)break;evnt(25753,3464,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESX,4,byte_element_4198),0); if(!qbevent)break;evnt(25753,3465,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESY,4,byte_element_4199),0); if(!qbevent)break;evnt(25753,3465,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECX,4,byte_element_4200),0); if(!qbevent)break;evnt(25753,3466,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECY,4,byte_element_4201),0); if(!qbevent)break;evnt(25753,3466,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECT,4,byte_element_4202),0); if(!qbevent)break;evnt(25753,3467,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTX1,4,byte_element_4203),0); if(!qbevent)break;evnt(25753,3467,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTY1,4,byte_element_4204),0); if(!qbevent)break;evnt(25753,3467,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEN,4,byte_element_4205),0); if(!qbevent)break;evnt(25753,3468,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEL,4,byte_element_4206),0); if(!qbevent)break;evnt(25753,3469,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDELI,4,byte_element_4207),0); if(!qbevent)break;evnt(25753,3470,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEBMKN,4,byte_element_4208),0); if(!qbevent)break;evnt(25753,3472,"ide_methods.bas");}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(25753,3472,"ide_methods.bas");}while(r); S_39291:; fornext_value4210= 1 ; fornext_finalvalue4210=*__LONG_IDEBMKN; fornext_step4210= 1 ; if (fornext_step4210<0) fornext_step_negative4210=1; else fornext_step_negative4210=0; if (new_error) goto fornext_error4210; goto fornext_entrylabel4210; while(1){ fornext_value4210=fornext_step4210+(*_FUNC_IDE2_LONG_BI); fornext_entrylabel4210: *_FUNC_IDE2_LONG_BI=fornext_value4210; if (fornext_step_negative4210){ if (fornext_value4210fornext_finalvalue4210) break; } fornext_error4210:; if(qbevent){evnt(25753,3473,"ide_methods.bas");if(r)goto S_39291;} 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_4211),0); if(!qbevent)break;evnt(25753,3473,"ide_methods.bas");}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_4212),0); if(!qbevent)break;evnt(25753,3473,"ide_methods.bas");}while(r); fornext_continue_4209:; } fornext_exit_4209:; do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_X,4,byte_element_4213),0); if(!qbevent)break;evnt(25753,3474,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,func_space(*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3474,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,__STRING_IDET,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3474,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3476,"ide_methods.bas");}while(r); do{ *__LONG_IDENOUNDO= 1 ; if(!qbevent)break;evnt(25753,3476,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3476,"ide_methods.bas");}while(r); } LABEL_SKIPUNDO:; if(qbevent){evnt(25753,3480,"ide_methods.bas");r=0;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,3481,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3483,"ide_methods.bas");}while(r); } S_39306:; 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(25753,3488,"ide_methods.bas");if(r)goto S_39306;} LABEL_IDEMREDO:; if(qbevent){evnt(25753,3489,"ide_methods.bas");r=0;} S_39307:; if ((*__LONG_IDEUNDOPOS)||new_error){ if(qbevent){evnt(25753,3490,"ide_methods.bas");if(r)goto S_39307;} 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(25753,3491,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_H,func_space( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3492,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,_FUNC_IDE2_STRING_H,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3492,"ide_methods.bas");}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(25753,3492,"ide_methods.bas");}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(25753,3492,"ide_methods.bas");}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(25753,3492,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U= 0 ; if(!qbevent)break;evnt(25753,3495,"ide_methods.bas");}while(r); S_39315:; if ((-(*_FUNC_IDE2_LONG_P2>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,3496,"ide_methods.bas");if(r)goto S_39315;} S_39316:; if ((-(*__LONG_IDEUNDOPOS<*_FUNC_IDE2_LONG_P2))||new_error){ if(qbevent){evnt(25753,3498,"ide_methods.bas");if(r)goto S_39316;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_4214),1); if(!qbevent)break;evnt(25753,3499,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS+ 4 +*_FUNC_IDE2_LONG_UPL+ 4 ; if(!qbevent)break;evnt(25753,3500,"ide_methods.bas");}while(r); } }else{ S_39321:; if ((-(*__LONG_IDEUNDOPOS>=*_FUNC_IDE2_LONG_P1))||new_error){ if(qbevent){evnt(25753,3504,"ide_methods.bas");if(r)goto S_39321;} S_39322:; if ((-(*__LONG_IDEUNDOPOS==*_FUNC_IDE2_LONG_PLAST))||new_error){ if(qbevent){evnt(25753,3505,"ide_methods.bas");if(r)goto S_39322;} do{ *_FUNC_IDE2_LONG_U= 13 ; if(!qbevent)break;evnt(25753,3506,"ide_methods.bas");}while(r); }else{ do{ sub_get( 150 ,*__LONG_IDEUNDOPOS,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_4215),1); if(!qbevent)break;evnt(25753,3508,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS+ 4 +*_FUNC_IDE2_LONG_UPL+ 4 ; if(!qbevent)break;evnt(25753,3509,"ide_methods.bas");}while(r); } }else{ S_39329:; if ((-(*__LONG_IDEUNDOPOS<*_FUNC_IDE2_LONG_P2))||new_error){ if(qbevent){evnt(25753,3512,"ide_methods.bas");if(r)goto S_39329;} do{ sub_get( 150 ,*__LONG_IDEUNDOPOS,byte_element((uint64)_FUNC_IDE2_LONG_UPL,4,byte_element_4216),1); if(!qbevent)break;evnt(25753,3513,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_U=*__LONG_IDEUNDOPOS+ 4 +*_FUNC_IDE2_LONG_UPL+ 4 ; if(!qbevent)break;evnt(25753,3514,"ide_methods.bas");}while(r); } } } S_39335:; if ((*_FUNC_IDE2_LONG_U)||new_error){ if(qbevent){evnt(25753,3519,"ide_methods.bas");if(r)goto S_39335;} do{ *__LONG_IDEUNDOPOS=*_FUNC_IDE2_LONG_U; if(!qbevent)break;evnt(25753,3521,"ide_methods.bas");}while(r); do{ sub_seek( 150 ,*_FUNC_IDE2_LONG_U); if(!qbevent)break;evnt(25753,3524,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_L2,4,byte_element_4217),0); if(!qbevent)break;evnt(25753,3525,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESX,4,byte_element_4218),0); if(!qbevent)break;evnt(25753,3526,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESY,4,byte_element_4219),0); if(!qbevent)break;evnt(25753,3526,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECX,4,byte_element_4220),0); if(!qbevent)break;evnt(25753,3527,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDECY,4,byte_element_4221),0); if(!qbevent)break;evnt(25753,3527,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECT,4,byte_element_4222),0); if(!qbevent)break;evnt(25753,3528,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTX1,4,byte_element_4223),0); if(!qbevent)break;evnt(25753,3528,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDESELECTY1,4,byte_element_4224),0); if(!qbevent)break;evnt(25753,3528,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEN,4,byte_element_4225),0); if(!qbevent)break;evnt(25753,3529,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEL,4,byte_element_4226),0); if(!qbevent)break;evnt(25753,3530,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDELI,4,byte_element_4227),0); if(!qbevent)break;evnt(25753,3531,"ide_methods.bas");}while(r); do{ sub_get( 150 ,NULL,byte_element((uint64)__LONG_IDEBMKN,4,byte_element_4228),0); if(!qbevent)break;evnt(25753,3533,"ide_methods.bas");}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(25753,3533,"ide_methods.bas");}while(r); S_39351:; fornext_value4230= 1 ; fornext_finalvalue4230=*__LONG_IDEBMKN; 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_IDE2_LONG_BI); fornext_entrylabel4230: *_FUNC_IDE2_LONG_BI=fornext_value4230; if (fornext_step_negative4230){ if (fornext_value4230fornext_finalvalue4230) break; } fornext_error4230:; if(qbevent){evnt(25753,3534,"ide_methods.bas");if(r)goto S_39351;} 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_4231),0); if(!qbevent)break;evnt(25753,3534,"ide_methods.bas");}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_4232),0); if(!qbevent)break;evnt(25753,3534,"ide_methods.bas");}while(r); fornext_continue_4229:; } fornext_exit_4229:; do{ sub_get( 150 ,NULL,byte_element((uint64)_FUNC_IDE2_LONG_X,4,byte_element_4233),0); if(!qbevent)break;evnt(25753,3535,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,func_space(*_FUNC_IDE2_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3535,"ide_methods.bas");}while(r); do{ sub_get2( 150 ,NULL,__STRING_IDET,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3535,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3537,"ide_methods.bas");}while(r); do{ *__LONG_IDENOUNDO= 1 ; if(!qbevent)break;evnt(25753,3537,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3537,"ide_methods.bas");}while(r); } do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,3541,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3543,"ide_methods.bas");}while(r); } S_39366:; 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(25753,3547,"ide_methods.bas");if(r)goto S_39366;} LABEL_IDEMCUT:; if(qbevent){evnt(25753,3548,"ide_methods.bas");r=0;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3549,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3550,"ide_methods.bas");}while(r); do{ goto LABEL_COPY2CLIP; if(!qbevent)break;evnt(25753,3551,"ide_methods.bas");}while(r); } S_39371:; if (((((-(*__LONG_KB== 21248 ))|(-(*__LONG_KB== 8 ))))&(-(*__LONG_IDESELECT== 1 )))||new_error){ if(qbevent){evnt(25753,3554,"ide_methods.bas");if(r)goto S_39371;} S_39372:; if (((-(*__LONG_IDESELECTY1!=*__LONG_IDECY))|(-(*__LONG_IDESELECTX1!=*__LONG_IDECX)))||new_error){ if(qbevent){evnt(25753,3555,"ide_methods.bas");if(r)goto S_39372;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3556,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3557,"ide_methods.bas");}while(r); do{ SUB_DELSELECT(); if(!qbevent)break;evnt(25753,3558,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3559,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3561,"ide_methods.bas");}while(r); } } S_39381:; 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(25753,3566,"ide_methods.bas");if(r)goto S_39381;} LABEL_IDEMPASTE:; if(qbevent){evnt(25753,3567,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3569,"ide_methods.bas");}while(r); S_39383:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_CLIP->len))||new_error){ if(qbevent){evnt(25753,3571,"ide_methods.bas");if(r)goto S_39383;} S_39384:; 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(25753,3572,"ide_methods.bas");if(r)goto S_39384;} S_39385:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,3575,"ide_methods.bas");if(r)goto S_39385;} do{ SUB_DELSELECT(); if(!qbevent)break;evnt(25753,3575,"ide_methods.bas");}while(r); } do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(25753,3577,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3578,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X3= 1 ; if(!qbevent)break;evnt(25753,3579,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I= 0 ; if(!qbevent)break;evnt(25753,3580,"ide_methods.bas");}while(r); LABEL_FULLPASTENEXTLINE:; if(qbevent){evnt(25753,3582,"ide_methods.bas");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(25753,3584,"ide_methods.bas");}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(25753,3585,"ide_methods.bas");}while(r); S_39394:; if ((-(*_FUNC_IDE2_LONG_X== 0 ))||new_error){ if(qbevent){evnt(25753,3586,"ide_methods.bas");if(r)goto S_39394;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(25753,3586,"ide_methods.bas");}while(r); } S_39397:; if ((-(*_FUNC_IDE2_LONG_X2== 0 ))||new_error){ if(qbevent){evnt(25753,3587,"ide_methods.bas");if(r)goto S_39397;} do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,3587,"ide_methods.bas");}while(r); } S_39400:; if ((-(*_FUNC_IDE2_LONG_X2<*_FUNC_IDE2_LONG_X))||new_error){ if(qbevent){evnt(25753,3588,"ide_methods.bas");if(r)goto S_39400;} do{ swap_32(&*_FUNC_IDE2_LONG_X,&*_FUNC_IDE2_LONG_X2); if(!qbevent)break;evnt(25753,3588,"ide_methods.bas");}while(r); } S_39403:; if ((-(*_FUNC_IDE2_LONG_X2>(*_FUNC_IDE2_LONG_X+ 1 )))||new_error){ if(qbevent){evnt(25753,3589,"ide_methods.bas");if(r)goto S_39403;} do{ *_FUNC_IDE2_LONG_X2=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,3589,"ide_methods.bas");}while(r); } S_39406:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,3592,"ide_methods.bas");if(r)goto S_39406;} do{ SUB_IDEINSLINE(&(pass4235=*__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(25753,3593,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,3594,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X3=*_FUNC_IDE2_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,3595,"ide_methods.bas");}while(r); }else{ do{ SUB_IDEINSLINE(&(pass4236=*__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(25753,3597,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,3598,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X3=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3599,"ide_methods.bas");}while(r); } S_39415:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X3<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,3602,"ide_methods.bas");if(r)goto S_39415;} do{ goto LABEL_FULLPASTENEXTLINE; if(!qbevent)break;evnt(25753,3602,"ide_methods.bas");}while(r); } S_39418:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,3604,"ide_methods.bas");if(r)goto S_39418;} do{ *__LONG_IDECY=*__LONG_IDECY+*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(25753,3606,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=((int32)(FUNC_IDEGETLINE(__LONG_IDECY))->len)+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3607,"ide_methods.bas");}while(r); S_39421:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDE2_STRING_CLIP, 1 ),func_chr( 10 ))))||new_error){ if(qbevent){evnt(25753,3608,"ide_methods.bas");if(r)goto S_39421;} do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,3609,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3610,"ide_methods.bas");}while(r); } } }else{ do{ SUB_INSERTATCURSOR(_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3615,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3618,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3619,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3621,"ide_methods.bas");}while(r); } S_39434:; 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(25753,3624,"ide_methods.bas");if(r)goto S_39434;} LABEL_COPY2CLIP:; if(qbevent){evnt(25753,3625,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_CLIP,FUNC_GETSELECTEDTEXT(&(pass4240= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3626,"ide_methods.bas");}while(r); S_39436:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_CLIP,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,3627,"ide_methods.bas");if(r)goto S_39436;} do{ sub__clipboard(_FUNC_IDE2_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3627,"ide_methods.bas");}while(r); } S_39439:; 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(25753,3628,"ide_methods.bas");if(r)goto S_39439;} do{ SUB_DELSELECT(); if(!qbevent)break;evnt(25753,3628,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3629,"ide_methods.bas");}while(r); } S_39444:; if ((-(*__LONG_KB== 20992 ))||new_error){ if(qbevent){evnt(25753,3632,"ide_methods.bas");if(r)goto S_39444;} do{ *__INTEGER_IDEINSERT=*__INTEGER_IDEINSERT+ 1 ; if(!qbevent)break;evnt(25753,3633,"ide_methods.bas");}while(r); S_39446:; if ((-(*__INTEGER_IDEINSERT== 2 ))||new_error){ if(qbevent){evnt(25753,3634,"ide_methods.bas");if(r)goto S_39446;} do{ *__INTEGER_IDEINSERT= 0 ; if(!qbevent)break;evnt(25753,3634,"ide_methods.bas");}while(r); } } S_39450:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(25753,3637,"ide_methods.bas");if(r)goto S_39450;} S_39451:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,3638,"ide_methods.bas");if(r)goto S_39451;} do{ *__LONG_IDESY=*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,3639,"ide_methods.bas");}while(r); S_39453:; if ((-(*__LONG_IDESY< 1 ))||new_error){ if(qbevent){evnt(25753,3640,"ide_methods.bas");if(r)goto S_39453;} do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(25753,3640,"ide_methods.bas");}while(r); } S_39456:; if ((-(*__LONG_IDECY>(*__LONG_IDESY+(*__LONG_IDEWY- 9 ))))||new_error){ if(qbevent){evnt(25753,3641,"ide_methods.bas");if(r)goto S_39456;} do{ *__LONG_IDECY=*__LONG_IDESY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,3641,"ide_methods.bas");}while(r); } }else{ do{ return_point[next_return_point++]=33; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_33:; if(!qbevent)break;evnt(25753,3643,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(25753,3644,"ide_methods.bas");}while(r); S_39462:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,3645,"ide_methods.bas");if(r)goto S_39462;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,3645,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3646,"ide_methods.bas");}while(r); } } S_39468:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(25753,3650,"ide_methods.bas");if(r)goto S_39468;} S_39469:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,3651,"ide_methods.bas");if(r)goto S_39469;} do{ *__LONG_IDESY=*__LONG_IDESY+ 1 ; if(!qbevent)break;evnt(25753,3652,"ide_methods.bas");}while(r); S_39471:; if ((-(*__LONG_IDESY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3653,"ide_methods.bas");if(r)goto S_39471;} do{ *__LONG_IDESY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3653,"ide_methods.bas");}while(r); } S_39474:; if ((-(*__LONG_IDECY<*__LONG_IDESY))||new_error){ if(qbevent){evnt(25753,3654,"ide_methods.bas");if(r)goto S_39474;} do{ *__LONG_IDECY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,3654,"ide_methods.bas");}while(r); } }else{ do{ return_point[next_return_point++]=34; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_34:; if(!qbevent)break;evnt(25753,3656,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,3657,"ide_methods.bas");}while(r); S_39480:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3658,"ide_methods.bas");if(r)goto S_39480;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3658,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3659,"ide_methods.bas");}while(r); } } S_39486:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,3663,"ide_methods.bas");if(r)goto S_39486;} do{ return_point[next_return_point++]=35; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_35:; if(!qbevent)break;evnt(25753,3664,"ide_methods.bas");}while(r); S_39488:; if ((-(*__LONG_MWHEEL< 0 ))||new_error){ if(qbevent){evnt(25753,3666,"ide_methods.bas");if(r)goto S_39488;} do{ *__LONG_IDECY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,3666,"ide_methods.bas");}while(r); } S_39491:; if ((-(*__LONG_MWHEEL> 0 ))||new_error){ if(qbevent){evnt(25753,3667,"ide_methods.bas");if(r)goto S_39491;} do{ *__LONG_IDECY=*__LONG_IDESY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,3667,"ide_methods.bas");}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY+(*__LONG_MWHEEL* 3 ); if(!qbevent)break;evnt(25753,3668,"ide_methods.bas");}while(r); S_39495:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,3669,"ide_methods.bas");if(r)goto S_39495;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,3669,"ide_methods.bas");}while(r); } S_39498:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3670,"ide_methods.bas");if(r)goto S_39498;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3670,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3671,"ide_methods.bas");}while(r); } S_39503:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(25753,3674,"ide_methods.bas");if(r)goto S_39503;} do{ return_point[next_return_point++]=36; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_36:; if(!qbevent)break;evnt(25753,3675,"ide_methods.bas");}while(r); S_39505:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,3677,"ide_methods.bas");if(r)goto S_39505;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3679,"ide_methods.bas");}while(r); S_39507:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,3680,"ide_methods.bas");if(r)goto S_39507;} do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3680,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_SKIPPING= 1 ; if(!qbevent)break;evnt(25753,3682,"ide_methods.bas");}while(r); S_39511:; do{ if(qbevent){evnt(25753,3683,"ide_methods.bas");if(r)goto S_39511;} do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,3685,"ide_methods.bas");}while(r); S_39513:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(25753,3687,"ide_methods.bas");if(r)goto S_39513;} S_39514:; do{ if(qbevent){evnt(25753,3688,"ide_methods.bas");if(r)goto S_39514;} S_39515:; if ((-(*__LONG_IDECY== 1 ))||new_error){ if(qbevent){evnt(25753,3689,"ide_methods.bas");if(r)goto S_39515;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3689,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3689,"ide_methods.bas");}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(25753,3690,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3691,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3692,"ide_methods.bas");}while(r); S_39522:; dl_continue_4244:; }while((!(qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len)))&&(!new_error)); dl_exit_4244:; if(qbevent){evnt(25753,3693,"ide_methods.bas");if(r)goto S_39522;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3694,"ide_methods.bas");}while(r); } S_39525:; 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(25753,3697,"ide_methods.bas");if(r)goto S_39525;} S_39526:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(25753,3698,"ide_methods.bas");if(r)goto S_39526;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3698,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3699,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3699,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(25753,3700,"ide_methods.bas");}while(r); }else{ S_39533:; if ((-(*_FUNC_IDE2_LONG_SKIPPING== 0 ))||new_error){ if(qbevent){evnt(25753,3702,"ide_methods.bas");if(r)goto S_39533;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,3702,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(25753,3702,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3702,"ide_methods.bas");}while(r); } } dl_continue_4243:; }while(1); dl_exit_4243:; }else{ do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,3708,"ide_methods.bas");}while(r); S_39542:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(25753,3709,"ide_methods.bas");if(r)goto S_39542;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3709,"ide_methods.bas");}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3713,"ide_methods.bas");}while(r); } S_39548:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(25753,3716,"ide_methods.bas");if(r)goto S_39548;} do{ return_point[next_return_point++]=37; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_37:; if(!qbevent)break;evnt(25753,3717,"ide_methods.bas");}while(r); S_39550:; if ((*__LONG_KCONTROL)||new_error){ if(qbevent){evnt(25753,3719,"ide_methods.bas");if(r)goto S_39550;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3721,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(25753,3722,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FIRST= 1 ; if(!qbevent)break;evnt(25753,3723,"ide_methods.bas");}while(r); S_39554:; do{ if(qbevent){evnt(25753,3724,"ide_methods.bas");if(r)goto S_39554;} S_39555:; if ((-(*_FUNC_IDE2_LONG_FIRST== 0 ))||new_error){ if(qbevent){evnt(25753,3726,"ide_methods.bas");if(r)goto S_39555;} do{ *__LONG_IDECX=*__LONG_IDECX+ 1 ; if(!qbevent)break;evnt(25753,3726,"ide_methods.bas");}while(r); } S_39558:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDE2_LONG_FIRST== 0 ))&(-(*__LONG_IDECX==(_FUNC_IDE2_STRING_A->len+ 1 )))))||new_error){ if(qbevent){evnt(25753,3728,"ide_methods.bas");if(r)goto S_39558;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3728,"ide_methods.bas");}while(r); } S_39561:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,3729,"ide_methods.bas");if(r)goto S_39561;} S_39562:; do{ if(qbevent){evnt(25753,3730,"ide_methods.bas");if(r)goto S_39562;} S_39563:; if ((-(*__LONG_IDECY==*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3731,"ide_methods.bas");if(r)goto S_39563;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3731,"ide_methods.bas");}while(r); } do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,3732,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3732,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3733,"ide_methods.bas");}while(r); S_39569:; dl_continue_4250:; }while((!(qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len)))&&(!new_error)); dl_exit_4250:; if(qbevent){evnt(25753,3734,"ide_methods.bas");if(r)goto S_39569;} do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(25753,3735,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FIRST= 0 ; if(!qbevent)break;evnt(25753,3736,"ide_methods.bas");}while(r); } S_39573:; 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(25753,3739,"ide_methods.bas");if(r)goto S_39573;} S_39574:; if ((*_FUNC_IDE2_LONG_FIRST)||new_error){ if(qbevent){evnt(25753,3740,"ide_methods.bas");if(r)goto S_39574;} do{ *_FUNC_IDE2_LONG_SKIPPING= 1 ; if(!qbevent)break;evnt(25753,3741,"ide_methods.bas");}while(r); }else{ S_39577:; if ((-(*_FUNC_IDE2_LONG_SKIPPING== 0 ))||new_error){ if(qbevent){evnt(25753,3743,"ide_methods.bas");if(r)goto S_39577;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3743,"ide_methods.bas");}while(r); } } }else{ do{ *_FUNC_IDE2_LONG_SKIPPING= 0 ; if(!qbevent)break;evnt(25753,3746,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_FIRST= 0 ; if(!qbevent)break;evnt(25753,3748,"ide_methods.bas");}while(r); dl_continue_4247:; }while(1); dl_exit_4247:; }else{ do{ *__LONG_IDECX=*__LONG_IDECX+ 1 ; if(!qbevent)break;evnt(25753,3753,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3757,"ide_methods.bas");}while(r); } S_39591:; if ((*__LONG_KCONTROL&(-(*__LONG_KB== 18176 )))||new_error){ if(qbevent){evnt(25753,3760,"ide_methods.bas");if(r)goto S_39591;} do{ return_point[next_return_point++]=38; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_38:; if(!qbevent)break;evnt(25753,3761,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3762,"ide_methods.bas");}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,3763,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3764,"ide_methods.bas");}while(r); } S_39597:; if ((*__LONG_KCONTROL&(-(*__LONG_KB== 20224 )))||new_error){ if(qbevent){evnt(25753,3767,"ide_methods.bas");if(r)goto S_39597;} do{ return_point[next_return_point++]=39; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_39:; if(!qbevent)break;evnt(25753,3768,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3769,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3770,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3771,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3772,"ide_methods.bas");}while(r); } S_39604:; if ((-(*__LONG_KB== 18176 ))||new_error){ if(qbevent){evnt(25753,3775,"ide_methods.bas");if(r)goto S_39604;} do{ return_point[next_return_point++]=40; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_40:; if(!qbevent)break;evnt(25753,3776,"ide_methods.bas");}while(r); S_39606:; if ((-(*__LONG_IDECX!= 1 ))||new_error){ if(qbevent){evnt(25753,3777,"ide_methods.bas");if(r)goto S_39606;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3778,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3780,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3781,"ide_methods.bas");}while(r); S_39611:; fornext_value4254= 1 ; fornext_finalvalue4254=_FUNC_IDE2_STRING_A->len; 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_IDE2_LONG_X); fornext_entrylabel4254: *_FUNC_IDE2_LONG_X=fornext_value4254; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4254){ if (fornext_value4254fornext_finalvalue4254) break; } fornext_error4254:; if(qbevent){evnt(25753,3782,"ide_methods.bas");if(r)goto S_39611;} S_39612:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X)!= 32 )))||new_error){ if(qbevent){evnt(25753,3783,"ide_methods.bas");if(r)goto S_39612;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,3783,"ide_methods.bas");}while(r); do{ goto fornext_exit_4253; if(!qbevent)break;evnt(25753,3783,"ide_methods.bas");}while(r); } fornext_continue_4253:; } fornext_exit_4253:; } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3786,"ide_methods.bas");}while(r); } S_39620:; if ((-(*__LONG_KB== 20224 ))||new_error){ if(qbevent){evnt(25753,3789,"ide_methods.bas");if(r)goto S_39620;} do{ return_point[next_return_point++]=41; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_41:; if(!qbevent)break;evnt(25753,3790,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3791,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3792,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3793,"ide_methods.bas");}while(r); } S_39626:; if ((-(*__LONG_KB== 18688 ))||new_error){ if(qbevent){evnt(25753,3796,"ide_methods.bas");if(r)goto S_39626;} do{ return_point[next_return_point++]=42; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_42:; if(!qbevent)break;evnt(25753,3797,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY-(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,3798,"ide_methods.bas");}while(r); S_39629:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,3799,"ide_methods.bas");if(r)goto S_39629;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,3799,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3800,"ide_methods.bas");}while(r); } S_39634:; if ((-(*__LONG_KB== 20736 ))||new_error){ if(qbevent){evnt(25753,3803,"ide_methods.bas");if(r)goto S_39634;} do{ return_point[next_return_point++]=43; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_43:; if(!qbevent)break;evnt(25753,3804,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,3805,"ide_methods.bas");}while(r); S_39637:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,3806,"ide_methods.bas");if(r)goto S_39637;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,3806,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3807,"ide_methods.bas");}while(r); } do{ goto LABEL_SKIPGOSUBS; if(!qbevent)break;evnt(25753,3810,"ide_methods.bas");}while(r); LABEL_SELECTCHECK:; if(qbevent){evnt(25753,3812,"ide_methods.bas");r=0;} S_39643:; if ((-(*__LONG_IDESYSTEM== 1 ))||new_error){ if(qbevent){evnt(25753,3813,"ide_methods.bas");if(r)goto S_39643;} S_39644:; if ((*__LONG_KSHIFT&(-(*__LONG_IDESELECT== 0 )))||new_error){ if(qbevent){evnt(25753,3814,"ide_methods.bas");if(r)goto S_39644;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,3814,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3814,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,3814,"ide_methods.bas");}while(r); } S_39649:; if ((-(*__LONG_KSHIFT== 0 ))||new_error){ if(qbevent){evnt(25753,3815,"ide_methods.bas");if(r)goto S_39649;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3815,"ide_methods.bas");}while(r); } S_39652:; }else{ if (-(*__LONG_IDESYSTEM== 2 )){ if(qbevent){evnt(25753,3816,"ide_methods.bas");if(r)goto S_39652;} S_39653:; if ((*__LONG_KSHIFT&(-(*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL== 0 )))||new_error){ if(qbevent){evnt(25753,3817,"ide_methods.bas");if(r)goto S_39653;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= -1 ; if(!qbevent)break;evnt(25753,3817,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,3817,"ide_methods.bas");}while(r); } S_39657:; if ((-(*__LONG_KSHIFT== 0 ))||new_error){ if(qbevent){evnt(25753,3818,"ide_methods.bas");if(r)goto S_39657;} do{ *_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL= 0 ; if(!qbevent)break;evnt(25753,3818,"ide_methods.bas");}while(r); } } } do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,3820,"ide_methods.bas");}while(r); LABEL_SKIPGOSUBS:; if(qbevent){evnt(25753,3822,"ide_methods.bas");r=0;} S_39662:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 13 ))))||new_error){ if(qbevent){evnt(25753,3824,"ide_methods.bas");if(r)goto S_39662;} S_39663:; if ((*__LONG_KSHIFT)||new_error){ if(qbevent){evnt(25753,3825,"ide_methods.bas");if(r)goto S_39663;} do{ qbs_set(_FUNC_IDE2_STRING_RETVAL,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3826,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3827,"ide_methods.bas");}while(r); S_39666:; if ((*__BYTE_ENTERINGRGB)||new_error){ if(qbevent){evnt(25753,3828,"ide_methods.bas");if(r)goto S_39666;} do{ *_FUNC_IDE2_LONG_OLDKEYWORDHIGHLIGHT=*__INTEGER_KEYWORDHIGHLIGHT; if(!qbevent)break;evnt(25753,3829,"ide_methods.bas");}while(r); do{ *__INTEGER_KEYWORDHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,3830,"ide_methods.bas");}while(r); do{ SUB_HIDEBRACKETHIGHLIGHT(); if(!qbevent)break;evnt(25753,3831,"ide_methods.bas");}while(r); do{ *__INTEGER_KEYWORDHIGHLIGHT=*_FUNC_IDE2_LONG_OLDKEYWORDHIGHLIGHT; if(!qbevent)break;evnt(25753,3832,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_RETVAL,FUNC_IDERGBMIXER(&(pass4257= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3833,"ide_methods.bas");}while(r); }else{ S_39673:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,3835,"ide_methods.bas");if(r)goto S_39673;} S_39674:; if ((-(*__LONG_IDESELECTY1!=*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,3836,"ide_methods.bas");if(r)goto S_39674;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3836,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_FOUND_RGB= 0 ; if(!qbevent)break;evnt(25753,3839,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUND_RGB=*_FUNC_IDE2_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_FUNC_IDE2_STRING_A),qbs_new_txt_len("RGB(",4),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3840,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUND_RGB=*_FUNC_IDE2_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_FUNC_IDE2_STRING_A),qbs_new_txt_len("RGB32(",6),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3841,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUND_RGB=*_FUNC_IDE2_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_FUNC_IDE2_STRING_A),qbs_new_txt_len("RGBA(",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3842,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUND_RGB=*_FUNC_IDE2_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_FUNC_IDE2_STRING_A),qbs_new_txt_len("RGBA32(",7),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3843,"ide_methods.bas");}while(r); S_39683:; if ((*_FUNC_IDE2_LONG_FOUND_RGB)||new_error){ if(qbevent){evnt(25753,3844,"ide_methods.bas");if(r)goto S_39683;} do{ *_FUNC_IDE2_LONG_OLDKEYWORDHIGHLIGHT=*__INTEGER_KEYWORDHIGHLIGHT; if(!qbevent)break;evnt(25753,3845,"ide_methods.bas");}while(r); do{ *__INTEGER_KEYWORDHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,3846,"ide_methods.bas");}while(r); do{ SUB_HIDEBRACKETHIGHLIGHT(); if(!qbevent)break;evnt(25753,3847,"ide_methods.bas");}while(r); do{ *__INTEGER_KEYWORDHIGHLIGHT=*_FUNC_IDE2_LONG_OLDKEYWORDHIGHLIGHT; if(!qbevent)break;evnt(25753,3848,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_RETVAL,FUNC_IDERGBMIXER(&(pass4258= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3849,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_REGULARENTER; if(!qbevent)break;evnt(25753,3851,"ide_methods.bas");}while(r); } } S_39693:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_RETVAL->len))||new_error){ if(qbevent){evnt(25753,3854,"ide_methods.bas");if(r)goto S_39693;} S_39694:; if ((*__BYTE_ENTERINGRGB)||new_error){ if(qbevent){evnt(25753,3856,"ide_methods.bas");if(r)goto S_39694;} do{ SUB_INSERTATCURSOR(func_mid(_FUNC_IDE2_STRING_RETVAL,func_instr(NULL,_FUNC_IDE2_STRING_RETVAL,qbs_new_txt_len("(",1),0)+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3857,"ide_methods.bas");}while(r); }else{ do{ SUB_INSERTATCURSOR(_FUNC_IDE2_STRING_RETVAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3859,"ide_methods.bas");}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3862,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3864,"ide_methods.bas");}while(r); LABEL_REGULARENTER:; if(qbevent){evnt(25753,3865,"ide_methods.bas");r=0;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3866,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN= 1 ; if(!qbevent)break;evnt(25753,3867,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3868,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3869,"ide_methods.bas");}while(r); S_39707:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,3870,"ide_methods.bas");if(r)goto S_39707;} do{ SUB_IDEINSLINE(&(pass4261=*__LONG_IDECY+ 1 ),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3871,"ide_methods.bas");}while(r); S_39709:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(25753,3872,"ide_methods.bas");if(r)goto S_39709;} do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3873,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN=_FUNC_IDE2_STRING_A->len-((int32)(qbs_ltrim(_FUNC_IDE2_STRING_A))->len)+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3875,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3878,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3879,"ide_methods.bas");}while(r); S_39717:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_ltrim(_FUNC_IDE2_STRING_A2))->len)> 0 )))||new_error){ if(qbevent){evnt(25753,3880,"ide_methods.bas");if(r)goto S_39717;} S_39718:; if ((-(*__LONG_IDECX> 1 ))||new_error){ if(qbevent){evnt(25753,3881,"ide_methods.bas");if(r)goto S_39718;} do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN=_FUNC_IDE2_STRING_A->len-((int32)(qbs_ltrim(_FUNC_IDE2_STRING_A))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3881,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN= 0 ; if(!qbevent)break;evnt(25753,3881,"ide_methods.bas");}while(r); } do{ SUB_IDEINSLINE(&(pass4265=*__LONG_IDECY+ 1 ),qbs_add(func_space(*_FUNC_IDE2_LONG_DESIREDCOLUMN),qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*__LONG_IDECX+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3882,"ide_methods.bas");}while(r); S_39724:; if ((-(*_FUNC_IDE2_LONG_DESIREDCOLUMN== 0 ))||new_error){ if(qbevent){evnt(25753,3883,"ide_methods.bas");if(r)goto S_39724;} do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN= 1 ; if(!qbevent)break;evnt(25753,3883,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN=*_FUNC_IDE2_LONG_DESIREDCOLUMN+ 1 ; if(!qbevent)break;evnt(25753,3883,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3885,"ide_methods.bas");}while(r); do{ SUB_IDEINSLINE(&(pass4267=*__LONG_IDECY+ 1 ),qbs_add(func_space(*_FUNC_IDE2_LONG_DESIREDCOLUMN- 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(25753,3886,"ide_methods.bas");}while(r); } } S_39734:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(25753,3890,"ide_methods.bas");if(r)goto S_39734;} S_39735:; fornext_value4270= 1 ; fornext_finalvalue4270=*__LONG_IDEBMKN; 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_IDE2_LONG_B); fornext_entrylabel4270: *_FUNC_IDE2_LONG_B=fornext_value4270; if (fornext_step_negative4270){ if (fornext_value4270fornext_finalvalue4270) break; } fornext_error4270:; if(qbevent){evnt(25753,3891,"ide_methods.bas");if(r)goto S_39735;} S_39736:; 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(25753,3892,"ide_methods.bas");if(r)goto S_39736;} 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(25753,3892,"ide_methods.bas");}while(r); } fornext_continue_4269:; } fornext_exit_4269:; } do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,3896,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_DESIREDCOLUMN; if(!qbevent)break;evnt(25753,3897,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3898,"ide_methods.bas");}while(r); } } S_39746:; if (((-(*__LONG_KB== 21248 ))&(-(*__LONG_KCONTROL== 0 )))||new_error){ if(qbevent){evnt(25753,3902,"ide_methods.bas");if(r)goto S_39746;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3903,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3904,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3905,"ide_methods.bas");}while(r); S_39750:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,3906,"ide_methods.bas");if(r)goto S_39750;} 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(25753,3907,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3908,"ide_methods.bas");}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(25753,3910,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(_FUNC_IDE2_STRING_A,qbs_ltrim(FUNC_IDEGETLINE(&(pass4274=*__LONG_IDECY+ 1 ))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3911,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3912,"ide_methods.bas");}while(r); do{ SUB_IDEDELLINE(&(pass4275=*__LONG_IDECY+ 1 )); if(!qbevent)break;evnt(25753,3913,"ide_methods.bas");}while(r); } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3915,"ide_methods.bas");}while(r); } S_39761:; if ((qbs_cleanup(qbs_tmp_base,((-(func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)> 0 ))&*__LONG_KCONTROL&(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 83 ))))))|((-(func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)> 0 ))&(qbs_equal(__STRING_K,func_chr( 8 )))&*__LONG_KCONTROL)))||new_error){ if(qbevent){evnt(25753,3923,"ide_methods.bas");if(r)goto S_39761;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3924,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3925,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3926,"ide_methods.bas");}while(r); S_39765:; if ((-(*__LONG_IDEUNDOCOMBOCHR!= 8 ))||new_error){ if(qbevent){evnt(25753,3929,"ide_methods.bas");if(r)goto S_39765;} do{ *__LONG_IDEUNDOCOMBO= 2 ; if(!qbevent)break;evnt(25753,3930,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO+ 1 ; if(!qbevent)break;evnt(25753,3932,"ide_methods.bas");}while(r); S_39769:; if ((-(*__LONG_IDEUNDOCOMBO== 2 ))||new_error){ if(qbevent){evnt(25753,3933,"ide_methods.bas");if(r)goto S_39769;} do{ *__LONG_IDEMERGEUNDO= 1 ; if(!qbevent)break;evnt(25753,3933,"ide_methods.bas");}while(r); } } do{ *__LONG_IDEUNDOCOMBOCHR= 8 ; if(!qbevent)break;evnt(25753,3935,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3938,"ide_methods.bas");}while(r); S_39775:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(25753,3939,"ide_methods.bas");if(r)goto S_39775;} do{ goto LABEL_REGULARBACKSPACEIDECX1; if(!qbevent)break;evnt(25753,3939,"ide_methods.bas");}while(r); } S_39778:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>(_FUNC_IDE2_STRING_A->len+ 2 ))))||new_error){ if(qbevent){evnt(25753,3940,"ide_methods.bas");if(r)goto S_39778;} do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3941,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3942,"ide_methods.bas");}while(r); S_39781:; }else{ if (qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX==(_FUNC_IDE2_STRING_A->len+ 2 )))){ if(qbevent){evnt(25753,3943,"ide_methods.bas");if(r)goto S_39781;} do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3944,"ide_methods.bas");}while(r); } } S_39784:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(func_mid(_FUNC_IDE2_STRING_A, 1 ,*__LONG_IDECX- 1 ,1)))->len)== 0 )))||new_error){ if(qbevent){evnt(25753,3947,"ide_methods.bas");if(r)goto S_39784;} do{ qbs_set(_FUNC_IDE2_STRING_A,func_mid(_FUNC_IDE2_STRING_A,*__LONG_IDECX,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3949,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3950,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,3951,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3952,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_I=*__LONG_IDECX; if(!qbevent)break;evnt(25753,3956,"ide_methods.bas");}while(r); S_39791:; do{ if(qbevent){evnt(25753,3957,"ide_methods.bas");if(r)goto S_39791;} do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(25753,3958,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_FIRSTCHAR,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3959,"ide_methods.bas");}while(r); S_39794:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_FIRSTCHAR,func_chr( 32 ))))||new_error){ if(qbevent){evnt(25753,3960,"ide_methods.bas");if(r)goto S_39794;} do{ goto dl_exit_4280; if(!qbevent)break;evnt(25753,3960,"ide_methods.bas");}while(r); } dl_continue_4280:; }while(1); dl_exit_4280:; S_39798:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,_FUNC_IDE2_STRING_FIRSTCHAR,0)))||new_error){ if(qbevent){evnt(25753,3962,"ide_methods.bas");if(r)goto S_39798;} S_39799:; do{ if(qbevent){evnt(25753,3963,"ide_methods.bas");if(r)goto S_39799;} S_39800:; if ((-(*_FUNC_IDE2_LONG_I== 0 ))||new_error){ if(qbevent){evnt(25753,3964,"ide_methods.bas");if(r)goto S_39800;} do{ goto dl_exit_4281; if(!qbevent)break;evnt(25753,3964,"ide_methods.bas");}while(r); } S_39803:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1),_FUNC_IDE2_STRING_FIRSTCHAR)))||new_error){ if(qbevent){evnt(25753,3965,"ide_methods.bas");if(r)goto S_39803;} do{ goto dl_exit_4281; if(!qbevent)break;evnt(25753,3965,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(25753,3966,"ide_methods.bas");}while(r); dl_continue_4281:; }while(1); dl_exit_4281:; }else{ S_39809:; do{ if(qbevent){evnt(25753,3969,"ide_methods.bas");if(r)goto S_39809;} S_39810:; if ((-(*_FUNC_IDE2_LONG_I== 0 ))||new_error){ if(qbevent){evnt(25753,3970,"ide_methods.bas");if(r)goto S_39810;} do{ goto dl_exit_4282; if(!qbevent)break;evnt(25753,3970,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_I=*_FUNC_IDE2_LONG_I- 1 ; if(!qbevent)break;evnt(25753,3971,"ide_methods.bas");}while(r); S_39814:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I, 1 ,1),0)))||new_error){ if(qbevent){evnt(25753,3972,"ide_methods.bas");if(r)goto S_39814;} do{ goto dl_exit_4282; if(!qbevent)break;evnt(25753,3972,"ide_methods.bas");}while(r); } dl_continue_4282:; }while(1); dl_exit_4282:; } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_I),func_mid(_FUNC_IDE2_STRING_A,*__LONG_IDECX,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3975,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,3976,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3977,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,3978,"ide_methods.bas");}while(r); } S_39824:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 8 ))))||new_error){ if(qbevent){evnt(25753,3981,"ide_methods.bas");if(r)goto S_39824;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,3982,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,3983,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,3984,"ide_methods.bas");}while(r); S_39828:; if ((-(*__LONG_IDEUNDOCOMBOCHR!= 8 ))||new_error){ if(qbevent){evnt(25753,3987,"ide_methods.bas");if(r)goto S_39828;} do{ *__LONG_IDEUNDOCOMBO= 2 ; if(!qbevent)break;evnt(25753,3988,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO+ 1 ; if(!qbevent)break;evnt(25753,3990,"ide_methods.bas");}while(r); S_39832:; if ((-(*__LONG_IDEUNDOCOMBO== 2 ))||new_error){ if(qbevent){evnt(25753,3991,"ide_methods.bas");if(r)goto S_39832;} do{ *__LONG_IDEMERGEUNDO= 1 ; if(!qbevent)break;evnt(25753,3991,"ide_methods.bas");}while(r); } } do{ *__LONG_IDEUNDOCOMBOCHR= 8 ; if(!qbevent)break;evnt(25753,3993,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3995,"ide_methods.bas");}while(r); S_39838:; if ((-(*__LONG_IDECX== 1 ))||new_error){ if(qbevent){evnt(25753,3996,"ide_methods.bas");if(r)goto S_39838;} LABEL_REGULARBACKSPACEIDECX1:; if(qbevent){evnt(25753,3997,"ide_methods.bas");r=0;} S_39839:; if ((-(*__LONG_IDECY> 1 ))||new_error){ if(qbevent){evnt(25753,3998,"ide_methods.bas");if(r)goto S_39839;} do{ qbs_set(_FUNC_IDE2_STRING_A2,FUNC_IDEGETLINE(&(pass4283=*__LONG_IDECY- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3999,"ide_methods.bas");}while(r); S_39841:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A2->len> 0 )))||new_error){ if(qbevent){evnt(25753,4000,"ide_methods.bas");if(r)goto S_39841;} LABEL_REGULARBACKUPTOPREVLINE:; if(qbevent){evnt(25753,4002,"ide_methods.bas");r=0;} do{ SUB_IDESETLINE(&(pass4285=*__LONG_IDECY- 1 ),qbs_add(_FUNC_IDE2_STRING_A2,_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4003,"ide_methods.bas");}while(r); do{ SUB_IDEDELLINE(__LONG_IDECY); if(!qbevent)break;evnt(25753,4004,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A2->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4005,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(25753,4006,"ide_methods.bas");}while(r); }else{ S_39847:; if ((-(*__LONG_IDECY<*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,4011,"ide_methods.bas");if(r)goto S_39847;} do{ qbs_set(_FUNC_IDE2_STRING_A3,FUNC_IDEGETLINE(&(pass4287=*__LONG_IDECY+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4012,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_DESIREDCOLUMN=_FUNC_IDE2_STRING_A3->len-((int32)(qbs_ltrim(_FUNC_IDE2_STRING_A3))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4013,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(&(pass4289=*__LONG_IDECY- 1 ),qbs_add(func_space(*_FUNC_IDE2_LONG_DESIREDCOLUMN),_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4014,"ide_methods.bas");}while(r); do{ SUB_IDEDELLINE(__LONG_IDECY); if(!qbevent)break;evnt(25753,4015,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_DESIREDCOLUMN+ 1 ; if(!qbevent)break;evnt(25753,4016,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(25753,4017,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_REGULARBACKUPTOPREVLINE; if(!qbevent)break;evnt(25753,4019,"ide_methods.bas");}while(r); } } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4023,"ide_methods.bas");}while(r); } S_39861:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>(_FUNC_IDE2_STRING_A->len+ 1 ))))||new_error){ if(qbevent){evnt(25753,4025,"ide_methods.bas");if(r)goto S_39861;} do{ *__LONG_IDECX=_FUNC_IDE2_STRING_A->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4026,"ide_methods.bas");}while(r); }else{ LABEL_CHECKSPACESBEHIND:; if(qbevent){evnt(25753,4028,"ide_methods.bas");r=0;} S_39864:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(func_mid(_FUNC_IDE2_STRING_A, 1 ,*__LONG_IDECX- 1 ,1)))->len)== 0 )))||new_error){ if(qbevent){evnt(25753,4029,"ide_methods.bas");if(r)goto S_39864;} do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(25753,4031,"ide_methods.bas");}while(r); S_39866:; if ((-(*__LONG_IDEAUTOINDENTSIZE!= 0 ))||new_error){ if(qbevent){evnt(25753,4032,"ide_methods.bas");if(r)goto S_39866;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(25753,4032,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_SINGLE_CHECK__ASCII_CHR_046__TABSTOP=(*__LONG_IDECX- 1 )/ ((long double)(*_FUNC_IDE2_LONG_X)); if(!qbevent)break;evnt(25753,4033,"ide_methods.bas");}while(r); S_39870:; if ((-(((float)(*_FUNC_IDE2_SINGLE_CHECK__ASCII_CHR_046__TABSTOP))==((float)(func_fix_double(*_FUNC_IDE2_SINGLE_CHECK__ASCII_CHR_046__TABSTOP)))))||new_error){ if(qbevent){evnt(25753,4034,"ide_methods.bas");if(r)goto S_39870;} S_39871:; if ((-((*__LONG_IDECX-*_FUNC_IDE2_LONG_X)<( 1 )))||new_error){ if(qbevent){evnt(25753,4035,"ide_methods.bas");if(r)goto S_39871;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,4035,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*__LONG_IDECX-(*_FUNC_IDE2_LONG_X+ 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(25753,4036,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4037,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDECX-*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,4038,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_ONEBACKSPACE; if(!qbevent)break;evnt(25753,4040,"ide_methods.bas");}while(r); } }else{ LABEL_ONEBACKSPACE:; if(qbevent){evnt(25753,4043,"ide_methods.bas");r=0;} 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(25753,4044,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4045,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,4046,"ide_methods.bas");}while(r); } } do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4049,"ide_methods.bas");}while(r); } S_39888:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len!= 1 )))||new_error){ if(qbevent){evnt(25753,4061,"ide_methods.bas");if(r)goto S_39888;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4061,"ide_methods.bas");}while(r); } S_39891:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 9 ))))||new_error){ if(qbevent){evnt(25753,4062,"ide_methods.bas");if(r)goto S_39891;} do{ goto LABEL_IDEFORCEINPUT; if(!qbevent)break;evnt(25753,4062,"ide_methods.bas");}while(r); } S_39894:; 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(25753,4063,"ide_methods.bas");if(r)goto S_39894;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4063,"ide_methods.bas");}while(r); } LABEL_IDEFORCEINPUT:; if(qbevent){evnt(25753,4064,"ide_methods.bas");r=0;} S_39897:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 9 )))|(((qbs_equal(__STRING_K,func_chr( 25 )))&(-(func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)> 0 ))))))||new_error){ if(qbevent){evnt(25753,4066,"ide_methods.bas");if(r)goto S_39897;} S_39898:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,4067,"ide_methods.bas");if(r)goto S_39898;} S_39899:; if ((qbs_cleanup(qbs_tmp_base,*__LONG_KSHIFT|(qbs_equal(__STRING_K,func_chr( 25 )))))||new_error){ if(qbevent){evnt(25753,4069,"ide_methods.bas");if(r)goto S_39899;} LABEL_IDEBLOCKDECREASEINDENT:; if(qbevent){evnt(25753,4070,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_BLOCKINDENTLEVEL= 4 ; if(!qbevent)break;evnt(25753,4071,"ide_methods.bas");}while(r); S_39901:; if ((-(*__LONG_IDEAUTOINDENTSIZE!= 0 ))||new_error){ if(qbevent){evnt(25753,4072,"ide_methods.bas");if(r)goto S_39901;} do{ *_FUNC_IDE2_LONG_BLOCKINDENTLEVEL=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(25753,4072,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4073,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y2=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,4074,"ide_methods.bas");}while(r); S_39906:; if ((-(*_FUNC_IDE2_LONG_Y1==*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4076,"ide_methods.bas");if(r)goto S_39906;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4077,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4078,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,4079,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,4079,"ide_methods.bas");}while(r); S_39911:; if ((-(*_FUNC_IDE2_LONG_SX2<*_FUNC_IDE2_LONG_SX1))||new_error){ if(qbevent){evnt(25753,4080,"ide_methods.bas");if(r)goto S_39911;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,4080,"ide_methods.bas");}while(r); } S_39914:; fornext_value4296=*_FUNC_IDE2_LONG_SX1; fornext_finalvalue4296=*_FUNC_IDE2_LONG_SX2- 1 ; fornext_step4296= 1 ; if (fornext_step4296<0) fornext_step_negative4296=1; else fornext_step_negative4296=0; if (new_error) goto fornext_error4296; goto fornext_entrylabel4296; while(1){ fornext_value4296=fornext_step4296+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4296: *_FUNC_IDE2_LONG_X=fornext_value4296; if (fornext_step_negative4296){ if (fornext_value4296fornext_finalvalue4296) break; } fornext_error4296:; if(qbevent){evnt(25753,4081,"ide_methods.bas");if(r)goto S_39914;} S_39915:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,4082,"ide_methods.bas");if(r)goto S_39915;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4082,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4082,"ide_methods.bas");}while(r); } fornext_continue_4295:; } fornext_exit_4295:; S_39921:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,4084,"ide_methods.bas");if(r)goto S_39921;} do{ goto LABEL_SKIPBLOCKINDENT; if(!qbevent)break;evnt(25753,4085,"ide_methods.bas");}while(r); } } S_39925:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4089,"ide_methods.bas");if(r)goto S_39925;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(25753,4089,"ide_methods.bas");}while(r); } S_39928:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(25753,4090,"ide_methods.bas");if(r)goto S_39928;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(25753,4090,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_LHS= 10000000 ; if(!qbevent)break;evnt(25753,4092,"ide_methods.bas");}while(r); S_39932:; fornext_value4299=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4299=*_FUNC_IDE2_LONG_Y2; fornext_step4299= 1 ; if (fornext_step4299<0) fornext_step_negative4299=1; else fornext_step_negative4299=0; if (new_error) goto fornext_error4299; goto fornext_entrylabel4299; while(1){ fornext_value4299=fornext_step4299+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4299: *_FUNC_IDE2_LONG_Y=fornext_value4299; if (fornext_step_negative4299){ if (fornext_value4299fornext_finalvalue4299) break; } fornext_error4299:; if(qbevent){evnt(25753,4093,"ide_methods.bas");if(r)goto S_39932;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4094,"ide_methods.bas");}while(r); S_39934:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4095,"ide_methods.bas");if(r)goto S_39934;} do{ qbs_set(_FUNC_IDE2_STRING_TA,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4096,"ide_methods.bas");}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(25753,4097,"ide_methods.bas");}while(r); S_39937:; if ((-(*_FUNC_IDE2_LONG_T<*_FUNC_IDE2_LONG_LHS))||new_error){ if(qbevent){evnt(25753,4098,"ide_methods.bas");if(r)goto S_39937;} do{ *_FUNC_IDE2_LONG_LHS=*_FUNC_IDE2_LONG_T; if(!qbevent)break;evnt(25753,4098,"ide_methods.bas");}while(r); } } fornext_continue_4298:; } fornext_exit_4298:; S_39942:; if ((-(*_FUNC_IDE2_LONG_LHS> 0 ))||new_error){ if(qbevent){evnt(25753,4103,"ide_methods.bas");if(r)goto S_39942;} S_39943:; if ((-(*_FUNC_IDE2_LONG_LHS<*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL))||new_error){ if(qbevent){evnt(25753,4104,"ide_methods.bas");if(r)goto S_39943;} do{ *_FUNC_IDE2_LONG_BLOCKINDENTLEVEL=*_FUNC_IDE2_LONG_LHS; if(!qbevent)break;evnt(25753,4104,"ide_methods.bas");}while(r); } S_39946:; fornext_value4304=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4304=*_FUNC_IDE2_LONG_Y2; fornext_step4304= 1 ; if (fornext_step4304<0) fornext_step_negative4304=1; else fornext_step_negative4304=0; if (new_error) goto fornext_error4304; goto fornext_entrylabel4304; while(1){ fornext_value4304=fornext_step4304+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4304: *_FUNC_IDE2_LONG_Y=fornext_value4304; if (fornext_step_negative4304){ if (fornext_value4304fornext_finalvalue4304) break; } fornext_error4304:; if(qbevent){evnt(25753,4105,"ide_methods.bas");if(r)goto S_39946;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4106,"ide_methods.bas");}while(r); S_39948:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4107,"ide_methods.bas");if(r)goto S_39948;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4108,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4109,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4110,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4111,"ide_methods.bas");}while(r); } fornext_continue_4303:; } fornext_exit_4303:; } S_39956:; if (((-(*_FUNC_IDE2_LONG_Y1==*_FUNC_IDE2_LONG_Y2))&*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(25753,4115,"ide_methods.bas");if(r)goto S_39956;} do{ *__LONG_IDESELECTX1=*__LONG_IDESELECTX1-*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL; if(!qbevent)break;evnt(25753,4116,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDECX-*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL; if(!qbevent)break;evnt(25753,4117,"ide_methods.bas");}while(r); S_39959:; if ((-(*__LONG_IDECX< 1 ))||new_error){ if(qbevent){evnt(25753,4118,"ide_methods.bas");if(r)goto S_39959;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,4118,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1=*__LONG_IDECX; if(!qbevent)break;evnt(25753,4118,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4120,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4120,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4121,"ide_methods.bas");}while(r); }else{ LABEL_IDEBLOCKINCREASEINDENT:; if(qbevent){evnt(25753,4123,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_BLOCKINDENTLEVEL= 4 ; if(!qbevent)break;evnt(25753,4124,"ide_methods.bas");}while(r); S_39969:; if ((-(*__LONG_IDEAUTOINDENTSIZE!= 0 ))||new_error){ if(qbevent){evnt(25753,4125,"ide_methods.bas");if(r)goto S_39969;} do{ *_FUNC_IDE2_LONG_BLOCKINDENTLEVEL=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(25753,4125,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4126,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y2=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,4127,"ide_methods.bas");}while(r); S_39974:; if ((-(*_FUNC_IDE2_LONG_Y1==*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4129,"ide_methods.bas");if(r)goto S_39974;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4130,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4131,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,4132,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,4132,"ide_methods.bas");}while(r); S_39979:; if ((-(*_FUNC_IDE2_LONG_SX2<*_FUNC_IDE2_LONG_SX1))||new_error){ if(qbevent){evnt(25753,4133,"ide_methods.bas");if(r)goto S_39979;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,4133,"ide_methods.bas");}while(r); } S_39982:; fornext_value4308=*_FUNC_IDE2_LONG_SX1; fornext_finalvalue4308=*_FUNC_IDE2_LONG_SX2- 1 ; fornext_step4308= 1 ; if (fornext_step4308<0) fornext_step_negative4308=1; else fornext_step_negative4308=0; if (new_error) goto fornext_error4308; goto fornext_entrylabel4308; while(1){ fornext_value4308=fornext_step4308+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4308: *_FUNC_IDE2_LONG_X=fornext_value4308; if (fornext_step_negative4308){ if (fornext_value4308fornext_finalvalue4308) break; } fornext_error4308:; if(qbevent){evnt(25753,4134,"ide_methods.bas");if(r)goto S_39982;} S_39983:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,4135,"ide_methods.bas");if(r)goto S_39983;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4135,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4135,"ide_methods.bas");}while(r); } fornext_continue_4307:; } fornext_exit_4307:; S_39989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,4137,"ide_methods.bas");if(r)goto S_39989;} do{ goto LABEL_SKIPBLOCKINDENT; if(!qbevent)break;evnt(25753,4138,"ide_methods.bas");}while(r); } } S_39993:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4142,"ide_methods.bas");if(r)goto S_39993;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(25753,4142,"ide_methods.bas");}while(r); } S_39996:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(25753,4143,"ide_methods.bas");if(r)goto S_39996;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(25753,4143,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_LHS= 10000000 ; if(!qbevent)break;evnt(25753,4145,"ide_methods.bas");}while(r); S_40000:; fornext_value4311=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4311=*_FUNC_IDE2_LONG_Y2; fornext_step4311= 1 ; if (fornext_step4311<0) fornext_step_negative4311=1; else fornext_step_negative4311=0; if (new_error) goto fornext_error4311; goto fornext_entrylabel4311; while(1){ fornext_value4311=fornext_step4311+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4311: *_FUNC_IDE2_LONG_Y=fornext_value4311; if (fornext_step_negative4311){ if (fornext_value4311fornext_finalvalue4311) break; } fornext_error4311:; if(qbevent){evnt(25753,4146,"ide_methods.bas");if(r)goto S_40000;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4147,"ide_methods.bas");}while(r); S_40002:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4148,"ide_methods.bas");if(r)goto S_40002;} do{ qbs_set(_FUNC_IDE2_STRING_TA,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4149,"ide_methods.bas");}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(25753,4150,"ide_methods.bas");}while(r); S_40005:; if ((-(*_FUNC_IDE2_LONG_T<*_FUNC_IDE2_LONG_LHS))||new_error){ if(qbevent){evnt(25753,4151,"ide_methods.bas");if(r)goto S_40005;} do{ *_FUNC_IDE2_LONG_LHS=*_FUNC_IDE2_LONG_T; if(!qbevent)break;evnt(25753,4151,"ide_methods.bas");}while(r); } } fornext_continue_4310:; } fornext_exit_4310:; S_40010:; fornext_value4316=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4316=*_FUNC_IDE2_LONG_Y2; fornext_step4316= 1 ; if (fornext_step4316<0) fornext_step_negative4316=1; else fornext_step_negative4316=0; if (new_error) goto fornext_error4316; goto fornext_entrylabel4316; while(1){ fornext_value4316=fornext_step4316+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4316: *_FUNC_IDE2_LONG_Y=fornext_value4316; if (fornext_step_negative4316){ if (fornext_value4316fornext_finalvalue4316) break; } fornext_error4316:; if(qbevent){evnt(25753,4155,"ide_methods.bas");if(r)goto S_40010;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4156,"ide_methods.bas");}while(r); S_40012:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4157,"ide_methods.bas");if(r)goto S_40012;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_LHS),func_space(*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL)),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(25753,4158,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4159,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4160,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4161,"ide_methods.bas");}while(r); } fornext_continue_4315:; } fornext_exit_4315:; S_40019:; if (((-(*_FUNC_IDE2_LONG_Y1==*_FUNC_IDE2_LONG_Y2))&*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(25753,4164,"ide_methods.bas");if(r)goto S_40019;} do{ *__LONG_IDESELECTX1=*__LONG_IDESELECTX1+*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL; if(!qbevent)break;evnt(25753,4165,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDECX+*_FUNC_IDE2_LONG_BLOCKINDENTLEVEL; if(!qbevent)break;evnt(25753,4166,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4168,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4168,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4169,"ide_methods.bas");}while(r); } }else{ LABEL_SKIPBLOCKINDENT:; if(qbevent){evnt(25753,4172,"ide_methods.bas");r=0;} S_40028:; if ((-(*__LONG_KSHIFT== 0 ))||new_error){ if(qbevent){evnt(25753,4173,"ide_methods.bas");if(r)goto S_40028;} do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(25753,4174,"ide_methods.bas");}while(r); S_40030:; if ((-(*__LONG_IDEAUTOINDENTSIZE!= 0 ))||new_error){ if(qbevent){evnt(25753,4175,"ide_methods.bas");if(r)goto S_40030;} do{ *_FUNC_IDE2_LONG_X=*__LONG_IDEAUTOINDENTSIZE; if(!qbevent)break;evnt(25753,4175,"ide_methods.bas");}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(25753,4176,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4178,"ide_methods.bas");}while(r); } } } S_40039:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))&(~(*__BYTE_ALTSPECIAL))))||new_error){ if(qbevent){evnt(25753,4183,"ide_methods.bas");if(r)goto S_40039;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4183,"ide_methods.bas");}while(r); } S_40042:; if ((*__LONG_KCTRL&(~(*__LONG_KALT)))||new_error){ if(qbevent){evnt(25753,4187,"ide_methods.bas");if(r)goto S_40042;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4187,"ide_methods.bas");}while(r); } S_40045:; if ((*__LONG_KALT&(~(*__LONG_KCTRL))&(~(*__BYTE_ALTSPECIAL)))||new_error){ if(qbevent){evnt(25753,4188,"ide_methods.bas");if(r)goto S_40045;} do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,4188,"ide_methods.bas");}while(r); } S_40048:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,4191,"ide_methods.bas");if(r)goto S_40048;} do{ SUB_DELSELECT(); if(!qbevent)break;evnt(25753,4191,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4192,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4193,"ide_methods.bas");}while(r); S_40053:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,4196,"ide_methods.bas");if(r)goto S_40053;} do{ *_FUNC_IDE2_LONG_ASCK=qbs_asc(__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4197,"ide_methods.bas");}while(r); S_40055:; 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(25753,4198,"ide_methods.bas");if(r)goto S_40055;} S_40056:; if ((-(*__LONG_IDEUNDOCOMBOCHR== 8 ))||new_error){ if(qbevent){evnt(25753,4199,"ide_methods.bas");if(r)goto S_40056;} do{ *__LONG_IDEUNDOCOMBO= 0 ; if(!qbevent)break;evnt(25753,4199,"ide_methods.bas");}while(r); } S_40059:; if ((-(*__LONG_IDEUNDOCOMBO== 0 ))||new_error){ if(qbevent){evnt(25753,4200,"ide_methods.bas");if(r)goto S_40059;} do{ *__LONG_IDEUNDOCOMBO= 2 ; if(!qbevent)break;evnt(25753,4201,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEUNDOCOMBO=*__LONG_IDEUNDOCOMBO+ 1 ; if(!qbevent)break;evnt(25753,4203,"ide_methods.bas");}while(r); S_40063:; if ((-(*__LONG_IDEUNDOCOMBO== 2 ))||new_error){ if(qbevent){evnt(25753,4204,"ide_methods.bas");if(r)goto S_40063;} do{ *__LONG_IDEMERGEUNDO= 1 ; if(!qbevent)break;evnt(25753,4204,"ide_methods.bas");}while(r); } } } do{ *__LONG_IDEUNDOCOMBOCHR=*_FUNC_IDE2_LONG_ASCK; if(!qbevent)break;evnt(25753,4207,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4210,"ide_methods.bas");}while(r); S_40071:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDE2_STRING_A->len)<(*__LONG_IDECX- 1 ))))||new_error){ if(qbevent){evnt(25753,4211,"ide_methods.bas");if(r)goto S_40071;} 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(25753,4211,"ide_methods.bas");}while(r); } S_40074:; if ((*__INTEGER_IDEINSERT)||new_error){ if(qbevent){evnt(25753,4213,"ide_methods.bas");if(r)goto S_40074;} 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(25753,4214,"ide_methods.bas");}while(r); S_40076:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(25753,4215,"ide_methods.bas");if(r)goto S_40076;} 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(25753,4215,"ide_methods.bas");}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(25753,4216,"ide_methods.bas");}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(25753,4218,"ide_methods.bas");}while(r); } do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4221,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDECX+__STRING_K->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4222,"ide_methods.bas");}while(r); LABEL_SPECIALCHAR:; if(qbevent){evnt(25753,4223,"ide_methods.bas");r=0;} S_40085:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_IDEINFO,qbs_new_txt_len("",0)))|(qbs_equal(qbs_left(__STRING_IDEINFO, 19 ),qbs_new_txt_len("Selection length = ",19))))))||new_error){ if(qbevent){evnt(25753,4226,"ide_methods.bas");if(r)goto S_40085;} S_40086:; if ((-(*__LONG_IDECY==*__LONG_IDESELECTY1))||new_error){ if(qbevent){evnt(25753,4227,"ide_methods.bas");if(r)goto S_40086;} do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,4228,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,4228,"ide_methods.bas");}while(r); S_40089:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,4229,"ide_methods.bas");if(r)goto S_40089;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,4229,"ide_methods.bas");}while(r); } S_40092:; if (((-(*__LONG_IDESELECT== 1 ))&(-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)> 0 )))||new_error){ if(qbevent){evnt(25753,4230,"ide_methods.bas");if(r)goto S_40092;} S_40093:; if ((-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,4231,"ide_methods.bas");if(r)goto S_40093;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4232,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDECURRENTSINGLELINESELECTION,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_SX1,*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4233,"ide_methods.bas");}while(r); S_40096:; fornext_value4328= 1 ; fornext_finalvalue4328=__STRING_IDECURRENTSINGLELINESELECTION->len; fornext_step4328= 1 ; if (fornext_step4328<0) fornext_step_negative4328=1; else fornext_step_negative4328=0; if (new_error) goto fornext_error4328; goto fornext_entrylabel4328; while(1){ fornext_value4328=fornext_step4328+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4328: *_FUNC_IDE2_LONG_I=fornext_value4328; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4328){ if (fornext_value4328fornext_finalvalue4328) break; } fornext_error4328:; if(qbevent){evnt(25753,4234,"ide_methods.bas");if(r)goto S_40096;} S_40097:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDE2_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(__STRING_IDECURRENTSINGLELINESELECTION,*_FUNC_IDE2_LONG_I, 1 ,1),0)> 0 )))||new_error){ if(qbevent){evnt(25753,4235,"ide_methods.bas");if(r)goto S_40097;} S_40098:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(func_mid(__STRING_IDECURRENTSINGLELINESELECTION,*_FUNC_IDE2_LONG_I, 1 ,1),qbs_new_txt_len(".",1))))||new_error){ if(qbevent){evnt(25753,4237,"ide_methods.bas");if(r)goto S_40098;} do{ qbs_set(__STRING_IDECURRENTSINGLELINESELECTION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4238,"ide_methods.bas");}while(r); do{ goto fornext_exit_4327; if(!qbevent)break;evnt(25753,4239,"ide_methods.bas");}while(r); } } fornext_continue_4327:; } fornext_exit_4327:; } do{ qbs_set(__STRING_IDEINFO,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Selection length = ",19),FUNC_STR2(&(pass4330=*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1))),qbs_new_txt_len(" character",10)),qbs_left(qbs_new_txt_len("s",1),func_abs((int32)(-((*_FUNC_IDE2_LONG_SX2-*_FUNC_IDE2_LONG_SX1)>( 1 ))))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4244,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,4245,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4247,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDECURRENTSINGLELINESELECTION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4248,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,4249,"ide_methods.bas");}while(r); } }else{ S_40113:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,4252,"ide_methods.bas");if(r)goto S_40113;} do{ *_FUNC_IDE2_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,4253,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4254,"ide_methods.bas");}while(r); S_40116:; if (((-(*_FUNC_IDE2_LONG_SY1>*_FUNC_IDE2_LONG_SY2))|(-(*__LONG_IDECX> 1 )))||new_error){ if(qbevent){evnt(25753,4255,"ide_methods.bas");if(r)goto S_40116;} do{ qbs_set(__STRING_IDEINFO,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Selection length = ",19),FUNC_STR2(&(pass4331=func_abs((int64)(*_FUNC_IDE2_LONG_SY2-*_FUNC_IDE2_LONG_SY1))+ 1 ))),qbs_new_txt_len(" line",5)),qbs_left(qbs_new_txt_len("s",1),func_abs((int32)(-((func_abs((int64)(*_FUNC_IDE2_LONG_SY2-*_FUNC_IDE2_LONG_SY1))+ 1 )> 1 )))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4256,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDEINFO,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Selection length = ",19),FUNC_STR2(&(pass4332=*_FUNC_IDE2_LONG_SY2-*_FUNC_IDE2_LONG_SY1))),qbs_new_txt_len(" line",5)),qbs_left(qbs_new_txt_len("s",1),func_abs((int32)(-((*_FUNC_IDE2_LONG_SY2-*_FUNC_IDE2_LONG_SY1)>( 1 ))))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4258,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4261,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_IDECURRENTSINGLELINESELECTION,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4263,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,4264,"ide_methods.bas");}while(r); } } S_40128:; if ((*__BYTE_ALTSPECIAL)||new_error){ if(qbevent){evnt(25753,4268,"ide_methods.bas");if(r)goto S_40128;} do{ *__BYTE_ALTSPECIAL= 0 ; if(!qbevent)break;evnt(25753,4269,"ide_methods.bas");}while(r); do{ *__LONG_IDEENTERMENU= 0 ; if(!qbevent)break;evnt(25753,4270,"ide_methods.bas");}while(r); do{ *__LONG_KALT= 0 ; if(!qbevent)break;evnt(25753,4271,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4272,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4272,"ide_methods.bas");}while(r); } dl_continue_3968:; }while(1); dl_exit_3968:; LABEL_STARTMENU:; if(qbevent){evnt(25753,4278,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(25753,4279,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDMX=*__LONG_MX; if(!qbevent)break;evnt(25753,4280,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDMY=*__LONG_MY; if(!qbevent)break;evnt(25753,4280,"ide_methods.bas");}while(r); LABEL_STARTMENU2:; if(qbevent){evnt(25753,4281,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(25753,4282,"ide_methods.bas");}while(r); S_40140:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,4283,"ide_methods.bas");if(r)goto S_40140;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,4283,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=44; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_44:; if(!qbevent)break;evnt(25753,4283,"ide_methods.bas");}while(r); } S_40144:; do{ if(qbevent){evnt(25753,4285,"ide_methods.bas");if(r)goto S_40144;} do{ qbg_sub_locate( 1 , 3 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,4287,"ide_methods.bas");}while(r); S_40146:; fornext_value4335= 1 ; fornext_finalvalue4335=*__INTEGER_MENUS; fornext_step4335= 1 ; if (fornext_step4335<0) fornext_step_negative4335=1; else fornext_step_negative4335=0; if (new_error) goto fornext_error4335; goto fornext_entrylabel4335; while(1){ fornext_value4335=fornext_step4335+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4335: *_FUNC_IDE2_LONG_I=fornext_value4335; if (fornext_step_negative4335){ if (fornext_value4335fornext_finalvalue4335) break; } fornext_error4335:; if(qbevent){evnt(25753,4288,"ide_methods.bas");if(r)goto S_40146;} S_40147:; if ((-(*_FUNC_IDE2_LONG_M==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4289,"ide_methods.bas");if(r)goto S_40147;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4289,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4289,"ide_methods.bas");}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 skip4336; makefit(tqbs); qbs_print(tqbs,0); skip4336: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4290,"ide_methods.bas");}while(r); S_40153:; if ((-(*_FUNC_IDE2_LONG_M==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4291,"ide_methods.bas");if(r)goto S_40153;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4291,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4291,"ide_methods.bas");}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 skip4337; makefit(tqbs); qbs_print(tqbs,0); skip4337: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4292,"ide_methods.bas");}while(r); S_40159:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(25753,4293,"ide_methods.bas");if(r)goto S_40159;} 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(25753,4293,"ide_methods.bas");}while(r); } fornext_continue_4334:; } fornext_exit_4334:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4296,"ide_methods.bas");}while(r); S_40164:; do{ if(qbevent){evnt(25753,4297,"ide_methods.bas");if(r)goto S_40164;} do{ *_FUNC_IDE2_LONG_LASTALTHELD=*_FUNC_IDE2_LONG_ALTHELD; if(!qbevent)break;evnt(25753,4299,"ide_methods.bas");}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,4301,"ide_methods.bas");}while(r); S_40167:; if (((-(*_FUNC_IDE2_LONG_OLDMX!=*__LONG_MX))|(-(*_FUNC_IDE2_LONG_OLDMY!=*__LONG_MY)))||new_error){ if(qbevent){evnt(25753,4302,"ide_methods.bas");if(r)goto S_40167;} S_40168:; if (((-(*__LONG_MY== 1 ))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU!= 1 )))||new_error){ if(qbevent){evnt(25753,4303,"ide_methods.bas");if(r)goto S_40168;} do{ *_FUNC_IDE2_LONG_LASTM=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,4304,"ide_methods.bas");}while(r); S_40170:; fornext_value4342= 1 ; fornext_finalvalue4342=*__INTEGER_MENUS; fornext_step4342= 1 ; if (fornext_step4342<0) fornext_step_negative4342=1; else fornext_step_negative4342=0; if (new_error) goto fornext_error4342; goto fornext_entrylabel4342; while(1){ fornext_value4342=fornext_step4342+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4342: *_FUNC_IDE2_LONG_I=fornext_value4342; if (fornext_step_negative4342){ if (fornext_value4342fornext_finalvalue4342) break; } fornext_error4342:; if(qbevent){evnt(25753,4305,"ide_methods.bas");if(r)goto S_40170;} do{ *_FUNC_IDE2_LONG_X=string2i(func_mid(_FUNC_IDE2_STRING_MENULOCATIONS,(*_FUNC_IDE2_LONG_I* 2 )-( 1 ), 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4306,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2=string2i(func_mid(_FUNC_IDE2_STRING_MENULOCATIONS,(*_FUNC_IDE2_LONG_I* 2 )-( 1 ), 2 ,1))+((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; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4307,"ide_methods.bas");}while(r); S_40173:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<*_FUNC_IDE2_LONG_X2)))||new_error){ if(qbevent){evnt(25753,4308,"ide_methods.bas");if(r)goto S_40173;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,4309,"ide_methods.bas");}while(r); S_40175:; if ((-(*_FUNC_IDE2_LONG_M!=*_FUNC_IDE2_LONG_LASTM))||new_error){ if(qbevent){evnt(25753,4310,"ide_methods.bas");if(r)goto S_40175;} do{ goto dl_exit_4340; if(!qbevent)break;evnt(25753,4310,"ide_methods.bas");}while(r); } } fornext_continue_4341:; } fornext_exit_4341:; } do{ *_FUNC_IDE2_LONG_OLDMX=*__LONG_MX; if(!qbevent)break;evnt(25753,4314,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDMY=*__LONG_MY; if(!qbevent)break;evnt(25753,4314,"ide_methods.bas");}while(r); } S_40184:; if ((-(*__LONG_ICHANGED== 0 ))||new_error){ if(qbevent){evnt(25753,4316,"ide_methods.bas");if(r)goto S_40184;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,4316,"ide_methods.bas");}while(r); } S_40187:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(25753,4318,"ide_methods.bas");if(r)goto S_40187;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(25753,4318,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_ALTHELD= 0 ; if(!qbevent)break;evnt(25753,4318,"ide_methods.bas");}while(r); } S_40192:; if (((-(*_FUNC_IDE2_LONG_ALTHELD!= 0 ))&(-(*_FUNC_IDE2_LONG_LASTALTHELD== 0 )))||new_error){ if(qbevent){evnt(25753,4320,"ide_methods.bas");if(r)goto S_40192;} S_40193:; do{ if(qbevent){evnt(25753,4321,"ide_methods.bas");if(r)goto S_40193;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,4322,"ide_methods.bas");}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,4323,"ide_methods.bas");}while(r); S_40196:; if ((qbs_cleanup(qbs_tmp_base,(-(func__hasfocus()== 0 ))&(((qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))|(-(*__LONG_MACOSX== 1 ))))))||new_error){ if(qbevent){evnt(25753,4324,"ide_methods.bas");if(r)goto S_40196;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4325,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4325,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4326,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4326,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4327,"ide_methods.bas");}while(r); } S_40203:; if ((func__resize())||new_error){ if(qbevent){evnt(25753,4330,"ide_methods.bas");if(r)goto S_40203;} do{ *_FUNC_IDE2_LONG_FORCERESIZE= -1 ; if(!qbevent)break;evnt(25753,4331,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,4331,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4331,"ide_methods.bas");}while(r); } S_40208:; dl_continue_4344:; }while((!(-(*__LONG_KALT== 0 )))&&(!new_error)); dl_exit_4344:; if(qbevent){evnt(25753,4333,"ide_methods.bas");if(r)goto S_40208;} do{ *__LONG_KB= 27 ; if(!qbevent)break;evnt(25753,4334,"ide_methods.bas");}while(r); } S_40211:; if ((qbs_cleanup(qbs_tmp_base,(-(func__hasfocus()== 0 ))&(((qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))|(-(*__LONG_MACOSX== 1 ))))))||new_error){ if(qbevent){evnt(25753,4337,"ide_methods.bas");if(r)goto S_40211;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4338,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4338,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4339,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4339,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4340,"ide_methods.bas");}while(r); } S_40218:; if ((func__resize())||new_error){ if(qbevent){evnt(25753,4343,"ide_methods.bas");if(r)goto S_40218;} do{ *_FUNC_IDE2_LONG_FORCERESIZE= -1 ; if(!qbevent)break;evnt(25753,4344,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,4344,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4344,"ide_methods.bas");}while(r); } S_40223:; if ((*__LONG_MCLICK|*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,4347,"ide_methods.bas");if(r)goto S_40223;} S_40224:; if ((-(*__LONG_MY== 1 ))||new_error){ if(qbevent){evnt(25753,4348,"ide_methods.bas");if(r)goto S_40224;} S_40225:; fornext_value4346= 1 ; fornext_finalvalue4346=*__INTEGER_MENUS; 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_IDE2_LONG_I); fornext_entrylabel4346: *_FUNC_IDE2_LONG_I=fornext_value4346; if (fornext_step_negative4346){ if (fornext_value4346fornext_finalvalue4346) break; } fornext_error4346:; if(qbevent){evnt(25753,4349,"ide_methods.bas");if(r)goto S_40225;} do{ *_FUNC_IDE2_LONG_X=string2i(func_mid(_FUNC_IDE2_STRING_MENULOCATIONS,(*_FUNC_IDE2_LONG_I* 2 )-( 1 ), 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4350,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2=string2i(func_mid(_FUNC_IDE2_STRING_MENULOCATIONS,(*_FUNC_IDE2_LONG_I* 2 )-( 1 ), 2 ,1))+((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; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4351,"ide_methods.bas");}while(r); S_40228:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<*_FUNC_IDE2_LONG_X2)))||new_error){ if(qbevent){evnt(25753,4352,"ide_methods.bas");if(r)goto S_40228;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,4353,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4354,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4354,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4355,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,4356,"ide_methods.bas");}while(r); } fornext_continue_4345:; } fornext_exit_4345:; } do{ *__LONG_KB= 27 ; if(!qbevent)break;evnt(25753,4360,"ide_methods.bas");}while(r); } S_40239:; if ((func__exit())||new_error){ if(qbevent){evnt(25753,4363,"ide_methods.bas");if(r)goto S_40239;} do{ *__LONG_IDEEXIT= 1 ; if(!qbevent)break;evnt(25753,4363,"ide_methods.bas");}while(r); do{ *__LONG_KB= 27 ; if(!qbevent)break;evnt(25753,4363,"ide_methods.bas");}while(r); } S_40243:; dl_continue_4340:; }while((!(*__LONG_KB))&&(!new_error)); dl_exit_4340:; if(qbevent){evnt(25753,4364,"ide_methods.bas");if(r)goto S_40243;} do{ qbs_set(__STRING_K,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4366,"ide_methods.bas");}while(r); S_40245:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_K->len> 0 ))&*__LONG_KCTRL))||new_error){ if(qbevent){evnt(25753,4367,"ide_methods.bas");if(r)goto S_40245;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4369,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4369,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4370,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4370,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4371,"ide_methods.bas");}while(r); } S_40252:; fornext_value4350= 1 ; fornext_finalvalue4350=*__INTEGER_MENUS; fornext_step4350= 1 ; if (fornext_step4350<0) fornext_step_negative4350=1; else fornext_step_negative4350=0; if (new_error) goto fornext_error4350; goto fornext_entrylabel4350; while(1){ fornext_value4350=fornext_step4350+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4350: *_FUNC_IDE2_LONG_I=fornext_value4350; if (fornext_step_negative4350){ if (fornext_value4350fornext_finalvalue4350) break; } fornext_error4350:; if(qbevent){evnt(25753,4374,"ide_methods.bas");if(r)goto S_40252;} 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(25753,4375,"ide_methods.bas");}while(r); S_40254:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,_FUNC_IDE2_STRING_A)))||new_error){ if(qbevent){evnt(25753,4376,"ide_methods.bas");if(r)goto S_40254;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,4377,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4378,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4378,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4379,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,4380,"ide_methods.bas");}while(r); } fornext_continue_4349:; } fornext_exit_4349:; S_40262:; if ((-(*__LONG_KB== 19200 ))||new_error){ if(qbevent){evnt(25753,4384,"ide_methods.bas");if(r)goto S_40262;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M- 1 ; if(!qbevent)break;evnt(25753,4384,"ide_methods.bas");}while(r); } S_40265:; if ((-(*__LONG_KB== 19712 ))||new_error){ if(qbevent){evnt(25753,4385,"ide_methods.bas");if(r)goto S_40265;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,4385,"ide_methods.bas");}while(r); } S_40268:; if ((-(*__LONG_KB== 27 ))||new_error){ if(qbevent){evnt(25753,4386,"ide_methods.bas");if(r)goto S_40268;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4387,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4387,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4388,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4389,"ide_methods.bas");}while(r); } S_40274:; if ((-(*_FUNC_IDE2_LONG_M< 1 ))||new_error){ if(qbevent){evnt(25753,4391,"ide_methods.bas");if(r)goto S_40274;} do{ *_FUNC_IDE2_LONG_M=*__INTEGER_MENUS; if(!qbevent)break;evnt(25753,4391,"ide_methods.bas");}while(r); } S_40277:; if (((-(*_FUNC_IDE2_LONG_M>*__INTEGER_MENUS))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 0 )))||new_error){ if(qbevent){evnt(25753,4392,"ide_methods.bas");if(r)goto S_40277;} do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(25753,4392,"ide_methods.bas");}while(r); } S_40280:; if (((-(*__LONG_KB== 18432 ))|(-(*__LONG_KB== 20480 ))|(-(*__LONG_KB== 13 )))||new_error){ if(qbevent){evnt(25753,4393,"ide_methods.bas");if(r)goto S_40280;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4394,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4394,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4395,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,4396,"ide_methods.bas");}while(r); } S_40286:; if (((-(*__LONG_KB> 0 ))&(-(*__LONG_KB<= 255 )))||new_error){ if(qbevent){evnt(25753,4400,"ide_methods.bas");if(r)goto S_40286;} S_40287:; if ((-(*__LONG_KALT== 0 ))||new_error){ if(qbevent){evnt(25753,4401,"ide_methods.bas");if(r)goto S_40287;} do{ *__LONG_ICHECKLATER= 1 ; if(!qbevent)break;evnt(25753,4402,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4403,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4403,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4404,"ide_methods.bas");}while(r); } } dl_continue_4333:; }while(1); dl_exit_4333:; LABEL_SHOWMENU:; if(qbevent){evnt(25753,4412,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(25753,4413,"ide_methods.bas");}while(r); S_40296:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,4414,"ide_methods.bas");if(r)goto S_40296;} do{ *__LONG_IDESYSTEM= 1 ; if(!qbevent)break;evnt(25753,4414,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=45; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_45:; if(!qbevent)break;evnt(25753,4414,"ide_methods.bas");}while(r); } do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,4415,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4416,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENUR=*_FUNC_IDE2_LONG_R; if(!qbevent)break;evnt(25753,4417,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4418,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_S= 0 ; if(!qbevent)break;evnt(25753,4419,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENU= 0 ; if(!qbevent)break;evnt(25753,4420,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_PARENTMENUSETUP= 0 ; if(!qbevent)break;evnt(25753,4421,"ide_methods.bas");}while(r); S_40307:; if(qbevent){evnt(25753,4422,"ide_methods.bas");if(r)goto S_40307;} S_40308:; if (((*_FUNC_IDE2_LONG_IDECONTEXTUALMENU==( 1 )))||new_error){ if(qbevent){evnt(25753,4423,"ide_methods.bas");if(r)goto S_40308;} do{ *_FUNC_IDE2_LONG_IDECTXMENUX=*__LONG_MX; if(!qbevent)break;evnt(25753,4425,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECTXMENUY=*__LONG_MY; if(!qbevent)break;evnt(25753,4426,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*__INTEGER_IDECONTEXTUALMENUID; if(!qbevent)break;evnt(25753,4427,"ide_methods.bas");}while(r); sc_ec_195_end:; goto sc_4351_end; } S_40312:; if (((*_FUNC_IDE2_LONG_IDECONTEXTUALMENU==( 2 )))||new_error){ if(qbevent){evnt(25753,4428,"ide_methods.bas");if(r)goto S_40312;} do{ *_FUNC_IDE2_LONG_IDECTXMENUX=*_FUNC_IDE2_LONG_XX+*_FUNC_IDE2_LONG_W+ 3 ; if(!qbevent)break;evnt(25753,4430,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECTXMENUY=*_FUNC_IDE2_LONG_YY+*_FUNC_IDE2_LONG_R; if(!qbevent)break;evnt(25753,4431,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENU=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,4432,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*__INTEGER_VIEWMENUSHOWLINENUMBERSSUBMENUID; if(!qbevent)break;evnt(25753,4433,"ide_methods.bas");}while(r); sc_ec_196_end:; goto sc_4351_end; } sc_4351_end:; do{ SUB_IDEMAKEEDITMENU(); if(!qbevent)break;evnt(25753,4436,"ide_methods.bas");}while(r); S_40319:; if ((-(*__LONG_TOTALWARNINGS== 0 ))||new_error){ if(qbevent){evnt(25753,4438,"ide_methods.bas");if(r)goto S_40319;} do{ tmp_long=array_check((*__INTEGER_VIEWMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUCOMPILERWARNINGS)-__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("~Compiler #Warnings... Ctrl+W",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4439,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*__INTEGER_VIEWMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUCOMPILERWARNINGS)-__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("Compiler #Warnings... Ctrl+W",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4441,"ide_methods.bas");}while(r); } S_40324:; if ((-(*__LONG_CALLSTACKLENGTH== 0 ))||new_error){ if(qbevent){evnt(25753,4444,"ide_methods.bas");if(r)goto S_40324;} do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUCALLSTACK)-__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("~Call #Stack... F12",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4445,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUCALLSTACK)-__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("Call #Stack... F12",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4447,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_OLDMY=*__LONG_MY; if(!qbevent)break;evnt(25753,4450,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDMX=*__LONG_MX; if(!qbevent)break;evnt(25753,4450,"ide_methods.bas");}while(r); S_40331:; do{ if(qbevent){evnt(25753,4451,"ide_methods.bas");if(r)goto S_40331;} do{ sub_pcopy( 2 , 1 ); if(!qbevent)break;evnt(25753,4452,"ide_methods.bas");}while(r); S_40333:; if ((-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 0 ))||new_error){ if(qbevent){evnt(25753,4454,"ide_methods.bas");if(r)goto S_40333;} do{ *_FUNC_IDE2_LONG_X= 4 ; if(!qbevent)break;evnt(25753,4456,"ide_methods.bas");}while(r); S_40335:; fornext_value4354= 1 ; fornext_finalvalue4354=*_FUNC_IDE2_LONG_M- 1 ; 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_IDE2_LONG_I); fornext_entrylabel4354: *_FUNC_IDE2_LONG_I=fornext_value4354; if (fornext_step_negative4354){ if (fornext_value4354fornext_finalvalue4354) break; } fornext_error4354:; if(qbevent){evnt(25753,4456,"ide_methods.bas");if(r)goto S_40335;} 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(25753,4456,"ide_methods.bas");}while(r); S_40337:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(25753,4457,"ide_methods.bas");if(r)goto S_40337;} 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(25753,4457,"ide_methods.bas");}while(r); } fornext_continue_4353:; } fornext_exit_4353:; do{ *_FUNC_IDE2_LONG_XX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,4458,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4459,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDE2_LONG_XX- 1 , 1 ,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)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4459,"ide_methods.bas");}while(r); }else{ S_40345:; if (((-(*_FUNC_IDE2_LONG_PARENTMENU> 0 ))&(-(*_FUNC_IDE2_BYTE_PARENTMENUSETUP== 0 )))||new_error){ if(qbevent){evnt(25753,4461,"ide_methods.bas");if(r)goto S_40345;} do{ *_FUNC_IDE2_BYTE_PARENTMENUSETUP= -1 ; if(!qbevent)break;evnt(25753,4462,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__X1=*_FUNC_IDE2_LONG_XX- 1 ; if(!qbevent)break;evnt(25753,4463,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__X2=*_FUNC_IDE2_LONG_XX+*_FUNC_IDE2_LONG_W; if(!qbevent)break;evnt(25753,4464,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y1= 3 ; if(!qbevent)break;evnt(25753,4465,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y2=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y1+((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_PARENTMENU)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; if(!qbevent)break;evnt(25753,4466,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_W= 0 ; if(!qbevent)break;evnt(25753,4470,"ide_methods.bas");}while(r); S_40354:; fornext_value4358= 1 ; fornext_finalvalue4358=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; fornext_step4358= 1 ; if (fornext_step4358<0) fornext_step_negative4358=1; else fornext_step_negative4358=0; if (new_error) goto fornext_error4358; goto fornext_entrylabel4358; while(1){ fornext_value4358=fornext_step4358+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4358: *_FUNC_IDE2_LONG_I=fornext_value4358; if (fornext_step_negative4358){ if (fornext_value4358fornext_finalvalue4358) break; } fornext_error4358:; if(qbevent){evnt(25753,4471,"ide_methods.bas");if(r)goto S_40354;} 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(25753,4472,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_L=_FUNC_IDE2_STRING_M->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4473,"ide_methods.bas");}while(r); S_40357:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_M,qbs_new_txt_len("#",1),0)))||new_error){ if(qbevent){evnt(25753,4474,"ide_methods.bas");if(r)goto S_40357;} do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L- 1 ; if(!qbevent)break;evnt(25753,4474,"ide_methods.bas");}while(r); } S_40360:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_M, 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25753,4475,"ide_methods.bas");if(r)goto S_40360;} do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L- 1 ; if(!qbevent)break;evnt(25753,4475,"ide_methods.bas");}while(r); } S_40363:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_M, 1 ),func_chr( 7 ))))||new_error){ if(qbevent){evnt(25753,4476,"ide_methods.bas");if(r)goto S_40363;} do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L- 1 ; if(!qbevent)break;evnt(25753,4476,"ide_methods.bas");}while(r); } S_40366:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDE2_STRING_M,qbs_new_txt_len(" ",2),0)))||new_error){ if(qbevent){evnt(25753,4477,"ide_methods.bas");if(r)goto S_40366;} do{ *_FUNC_IDE2_LONG_L=*_FUNC_IDE2_LONG_L+ 2 ; if(!qbevent)break;evnt(25753,4477,"ide_methods.bas");}while(r); } S_40369:; if ((-(*_FUNC_IDE2_LONG_L>*_FUNC_IDE2_LONG_W))||new_error){ if(qbevent){evnt(25753,4478,"ide_methods.bas");if(r)goto S_40369;} do{ *_FUNC_IDE2_LONG_W=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,4478,"ide_methods.bas");}while(r); } fornext_continue_4357:; } fornext_exit_4357:; do{ *_FUNC_IDE2_LONG_YY= 2 ; if(!qbevent)break;evnt(25753,4480,"ide_methods.bas");}while(r); S_40374:; if ((-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU> 0 ))||new_error){ if(qbevent){evnt(25753,4481,"ide_methods.bas");if(r)goto S_40374;} do{ *_FUNC_IDE2_LONG_ACTUAL__ASCII_CHR_046__IDEWY=*__LONG_IDEWY; if(!qbevent)break;evnt(25753,4482,"ide_methods.bas");}while(r); S_40376:; if ((-(*__LONG_IDESUBWINDOW!= 0 ))||new_error){ if(qbevent){evnt(25753,4483,"ide_methods.bas");if(r)goto S_40376;} do{ *_FUNC_IDE2_LONG_ACTUAL__ASCII_CHR_046__IDEWY=*__LONG_IDEWY+*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,4484,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_XX=*_FUNC_IDE2_LONG_IDECTXMENUX; if(!qbevent)break;evnt(25753,4486,"ide_methods.bas");}while(r); S_40380:; if ((-(*_FUNC_IDE2_LONG_XX< 3 ))||new_error){ if(qbevent){evnt(25753,4487,"ide_methods.bas");if(r)goto S_40380;} do{ *_FUNC_IDE2_LONG_XX= 3 ; if(!qbevent)break;evnt(25753,4487,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_YY=*_FUNC_IDE2_LONG_IDECTXMENUY; if(!qbevent)break;evnt(25753,4488,"ide_methods.bas");}while(r); S_40384:; if ((-((*_FUNC_IDE2_LONG_YY+((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 2 )>*_FUNC_IDE2_LONG_ACTUAL__ASCII_CHR_046__IDEWY))||new_error){ if(qbevent){evnt(25753,4489,"ide_methods.bas");if(r)goto S_40384;} do{ *_FUNC_IDE2_LONG_YY=*_FUNC_IDE2_LONG_ACTUAL__ASCII_CHR_046__IDEWY- 2 -((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; if(!qbevent)break;evnt(25753,4489,"ide_methods.bas");}while(r); } } S_40388:; if ((-(*_FUNC_IDE2_LONG_XX>(*__LONG_IDEWX-*_FUNC_IDE2_LONG_W- 3 )))||new_error){ if(qbevent){evnt(25753,4491,"ide_methods.bas");if(r)goto S_40388;} do{ *_FUNC_IDE2_LONG_XX=*__LONG_IDEWX-*_FUNC_IDE2_LONG_W- 3 ; if(!qbevent)break;evnt(25753,4491,"ide_methods.bas");}while(r); } do{ SUB_UPDATEMENUHELPLINE(((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_FUNC_IDE2_LONG_R)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4493,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4495,"ide_methods.bas");}while(r); do{ SUB_IDEBOXSHADOW(&(pass4360=*_FUNC_IDE2_LONG_XX- 2 ),_FUNC_IDE2_LONG_YY,&(pass4361=*_FUNC_IDE2_LONG_W+ 4 ),&(pass4362=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 2 )); if(!qbevent)break;evnt(25753,4496,"ide_methods.bas");}while(r); S_40394:; fornext_value4364= 1 ; fornext_finalvalue4364=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; 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_IDE2_LONG_I); fornext_entrylabel4364: *_FUNC_IDE2_LONG_I=fornext_value4364; if (fornext_step_negative4364){ if (fornext_value4364fornext_finalvalue4364) break; } fornext_error4364:; if(qbevent){evnt(25753,4499,"ide_methods.bas");if(r)goto S_40394;} 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(25753,4500,"ide_methods.bas");}while(r); S_40396:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_M,qbs_new_txt_len("-",1))))||new_error){ if(qbevent){evnt(25753,4501,"ide_methods.bas");if(r)goto S_40396;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4502,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDE2_LONG_XX- 2 ,*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,qbs_add(qbs_add(func_chr( 195 ),func_string(*_FUNC_IDE2_LONG_W+ 2 ,(func_chr( 196 )->chr[0]))),func_chr( 180 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4502,"ide_methods.bas");}while(r); S_40399:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_M, 1 ),qbs_new_txt_len("~",1)))){ if(qbevent){evnt(25753,4503,"ide_methods.bas");if(r)goto S_40399;} do{ qbs_set(_FUNC_IDE2_STRING_M,qbs_right(_FUNC_IDE2_STRING_M,_FUNC_IDE2_STRING_M->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4504,"ide_methods.bas");}while(r); S_40401:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4505,"ide_methods.bas");if(r)goto S_40401;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4505,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDE2_LONG_XX- 1 ,*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,func_space(*_FUNC_IDE2_LONG_W+ 2 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4505,"ide_methods.bas");}while(r); } S_40405:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_M, 1 ),func_chr( 7 ))))||new_error){ if(qbevent){evnt(25753,4506,"ide_methods.bas");if(r)goto S_40405;} do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,*_FUNC_IDE2_LONG_XX- 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,4506,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,*_FUNC_IDE2_LONG_XX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,4506,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_H= -1 ; if(!qbevent)break;evnt(25753,4507,"ide_methods.bas");}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(25753,4507,"ide_methods.bas");}while(r); S_40412:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,4507,"ide_methods.bas");if(r)goto S_40412;} do{ *_FUNC_IDE2_LONG_H=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,4507,"ide_methods.bas");}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(25753,4507,"ide_methods.bas");}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(25753,4508,"ide_methods.bas");}while(r); S_40417:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,4508,"ide_methods.bas");if(r)goto S_40417;} 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(25753,4508,"ide_methods.bas");}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(25753,4508,"ide_methods.bas");}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(25753,4508,"ide_methods.bas");}while(r); } S_40422:; fornext_value4371= 1 ; fornext_finalvalue4371=_FUNC_IDE2_STRING_M->len; fornext_step4371= 1 ; if (fornext_step4371<0) fornext_step_negative4371=1; else fornext_step_negative4371=0; if (new_error) goto fornext_error4371; goto fornext_entrylabel4371; while(1){ fornext_value4371=fornext_step4371+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4371: *_FUNC_IDE2_LONG_X=fornext_value4371; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4371){ if (fornext_value4371fornext_finalvalue4371) break; } fornext_error4371:; if(qbevent){evnt(25753,4509,"ide_methods.bas");if(r)goto S_40422;} S_40423:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4510,"ide_methods.bas");if(r)goto S_40423;} do{ qbg_sub_color( 2 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4510,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4510,"ide_methods.bas");}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 skip4373; makefit(tqbs); qbs_print(tqbs,0); skip4373: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4511,"ide_methods.bas");}while(r); fornext_continue_4370:; } fornext_exit_4370:; }else{ S_40431:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4514,"ide_methods.bas");if(r)goto S_40431;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4514,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDE2_LONG_XX- 1 ,*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,func_space(*_FUNC_IDE2_LONG_W+ 2 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4514,"ide_methods.bas");}while(r); } S_40435:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDE2_STRING_M, 1 ),func_chr( 7 ))))||new_error){ if(qbevent){evnt(25753,4515,"ide_methods.bas");if(r)goto S_40435;} do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,*_FUNC_IDE2_LONG_XX- 1 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,4515,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_locate(*_FUNC_IDE2_LONG_I+*_FUNC_IDE2_LONG_YY,*_FUNC_IDE2_LONG_XX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,4515,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_H= -1 ; if(!qbevent)break;evnt(25753,4516,"ide_methods.bas");}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(25753,4516,"ide_methods.bas");}while(r); S_40442:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,4516,"ide_methods.bas");if(r)goto S_40442;} do{ *_FUNC_IDE2_LONG_H=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,4516,"ide_methods.bas");}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(25753,4516,"ide_methods.bas");}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(25753,4517,"ide_methods.bas");}while(r); S_40447:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,4517,"ide_methods.bas");if(r)goto S_40447;} 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(25753,4517,"ide_methods.bas");}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(25753,4517,"ide_methods.bas");}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(25753,4517,"ide_methods.bas");}while(r); } S_40452:; fornext_value4379= 1 ; fornext_finalvalue4379=_FUNC_IDE2_STRING_M->len; fornext_step4379= 1 ; if (fornext_step4379<0) fornext_step_negative4379=1; else fornext_step_negative4379=0; if (new_error) goto fornext_error4379; goto fornext_entrylabel4379; while(1){ fornext_value4379=fornext_step4379+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4379: *_FUNC_IDE2_LONG_X=fornext_value4379; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4379){ if (fornext_value4379fornext_finalvalue4379) break; } fornext_error4379:; if(qbevent){evnt(25753,4518,"ide_methods.bas");if(r)goto S_40452;} S_40453:; if ((-(*_FUNC_IDE2_LONG_X==*_FUNC_IDE2_LONG_H))||new_error){ if(qbevent){evnt(25753,4519,"ide_methods.bas");if(r)goto S_40453;} S_40454:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4520,"ide_methods.bas");if(r)goto S_40454;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4520,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4520,"ide_methods.bas");}while(r); } }else{ S_40460:; if ((-(*_FUNC_IDE2_LONG_R==*_FUNC_IDE2_LONG_I))||new_error){ if(qbevent){evnt(25753,4522,"ide_methods.bas");if(r)goto S_40460;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,4522,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4522,"ide_methods.bas");}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 skip4381; makefit(tqbs); qbs_print(tqbs,0); skip4381: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4524,"ide_methods.bas");}while(r); fornext_continue_4378:; } fornext_exit_4378:; } } fornext_continue_4363:; } fornext_exit_4363:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,4529,"ide_methods.bas");}while(r); S_40471:; if ((*_FUNC_IDE2_LONG_S)||new_error){ if(qbevent){evnt(25753,4531,"ide_methods.bas");if(r)goto S_40471;} do{ goto LABEL_MENUCHOICEMADE; if(!qbevent)break;evnt(25753,4531,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_BYTE_UPDATEMENUPANEL= 0 ; if(!qbevent)break;evnt(25753,4533,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,4534,"ide_methods.bas");}while(r); S_40476:; do{ if(qbevent){evnt(25753,4535,"ide_methods.bas");if(r)goto S_40476;} do{ *_FUNC_IDE2_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,4536,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,4536,"ide_methods.bas");}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,4537,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LASTALTHELD=*_FUNC_IDE2_LONG_ALTHELD; if(!qbevent)break;evnt(25753,4538,"ide_methods.bas");}while(r); S_40481:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(25753,4538,"ide_methods.bas");if(r)goto S_40481;} do{ *_FUNC_IDE2_LONG_ALTHELD= 1 ; if(!qbevent)break;evnt(25753,4538,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_ALTHELD= 0 ; if(!qbevent)break;evnt(25753,4538,"ide_methods.bas");}while(r); } S_40486:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(25753,4539,"ide_methods.bas");if(r)goto S_40486;} S_40487:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,4540,"ide_methods.bas");if(r)goto S_40487;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4540,"ide_methods.bas");}while(r); } S_40490:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,4541,"ide_methods.bas");if(r)goto S_40490;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4541,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,4541,"ide_methods.bas");}while(r); } S_40494:; if ((*__LONG_MCLICK2)||new_error){ if(qbevent){evnt(25753,4542,"ide_methods.bas");if(r)goto S_40494;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4542,"ide_methods.bas");}while(r); } S_40497:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,4543,"ide_methods.bas");if(r)goto S_40497;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4543,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,4543,"ide_methods.bas");}while(r); } S_40501:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,4544,"ide_methods.bas");if(r)goto S_40501;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4544,"ide_methods.bas");}while(r); } S_40504:; if ((*__LONG_MX)||new_error){ if(qbevent){evnt(25753,4545,"ide_methods.bas");if(r)goto S_40504;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4545,"ide_methods.bas");}while(r); } S_40507:; if ((*__LONG_MY)||new_error){ if(qbevent){evnt(25753,4546,"ide_methods.bas");if(r)goto S_40507;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4546,"ide_methods.bas");}while(r); } } S_40511:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,4548,"ide_methods.bas");if(r)goto S_40511;} do{ *_FUNC_IDE2_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,4548,"ide_methods.bas");}while(r); } S_40514:; if (((-(*_FUNC_IDE2_LONG_ALTHELD!= 0 ))&(-(*_FUNC_IDE2_LONG_LASTALTHELD== 0 )))||new_error){ if(qbevent){evnt(25753,4550,"ide_methods.bas");if(r)goto S_40514;} S_40515:; do{ if(qbevent){evnt(25753,4551,"ide_methods.bas");if(r)goto S_40515;} do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,4552,"ide_methods.bas");}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,4553,"ide_methods.bas");}while(r); S_40518:; if ((qbs_cleanup(qbs_tmp_base,(-(func__hasfocus()== 0 ))&(((qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))|(-(*__LONG_MACOSX== 1 ))))))||new_error){ if(qbevent){evnt(25753,4554,"ide_methods.bas");if(r)goto S_40518;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4555,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4555,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4556,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4556,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4557,"ide_methods.bas");}while(r); } S_40525:; if ((((-(func__resize()!= 0 )))&(-(*__LONG_IDEDEBUGMODE!= 2 )))||new_error){ if(qbevent){evnt(25753,4560,"ide_methods.bas");if(r)goto S_40525;} do{ *_FUNC_IDE2_LONG_FORCERESIZE= -1 ; if(!qbevent)break;evnt(25753,4561,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,4561,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4561,"ide_methods.bas");}while(r); } S_40530:; dl_continue_4383:; }while((!(-(*__LONG_KALT== 0 )))&&(!new_error)); dl_exit_4383:; if(qbevent){evnt(25753,4563,"ide_methods.bas");if(r)goto S_40530;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4564,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4564,"ide_methods.bas");}while(r); do{ goto LABEL_STARTMENU2; if(!qbevent)break;evnt(25753,4565,"ide_methods.bas");}while(r); } S_40535:; if ((func__exit())||new_error){ if(qbevent){evnt(25753,4567,"ide_methods.bas");if(r)goto S_40535;} S_40536:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,4568,"ide_methods.bas");if(r)goto S_40536;} do{ *__LONG_IDEDEBUGMODE= 9 ; if(!qbevent)break;evnt(25753,4569,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,4569,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEEXIT= 1 ; if(!qbevent)break;evnt(25753,4571,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4571,"ide_methods.bas");}while(r); } } S_40544:; if ((qbs_cleanup(qbs_tmp_base,(-(func__hasfocus()== 0 ))&(((qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))|(-(*__LONG_MACOSX== 1 ))))))||new_error){ if(qbevent){evnt(25753,4574,"ide_methods.bas");if(r)goto S_40544;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,4575,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4575,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4576,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4576,"ide_methods.bas");}while(r); S_40549:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,4577,"ide_methods.bas");if(r)goto S_40549;} do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,4577,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4578,"ide_methods.bas");}while(r); } S_40554:; if ((((-(func__resize()!= 0 )))&(-(*__LONG_IDEDEBUGMODE!= 2 )))||new_error){ if(qbevent){evnt(25753,4580,"ide_methods.bas");if(r)goto S_40554;} do{ *_FUNC_IDE2_LONG_FORCERESIZE= -1 ; if(!qbevent)break;evnt(25753,4581,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,4581,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4581,"ide_methods.bas");}while(r); } do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,4583,"ide_methods.bas");}while(r); S_40560:; dl_continue_4382:; }while((!(*_FUNC_IDE2_LONG_CHANGE))&&(!new_error)); dl_exit_4382:; if(qbevent){evnt(25753,4584,"ide_methods.bas");if(r)goto S_40560;} do{ *_FUNC_IDE2_LONG_S= 0 ; if(!qbevent)break;evnt(25753,4586,"ide_methods.bas");}while(r); S_40562:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,4588,"ide_methods.bas");if(r)goto S_40562;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4589,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4589,"ide_methods.bas");}while(r); S_40565:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,4590,"ide_methods.bas");if(r)goto S_40565;} do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,4590,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4591,"ide_methods.bas");}while(r); } S_40570:; if ((*__LONG_MCLICK2&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 1 )))||new_error){ if(qbevent){evnt(25753,4594,"ide_methods.bas");if(r)goto S_40570;} S_40571:; if ((((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 ))))|((-(*__LONG_MY>=*__LONG_IDEWY))&(-(*__LONG_MY<(*__LONG_IDEWY+*__LONG_IDESUBWINDOW)))))||new_error){ if(qbevent){evnt(25753,4596,"ide_methods.bas");if(r)goto S_40571;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4597,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4597,"ide_methods.bas");}while(r); S_40574:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,4598,"ide_methods.bas");if(r)goto S_40574;} do{ *_FUNC_IDE2_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4599,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,4600,"ide_methods.bas");}while(r); S_40577:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,4601,"ide_methods.bas");if(r)goto S_40577;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,4601,"ide_methods.bas");}while(r); } S_40580:; if ((-(*_FUNC_IDE2_LONG_BKPIDECY!=*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,4602,"ide_methods.bas");if(r)goto S_40580;} do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,4603,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4604,"ide_methods.bas");}while(r); } do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,4606,"ide_methods.bas");}while(r); } do{ goto LABEL_INVOKECONTEXTUALMENU; if(!qbevent)break;evnt(25753,4608,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4610,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4610,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4611,"ide_methods.bas");}while(r); } } S_40593:; if ((*_FUNC_IDE2_LONG_MOUSEUP)||new_error){ if(qbevent){evnt(25753,4616,"ide_methods.bas");if(r)goto S_40593;} S_40594:; 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(25753,4617,"ide_methods.bas");if(r)goto S_40594;} S_40595:; if (((-(*__LONG_MY>*_FUNC_IDE2_LONG_YY))&(-(*__LONG_MY<=(((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+*_FUNC_IDE2_LONG_YY))))||new_error){ if(qbevent){evnt(25753,4618,"ide_methods.bas");if(r)goto S_40595;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY-*_FUNC_IDE2_LONG_YY; if(!qbevent)break;evnt(25753,4619,"ide_methods.bas");}while(r); S_40597:; 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)))&(qbs_notequal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1)))))||new_error){ if(qbevent){evnt(25753,4620,"ide_methods.bas");if(r)goto S_40597;} do{ *_FUNC_IDE2_LONG_S=*_FUNC_IDE2_LONG_R; if(!qbevent)break;evnt(25753,4621,"ide_methods.bas");}while(r); } } } S_40602:; if (((-(*_FUNC_IDE2_LONG_PARENTMENU> 0 ))&(-(*__LONG_MX>=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__X1))&(-(*__LONG_MX<=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__X2))&(-(*__LONG_MY>=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y1))&(-(*__LONG_MY<=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y2)))||new_error){ if(qbevent){evnt(25753,4628,"ide_methods.bas");if(r)goto S_40602;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_PARENTMENU; if(!qbevent)break;evnt(25753,4629,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_PARENTMENUR; if(!qbevent)break;evnt(25753,4630,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENU= 0 ; if(!qbevent)break;evnt(25753,4631,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENUR= 0 ; if(!qbevent)break;evnt(25753,4632,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,4633,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 2 ); if(!qbevent)break;evnt(25753,4634,"ide_methods.bas");}while(r); do{ goto dl_continue_4352; if(!qbevent)break;evnt(25753,4635,"ide_methods.bas");}while(r); } S_40611:; if (((-(*__LONG_MX<(*_FUNC_IDE2_LONG_XX- 2 )))|(-(*__LONG_MX>=(*_FUNC_IDE2_LONG_XX- 2 +*_FUNC_IDE2_LONG_W+ 4 )))|(-(*__LONG_MY>(*_FUNC_IDE2_LONG_YY+((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+ 1 )))|(((-(*__LONG_MY<*_FUNC_IDE2_LONG_YY))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 1 )))))||new_error){ if(qbevent){evnt(25753,4638,"ide_methods.bas");if(r)goto S_40611;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4639,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4639,"ide_methods.bas");}while(r); S_40614:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,4640,"ide_methods.bas");if(r)goto S_40614;} do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,4640,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4641,"ide_methods.bas");}while(r); } } S_40620:; if (((~(*_FUNC_IDE2_LONG_MOUSEUP))&(~(*_FUNC_IDE2_LONG_MOUSEDOWN)))||new_error){ if(qbevent){evnt(25753,4645,"ide_methods.bas");if(r)goto S_40620;} S_40621:; if (((-(*_FUNC_IDE2_LONG_PARENTMENU> 0 ))&(-(*_FUNC_IDE2_LONG_OLDMY!=*__LONG_MY))&(-(*_FUNC_IDE2_LONG_OLDMX!=*__LONG_MX))&(-(*__LONG_MX>=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__X1))&(-(*__LONG_MX<=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__X2))&(-(*__LONG_MY>=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y1))&(-(*__LONG_MY<=*_FUNC_IDE2_LONG_BACKTOPARENT__ASCII_CHR_046__Y2)))||new_error){ if(qbevent){evnt(25753,4648,"ide_methods.bas");if(r)goto S_40621;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_PARENTMENU; if(!qbevent)break;evnt(25753,4649,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_PARENTMENUR; if(!qbevent)break;evnt(25753,4650,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENU= 0 ; if(!qbevent)break;evnt(25753,4651,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENUR= 0 ; if(!qbevent)break;evnt(25753,4652,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,4653,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 2 ); if(!qbevent)break;evnt(25753,4654,"ide_methods.bas");}while(r); do{ goto dl_continue_4352; if(!qbevent)break;evnt(25753,4655,"ide_methods.bas");}while(r); } S_40630:; if ((-(*_FUNC_IDE2_LONG_OLDMY!=*__LONG_MY))||new_error){ if(qbevent){evnt(25753,4657,"ide_methods.bas");if(r)goto S_40630;} S_40631:; 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(25753,4658,"ide_methods.bas");if(r)goto S_40631;} S_40632:; if (((-(*__LONG_MY>*_FUNC_IDE2_LONG_YY))&(-(*__LONG_MY<=(((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+*_FUNC_IDE2_LONG_YY))))||new_error){ if(qbevent){evnt(25753,4659,"ide_methods.bas");if(r)goto S_40632;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY-*_FUNC_IDE2_LONG_YY; if(!qbevent)break;evnt(25753,4660,"ide_methods.bas");}while(r); S_40634:; 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(25753,4661,"ide_methods.bas");if(r)goto S_40634;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(25753,4662,"ide_methods.bas");}while(r); } } }else{ S_40639:; if ((-(*__LONG_MY== 1 ))||new_error){ if(qbevent){evnt(25753,4666,"ide_methods.bas");if(r)goto S_40639;} do{ goto LABEL_CHECKMENUBARHOVER; if(!qbevent)break;evnt(25753,4666,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_OLDMY=*__LONG_MY; if(!qbevent)break;evnt(25753,4668,"ide_methods.bas");}while(r); } S_40645:; if ((-(*_FUNC_IDE2_LONG_OLDMX!=*__LONG_MX))||new_error){ if(qbevent){evnt(25753,4670,"ide_methods.bas");if(r)goto S_40645;} LABEL_CHECKMENUBARHOVER:; if(qbevent){evnt(25753,4671,"ide_methods.bas");r=0;} S_40646:; if (((-(*__LONG_IDEDEBUGMODE!= 2 ))&(-(*__LONG_MY== 1 ))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU!= 1 )))||new_error){ if(qbevent){evnt(25753,4672,"ide_methods.bas");if(r)goto S_40646;} do{ *_FUNC_IDE2_LONG_LASTM=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,4673,"ide_methods.bas");}while(r); S_40648:; fornext_value4385= 1 ; fornext_finalvalue4385=*__INTEGER_MENUS; fornext_step4385= 1 ; if (fornext_step4385<0) fornext_step_negative4385=1; else fornext_step_negative4385=0; if (new_error) goto fornext_error4385; goto fornext_entrylabel4385; while(1){ fornext_value4385=fornext_step4385+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4385: *_FUNC_IDE2_LONG_I=fornext_value4385; if (fornext_step_negative4385){ if (fornext_value4385fornext_finalvalue4385) break; } fornext_error4385:; if(qbevent){evnt(25753,4674,"ide_methods.bas");if(r)goto S_40648;} do{ *_FUNC_IDE2_LONG_X=string2i(func_mid(_FUNC_IDE2_STRING_MENULOCATIONS,(*_FUNC_IDE2_LONG_I* 2 )-( 1 ), 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4675,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X2=string2i(func_mid(_FUNC_IDE2_STRING_MENULOCATIONS,(*_FUNC_IDE2_LONG_I* 2 )-( 1 ), 2 ,1))+((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; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4676,"ide_methods.bas");}while(r); S_40651:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<*_FUNC_IDE2_LONG_X2)))||new_error){ if(qbevent){evnt(25753,4677,"ide_methods.bas");if(r)goto S_40651;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,4678,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4679,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENUR= 0 ; if(!qbevent)break;evnt(25753,4680,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENU= 0 ; if(!qbevent)break;evnt(25753,4681,"ide_methods.bas");}while(r); S_40656:; if ((-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU> 1 ))||new_error){ if(qbevent){evnt(25753,4682,"ide_methods.bas");if(r)goto S_40656;} do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,4682,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 2 ); if(!qbevent)break;evnt(25753,4682,"ide_methods.bas");}while(r); } do{ goto fornext_exit_4384; if(!qbevent)break;evnt(25753,4683,"ide_methods.bas");}while(r); } fornext_continue_4384:; } fornext_exit_4384:; } do{ *_FUNC_IDE2_LONG_OLDMX=*__LONG_MX; if(!qbevent)break;evnt(25753,4687,"ide_methods.bas");}while(r); } } S_40667:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,4691,"ide_methods.bas");if(r)goto S_40667;} S_40668:; if (((-(*__LONG_MY== 1 ))&(-(*__LONG_IDEDEBUGMODE!= 2 )))||new_error){ if(qbevent){evnt(25753,4694,"ide_methods.bas");if(r)goto S_40668;} do{ *_FUNC_IDE2_LONG_LASTM=*_FUNC_IDE2_LONG_M; if(!qbevent)break;evnt(25753,4695,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 3 ; if(!qbevent)break;evnt(25753,4696,"ide_methods.bas");}while(r); S_40671:; fornext_value4388= 1 ; fornext_finalvalue4388=*__INTEGER_MENUS; fornext_step4388= 1 ; if (fornext_step4388<0) fornext_step_negative4388=1; else fornext_step_negative4388=0; if (new_error) goto fornext_error4388; goto fornext_entrylabel4388; while(1){ fornext_value4388=fornext_step4388+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4388: *_FUNC_IDE2_LONG_I=fornext_value4388; if (fornext_step_negative4388){ if (fornext_value4388fornext_finalvalue4388) break; } fornext_error4388:; if(qbevent){evnt(25753,4697,"ide_methods.bas");if(r)goto S_40671;} 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(25753,4698,"ide_methods.bas");}while(r); S_40673:; if (((-(*__LONG_MX>=*_FUNC_IDE2_LONG_X))&(-(*__LONG_MX<(*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2))))||new_error){ if(qbevent){evnt(25753,4699,"ide_methods.bas");if(r)goto S_40673;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_I; if(!qbevent)break;evnt(25753,4700,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4701,"ide_methods.bas");}while(r); S_40676:; if (((-(*_FUNC_IDE2_LONG_LASTM==*_FUNC_IDE2_LONG_M))&(-(*_FUNC_IDE2_LONG_MOUSEDOWN== 1 )))||new_error){ if(qbevent){evnt(25753,4702,"ide_methods.bas");if(r)goto S_40676;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4702,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4702,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4702,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,4703,"ide_methods.bas");}while(r); do{ goto fornext_exit_4387; if(!qbevent)break;evnt(25753,4704,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+*_FUNC_IDE2_LONG_X2; if(!qbevent)break;evnt(25753,4706,"ide_methods.bas");}while(r); S_40685:; if ((-(*_FUNC_IDE2_LONG_I==(*__INTEGER_MENUS- 1 )))||new_error){ if(qbevent){evnt(25753,4707,"ide_methods.bas");if(r)goto S_40685;} 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(25753,4707,"ide_methods.bas");}while(r); } fornext_continue_4387:; } fornext_exit_4387:; } S_40690:; 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(25753,4712,"ide_methods.bas");if(r)goto S_40690;} S_40691:; if (((-(*__LONG_MY>*_FUNC_IDE2_LONG_YY))&(-(*__LONG_MY<=(((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]+*_FUNC_IDE2_LONG_YY))))||new_error){ if(qbevent){evnt(25753,4713,"ide_methods.bas");if(r)goto S_40691;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_MY-*_FUNC_IDE2_LONG_YY; if(!qbevent)break;evnt(25753,4714,"ide_methods.bas");}while(r); S_40693:; 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(25753,4715,"ide_methods.bas");if(r)goto S_40693;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(25753,4715,"ide_methods.bas");}while(r); } } } } S_40699:; if (((-(*__LONG_KB== 19200 ))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 0 )))||new_error){ if(qbevent){evnt(25753,4721,"ide_methods.bas");if(r)goto S_40699;} do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M- 1 ; if(!qbevent)break;evnt(25753,4722,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4722,"ide_methods.bas");}while(r); S_40702:; }else{ if ((-(*__LONG_KB== 19200 ))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU> 1 ))){ if(qbevent){evnt(25753,4723,"ide_methods.bas");if(r)goto S_40702;} do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,4724,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 2 ); if(!qbevent)break;evnt(25753,4725,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_PARENTMENU; if(!qbevent)break;evnt(25753,4726,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_PARENTMENUR; if(!qbevent)break;evnt(25753,4727,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_PARENTMENU= 0 ; if(!qbevent)break;evnt(25753,4728,"ide_methods.bas");}while(r); } } S_40709:; if (((-(*__LONG_KB== 19712 ))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 0 )))||new_error){ if(qbevent){evnt(25753,4730,"ide_methods.bas");if(r)goto S_40709;} S_40710:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 1 ),func_chr( 16 ))))||new_error){ if(qbevent){evnt(25753,4731,"ide_methods.bas");if(r)goto S_40710;} S_40711:; qbs_set(sc_4392,qbs_left(((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*)(((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]]))->len- 3 )); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25753,4732,"ide_methods.bas");if(r)goto S_40711;} S_40712:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_4392,qbs_new_txt_len("#Line Numbers",13))))||new_error){ if(qbevent){evnt(25753,4733,"ide_methods.bas");if(r)goto S_40712;} do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 2 ; if(!qbevent)break;evnt(25753,4734,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,4735,"ide_methods.bas");}while(r); sc_ec_197_end:; goto sc_4392_end; } sc_4392_end:; }else{ do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,4738,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4738,"ide_methods.bas");}while(r); } S_40720:; }else{ if ((-(*__LONG_KB== 19712 ))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU> 1 ))){ if(qbevent){evnt(25753,4740,"ide_methods.bas");if(r)goto S_40720;} do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 0 ; if(!qbevent)break;evnt(25753,4741,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 2 ); if(!qbevent)break;evnt(25753,4742,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_M=*_FUNC_IDE2_LONG_PARENTMENU+ 1 ; if(!qbevent)break;evnt(25753,4743,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4744,"ide_methods.bas");}while(r); } } S_40726:; if ((-(*_FUNC_IDE2_LONG_M< 1 ))||new_error){ if(qbevent){evnt(25753,4746,"ide_methods.bas");if(r)goto S_40726;} do{ *_FUNC_IDE2_LONG_M=*__INTEGER_MENUS; if(!qbevent)break;evnt(25753,4746,"ide_methods.bas");}while(r); } S_40729:; if (((-(*_FUNC_IDE2_LONG_M>*__INTEGER_MENUS))&(-(*_FUNC_IDE2_LONG_IDECONTEXTUALMENU== 0 )))||new_error){ if(qbevent){evnt(25753,4747,"ide_methods.bas");if(r)goto S_40729;} do{ *_FUNC_IDE2_LONG_M= 1 ; if(!qbevent)break;evnt(25753,4747,"ide_methods.bas");}while(r); } S_40732:; if ((-(*__LONG_KB== 27 ))||new_error){ if(qbevent){evnt(25753,4748,"ide_methods.bas");if(r)goto S_40732;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4749,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4749,"ide_methods.bas");}while(r); S_40735:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,4750,"ide_methods.bas");if(r)goto S_40735;} do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,4750,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4751,"ide_methods.bas");}while(r); } S_40740:; if ((-(*__LONG_KB== 20480 ))||new_error){ if(qbevent){evnt(25753,4753,"ide_methods.bas");if(r)goto S_40740;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R+ 1 ; if(!qbevent)break;evnt(25753,4754,"ide_methods.bas");}while(r); S_40742:; 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(25753,4755,"ide_methods.bas");if(r)goto S_40742;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R+ 1 ; if(!qbevent)break;evnt(25753,4755,"ide_methods.bas");}while(r); } S_40745:; 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(25753,4756,"ide_methods.bas");if(r)goto S_40745;} do{ *_FUNC_IDE2_LONG_R= 1 ; if(!qbevent)break;evnt(25753,4756,"ide_methods.bas");}while(r); } } S_40749:; if ((-(*__LONG_KB== 18432 ))||new_error){ if(qbevent){evnt(25753,4759,"ide_methods.bas");if(r)goto S_40749;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R- 1 ; if(!qbevent)break;evnt(25753,4760,"ide_methods.bas");}while(r); S_40751:; 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(25753,4761,"ide_methods.bas");if(r)goto S_40751;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R- 1 ; if(!qbevent)break;evnt(25753,4761,"ide_methods.bas");}while(r); } S_40754:; if ((-(*_FUNC_IDE2_LONG_R< 1 ))||new_error){ if(qbevent){evnt(25753,4762,"ide_methods.bas");if(r)goto S_40754;} 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(25753,4762,"ide_methods.bas");}while(r); } } S_40758:; if ((-(*__LONG_KB== 13 ))||new_error){ if(qbevent){evnt(25753,4768,"ide_methods.bas");if(r)goto S_40758;} S_40759:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25753,4769,"ide_methods.bas");if(r)goto S_40759;} do{ *_FUNC_IDE2_LONG_S=*_FUNC_IDE2_LONG_R; if(!qbevent)break;evnt(25753,4769,"ide_methods.bas");}while(r); } } do{ qbs_set(__STRING_K,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4773,"ide_methods.bas");}while(r); S_40764:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_K->len> 0 ))&(~(*__LONG_KCTRL))))||new_error){ if(qbevent){evnt(25753,4774,"ide_methods.bas");if(r)goto S_40764;} S_40765:; fornext_value4395= 1 ; fornext_finalvalue4395=((int32*)(__ARRAY_LONG_MENUSIZE[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5])]; fornext_step4395= 1 ; if (fornext_step4395<0) fornext_step_negative4395=1; else fornext_step_negative4395=0; if (new_error) goto fornext_error4395; goto fornext_entrylabel4395; while(1){ fornext_value4395=fornext_step4395+(*_FUNC_IDE2_LONG_R2); fornext_entrylabel4395: *_FUNC_IDE2_LONG_R2=fornext_value4395; if (fornext_step_negative4395){ if (fornext_value4395fornext_finalvalue4395) break; } fornext_error4395:; if(qbevent){evnt(25753,4775,"ide_methods.bas");if(r)goto S_40765;} 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(25753,4776,"ide_methods.bas");}while(r); S_40767:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,4777,"ide_methods.bas");if(r)goto S_40767;} 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(25753,4778,"ide_methods.bas");}while(r); S_40769:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,_FUNC_IDE2_STRING_A))&(qbs_notequal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1)))))||new_error){ if(qbevent){evnt(25753,4779,"ide_methods.bas");if(r)goto S_40769;} do{ *_FUNC_IDE2_LONG_S=*_FUNC_IDE2_LONG_R2; if(!qbevent)break;evnt(25753,4780,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_UPDATEMENUPANEL= -1 ; if(!qbevent)break;evnt(25753,4781,"ide_methods.bas");}while(r); do{ goto fornext_exit_4394; if(!qbevent)break;evnt(25753,4782,"ide_methods.bas");}while(r); S_40773:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,_FUNC_IDE2_STRING_A))&(qbs_equal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1))))){ if(qbevent){evnt(25753,4783,"ide_methods.bas");if(r)goto S_40773;} do{ *_FUNC_IDE2_BYTE_UPDATEMENUPANEL= -1 ; if(!qbevent)break;evnt(25753,4784,"ide_methods.bas");}while(r); do{ goto fornext_exit_4394; if(!qbevent)break;evnt(25753,4785,"ide_methods.bas");}while(r); } } } fornext_continue_4394:; } fornext_exit_4394:; S_40779:; if ((*_FUNC_IDE2_BYTE_UPDATEMENUPANEL)||new_error){ if(qbevent){evnt(25753,4789,"ide_methods.bas");if(r)goto S_40779;} do{ *_FUNC_IDE2_LONG_R=*_FUNC_IDE2_LONG_R2; if(!qbevent)break;evnt(25753,4789,"ide_methods.bas");}while(r); do{ goto dl_continue_4352; if(!qbevent)break;evnt(25753,4789,"ide_methods.bas");}while(r); } } S_40784:; if ((*_FUNC_IDE2_LONG_S)||new_error){ if(qbevent){evnt(25753,4792,"ide_methods.bas");if(r)goto S_40784;} LABEL_MENUCHOICEMADE:; if(qbevent){evnt(25753,4793,"ide_methods.bas");r=0;} S_40785:; if ((*__LONG_KALT)||new_error){ if(qbevent){evnt(25753,4794,"ide_methods.bas");if(r)goto S_40785;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,4794,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,4794,"ide_methods.bas");}while(r); } S_40790:; 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 Co#mment (') Ctrl+R",24))))||new_error){ if(qbevent){evnt(25753,4796,"ide_methods.bas");if(r)goto S_40790;} LABEL_CTRLADDCOMMENT:; if(qbevent){evnt(25753,4797,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4798,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y1; if(!qbevent)break;evnt(25753,4798,"ide_methods.bas");}while(r); S_40793:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(25753,4799,"ide_methods.bas");if(r)goto S_40793;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,4800,"ide_methods.bas");}while(r); S_40795:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(25753,4801,"ide_methods.bas");if(r)goto S_40795;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(25753,4801,"ide_methods.bas");}while(r); } S_40798:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4802,"ide_methods.bas");if(r)goto S_40798;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(25753,4802,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_LHS= 10000000 ; if(!qbevent)break;evnt(25753,4805,"ide_methods.bas");}while(r); S_40803:; fornext_value4397=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4397=*_FUNC_IDE2_LONG_Y2; fornext_step4397= 1 ; if (fornext_step4397<0) fornext_step_negative4397=1; else fornext_step_negative4397=0; if (new_error) goto fornext_error4397; goto fornext_entrylabel4397; while(1){ fornext_value4397=fornext_step4397+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4397: *_FUNC_IDE2_LONG_Y=fornext_value4397; if (fornext_step_negative4397){ if (fornext_value4397fornext_finalvalue4397) break; } fornext_error4397:; if(qbevent){evnt(25753,4806,"ide_methods.bas");if(r)goto S_40803;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4807,"ide_methods.bas");}while(r); S_40805:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4808,"ide_methods.bas");if(r)goto S_40805;} do{ qbs_set(_FUNC_IDE2_STRING_TA,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4809,"ide_methods.bas");}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(25753,4810,"ide_methods.bas");}while(r); S_40808:; if ((-(*_FUNC_IDE2_LONG_T<*_FUNC_IDE2_LONG_LHS))||new_error){ if(qbevent){evnt(25753,4811,"ide_methods.bas");if(r)goto S_40808;} do{ *_FUNC_IDE2_LONG_LHS=*_FUNC_IDE2_LONG_T; if(!qbevent)break;evnt(25753,4811,"ide_methods.bas");}while(r); } } fornext_continue_4396:; } fornext_exit_4396:; S_40813:; fornext_value4402=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4402=*_FUNC_IDE2_LONG_Y2; fornext_step4402= 1 ; if (fornext_step4402<0) fornext_step_negative4402=1; else fornext_step_negative4402=0; if (new_error) goto fornext_error4402; goto fornext_entrylabel4402; while(1){ fornext_value4402=fornext_step4402+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4402: *_FUNC_IDE2_LONG_Y=fornext_value4402; if (fornext_step_negative4402){ if (fornext_value4402fornext_finalvalue4402) break; } fornext_error4402:; if(qbevent){evnt(25753,4815,"ide_methods.bas");if(r)goto S_40813;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4816,"ide_methods.bas");}while(r); S_40815:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4817,"ide_methods.bas");if(r)goto S_40815;} 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(25753,4818,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4819,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4820,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4821,"ide_methods.bas");}while(r); } fornext_continue_4401:; } fornext_exit_4401:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4824,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4824,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4825,"ide_methods.bas");}while(r); } S_40826:; 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("Remove Comme#nt (') Ctrl+Shift+R",33))))||new_error){ if(qbevent){evnt(25753,4828,"ide_methods.bas");if(r)goto S_40826;} LABEL_CTRLREMOVECOMMENT:; if(qbevent){evnt(25753,4829,"ide_methods.bas");r=0;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4830,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4830,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4831,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y1; if(!qbevent)break;evnt(25753,4831,"ide_methods.bas");}while(r); S_40831:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(25753,4832,"ide_methods.bas");if(r)goto S_40831;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,4833,"ide_methods.bas");}while(r); S_40833:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(25753,4834,"ide_methods.bas");if(r)goto S_40833;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(25753,4834,"ide_methods.bas");}while(r); } S_40836:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4835,"ide_methods.bas");if(r)goto S_40836;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(25753,4835,"ide_methods.bas");}while(r); } } S_40840:; fornext_value4406=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4406=*_FUNC_IDE2_LONG_Y2; fornext_step4406= 1 ; if (fornext_step4406<0) fornext_step_negative4406=1; else fornext_step_negative4406=0; if (new_error) goto fornext_error4406; goto fornext_entrylabel4406; while(1){ fornext_value4406=fornext_step4406+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4406: *_FUNC_IDE2_LONG_Y=fornext_value4406; if (fornext_step_negative4406){ if (fornext_value4406fornext_finalvalue4406) break; } fornext_error4406:; if(qbevent){evnt(25753,4838,"ide_methods.bas");if(r)goto S_40840;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4839,"ide_methods.bas");}while(r); S_40842:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4840,"ide_methods.bas");if(r)goto S_40842;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4841,"ide_methods.bas");}while(r); S_40844:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(25753,4842,"ide_methods.bas");if(r)goto S_40844;} S_40845:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_A2, 1 )== 39 )))||new_error){ if(qbevent){evnt(25753,4843,"ide_methods.bas");if(r)goto S_40845;} 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(25753,4844,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4845,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4846,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4847,"ide_methods.bas");}while(r); } } } fornext_continue_4405:; } fornext_exit_4405:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4852,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4852,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4853,"ide_methods.bas");}while(r); } S_40858:; 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("To#ggle Comment Ctrl+T",23))))||new_error){ if(qbevent){evnt(25753,4856,"ide_methods.bas");if(r)goto S_40858;} LABEL_CTRLTOGGLECOMMENT:; if(qbevent){evnt(25753,4857,"ide_methods.bas");r=0;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4858,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4858,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,4859,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y1; if(!qbevent)break;evnt(25753,4859,"ide_methods.bas");}while(r); S_40863:; if ((-(*__LONG_IDESELECT== 1 ))||new_error){ if(qbevent){evnt(25753,4860,"ide_methods.bas");if(r)goto S_40863;} do{ *_FUNC_IDE2_LONG_Y1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,4861,"ide_methods.bas");}while(r); S_40865:; if (((-(*__LONG_IDECY>*__LONG_IDESELECTY1))&(-(*__LONG_IDECX== 1 )))||new_error){ if(qbevent){evnt(25753,4862,"ide_methods.bas");if(r)goto S_40865;} do{ *_FUNC_IDE2_LONG_Y2=*_FUNC_IDE2_LONG_Y2- 1 ; if(!qbevent)break;evnt(25753,4862,"ide_methods.bas");}while(r); } S_40868:; if ((-(*_FUNC_IDE2_LONG_Y1>*_FUNC_IDE2_LONG_Y2))||new_error){ if(qbevent){evnt(25753,4863,"ide_methods.bas");if(r)goto S_40868;} do{ swap_32(&*_FUNC_IDE2_LONG_Y1,&*_FUNC_IDE2_LONG_Y2); if(!qbevent)break;evnt(25753,4863,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_LHS= 10000000 ; if(!qbevent)break;evnt(25753,4866,"ide_methods.bas");}while(r); S_40873:; fornext_value4413=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4413=*_FUNC_IDE2_LONG_Y2; fornext_step4413= 1 ; if (fornext_step4413<0) fornext_step_negative4413=1; else fornext_step_negative4413=0; if (new_error) goto fornext_error4413; goto fornext_entrylabel4413; while(1){ fornext_value4413=fornext_step4413+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4413: *_FUNC_IDE2_LONG_Y=fornext_value4413; if (fornext_step_negative4413){ if (fornext_value4413fornext_finalvalue4413) break; } fornext_error4413:; if(qbevent){evnt(25753,4867,"ide_methods.bas");if(r)goto S_40873;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4868,"ide_methods.bas");}while(r); S_40875:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4869,"ide_methods.bas");if(r)goto S_40875;} do{ qbs_set(_FUNC_IDE2_STRING_TA,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4870,"ide_methods.bas");}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(25753,4871,"ide_methods.bas");}while(r); S_40878:; if ((-(*_FUNC_IDE2_LONG_T<*_FUNC_IDE2_LONG_LHS))||new_error){ if(qbevent){evnt(25753,4872,"ide_methods.bas");if(r)goto S_40878;} do{ *_FUNC_IDE2_LONG_LHS=*_FUNC_IDE2_LONG_T; if(!qbevent)break;evnt(25753,4872,"ide_methods.bas");}while(r); } } fornext_continue_4412:; } fornext_exit_4412:; S_40883:; fornext_value4418=*_FUNC_IDE2_LONG_Y1; fornext_finalvalue4418=*_FUNC_IDE2_LONG_Y2; fornext_step4418= 1 ; if (fornext_step4418<0) fornext_step_negative4418=1; else fornext_step_negative4418=0; if (new_error) goto fornext_error4418; goto fornext_entrylabel4418; while(1){ fornext_value4418=fornext_step4418+(*_FUNC_IDE2_LONG_Y); fornext_entrylabel4418: *_FUNC_IDE2_LONG_Y=fornext_value4418; if (fornext_step_negative4418){ if (fornext_value4418fornext_finalvalue4418) break; } fornext_error4418:; if(qbevent){evnt(25753,4876,"ide_methods.bas");if(r)goto S_40883;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(_FUNC_IDE2_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4877,"ide_methods.bas");}while(r); S_40885:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,4878,"ide_methods.bas");if(r)goto S_40885;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_ltrim(_FUNC_IDE2_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4879,"ide_methods.bas");}while(r); S_40887:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(25753,4880,"ide_methods.bas");if(r)goto S_40887;} S_40888:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDE2_STRING_A2, 1 )== 39 )))||new_error){ if(qbevent){evnt(25753,4881,"ide_methods.bas");if(r)goto S_40888;} 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(25753,4882,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4883,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4884,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4885,"ide_methods.bas");}while(r); }else{ 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(25753,4887,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_FUNC_IDE2_LONG_Y,_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4888,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,4889,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,4890,"ide_methods.bas");}while(r); } } } fornext_continue_4417:; } fornext_exit_4417:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4895,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4895,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4896,"ide_methods.bas");}while(r); } S_40906:; 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("#Increase Indent TAB",21))))||new_error){ if(qbevent){evnt(25753,4899,"ide_methods.bas");if(r)goto S_40906;} S_40907:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,4900,"ide_methods.bas");if(r)goto S_40907;} do{ goto LABEL_IDEBLOCKINCREASEINDENT; if(!qbevent)break;evnt(25753,4900,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4901,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4901,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4902,"ide_methods.bas");}while(r); } S_40914:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 16 ),qbs_new_txt_len("#Decrease Indent",16))))||new_error){ if(qbevent){evnt(25753,4905,"ide_methods.bas");if(r)goto S_40914;} S_40915:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,4906,"ide_methods.bas");if(r)goto S_40915;} do{ goto LABEL_IDEBLOCKDECREASEINDENT; if(!qbevent)break;evnt(25753,4906,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4907,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4907,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4908,"ide_methods.bas");}while(r); } S_40922:; 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(25753,4911,"ide_methods.bas");if(r)goto S_40922;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4912,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDELANGUAGEBOX(); if(!qbevent)break;evnt(25753,4913,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4914,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4914,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4915,"ide_methods.bas");}while(r); } S_40929:; 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(25753,4918,"ide_methods.bas");if(r)goto S_40929;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4919,"ide_methods.bas");}while(r); S_40931:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(25753,4920,"ide_methods.bas");if(r)goto S_40931;} do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEDISPLAYBOX(); if(!qbevent)break;evnt(25753,4921,"ide_methods.bas");}while(r); S_40933:; if ((-(*_FUNC_IDE2_LONG_RETVAL== 1 ))||new_error){ if(qbevent){evnt(25753,4922,"ide_methods.bas");if(r)goto S_40933;} do{ qbsub_width(NULL,*__LONG_IDEWX,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,NULL,NULL,3); if(!qbevent)break;evnt(25753,4924,"ide_methods.bas");}while(r); S_40935:; if ((*__LONG_IDECUSTOMFONT)||new_error){ if(qbevent){evnt(25753,4925,"ide_methods.bas");if(r)goto S_40935;} do{ sub__font(*__LONG_IDECUSTOMFONTHANDLE,NULL,0); if(!qbevent)break;evnt(25753,4926,"ide_methods.bas");}while(r); }else{ S_40938:; if ((*__BYTE_IDE_USEFONT8)||new_error){ if(qbevent){evnt(25753,4928,"ide_methods.bas");if(r)goto S_40938;} do{ sub__font( 8 ,NULL,0); if(!qbevent)break;evnt(25753,4928,"ide_methods.bas");}while(r); }else{ do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(25753,4928,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,4930,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=46; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_46:; if(!qbevent)break;evnt(25753,4931,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4934,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4934,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4935,"ide_methods.bas");}while(r); } S_40952:; 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("IDE C#olors...",14))))||new_error){ if(qbevent){evnt(25753,4938,"ide_methods.bas");if(r)goto S_40952;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4939,"ide_methods.bas");}while(r); do{ SUB_HIDEBRACKETHIGHLIGHT(); if(!qbevent)break;evnt(25753,4940,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDECHOOSECOLORSBOX(); if(!qbevent)break;evnt(25753,4941,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4942,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4942,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4943,"ide_methods.bas");}while(r); } S_40960:; 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("#RGB Color Mixer...",19))))||new_error){ if(qbevent){evnt(25753,4946,"ide_methods.bas");if(r)goto S_40960;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4947,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDKEYWORDHIGHLIGHT=*__INTEGER_KEYWORDHIGHLIGHT; if(!qbevent)break;evnt(25753,4948,"ide_methods.bas");}while(r); do{ *__INTEGER_KEYWORDHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,4949,"ide_methods.bas");}while(r); do{ SUB_HIDEBRACKETHIGHLIGHT(); if(!qbevent)break;evnt(25753,4950,"ide_methods.bas");}while(r); do{ *__INTEGER_KEYWORDHIGHLIGHT=*_FUNC_IDE2_LONG_OLDKEYWORDHIGHLIGHT; if(!qbevent)break;evnt(25753,4951,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_RETVAL,FUNC_IDERGBMIXER(&(pass4425= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4952,"ide_methods.bas");}while(r); S_40967:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_RETVAL->len))||new_error){ if(qbevent){evnt(25753,4953,"ide_methods.bas");if(r)goto S_40967;} do{ SUB_INSERTATCURSOR(_FUNC_IDE2_STRING_RETVAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4953,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4954,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4954,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4955,"ide_methods.bas");}while(r); } S_40974:; 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("Purge C++ #Libraries",20))))||new_error){ if(qbevent){evnt(25753,4958,"ide_methods.bas");if(r)goto S_40974;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4959,"ide_methods.bas");}while(r); do{ SUB_PURGETEMPORARYBUILDFILES(__STRING_OS,&(pass4427=*__LONG_MACOSX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4960,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4961,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4961,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4962,"ide_methods.bas");}while(r); } S_40981:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 19 ),qbs_new_txt_len("#Swap Mouse Buttons",19))))||new_error){ if(qbevent){evnt(25753,4966,"ide_methods.bas");if(r)goto S_40981;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4967,"ide_methods.bas");}while(r); do{ *__BYTE_MOUSEBUTTONSWAPPED=~(*__BYTE_MOUSEBUTTONSWAPPED); if(!qbevent)break;evnt(25753,4968,"ide_methods.bas");}while(r); S_40984:; if ((*__BYTE_MOUSEBUTTONSWAPPED)||new_error){ if(qbevent){evnt(25753,4969,"ide_methods.bas");if(r)goto S_40984;} do{ SUB_WRITECONFIGSETTING(__STRING_MOUSESETTINGSSECTION,qbs_new_txt_len("SwapMouseButton",15),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4970,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSWAPMOUSE)-__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_add(func_chr( 7 ),qbs_new_txt_len("#Swap Mouse Buttons",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4971,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_MOUSESETTINGSSECTION,qbs_new_txt_len("SwapMouseButton",15),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4973,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSWAPMOUSE)-__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("#Swap Mouse Buttons",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4974,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4976,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4976,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4977,"ide_methods.bas");}while(r); } S_40995:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 19 ),qbs_new_txt_len("Syntax #Highlighter",19))))||new_error){ if(qbevent){evnt(25753,4980,"ide_methods.bas");if(r)goto S_40995;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4981,"ide_methods.bas");}while(r); do{ *__BYTE_DISABLESYNTAXHIGHLIGHTER=~(*__BYTE_DISABLESYNTAXHIGHLIGHTER); if(!qbevent)break;evnt(25753,4982,"ide_methods.bas");}while(r); S_40998:; if ((*__BYTE_DISABLESYNTAXHIGHLIGHTER)||new_error){ if(qbevent){evnt(25753,4983,"ide_methods.bas");if(r)goto S_40998;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4984,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__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("Syntax #Highlighter",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4985,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4987,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__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_add(func_chr( 7 ),qbs_new_txt_len("Syntax #Highlighter",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4988,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,4990,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,4990,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,4991,"ide_methods.bas");}while(r); } S_41009:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 19 ),qbs_new_txt_len("Cursor After #Paste",19))))||new_error){ if(qbevent){evnt(25753,4994,"ide_methods.bas");if(r)goto S_41009;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,4995,"ide_methods.bas");}while(r); do{ *__BYTE_PASTECURSORATEND=~(*__BYTE_PASTECURSORATEND); if(!qbevent)break;evnt(25753,4996,"ide_methods.bas");}while(r); S_41012:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,4997,"ide_methods.bas");if(r)goto S_41012;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("PasteCursorAtEnd",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4998,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUPASTECURSOR)-__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_add(func_chr( 7 ),qbs_new_txt_len("Cursor After #Paste",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4999,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("PasteCursorAtEnd",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5001,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUPASTECURSOR)-__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("Cursor After #Paste",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5002,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5004,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5004,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5005,"ide_methods.bas");}while(r); } S_41023:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 15 ),qbs_new_txt_len("Syntax Ch#ecker",15))))||new_error){ if(qbevent){evnt(25753,5008,"ide_methods.bas");if(r)goto S_41023;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5009,"ide_methods.bas");}while(r); do{ *__BYTE_IDESHOWERRORSIMMEDIATELY=~(*__BYTE_IDESHOWERRORSIMMEDIATELY); if(!qbevent)break;evnt(25753,5010,"ide_methods.bas");}while(r); S_41026:; if ((*__BYTE_IDESHOWERRORSIMMEDIATELY)||new_error){ if(qbevent){evnt(25753,5011,"ide_methods.bas");if(r)goto S_41026;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowErrorsImmediately",21),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5012,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSHOWERRORSIMMEDIATELY)-__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_add(func_chr( 7 ),qbs_new_txt_len("Syntax Ch#ecker",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5013,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowErrorsImmediately",21),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5015,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUSHOWERRORSIMMEDIATELY)-__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("Syntax Ch#ecker",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5016,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5018,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5019,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5020,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5020,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5021,"ide_methods.bas");}while(r); } S_41039:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 16 ),qbs_new_txt_len("Ignore #Warnings",16))))||new_error){ if(qbevent){evnt(25753,5024,"ide_methods.bas");if(r)goto S_41039;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5025,"ide_methods.bas");}while(r); S_41041:; if ((-(*__BYTE_IGNOREWARNINGS== 0 ))||new_error){ if(qbevent){evnt(25753,5026,"ide_methods.bas");if(r)goto S_41041;} do{ *__BYTE_IGNOREWARNINGS= -1 ; if(!qbevent)break;evnt(25753,5027,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("IgnoreWarnings",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5028,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUIGNOREWARNINGS)-__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_add(func_chr( 7 ),qbs_new_txt_len("Ignore #Warnings",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5029,"ide_methods.bas");}while(r); }else{ do{ *__BYTE_IGNOREWARNINGS= 0 ; if(!qbevent)break;evnt(25753,5031,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("IgnoreWarnings",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5032,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUIGNOREWARNINGS)-__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("Ignore #Warnings",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5033,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5035,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5036,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5037,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5037,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5038,"ide_methods.bas");}while(r); } S_41056:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 28 ),qbs_new_txt_len("Output EXE to Source #Folder",28))))||new_error){ if(qbevent){evnt(25753,5041,"ide_methods.bas");if(r)goto S_41056;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5042,"ide_methods.bas");}while(r); do{ *__BYTE_SAVEEXEWITHSOURCE=~(*__BYTE_SAVEEXEWITHSOURCE); if(!qbevent)break;evnt(25753,5043,"ide_methods.bas");}while(r); S_41059:; if ((*__BYTE_SAVEEXEWITHSOURCE)||new_error){ if(qbevent){evnt(25753,5044,"ide_methods.bas");if(r)goto S_41059;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5045,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_RUNMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_RUNMENUSAVEEXEWITHSOURCE)-__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_add(func_chr( 7 ),qbs_new_txt_len("Output EXE to Source #Folder",28))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5046,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("SaveExeWithSource",17),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5048,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_RUNMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_RUNMENUSAVEEXEWITHSOURCE)-__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("Output EXE to Source #Folder",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5049,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5051,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5051,"ide_methods.bas");}while(r); do{ *__LONG_IDECOMPILED= 0 ; if(!qbevent)break;evnt(25753,5052,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5053,"ide_methods.bas");}while(r); } S_41071:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 29 ),qbs_new_txt_len("#Output Watch List to Console",29))))||new_error){ if(qbevent){evnt(25753,5056,"ide_methods.bas");if(r)goto S_41071;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5057,"ide_methods.bas");}while(r); do{ *__BYTE_WATCHLISTTOCONSOLE=~(*__BYTE_WATCHLISTTOCONSOLE); if(!qbevent)break;evnt(25753,5058,"ide_methods.bas");}while(r); S_41074:; if ((*__BYTE_WATCHLISTTOCONSOLE)||new_error){ if(qbevent){evnt(25753,5059,"ide_methods.bas");if(r)goto S_41074;} do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("WatchListToConsole",18),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5060,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUWATCHLISTTOCONSOLE)-__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_add(func_chr( 7 ),qbs_new_txt_len("#Output Watch List to Console",29))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5061,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("WatchListToConsole",18),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5063,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUWATCHLISTTOCONSOLE)-__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("#Output Watch List to Console",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5064,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5066,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5066,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5067,"ide_methods.bas");}while(r); } S_41085:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 28 ),qbs_new_txt_len("Auto-add $#Debug Metacommand",28))))||new_error){ if(qbevent){evnt(25753,5070,"ide_methods.bas");if(r)goto S_41085;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5071,"ide_methods.bas");}while(r); do{ *__BYTE_AUTOADDDEBUGCOMMAND=~(*__BYTE_AUTOADDDEBUGCOMMAND); if(!qbevent)break;evnt(25753,5072,"ide_methods.bas");}while(r); S_41088:; if ((*__BYTE_AUTOADDDEBUGCOMMAND)||new_error){ if(qbevent){evnt(25753,5073,"ide_methods.bas");if(r)goto S_41088;} do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5074,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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_add(func_chr( 7 ),qbs_new_txt_len("Auto-add $#Debug Metacommand",28))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5075,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5077,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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("Auto-add $#Debug Metacommand",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5078,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5080,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5080,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5081,"ide_methods.bas");}while(r); } S_41099:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(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_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 1 , 17 ,1),qbs_new_txt_len("#Quick Navigation",17)))|(qbs_equal(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_S)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 2 , 17 ,1),qbs_new_txt_len("#Quick Navigation",17)))))||new_error){ if(qbevent){evnt(25753,5084,"ide_methods.bas");if(r)goto S_41099;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5085,"ide_methods.bas");}while(r); do{ *__BYTE_ENABLEQUICKNAV=~(*__BYTE_ENABLEQUICKNAV); if(!qbevent)break;evnt(25753,5086,"ide_methods.bas");}while(r); S_41102:; if ((*__BYTE_ENABLEQUICKNAV)||new_error){ if(qbevent){evnt(25753,5087,"ide_methods.bas");if(r)goto S_41102;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("EnableQuickNav",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5088,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_SEARCHMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_SEARCHMENUENABLEQUICKNAV)-__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_add(func_chr( 7 ),qbs_new_txt_len("#Quick Navigation",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5089,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("EnableQuickNav",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5091,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_SEARCHMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_SEARCHMENUENABLEQUICKNAV)-__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("#Quick Navigation",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5092,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5094,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5094,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5095,"ide_methods.bas");}while(r); } S_41113:; 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(25753,5098,"ide_methods.bas");if(r)goto S_41113;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5099,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDELAYOUTBOX(); if(!qbevent)break;evnt(25753,5100,"ide_methods.bas");}while(r); S_41116:; if ((*_FUNC_IDE2_LONG_RETVAL)||new_error){ if(qbevent){evnt(25753,5101,"ide_methods.bas");if(r)goto S_41116;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5101,"ide_methods.bas");}while(r); do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(25753,5101,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5101,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5102,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5102,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5103,"ide_methods.bas");}while(r); } S_41125:; 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("Co#mpiler Settings...",21))))||new_error){ if(qbevent){evnt(25753,5106,"ide_methods.bas");if(r)goto S_41125;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5107,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDECOMPILERSETTINGSBOX(); if(!qbevent)break;evnt(25753,5108,"ide_methods.bas");}while(r); S_41128:; if ((*_FUNC_IDE2_LONG_RETVAL)||new_error){ if(qbevent){evnt(25753,5109,"ide_methods.bas");if(r)goto S_41128;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5109,"ide_methods.bas");}while(r); do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(25753,5109,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5109,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5110,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5110,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5111,"ide_methods.bas");}while(r); } S_41137:; 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(25753,5114,"ide_methods.bas");if(r)goto S_41137;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5115,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BMKREMOVED= 0 ; if(!qbevent)break;evnt(25753,5116,"ide_methods.bas");}while(r); LABEL_BMKREMOVEB:; if(qbevent){evnt(25753,5117,"ide_methods.bas");r=0;} S_41140:; fornext_value4429= 1 ; fornext_finalvalue4429=*__LONG_IDEBMKN; 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_IDE2_LONG_B); fornext_entrylabel4429: *_FUNC_IDE2_LONG_B=fornext_value4429; if (fornext_step_negative4429){ if (fornext_value4429fornext_finalvalue4429) break; } fornext_error4429:; if(qbevent){evnt(25753,5118,"ide_methods.bas");if(r)goto S_41140;} S_41141:; 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(25753,5119,"ide_methods.bas");if(r)goto S_41141;} S_41142:; fornext_value4431=*_FUNC_IDE2_LONG_B; fornext_finalvalue4431=*__LONG_IDEBMKN- 1 ; 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_IDE2_LONG_B2); fornext_entrylabel4431: *_FUNC_IDE2_LONG_B2=fornext_value4431; if (fornext_step_negative4431){ if (fornext_value4431fornext_finalvalue4431) break; } fornext_error4431:; if(qbevent){evnt(25753,5120,"ide_methods.bas");if(r)goto S_41142;} do{ memcpy(((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)+ 0,((char*)__ARRAY_UDT_IDEBMK[0])+((array_check((*_FUNC_IDE2_LONG_B2+ 1 )-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16)+ 0, 16); if(!qbevent)break;evnt(25753,5121,"ide_methods.bas");}while(r); fornext_continue_4430:; } fornext_exit_4430:; do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN- 1 ; if(!qbevent)break;evnt(25753,5123,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BMKREMOVED= 1 ; if(!qbevent)break;evnt(25753,5124,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNSAVED= 1 ; if(!qbevent)break;evnt(25753,5125,"ide_methods.bas");}while(r); do{ goto LABEL_BMKREMOVEB; if(!qbevent)break;evnt(25753,5126,"ide_methods.bas");}while(r); } fornext_continue_4428:; } fornext_exit_4428:; S_41151:; if ((-(*_FUNC_IDE2_LONG_BMKREMOVED== 0 ))||new_error){ if(qbevent){evnt(25753,5129,"ide_methods.bas");if(r)goto S_41151;} do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN+ 1 ; if(!qbevent)break;evnt(25753,5130,"ide_methods.bas");}while(r); S_41153:; if ((-(*__LONG_IDEBMKN>func_ubound(__ARRAY_UDT_IDEBMK,1,1)))||new_error){ if(qbevent){evnt(25753,5131,"ide_methods.bas");if(r)goto S_41153;} do{ *_FUNC_IDE2_LONG_X=func_ubound(__ARRAY_UDT_IDEBMK,1,1)* 2 ; if(!qbevent)break;evnt(25753,5131,"ide_methods.bas");}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(25753,5159,"ide_methods.bas");if(r)goto S_41194;} do{ *_FUNC_IDE2_LONG_L= 1 ; if(!qbevent)break;evnt(25753,5159,"ide_methods.bas");}while(r); } S_41197:; fornext_value4434= 1 ; fornext_finalvalue4434=*__LONG_IDEBMKN; fornext_step4434= 1 ; if (fornext_step4434<0) fornext_step_negative4434=1; else fornext_step_negative4434=0; if (new_error) goto fornext_error4434; goto fornext_entrylabel4434; while(1){ fornext_value4434=fornext_step4434+(*_FUNC_IDE2_LONG_B); fornext_entrylabel4434: *_FUNC_IDE2_LONG_B=fornext_value4434; if (fornext_step_negative4434){ if (fornext_value4434fornext_finalvalue4434) break; } fornext_error4434:; if(qbevent){evnt(25753,5160,"ide_methods.bas");if(r)goto S_41197;} S_41198:; 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(25753,5161,"ide_methods.bas");if(r)goto S_41198;} do{ goto dl_exit_4432; if(!qbevent)break;evnt(25753,5161,"ide_methods.bas");}while(r); } fornext_continue_4433:; } fornext_exit_4433:; dl_continue_4432:; }while(1); dl_exit_4432:; do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,5164,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_L; if(!qbevent)break;evnt(25753,5165,"ide_methods.bas");}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(25753,5166,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5167,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5168,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5169,"ide_methods.bas");}while(r); } S_41210:; 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... Ctrl+G",22))))||new_error){ if(qbevent){evnt(25753,5177,"ide_methods.bas");if(r)goto S_41210;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5178,"ide_methods.bas");}while(r); do{ SUB_IDEGOTOBOX(); if(!qbevent)break;evnt(25753,5179,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5180,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5180,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5181,"ide_methods.bas");}while(r); } S_41217:; 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(25753,5184,"ide_methods.bas");if(r)goto S_41217;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5185,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEBACKUPBOX(); if(!qbevent)break;evnt(25753,5186,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5188,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5188,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5189,"ide_methods.bas");}while(r); } S_41224:; 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(25753,5200,"ide_methods.bas");if(r)goto S_41224;} LABEL_HELPABOUT:; if(qbevent){evnt(25753,5201,"ide_methods.bas");r=0;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5202,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_M,qbs_add(qbs_new_txt_len("QB64 Phoenix Edition Version ",29),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5203,"ide_methods.bas");}while(r); S_41227:; if ((*__BYTE_ISCIVERSION)||new_error){ if(qbevent){evnt(25753,5204,"ide_methods.bas");if(r)goto S_41227;} do{ qbs_set(_FUNC_IDE2_STRING_M,qbs_add(qbs_add(_FUNC_IDE2_STRING_M,func_chr( 10 )),qbs_new_txt_len("CI Build",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5204,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("About",5),_FUNC_IDE2_STRING_M,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5205,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5206,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5206,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5207,"ide_methods.bas");}while(r); } S_41235:; 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 Chart...",15))))||new_error){ if(qbevent){evnt(25753,5211,"ide_methods.bas");if(r)goto S_41235;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5212,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RELAUNCH= 0 ; if(!qbevent)break;evnt(25753,5213,"ide_methods.bas");}while(r); S_41238:; do{ if(qbevent){evnt(25753,5214,"ide_methods.bas");if(r)goto S_41238;} do{ qbs_set(_FUNC_IDE2_STRING_RETVAL,FUNC_IDEASCIIBOX(_FUNC_IDE2_LONG_RELAUNCH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5215,"ide_methods.bas");}while(r); S_41240:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_RETVAL->len))||new_error){ if(qbevent){evnt(25753,5216,"ide_methods.bas");if(r)goto S_41240;} do{ SUB_INSERTATCURSOR(_FUNC_IDE2_STRING_RETVAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5216,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5217,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5217,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=47; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_47:; if(!qbevent)break;evnt(25753,5218,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,5219,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5220,"ide_methods.bas");}while(r); S_41248:; dl_continue_4435:; }while((*_FUNC_IDE2_LONG_RELAUNCH)&&(!new_error)); dl_exit_4435:; if(qbevent){evnt(25753,5221,"ide_methods.bas");if(r)goto S_41248;} do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,5222,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5223,"ide_methods.bas");}while(r); } S_41252:; 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("Insert Quick #Keycode Ctrl+K",29))))||new_error){ if(qbevent){evnt(25753,5226,"ide_methods.bas");if(r)goto S_41252;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5227,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5227,"ide_methods.bas");}while(r); LABEL_IDEQUICKKEYCODE:; if(qbevent){evnt(25753,5228,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4437= 1 )); if(!qbevent)break;evnt(25753,5229,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4438= 0 )); if(!qbevent)break;evnt(25753,5230,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,5231,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Press any key to insert its _KEYHIT/_KEYDOWN code...",52),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5232,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5233,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_TEMPK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5235,"ide_methods.bas");}while(r); S_41261:; do{ if(qbevent){evnt(25753,5237,"ide_methods.bas");if(r)goto S_41261;} do{ *_FUNC_IDE2_LONG_TEMPK=func__keyhit(); if(!qbevent)break;evnt(25753,5237,"ide_methods.bas");}while(r); do{ sub__limit( 30 ); if(!qbevent)break;evnt(25753,5237,"ide_methods.bas");}while(r); S_41264:; dl_continue_4439:; }while((!(-(*_FUNC_IDE2_LONG_TEMPK== 0 )))&&(!new_error)); dl_exit_4439:; if(qbevent){evnt(25753,5237,"ide_methods.bas");if(r)goto S_41264;} S_41265:; do{ if(qbevent){evnt(25753,5238,"ide_methods.bas");if(r)goto S_41265;} do{ *_FUNC_IDE2_LONG_TEMPK=func__keyhit(); if(!qbevent)break;evnt(25753,5239,"ide_methods.bas");}while(r); S_41267:; if ((-(*_FUNC_IDE2_LONG_TEMPK> 0 ))||new_error){ if(qbevent){evnt(25753,5240,"ide_methods.bas");if(r)goto S_41267;} do{ qbs_set(_FUNC_IDE2_STRING_TEMPK,qbs_str((int32)(*_FUNC_IDE2_LONG_TEMPK))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5240,"ide_methods.bas");}while(r); } S_41270:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,5242,"ide_methods.bas");if(r)goto S_41270;} ww_continue_4441:; } ww_exit_4441:; S_41272:; if ((func__mousebutton( 1 ,NULL,0)|func__mousebutton( 2 ,NULL,0))||new_error){ if(qbevent){evnt(25753,5243,"ide_methods.bas");if(r)goto S_41272;} do{ goto LABEL_BYPASSCTRLK; if(!qbevent)break;evnt(25753,5243,"ide_methods.bas");}while(r); } do{ sub__limit( 30 ); if(!qbevent)break;evnt(25753,5245,"ide_methods.bas");}while(r); S_41276:; dl_continue_4440:; }while((!(-(*_FUNC_IDE2_LONG_TEMPK> 0 )))&&(!new_error)); dl_exit_4440:; if(qbevent){evnt(25753,5246,"ide_methods.bas");if(r)goto S_41276;} S_41277:; if (((-(*_FUNC_IDE2_LONG_TEMPK== 100303 ))|(-(*_FUNC_IDE2_LONG_TEMPK== 100304 )))||new_error){ if(qbevent){evnt(25753,5247,"ide_methods.bas");if(r)goto S_41277;} S_41278:; do{ if(qbevent){evnt(25753,5248,"ide_methods.bas");if(r)goto S_41278;} do{ *_FUNC_IDE2_LONG_TEMPK=func__keyhit(); if(!qbevent)break;evnt(25753,5249,"ide_methods.bas");}while(r); S_41280:; if ((-(*_FUNC_IDE2_LONG_TEMPK!= 0 ))||new_error){ if(qbevent){evnt(25753,5250,"ide_methods.bas");if(r)goto S_41280;} do{ qbs_set(_FUNC_IDE2_STRING_TEMPK,qbs_str((int32)(func_abs((int32)(*_FUNC_IDE2_LONG_TEMPK))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5250,"ide_methods.bas");}while(r); } S_41283:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,5252,"ide_methods.bas");if(r)goto S_41283;} ww_continue_4443:; } ww_exit_4443:; S_41285:; if ((func__mousebutton( 1 ,NULL,0)|func__mousebutton( 2 ,NULL,0))||new_error){ if(qbevent){evnt(25753,5253,"ide_methods.bas");if(r)goto S_41285;} do{ goto LABEL_BYPASSCTRLK; if(!qbevent)break;evnt(25753,5253,"ide_methods.bas");}while(r); } do{ sub__limit( 30 ); if(!qbevent)break;evnt(25753,5255,"ide_methods.bas");}while(r); S_41289:; dl_continue_4442:; }while((!(-(*_FUNC_IDE2_LONG_TEMPK!= 0 )))&&(!new_error)); dl_exit_4442:; if(qbevent){evnt(25753,5256,"ide_methods.bas");if(r)goto S_41289;} } do{ qbs_set(_FUNC_IDE2_STRING_TEMPK,qbs_ltrim(_FUNC_IDE2_STRING_TEMPK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5258,"ide_methods.bas");}while(r); do{ SUB_INSERTATCURSOR(_FUNC_IDE2_STRING_TEMPK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5261,"ide_methods.bas");}while(r); LABEL_BYPASSCTRLK:; if(qbevent){evnt(25753,5263,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4444= 0 )); if(!qbevent)break;evnt(25753,5264,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5265,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5265,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,5266,"ide_methods.bas");}while(r); do{ *__LONG_KCTRL= 0 ; if(!qbevent)break;evnt(25753,5267,"ide_methods.bas");}while(r); do{ *__LONG_KCONTROL= 0 ; if(!qbevent)break;evnt(25753,5267,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=48; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_48:; if(!qbevent)break;evnt(25753,5268,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5269,"ide_methods.bas");}while(r); } S_41302:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 10 ),qbs_new_txt_len("#Help On '",10))))||new_error){ if(qbevent){evnt(25753,5272,"ide_methods.bas");if(r)goto S_41302;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5273,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5273,"ide_methods.bas");}while(r); do{ goto LABEL_CONTEXTUALHELP; if(!qbevent)break;evnt(25753,5274,"ide_methods.bas");}while(r); } S_41307:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(((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]])), 10 ),qbs_new_txt_len("#Go To SUB",10)))|(qbs_equal(qbs_left(((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]])), 15 ),qbs_new_txt_len("#Go To FUNCTION",15)))))||new_error){ if(qbevent){evnt(25753,5277,"ide_methods.bas");if(r)goto S_41307;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5278,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5278,"ide_methods.bas");}while(r); do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,5279,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check(( 1 )-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])])), 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5280,"ide_methods.bas");}while(r); do{ *__LONG_IDESY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,5281,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,5282,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,5283,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5284,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5285,"ide_methods.bas");}while(r); } S_41318:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 12 ),qbs_new_txt_len("Go To #Label",12))))||new_error){ if(qbevent){evnt(25753,5288,"ide_methods.bas");if(r)goto S_41318;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5289,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5289,"ide_methods.bas");}while(r); do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,5290,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check((func_ubound(__ARRAY_STRING_SUBFUNCLIST,1,1))-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])])), 1 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5291,"ide_methods.bas");}while(r); do{ *__LONG_IDESY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,5292,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,5293,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,5294,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5295,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5296,"ide_methods.bas");}while(r); } S_41329:; 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(25753,5299,"ide_methods.bas");if(r)goto S_41329;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5300,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5300,"ide_methods.bas");}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(25753,5301,"ide_methods.bas");}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(25753,5302,"ide_methods.bas");}while(r); } S_41335:; 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(25753,5304,"ide_methods.bas");if(r)goto S_41335;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5305,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5305,"ide_methods.bas");}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(25753,5306,"ide_methods.bas");}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(25753,5307,"ide_methods.bas");}while(r); } S_41341:; 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(25753,5309,"ide_methods.bas");if(r)goto S_41341;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5310,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5310,"ide_methods.bas");}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(25753,5311,"ide_methods.bas");}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(25753,5312,"ide_methods.bas");}while(r); } S_41347:; 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(25753,5315,"ide_methods.bas");if(r)goto S_41347;} S_41348:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(25753,5317,"ide_methods.bas");if(r)goto S_41348;} S_41349:; if ((*__LONG_IDESUBWINDOW)||new_error){ if(qbevent){evnt(25753,5318,"ide_methods.bas");if(r)goto S_41349;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5318,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5318,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5318,"ide_methods.bas");}while(r); } do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(25753,5319,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,5319,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(25753,5320,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(25753,5320,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(25753,5320,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(25753,5320,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(25753,5320,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(25753,5320,"ide_methods.bas");}while(r); do{ *__LONG_IDEHELP= 1 ; if(!qbevent)break;evnt(25753,5321,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SKIPDISPLAY= 0 ; if(!qbevent)break;evnt(25753,5322,"ide_methods.bas");}while(r); do{ *__LONG_IDESYSTEM= 3 ; if(!qbevent)break;evnt(25753,5323,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL= 1 ; if(!qbevent)break;evnt(25753,5324,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=49; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_49:; if(!qbevent)break;evnt(25753,5324,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5327,"ide_methods.bas");}while(r); } S_41370:; 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 Current Page On #Wiki",26))))||new_error){ if(qbevent){evnt(25753,5330,"ide_methods.bas");if(r)goto S_41370;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5331,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5331,"ide_methods.bas");}while(r); S_41373:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(25753,5332,"ide_methods.bas");if(r)goto S_41373;} do{ goto LABEL_LAUNCHWIKI; if(!qbevent)break;evnt(25753,5332,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5333,"ide_methods.bas");}while(r); } S_41378:; 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(25753,5336,"ide_methods.bas");if(r)goto S_41378;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5337,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5337,"ide_methods.bas");}while(r); S_41381:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(25753,5338,"ide_methods.bas");if(r)goto S_41381;} do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(25753,5339,"ide_methods.bas");}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(25753,5340,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDE2_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5341,"ide_methods.bas");}while(r); do{ *__LONG_HELP_IGNORECACHE= 0 ; if(!qbevent)break;evnt(25753,5342,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5344,"ide_methods.bas");}while(r); } S_41389:; 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("#Math Evaluator...",18))))||new_error){ if(qbevent){evnt(25753,5348,"ide_methods.bas");if(r)goto S_41389;} do{ if(!qbevent)break;evnt(25753,5349,"ide_methods.bas");}while(r); S_41391:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,5351,"ide_methods.bas");if(r)goto S_41391;} S_41392:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,5352,"ide_methods.bas");if(r)goto S_41392;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5353,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5354,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,5355,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,5355,"ide_methods.bas");}while(r); S_41397:; if ((-(*_FUNC_IDE2_LONG_SX2<*_FUNC_IDE2_LONG_SX1))||new_error){ if(qbevent){evnt(25753,5356,"ide_methods.bas");if(r)goto S_41397;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,5356,"ide_methods.bas");}while(r); } S_41400:; fornext_value4446=*_FUNC_IDE2_LONG_SX1; fornext_finalvalue4446=*_FUNC_IDE2_LONG_SX2- 1 ; fornext_step4446= 1 ; if (fornext_step4446<0) fornext_step_negative4446=1; else fornext_step_negative4446=0; if (new_error) goto fornext_error4446; goto fornext_entrylabel4446; while(1){ fornext_value4446=fornext_step4446+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4446: *_FUNC_IDE2_LONG_X=fornext_value4446; if (fornext_step_negative4446){ if (fornext_value4446fornext_finalvalue4446) break; } fornext_error4446:; if(qbevent){evnt(25753,5357,"ide_methods.bas");if(r)goto S_41400;} S_41401:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_X<=_FUNC_IDE2_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,5358,"ide_methods.bas");if(r)goto S_41401;} do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs_add(_FUNC_IDE2_STRING_A2,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5358,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_4445; if(!qbevent)break;evnt(25753,5358,"ide_methods.bas");}while(r); } fornext_continue_4445:; } fornext_exit_4445:; do{ qbs_set(_FUNC_IDE2_STRING_A2,qbs__trim(_FUNC_IDE2_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5360,"ide_methods.bas");}while(r); S_41408:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A2->len))||new_error){ if(qbevent){evnt(25753,5361,"ide_methods.bas");if(r)goto S_41408;} do{ qbs_set(_FUNC_IDE2_STRING_MATHEVALEXPR,_FUNC_IDE2_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5361,"ide_methods.bas");}while(r); } } } S_41413:; do{ if(qbevent){evnt(25753,5365,"ide_methods.bas");if(r)goto S_41413;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5366,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_RETVAL,FUNC_IDEINPUTBOX(qbs_new_txt_len("Math Evaluator",14),qbs_new_txt_len("#Enter expression",17),_FUNC_IDE2_STRING_MATHEVALEXPR,qbs_new_txt_len("",0),&(pass4450= 60 ),&(pass4451= 0 ),&(pass4452= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5367,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RESULT= 0 ; if(!qbevent)break;evnt(25753,5368,"ide_methods.bas");}while(r); S_41417:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_RETVAL->len))||new_error){ if(qbevent){evnt(25753,5369,"ide_methods.bas");if(r)goto S_41417;} do{ qbs_set(_FUNC_IDE2_STRING_MATHEVALEXPR,_FUNC_IDE2_STRING_RETVAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5370,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_EV0,FUNC_EVALUATE_EXPRESSION(_FUNC_IDE2_STRING_RETVAL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5371,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_EV,_FUNC_IDE2_STRING_EV0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5372,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_MATHEVALERROR=-(func_instr(NULL,_FUNC_IDE2_STRING_EV,qbs_new_txt_len("ERROR",5),0)> 0 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5373,"ide_methods.bas");}while(r); S_41422:; if (((-(*_FUNC_IDE2_BYTE_MATHEVALERROR== 0 ))&*_FUNC_IDE2_BYTE_MATHEVALHEX)||new_error){ if(qbevent){evnt(25753,5374,"ide_methods.bas");if(r)goto S_41422;} do{ qbs_set(_FUNC_IDE2_STRING_EV,qbs_add(qbs_new_txt_len("&H",2),func_hex_float(func_val(_FUNC_IDE2_STRING_EV)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5374,"ide_methods.bas");}while(r); } S_41425:; do{ if(qbevent){evnt(25753,5375,"ide_methods.bas");if(r)goto S_41425;} do{ qbs_set(_FUNC_IDE2_STRING_B1,qbs_new_txt_len("#Insert;",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5376,"ide_methods.bas");}while(r); S_41427:; if ((*_FUNC_IDE2_BYTE_MATHEVALHEX)||new_error){ if(qbevent){evnt(25753,5377,"ide_methods.bas");if(r)goto S_41427;} do{ qbs_set(_FUNC_IDE2_STRING_B2,qbs_new_txt_len("#Decimal;",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5377,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_B2,qbs_new_txt_len("#HEX$;",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5377,"ide_methods.bas");}while(r); } S_41432:; if (((-(*_FUNC_IDE2_BYTE_MATHEVALERROR== 0 ))&*_FUNC_IDE2_BYTE_MATHEVALCOMMENT)||new_error){ if(qbevent){evnt(25753,5378,"ide_methods.bas");if(r)goto S_41432;} do{ qbs_set(_FUNC_IDE2_STRING_MATHMSG,qbs_add(qbs_add(_FUNC_IDE2_STRING_EV,qbs_new_txt_len(" '",2)),_FUNC_IDE2_STRING_RETVAL)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5379,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_B3,qbs_new_txt_len("#Uncomment;",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5380,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_MATHMSG,_FUNC_IDE2_STRING_EV); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_B3,qbs_new_txt_len("Co#mment;",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5383,"ide_methods.bas");}while(r); } S_41439:; if ((*_FUNC_IDE2_BYTE_MATHEVALERROR)||new_error){ if(qbevent){evnt(25753,5385,"ide_methods.bas");if(r)goto S_41439;} do{ qbs_set(_FUNC_IDE2_STRING_B1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5385,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_B2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5385,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_B3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5385,"ide_methods.bas");}while(r); } do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5386,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Math Evaluator - Result",23),_FUNC_IDE2_STRING_MATHMSG,qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_B1,_FUNC_IDE2_STRING_B2),_FUNC_IDE2_STRING_B3),qbs_new_txt_len("#Redo;#Cancel",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5387,"ide_methods.bas");}while(r); S_41446:; if ((-(*_FUNC_IDE2_BYTE_MATHEVALERROR== 0 ))||new_error){ if(qbevent){evnt(25753,5388,"ide_methods.bas");if(r)goto S_41446;} S_41447:; if(qbevent){evnt(25753,5389,"ide_methods.bas");if(r)goto S_41447;} S_41448:; if (((*_FUNC_IDE2_LONG_RESULT==( 1 ))||(*_FUNC_IDE2_LONG_RESULT==( 4 ))||(*_FUNC_IDE2_LONG_RESULT==( 5 )))||new_error){ if(qbevent){evnt(25753,5390,"ide_methods.bas");if(r)goto S_41448;} do{ goto dl_exit_4454; if(!qbevent)break;evnt(25753,5391,"ide_methods.bas");}while(r); sc_ec_198_end:; goto sc_4455_end; } S_41450:; if (((*_FUNC_IDE2_LONG_RESULT==( 2 )))||new_error){ if(qbevent){evnt(25753,5392,"ide_methods.bas");if(r)goto S_41450;} do{ *_FUNC_IDE2_BYTE_MATHEVALHEX=~(*_FUNC_IDE2_BYTE_MATHEVALHEX); if(!qbevent)break;evnt(25753,5393,"ide_methods.bas");}while(r); S_41452:; if ((*_FUNC_IDE2_BYTE_MATHEVALHEX)||new_error){ if(qbevent){evnt(25753,5394,"ide_methods.bas");if(r)goto S_41452;} do{ qbs_set(_FUNC_IDE2_STRING_EV,qbs_add(qbs_new_txt_len("&H",2),func_hex_float(func_val(_FUNC_IDE2_STRING_EV)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5394,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_EV,_FUNC_IDE2_STRING_EV0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5394,"ide_methods.bas");}while(r); } sc_ec_199_end:; goto sc_4455_end; } S_41457:; if (((*_FUNC_IDE2_LONG_RESULT==( 3 )))||new_error){ if(qbevent){evnt(25753,5395,"ide_methods.bas");if(r)goto S_41457;} do{ *_FUNC_IDE2_BYTE_MATHEVALCOMMENT=~(*_FUNC_IDE2_BYTE_MATHEVALCOMMENT); if(!qbevent)break;evnt(25753,5396,"ide_methods.bas");}while(r); sc_ec_200_end:; goto sc_4455_end; } sc_4455_end:; }else{ do{ goto dl_exit_4454; if(!qbevent)break;evnt(25753,5399,"ide_methods.bas");}while(r); } dl_continue_4454:; }while(1); dl_exit_4454:; S_41464:; if ((*_FUNC_IDE2_BYTE_MATHEVALERROR&(-(*_FUNC_IDE2_LONG_RESULT== 2 )))||new_error){ if(qbevent){evnt(25753,5402,"ide_methods.bas");if(r)goto S_41464;} do{ goto dl_exit_4449; if(!qbevent)break;evnt(25753,5402,"ide_methods.bas");}while(r); } S_41467:; if (((-(*_FUNC_IDE2_BYTE_MATHEVALERROR== 0 ))&(((-(*_FUNC_IDE2_LONG_RESULT== 1 ))|(-(*_FUNC_IDE2_LONG_RESULT== 5 )))))||new_error){ if(qbevent){evnt(25753,5403,"ide_methods.bas");if(r)goto S_41467;} do{ goto dl_exit_4449; if(!qbevent)break;evnt(25753,5403,"ide_methods.bas");}while(r); } }else{ do{ goto dl_exit_4449; if(!qbevent)break;evnt(25753,5405,"ide_methods.bas");}while(r); } dl_continue_4449:; }while(1); dl_exit_4449:; S_41474:; if (((-(*_FUNC_IDE2_BYTE_MATHEVALERROR== 0 ))&(-(*_FUNC_IDE2_LONG_RESULT== 1 )))||new_error){ if(qbevent){evnt(25753,5409,"ide_methods.bas");if(r)goto S_41474;} do{ SUB_INSERTATCURSOR(_FUNC_IDE2_STRING_MATHMSG); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5410,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5412,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5412,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5413,"ide_methods.bas");}while(r); } S_41481:; 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...",20))))||new_error){ if(qbevent){evnt(25753,5416,"ide_methods.bas");if(r)goto S_41481;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5417,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_Q,FUNC_IDEYESNOBOX(qbs_new_txt_len("Update Help",11),qbs_new_txt_len("This can take up to 20 minutes.\\nRedownload all cached help content from the wiki?",82))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5418,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5419,"ide_methods.bas");}while(r); S_41485:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_Q,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,5420,"ide_methods.bas");if(r)goto S_41485;} do{ *__LONG_HELP_RECACHING= 1 ; if(!qbevent)break;evnt(25753,5421,"ide_methods.bas");}while(r); do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(25753,5421,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_UERR=FUNC_IDEUPDATEHELPBOX(); if(!qbevent)break;evnt(25753,5422,"ide_methods.bas");}while(r); do{ *__LONG_HELP_RECACHING= 0 ; if(!qbevent)break;evnt(25753,5423,"ide_methods.bas");}while(r); do{ *__LONG_HELP_IGNORECACHE= 0 ; if(!qbevent)break;evnt(25753,5423,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5424,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5424,"ide_methods.bas");}while(r); S_41493:; if ((*_FUNC_IDE2_LONG_UERR)||new_error){ if(qbevent){evnt(25753,5425,"ide_methods.bas");if(r)goto S_41493;} do{ qbs_set(_FUNC_IDE2_STRING_LNK,qbs_new_txt_len("Update All",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5426,"ide_methods.bas");}while(r); do{ goto LABEL_OPENHELPLNK; if(!qbevent)break;evnt(25753,5427,"ide_methods.bas");}while(r); } } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5430,"ide_methods.bas");}while(r); } S_41500:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 8 ),qbs_new_txt_len("New #SUB",8))))||new_error){ if(qbevent){evnt(25753,5433,"ide_methods.bas");if(r)goto S_41500;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5434,"ide_methods.bas");}while(r); do{ SUB_IDENEWSF(qbs_new_txt_len("SUB",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5435,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5436,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5437,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5437,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5438,"ide_methods.bas");}while(r); } S_41508:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 13 ),qbs_new_txt_len("New #FUNCTION",13))))||new_error){ if(qbevent){evnt(25753,5440,"ide_methods.bas");if(r)goto S_41508;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5441,"ide_methods.bas");}while(r); do{ SUB_IDENEWSF(qbs_new_txt_len("FUNCTION",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5442,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5443,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5444,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5444,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5445,"ide_methods.bas");}while(r); } S_41516:; 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)))|(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",11)))))||new_error){ if(qbevent){evnt(25753,5448,"ide_methods.bas");if(r)goto S_41516;} S_41517:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,5449,"ide_methods.bas");if(r)goto S_41517;} do{ *__LONG_IDEDEBUGMODE= 14 ; if(!qbevent)break;evnt(25753,5450,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5451,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5453,"ide_methods.bas");}while(r); LABEL_IDESUBSJMP:; if(qbevent){evnt(25753,5454,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESUBS()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5455,"ide_methods.bas");}while(r); S_41523:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,5456,"ide_methods.bas");if(r)goto S_41523;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5456,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5457,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5457,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5458,"ide_methods.bas");}while(r); } } S_41531:; 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_add(qbs_new_txt_len("#Line Numbers ",15),func_chr( 16 ))))))||new_error){ if(qbevent){evnt(25753,5462,"ide_methods.bas");if(r)goto S_41531;} do{ *_FUNC_IDE2_LONG_IDECONTEXTUALMENU= 2 ; if(!qbevent)break;evnt(25753,5463,"ide_methods.bas");}while(r); do{ goto LABEL_SHOWMENU; if(!qbevent)break;evnt(25753,5464,"ide_methods.bas");}while(r); } S_41535:; 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("#Show Line Numbers",18))))||new_error){ if(qbevent){evnt(25753,5467,"ide_methods.bas");if(r)goto S_41535;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5468,"ide_methods.bas");}while(r); do{ *__BYTE_SHOWLINENUMBERS= -1 ; if(!qbevent)break;evnt(25753,5469,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbers",15),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5470,"ide_methods.bas");}while(r); do{ tmp_long=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]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Hide Line Numbers",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5471,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUSHOWBGID)-__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])),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUSHOWBGID)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5472,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUSHOWSEPARATORID)-__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])),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUSHOWSEPARATORID)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5473,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5474,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5474,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5475,"ide_methods.bas");}while(r); } S_41546:; 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("#Hide Line Numbers",18))))||new_error){ if(qbevent){evnt(25753,5478,"ide_methods.bas");if(r)goto S_41546;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5479,"ide_methods.bas");}while(r); do{ *__BYTE_SHOWLINENUMBERS= 0 ; if(!qbevent)break;evnt(25753,5480,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbers",15),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5481,"ide_methods.bas");}while(r); do{ tmp_long=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]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Show Line Numbers",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5482,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUSHOWBGID)-__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_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((*__INTEGER_VIEWMENUSHOWBGID)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5483,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDE2_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_VIEWMENUSHOWSEPARATORID)-__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_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((*__INTEGER_VIEWMENUSHOWSEPARATORID)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5484,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5485,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5485,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5486,"ide_methods.bas");}while(r); } S_41557:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 17 ),qbs_new_txt_len("#Background Color",17))))||new_error){ if(qbevent){evnt(25753,5489,"ide_methods.bas");if(r)goto S_41557;} S_41558:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25753,5490,"ide_methods.bas");if(r)goto S_41558;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5491,"ide_methods.bas");}while(r); do{ *__BYTE_SHOWLINENUMBERSUSEBG=~(*__BYTE_SHOWLINENUMBERSUSEBG); if(!qbevent)break;evnt(25753,5492,"ide_methods.bas");}while(r); S_41561:; if ((*__BYTE_SHOWLINENUMBERSUSEBG)||new_error){ if(qbevent){evnt(25753,5493,"ide_methods.bas");if(r)goto S_41561;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersUseBG",20),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5494,"ide_methods.bas");}while(r); do{ tmp_long=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]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_add(func_chr( 7 ),qbs_new_txt_len("#Background Color",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5495,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersUseBG",20),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5497,"ide_methods.bas");}while(r); do{ tmp_long=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]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("#Background Color",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5498,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5500,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5500,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5501,"ide_methods.bas");}while(r); } } S_41573:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(((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]])), 15 ),qbs_new_txt_len("Sho#w Separator",15))))||new_error){ if(qbevent){evnt(25753,5505,"ide_methods.bas");if(r)goto S_41573;} S_41574:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25753,5506,"ide_methods.bas");if(r)goto S_41574;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5507,"ide_methods.bas");}while(r); do{ *__BYTE_SHOWLINENUMBERSSEPARATOR=~(*__BYTE_SHOWLINENUMBERSSEPARATOR); if(!qbevent)break;evnt(25753,5508,"ide_methods.bas");}while(r); S_41577:; if ((*__BYTE_SHOWLINENUMBERSSEPARATOR)||new_error){ if(qbevent){evnt(25753,5509,"ide_methods.bas");if(r)goto S_41577;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersSeparator",24),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5510,"ide_methods.bas");}while(r); do{ tmp_long=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]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_add(func_chr( 7 ),qbs_new_txt_len("Sho#w Separator",15))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5511,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("ShowLineNumbersSeparator",24),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5513,"ide_methods.bas");}while(r); do{ tmp_long=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]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Sho#w Separator",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5514,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5516,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5516,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5517,"ide_methods.bas");}while(r); } } S_41589:; 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("Compiler #Warnings... Ctrl+W",29))))||new_error){ if(qbevent){evnt(25753,5521,"ide_methods.bas");if(r)goto S_41589;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5522,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDEWARNINGBOX(); if(!qbevent)break;evnt(25753,5523,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5525,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5525,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5526,"ide_methods.bas");}while(r); } S_41596:; 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... Ctrl+F3",17))))||new_error){ if(qbevent){evnt(25753,5529,"ide_methods.bas");if(r)goto S_41596;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5530,"ide_methods.bas");}while(r); LABEL_IDEFINDJMP:; if(qbevent){evnt(25753,5531,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFIND()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5532,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5533,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5533,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5535,"ide_methods.bas");}while(r); } S_41603:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 6 ),qbs_new_txt_len("Find '",6))))||new_error){ if(qbevent){evnt(25753,5538,"ide_methods.bas");if(r)goto S_41603;} do{ qbs_set(__STRING_IDEFINDTEXT,__STRING_IDECONTEXTUALSEARCH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5539,"ide_methods.bas");}while(r); do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5540,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5541,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5541,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(25753,5542,"ide_methods.bas");}while(r); } S_41610:; 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... Alt+F3",18))))||new_error){ if(qbevent){evnt(25753,5545,"ide_methods.bas");if(r)goto S_41610;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5546,"ide_methods.bas");}while(r); LABEL_IDEFINDCHANGEJMP:; if(qbevent){evnt(25753,5547,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECHANGE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5548,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5549,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5549,"ide_methods.bas");}while(r); do{ *__LONG_IDEALTHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,5550,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,5551,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,5551,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5551,"ide_methods.bas");}while(r); S_41619:; 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(25753,5552,"ide_methods.bas");if(r)goto S_41619;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5552,"ide_methods.bas");}while(r); } do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5554,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDCX=*__LONG_IDECX; if(!qbevent)break;evnt(25753,5556,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_OLDCY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,5556,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUND= 0 ; if(!qbevent)break;evnt(25753,5557,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 0 ; if(!qbevent)break;evnt(25753,5557,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CHANGED= 0 ; if(!qbevent)break;evnt(25753,5558,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_S,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5560,"ide_methods.bas");}while(r); S_41629:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,5561,"ide_methods.bas");if(r)goto S_41629;} do{ qbs_set(_FUNC_IDE2_STRING_S,qbs_ucase(_FUNC_IDE2_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5561,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_START=*__LONG_IDECY; if(!qbevent)break;evnt(25753,5562,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_START; if(!qbevent)break;evnt(25753,5562,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_STARTX=*__LONG_IDECX; if(!qbevent)break;evnt(25753,5563,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_STARTX; if(!qbevent)break;evnt(25753,5563,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FIRST= 1 ; if(!qbevent)break;evnt(25753,5564,"ide_methods.bas");}while(r); LABEL_IDEFINDNEXT2:; if(qbevent){evnt(25753,5565,"ide_methods.bas");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(25753,5567,"ide_methods.bas");}while(r); S_41638:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,5568,"ide_methods.bas");if(r)goto S_41638;} do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_ucase(_FUNC_IDE2_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5568,"ide_methods.bas");}while(r); } S_41641:; if ((-(*_FUNC_IDE2_LONG_FIRST== 1 ))||new_error){ if(qbevent){evnt(25753,5570,"ide_methods.bas");if(r)goto S_41641;} do{ *_FUNC_IDE2_LONG_FIRST= 0 ; if(!qbevent)break;evnt(25753,5571,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_X1= 1 ; if(!qbevent)break;evnt(25753,5573,"ide_methods.bas");}while(r); S_41645:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,5574,"ide_methods.bas");if(r)goto S_41645;} 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(25753,5575,"ide_methods.bas");}while(r); } } S_41649:; if ((-(*_FUNC_IDE2_LONG_X1< 0 ))||new_error){ if(qbevent){evnt(25753,5578,"ide_methods.bas");if(r)goto S_41649;} do{ *_FUNC_IDE2_LONG_X1= 0 ; if(!qbevent)break;evnt(25753,5578,"ide_methods.bas");}while(r); } LABEL_IDEFINDAGAIN2:; if(qbevent){evnt(25753,5580,"ide_methods.bas");r=0;} S_41652:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,5582,"ide_methods.bas");if(r)goto S_41652;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5583,"ide_methods.bas");}while(r); S_41654:; fornext_value4459=*_FUNC_IDE2_LONG_X1; fornext_finalvalue4459= 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_IDE2_LONG_XX); fornext_entrylabel4459: *_FUNC_IDE2_LONG_XX=fornext_value4459; if (fornext_step_negative4459){ if (fornext_value4459fornext_finalvalue4459) break; } fornext_error4459:; if(qbevent){evnt(25753,5584,"ide_methods.bas");if(r)goto S_41654;} S_41655:; 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(25753,5585,"ide_methods.bas");if(r)goto S_41655;} do{ *_FUNC_IDE2_LONG_XXO=*_FUNC_IDE2_LONG_XX- 1 ; if(!qbevent)break;evnt(25753,5586,"ide_methods.bas");}while(r); S_41657:; fornext_value4461=*_FUNC_IDE2_LONG_XX; fornext_finalvalue4461=*_FUNC_IDE2_LONG_XX+_FUNC_IDE2_STRING_S->len- 1 ; fornext_step4461= 1 ; if (fornext_step4461<0) fornext_step_negative4461=1; else fornext_step_negative4461=0; if (new_error) goto fornext_error4461; goto fornext_entrylabel4461; while(1){ fornext_value4461=fornext_step4461+(*_FUNC_IDE2_LONG_XX2); fornext_entrylabel4461: *_FUNC_IDE2_LONG_XX2=fornext_value4461; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4461){ if (fornext_value4461fornext_finalvalue4461) break; } fornext_error4461:; if(qbevent){evnt(25753,5587,"ide_methods.bas");if(r)goto S_41657;} S_41658:; 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(25753,5588,"ide_methods.bas");if(r)goto S_41658;} do{ goto fornext_exit_4460; if(!qbevent)break;evnt(25753,5588,"ide_methods.bas");}while(r); } fornext_continue_4460:; } fornext_exit_4460:; S_41662:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_XX2==(*_FUNC_IDE2_LONG_XX+_FUNC_IDE2_STRING_S->len))))||new_error){ if(qbevent){evnt(25753,5590,"ide_methods.bas");if(r)goto S_41662;} do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_XX; if(!qbevent)break;evnt(25753,5592,"ide_methods.bas");}while(r); do{ goto fornext_exit_4458; if(!qbevent)break;evnt(25753,5593,"ide_methods.bas");}while(r); } } fornext_continue_4458:; } fornext_exit_4458:; S_41668:; 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(25753,5597,"ide_methods.bas");if(r)goto S_41668;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5597,"ide_methods.bas");}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(25753,5599,"ide_methods.bas");}while(r); S_41673:; 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(25753,5600,"ide_methods.bas");if(r)goto S_41673;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5600,"ide_methods.bas");}while(r); } } S_41677:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,5603,"ide_methods.bas");if(r)goto S_41677;} S_41678:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(25753,5604,"ide_methods.bas");if(r)goto S_41678;} do{ *_FUNC_IDE2_LONG_WHOLE= 1 ; if(!qbevent)break;evnt(25753,5605,"ide_methods.bas");}while(r); S_41680:; if ((-(*_FUNC_IDE2_LONG_X> 1 ))||new_error){ if(qbevent){evnt(25753,5606,"ide_methods.bas");if(r)goto S_41680;} 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(25753,5607,"ide_methods.bas");}while(r); S_41682:; if (((-(*_FUNC_IDE2_LONG_C>= 65 ))&(-(*_FUNC_IDE2_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(25753,5608,"ide_methods.bas");if(r)goto S_41682;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,5608,"ide_methods.bas");}while(r); } S_41685:; if (((-(*_FUNC_IDE2_LONG_C>= 48 ))&(-(*_FUNC_IDE2_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(25753,5609,"ide_methods.bas");if(r)goto S_41685;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,5609,"ide_methods.bas");}while(r); } } S_41689:; 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(25753,5611,"ide_methods.bas");if(r)goto S_41689;} 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(25753,5612,"ide_methods.bas");}while(r); S_41691:; if (((-(*_FUNC_IDE2_LONG_C>= 65 ))&(-(*_FUNC_IDE2_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(25753,5613,"ide_methods.bas");if(r)goto S_41691;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,5613,"ide_methods.bas");}while(r); } S_41694:; if (((-(*_FUNC_IDE2_LONG_C>= 48 ))&(-(*_FUNC_IDE2_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(25753,5614,"ide_methods.bas");if(r)goto S_41694;} do{ *_FUNC_IDE2_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,5614,"ide_methods.bas");}while(r); } } S_41698:; if ((-(*_FUNC_IDE2_LONG_WHOLE== 0 ))||new_error){ if(qbevent){evnt(25753,5616,"ide_methods.bas");if(r)goto S_41698;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,5617,"ide_methods.bas");}while(r); S_41700:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,5617,"ide_methods.bas");if(r)goto S_41700;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X- 1 ; if(!qbevent)break;evnt(25753,5617,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5618,"ide_methods.bas");}while(r); S_41704:; 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(25753,5619,"ide_methods.bas");if(r)goto S_41704;} do{ goto LABEL_IDEFINDAGAIN2; if(!qbevent)break;evnt(25753,5619,"ide_methods.bas");}while(r); } } } } do{ if(!qbevent)break;evnt(25753,5624,"ide_methods.bas");}while(r); S_41711:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,5625,"ide_methods.bas");if(r)goto S_41711;} do{ SUB_FINDQUOTECOMMENT(_FUNC_IDE2_STRING_L,_FUNC_IDE2_LONG_X,_FUNC_IDE2_BYTE_COMMENT,_FUNC_IDE2_BYTE_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5626,"ide_methods.bas");}while(r); S_41713:; if (((-(*__INTEGER_IDEFINDNOCOMMENTS!= 0 ))&*_FUNC_IDE2_BYTE_COMMENT)||new_error){ if(qbevent){evnt(25753,5627,"ide_methods.bas");if(r)goto S_41713;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5627,"ide_methods.bas");}while(r); } S_41716:; if (((-(*__INTEGER_IDEFINDNOSTRINGS!= 0 ))&*_FUNC_IDE2_BYTE_QUOTE)||new_error){ if(qbevent){evnt(25753,5628,"ide_methods.bas");if(r)goto S_41716;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5628,"ide_methods.bas");}while(r); } S_41719:; if (((-(*__INTEGER_IDEFINDONLYCOMMENTS!= 0 ))&(-(*_FUNC_IDE2_BYTE_COMMENT== 0 )))||new_error){ if(qbevent){evnt(25753,5629,"ide_methods.bas");if(r)goto S_41719;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5629,"ide_methods.bas");}while(r); } S_41722:; if (((-(*__INTEGER_IDEFINDONLYSTRINGS!= 0 ))&(-(*_FUNC_IDE2_BYTE_QUOTE== 0 )))||new_error){ if(qbevent){evnt(25753,5630,"ide_methods.bas");if(r)goto S_41722;} do{ *_FUNC_IDE2_LONG_X= 0 ; if(!qbevent)break;evnt(25753,5630,"ide_methods.bas");}while(r); } } S_41726:; if ((*_FUNC_IDE2_LONG_X)||new_error){ if(qbevent){evnt(25753,5633,"ide_methods.bas");if(r)goto S_41726;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,5634,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_X; if(!qbevent)break;evnt(25753,5635,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(25753,5635,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,5636,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1=*_FUNC_IDE2_LONG_X+_FUNC_IDE2_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5637,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*_FUNC_IDE2_LONG_Y; if(!qbevent)break;evnt(25753,5637,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUND= 1 ; if(!qbevent)break;evnt(25753,5639,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,5640,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5641,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,5641,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5641,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5642,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECHANGEIT()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5643,"ide_methods.bas");}while(r); do{ SUB_IDEDELTXT(); if(!qbevent)break;evnt(25753,5644,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5645,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5645,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5646,"ide_methods.bas");}while(r); S_41744:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,5647,"ide_methods.bas");if(r)goto S_41744;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_OLDCX; if(!qbevent)break;evnt(25753,5648,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_OLDCY; if(!qbevent)break;evnt(25753,5648,"ide_methods.bas");}while(r); S_41747:; if ((*_FUNC_IDE2_LONG_CHANGED)||new_error){ if(qbevent){evnt(25753,5649,"ide_methods.bas");if(r)goto S_41747;} do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,5650,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5651,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,5651,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5651,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5652,"ide_methods.bas");}while(r); do{ SUB_IDECHANGED(_FUNC_IDE2_LONG_CHANGED); if(!qbevent)break;evnt(25753,5653,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5655,"ide_methods.bas");}while(r); } S_41757:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,5657,"ide_methods.bas");if(r)goto S_41757;} do{ qbs_set(_FUNC_IDE2_STRING_L,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5658,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5659,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5660,"ide_methods.bas");}while(r); S_41761:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_L->len>=*__LONG_IDESELECTX1)))||new_error){ if(qbevent){evnt(25753,5661,"ide_methods.bas");if(r)goto S_41761;} 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(25753,5662,"ide_methods.bas");}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(25753,5664,"ide_methods.bas");}while(r); } do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDE2_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5666,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_CHANGED=*_FUNC_IDE2_LONG_CHANGED+ 1 ; if(!qbevent)break;evnt(25753,5667,"ide_methods.bas");}while(r); S_41768:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,5668,"ide_methods.bas");if(r)goto S_41768;} do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_ucase(_FUNC_IDE2_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5668,"ide_methods.bas");}while(r); } S_41771:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,5670,"ide_methods.bas");if(r)goto S_41771;} S_41772:; if (((-(*_FUNC_IDE2_LONG_X<=*_FUNC_IDE2_LONG_STARTX))&(-(*_FUNC_IDE2_LONG_Y==*_FUNC_IDE2_LONG_START)))||new_error){ if(qbevent){evnt(25753,5671,"ide_methods.bas");if(r)goto S_41772;} 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(25753,5671,"ide_methods.bas");}while(r); } }else{ S_41776:; 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(25753,5673,"ide_methods.bas");if(r)goto S_41776;} 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(25753,5673,"ide_methods.bas");}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(25753,5674,"ide_methods.bas");}while(r); } }else{ } S_41783:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,5680,"ide_methods.bas");if(r)goto S_41783;} do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X- 1 ; if(!qbevent)break;evnt(25753,5680,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_X1=*_FUNC_IDE2_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,5680,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDAGAIN2; if(!qbevent)break;evnt(25753,5681,"ide_methods.bas");}while(r); } S_41790:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,5684,"ide_methods.bas");if(r)goto S_41790;} do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y- 1 ; if(!qbevent)break;evnt(25753,5685,"ide_methods.bas");}while(r); S_41792:; if (((-(*_FUNC_IDE2_LONG_Y==(*_FUNC_IDE2_LONG_START- 1 )))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(25753,5686,"ide_methods.bas");if(r)goto S_41792;} do{ goto LABEL_FINISHEDCHANGE; if(!qbevent)break;evnt(25753,5687,"ide_methods.bas");}while(r); } S_41795:; if ((-(*_FUNC_IDE2_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(25753,5689,"ide_methods.bas");if(r)goto S_41795;} do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEN; if(!qbevent)break;evnt(25753,5689,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(25753,5689,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(25753,5690,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDE2_LONG_Y=*_FUNC_IDE2_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,5692,"ide_methods.bas");}while(r); S_41802:; if (((-(*_FUNC_IDE2_LONG_Y==(*_FUNC_IDE2_LONG_START+ 1 )))&(-(*_FUNC_IDE2_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(25753,5693,"ide_methods.bas");if(r)goto S_41802;} do{ goto LABEL_FINISHEDCHANGE; if(!qbevent)break;evnt(25753,5694,"ide_methods.bas");}while(r); } S_41805:; if ((-(*_FUNC_IDE2_LONG_Y>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,5696,"ide_methods.bas");if(r)goto S_41805;} do{ *_FUNC_IDE2_LONG_Y= 1 ; if(!qbevent)break;evnt(25753,5696,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(25753,5696,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(25753,5697,"ide_methods.bas");}while(r); } LABEL_FINISHEDCHANGE:; if(qbevent){evnt(25753,5702,"ide_methods.bas");r=0;} do{ *__LONG_IDECX=*_FUNC_IDE2_LONG_OLDCX; if(!qbevent)break;evnt(25753,5703,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_FUNC_IDE2_LONG_OLDCY; if(!qbevent)break;evnt(25753,5703,"ide_methods.bas");}while(r); S_41813:; if ((*_FUNC_IDE2_LONG_CHANGED)||new_error){ if(qbevent){evnt(25753,5704,"ide_methods.bas");if(r)goto S_41813;} do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,5705,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5706,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,5706,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5706,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5707,"ide_methods.bas");}while(r); do{ SUB_IDECHANGED(_FUNC_IDE2_LONG_CHANGED); if(!qbevent)break;evnt(25753,5708,"ide_methods.bas");}while(r); S_41820:; }else{ if (*_FUNC_IDE2_LONG_FOUND){ if(qbevent){evnt(25753,5709,"ide_methods.bas");if(r)goto S_41820;} do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,5710,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5711,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 1 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,5711,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5711,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5712,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Search complete",15),qbs_new_txt_len("No changes made.",16),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5713,"ide_methods.bas");}while(r); }else{ do{ SUB_IDENOMATCH(&(pass4476= -1 )); if(!qbevent)break;evnt(25753,5715,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5717,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5717,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5718,"ide_methods.bas");}while(r); } S_41834:; 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("Clear Search #History...",24))))||new_error){ if(qbevent){evnt(25753,5721,"ide_methods.bas");if(r)goto S_41834;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5722,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECLEARHISTORY(qbs_new_txt_len("SEARCH",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5723,"ide_methods.bas");}while(r); S_41837:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,5724,"ide_methods.bas");if(r)goto S_41837;} do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,5725,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\searched.bin",28), 4 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5726,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,5726,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5727,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5729,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5729,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5730,"ide_methods.bas");}while(r); } S_41847:; 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(25753,5733,"ide_methods.bas");if(r)goto S_41847;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5734,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5734,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMF3; if(!qbevent)break;evnt(25753,5735,"ide_methods.bas");}while(r); } S_41852:; 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(25753,5738,"ide_methods.bas");if(r)goto S_41852;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5739,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5739,"ide_methods.bas");}while(r); S_41855:; if (((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_IDESELECT== 1 )))||new_error){ if(qbevent){evnt(25753,5740,"ide_methods.bas");if(r)goto S_41855;} do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5741,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5742,"ide_methods.bas");}while(r); do{ SUB_DELSELECT(); if(!qbevent)break;evnt(25753,5743,"ide_methods.bas");}while(r); S_41859:; }else{ if (-(*__LONG_IDESYSTEM== 2 )){ if(qbevent){evnt(25753,5744,"ide_methods.bas");if(r)goto S_41859;} do{ goto LABEL_DELETESELECTIONSEARCHFIELD; if(!qbevent)break;evnt(25753,5745,"ide_methods.bas");}while(r); } } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5747,"ide_methods.bas");}while(r); } S_41864:; 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(25753,5750,"ide_methods.bas");if(r)goto S_41864;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5751,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5751,"ide_methods.bas");}while(r); S_41867:; if ((-(*__LONG_IDESYSTEM== 1 ))||new_error){ if(qbevent){evnt(25753,5752,"ide_methods.bas");if(r)goto S_41867;} do{ goto LABEL_IDEMPASTE; if(!qbevent)break;evnt(25753,5752,"ide_methods.bas");}while(r); } S_41870:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,5753,"ide_methods.bas");if(r)goto S_41870;} do{ goto LABEL_PASTEINTOSEARCHFIELD; if(!qbevent)break;evnt(25753,5753,"ide_methods.bas");}while(r); } } S_41874:; 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(25753,5756,"ide_methods.bas");if(r)goto S_41874;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5757,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5757,"ide_methods.bas");}while(r); S_41877:; if (((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_IDESELECT== 1 )))||new_error){ if(qbevent){evnt(25753,5758,"ide_methods.bas");if(r)goto S_41877;} do{ goto LABEL_COPY2CLIP; if(!qbevent)break;evnt(25753,5758,"ide_methods.bas");}while(r); } S_41880:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,5759,"ide_methods.bas");if(r)goto S_41880;} do{ goto LABEL_COPYSEARCHTERM2CLIP; if(!qbevent)break;evnt(25753,5759,"ide_methods.bas");}while(r); } S_41883:; if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(25753,5760,"ide_methods.bas");if(r)goto S_41883;} do{ goto LABEL_COPYHELP2CLIP; if(!qbevent)break;evnt(25753,5760,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5761,"ide_methods.bas");}while(r); } S_41888:; 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(25753,5764,"ide_methods.bas");if(r)goto S_41888;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5765,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5765,"ide_methods.bas");}while(r); S_41891:; if (((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_IDESELECT== 1 )))||new_error){ if(qbevent){evnt(25753,5766,"ide_methods.bas");if(r)goto S_41891;} 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(25753,5767,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMCUT; if(!qbevent)break;evnt(25753,5768,"ide_methods.bas");}while(r); S_41894:; }else{ if (-(*__LONG_IDESYSTEM== 2 )){ if(qbevent){evnt(25753,5769,"ide_methods.bas");if(r)goto S_41894;} do{ goto LABEL_CUTTOCLIPBOARDSEARCHFIELD; if(!qbevent)break;evnt(25753,5770,"ide_methods.bas");}while(r); } } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5772,"ide_methods.bas");}while(r); } S_41899:; 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(25753,5775,"ide_methods.bas");if(r)goto S_41899;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5776,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5776,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMUNDO; if(!qbevent)break;evnt(25753,5777,"ide_methods.bas");}while(r); } S_41904:; 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(25753,5780,"ide_methods.bas");if(r)goto S_41904;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5781,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5781,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMREDO; if(!qbevent)break;evnt(25753,5782,"ide_methods.bas");}while(r); } S_41909:; 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(25753,5786,"ide_methods.bas");if(r)goto S_41909;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5787,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5787,"ide_methods.bas");}while(r); S_41912:; if ((-(*__LONG_IDESYSTEM== 1 ))||new_error){ if(qbevent){evnt(25753,5788,"ide_methods.bas");if(r)goto S_41912;} do{ goto LABEL_IDEMSELECTALL; if(!qbevent)break;evnt(25753,5788,"ide_methods.bas");}while(r); } S_41915:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,5789,"ide_methods.bas");if(r)goto S_41915;} do{ goto LABEL_SELECTALLINSEARCHFIELD; if(!qbevent)break;evnt(25753,5789,"ide_methods.bas");}while(r); } S_41918:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,5790,"ide_methods.bas");if(r)goto S_41918;} do{ goto LABEL_SELECTALLINHELP; if(!qbevent)break;evnt(25753,5790,"ide_methods.bas");}while(r); } } S_41922:; 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("Clo#se Help ESC",16))))||new_error){ if(qbevent){evnt(25753,5793,"ide_methods.bas");if(r)goto S_41922;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5794,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5794,"ide_methods.bas");}while(r); do{ goto LABEL_CLOSEHELP; if(!qbevent)break;evnt(25753,5795,"ide_methods.bas");}while(r); } S_41927:; 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(25753,5798,"ide_methods.bas");if(r)goto S_41927;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5799,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5799,"ide_methods.bas");}while(r); do{ *__LONG_STARTPAUSED= 0 ; if(!qbevent)break;evnt(25753,5800,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMRUN; if(!qbevent)break;evnt(25753,5801,"ide_methods.bas");}while(r); } S_41933:; 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("Run only (No exe)",17))))||new_error){ if(qbevent){evnt(25753,5804,"ide_methods.bas");if(r)goto S_41933;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5805,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5805,"ide_methods.bas");}while(r); do{ *__INTEGER_NOEXESAVED= -1 ; if(!qbevent)break;evnt(25753,5806,"ide_methods.bas");}while(r); do{ *__LONG_STARTPAUSED= 0 ; if(!qbevent)break;evnt(25753,5807,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMRUN; if(!qbevent)break;evnt(25753,5808,"ide_methods.bas");}while(r); } S_41940:; 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("Modify #COMMAND$...",19))))||new_error){ if(qbevent){evnt(25753,5813,"ide_methods.bas");if(r)goto S_41940;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5814,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_MODIFYCOMMAND,qbs_add(qbs_new_txt_len(" ",1),FUNC_IDEINPUTBOX(qbs_new_txt_len("Modify COMMAND$",15),qbs_new_txt_len("#Enter text for COMMAND$",24),qbs__trim(__STRING_MODIFYCOMMAND),qbs_new_txt_len("",0),&(pass4477= 60 ),&(pass4478= 0 ),&(pass4479= 0 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5815,"ide_methods.bas");}while(r); S_41943:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs__trim(__STRING_MODIFYCOMMAND),qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,5816,"ide_methods.bas");if(r)goto S_41943;} do{ qbs_set(__STRING_MODIFYCOMMAND,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5816,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5818,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5818,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5819,"ide_methods.bas");}while(r); } S_41950:; 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(25753,5822,"ide_methods.bas");if(r)goto S_41950;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5823,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5823,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMEXE; if(!qbevent)break;evnt(25753,5824,"ide_methods.bas");}while(r); } S_41955:; 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 #Paused F7 or F8",23))))||new_error){ if(qbevent){evnt(25753,5827,"ide_methods.bas");if(r)goto S_41955;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5828,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5828,"ide_methods.bas");}while(r); LABEL_STARTPAUSEDMENUHANDLER:; if(qbevent){evnt(25753,5829,"ide_methods.bas");r=0;} S_41958:; if ((-(*__LONG_VWATCHON== 0 ))||new_error){ if(qbevent){evnt(25753,5830,"ide_methods.bas");if(r)goto S_41958;} S_41959:; if ((-(*__BYTE_AUTOADDDEBUGCOMMAND== 0 ))||new_error){ if(qbevent){evnt(25753,5831,"ide_methods.bas");if(r)goto S_41959;} do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5832,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4480= 2 )); if(!qbevent)break;evnt(25753,5833,"ide_methods.bas");}while(r); do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,5834,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,5835,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 2 ; if(!qbevent)break;evnt(25753,5836,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass4481=*_FUNC_IDE2_LONG_X),&(pass4482=*_FUNC_IDE2_LONG_Y),&(pass4483=*_FUNC_IDE2_LONG_X),qbs_new_txt_len("$DEBUG metacommand is required to start paused.",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5837,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5838,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5839,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Start Paused",12),qbs_new_txt_len("Insert $DEBUG metacommand?",26),qbs_new_txt_len("#Yes;#No;#Don't show this again",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5841,"ide_methods.bas");}while(r); S_41970:; if ((-(*_FUNC_IDE2_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,5842,"ide_methods.bas");if(r)goto S_41970;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5843,"ide_methods.bas");}while(r); do{ SUB_IDEINSLINE(&(pass4484= 1 ),FUNC_SCASE(qbs_new_txt_len("$Debug",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5844,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,5845,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5846,"ide_methods.bas");}while(r); do{ *__LONG_STARTPAUSED= -1 ; if(!qbevent)break;evnt(25753,5847,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= -1 ; if(!qbevent)break;evnt(25753,5848,"ide_methods.bas");}while(r); do{ goto LABEL_SPECIALCHAR; if(!qbevent)break;evnt(25753,5849,"ide_methods.bas");}while(r); S_41978:; }else{ if (-(*_FUNC_IDE2_LONG_RESULT== 3 )){ if(qbevent){evnt(25753,5850,"ide_methods.bas");if(r)goto S_41978;} do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Debug",5),qbs_new_txt_len("You can reenable the 'Auto-add $Debug Metacommand' feature\\nin the Debug menu.",78),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5851,"ide_methods.bas");}while(r); do{ *__BYTE_AUTOADDDEBUGCOMMAND= 0 ; if(!qbevent)break;evnt(25753,5852,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5853,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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("Auto-add $#Debug Metacommand",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5854,"ide_methods.bas");}while(r); } } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5856,"ide_methods.bas");}while(r); }else{ do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,5858,"ide_methods.bas");}while(r); do{ *__LONG_STARTPAUSED= -1 ; if(!qbevent)break;evnt(25753,5859,"ide_methods.bas");}while(r); do{ goto LABEL_IDEMRUN; if(!qbevent)break;evnt(25753,5860,"ide_methods.bas");}while(r); } } S_41991:; 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("#Watch List... F4",18))))||new_error){ if(qbevent){evnt(25753,5864,"ide_methods.bas");if(r)goto S_41991;} S_41992:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,5865,"ide_methods.bas");if(r)goto S_41992;} do{ *__LONG_IDEDEBUGMODE= 16 ; if(!qbevent)break;evnt(25753,5866,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5867,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5869,"ide_methods.bas");}while(r); LABEL_SHOWWATCHLIST:; if(qbevent){evnt(25753,5870,"ide_methods.bas");r=0;} S_41997:; if ((-(*__LONG_VWATCHON== 0 ))||new_error){ if(qbevent){evnt(25753,5871,"ide_methods.bas");if(r)goto S_41997;} S_41998:; if ((-(*__BYTE_AUTOADDDEBUGCOMMAND== 0 ))||new_error){ if(qbevent){evnt(25753,5872,"ide_methods.bas");if(r)goto S_41998;} do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5873,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4485= 2 )); if(!qbevent)break;evnt(25753,5874,"ide_methods.bas");}while(r); do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,5875,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,5876,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 2 ; if(!qbevent)break;evnt(25753,5877,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass4486=*_FUNC_IDE2_LONG_X),&(pass4487=*_FUNC_IDE2_LONG_Y),&(pass4488=*_FUNC_IDE2_LONG_X),qbs_new_txt_len("$DEBUG metacommand is required for Watch List functionality.",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5878,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5879,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5880,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Watch List",10),qbs_new_txt_len("Insert $DEBUG metacommand?",26),qbs_new_txt_len("#Yes;#No;#Don't show this again",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5882,"ide_methods.bas");}while(r); S_42009:; if ((-(*_FUNC_IDE2_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,5883,"ide_methods.bas");if(r)goto S_42009;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5884,"ide_methods.bas");}while(r); do{ SUB_IDEINSLINE(&(pass4489= 1 ),FUNC_SCASE(qbs_new_txt_len("$Debug",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5885,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,5886,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5887,"ide_methods.bas");}while(r); S_42014:; }else{ if (-(*_FUNC_IDE2_LONG_RESULT== 3 )){ if(qbevent){evnt(25753,5888,"ide_methods.bas");if(r)goto S_42014;} do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Debug",5),qbs_new_txt_len("You can reenable the 'Auto-add $Debug Metacommand' feature\\nin the Debug menu.",78),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5889,"ide_methods.bas");}while(r); do{ *__BYTE_AUTOADDDEBUGCOMMAND= 0 ; if(!qbevent)break;evnt(25753,5890,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5891,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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("Auto-add $#Debug Metacommand",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5892,"ide_methods.bas");}while(r); } } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5894,"ide_methods.bas");}while(r); }else{ S_42022:; if ((-(*__LONG_IDECOMPILING== 1 ))||new_error){ if(qbevent){evnt(25753,5896,"ide_methods.bas");if(r)goto S_42022;} do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5897,"ide_methods.bas");}while(r); do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,5898,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,5899,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 2 ; if(!qbevent)break;evnt(25753,5900,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass4490=*_FUNC_IDE2_LONG_X),&(pass4491=*_FUNC_IDE2_LONG_Y),&(pass4492=*_FUNC_IDE2_LONG_X),qbs_new_txt_len("Variable List will be available after syntax checking is done...",64)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5901,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_WAITINGFORVARLIST= 1 ; if(!qbevent)break;evnt(25753,5902,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5903,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5904,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_RESULT,FUNC_IDEVARIABLEWATCHBOX(qbs_new_txt_len("",0),qbs_new_txt_len("",0),&(pass4493= 0 ),&(pass4494= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5906,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5907,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5907,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5908,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5911,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5911,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5912,"ide_methods.bas");}while(r); } } S_42043:; 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("Call #Stack... F12",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("Call Stack... F12",18)))))||new_error){ if(qbevent){evnt(25753,5916,"ide_methods.bas");if(r)goto S_42043;} S_42044:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,5917,"ide_methods.bas");if(r)goto S_42044;} do{ *__LONG_IDEDEBUGMODE= 3 ; if(!qbevent)break;evnt(25753,5918,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5919,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,5921,"ide_methods.bas");}while(r); LABEL_SHOWCALLSTACKDIALOG:; if(qbevent){evnt(25753,5922,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_LONG_RETVAL=FUNC_IDECALLSTACKBOX(); if(!qbevent)break;evnt(25753,5923,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5925,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5925,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5926,"ide_methods.bas");}while(r); } } S_42055:; 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("#Continue F5",13))))||new_error){ if(qbevent){evnt(25753,5930,"ide_methods.bas");if(r)goto S_42055;} do{ *__LONG_IDEDEBUGMODE= 4 ; if(!qbevent)break;evnt(25753,5931,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5932,"ide_methods.bas");}while(r); } S_42059:; 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("Step O#ut F6",13))))||new_error){ if(qbevent){evnt(25753,5935,"ide_methods.bas");if(r)goto S_42059;} do{ *__LONG_IDEDEBUGMODE= 5 ; if(!qbevent)break;evnt(25753,5936,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5937,"ide_methods.bas");}while(r); } S_42063:; 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("Ste#p Into F7",14))))||new_error){ if(qbevent){evnt(25753,5940,"ide_methods.bas");if(r)goto S_42063;} do{ *__LONG_IDEDEBUGMODE= 7 ; if(!qbevent)break;evnt(25753,5941,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5942,"ide_methods.bas");}while(r); } S_42067:; 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("Step #Over F8",14))))||new_error){ if(qbevent){evnt(25753,5945,"ide_methods.bas");if(r)goto S_42067;} do{ *__LONG_IDEDEBUGMODE= 6 ; if(!qbevent)break;evnt(25753,5946,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5947,"ide_methods.bas");}while(r); } S_42071:; 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("#Run To This Line Ctrl+Shift+G",31))))||new_error){ if(qbevent){evnt(25753,5950,"ide_methods.bas");if(r)goto S_42071;} do{ *__LONG_IDEDEBUGMODE= 8 ; if(!qbevent)break;evnt(25753,5951,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5952,"ide_methods.bas");}while(r); } S_42075:; 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("#Exit $DEBUG mode ESC",22))))||new_error){ if(qbevent){evnt(25753,5955,"ide_methods.bas");if(r)goto S_42075;} do{ *__LONG_IDEDEBUGMODE= 9 ; if(!qbevent)break;evnt(25753,5956,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5957,"ide_methods.bas");}while(r); } S_42079:; 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("Toggle #Breakpoint F9",22))))||new_error){ if(qbevent){evnt(25753,5960,"ide_methods.bas");if(r)goto S_42079;} S_42080:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,5961,"ide_methods.bas");if(r)goto S_42080;} do{ *__LONG_IDEDEBUGMODE= 10 ; if(!qbevent)break;evnt(25753,5962,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,5963,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5965,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5965,"ide_methods.bas");}while(r); LABEL_TOGGLEBREAKPOINT:; if(qbevent){evnt(25753,5966,"ide_methods.bas");r=0;} S_42086:; if ((-(*__LONG_VWATCHON== 0 ))||new_error){ if(qbevent){evnt(25753,5967,"ide_methods.bas");if(r)goto S_42086;} S_42087:; if ((-(*__BYTE_AUTOADDDEBUGCOMMAND== 0 ))||new_error){ if(qbevent){evnt(25753,5968,"ide_methods.bas");if(r)goto S_42087;} do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,5969,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4495= 2 )); if(!qbevent)break;evnt(25753,5970,"ide_methods.bas");}while(r); do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,5971,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,5972,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 2 ; if(!qbevent)break;evnt(25753,5973,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass4496=*_FUNC_IDE2_LONG_X),&(pass4497=*_FUNC_IDE2_LONG_Y),&(pass4498=*_FUNC_IDE2_LONG_X),qbs_new_txt_len("$DEBUG metacommand is required to enable breakpoints.",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5974,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,5975,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5976,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Toggle Breakpoint",17),qbs_new_txt_len("Insert $DEBUG metacommand?",26),qbs_new_txt_len("#Yes;#No;#Don't show this again",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5978,"ide_methods.bas");}while(r); S_42098:; if ((-(*_FUNC_IDE2_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,5979,"ide_methods.bas");if(r)goto S_42098;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,5980,"ide_methods.bas");}while(r); do{ SUB_IDEINSLINE(&(pass4499= 1 ),FUNC_SCASE(qbs_new_txt_len("$Debug",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5981,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,5982,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,5983,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]=~(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]); if(!qbevent)break;evnt(25753,5984,"ide_methods.bas");}while(r); S_42104:; }else{ if (-(*_FUNC_IDE2_LONG_RESULT== 3 )){ if(qbevent){evnt(25753,5985,"ide_methods.bas");if(r)goto S_42104;} do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Debug",5),qbs_new_txt_len("You can reenable the 'Auto-add $Debug Metacommand' feature\\nin the Debug menu.",78),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5986,"ide_methods.bas");}while(r); do{ *__BYTE_AUTOADDDEBUGCOMMAND= 0 ; if(!qbevent)break;evnt(25753,5987,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5988,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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("Auto-add $#Debug Metacommand",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5989,"ide_methods.bas");}while(r); } } }else{ do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]=~(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]); if(!qbevent)break;evnt(25753,5992,"ide_methods.bas");}while(r); } S_42113:; if ((((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])])||new_error){ if(qbevent){evnt(25753,5994,"ide_methods.bas");if(r)goto S_42113;} do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,5994,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,5995,"ide_methods.bas");}while(r); } } S_42119:; 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("#Clear All Breakpoints F10",27)))|(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("Clear All Breakpoints F10",26)))))||new_error){ if(qbevent){evnt(25753,5999,"ide_methods.bas");if(r)goto S_42119;} S_42120:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,6000,"ide_methods.bas");if(r)goto S_42120;} do{ *__LONG_IDEDEBUGMODE= 11 ; if(!qbevent)break;evnt(25753,6001,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,6002,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6004,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6004,"ide_methods.bas");}while(r); LABEL_CLEARALLBREAKPOINTS:; if(qbevent){evnt(25753,6005,"ide_methods.bas");r=0;} do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(25753,6006,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6007,"ide_methods.bas");}while(r); } } S_42130:; 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("Toggle #Skip Line Ctrl+P",25))))||new_error){ if(qbevent){evnt(25753,6011,"ide_methods.bas");if(r)goto S_42130;} S_42131:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,6012,"ide_methods.bas");if(r)goto S_42131;} do{ *__LONG_IDEDEBUGMODE= 12 ; if(!qbevent)break;evnt(25753,6013,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,6014,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6016,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6016,"ide_methods.bas");}while(r); LABEL_TOGGLESKIPLINE:; if(qbevent){evnt(25753,6017,"ide_methods.bas");r=0;} S_42137:; if ((-(*__LONG_VWATCHON== 0 ))||new_error){ if(qbevent){evnt(25753,6018,"ide_methods.bas");if(r)goto S_42137;} S_42138:; if ((-(*__BYTE_AUTOADDDEBUGCOMMAND== 0 ))||new_error){ if(qbevent){evnt(25753,6019,"ide_methods.bas");if(r)goto S_42138;} do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6020,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4500= 2 )); if(!qbevent)break;evnt(25753,6021,"ide_methods.bas");}while(r); do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6022,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_X= 2 ; if(!qbevent)break;evnt(25753,6023,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Y=*__LONG_IDEWY- 2 ; if(!qbevent)break;evnt(25753,6024,"ide_methods.bas");}while(r); do{ SUB_PRINTWRAPSTATUS(&(pass4501=*_FUNC_IDE2_LONG_X),&(pass4502=*_FUNC_IDE2_LONG_Y),&(pass4503=*_FUNC_IDE2_LONG_X),qbs_new_txt_len("$DEBUG metacommand is required to enable line skipping.",55)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6025,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6026,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6027,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Toggle Skip Line",16),qbs_new_txt_len("Insert $DEBUG metacommand?",26),qbs_new_txt_len("#Yes;#No;#Don't show this again",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6029,"ide_methods.bas");}while(r); S_42149:; if ((-(*_FUNC_IDE2_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,6030,"ide_methods.bas");if(r)goto S_42149;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,6031,"ide_methods.bas");}while(r); do{ SUB_IDEINSLINE(&(pass4504= 1 ),FUNC_SCASE(qbs_new_txt_len("$Debug",6))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6032,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,6033,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,6034,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]=~(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]); if(!qbevent)break;evnt(25753,6035,"ide_methods.bas");}while(r); S_42155:; }else{ if (-(*_FUNC_IDE2_LONG_RESULT== 3 )){ if(qbevent){evnt(25753,6036,"ide_methods.bas");if(r)goto S_42155;} do{ *_FUNC_IDE2_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Debug",5),qbs_new_txt_len("You can reenable the 'Auto-add $Debug Metacommand' feature\\nin the Debug menu.",78),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6037,"ide_methods.bas");}while(r); do{ *__BYTE_AUTOADDDEBUGCOMMAND= 0 ; if(!qbevent)break;evnt(25753,6038,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("AutoAddDebugCommand",19),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6039,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_DEBUGMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_DEBUGMENUAUTOADDCOMMAND)-__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("Auto-add $#Debug Metacommand",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6040,"ide_methods.bas");}while(r); } } }else{ do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]=~(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]); if(!qbevent)break;evnt(25753,6043,"ide_methods.bas");}while(r); } S_42164:; if ((((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])])||new_error){ if(qbevent){evnt(25753,6045,"ide_methods.bas");if(r)goto S_42164;} do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,6045,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6046,"ide_methods.bas");}while(r); } } S_42170:; 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("#Unskip All Lines Ctrl+F10",27))))||new_error){ if(qbevent){evnt(25753,6050,"ide_methods.bas");if(r)goto S_42170;} S_42171:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,6051,"ide_methods.bas");if(r)goto S_42171;} do{ *__LONG_IDEDEBUGMODE= 15 ; if(!qbevent)break;evnt(25753,6052,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,6053,"ide_methods.bas");}while(r); }else{ do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6055,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6055,"ide_methods.bas");}while(r); LABEL_UNSKIPALLLINES:; if(qbevent){evnt(25753,6056,"ide_methods.bas");r=0;} do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(25753,6057,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6058,"ide_methods.bas");}while(r); } } S_42181:; 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("Set Base #TCP/IP Port Number...",31))))||new_error){ if(qbevent){evnt(25753,6062,"ide_methods.bas");if(r)goto S_42181;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6063,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_BKPIDEBASETCPPORT=*__LONG_IDEBASETCPPORT; if(!qbevent)break;evnt(25753,6064,"ide_methods.bas");}while(r); do{ SUB_IDESETTCPPORTBOX(); if(!qbevent)break;evnt(25753,6065,"ide_methods.bas");}while(r); S_42185:; if ((-(*_FUNC_IDE2_LONG_BKPIDEBASETCPPORT!=*__LONG_IDEBASETCPPORT))||new_error){ if(qbevent){evnt(25753,6066,"ide_methods.bas");if(r)goto S_42185;} S_42186:; if ((-(*__LONG_HOST!= 0 ))||new_error){ if(qbevent){evnt(25753,6067,"ide_methods.bas");if(r)goto S_42186;} do{ sub_close(*__LONG_HOST,1); if(!qbevent)break;evnt(25753,6067,"ide_methods.bas");}while(r); do{ *__LONG_HOST= 0 ; if(!qbevent)break;evnt(25753,6067,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_BYTE_ATTEMPTTOHOST= 0 ; if(!qbevent)break;evnt(25753,6068,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_CHANGINGTCPPORT= -1 ; if(!qbevent)break;evnt(25753,6069,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,6070,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6072,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6072,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6073,"ide_methods.bas");}while(r); } S_42198:; 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("Set #Next Line Ctrl+G",22))))||new_error){ if(qbevent){evnt(25753,6076,"ide_methods.bas");if(r)goto S_42198;} do{ *__LONG_IDEDEBUGMODE= 13 ; if(!qbevent)break;evnt(25753,6077,"ide_methods.bas");}while(r); do{ goto LABEL_ENTERDEBUGMODE; if(!qbevent)break;evnt(25753,6078,"ide_methods.bas");}while(r); } S_42202:; 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(25753,6081,"ide_methods.bas");if(r)goto S_42202;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6082,"ide_methods.bas");}while(r); LABEL_QUICKEXIT:; if(qbevent){evnt(25753,6083,"ide_methods.bas");r=0;} S_42204:; if ((-(*__LONG_IDEUNSAVED== 1 ))||new_error){ if(qbevent){evnt(25753,6084,"ide_methods.bas");if(r)goto S_42204;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6085,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6086,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6086,"ide_methods.bas");}while(r); S_42208:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6087,"ide_methods.bas");if(r)goto S_42208;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6087,"ide_methods.bas");}while(r); } S_42211:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,6088,"ide_methods.bas");if(r)goto S_42211;} S_42212:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6089,"ide_methods.bas");if(r)goto S_42212;} do{ qbs_set(_FUNC_IDE2_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6090,"ide_methods.bas");}while(r); S_42214:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6091,"ide_methods.bas");if(r)goto S_42214;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),&(pass4505= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6092,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_add(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len(".bas",4)),&(pass4506= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6094,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6096,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6096,"ide_methods.bas");}while(r); S_42221:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,6097,"ide_methods.bas");if(r)goto S_42221;} do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,6097,"ide_methods.bas");}while(r); } S_42224:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6098,"ide_methods.bas");if(r)goto S_42224;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6098,"ide_methods.bas");}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(25753,6100,"ide_methods.bas");}while(r); } } } do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,6105,"ide_methods.bas");}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(25753,6105,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,6105,"ide_methods.bas");}while(r); do{ if (sub_gl_called) error(271); close_program=1; end(); if(!qbevent)break;evnt(25753,6106,"ide_methods.bas");}while(r); } S_42237:; 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 Ctrl+N",12))))||new_error){ if(qbevent){evnt(25753,6109,"ide_methods.bas");if(r)goto S_42237;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6110,"ide_methods.bas");}while(r); LABEL_CTRLNEW:; if(qbevent){evnt(25753,6111,"ide_methods.bas");r=0;} S_42239:; if ((-(*__LONG_IDEUNSAVED== 1 ))||new_error){ if(qbevent){evnt(25753,6112,"ide_methods.bas");if(r)goto S_42239;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6113,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6114,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6114,"ide_methods.bas");}while(r); S_42243:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6115,"ide_methods.bas");if(r)goto S_42243;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6115,"ide_methods.bas");}while(r); } S_42246:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,6116,"ide_methods.bas");if(r)goto S_42246;} S_42247:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6117,"ide_methods.bas");if(r)goto S_42247;} do{ qbs_set(_FUNC_IDE2_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6118,"ide_methods.bas");}while(r); S_42249:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6119,"ide_methods.bas");if(r)goto S_42249;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),&(pass4507= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6120,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_add(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len(".bas",4)),&(pass4508= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6122,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6124,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6124,"ide_methods.bas");}while(r); S_42256:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,6125,"ide_methods.bas");if(r)goto S_42256;} do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,6125,"ide_methods.bas");}while(r); } S_42259:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6126,"ide_methods.bas");if(r)goto S_42259;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6126,"ide_methods.bas");}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(25753,6128,"ide_methods.bas");}while(r); } } } do{ *__LONG_IDEUNSAVED= -1 ; if(!qbevent)break;evnt(25753,6132,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=( 1 )-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(25753,6134,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=( 1 )-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(25753,6135,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6136,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6137,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); } } __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]) error(257); __ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,6137,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6138,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6139,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6140,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= 0 ; if(!qbevent)break;evnt(25753,6140,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6141,"ide_methods.bas");}while(r); do{ *__LONG_IDEL= 1 ; if(!qbevent)break;evnt(25753,6141,"ide_methods.bas");}while(r); do{ *__LONG_IDELI= 1 ; if(!qbevent)break;evnt(25753,6141,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(25753,6141,"ide_methods.bas");}while(r); do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(25753,6141,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,6142,"ide_methods.bas");}while(r); do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(25753,6143,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,6144,"ide_methods.bas");}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,6145,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,6146,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPROGNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6147,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*__LONG_CUSTOMKEYWORDSLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6148,"ide_methods.bas");}while(r); do{ *__LONG_QUICKNAVTOTAL= 0 ; if(!qbevent)break;evnt(25753,6149,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_MODIFYCOMMAND,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6150,"ide_methods.bas");}while(r); do{ sub__title(__STRING_WINDOWTITLE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6151,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,6152,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,6153,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,6154,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOBASE= 0 ; if(!qbevent)break;evnt(25753,6155,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6156,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_BYTE_ATTEMPTTOLOADRECENT= 0 ; if(!qbevent)break;evnt(25753,6159,"ide_methods.bas");}while(r); S_42299:; fornext_value4510= 1 ; fornext_finalvalue4510=func_ubound(__ARRAY_STRING_IDERECENTLINK, 1 ,2); fornext_step4510= 1 ; if (fornext_step4510<0) fornext_step_negative4510=1; else fornext_step_negative4510=0; if (new_error) goto fornext_error4510; goto fornext_entrylabel4510; while(1){ fornext_value4510=fornext_step4510+(*_FUNC_IDE2_LONG_ML); fornext_entrylabel4510: *_FUNC_IDE2_LONG_ML=fornext_value4510; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4510){ if (fornext_value4510fornext_finalvalue4510) break; } fornext_error4510:; if(qbevent){evnt(25753,6160,"ide_methods.bas");if(r)goto S_42299;} S_42300:; 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(25753,6161,"ide_methods.bas");if(r)goto S_42300;} S_42301:; 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(25753,6162,"ide_methods.bas");if(r)goto S_42301;} 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(25753,6163,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_ATTEMPTTOLOADRECENT= -1 ; if(!qbevent)break;evnt(25753,6164,"ide_methods.bas");}while(r); do{ goto LABEL_DIRECTOPEN; if(!qbevent)break;evnt(25753,6165,"ide_methods.bas");}while(r); } } fornext_continue_4509:; } fornext_exit_4509:; S_42308:; 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(25753,6171,"ide_methods.bas");if(r)goto S_42308;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6172,"ide_methods.bas");}while(r); LABEL_IDESHOWRECENTBOX:; if(qbevent){evnt(25753,6173,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_F,FUNC_IDERECENTBOX()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6174,"ide_methods.bas");}while(r); S_42311:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_F,qbs_new_txt_len("",3))))||new_error){ if(qbevent){evnt(25753,6175,"ide_methods.bas");if(r)goto S_42311;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6176,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECLEARHISTORY(qbs_new_txt_len("FILES",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6177,"ide_methods.bas");}while(r); S_42314:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,6178,"ide_methods.bas");if(r)goto S_42314;} do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,6179,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 4 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6180,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,6180,"ide_methods.bas");}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(25753,6181,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6182,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6182,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6183,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_IDESHOWRECENTBOX; if(!qbevent)break;evnt(25753,6185,"ide_methods.bas");}while(r); } S_42325:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_F,qbs_new_txt_len("",3)))){ if(qbevent){evnt(25753,6187,"ide_methods.bas");if(r)goto S_42325;} do{ return_point[next_return_point++]=50; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLEANUPRECENTLIST; RETURN_50:; if(!qbevent)break;evnt(25753,6188,"ide_methods.bas");}while(r); do{ goto LABEL_IDESHOWRECENTBOX; if(!qbevent)break;evnt(25753,6189,"ide_methods.bas");}while(r); } } S_42329:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_F->len))||new_error){ if(qbevent){evnt(25753,6191,"ide_methods.bas");if(r)goto S_42329;} do{ qbs_set(__STRING_IDEOPENFILE,_FUNC_IDE2_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6192,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_BYTE_ATTEMPTTOLOADRECENT= -1 ; if(!qbevent)break;evnt(25753,6193,"ide_methods.bas");}while(r); do{ goto LABEL_DIRECTOPEN; if(!qbevent)break;evnt(25753,6194,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6196,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6196,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6197,"ide_methods.bas");}while(r); } S_42338:; 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("#Clear Recent...",16))))||new_error){ if(qbevent){evnt(25753,6200,"ide_methods.bas");if(r)goto S_42338;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6201,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDECLEARHISTORY(qbs_new_txt_len("FILES",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6202,"ide_methods.bas");}while(r); S_42341:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,6203,"ide_methods.bas");if(r)goto S_42341;} do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,6204,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 4 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6205,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,6205,"ide_methods.bas");}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(25753,6206,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6207,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6207,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6208,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6210,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6210,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6211,"ide_methods.bas");}while(r); } S_42354:; 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... Ctrl+O",16))))||new_error){ if(qbevent){evnt(25753,6214,"ide_methods.bas");if(r)goto S_42354;} do{ qbs_set(__STRING_IDEOPENFILE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6215,"ide_methods.bas");}while(r); LABEL_DIRECTOPEN:; if(qbevent){evnt(25753,6216,"ide_methods.bas");r=0;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6217,"ide_methods.bas");}while(r); LABEL_CTRLOPEN:; if(qbevent){evnt(25753,6218,"ide_methods.bas");r=0;} S_42357:; if ((*__LONG_IDEUNSAVED)||new_error){ if(qbevent){evnt(25753,6219,"ide_methods.bas");if(r)goto S_42357;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDESAVENOW()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6220,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6221,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6221,"ide_methods.bas");}while(r); S_42361:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6222,"ide_methods.bas");if(r)goto S_42361;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6222,"ide_methods.bas");}while(r); } S_42364:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,6223,"ide_methods.bas");if(r)goto S_42364;} S_42365:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6224,"ide_methods.bas");if(r)goto S_42365;} do{ qbs_set(_FUNC_IDE2_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6225,"ide_methods.bas");}while(r); S_42367:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6226,"ide_methods.bas");if(r)goto S_42367;} do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),&(pass4513= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6227,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_add(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len(".bas",4)),&(pass4514= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6229,"ide_methods.bas");}while(r); } S_42372:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,6231,"ide_methods.bas");if(r)goto S_42372;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6231,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6231,"ide_methods.bas");}while(r); do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,6231,"ide_methods.bas");}while(r); } S_42377:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6232,"ide_methods.bas");if(r)goto S_42377;} do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6232,"ide_methods.bas");}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(25753,6234,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6236,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6236,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDE2_STRING_R,FUNC_IDEFILEDIALOG(qbs_new_txt_len("",0),&(pass4515= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6239,"ide_methods.bas");}while(r); S_42388:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,6240,"ide_methods.bas");if(r)goto S_42388;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6240,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6240,"ide_methods.bas");}while(r); do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,6240,"ide_methods.bas");}while(r); } S_42393:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDE2_STRING_R,qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,6241,"ide_methods.bas");if(r)goto S_42393;} do{ *__LONG_IDEUNSAVED= -1 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ *__LONG_IDELAYOUTALLOW= 2 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOBASE= 0 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ *__LONG_QUICKNAVTOTAL= 0 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_MODIFYCOMMAND,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,6241,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6242,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6242,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=51; if (next_return_point>=return_points) more_return_points(); goto LABEL_REDRAWITALL; RETURN_51:; if(!qbevent)break;evnt(25753,6243,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6243,"ide_methods.bas");}while(r); } S_42408:; 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 Ctrl+S",13))))||new_error){ if(qbevent){evnt(25753,6246,"ide_methods.bas");if(r)goto S_42408;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6247,"ide_methods.bas");}while(r); S_42410:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6248,"ide_methods.bas");if(r)goto S_42410;} do{ qbs_set(_FUNC_IDE2_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6249,"ide_methods.bas");}while(r); S_42412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6250,"ide_methods.bas");if(r)goto S_42412;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),&(pass4516= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6251,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(qbs_add(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len(".bas",4)),&(pass4517= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6253,"ide_methods.bas");}while(r); } S_42417:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,6255,"ide_methods.bas");if(r)goto S_42417;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6255,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6255,"ide_methods.bas");}while(r); do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,6255,"ide_methods.bas");}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(25753,6257,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6259,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6259,"ide_methods.bas");}while(r); do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6259,"ide_methods.bas");}while(r); } S_42429:; 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(25753,6263,"ide_methods.bas");if(r)goto S_42429;} do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,6264,"ide_methods.bas");}while(r); S_42431:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6265,"ide_methods.bas");if(r)goto S_42431;} do{ qbs_set(_FUNC_IDE2_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6266,"ide_methods.bas");}while(r); S_42433:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,6267,"ide_methods.bas");if(r)goto S_42433;} do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(qbs_add(qbs_add(qbs_new_txt_len("untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),&(pass4518= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6268,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(qbs_add(_FUNC_IDE2_STRING_PROPOSEDTITLE,qbs_new_txt_len(".bas",4)),&(pass4519= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6270,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,FUNC_IDEFILEDIALOG(__STRING_IDEPROGNAME,&(pass4520= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6273,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,6275,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6275,"ide_methods.bas");}while(r); S_42443:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,6276,"ide_methods.bas");if(r)goto S_42443;} do{ goto LABEL_IDEERRORMESSAGE; if(!qbevent)break;evnt(25753,6276,"ide_methods.bas");}while(r); } do{ goto LABEL_IDELOOP; if(!qbevent)break;evnt(25753,6277,"ide_methods.bas");}while(r); } S_42448:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(((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]])), 1 ),qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25753,6280,"ide_methods.bas");if(r)goto S_42448;} do{ goto dl_continue_4352; if(!qbevent)break;evnt(25753,6281,"ide_methods.bas");}while(r); } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6284,"ide_methods.bas");}while(r); do{ sub_cls(NULL,NULL,0); if(!qbevent)break;evnt(25753,6285,"ide_methods.bas");}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 skip4521; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip4521: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6285,"ide_methods.bas");}while(r); do{ sub_end(); if(!qbevent)break;evnt(25753,6285,"ide_methods.bas");}while(r); } do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,6289,"ide_methods.bas");}while(r); dl_continue_4352:; }while(1); dl_exit_4352:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,6294,"ide_methods.bas");}while(r); LABEL_DRAWQUICKNAV:; if(qbevent){evnt(25753,6295,"ide_methods.bas");r=0;} S_42459:; if (((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_QUICKNAVTOTAL> 0 )))||new_error){ if(qbevent){evnt(25753,6296,"ide_methods.bas");if(r)goto S_42459;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,6297,"ide_methods.bas");}while(r); do{ sub__printstring( 4 , 2 ,qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_chr( 17 )),qbs_new_txt_len(" ",1)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6298,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6300,"ide_methods.bas");}while(r); do{ sub__printstring( 4 , 2 ,func_string( 3 , 196 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6301,"ide_methods.bas");}while(r); } do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,6303,"ide_methods.bas");}while(r); LABEL_UPDATESEARCHBAR:; if(qbevent){evnt(25753,6305,"ide_methods.bas");r=0;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6306,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX-( 20 + 10 ),*__LONG_IDEWY- 4 ,func_chr( 180 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6306,"ide_methods.bas");}while(r); do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6307,"ide_methods.bas");}while(r); do{ sub__printstring( 1 +*__LONG_IDEWX-( 20 + 10 ),*__LONG_IDEWY- 4 ,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Find[",5),func_space( 20 + 1 )),func_chr( 18 )),qbs_new_txt_len("]",1)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6308,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6309,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 2 ,*__LONG_IDEWY- 4 ,func_chr( 195 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6309,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6312,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,func_string( 14 , 196 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6313,"ide_methods.bas");}while(r); do{ sub__printstring((*__LONG_IDEWX-_FUNC_IDE2_STRING_A->len)/ ((long double)( 2 )),*__LONG_IDEWY- 4 ,_FUNC_IDE2_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6314,"ide_methods.bas");}while(r); S_42476:; if ((*__LONG_IDEDEBUGMODE)||new_error){ if(qbevent){evnt(25753,6315,"ide_methods.bas");if(r)goto S_42476;} do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,6316,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len(" $DEBUG MODE ",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6317,"ide_methods.bas");}while(r); }else{ S_42480:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,6319,"ide_methods.bas");if(r)goto S_42480;} do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,6319,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6319,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len(" Status ",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6320,"ide_methods.bas");}while(r); } do{ sub__printstring((*__LONG_IDEWX-_FUNC_IDE2_STRING_A->len)/ ((long double)( 2 )),*__LONG_IDEWY- 4 ,_FUNC_IDE2_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6322,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6324,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_TX= 1 ; if(!qbevent)break;evnt(25753,6325,"ide_methods.bas");}while(r); S_42490:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDE2_STRING_A->len> 20 )))||new_error){ if(qbevent){evnt(25753,6326,"ide_methods.bas");if(r)goto S_42490;} S_42491:; if ((-(*__LONG_IDESYSTEM== 2 ))||new_error){ if(qbevent){evnt(25753,6327,"ide_methods.bas");if(r)goto S_42491;} do{ *_FUNC_IDE2_LONG_TX=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1- 20 + 1 ; if(!qbevent)break;evnt(25753,6328,"ide_methods.bas");}while(r); S_42493:; if ((-(*_FUNC_IDE2_LONG_TX< 1 ))||new_error){ if(qbevent){evnt(25753,6329,"ide_methods.bas");if(r)goto S_42493;} do{ *_FUNC_IDE2_LONG_TX= 1 ; if(!qbevent)break;evnt(25753,6329,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_A,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_TX, 20 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6330,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_left(_FUNC_IDE2_STRING_A, 20 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6332,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDE2_LONG_SX1=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__SX1; if(!qbevent)break;evnt(25753,6336,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_SX2=*_FUNC_IDE2_LONG_IDESYSTEM2__ASCII_CHR_046__V1; if(!qbevent)break;evnt(25753,6336,"ide_methods.bas");}while(r); S_42503:; if ((-(*_FUNC_IDE2_LONG_SX1>*_FUNC_IDE2_LONG_SX2))||new_error){ if(qbevent){evnt(25753,6337,"ide_methods.bas");if(r)goto S_42503;} do{ swap_32(&*_FUNC_IDE2_LONG_SX1,&*_FUNC_IDE2_LONG_SX2); if(!qbevent)break;evnt(25753,6337,"ide_methods.bas");}while(r); } do{ *_FUNC_IDE2_LONG_X=*_FUNC_IDE2_LONG_X+ 2 ; if(!qbevent)break;evnt(25753,6339,"ide_methods.bas");}while(r); S_42507:; if (((-(*_FUNC_IDE2_BYTE_IDESYSTEM2__ASCII_CHR_046__ISSEL== 0 ))|(-(*__LONG_IDESYSTEM!= 2 )))||new_error){ if(qbevent){evnt(25753,6341,"ide_methods.bas");if(r)goto S_42507;} do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6342,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX-( 20 + 8 )+ 4 ,*__LONG_IDEWY- 4 ,_FUNC_IDE2_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6343,"ide_methods.bas");}while(r); }else{ S_42511:; fornext_value4526= 1 ; fornext_finalvalue4526=_FUNC_IDE2_STRING_A->len; fornext_step4526= 1 ; if (fornext_step4526<0) fornext_step_negative4526=1; else fornext_step_negative4526=0; if (new_error) goto fornext_error4526; goto fornext_entrylabel4526; while(1){ fornext_value4526=fornext_step4526+(*_FUNC_IDE2_LONG_COLORCHAR); fornext_entrylabel4526: *_FUNC_IDE2_LONG_COLORCHAR=fornext_value4526; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4526){ if (fornext_value4526fornext_finalvalue4526) break; } fornext_error4526:; if(qbevent){evnt(25753,6345,"ide_methods.bas");if(r)goto S_42511;} S_42512:; if (((-((*_FUNC_IDE2_LONG_COLORCHAR+*_FUNC_IDE2_LONG_TX- 2 )>=*_FUNC_IDE2_LONG_SX1))&(-((*_FUNC_IDE2_LONG_COLORCHAR+*_FUNC_IDE2_LONG_TX- 2 )<*_FUNC_IDE2_LONG_SX2)))||new_error){ if(qbevent){evnt(25753,6346,"ide_methods.bas");if(r)goto S_42512;} do{ qbg_sub_color( 1 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,6346,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6346,"ide_methods.bas");}while(r); } do{ sub__printstring(*__LONG_IDEWX-( 20 + 8 )+ 4 - 1 +*_FUNC_IDE2_LONG_COLORCHAR,*__LONG_IDEWY- 4 ,func_mid(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_COLORCHAR, 1 ,1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6347,"ide_methods.bas");}while(r); fornext_continue_4525:; } fornext_exit_4525:; } do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,6350,"ide_methods.bas");}while(r); LABEL_CLEANUPRECENTLIST:; if(qbevent){evnt(25753,6352,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6353,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_LN= 0 ; if(!qbevent)break;evnt(25753,6353,"ide_methods.bas");}while(r); do{ if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST)[8])->id=(++mem_lock_id); if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&1){ tmp_long=_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]))[tmp_long]); free((void*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0])); } _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[4]= 0 ; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]=( 0 )-_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[4]+1; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[6]=1; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]=(ptrszint)malloc(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]*8); if (!_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]) error(257); _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]|=1; tmp_long=_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]; if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,6354,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,6355,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 2 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6356,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,func_space(func_lof(*_FUNC_IDE2_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6356,"ide_methods.bas");}while(r); do{ sub_get2(*_FUNC_IDE2_LONG_FH,NULL,_FUNC_IDE2_STRING_A,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6356,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,6357,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6358,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_FOUNDBROKENLINK= 0 ; if(!qbevent)break;evnt(25753,6359,"ide_methods.bas");}while(r); S_42531:; while((qbs_cleanup(qbs_tmp_base,_FUNC_IDE2_STRING_A->len))||new_error){ if(qbevent){evnt(25753,6360,"ide_methods.bas");if(r)goto S_42531;} do{ *_FUNC_IDE2_LONG_AI=func_instr(NULL,_FUNC_IDE2_STRING_A,__STRING_CRLF,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6361,"ide_methods.bas");}while(r); S_42533:; if ((*_FUNC_IDE2_LONG_AI)||new_error){ if(qbevent){evnt(25753,6362,"ide_methods.bas");if(r)goto S_42533;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_left(_FUNC_IDE2_STRING_A,*_FUNC_IDE2_LONG_AI- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6363,"ide_methods.bas");}while(r); S_42535:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDE2_LONG_AI==(_FUNC_IDE2_STRING_A->len- 1 ))))||new_error){ if(qbevent){evnt(25753,6363,"ide_methods.bas");if(r)goto S_42535;} do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6363,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDE2_STRING_A,qbs_right(_FUNC_IDE2_STRING_A,_FUNC_IDE2_STRING_A->len-*_FUNC_IDE2_LONG_AI- 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6363,"ide_methods.bas");}while(r); } S_42540:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_FUNC_IDE2_STRING_F)))||new_error){ if(qbevent){evnt(25753,6364,"ide_methods.bas");if(r)goto S_42540;} do{ *_FUNC_IDE2_LONG_LN=*_FUNC_IDE2_LONG_LN+ 1 ; if(!qbevent)break;evnt(25753,6365,"ide_methods.bas");}while(r); do{ if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&1){ preserved_elements=_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]; } else preserved_elements=0; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[4]= 1 ; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]=(*_FUNC_IDE2_LONG_LN)-_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[4]+1; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]; if (tmp_long2 0 ))&*_FUNC_IDE2_LONG_FOUNDBROKENLINK)||new_error){ if(qbevent){evnt(25753,6378,"ide_methods.bas");if(r)goto S_42552;} do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,6379,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 4 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6380,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,6380,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6381,"ide_methods.bas");}while(r); S_42557:; fornext_value4534= 1 ; fornext_finalvalue4534=func_ubound(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST,1,1); fornext_step4534= 1 ; if (fornext_step4534<0) fornext_step_negative4534=1; else fornext_step_negative4534=0; if (new_error) goto fornext_error4534; goto fornext_entrylabel4534; while(1){ fornext_value4534=fornext_step4534+(*_FUNC_IDE2_LONG_LN); fornext_entrylabel4534: *_FUNC_IDE2_LONG_LN=fornext_value4534; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4534){ if (fornext_value4534fornext_finalvalue4534) break; } fornext_error4534:; if(qbevent){evnt(25753,6382,"ide_methods.bas");if(r)goto S_42557;} do{ qbs_set(_FUNC_IDE2_STRING_F,qbs_add(qbs_add(qbs_add(_FUNC_IDE2_STRING_F,__STRING_CRLF),((qbs*)(((uint64*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]))[array_check((*_FUNC_IDE2_LONG_LN)-_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[4],_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5])]))),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6383,"ide_methods.bas");}while(r); fornext_continue_4533:; } fornext_exit_4533:; do{ *_FUNC_IDE2_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,6385,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\recent.bin",26), 2 ,NULL,NULL,*_FUNC_IDE2_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6386,"ide_methods.bas");}while(r); do{ sub_put2(*_FUNC_IDE2_LONG_FH, 1 ,byte_element((uint64)_FUNC_IDE2_STRING_F->chr,_FUNC_IDE2_STRING_F->len,byte_element_4535),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6387,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_IDE2_LONG_FH,1); if(!qbevent)break;evnt(25753,6388,"ide_methods.bas");}while(r); } do{ if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&1){ if (_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]&2){ tmp_long=_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]; while(tmp_long--){ ((qbs*)(((uint64*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]))[tmp_long]))->len=0; } }else{ tmp_long=_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]; while(tmp_long--){ qbs_free((qbs*)(((uint64*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]))[tmp_long])); } free((void*)(_FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0])); _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[2]^=1; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[4]=2147483647; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[5]=0; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[6]=0; _FUNC_IDE2_ARRAY_STRING_RECENTFILESLIST[0]=(ptrszint)¬hingstring; } } if(!qbevent)break;evnt(25753,6391,"ide_methods.bas");}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(25753,6392,"ide_methods.bas");}while(r); do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,6393,"ide_methods.bas");}while(r); LABEL_REDRAWITALL:; if(qbevent){evnt(25753,6395,"ide_methods.bas");r=0;} do{ qbs_set(__STRING_MENUBAR,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6396,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_MENULOCATIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6397,"ide_methods.bas");}while(r); S_42570:; fornext_value4537= 1 ; fornext_finalvalue4537=*__INTEGER_MENUS- 1 ; fornext_step4537= 1 ; if (fornext_step4537<0) fornext_step_negative4537=1; else fornext_step_negative4537=0; if (new_error) goto fornext_error4537; goto fornext_entrylabel4537; while(1){ fornext_value4537=fornext_step4537+(*_FUNC_IDE2_LONG_I); fornext_entrylabel4537: *_FUNC_IDE2_LONG_I=fornext_value4537; if (fornext_step_negative4537){ if (fornext_value4537fornext_finalvalue4537) break; } fornext_error4537:; if(qbevent){evnt(25753,6398,"ide_methods.bas");if(r)goto S_42570;} do{ qbs_set(_FUNC_IDE2_STRING_MENULOCATIONS,qbs_add(_FUNC_IDE2_STRING_MENULOCATIONS,i2string(__STRING_MENUBAR->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6399,"ide_methods.bas");}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(25753,6400,"ide_methods.bas");}while(r); fornext_continue_4536:; } fornext_exit_4536:; 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(25753,6402,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_MENULOCATIONS,qbs_add(_FUNC_IDE2_STRING_MENULOCATIONS,i2string(__STRING_MENUBAR->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6403,"ide_methods.bas");}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(25753,6404,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6407,"ide_methods.bas");}while(r); do{ qbg_sub_view_print( 1 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,1); if(!qbevent)break;evnt(25753,6408,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL,NULL,*__LONG_IDENORMALCURSORSTART,*__LONG_IDENORMALCURSOREND,24); if(!qbevent)break;evnt(25753,6413,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,6416,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,__STRING_MENUBAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6416,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6417,"ide_methods.bas");}while(r); do{ SUB_IDEBOX(&(pass4542= 1 ),&(pass4543= 2 ),__LONG_IDEWX,&(pass4544=*__LONG_IDEWY- 5 )); if(!qbevent)break;evnt(25753,6417,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6420,"ide_methods.bas");}while(r); do{ SUB_IDEBOX(&(pass4545= 1 ),&(pass4546=*__LONG_IDEWY- 4 ),__LONG_IDEWX,&(pass4547= 5 )); if(!qbevent)break;evnt(25753,6420,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6422,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*__LONG_IDEWY- 4 ,func_chr( 195 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6422,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX,*__LONG_IDEWY- 4 ,func_chr( 180 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6422,"ide_methods.bas");}while(r); S_42589:; if ((-(*__LONG_IDEHELP== 1 ))||new_error){ if(qbevent){evnt(25753,6424,"ide_methods.bas");if(r)goto S_42589;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,6425,"ide_methods.bas");}while(r); do{ SUB_IDEBOX(&(pass4548= 1 ),__LONG_IDEWY,__LONG_IDEWX,&(pass4549=*__LONG_IDESUBWINDOW+ 1 )); if(!qbevent)break;evnt(25753,6425,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,6426,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*__LONG_IDEWY,func_chr( 195 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6426,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX,*__LONG_IDEWY,func_chr( 180 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6426,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 4 ,NULL,3); if(!qbevent)break;evnt(25753,6427,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 3 ,*__LONG_IDEWY,qbs_new_txt_len(" x ",3),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6427,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=52; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESEARCHBAR; RETURN_52:; if(!qbevent)break;evnt(25753,6430,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,6433,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,func_space(*__LONG_IDEWX),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6433,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4550=*__LONG_IDEWY- 3 ),&(pass4551= 3 ),&(pass4552= 1 ),&(pass4553= 1 )); if(!qbevent)break;evnt(25753,6434,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4554= 3 ),&(pass4555=*__LONG_IDEWY- 8 ),&(pass4556= 1 ),&(pass4557= 1 )); if(!qbevent)break;evnt(25753,6435,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEHBAR(&(pass4558= 2 ),&(pass4559=*__LONG_IDEWY- 5 ),&(pass4560=*__LONG_IDEWX- 2 ),&(pass4561= 1 ),&(pass4562= 1 )); if(!qbevent)break;evnt(25753,6436,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); if(!qbevent)break;evnt(25753,6438,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,6440,"ide_methods.bas");}while(r); do{ sub_defseg( 0 ,1); if(!qbevent)break;evnt(25753,6442,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,6443,"ide_methods.bas");}while(r); S_42608:; if ((*__LONG_IDEHELP)||new_error){ if(qbevent){evnt(25753,6445,"ide_methods.bas");if(r)goto S_42608;} do{ SUB_HELP_SHOWTEXT(); if(!qbevent)break;evnt(25753,6446,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEHBAR(&(pass4563= 2 ),&(pass4564=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 1 ),&(pass4565=*__LONG_IDEWX- 2 ),__LONG_HELP_CX,&(pass4566=*__LONG_HELP_W+ 1 )); if(!qbevent)break;evnt(25753,6448,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4567=*__LONG_IDEWY+ 1 ),&(pass4568=*__LONG_IDESUBWINDOW- 2 ),__LONG_HELP_CY,&(pass4569=*__LONG_HELP_H+ 1 )); if(!qbevent)break;evnt(25753,6449,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=53; if (next_return_point>=return_points) more_return_points(); goto LABEL_HELPAREASHOWBACKLINKS; RETURN_53:; if(!qbevent)break;evnt(25753,6451,"ide_methods.bas");}while(r); } S_42614:; if ((*__BYTE_IDESHOWERRORSIMMEDIATELY|*_FUNC_IDE2_BYTE_IDECOMPILATIONREQUESTED)||new_error){ if(qbevent){evnt(25753,6454,"ide_methods.bas");if(r)goto S_42614;} do{ SUB_CLEARSTATUSWINDOW(&(pass4570= 0 )); if(!qbevent)break;evnt(25753,6455,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6457,"ide_methods.bas");}while(r); S_42617:; if ((-(*__LONG_IDECOMPILING== 1 ))||new_error){ if(qbevent){evnt(25753,6459,"ide_methods.bas");if(r)goto S_42617;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,func_string( 3 , 250 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6460,"ide_methods.bas");}while(r); }else{ S_42620:; if ((*__LONG_IDEFOCUSLINE)||new_error){ if(qbevent){evnt(25753,6462,"ide_methods.bas");if(r)goto S_42620;} do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,func_string( 3 , 250 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6463,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("OK",2),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6465,"ide_methods.bas");}while(r); } do{ *__INTEGER_STATUSAREALINK= 0 ; if(!qbevent)break;evnt(25753,6467,"ide_methods.bas");}while(r); S_42626:; if ((-(*__LONG_TOTALWARNINGS> 0 ))||new_error){ if(qbevent){evnt(25753,6468,"ide_methods.bas");if(r)goto S_42626;} do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6469,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(qbs_add(qbs_new_txt_len(" (",2),qbs_ltrim(qbs_str((int32)(*__LONG_TOTALWARNINGS)))),qbs_new_txt_len(" warning",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6470,"ide_methods.bas");}while(r); S_42629:; if ((-(*__LONG_TOTALWARNINGS> 1 ))||new_error){ if(qbevent){evnt(25753,6471,"ide_methods.bas");if(r)goto S_42629;} do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(_FUNC_IDE2_STRING_MSG,qbs_new_txt_len("s",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6471,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDE2_STRING_MSG,qbs_add(_FUNC_IDE2_STRING_MSG,qbs_new_txt_len(" - click here or Ctrl+W to view)",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6472,"ide_methods.bas");}while(r); do{ sub__printstring( 4 ,*__LONG_IDEWY- 3 ,_FUNC_IDE2_STRING_MSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6473,"ide_methods.bas");}while(r); do{ *__INTEGER_STATUSAREALINK= 4 ; if(!qbevent)break;evnt(25753,6474,"ide_methods.bas");}while(r); } S_42636:; if ((*_FUNC_IDE2_BYTE_WAITINGFORVARLIST)||new_error){ if(qbevent){evnt(25753,6476,"ide_methods.bas");if(r)goto S_42636;} do{ return_point[next_return_point++]=54; if (next_return_point>=return_points) more_return_points(); goto LABEL_SHOWVARLISTREADY; RETURN_54:; if(!qbevent)break;evnt(25753,6476,"ide_methods.bas");}while(r); } } } do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,6479,"ide_methods.bas");}while(r); LABEL_HELPAREASHOWBACKLINKS:; if(qbevent){evnt(25753,6481,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDE2_STRING_BACK_STR,func_string( 1000 , 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6482,"ide_methods.bas");}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(25753,6483,"ide_methods.bas");}while(r); do{ *_FUNC_IDE2_LONG_TOP=func_ubound(__ARRAY_STRING_BACK,1,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6484,"ide_methods.bas");}while(r); S_42645:; fornext_value4572= 1 ; fornext_finalvalue4572=*_FUNC_IDE2_LONG_TOP; fornext_step4572= 1 ; if (fornext_step4572<0) fornext_step_negative4572=1; else fornext_step_negative4572=0; if (new_error) goto fornext_error4572; goto fornext_entrylabel4572; while(1){ fornext_value4572=fornext_step4572+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4572: *_FUNC_IDE2_LONG_X=fornext_value4572; if (fornext_step_negative4572){ if (fornext_value4572fornext_finalvalue4572) break; } fornext_error4572:; if(qbevent){evnt(25753,6485,"ide_methods.bas");if(r)goto S_42645;} 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(25753,6486,"ide_methods.bas");}while(r); S_42647:; if ((-(*_FUNC_IDE2_LONG_X==*__LONG_HELP_BACK_POS))||new_error){ if(qbevent){evnt(25753,6487,"ide_methods.bas");if(r)goto S_42647;} do{ *_FUNC_IDE2_LONG_P=_FUNC_IDE2_STRING_BACK_STR->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6487,"ide_methods.bas");}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(25753,6488,"ide_methods.bas");}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(25753,6489,"ide_methods.bas");}while(r); S_42652:; fornext_value4575= 1 ; fornext_finalvalue4575=_FUNC_IDE2_STRING_N->len; fornext_step4575= 1 ; if (fornext_step4575<0) fornext_step_negative4575=1; else fornext_step_negative4575=0; if (new_error) goto fornext_error4575; goto fornext_entrylabel4575; while(1){ fornext_value4575=fornext_step4575+(*_FUNC_IDE2_LONG_X2); fornext_entrylabel4575: *_FUNC_IDE2_LONG_X2=fornext_value4575; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative4575){ if (fornext_value4575fornext_finalvalue4575) break; } fornext_error4575:; if(qbevent){evnt(25753,6490,"ide_methods.bas");if(r)goto S_42652;} 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(25753,6491,"ide_methods.bas");}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(25753,6492,"ide_methods.bas");}while(r); fornext_continue_4574:; } fornext_exit_4574:; 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(25753,6494,"ide_methods.bas");}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(25753,6495,"ide_methods.bas");}while(r); S_42658:; if ((-(*_FUNC_IDE2_LONG_X!=*_FUNC_IDE2_LONG_TOP))||new_error){ if(qbevent){evnt(25753,6497,"ide_methods.bas");if(r)goto S_42658;} 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(25753,6498,"ide_methods.bas");}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(25753,6499,"ide_methods.bas");}while(r); } fornext_continue_4571:; } fornext_exit_4571:; 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(25753,6502,"ide_methods.bas");}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(25753,6503,"ide_methods.bas");}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(25753,6504,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*__LONG_IDEWY, 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,6507,"ide_methods.bas");}while(r); S_42667:; fornext_value4579=*_FUNC_IDE2_LONG_BACK_STR_POS; fornext_finalvalue4579=*_FUNC_IDE2_LONG_BACK_STR_POS+*__LONG_IDEWX- 6 ; fornext_step4579= 1 ; if (fornext_step4579<0) fornext_step_negative4579=1; else fornext_step_negative4579=0; if (new_error) goto fornext_error4579; goto fornext_entrylabel4579; while(1){ fornext_value4579=fornext_step4579+(*_FUNC_IDE2_LONG_X); fornext_entrylabel4579: *_FUNC_IDE2_LONG_X=fornext_value4579; if (fornext_step_negative4579){ if (fornext_value4579fornext_finalvalue4579) break; } fornext_error4579:; if(qbevent){evnt(25753,6508,"ide_methods.bas");if(r)goto S_42667;} 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(25753,6509,"ide_methods.bas");}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(25753,6510,"ide_methods.bas");}while(r); S_42670:; if ((*_FUNC_IDE2_LONG_A)||new_error){ if(qbevent){evnt(25753,6511,"ide_methods.bas");if(r)goto S_42670;} S_42671:; if ((-(*__LONG_IDESYSTEM== 3 ))||new_error){ if(qbevent){evnt(25753,6512,"ide_methods.bas");if(r)goto S_42671;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,6512,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,6512,"ide_methods.bas");}while(r); } S_42676:; if ((-(*_FUNC_IDE2_LONG_I<*__LONG_HELP_BACK_POS))||new_error){ if(qbevent){evnt(25753,6513,"ide_methods.bas");if(r)goto S_42676;} do{ qbg_sub_color( 9 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,6513,"ide_methods.bas");}while(r); } S_42679:; if ((-(*_FUNC_IDE2_LONG_I>*__LONG_HELP_BACK_POS))||new_error){ if(qbevent){evnt(25753,6514,"ide_methods.bas");if(r)goto S_42679;} do{ qbg_sub_color( 9 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,6514,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_FUNC_IDE2_LONG_A)); if (new_error) goto skip4580; makefit(tqbs); qbs_print(tqbs,0); skip4580: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6515,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,6517,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr( 196 )); if (new_error) goto skip4581; makefit(tqbs); qbs_print(tqbs,0); skip4581: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6518,"ide_methods.bas");}while(r); } fornext_continue_4578:; } fornext_exit_4578:; do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,6521,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 18 ,*__LONG_IDEWY,func_chr( 180 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6521,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,6522,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 17 ,*__LONG_IDEWY,qbs_new_txt_len(" View on Wiki ",14),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6522,"ide_methods.bas");}while(r); do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,6523,"ide_methods.bas");}while(r); LABEL_SHOWVARLISTREADY:; if(qbevent){evnt(25753,6525,"ide_methods.bas");r=0;} do{ *_FUNC_IDE2_BYTE_WAITINGFORVARLIST= 0 ; if(!qbevent)break;evnt(25753,6526,"ide_methods.bas");}while(r); do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6527,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 2 ,qbs_new_txt_len("Variable List is now available (F4 to see it)",45),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6528,"ide_methods.bas");}while(r); do{ #include "ret153.txt" if(!qbevent)break;evnt(25753,6529,"ide_methods.bas");}while(r); 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_IDE2_LONG_IDE2; } void SUB_UPDATETITLEOFMAINWINDOW(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_SFNAME,FUNC_FINDCURRENTSF(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6533,"ide_methods.bas");}while(r); do{ SUB_CLEANSUBNAME(_SUB_UPDATETITLEOFMAINWINDOW_STRING_SFNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6534,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6535,"ide_methods.bas");}while(r); do{ sub__printstring( 2 , 2 ,func_string(*__LONG_IDEWX- 2 ,(func_chr( 196 )->chr[0])),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6535,"ide_methods.bas");}while(r); S_42701:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEPROGNAME->len))||new_error){ if(qbevent){evnt(25753,6536,"ide_methods.bas");if(r)goto S_42701;} do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6536,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_add(qbs_new_txt_len("Untitled",8),__STRING_TEMPFOLDERINDEXSTR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6536,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_add(qbs_new_txt_len(" ",1),_SUB_UPDATETITLEOFMAINWINDOW_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6537,"ide_methods.bas");}while(r); S_42707:; if ((*__LONG_IDEUNSAVED)||new_error){ if(qbevent){evnt(25753,6538,"ide_methods.bas");if(r)goto S_42707;} do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_add(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_new_txt_len("*",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6538,"ide_methods.bas");}while(r); } S_42710:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_UPDATETITLEOFMAINWINDOW_STRING_SFNAME->len> 0 )))||new_error){ if(qbevent){evnt(25753,6539,"ide_methods.bas");if(r)goto S_42710;} do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_add(qbs_add(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_new_txt_len(":",1)),_SUB_UPDATETITLEOFMAINWINDOW_STRING_SFNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6539,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_add(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6540,"ide_methods.bas");}while(r); S_42714:; if ((qbs_cleanup(qbs_tmp_base,-((_SUB_UPDATETITLEOFMAINWINDOW_STRING_A->len)>(*__LONG_IDEWX- 5 ))))||new_error){ if(qbevent){evnt(25753,6541,"ide_methods.bas");if(r)goto S_42714;} do{ qbs_set(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,qbs_add(qbs_add(qbs_left(_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,*__LONG_IDEWX- 11 ),func_string( 3 , 250 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6541,"ide_methods.bas");}while(r); } S_42717:; if ((-(*__LONG_IDESYSTEM== 1 ))||new_error){ if(qbevent){evnt(25753,6542,"ide_methods.bas");if(r)goto S_42717;} do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,6542,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,6542,"ide_methods.bas");}while(r); } do{ sub__printstring((((*__LONG_IDEWX/ ((long double)( 2 )))- 1 ))-((_SUB_UPDATETITLEOFMAINWINDOW_STRING_A->len- 1 )/ 2 ), 2 ,_SUB_UPDATETITLEOFMAINWINDOW_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6543,"ide_methods.bas");}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; } void SUB_DEBUGMODE(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,6547,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,6548,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,6549,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,6550,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,6551,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TIMEOUT= 10 ; if(!qbevent)break;evnt(25753,6557,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,6558,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,6560,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,6562,"ide_methods.bas");}while(r); do{ sub__printstring( 1 , 1 ,func_space(__STRING_MENUBAR->len),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6562,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_M,qbs_new_txt_len("$DEBUG MODE ACTIVE",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6563,"ide_methods.bas");}while(r); do{ sub__printstring((*__LONG_IDEWX-_SUB_DEBUGMODE_STRING_M->len)/ 2 , 1 ,_SUB_DEBUGMODE_STRING_M,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6564,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,6572,"ide_methods.bas");}while(r); do{ if (_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[2]&2){ error(10); }else{ if (_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[2]&1){ if (!error_occurred) error(10); }else{ _SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4]= 1 ; _SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]=( 8 )-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4]+1; _SUB_DEBUGMODE_ARRAY_UDT_BUTTON[6]=1; _SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0]=(ptrszint)malloc(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]*128/8+1); if (!_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0]) error(257); _SUB_DEBUGMODE_ARRAY_UDT_BUTTON[2]|=1; tmp_long=_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]; while(tmp_long--){ *(qbs**)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0]+(128/8+1-1)*tmp_long+ 8)=qbs_new(0,0);} } } if(!qbevent)break;evnt(25753,6578,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I= 0 ; if(!qbevent)break;evnt(25753,6579,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6580,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6580,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6581,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6581,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6582,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6582,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6583,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6583,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6584,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6584,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6585,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6585,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6586,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6586,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=*_SUB_DEBUGMODE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,6587,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),qbs_new_txt_len("",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6587,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_Y=(*__LONG_IDEWY- 4 )+ 2 ; if(!qbevent)break;evnt(25753,6588,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_X= 2 ; if(!qbevent)break;evnt(25753,6589,"ide_methods.bas");}while(r); S_42756:; fornext_value4589= 1 ; fornext_finalvalue4589=func_ubound(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON,1,1); fornext_step4589= 1 ; if (fornext_step4589<0) fornext_step_negative4589=1; else fornext_step_negative4589=0; if (new_error) goto fornext_error4589; goto fornext_entrylabel4589; while(1){ fornext_value4589=fornext_step4589+(*_SUB_DEBUGMODE_LONG_I); fornext_entrylabel4589: *_SUB_DEBUGMODE_LONG_I=fornext_value4589; if (fornext_step_negative4589){ if (fornext_value4589fornext_finalvalue4589) break; } fornext_error4589:; if(qbevent){evnt(25753,6590,"ide_methods.bas");if(r)goto S_42756;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16))=*_SUB_DEBUGMODE_LONG_X; if(!qbevent)break;evnt(25753,6591,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+2))=*_SUB_DEBUGMODE_LONG_Y; if(!qbevent)break;evnt(25753,6592,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+4))=(*(qbs**)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8)))->len; if(!qbevent)break;evnt(25753,6593,"ide_methods.bas");}while(r); S_42760:; if ((-(*_SUB_DEBUGMODE_LONG_Ilen)>(*__LONG_IDEWX- 1 ))))||new_error){ if(qbevent){evnt(25753,6596,"ide_methods.bas");if(r)goto S_42762;} do{ *_SUB_DEBUGMODE_LONG_Y=*_SUB_DEBUGMODE_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,6597,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_X= 2 ; if(!qbevent)break;evnt(25753,6598,"ide_methods.bas");}while(r); } } fornext_continue_4588:; } fornext_exit_4588:; S_42768:; sc_4590_var=0; if(qbevent){evnt(25753,6603,"ide_methods.bas");if(r)goto S_42768;} S_42769:; if (((*__LONG_IDEDEBUGMODE==( 1 )))||new_error){ if(qbevent){evnt(25753,6604,"ide_methods.bas");if(r)goto S_42769;} do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= 0 ; if(!qbevent)break;evnt(25753,6605,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= 0 ; if(!qbevent)break;evnt(25753,6606,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6607,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_BUFFER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6608,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGCLIENT= 0 ; if(!qbevent)break;evnt(25753,6609,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DEBUGGEEPID= 0 ; if(!qbevent)break;evnt(25753,6610,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PANELACTIVE= -1 ; if(!qbevent)break;evnt(25753,6612,"ide_methods.bas");}while(r); do{ SUB_SHOWVWATCHPANEL((void*)( ((char*)(_SUB_DEBUGMODE_UDT_VWATCHPANEL)) + (0) ),qbs_new_txt_len("",0),&(pass4591= 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6613,"ide_methods.bas");}while(r); S_42778:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_VARIABLEWATCHLIST->len== 0 )))||new_error){ if(qbevent){evnt(25753,6615,"ide_methods.bas");if(r)goto S_42778;} do{ *_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES= 0 ; if(!qbevent)break;evnt(25753,6616,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))= 5 ; if(!qbevent)break;evnt(25753,6617,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,FUNC_IDEVARIABLEWATCHBOX(qbs_new_txt_len("",0),qbs_new_txt_len("",0),&(pass4593= -1 ),&(pass4594= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6622,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6625,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))= 40 ; if(!qbevent)break;evnt(25753,6626,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))=*__LONG_IDEWX-*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 6 ; if(!qbevent)break;evnt(25753,6627,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))= 4 ; if(!qbevent)break;evnt(25753,6628,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))= 1 ; if(!qbevent)break;evnt(25753,6629,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_X=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.w",13)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6631,"ide_methods.bas");}while(r); S_42790:; if ((*_SUB_DEBUGMODE_LONG_X)||new_error){ if(qbevent){evnt(25753,6632,"ide_methods.bas");if(r)goto S_42790;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))=*_SUB_DEBUGMODE_LONG_X; if(!qbevent)break;evnt(25753,6632,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_X=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.h",13)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6634,"ide_methods.bas");}while(r); S_42794:; if ((*_SUB_DEBUGMODE_LONG_X)||new_error){ if(qbevent){evnt(25753,6635,"ide_methods.bas");if(r)goto S_42794;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))=*_SUB_DEBUGMODE_LONG_X; if(!qbevent)break;evnt(25753,6635,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_X=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.x",13)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6637,"ide_methods.bas");}while(r); S_42798:; if ((*_SUB_DEBUGMODE_LONG_X)||new_error){ if(qbevent){evnt(25753,6638,"ide_methods.bas");if(r)goto S_42798;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))=*_SUB_DEBUGMODE_LONG_X; if(!qbevent)break;evnt(25753,6638,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_X=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.y",13)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6640,"ide_methods.bas");}while(r); S_42802:; if ((*_SUB_DEBUGMODE_LONG_X)||new_error){ if(qbevent){evnt(25753,6641,"ide_methods.bas");if(r)goto S_42802;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))=*_SUB_DEBUGMODE_LONG_X; if(!qbevent)break;evnt(25753,6641,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=55; if (next_return_point>=return_points) more_return_points(); goto LABEL_CHECKVWATCHPANELSIZE; RETURN_55:; if(!qbevent)break;evnt(25753,6643,"ide_methods.bas");}while(r); sc_ec_201_end:; sc_4590_var=-1; } S_42806:; if (((*__LONG_IDEDEBUGMODE>( 1 )))||new_error){ if(qbevent){evnt(25753,6644,"ide_methods.bas");if(r)goto S_42806;} do{ *_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE=~(*_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE); if(!qbevent)break;evnt(25753,6645,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=56; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATESTATUSAREA; RETURN_56:; if(!qbevent)break;evnt(25753,6646,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4595= 1 )); if(!qbevent)break;evnt(25753,6647,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4596= 1 ),qbs_new_txt_len("Paused.",7),&(pass4597= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6648,"ide_methods.bas");}while(r); sc_ec_202_end:; sc_4590_var=-1; } S_42811:; if (((*__LONG_IDEDEBUGMODE==( 2 )))||new_error){ if(qbevent){evnt(25753,6649,"ide_methods.bas");if(r)goto S_42811;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6649,"ide_methods.bas");}while(r); do{ goto LABEL_RETURNFROMCONTEXTMENU; if(!qbevent)break;evnt(25753,6649,"ide_methods.bas");}while(r); sc_ec_203_end:; sc_4590_var=-1; } S_42814:; if (((*__LONG_IDEDEBUGMODE==( 3 )))||new_error){ if(qbevent){evnt(25753,6650,"ide_methods.bas");if(r)goto S_42814;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6650,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTCALLSTACK; if(!qbevent)break;evnt(25753,6650,"ide_methods.bas");}while(r); sc_ec_204_end:; sc_4590_var=-1; } S_42817:; if (((*__LONG_IDEDEBUGMODE==( 4 )))||new_error){ if(qbevent){evnt(25753,6651,"ide_methods.bas");if(r)goto S_42817;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6651,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTCONTINUE; if(!qbevent)break;evnt(25753,6651,"ide_methods.bas");}while(r); sc_ec_205_end:; sc_4590_var=-1; } S_42820:; if (((*__LONG_IDEDEBUGMODE==( 5 )))||new_error){ if(qbevent){evnt(25753,6652,"ide_methods.bas");if(r)goto S_42820;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6652,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTSTEPOUT; if(!qbevent)break;evnt(25753,6652,"ide_methods.bas");}while(r); sc_ec_206_end:; sc_4590_var=-1; } S_42823:; if (((*__LONG_IDEDEBUGMODE==( 6 )))||new_error){ if(qbevent){evnt(25753,6653,"ide_methods.bas");if(r)goto S_42823;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6653,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTSTEPOVER; if(!qbevent)break;evnt(25753,6653,"ide_methods.bas");}while(r); sc_ec_207_end:; sc_4590_var=-1; } S_42826:; if (((*__LONG_IDEDEBUGMODE==( 7 )))||new_error){ if(qbevent){evnt(25753,6654,"ide_methods.bas");if(r)goto S_42826;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6654,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTSTEPINTO; if(!qbevent)break;evnt(25753,6654,"ide_methods.bas");}while(r); sc_ec_208_end:; sc_4590_var=-1; } S_42829:; if (((*__LONG_IDEDEBUGMODE==( 8 )))||new_error){ if(qbevent){evnt(25753,6655,"ide_methods.bas");if(r)goto S_42829;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6656,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_RESULT=*__LONG_IDECY; if(!qbevent)break;evnt(25753,6657,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTRUNTOTHISLINE; if(!qbevent)break;evnt(25753,6658,"ide_methods.bas");}while(r); sc_ec_209_end:; sc_4590_var=-1; } S_42833:; if (((*__LONG_IDEDEBUGMODE==( 9 )))||new_error){ if(qbevent){evnt(25753,6659,"ide_methods.bas");if(r)goto S_42833;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6659,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTQUIT; if(!qbevent)break;evnt(25753,6659,"ide_methods.bas");}while(r); sc_ec_210_end:; sc_4590_var=-1; } S_42836:; if (((*__LONG_IDEDEBUGMODE==( 10 )))||new_error){ if(qbevent){evnt(25753,6660,"ide_methods.bas");if(r)goto S_42836;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6660,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTTOGGLEBREAKPOINT; if(!qbevent)break;evnt(25753,6660,"ide_methods.bas");}while(r); sc_ec_211_end:; sc_4590_var=-1; } S_42839:; if (((*__LONG_IDEDEBUGMODE==( 11 )))||new_error){ if(qbevent){evnt(25753,6661,"ide_methods.bas");if(r)goto S_42839;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6661,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTCLEARBREAKPOINTS; if(!qbevent)break;evnt(25753,6661,"ide_methods.bas");}while(r); sc_ec_212_end:; sc_4590_var=-1; } S_42842:; if (((*__LONG_IDEDEBUGMODE==( 12 )))||new_error){ if(qbevent){evnt(25753,6662,"ide_methods.bas");if(r)goto S_42842;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6663,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_RESULT=*__LONG_IDECY; if(!qbevent)break;evnt(25753,6664,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTTOGGLESKIPLINE; if(!qbevent)break;evnt(25753,6665,"ide_methods.bas");}while(r); sc_ec_213_end:; sc_4590_var=-1; } S_42846:; if (((*__LONG_IDEDEBUGMODE==( 13 )))||new_error){ if(qbevent){evnt(25753,6666,"ide_methods.bas");if(r)goto S_42846;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6667,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_RESULT=*__LONG_IDECY; if(!qbevent)break;evnt(25753,6668,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTSETNEXTLINE; if(!qbevent)break;evnt(25753,6669,"ide_methods.bas");}while(r); sc_ec_214_end:; sc_4590_var=-1; } S_42850:; if (((*__LONG_IDEDEBUGMODE==( 14 )))||new_error){ if(qbevent){evnt(25753,6670,"ide_methods.bas");if(r)goto S_42850;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6670,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTSUBSDIALOG; if(!qbevent)break;evnt(25753,6670,"ide_methods.bas");}while(r); sc_ec_215_end:; sc_4590_var=-1; } S_42853:; if (((*__LONG_IDEDEBUGMODE==( 15 )))||new_error){ if(qbevent){evnt(25753,6671,"ide_methods.bas");if(r)goto S_42853;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6671,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTUNSKIPALLLINES; if(!qbevent)break;evnt(25753,6671,"ide_methods.bas");}while(r); sc_ec_216_end:; sc_4590_var=-1; } S_42856:; if (((*__LONG_IDEDEBUGMODE==( 16 )))||new_error){ if(qbevent){evnt(25753,6672,"ide_methods.bas");if(r)goto S_42856;} do{ *__LONG_IDEDEBUGMODE= 1 ; if(!qbevent)break;evnt(25753,6672,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTVARIABLEWATCH; if(!qbevent)break;evnt(25753,6672,"ide_methods.bas");}while(r); sc_ec_217_end:; } sc_4590_end:; do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4598= 1 )); if(!qbevent)break;evnt(25753,6675,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4599= 0 )); if(!qbevent)break;evnt(25753,6676,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4600= 1 ),qbs_new_txt_len("Entering $DEBUG mode (ESC to abort)...",38),&(pass4601= 15 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6677,"ide_methods.bas");}while(r); S_42863:; if ((-(*__LONG_HOST== 0 ))||new_error){ if(qbevent){evnt(25753,6679,"ide_methods.bas");if(r)goto S_42863;} do{ *__LONG_HOST=func__openhost(qbs_add(qbs_new_txt_len("TCP/IP:",7),__STRING_HOSTPORT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6680,"ide_methods.bas");}while(r); S_42865:; if ((-(*__LONG_HOST== 0 ))||new_error){ if(qbevent){evnt(25753,6681,"ide_methods.bas");if(r)goto S_42865;} do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4602= 0 )); if(!qbevent)break;evnt(25753,6682,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4603= 1 )); if(!qbevent)break;evnt(25753,6683,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4604= 1 ),qbs_new_txt_len("Failed to initiate debug session.",33),&(pass4605= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6684,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4606= 2 ),qbs_add(qbs_add(qbs_new_txt_len("Cannot receive connections on port",34),qbs_str((int32)(*__LONG_IDEBASETCPPORT))),qbs_new_txt_len(". Check your firewall permissions.",34)),&(pass4607= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6685,"ide_methods.bas");}while(r); S_42870:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,6686,"ide_methods.bas");if(r)goto S_42870;} ww_continue_4608:; } ww_exit_4608:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,6687,"ide_methods.bas");}while(r); } } do{ *_SUB_DEBUGMODE_SINGLE_START=func_timer(NULL,0); if(!qbevent)break;evnt(25753,6692,"ide_methods.bas");}while(r); S_42876:; do{ if(qbevent){evnt(25753,6693,"ide_methods.bas");if(r)goto S_42876;} do{ *__LONG_DEBUGCLIENT=func__openconnection(*__LONG_HOST); if(!qbevent)break;evnt(25753,6694,"ide_methods.bas");}while(r); S_42878:; if ((*__LONG_DEBUGCLIENT)||new_error){ if(qbevent){evnt(25753,6695,"ide_methods.bas");if(r)goto S_42878;} do{ goto dl_exit_4609; if(!qbevent)break;evnt(25753,6695,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_K=func__keyhit(); if(!qbevent)break;evnt(25753,6697,"ide_methods.bas");}while(r); S_42882:; if (((-(*_SUB_DEBUGMODE_LONG_K== 27 ))|(-((func_timer(NULL,0)-*_SUB_DEBUGMODE_SINGLE_START)>*_SUB_DEBUGMODE_LONG_TIMEOUT)))||new_error){ if(qbevent){evnt(25753,6698,"ide_methods.bas");if(r)goto S_42882;} do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4610= 0 )); if(!qbevent)break;evnt(25753,6699,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4611= 0 )); if(!qbevent)break;evnt(25753,6700,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4612= 1 ),qbs_add(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("Debug session aborted.",22)),&(pass4613= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6701,"ide_methods.bas");}while(r); S_42886:; if ((-(*_SUB_DEBUGMODE_LONG_K!= 27 ))||new_error){ if(qbevent){evnt(25753,6702,"ide_methods.bas");if(r)goto S_42886;} do{ SUB_SETSTATUSMESSAGE(&(pass4614= 2 ),qbs_new_txt_len("Connection timeout.",19),&(pass4615= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6703,"ide_methods.bas");}while(r); } do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,6705,"ide_methods.bas");}while(r); S_42890:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,6706,"ide_methods.bas");if(r)goto S_42890;} ww_continue_4616:; } ww_exit_4616:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,6707,"ide_methods.bas");}while(r); } do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,6710,"ide_methods.bas");}while(r); dl_continue_4609:; }while(1); dl_exit_4609:; do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,6713,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4617= 1 )); if(!qbevent)break;evnt(25753,6714,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4618= 1 ),qbs_new_txt_len("Handshaking...",14),&(pass4619= 15 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6715,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_SINGLE_START=func_timer(NULL,0); if(!qbevent)break;evnt(25753,6717,"ide_methods.bas");}while(r); S_42900:; do{ if(qbevent){evnt(25753,6718,"ide_methods.bas");if(r)goto S_42900;} do{ *_SUB_DEBUGMODE_LONG_K=func__keyhit(); if(!qbevent)break;evnt(25753,6719,"ide_methods.bas");}while(r); S_42902:; if (((-(*_SUB_DEBUGMODE_LONG_K== 27 ))|(-((func_timer(NULL,0)-*_SUB_DEBUGMODE_SINGLE_START)>*_SUB_DEBUGMODE_LONG_TIMEOUT)))||new_error){ if(qbevent){evnt(25753,6720,"ide_methods.bas");if(r)goto S_42902;} do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4621= 0 )); if(!qbevent)break;evnt(25753,6721,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4622= 0 )); if(!qbevent)break;evnt(25753,6722,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4623= 1 ),qbs_add(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("Debug session aborted.",22)),&(pass4624= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6723,"ide_methods.bas");}while(r); S_42906:; if ((-(*_SUB_DEBUGMODE_LONG_K!= 27 ))||new_error){ if(qbevent){evnt(25753,6724,"ide_methods.bas");if(r)goto S_42906;} do{ SUB_SETSTATUSMESSAGE(&(pass4625= 2 ),qbs_new_txt_len("Connection timeout.",19),&(pass4626= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6725,"ide_methods.bas");}while(r); } do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,6727,"ide_methods.bas");}while(r); S_42910:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,6728,"ide_methods.bas");if(r)goto S_42910;} ww_continue_4627:; } ww_exit_4627:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,6729,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=57; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETCOMMAND; RETURN_57:; if(!qbevent)break;evnt(25753,6732,"ide_methods.bas");}while(r); S_42915:; if(qbevent){evnt(25753,6733,"ide_methods.bas");if(r)goto S_42915;} S_42916:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("me",2))))||new_error){ if(qbevent){evnt(25753,6734,"ide_methods.bas");if(r)goto S_42916;} do{ qbs_set(_SUB_DEBUGMODE_STRING_PROGRAM,_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6735,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_EXPECTED,__STRING_LASTBINARYGENERATED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6736,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_P,FUNC_IDEZTAKEPATH(_SUB_DEBUGMODE_STRING_PROGRAM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6737,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_P,FUNC_IDEZTAKEPATH(_SUB_DEBUGMODE_STRING_EXPECTED)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6738,"ide_methods.bas");}while(r); S_42921:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_DEBUGMODE_STRING_PROGRAM,_SUB_DEBUGMODE_STRING_EXPECTED)))||new_error){ if(qbevent){evnt(25753,6740,"ide_methods.bas");if(r)goto S_42921;} do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4629= 0 )); if(!qbevent)break;evnt(25753,6741,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4630= 1 )); if(!qbevent)break;evnt(25753,6742,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4631= 1 ),qbs_new_txt_len("Failed to initiate debug session.",33),&(pass4632= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6743,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4633= 2 ),qbs_left(qbs_add(qbs_new_txt_len("Expected: ",10),_SUB_DEBUGMODE_STRING_EXPECTED),*__LONG_IDEWX- 2 ),&(pass4634= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6744,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4635= 3 ),qbs_left(qbs_add(qbs_new_txt_len("Received: ",10),_SUB_DEBUGMODE_STRING_PROGRAM),*__LONG_IDEWX- 2 ),&(pass4636= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6745,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("vwatch:file mismatch",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6746,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=58; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_58:; if(!qbevent)break;evnt(25753,6747,"ide_methods.bas");}while(r); do{ sub_close(*__LONG_DEBUGCLIENT,1); if(!qbevent)break;evnt(25753,6748,"ide_methods.bas");}while(r); S_42930:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,6749,"ide_methods.bas");if(r)goto S_42930;} ww_continue_4637:; } ww_exit_4637:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,6750,"ide_methods.bas");}while(r); } do{ goto dl_exit_4620; if(!qbevent)break;evnt(25753,6752,"ide_methods.bas");}while(r); sc_ec_218_end:; goto sc_4628_end; } sc_4628_end:; dl_continue_4620:; }while(1); dl_exit_4620:; do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("vwatch:ok",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6756,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=59; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_59:; if(!qbevent)break;evnt(25753,6757,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("hwnd:",5),o2string(func__handle()))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6758,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=60; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_60:; if(!qbevent)break;evnt(25753,6759,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("line count:",11),l2string(*__LONG_IDEN))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6760,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=61; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_61:; if(!qbevent)break;evnt(25753,6761,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BREAKPOINTCOUNT= 0 ; if(!qbevent)break;evnt(25753,6763,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_BREAKPOINTLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6764,"ide_methods.bas");}while(r); S_42945:; fornext_value4639= 1 ; fornext_finalvalue4639=func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1); fornext_step4639= 1 ; if (fornext_step4639<0) fornext_step_negative4639=1; else fornext_step_negative4639=0; if (new_error) goto fornext_error4639; goto fornext_entrylabel4639; while(1){ fornext_value4639=fornext_step4639+(*_SUB_DEBUGMODE_LONG_I); fornext_entrylabel4639: *_SUB_DEBUGMODE_LONG_I=fornext_value4639; if (fornext_step_negative4639){ if (fornext_value4639fornext_finalvalue4639) break; } fornext_error4639:; if(qbevent){evnt(25753,6765,"ide_methods.bas");if(r)goto S_42945;} S_42946:; if ((((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_DEBUGMODE_LONG_I)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])])||new_error){ if(qbevent){evnt(25753,6766,"ide_methods.bas");if(r)goto S_42946;} do{ *_SUB_DEBUGMODE_LONG_BREAKPOINTCOUNT=*_SUB_DEBUGMODE_LONG_BREAKPOINTCOUNT+ 1 ; if(!qbevent)break;evnt(25753,6767,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_BREAKPOINTLIST,qbs_add(_SUB_DEBUGMODE_STRING_BREAKPOINTLIST,l2string(*_SUB_DEBUGMODE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6768,"ide_methods.bas");}while(r); } fornext_continue_4638:; } fornext_exit_4638:; S_42951:; if ((*_SUB_DEBUGMODE_LONG_BREAKPOINTCOUNT)||new_error){ if(qbevent){evnt(25753,6771,"ide_methods.bas");if(r)goto S_42951;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("breakpoint count:",17),l2string(*_SUB_DEBUGMODE_LONG_BREAKPOINTCOUNT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6772,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=62; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_62:; if(!qbevent)break;evnt(25753,6773,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("breakpoint list:",16),_SUB_DEBUGMODE_STRING_BREAKPOINTLIST)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6774,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=63; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_63:; if(!qbevent)break;evnt(25753,6775,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_SKIPCOUNT= 0 ; if(!qbevent)break;evnt(25753,6778,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_SKIPLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6779,"ide_methods.bas");}while(r); S_42959:; fornext_value4641= 1 ; fornext_finalvalue4641=func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1); fornext_step4641= 1 ; if (fornext_step4641<0) fornext_step_negative4641=1; else fornext_step_negative4641=0; if (new_error) goto fornext_error4641; goto fornext_entrylabel4641; while(1){ fornext_value4641=fornext_step4641+(*_SUB_DEBUGMODE_LONG_I); fornext_entrylabel4641: *_SUB_DEBUGMODE_LONG_I=fornext_value4641; if (fornext_step_negative4641){ if (fornext_value4641fornext_finalvalue4641) break; } fornext_error4641:; if(qbevent){evnt(25753,6780,"ide_methods.bas");if(r)goto S_42959;} S_42960:; if ((((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_DEBUGMODE_LONG_I)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])])||new_error){ if(qbevent){evnt(25753,6781,"ide_methods.bas");if(r)goto S_42960;} do{ *_SUB_DEBUGMODE_LONG_SKIPCOUNT=*_SUB_DEBUGMODE_LONG_SKIPCOUNT+ 1 ; if(!qbevent)break;evnt(25753,6782,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_SKIPLIST,qbs_add(_SUB_DEBUGMODE_STRING_SKIPLIST,l2string(*_SUB_DEBUGMODE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6783,"ide_methods.bas");}while(r); } fornext_continue_4640:; } fornext_exit_4640:; S_42965:; if ((*_SUB_DEBUGMODE_LONG_SKIPCOUNT)||new_error){ if(qbevent){evnt(25753,6786,"ide_methods.bas");if(r)goto S_42965;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("skip count:",11),l2string(*_SUB_DEBUGMODE_LONG_SKIPCOUNT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6787,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=64; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_64:; if(!qbevent)break;evnt(25753,6788,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("skip list:",10),_SUB_DEBUGMODE_STRING_SKIPLIST)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6789,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=65; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_65:; if(!qbevent)break;evnt(25753,6790,"ide_methods.bas");}while(r); } do{ SUB_CLEARSTATUSWINDOW(&(pass4642= 1 )); if(!qbevent)break;evnt(25753,6793,"ide_methods.bas");}while(r); S_42972:; if ((*__LONG_STARTPAUSED)||new_error){ if(qbevent){evnt(25753,6794,"ide_methods.bas");if(r)goto S_42972;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("break",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6795,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,6796,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4643= 1 ),qbs_new_txt_len("Paused.",7),&(pass4644= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6797,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("run",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6799,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= 0 ; if(!qbevent)break;evnt(25753,6800,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4645= 1 ),qbs_new_txt_len("Running...",10),&(pass4646= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6801,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=66; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_66:; if(!qbevent)break;evnt(25753,6803,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4647= 2 )); if(!qbevent)break;evnt(25753,6805,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4648= 2 ),qbs_new_txt_len("$DEBUG MODE: Set focus to the IDE to control execution",54),&(pass4649= 15 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6806,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE= -1 ; if(!qbevent)break;evnt(25753,6808,"ide_methods.bas");}while(r); S_42985:; do{ if(qbevent){evnt(25753,6810,"ide_methods.bas");if(r)goto S_42985;} S_42986:; if ((func__exit())||new_error){ if(qbevent){evnt(25753,6811,"ide_methods.bas");if(r)goto S_42986;} do{ *__LONG_IDEEXIT= 1 ; if(!qbevent)break;evnt(25753,6811,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTQUIT; if(!qbevent)break;evnt(25753,6811,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,6813,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPPANELFIRSTVISIBLE=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8)); if(!qbevent)break;evnt(25753,6814,"ide_methods.bas");}while(r); S_42992:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,6815,"ide_methods.bas");if(r)goto S_42992;} do{ *__LONG_MX=qbr(func__mousex(NULL,0)); if(!qbevent)break;evnt(25753,6816,"ide_methods.bas");}while(r); do{ *__LONG_MY=qbr(func__mousey(NULL,0)); if(!qbevent)break;evnt(25753,6817,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(20))=*__LONG_MX; if(!qbevent)break;evnt(25753,6818,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(22))=*__LONG_MY; if(!qbevent)break;evnt(25753,6819,"ide_methods.bas");}while(r); S_42997:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(((-(*__LONG_MX>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))))&(-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4)))))))&(((-(*__LONG_MY>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))))&(-(*__LONG_MY<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6)))))))))||new_error){ if(qbevent){evnt(25753,6822,"ide_methods.bas");if(r)goto S_42997;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))+(func__mousewheel(NULL,0)* 3 ); if(!qbevent)break;evnt(25753,6823,"ide_methods.bas");}while(r); S_42999:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))< 1 ))||new_error){ if(qbevent){evnt(25753,6824,"ide_methods.bas");if(r)goto S_42999;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))= 1 ; if(!qbevent)break;evnt(25753,6824,"ide_methods.bas");}while(r); } S_43002:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))>(*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 )))||new_error){ if(qbevent){evnt(25753,6825,"ide_methods.bas");if(r)goto S_43002;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 ; if(!qbevent)break;evnt(25753,6826,"ide_methods.bas");}while(r); } }else{ do{ *__LONG_IDECY=*__LONG_IDECY+(func__mousewheel(NULL,0)* 3 ); if(!qbevent)break;evnt(25753,6829,"ide_methods.bas");}while(r); } ww_continue_4651:; } ww_exit_4651:; S_43009:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,6833,"ide_methods.bas");if(r)goto S_43009;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,6833,"ide_methods.bas");}while(r); } S_43012:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,6834,"ide_methods.bas");if(r)goto S_43012;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,6834,"ide_methods.bas");}while(r); } S_43015:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECY!=*_SUB_DEBUGMODE_LONG_BKPIDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPPANELFIRSTVISIBLE!=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))))|(((-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(((-(*__LONG_MX>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))))&(-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4)))))))&(((-(*__LONG_MY>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))))&(-(*__LONG_MY<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6)))))))))))||new_error){ if(qbevent){evnt(25753,6838,"ide_methods.bas");if(r)goto S_43015;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,6839,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=67; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_67:; if(!qbevent)break;evnt(25753,6839,"ide_methods.bas");}while(r); } do{ *__LONG_MB=func__mousebutton( 1 ,NULL,0); if(!qbevent)break;evnt(25753,6842,"ide_methods.bas");}while(r); do{ *__LONG_MB2=func__mousebutton( 2 ,NULL,0); if(!qbevent)break;evnt(25753,6843,"ide_methods.bas");}while(r); S_43021:; if ((*__LONG_MB2)||new_error){ if(qbevent){evnt(25753,6845,"ide_methods.bas");if(r)goto S_43021;} S_43022:; if ((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWN2== 0 ))||new_error){ if(qbevent){evnt(25753,6846,"ide_methods.bas");if(r)goto S_43022;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN2= -1 ; if(!qbevent)break;evnt(25753,6847,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONX2=*__LONG_MX; if(!qbevent)break;evnt(25753,6848,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONY2=*__LONG_MY; if(!qbevent)break;evnt(25753,6849,"ide_methods.bas");}while(r); }else{ } }else{ S_43029:; if ((*_SUB_DEBUGMODE_LONG_MOUSEDOWN2)||new_error){ if(qbevent){evnt(25753,6853,"ide_methods.bas");if(r)goto S_43029;} S_43030:; if (((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX2==*__LONG_MX))&(-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY2==*__LONG_MY)))||new_error){ if(qbevent){evnt(25753,6854,"ide_methods.bas");if(r)goto S_43030;} S_43031:; if ((qbs_cleanup(qbs_tmp_base,((-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(((-(*__LONG_MX>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))))&(-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4)))))))&(((-(*__LONG_MY>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))))&(-(*__LONG_MY<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))))))))))||new_error){ if(qbevent){evnt(25753,6858,"ide_methods.bas");if(r)goto S_43031;} do{ goto LABEL_REQUESTVARIABLEWATCH; if(!qbevent)break;evnt(25753,6859,"ide_methods.bas");}while(r); } S_43034:; if ((((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<=( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))&*__BYTE_SHOWLINENUMBERS)|((-(*__LONG_MX== 1 ))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))&(-(*__BYTE_SHOWLINENUMBERS== 0 )))|((-(*__LONG_MX>( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))))||new_error){ if(qbevent){evnt(25753,6865,"ide_methods.bas");if(r)goto S_43034;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,6866,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,6867,"ide_methods.bas");}while(r); S_43037:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,6868,"ide_methods.bas");if(r)goto S_43037;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,6868,"ide_methods.bas");}while(r); } S_43040:; if ((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,6869,"ide_methods.bas");if(r)goto S_43040;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,6869,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=68; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_68:; if(!qbevent)break;evnt(25753,6869,"ide_methods.bas");}while(r); } do{ *__LONG_IDEDEBUGMODE= 2 ; if(!qbevent)break;evnt(25753,6870,"ide_methods.bas");}while(r); S_43045:; if ((-(*_SUB_DEBUGMODE_BYTE_PAUSEMODE== 0 ))||new_error){ if(qbevent){evnt(25753,6871,"ide_methods.bas");if(r)goto S_43045;} do{ return_point[next_return_point++]=69; if (next_return_point>=return_points) more_return_points(); goto LABEL_REQUESTPAUSE; RETURN_69:; if(!qbevent)break;evnt(25753,6871,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4655= 0 )); if(!qbevent)break;evnt(25753,6871,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,6872,"ide_methods.bas");}while(r); LABEL_RETURNFROMCONTEXTMENU:; if(qbevent){evnt(25753,6873,"ide_methods.bas");r=0;} do{ return_point[next_return_point++]=70; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_70:; if(!qbevent)break;evnt(25753,6874,"ide_methods.bas");}while(r); } } } do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN2= 0 ; if(!qbevent)break;evnt(25753,6878,"ide_methods.bas");}while(r); } S_43056:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,6881,"ide_methods.bas");if(r)goto S_43056;} S_43057:; if ((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWN== 0 ))||new_error){ if(qbevent){evnt(25753,6882,"ide_methods.bas");if(r)goto S_43057;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= -1 ; if(!qbevent)break;evnt(25753,6883,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONX=*__LONG_MX; if(!qbevent)break;evnt(25753,6884,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONY=*__LONG_MY; if(!qbevent)break;evnt(25753,6885,"ide_methods.bas");}while(r); S_43061:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&((-(*__LONG_MX>=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 3 ))))&((-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 1 ))))&((-(*__LONG_MY==*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2)))))))||new_error){ if(qbevent){evnt(25753,6888,"ide_methods.bas");if(r)goto S_43061;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(34))= -1 ; if(!qbevent)break;evnt(25753,6889,"ide_methods.bas");}while(r); S_43063:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(12))> 0 ))&((-(*__LONG_MX==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 1 ))))&((-(*__LONG_MY==*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(12))))))){ if(qbevent){evnt(25753,6892,"ide_methods.bas");if(r)goto S_43063;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))= 1 ; if(!qbevent)break;evnt(25753,6893,"ide_methods.bas");}while(r); S_43065:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(12))> 0 ))&((-(*__LONG_MX==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 1 ))))&((-(*__LONG_MY==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+ 1 )))))){ if(qbevent){evnt(25753,6896,"ide_methods.bas");if(r)goto S_43065;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))= 2 ; if(!qbevent)break;evnt(25753,6897,"ide_methods.bas");}while(r); S_43067:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(12))> 0 ))&((-(*__LONG_MX==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 1 ))))&((-(*__LONG_MY==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )))))){ if(qbevent){evnt(25753,6900,"ide_methods.bas");if(r)goto S_43067;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))= 3 ; if(!qbevent)break;evnt(25753,6901,"ide_methods.bas");}while(r); S_43069:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(14))> 0 ))&((-(*__LONG_MX==*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(14)))))&((-(*__LONG_MY==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 1 )))))){ if(qbevent){evnt(25753,6904,"ide_methods.bas");if(r)goto S_43069;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))= 1 ; if(!qbevent)break;evnt(25753,6905,"ide_methods.bas");}while(r); S_43071:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(14))> 0 ))&((-(*__LONG_MX==*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0)))))&((-(*__LONG_MY==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 1 )))))){ if(qbevent){evnt(25753,6908,"ide_methods.bas");if(r)goto S_43071;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))= 2 ; if(!qbevent)break;evnt(25753,6909,"ide_methods.bas");}while(r); S_43073:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(14))> 0 ))&((-(*__LONG_MX==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 2 ))))&((-(*__LONG_MY==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 1 )))))){ if(qbevent){evnt(25753,6912,"ide_methods.bas");if(r)goto S_43073;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))= 3 ; if(!qbevent)break;evnt(25753,6913,"ide_methods.bas");}while(r); S_43075:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&((-(*__LONG_MX==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 1 ))))&((-(*__LONG_MY==(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 1 )))))){ if(qbevent){evnt(25753,6916,"ide_methods.bas");if(r)goto S_43075;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))= -1 ; if(!qbevent)break;evnt(25753,6917,"ide_methods.bas");}while(r); S_43077:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&(((-(*__LONG_MX>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))))&(-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4)))))))&(((-(*__LONG_MY>=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))))&(-(*__LONG_MY<=(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))))))))){ if(qbevent){evnt(25753,6920,"ide_methods.bas");if(r)goto S_43077;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))= -1 ; if(!qbevent)break;evnt(25753,6921,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(35))= 1 ; if(!qbevent)break;evnt(25753,6922,"ide_methods.bas");}while(r); S_43080:; if ((-(((float)(FUNC_TIMEELAPSEDSINCE(_SUB_DEBUGMODE_SINGLE_LASTPANELCLICK)))<((float)( 0.3E+0 ))))||new_error){ if(qbevent){evnt(25753,6923,"ide_methods.bas");if(r)goto S_43080;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))= 0 ; if(!qbevent)break;evnt(25753,6925,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,6926,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTVARIABLEWATCH; if(!qbevent)break;evnt(25753,6927,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_SINGLE_LASTPANELCLICK=func_timer(NULL,0); if(!qbevent)break;evnt(25753,6929,"ide_methods.bas");}while(r); }else{ do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))= 0 ; if(!qbevent)break;evnt(25753,6931,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))= 0 ; if(!qbevent)break;evnt(25753,6932,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(34))= 0 ; if(!qbevent)break;evnt(25753,6933,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))= 0 ; if(!qbevent)break;evnt(25753,6934,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))= 0 ; if(!qbevent)break;evnt(25753,6935,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(35))= 0 ; if(!qbevent)break;evnt(25753,6936,"ide_methods.bas");}while(r); } } } } } } } } } S_43094:; if ((-(*__LONG_MX==*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,6939,"ide_methods.bas");if(r)goto S_43094;} S_43095:; if ((-(*__LONG_MY==FUNC_IDEVBAR(__LONG_IDEWX,&(pass4665= 3 ),&(pass4666=*__LONG_IDEWY- 8 ),__LONG_IDECY,__LONG_IDEN)))||new_error){ if(qbevent){evnt(25753,6940,"ide_methods.bas");if(r)goto S_43095;} do{ *_SUB_DEBUGMODE_LONG_DRAGGINGVTHUMB= -1 ; if(!qbevent)break;evnt(25753,6941,"ide_methods.bas");}while(r); }else{ do{ *_SUB_DEBUGMODE_LONG_DRAGGINGVTHUMB= 0 ; if(!qbevent)break;evnt(25753,6943,"ide_methods.bas");}while(r); } }else{ do{ *_SUB_DEBUGMODE_LONG_DRAGGINGVTHUMB= 0 ; if(!qbevent)break;evnt(25753,6946,"ide_methods.bas");}while(r); } S_43103:; if ((-(*__LONG_MY==(*__LONG_IDEWY- 5 )))||new_error){ if(qbevent){evnt(25753,6949,"ide_methods.bas");if(r)goto S_43103;} S_43104:; if ((-(*__LONG_MX==FUNC_IDEHBAR(&(pass4667= 2 ),&(pass4668=*__LONG_IDEWY- 5 ),&(pass4669=*__LONG_IDEWX- 2 ),__LONG_IDESX,&(pass4670= 608 ))))||new_error){ if(qbevent){evnt(25753,6950,"ide_methods.bas");if(r)goto S_43104;} do{ *_SUB_DEBUGMODE_LONG_DRAGGINGHTHUMB= -1 ; if(!qbevent)break;evnt(25753,6951,"ide_methods.bas");}while(r); }else{ do{ *_SUB_DEBUGMODE_LONG_DRAGGINGHTHUMB= 0 ; if(!qbevent)break;evnt(25753,6953,"ide_methods.bas");}while(r); } }else{ do{ *_SUB_DEBUGMODE_LONG_DRAGGINGHTHUMB= 0 ; if(!qbevent)break;evnt(25753,6956,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,6959,"ide_methods.bas");}while(r); S_43113:; fornext_value4672= 1 ; fornext_finalvalue4672=func_ubound(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON,1,1); fornext_step4672= 1 ; if (fornext_step4672<0) fornext_step_negative4672=1; else fornext_step_negative4672=0; if (new_error) goto fornext_error4672; goto fornext_entrylabel4672; while(1){ fornext_value4672=fornext_step4672+(*_SUB_DEBUGMODE_LONG_I); fornext_entrylabel4672: *_SUB_DEBUGMODE_LONG_I=fornext_value4672; if (fornext_step_negative4672){ if (fornext_value4672fornext_finalvalue4672) break; } fornext_error4672:; if(qbevent){evnt(25753,6960,"ide_methods.bas");if(r)goto S_43113;} S_43114:; if (((-(*__LONG_MY==*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+2))))&(-(*__LONG_MX>=*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16))))&(-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16))+*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+4)))))&(-(*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))== 0 ))&(-(*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))== 0 )))||new_error){ if(qbevent){evnt(25753,6962,"ide_methods.bas");if(r)goto S_43114;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON=*_SUB_DEBUGMODE_LONG_I; if(!qbevent)break;evnt(25753,6963,"ide_methods.bas");}while(r); do{ goto fornext_exit_4671; if(!qbevent)break;evnt(25753,6964,"ide_methods.bas");}while(r); } fornext_continue_4671:; } fornext_exit_4671:; }else{ S_43120:; if ((-(*_SUB_DEBUGMODE_LONG_DRAGGINGVTHUMB== -1 ))||new_error){ if(qbevent){evnt(25753,6969,"ide_methods.bas");if(r)goto S_43120;} S_43121:; if ((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY!=*__LONG_MY))||new_error){ if(qbevent){evnt(25753,6970,"ide_methods.bas");if(r)goto S_43121;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONY=*__LONG_MY; if(!qbevent)break;evnt(25753,6971,"ide_methods.bas");}while(r); S_43123:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(25753,6972,"ide_methods.bas");if(r)goto S_43123;} S_43124:; if ((-(*__LONG_MY<= 4 ))||new_error){ if(qbevent){evnt(25753,6973,"ide_methods.bas");if(r)goto S_43124;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,6973,"ide_methods.bas");}while(r); } S_43127:; if ((-(*__LONG_MY>=(*__LONG_IDEWY- 7 )))||new_error){ if(qbevent){evnt(25753,6974,"ide_methods.bas");if(r)goto S_43127;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,6974,"ide_methods.bas");}while(r); } S_43130:; if (((-(*__LONG_MY> 4 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 7 ))))||new_error){ if(qbevent){evnt(25753,6975,"ide_methods.bas");if(r)goto S_43130;} do{ *_SUB_DEBUGMODE_LONG_Y=*__LONG_MY; if(!qbevent)break;evnt(25753,6976,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_SINGLE_P=*_SUB_DEBUGMODE_LONG_Y- 3 - 2 + 0.5E+0 ; if(!qbevent)break;evnt(25753,6977,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_SINGLE_P=*_SUB_DEBUGMODE_SINGLE_P/ ((*__LONG_IDEWY- 8 )- 4 ); if(!qbevent)break;evnt(25753,6978,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=qbr((*_SUB_DEBUGMODE_SINGLE_P*(*__LONG_IDEN- 1 ))+( 1 )); if(!qbevent)break;evnt(25753,6979,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_DEBUGMODE_LONG_I; if(!qbevent)break;evnt(25753,6980,"ide_methods.bas");}while(r); } } do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,6983,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=71; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_71:; if(!qbevent)break;evnt(25753,6983,"ide_methods.bas");}while(r); } } S_43142:; if ((-(*_SUB_DEBUGMODE_LONG_DRAGGINGHTHUMB== -1 ))||new_error){ if(qbevent){evnt(25753,6987,"ide_methods.bas");if(r)goto S_43142;} S_43143:; if ((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX!=*__LONG_MX))||new_error){ if(qbevent){evnt(25753,6988,"ide_methods.bas");if(r)goto S_43143;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONX=*__LONG_MX; if(!qbevent)break;evnt(25753,6989,"ide_methods.bas");}while(r); S_43145:; if ((-(*__LONG_MX<= 3 ))||new_error){ if(qbevent){evnt(25753,6990,"ide_methods.bas");if(r)goto S_43145;} do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,6990,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(25753,6990,"ide_methods.bas");}while(r); } S_43149:; if ((-(*__LONG_MX>=(*__LONG_IDEWX- 2 )))||new_error){ if(qbevent){evnt(25753,6991,"ide_methods.bas");if(r)goto S_43149;} do{ *__LONG_IDESX= 608 ; if(!qbevent)break;evnt(25753,6991,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(25753,6991,"ide_methods.bas");}while(r); } S_43153:; if (((-(*__LONG_MX> 3 ))&(-(*__LONG_MX<(*__LONG_IDEWX- 2 ))))||new_error){ if(qbevent){evnt(25753,6992,"ide_methods.bas");if(r)goto S_43153;} do{ *_SUB_DEBUGMODE_LONG_X=*__LONG_MX; if(!qbevent)break;evnt(25753,6993,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_SINGLE_P=*_SUB_DEBUGMODE_LONG_X- 2 - 2 + 0.5E+0 ; if(!qbevent)break;evnt(25753,6994,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_SINGLE_P=*_SUB_DEBUGMODE_SINGLE_P/ ((*__LONG_IDEWX- 2 )- 4 ); if(!qbevent)break;evnt(25753,6995,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=qbr((*_SUB_DEBUGMODE_SINGLE_P*( 608 - 1 ))+( 1 )); if(!qbevent)break;evnt(25753,6996,"ide_methods.bas");}while(r); do{ *__LONG_IDESX=*_SUB_DEBUGMODE_LONG_I; if(!qbevent)break;evnt(25753,6997,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESX; if(!qbevent)break;evnt(25753,6998,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=72; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_72:; if(!qbevent)break;evnt(25753,7000,"ide_methods.bas");}while(r); } } do{ *_SUB_DEBUGMODE_LONG_VWATCHPANELLIMIT=*__LONG_IDEWY- 6 ; if(!qbevent)break;evnt(25753,7004,"ide_methods.bas");}while(r); S_43165:; if ((*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32)))||new_error){ if(qbevent){evnt(25753,7005,"ide_methods.bas");if(r)goto S_43165;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX-*__LONG_MX); if(!qbevent)break;evnt(25753,7006,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY-*__LONG_MY); if(!qbevent)break;evnt(25753,7007,"ide_methods.bas");}while(r); S_43168:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))< 2 ))||new_error){ if(qbevent){evnt(25753,7009,"ide_methods.bas");if(r)goto S_43168;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))= 2 ; if(!qbevent)break;evnt(25753,7009,"ide_methods.bas");}while(r); } S_43171:; if ((-((*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4)))>(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(25753,7010,"ide_methods.bas");if(r)goto S_43171;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))=*__LONG_IDEWX-*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 1 ; if(!qbevent)break;evnt(25753,7010,"ide_methods.bas");}while(r); } S_43174:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))< 3 ))||new_error){ if(qbevent){evnt(25753,7011,"ide_methods.bas");if(r)goto S_43174;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))= 3 ; if(!qbevent)break;evnt(25753,7011,"ide_methods.bas");}while(r); } S_43177:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))>(*_SUB_DEBUGMODE_LONG_VWATCHPANELLIMIT-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 1 ))))||new_error){ if(qbevent){evnt(25753,7012,"ide_methods.bas");if(r)goto S_43177;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))=*_SUB_DEBUGMODE_LONG_VWATCHPANELLIMIT-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 1 ); if(!qbevent)break;evnt(25753,7012,"ide_methods.bas");}while(r); } S_43180:; if ((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX!=*__LONG_MX))||new_error){ if(qbevent){evnt(25753,7014,"ide_methods.bas");if(r)goto S_43180;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(35))= 0 ; if(!qbevent)break;evnt(25753,7014,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONX=*__LONG_MX; if(!qbevent)break;evnt(25753,7015,"ide_methods.bas");}while(r); S_43184:; if ((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY!=*__LONG_MY))||new_error){ if(qbevent){evnt(25753,7016,"ide_methods.bas");if(r)goto S_43184;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(35))= 0 ; if(!qbevent)break;evnt(25753,7016,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONY=*__LONG_MY; if(!qbevent)break;evnt(25753,7017,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=73; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_73:; if(!qbevent)break;evnt(25753,7018,"ide_methods.bas");}while(r); S_43189:; }else{ if (*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))){ if(qbevent){evnt(25753,7019,"ide_methods.bas");if(r)goto S_43189;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))+(*__LONG_MX-*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX); if(!qbevent)break;evnt(25753,7020,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))+(*__LONG_MY-*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY); if(!qbevent)break;evnt(25753,7021,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=74; if (next_return_point>=return_points) more_return_points(); goto LABEL_CHECKVWATCHPANELSIZE; RETURN_74:; if(!qbevent)break;evnt(25753,7023,"ide_methods.bas");}while(r); S_43193:; if (((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(12))> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))>(*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 ))))||new_error){ if(qbevent){evnt(25753,7025,"ide_methods.bas");if(r)goto S_43193;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 ; if(!qbevent)break;evnt(25753,7026,"ide_methods.bas");}while(r); } S_43196:; if (((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(14))> 0 ))&(-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))>(*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 ))))||new_error){ if(qbevent){evnt(25753,7028,"ide_methods.bas");if(r)goto S_43196;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))=*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 ; if(!qbevent)break;evnt(25753,7029,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONX=*__LONG_MX; if(!qbevent)break;evnt(25753,7032,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONY=*__LONG_MY; if(!qbevent)break;evnt(25753,7033,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=75; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_75:; if(!qbevent)break;evnt(25753,7034,"ide_methods.bas");}while(r); S_43202:; }else{ if (-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))== 1 )){ if(qbevent){evnt(25753,7035,"ide_methods.bas");if(r)goto S_43202;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=qbr_float_to_long(floor(FUNC_MAP(&(pass4673=*__LONG_MY),&(pass4674=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+ 2 ),&(pass4675=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 ),&(pass4676= 1 ),&(pass4677=*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 )))); if(!qbevent)break;evnt(25753,7036,"ide_methods.bas");}while(r); S_43204:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))< 1 ))||new_error){ if(qbevent){evnt(25753,7037,"ide_methods.bas");if(r)goto S_43204;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))= 1 ; if(!qbevent)break;evnt(25753,7037,"ide_methods.bas");}while(r); } S_43207:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))>(*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 )))||new_error){ if(qbevent){evnt(25753,7038,"ide_methods.bas");if(r)goto S_43207;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 ; if(!qbevent)break;evnt(25753,7039,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=76; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_76:; if(!qbevent)break;evnt(25753,7041,"ide_methods.bas");}while(r); S_43211:; }else{ if (-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))== 1 )){ if(qbevent){evnt(25753,7042,"ide_methods.bas");if(r)goto S_43211;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))=qbr_float_to_long(floor(FUNC_MAP(&(pass4678=*__LONG_MX),&(pass4679=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))),&(pass4680=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 2 ),&(pass4681= 1 ),&(pass4682=*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 )))); if(!qbevent)break;evnt(25753,7043,"ide_methods.bas");}while(r); S_43213:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))< 1 ))||new_error){ if(qbevent){evnt(25753,7044,"ide_methods.bas");if(r)goto S_43213;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))= 1 ; if(!qbevent)break;evnt(25753,7044,"ide_methods.bas");}while(r); } S_43216:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))>(*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 )))||new_error){ if(qbevent){evnt(25753,7045,"ide_methods.bas");if(r)goto S_43216;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))=*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 ; if(!qbevent)break;evnt(25753,7046,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=77; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_77:; if(!qbevent)break;evnt(25753,7048,"ide_methods.bas");}while(r); } } } } } }else{ S_43223:; if ((-(*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(35))== 1 ))||new_error){ if(qbevent){evnt(25753,7052,"ide_methods.bas");if(r)goto S_43223;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(35))= 2 ; if(!qbevent)break;evnt(25753,7053,"ide_methods.bas");}while(r); } S_43226:; if ((*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32)))||new_error){ if(qbevent){evnt(25753,7057,"ide_methods.bas");if(r)goto S_43226;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))= 0 ; if(!qbevent)break;evnt(25753,7058,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7058,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.x",13),FUNC_STR2(&(pass4683=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7059,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.y",13),FUNC_STR2(&(pass4684=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7060,"ide_methods.bas");}while(r); } S_43232:; if ((*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33)))||new_error){ if(qbevent){evnt(25753,7062,"ide_methods.bas");if(r)goto S_43232;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))= 0 ; if(!qbevent)break;evnt(25753,7063,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7063,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.w",13),FUNC_STR2(&(pass4685=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7064,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.h",13),FUNC_STR2(&(pass4686=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7065,"ide_methods.bas");}while(r); } S_43238:; if ((*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(34))&((-(*__LONG_MX==*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX))&(-(*__LONG_MY==*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY))))||new_error){ if(qbevent){evnt(25753,7067,"ide_methods.bas");if(r)goto S_43238;} do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(34))= 0 ; if(!qbevent)break;evnt(25753,7068,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7069,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PANELACTIVE= 0 ; if(!qbevent)break;evnt(25753,7070,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("$DEBUG MODE",11),qbs_new_txt_len("Close Watch Panel",17),qbs_new_txt_len("#Keep Variables;#Clear List",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7071,"ide_methods.bas");}while(r); S_43243:; if ((-(*_SUB_DEBUGMODE_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(25753,7072,"ide_methods.bas");if(r)goto S_43243;} do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7073,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7074,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); } } __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]) error(257); __ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,7074,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7075,"ide_methods.bas");}while(r); S_43248:; fornext_value4688= 1 ; fornext_finalvalue4688=*__LONG_TOTALVARIABLESCREATED; fornext_step4688= 1 ; if (fornext_step4688<0) fornext_step_negative4688=1; else fornext_step_negative4688=0; if (new_error) goto fornext_error4688; goto fornext_entrylabel4688; while(1){ fornext_value4688=fornext_step4688+(*_SUB_DEBUGMODE_LONG_I); fornext_entrylabel4688: *_SUB_DEBUGMODE_LONG_I=fornext_value4688; if (fornext_step_negative4688){ if (fornext_value4688fornext_finalvalue4688) break; } fornext_error4688:; if(qbevent){evnt(25753,7076,"ide_methods.bas");if(r)goto S_43248;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,7077,"ide_methods.bas");}while(r); fornext_continue_4687:; } fornext_exit_4687:; do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.x",13),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7081,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.y",13),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7082,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.w",13),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7083,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),qbs_new_txt_len("settings",8),qbs_new_txt_len("vWatchPanel.h",13),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7084,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7086,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7086,"ide_methods.bas");}while(r); S_43258:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7087,"ide_methods.bas");if(r)goto S_43258;} ww_continue_4689:; } ww_exit_4689:; do{ return_point[next_return_point++]=78; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_78:; if(!qbevent)break;evnt(25753,7089,"ide_methods.bas");}while(r); } S_43262:; if ((*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16)))||new_error){ if(qbevent){evnt(25753,7091,"ide_methods.bas");if(r)goto S_43262;} S_43263:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))== 2 ))||new_error){ if(qbevent){evnt(25753,7092,"ide_methods.bas");if(r)goto S_43263;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))- 1 ; if(!qbevent)break;evnt(25753,7093,"ide_methods.bas");}while(r); S_43265:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))< 1 ))||new_error){ if(qbevent){evnt(25753,7094,"ide_methods.bas");if(r)goto S_43265;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))= 1 ; if(!qbevent)break;evnt(25753,7094,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=79; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_79:; if(!qbevent)break;evnt(25753,7095,"ide_methods.bas");}while(r); S_43269:; }else{ if (-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))== 3 )){ if(qbevent){evnt(25753,7096,"ide_methods.bas");if(r)goto S_43269;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))+ 1 ; if(!qbevent)break;evnt(25753,7097,"ide_methods.bas");}while(r); S_43271:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))>(*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 )))||new_error){ if(qbevent){evnt(25753,7098,"ide_methods.bas");if(r)goto S_43271;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(8))=*_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))- 2 )+ 1 ; if(!qbevent)break;evnt(25753,7099,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=80; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_80:; if(!qbevent)break;evnt(25753,7101,"ide_methods.bas");}while(r); } } do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))= 0 ; if(!qbevent)break;evnt(25753,7103,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7103,"ide_methods.bas");}while(r); } S_43279:; if ((*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18)))||new_error){ if(qbevent){evnt(25753,7105,"ide_methods.bas");if(r)goto S_43279;} S_43280:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))== 2 ))||new_error){ if(qbevent){evnt(25753,7106,"ide_methods.bas");if(r)goto S_43280;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))- 1 ; if(!qbevent)break;evnt(25753,7107,"ide_methods.bas");}while(r); S_43282:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))< 1 ))||new_error){ if(qbevent){evnt(25753,7108,"ide_methods.bas");if(r)goto S_43282;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))= 1 ; if(!qbevent)break;evnt(25753,7108,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=81; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_81:; if(!qbevent)break;evnt(25753,7109,"ide_methods.bas");}while(r); S_43286:; }else{ if (-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))== 3 )){ if(qbevent){evnt(25753,7110,"ide_methods.bas");if(r)goto S_43286;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))=*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))+ 1 ; if(!qbevent)break;evnt(25753,7111,"ide_methods.bas");}while(r); S_43288:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))>(*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 )))||new_error){ if(qbevent){evnt(25753,7112,"ide_methods.bas");if(r)goto S_43288;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(10))=*(int32*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(24))-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))- 4 )+ 1 ; if(!qbevent)break;evnt(25753,7113,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=82; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_82:; if(!qbevent)break;evnt(25753,7115,"ide_methods.bas");}while(r); } } do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))= 0 ; if(!qbevent)break;evnt(25753,7117,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7117,"ide_methods.bas");}while(r); } S_43296:; if ((*_SUB_DEBUGMODE_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(25753,7119,"ide_methods.bas");if(r)goto S_43296;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7120,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DRAGGINGVTHUMB= 0 ; if(!qbevent)break;evnt(25753,7121,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DRAGGINGHTHUMB= 0 ; if(!qbevent)break;evnt(25753,7122,"ide_methods.bas");}while(r); S_43300:; if (((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON> 0 ))&(-(*__LONG_MX==*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX))&(-(*__LONG_MY==*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY)))||new_error){ if(qbevent){evnt(25753,7124,"ide_methods.bas");if(r)goto S_43300;} S_43301:; if(qbevent){evnt(25753,7125,"ide_methods.bas");if(r)goto S_43301;} S_43302:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 1 )))||new_error){ if(qbevent){evnt(25753,7126,"ide_methods.bas");if(r)goto S_43302;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7126,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7126,"ide_methods.bas");}while(r); do{ goto LABEL_F4; if(!qbevent)break;evnt(25753,7126,"ide_methods.bas");}while(r); sc_ec_219_end:; goto sc_4690_end; } S_43306:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 2 )))||new_error){ if(qbevent){evnt(25753,7127,"ide_methods.bas");if(r)goto S_43306;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7127,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7127,"ide_methods.bas");}while(r); do{ goto LABEL_F5; if(!qbevent)break;evnt(25753,7127,"ide_methods.bas");}while(r); sc_ec_220_end:; goto sc_4690_end; } S_43310:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 3 )))||new_error){ if(qbevent){evnt(25753,7128,"ide_methods.bas");if(r)goto S_43310;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7128,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7128,"ide_methods.bas");}while(r); do{ goto LABEL_F6; if(!qbevent)break;evnt(25753,7128,"ide_methods.bas");}while(r); sc_ec_221_end:; goto sc_4690_end; } S_43314:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 4 )))||new_error){ if(qbevent){evnt(25753,7129,"ide_methods.bas");if(r)goto S_43314;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7129,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7129,"ide_methods.bas");}while(r); do{ goto LABEL_F7; if(!qbevent)break;evnt(25753,7129,"ide_methods.bas");}while(r); sc_ec_222_end:; goto sc_4690_end; } S_43318:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 5 )))||new_error){ if(qbevent){evnt(25753,7130,"ide_methods.bas");if(r)goto S_43318;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7130,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7130,"ide_methods.bas");}while(r); do{ goto LABEL_F8; if(!qbevent)break;evnt(25753,7130,"ide_methods.bas");}while(r); sc_ec_223_end:; goto sc_4690_end; } S_43322:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 6 )))||new_error){ if(qbevent){evnt(25753,7131,"ide_methods.bas");if(r)goto S_43322;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7131,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7131,"ide_methods.bas");}while(r); do{ goto LABEL_F9; if(!qbevent)break;evnt(25753,7131,"ide_methods.bas");}while(r); sc_ec_224_end:; goto sc_4690_end; } S_43326:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 7 )))||new_error){ if(qbevent){evnt(25753,7132,"ide_methods.bas");if(r)goto S_43326;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7132,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7132,"ide_methods.bas");}while(r); do{ goto LABEL_F10; if(!qbevent)break;evnt(25753,7132,"ide_methods.bas");}while(r); sc_ec_225_end:; goto sc_4690_end; } S_43330:; if (((*_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON==( 8 )))||new_error){ if(qbevent){evnt(25753,7133,"ide_methods.bas");if(r)goto S_43330;} do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWNONBUTTON= 0 ; if(!qbevent)break;evnt(25753,7133,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7133,"ide_methods.bas");}while(r); do{ goto LABEL_F12; if(!qbevent)break;evnt(25753,7133,"ide_methods.bas");}while(r); sc_ec_226_end:; goto sc_4690_end; } sc_4690_end:; } S_43336:; if ((((-(*__LONG_MX> 1 ))&(-(*__LONG_MX<=( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))&*__BYTE_SHOWLINENUMBERS)|((-(*__LONG_MX== 1 ))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))&(-(*__BYTE_SHOWLINENUMBERS== 0 ))))||new_error){ if(qbevent){evnt(25753,7138,"ide_methods.bas");if(r)goto S_43336;} S_43337:; if (((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX==*__LONG_MX))&(-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY==*__LONG_MY)))||new_error){ if(qbevent){evnt(25753,7140,"ide_methods.bas");if(r)goto S_43337;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7141,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_IDECYTEMP=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,7142,"ide_methods.bas");}while(r); S_43340:; if ((-(*_SUB_DEBUGMODE_LONG_IDECYTEMP<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,7143,"ide_methods.bas");if(r)goto S_43340;} S_43341:; if ((func__keydown( 100304 )|func__keydown( 100303 ))||new_error){ if(qbevent){evnt(25753,7144,"ide_methods.bas");if(r)goto S_43341;} S_43342:; if ((-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]== -1 ))||new_error){ if(qbevent){evnt(25753,7145,"ide_methods.bas");if(r)goto S_43342;} do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,7146,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("clear skip line:",16),l2string(*_SUB_DEBUGMODE_LONG_IDECYTEMP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7147,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(25753,7149,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,7150,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("set skip line:",14),l2string(*_SUB_DEBUGMODE_LONG_IDECYTEMP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7151,"ide_methods.bas");}while(r); } }else{ S_43351:; if ((((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])])||new_error){ if(qbevent){evnt(25753,7154,"ide_methods.bas");if(r)goto S_43351;} do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,7155,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("clear breakpoint:",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7156,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(25753,7158,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_IDECYTEMP)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,7159,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("set breakpoint:",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7160,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_IDECYTEMP))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7162,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=83; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_83:; if(!qbevent)break;evnt(25753,7164,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=84; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_84:; if(!qbevent)break;evnt(25753,7165,"ide_methods.bas");}while(r); } } S_43365:; }else{ if ((-(*__LONG_MX>( 1 +*__LONG_MAXLINENUMBERLENGTH)))&(-(*__LONG_MX<*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))){ if(qbevent){evnt(25753,7168,"ide_methods.bas");if(r)goto S_43365;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7170,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_MY- 2 +*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,7171,"ide_methods.bas");}while(r); S_43368:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,7172,"ide_methods.bas");if(r)goto S_43368;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,7172,"ide_methods.bas");}while(r); } S_43371:; if ((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,7173,"ide_methods.bas");if(r)goto S_43371;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7173,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=85; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_85:; if(!qbevent)break;evnt(25753,7173,"ide_methods.bas");}while(r); } S_43375:; }else{ if ((-(*__LONG_MX==*__LONG_IDEWX))&(-(*__LONG_MY> 2 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 5 )))){ if(qbevent){evnt(25753,7174,"ide_methods.bas");if(r)goto S_43375;} S_43376:; if (((-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONX==*__LONG_MX))&(-(*_SUB_DEBUGMODE_LONG_MOUSEDOWNONY==*__LONG_MY)))||new_error){ if(qbevent){evnt(25753,7176,"ide_methods.bas");if(r)goto S_43376;} S_43377:; if ((-(*__LONG_MY== 3 ))||new_error){ if(qbevent){evnt(25753,7177,"ide_methods.bas");if(r)goto S_43377;} do{ goto LABEL_KEYUP; if(!qbevent)break;evnt(25753,7177,"ide_methods.bas");}while(r); } S_43380:; if ((-(*__LONG_MY==(*__LONG_IDEWY- 6 )))||new_error){ if(qbevent){evnt(25753,7178,"ide_methods.bas");if(r)goto S_43380;} do{ goto LABEL_KEYDOWN; if(!qbevent)break;evnt(25753,7178,"ide_methods.bas");}while(r); } S_43383:; if (((-(*__LONG_MY> 3 ))&(-(*__LONG_MY<(*__LONG_IDEWY- 6 ))))||new_error){ if(qbevent){evnt(25753,7179,"ide_methods.bas");if(r)goto S_43383;} S_43384:; if ((-(*__LONG_IDEN> 1 ))||new_error){ if(qbevent){evnt(25753,7181,"ide_methods.bas");if(r)goto S_43384;} do{ *_SUB_DEBUGMODE_LONG_Y=FUNC_IDEVBAR(__LONG_IDEWX,&(pass4691= 3 ),&(pass4692=*__LONG_IDEWY- 8 ),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(25753,7182,"ide_methods.bas");}while(r); S_43386:; if ((-(*_SUB_DEBUGMODE_LONG_Y!=*__LONG_MY))||new_error){ if(qbevent){evnt(25753,7183,"ide_methods.bas");if(r)goto S_43386;} S_43387:; if ((-(*__LONG_MY<*_SUB_DEBUGMODE_LONG_Y))||new_error){ if(qbevent){evnt(25753,7184,"ide_methods.bas");if(r)goto S_43387;} do{ goto LABEL_PAGEUP; if(!qbevent)break;evnt(25753,7185,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_PAGEDOWN; if(!qbevent)break;evnt(25753,7187,"ide_methods.bas");}while(r); } } } } } S_43396:; }else{ if ((-(*__LONG_MY==(*__LONG_IDEWY- 4 )))&(-(*__LONG_MX>(*__LONG_IDEWX-( 20 + 10 ))))&(-(*__LONG_MX<(*__LONG_IDEWX- 1 )))){ if(qbevent){evnt(25753,7193,"ide_methods.bas");if(r)goto S_43396;} do{ goto LABEL_FINDJMP; if(!qbevent)break;evnt(25753,7195,"ide_methods.bas");}while(r); } } } } }else{ do{ *_SUB_DEBUGMODE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,7198,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DRAGGINGVTHUMB= 0 ; if(!qbevent)break;evnt(25753,7199,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DRAGGINGHTHUMB= 0 ; if(!qbevent)break;evnt(25753,7200,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))= 0 ; if(!qbevent)break;evnt(25753,7201,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))= 0 ; if(!qbevent)break;evnt(25753,7202,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(34))= 0 ; if(!qbevent)break;evnt(25753,7203,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(16))= 0 ; if(!qbevent)break;evnt(25753,7204,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(18))= 0 ; if(!qbevent)break;evnt(25753,7205,"ide_methods.bas");}while(r); } } LABEL_UPDATESTATUSAREA:; if(qbevent){evnt(25753,7210,"ide_methods.bas");r=0;} S_43410:; if ((func__hasfocus())||new_error){ if(qbevent){evnt(25753,7211,"ide_methods.bas");if(r)goto S_43410;} S_43411:; if ((*_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE)||new_error){ if(qbevent){evnt(25753,7212,"ide_methods.bas");if(r)goto S_43411;} do{ SUB_UPDATEMENUHELPLINE(qbs_new_txt_len("Right-click for options; ESC to abort.",38)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7213,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=86; if (next_return_point>=return_points) more_return_points(); goto LABEL_PRINTVERSION; RETURN_86:; if(!qbevent)break;evnt(25753,7214,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=87; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEBUTTONS; RETURN_87:; if(!qbevent)break;evnt(25753,7215,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE= 0 ; if(!qbevent)break;evnt(25753,7216,"ide_methods.bas");}while(r); } }else{ S_43418:; if ((-(*_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE== 0 ))||new_error){ if(qbevent){evnt(25753,7219,"ide_methods.bas");if(r)goto S_43418;} do{ SUB_CLEARSTATUSWINDOW(&(pass4693= 2 )); if(!qbevent)break;evnt(25753,7220,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4694= 3 )); if(!qbevent)break;evnt(25753,7221,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4695= 2 ),qbs_new_txt_len("Set focus to the IDE to control execution",41),&(pass4696= 15 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7222,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE= -1 ; if(!qbevent)break;evnt(25753,7223,"ide_methods.bas");}while(r); } } S_43425:; if ((-(*__LONG_IDEDEBUGMODE> 1 ))||new_error){ if(qbevent){evnt(25753,7226,"ide_methods.bas");if(r)goto S_43425;} do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,7226,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_K=func__keyhit(); if(!qbevent)break;evnt(25753,7228,"ide_methods.bas");}while(r); S_43429:; if(qbevent){evnt(25753,7229,"ide_methods.bas");if(r)goto S_43429;} S_43430:; if (((*_SUB_DEBUGMODE_LONG_K==( 18432 )))||new_error){ if(qbevent){evnt(25753,7230,"ide_methods.bas");if(r)goto S_43430;} LABEL_KEYUP:; if(qbevent){evnt(25753,7231,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7232,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7232,"ide_methods.bas");}while(r); S_43433:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7233,"ide_methods.bas");if(r)goto S_43433;} do{ *__LONG_IDESY=*__LONG_IDESY- 1 ; if(!qbevent)break;evnt(25753,7234,"ide_methods.bas");}while(r); S_43435:; if ((-(*__LONG_IDESY< 1 ))||new_error){ if(qbevent){evnt(25753,7235,"ide_methods.bas");if(r)goto S_43435;} do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(25753,7235,"ide_methods.bas");}while(r); } S_43438:; if ((-(*__LONG_IDECY>(*__LONG_IDESY+(*__LONG_IDEWY- 9 ))))||new_error){ if(qbevent){evnt(25753,7236,"ide_methods.bas");if(r)goto S_43438;} do{ *__LONG_IDECY=*__LONG_IDESY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,7236,"ide_methods.bas");}while(r); } }else{ do{ *__LONG_IDECY=*__LONG_IDECY- 1 ; if(!qbevent)break;evnt(25753,7238,"ide_methods.bas");}while(r); S_43443:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,7239,"ide_methods.bas");if(r)goto S_43443;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,7239,"ide_methods.bas");}while(r); } } S_43447:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7241,"ide_methods.bas");if(r)goto S_43447;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7241,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=88; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_88:; if(!qbevent)break;evnt(25753,7241,"ide_methods.bas");}while(r); } sc_ec_227_end:; goto sc_4697_end; } S_43451:; if (((*_SUB_DEBUGMODE_LONG_K==( 20480 )))||new_error){ if(qbevent){evnt(25753,7242,"ide_methods.bas");if(r)goto S_43451;} LABEL_KEYDOWN:; if(qbevent){evnt(25753,7243,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7244,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7244,"ide_methods.bas");}while(r); S_43454:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7245,"ide_methods.bas");if(r)goto S_43454;} do{ *__LONG_IDESY=*__LONG_IDESY+ 1 ; if(!qbevent)break;evnt(25753,7246,"ide_methods.bas");}while(r); S_43456:; if ((-(*__LONG_IDESY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,7247,"ide_methods.bas");if(r)goto S_43456;} do{ *__LONG_IDESY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,7247,"ide_methods.bas");}while(r); } S_43459:; if ((-(*__LONG_IDECY<*__LONG_IDESY))||new_error){ if(qbevent){evnt(25753,7248,"ide_methods.bas");if(r)goto S_43459;} do{ *__LONG_IDECY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7248,"ide_methods.bas");}while(r); } }else{ do{ *__LONG_IDECY=*__LONG_IDECY+ 1 ; if(!qbevent)break;evnt(25753,7250,"ide_methods.bas");}while(r); S_43464:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,7251,"ide_methods.bas");if(r)goto S_43464;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,7251,"ide_methods.bas");}while(r); } } S_43468:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7253,"ide_methods.bas");if(r)goto S_43468;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7253,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=89; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_89:; if(!qbevent)break;evnt(25753,7253,"ide_methods.bas");}while(r); } sc_ec_228_end:; goto sc_4697_end; } S_43472:; if (((*_SUB_DEBUGMODE_LONG_K==( 18688 )))||new_error){ if(qbevent){evnt(25753,7254,"ide_methods.bas");if(r)goto S_43472;} LABEL_PAGEUP:; if(qbevent){evnt(25753,7255,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7256,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7256,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY-(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,7257,"ide_methods.bas");}while(r); S_43476:; if ((-(*__LONG_IDECY< 1 ))||new_error){ if(qbevent){evnt(25753,7258,"ide_methods.bas");if(r)goto S_43476;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,7258,"ide_methods.bas");}while(r); } S_43479:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7259,"ide_methods.bas");if(r)goto S_43479;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7259,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=90; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_90:; if(!qbevent)break;evnt(25753,7259,"ide_methods.bas");}while(r); } sc_ec_229_end:; goto sc_4697_end; } S_43483:; if (((*_SUB_DEBUGMODE_LONG_K==( 20736 )))||new_error){ if(qbevent){evnt(25753,7260,"ide_methods.bas");if(r)goto S_43483;} LABEL_PAGEDOWN:; if(qbevent){evnt(25753,7261,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7262,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7262,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDECY+(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,7263,"ide_methods.bas");}while(r); S_43487:; if ((-(*__LONG_IDECY>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,7264,"ide_methods.bas");if(r)goto S_43487;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,7264,"ide_methods.bas");}while(r); } S_43490:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7265,"ide_methods.bas");if(r)goto S_43490;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7265,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=91; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_91:; if(!qbevent)break;evnt(25753,7265,"ide_methods.bas");}while(r); } sc_ec_230_end:; goto sc_4697_end; } S_43494:; if (((*_SUB_DEBUGMODE_LONG_K==( 18176 )))||new_error){ if(qbevent){evnt(25753,7266,"ide_methods.bas");if(r)goto S_43494;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7267,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7267,"ide_methods.bas");}while(r); S_43497:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7268,"ide_methods.bas");if(r)goto S_43497;} do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,7268,"ide_methods.bas");}while(r); } S_43500:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7269,"ide_methods.bas");if(r)goto S_43500;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7269,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=92; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_92:; if(!qbevent)break;evnt(25753,7269,"ide_methods.bas");}while(r); } sc_ec_231_end:; goto sc_4697_end; } S_43504:; if (((*_SUB_DEBUGMODE_LONG_K==( 20224 )))||new_error){ if(qbevent){evnt(25753,7270,"ide_methods.bas");if(r)goto S_43504;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7271,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7271,"ide_methods.bas");}while(r); S_43507:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7272,"ide_methods.bas");if(r)goto S_43507;} do{ *__LONG_IDECY=*__LONG_IDEN; if(!qbevent)break;evnt(25753,7272,"ide_methods.bas");}while(r); } S_43510:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7273,"ide_methods.bas");if(r)goto S_43510;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7273,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=93; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_93:; if(!qbevent)break;evnt(25753,7273,"ide_methods.bas");}while(r); } sc_ec_232_end:; goto sc_4697_end; } S_43514:; if (((*_SUB_DEBUGMODE_LONG_K==( 27 )))||new_error){ if(qbevent){evnt(25753,7274,"ide_methods.bas");if(r)goto S_43514;} LABEL_REQUESTQUIT:; if(qbevent){evnt(25753,7275,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("free",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7276,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=94; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_94:; if(!qbevent)break;evnt(25753,7277,"ide_methods.bas");}while(r); do{ sub_close(*__LONG_DEBUGCLIENT,1); if(!qbevent)break;evnt(25753,7278,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4698= 0 )); if(!qbevent)break;evnt(25753,7279,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4699= 0 )); if(!qbevent)break;evnt(25753,7280,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4700= 1 ),qbs_new_txt_len("Debug session aborted.",22),&(pass4701= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7281,"ide_methods.bas");}while(r); S_43521:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7282,"ide_methods.bas");if(r)goto S_43521;} ww_continue_4702:; } ww_exit_4702:; do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,7283,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,7284,"ide_methods.bas");}while(r); sc_ec_233_end:; goto sc_4697_end; } S_43525:; if (((*_SUB_DEBUGMODE_LONG_K==( 15360 )))||new_error){ if(qbevent){evnt(25753,7285,"ide_methods.bas");if(r)goto S_43525;} LABEL_REQUESTSUBSDIALOG:; if(qbevent){evnt(25753,7286,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_BKPIDECY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,7287,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BKPIDESY=*__LONG_IDESY; if(!qbevent)break;evnt(25753,7287,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_R,FUNC_IDESUBS()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7288,"ide_methods.bas");}while(r); S_43529:; if (((-(*_SUB_DEBUGMODE_LONG_BKPIDECY!=*__LONG_IDECY))|(-(*_SUB_DEBUGMODE_LONG_BKPIDESY!=*__LONG_IDESY)))||new_error){ if(qbevent){evnt(25753,7289,"ide_methods.bas");if(r)goto S_43529;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7289,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=95; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_95:; if(!qbevent)break;evnt(25753,7289,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7290,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7290,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=96; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_96:; if(!qbevent)break;evnt(25753,7291,"ide_methods.bas");}while(r); S_43536:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7292,"ide_methods.bas");if(r)goto S_43536;} ww_continue_4703:; } ww_exit_4703:; sc_ec_234_end:; goto sc_4697_end; } S_43538:; if (((*_SUB_DEBUGMODE_LONG_K==( 102 ))||(*_SUB_DEBUGMODE_LONG_K==( 70 )))||new_error){ if(qbevent){evnt(25753,7293,"ide_methods.bas");if(r)goto S_43538;} S_43539:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7294,"ide_methods.bas");if(r)goto S_43539;} do{ goto LABEL_FINDJMP; if(!qbevent)break;evnt(25753,7294,"ide_methods.bas");}while(r); } sc_ec_235_end:; goto sc_4697_end; } S_43542:; if (((*_SUB_DEBUGMODE_LONG_K==( 15616 )))||new_error){ if(qbevent){evnt(25753,7295,"ide_methods.bas");if(r)goto S_43542;} S_43543:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7296,"ide_methods.bas");if(r)goto S_43543;} do{ goto LABEL_FINDJMP; if(!qbevent)break;evnt(25753,7296,"ide_methods.bas");}while(r); } S_43546:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDEFINDTEXT,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,7297,"ide_methods.bas");if(r)goto S_43546;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,7300,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX-( 20 + 10 ),*__LONG_IDEWY- 4 ,func_chr( 180 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7300,"ide_methods.bas");}while(r); do{ qbg_sub_color( 3 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,7301,"ide_methods.bas");}while(r); do{ sub__printstring( 1 +*__LONG_IDEWX-( 20 + 10 ),*__LONG_IDEWY- 4 ,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Find[",5),func_space( 20 + 1 )),func_chr( 18 )),qbs_new_txt_len("]",1)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7302,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_A,qbs_left(__STRING_IDEFINDTEXT, 20 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7303,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX-( 20 + 8 )+ 4 ,*__LONG_IDEWY- 4 ,_SUB_DEBUGMODE_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7304,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,7305,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 2 ,*__LONG_IDEWY- 4 ,func_chr( 195 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7305,"ide_methods.bas");}while(r); S_43555:; if ((func__keydown( 100304 )|func__keydown( 100303 ))||new_error){ if(qbevent){evnt(25753,7307,"ide_methods.bas");if(r)goto S_43555;} do{ *__INTEGER_IDEFINDINVERT= 1 ; if(!qbevent)break;evnt(25753,7307,"ide_methods.bas");}while(r); } do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7308,"ide_methods.bas");}while(r); do{ SUB_IDEFINDAGAIN(&(pass4704= -1 )); if(!qbevent)break;evnt(25753,7309,"ide_methods.bas");}while(r); }else{ LABEL_FINDJMP:; if(qbevent){evnt(25753,7311,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_R,FUNC_IDEFIND()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7312,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7313,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7313,"ide_methods.bas");}while(r); S_43564:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7314,"ide_methods.bas");if(r)goto S_43564;} ww_continue_4705:; } ww_exit_4705:; } do{ return_point[next_return_point++]=97; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_97:; if(!qbevent)break;evnt(25753,7316,"ide_methods.bas");}while(r); sc_ec_236_end:; goto sc_4697_end; } S_43568:; if (((*_SUB_DEBUGMODE_LONG_K==( 15872 )))||new_error){ if(qbevent){evnt(25753,7317,"ide_methods.bas");if(r)goto S_43568;} LABEL_F4:; if(qbevent){evnt(25753,7318,"ide_methods.bas");r=0;} S_43569:; if ((-(*_SUB_DEBUGMODE_BYTE_PAUSEMODE== 0 ))||new_error){ if(qbevent){evnt(25753,7319,"ide_methods.bas");if(r)goto S_43569;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("break",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7320,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,7321,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=98; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_98:; if(!qbevent)break;evnt(25753,7322,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_ESTABILISHINGSCOPE= -1 ; if(!qbevent)break;evnt(25753,7323,"ide_methods.bas");}while(r); }else{ LABEL_REQUESTVARIABLEWATCH:; if(qbevent){evnt(25753,7325,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_HIDEPANEL= -1 ; if(!qbevent)break;evnt(25753,7326,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=99; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_99:; if(!qbevent)break;evnt(25753,7327,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_SELECTVAR= 1 ; if(!qbevent)break;evnt(25753,7328,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_FILTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7329,"ide_methods.bas");}while(r); S_43579:; do{ if(qbevent){evnt(25753,7330,"ide_methods.bas");if(r)goto S_43579;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,FUNC_IDEVARIABLEWATCHBOX(_SUB_DEBUGMODE_STRING_CURRENTSUB,_SUB_DEBUGMODE_STRING_FILTER,_SUB_DEBUGMODE_LONG_SELECTVAR,_SUB_DEBUGMODE_LONG_RETURNACTION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7331,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(qbs_new_txt_len("",0),&(pass4707= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7332,"ide_methods.bas");}while(r); S_43582:; if ((-(*_SUB_DEBUGMODE_LONG_RETURNACTION== 1 ))||new_error){ if(qbevent){evnt(25753,7333,"ide_methods.bas");if(r)goto S_43582;} do{ *_SUB_DEBUGMODE_LONG_TEMPINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4708= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7335,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPISARRAY=string2b(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4709= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7336,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4710= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7337,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPLOCALINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4711= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7338,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4712= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7339,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,qbs_add(l2string(*_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX),FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7340,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPARRAYELEMENTSIZE=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4713= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7341,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPISUDT=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4714= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7342,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4715= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7343,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4716= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7344,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4717= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7345,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPSTORAGE=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4718= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7346,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4719= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7347,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPSCOPE,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7348,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4720= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7349,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_VARTYPE,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7350,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4721= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7351,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7352,"ide_methods.bas");}while(r); S_43601:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len== 0 )))||new_error){ if(qbevent){evnt(25753,7354,"ide_methods.bas");if(r)goto S_43601;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("set global address:",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7355,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("set local address:",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7357,"ide_methods.bas");}while(r); } LABEL_FINDVARSIZE:; if(qbevent){evnt(25753,7360,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,_SUB_DEBUGMODE_STRING_VARTYPE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7361,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_FIXEDVARSIZE= 0 ; if(!qbevent)break;evnt(25753,7362,"ide_methods.bas");}while(r); S_43608:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,7363,"ide_methods.bas");if(r)goto S_43608;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7364,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_FIXEDVARSIZE=qbr(func_val(func_mid(_SUB_DEBUGMODE_STRING_VARTYPE,func__instrrev(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("* ",2),0)+ 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7365,"ide_methods.bas");}while(r); } S_43612:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,7367,"ide_methods.bas");if(r)goto S_43612;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7367,"ide_methods.bas");}while(r); } S_43615:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_BIT",4)))&(-(func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("UNSIGNED",8),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,7368,"ide_methods.bas");if(r)goto S_43615;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _BIT",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7369,"ide_methods.bas");}while(r); } S_43618:; if(qbevent){evnt(25753,7371,"ide_methods.bas");if(r)goto S_43618;} S_43619:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_BIT",4))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _BIT",14))))||new_error){ if(qbevent){evnt(25753,7372,"ide_methods.bas");if(r)goto S_43619;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,l2string(qbr(func_val(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7373,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=4; if(!qbevent)break;evnt(25753,7374,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((int32)(string2l(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7375,"ide_methods.bas");}while(r); sc_ec_237_end:; goto sc_4722_end; } S_43623:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_BYTE",5))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _BYTE",15))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("BYTE",4))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED BYTE",13))))||new_error){ if(qbevent){evnt(25753,7376,"ide_methods.bas");if(r)goto S_43623;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,b2string(qbr_float_to_long(func_val(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7377,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=1; if(!qbevent)break;evnt(25753,7378,"ide_methods.bas");}while(r); S_43626:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED",8),0)> 0 )))||new_error){ if(qbevent){evnt(25753,7379,"ide_methods.bas");if(r)goto S_43626;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((uint8)(string2ub(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7380,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((int8)(string2b(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7382,"ide_methods.bas");}while(r); } sc_ec_238_end:; goto sc_4722_end; } S_43631:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("INTEGER",7))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED INTEGER",17))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED INTEGER",16))))||new_error){ if(qbevent){evnt(25753,7384,"ide_methods.bas");if(r)goto S_43631;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,i2string(qbr_float_to_long(func_val(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7385,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=2; if(!qbevent)break;evnt(25753,7386,"ide_methods.bas");}while(r); S_43634:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED",8),0)> 0 )))||new_error){ if(qbevent){evnt(25753,7387,"ide_methods.bas");if(r)goto S_43634;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((uint16)(string2ui(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7388,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((int16)(string2i(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7390,"ide_methods.bas");}while(r); } sc_ec_239_end:; goto sc_4722_end; } S_43639:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("LONG",4))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED LONG",14))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED LONG",13))))||new_error){ if(qbevent){evnt(25753,7392,"ide_methods.bas");if(r)goto S_43639;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,l2string(qbr(func_val(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7393,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=4; if(!qbevent)break;evnt(25753,7394,"ide_methods.bas");}while(r); S_43642:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED",8),0)> 0 )))||new_error){ if(qbevent){evnt(25753,7395,"ide_methods.bas");if(r)goto S_43642;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((uint32)(string2ul(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7396,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((int32)(string2l(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7398,"ide_methods.bas");}while(r); } sc_ec_240_end:; goto sc_4722_end; } S_43647:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_INTEGER64",10))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("INTEGER64",9))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _INTEGER64",20))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED INTEGER64",18))))||new_error){ if(qbevent){evnt(25753,7400,"ide_methods.bas");if(r)goto S_43647;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,i642string(qbr(func_val(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7401,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8; if(!qbevent)break;evnt(25753,7402,"ide_methods.bas");}while(r); S_43650:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED",8),0)> 0 )))||new_error){ if(qbevent){evnt(25753,7403,"ide_methods.bas");if(r)goto S_43650;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((uint64)(string2ui64(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7404,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((int64)(string2i64(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7406,"ide_methods.bas");}while(r); } sc_ec_241_end:; goto sc_4722_end; } S_43655:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(25753,7408,"ide_methods.bas");if(r)goto S_43655;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,s2string(func_val(_SUB_DEBUGMODE_STRING_VALUE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7409,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=4; if(!qbevent)break;evnt(25753,7410,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((float)(string2s(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7411,"ide_methods.bas");}while(r); sc_ec_242_end:; goto sc_4722_end; } S_43659:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(25753,7412,"ide_methods.bas");if(r)goto S_43659;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,d2string(func_val(_SUB_DEBUGMODE_STRING_VALUE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7413,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8; if(!qbevent)break;evnt(25753,7414,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((double)(string2d(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7415,"ide_methods.bas");}while(r); sc_ec_243_end:; goto sc_4722_end; } S_43663:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_FLOAT",6))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("FLOAT",5))))||new_error){ if(qbevent){evnt(25753,7416,"ide_methods.bas");if(r)goto S_43663;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,f2string(func_val(_SUB_DEBUGMODE_STRING_VALUE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7417,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=32; if(!qbevent)break;evnt(25753,7418,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((long double)(string2f(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7419,"ide_methods.bas");}while(r); sc_ec_244_end:; goto sc_4722_end; } S_43667:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_OFFSET",7))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _OFFSET",17))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("OFFSET",6))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED OFFSET",15))))||new_error){ if(qbevent){evnt(25753,7420,"ide_methods.bas");if(r)goto S_43667;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,o2string(qbr(func_val(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7421,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8; if(!qbevent)break;evnt(25753,7422,"ide_methods.bas");}while(r); S_43670:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED",8),0)> 0 )))||new_error){ if(qbevent){evnt(25753,7423,"ide_methods.bas");if(r)goto S_43670;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((uint64)(string2uo(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7424,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_str((int64)(string2o(_SUB_DEBUGMODE_STRING_VALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7426,"ide_methods.bas");}while(r); } sc_ec_245_end:; goto sc_4722_end; } S_43675:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(25753,7428,"ide_methods.bas");if(r)goto S_43675;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=_SUB_DEBUGMODE_STRING_VALUE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7429,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7430,"ide_methods.bas");}while(r); S_43678:; if ((*_SUB_DEBUGMODE_LONG_FIXEDVARSIZE)||new_error){ if(qbevent){evnt(25753,7431,"ide_methods.bas");if(r)goto S_43678;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=*_SUB_DEBUGMODE_LONG_FIXEDVARSIZE; if(!qbevent)break;evnt(25753,7432,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RESULT,qbs_left(_SUB_DEBUGMODE_STRING_RESULT,*_SUB_DEBUGMODE_LONG_FIXEDVARSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7433,"ide_methods.bas");}while(r); } sc_ec_246_end:; goto sc_4722_end; } sc_4722_end:; S_43683:; if (((-(*_SUB_DEBUGMODE_LONG_RETURNACTION== 2 ))|(-(*_SUB_DEBUGMODE_LONG_RETURNACTION== 3 )))||new_error){ if(qbevent){evnt(25753,7437,"ide_methods.bas");if(r)goto S_43683;} do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,7437,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7439,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,b2string(-(*_SUB_DEBUGMODE_LONG_TEMPISARRAY!= 0 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7440,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7441,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPLOCALINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7442,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7443,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPARRAYELEMENTSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7444,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPISUDT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7445,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7446,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7447,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_VARSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7448,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPSTORAGE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7449,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_TEMPSCOPE->len)),_SUB_DEBUGMODE_STRING_TEMPSCOPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7450,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_VARTYPE->len)),_SUB_DEBUGMODE_STRING_VARTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7451,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_VALUE->len)),_SUB_DEBUGMODE_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7452,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=100; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_100:; if(!qbevent)break;evnt(25753,7453,"ide_methods.bas");}while(r); S_43701:; if ((-(*_SUB_DEBUGMODE_LONG_TEMPSTORAGE> 0 ))||new_error){ if(qbevent){evnt(25753,7455,"ide_methods.bas");if(r)goto S_43701;} do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_TEMPSTORAGE)-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long])),_SUB_DEBUGMODE_STRING_RESULT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7456,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7459,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7459,"ide_methods.bas");}while(r); S_43706:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7460,"ide_methods.bas");if(r)goto S_43706;} ww_continue_4736:; } ww_exit_4736:; do{ *_SUB_DEBUGMODE_LONG_HIDEPANEL= -1 ; if(!qbevent)break;evnt(25753,7461,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=101; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_101:; if(!qbevent)break;evnt(25753,7462,"ide_methods.bas");}while(r); S_43710:; }else{ if ((-(*_SUB_DEBUGMODE_LONG_RETURNACTION== 2 ))|(-(*_SUB_DEBUGMODE_LONG_RETURNACTION== 3 ))){ if(qbevent){evnt(25753,7463,"ide_methods.bas");if(r)goto S_43710;} do{ *_SUB_DEBUGMODE_LONG_TEMPINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4737= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7465,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPISARRAY=-(string2b(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4738= 1 )))!= 0 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7466,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4739= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7467,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPLOCALINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4740= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7468,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4741= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7469,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,qbs_add(l2string(*_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX),FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7470,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPARRAYELEMENTSIZE=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4742= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7471,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPISUDT=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4743= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7472,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENT=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4744= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7473,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4745= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7474,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4746= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7475,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPSTORAGE=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4747= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7476,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4748= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7477,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPSCOPE,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7478,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4749= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7479,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_VARTYPE,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7480,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,&(pass4750= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7481,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_RESULT,_SUB_DEBUGMODE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7482,"ide_methods.bas");}while(r); S_43729:; if ((-(*_SUB_DEBUGMODE_LONG_RETURNACTION== 2 ))||new_error){ if(qbevent){evnt(25753,7484,"ide_methods.bas");if(r)goto S_43729;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("set ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7485,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("clear ",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7488,"ide_methods.bas");}while(r); } S_43734:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len== 0 )))||new_error){ if(qbevent){evnt(25753,7491,"ide_methods.bas");if(r)goto S_43734;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("global watchpoint:",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7492,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("local watchpoint:",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7494,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7497,"ide_methods.bas");}while(r); S_43740:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("STRING",6),0)== 0 )))||new_error){ if(qbevent){evnt(25753,7498,"ide_methods.bas");if(r)goto S_43740;} do{ return_point[next_return_point++]=102; if (next_return_point>=return_points) more_return_points(); goto LABEL_FINDVARSIZE; RETURN_102:; if(!qbevent)break;evnt(25753,7499,"ide_methods.bas");}while(r); }else{ S_43743:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len(" * ",3),0)> 0 ))&(((-(*_SUB_DEBUGMODE_LONG_TEMPISUDT!= 0 ))|(-(*_SUB_DEBUGMODE_LONG_TEMPISARRAY!= 0 ))))))||new_error){ if(qbevent){evnt(25753,7501,"ide_methods.bas");if(r)goto S_43743;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=qbr(func_val(qbs__trim(func_mid(_SUB_DEBUGMODE_STRING_VARTYPE,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)+ 8 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7502,"ide_methods.bas");}while(r); }else{ do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8+4; if(!qbevent)break;evnt(25753,7504,"ide_methods.bas");}while(r); } } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7508,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,b2string(-(*_SUB_DEBUGMODE_LONG_TEMPISARRAY!= 0 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7509,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+4))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7510,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPLOCALINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7511,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7512,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPARRAYELEMENTSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7513,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPISUDT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7514,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPELEMENT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7515,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7516,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_VARSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7517,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPSTORAGE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7518,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_TEMPSCOPE->len)),_SUB_DEBUGMODE_STRING_TEMPSCOPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7519,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_VARTYPE->len)),_SUB_DEBUGMODE_STRING_VARTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7520,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_TEMP->len)),_SUB_DEBUGMODE_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7521,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=103; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_103:; if(!qbevent)break;evnt(25753,7522,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7524,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7524,"ide_methods.bas");}while(r); S_43766:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7525,"ide_methods.bas");if(r)goto S_43766;} ww_continue_4756:; } ww_exit_4756:; do{ *_SUB_DEBUGMODE_LONG_HIDEPANEL= -1 ; if(!qbevent)break;evnt(25753,7526,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=104; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_104:; if(!qbevent)break;evnt(25753,7527,"ide_methods.bas");}while(r); do{ goto dl_continue_4706; if(!qbevent)break;evnt(25753,7528,"ide_methods.bas");}while(r); S_43771:; }else{ if (-(*_SUB_DEBUGMODE_LONG_RETURNACTION== -1 )){ if(qbevent){evnt(25753,7529,"ide_methods.bas");if(r)goto S_43771;} do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7530,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7530,"ide_methods.bas");}while(r); S_43774:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7531,"ide_methods.bas");if(r)goto S_43774;} ww_continue_4757:; } ww_exit_4757:; do{ *_SUB_DEBUGMODE_LONG_HIDEPANEL= -1 ; if(!qbevent)break;evnt(25753,7532,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=105; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_105:; if(!qbevent)break;evnt(25753,7533,"ide_methods.bas");}while(r); do{ goto dl_continue_4706; if(!qbevent)break;evnt(25753,7534,"ide_methods.bas");}while(r); }else{ do{ goto dl_exit_4706; if(!qbevent)break;evnt(25753,7536,"ide_methods.bas");}while(r); } } } dl_continue_4706:; }while(1); dl_exit_4706:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7539,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7539,"ide_methods.bas");}while(r); S_43785:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7540,"ide_methods.bas");if(r)goto S_43785;} ww_continue_4758:; } ww_exit_4758:; do{ return_point[next_return_point++]=106; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_106:; if(!qbevent)break;evnt(25753,7541,"ide_methods.bas");}while(r); S_43788:; if ((qbs_cleanup(qbs_tmp_base,__STRING_VARIABLEWATCHLIST->len))||new_error){ if(qbevent){evnt(25753,7542,"ide_methods.bas");if(r)goto S_43788;} do{ *_SUB_DEBUGMODE_BYTE_PANELACTIVE= -1 ; if(!qbevent)break;evnt(25753,7543,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTVARIABLEVALUES; if(!qbevent)break;evnt(25753,7544,"ide_methods.bas");}while(r); } } sc_ec_247_end:; goto sc_4697_end; } S_43793:; if (((*_SUB_DEBUGMODE_LONG_K==( 16128 )))||new_error){ if(qbevent){evnt(25753,7547,"ide_methods.bas");if(r)goto S_43793;} LABEL_F5:; if(qbevent){evnt(25753,7548,"ide_methods.bas");r=0;} LABEL_REQUESTCONTINUE:; if(qbevent){evnt(25753,7549,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= 0 ; if(!qbevent)break;evnt(25753,7550,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGNEXTLINE= 0 ; if(!qbevent)break;evnt(25753,7551,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("run",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7552,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=107; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_107:; if(!qbevent)break;evnt(25753,7553,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4760= 1 )); if(!qbevent)break;evnt(25753,7554,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4761= 1 ),qbs_new_txt_len("Running...",10),&(pass4762= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7555,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=108; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_108:; if(!qbevent)break;evnt(25753,7556,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4763= 1 )); if(!qbevent)break;evnt(25753,7557,"ide_methods.bas");}while(r); do{ set_foreground_window(*_SUB_DEBUGMODE_OFFSET_DEBUGGEEHWND); if(!qbevent)break;evnt(25753,7558,"ide_methods.bas");}while(r); sc_ec_248_end:; goto sc_4697_end; } S_43803:; if (((*_SUB_DEBUGMODE_LONG_K==( 16384 )))||new_error){ if(qbevent){evnt(25753,7559,"ide_methods.bas");if(r)goto S_43803;} LABEL_F6:; if(qbevent){evnt(25753,7560,"ide_methods.bas");r=0;} LABEL_REQUESTSTEPOUT:; if(qbevent){evnt(25753,7561,"ide_methods.bas");r=0;} S_43804:; if ((*_SUB_DEBUGMODE_BYTE_PAUSEMODE)||new_error){ if(qbevent){evnt(25753,7562,"ide_methods.bas");if(r)goto S_43804;} S_43805:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_DEBUGMODE_STRING_CURRENTSUB->len> 0 )))||new_error){ if(qbevent){evnt(25753,7563,"ide_methods.bas");if(r)goto S_43805;} do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= 0 ; if(!qbevent)break;evnt(25753,7564,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("step out",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7565,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=109; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_109:; if(!qbevent)break;evnt(25753,7566,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4765= 1 )); if(!qbevent)break;evnt(25753,7567,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4766= 1 ),qbs_new_txt_len("Running...",10),&(pass4767= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7568,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4768= 1 )); if(!qbevent)break;evnt(25753,7569,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=110; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_110:; if(!qbevent)break;evnt(25753,7570,"ide_methods.bas");}while(r); }else{ do{ SUB_CLEARSTATUSWINDOW(&(pass4769= 0 )); if(!qbevent)break;evnt(25753,7572,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4770= 1 ),qbs_new_txt_len("Not inside a sub/function.",26),&(pass4771= 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7573,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=111; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_111:; if(!qbevent)break;evnt(25753,7574,"ide_methods.bas");}while(r); } } sc_ec_249_end:; goto sc_4697_end; } S_43819:; if (((*_SUB_DEBUGMODE_LONG_K==( 16640 )))||new_error){ if(qbevent){evnt(25753,7577,"ide_methods.bas");if(r)goto S_43819;} LABEL_F7:; if(qbevent){evnt(25753,7578,"ide_methods.bas");r=0;} LABEL_REQUESTSTEPINTO:; if(qbevent){evnt(25753,7579,"ide_methods.bas");r=0;} S_43820:; if ((-(*_SUB_DEBUGMODE_BYTE_PAUSEMODE== 0 ))||new_error){ if(qbevent){evnt(25753,7580,"ide_methods.bas");if(r)goto S_43820;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("break",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7581,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,7582,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=112; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_112:; if(!qbevent)break;evnt(25753,7583,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("step",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7585,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,7586,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=113; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_113:; if(!qbevent)break;evnt(25753,7587,"ide_methods.bas");}while(r); } do{ SUB_CLEARSTATUSWINDOW(&(pass4772= 1 )); if(!qbevent)break;evnt(25753,7589,"ide_methods.bas");}while(r); S_43830:; if ((*_SUB_DEBUGMODE_BYTE_ENTEREDINPUT)||new_error){ if(qbevent){evnt(25753,7590,"ide_methods.bas");if(r)goto S_43830;} do{ SUB_SETSTATUSMESSAGE(&(pass4773= 1 ),qbs_new_txt_len("Execution will be paused after SLEEP/INPUT/LINE INPUT finishes running...",73),&(pass4774= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7591,"ide_methods.bas");}while(r); do{ set_foreground_window(*_SUB_DEBUGMODE_OFFSET_DEBUGGEEHWND); if(!qbevent)break;evnt(25753,7592,"ide_methods.bas");}while(r); }else{ do{ SUB_SETSTATUSMESSAGE(&(pass4775= 1 ),qbs_new_txt_len("Paused.",7),&(pass4776= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7594,"ide_methods.bas");}while(r); } S_43836:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,7596,"ide_methods.bas");if(r)goto S_43836;} do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,7596,"ide_methods.bas");}while(r); } sc_ec_250_end:; goto sc_4697_end; } S_43839:; if (((*_SUB_DEBUGMODE_LONG_K==( 16896 )))||new_error){ if(qbevent){evnt(25753,7597,"ide_methods.bas");if(r)goto S_43839;} LABEL_F8:; if(qbevent){evnt(25753,7598,"ide_methods.bas");r=0;} LABEL_REQUESTSTEPOVER:; if(qbevent){evnt(25753,7599,"ide_methods.bas");r=0;} S_43840:; if ((*_SUB_DEBUGMODE_BYTE_PAUSEMODE)||new_error){ if(qbevent){evnt(25753,7600,"ide_methods.bas");if(r)goto S_43840;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("step over",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7601,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= 0 ; if(!qbevent)break;evnt(25753,7602,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=114; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_114:; if(!qbevent)break;evnt(25753,7603,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4777= 1 )); if(!qbevent)break;evnt(25753,7604,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4778= 1 ),qbs_new_txt_len("Running...",10),&(pass4779= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7605,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4780= 1 )); if(!qbevent)break;evnt(25753,7606,"ide_methods.bas");}while(r); }else{ LABEL_REQUESTPAUSE:; if(qbevent){evnt(25753,7608,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("break",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7609,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,7610,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=115; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_115:; if(!qbevent)break;evnt(25753,7611,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4781= 1 )); if(!qbevent)break;evnt(25753,7612,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4782= 1 ),qbs_new_txt_len("Paused.",7),&(pass4783= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7613,"ide_methods.bas");}while(r); S_43853:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,7614,"ide_methods.bas");if(r)goto S_43853;} do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,7614,"ide_methods.bas");}while(r); } } sc_ec_251_end:; goto sc_4697_end; } S_43857:; if (((*_SUB_DEBUGMODE_LONG_K==( 17152 )))||new_error){ if(qbevent){evnt(25753,7616,"ide_methods.bas");if(r)goto S_43857;} LABEL_F9:; if(qbevent){evnt(25753,7617,"ide_methods.bas");r=0;} LABEL_REQUESTTOGGLEBREAKPOINT:; if(qbevent){evnt(25753,7618,"ide_methods.bas");r=0;} S_43858:; if ((*_SUB_DEBUGMODE_BYTE_PAUSEMODE)||new_error){ if(qbevent){evnt(25753,7619,"ide_methods.bas");if(r)goto S_43858;} do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]=~(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]); if(!qbevent)break;evnt(25753,7620,"ide_methods.bas");}while(r); S_43860:; if ((((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])])||new_error){ if(qbevent){evnt(25753,7621,"ide_methods.bas");if(r)goto S_43860;} do{ tmp_long=array_check((*__LONG_IDECY)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,7622,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("set breakpoint:",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7623,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("clear breakpoint:",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7625,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*__LONG_IDECY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7627,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=116; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_116:; if(!qbevent)break;evnt(25753,7628,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=117; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_117:; if(!qbevent)break;evnt(25753,7629,"ide_methods.bas");}while(r); } sc_ec_252_end:; goto sc_4697_end; } S_43870:; if (((*_SUB_DEBUGMODE_LONG_K==( 17408 )))||new_error){ if(qbevent){evnt(25753,7631,"ide_methods.bas");if(r)goto S_43870;} LABEL_F10:; if(qbevent){evnt(25753,7632,"ide_methods.bas");r=0;} S_43871:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7633,"ide_methods.bas");if(r)goto S_43871;} LABEL_REQUESTUNSKIPALLLINES:; if(qbevent){evnt(25753,7634,"ide_methods.bas");r=0;} do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(25753,7635,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("clear all skips",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7636,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=118; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_118:; if(!qbevent)break;evnt(25753,7637,"ide_methods.bas");}while(r); }else{ LABEL_REQUESTCLEARBREAKPOINTS:; if(qbevent){evnt(25753,7639,"ide_methods.bas");r=0;} do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(25753,7640,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("clear all breakpoints",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7641,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=119; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_119:; if(!qbevent)break;evnt(25753,7642,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=120; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_120:; if(!qbevent)break;evnt(25753,7644,"ide_methods.bas");}while(r); sc_ec_253_end:; goto sc_4697_end; } S_43881:; if (((*_SUB_DEBUGMODE_LONG_K==( 34304 )))||new_error){ if(qbevent){evnt(25753,7645,"ide_methods.bas");if(r)goto S_43881;} LABEL_F12:; if(qbevent){evnt(25753,7646,"ide_methods.bas");r=0;} S_43882:; if ((*_SUB_DEBUGMODE_BYTE_PAUSEMODE)||new_error){ if(qbevent){evnt(25753,7647,"ide_methods.bas");if(r)goto S_43882;} LABEL_REQUESTCALLSTACK:; if(qbevent){evnt(25753,7648,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7649,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=121; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_121:; if(!qbevent)break;evnt(25753,7650,"ide_methods.bas");}while(r); S_43885:; if ((*_SUB_DEBUGMODE_LONG_BYPASSREQUESTCALLSTACK)||new_error){ if(qbevent){evnt(25753,7652,"ide_methods.bas");if(r)goto S_43885;} do{ goto LABEL_SHOWCALLSTACK; if(!qbevent)break;evnt(25753,7652,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4784= 0 )); if(!qbevent)break;evnt(25753,7653,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4785= 0 )); if(!qbevent)break;evnt(25753,7654,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4786= 1 ),qbs_new_txt_len("Requesting call stack...",24),&(pass4787= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7655,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_SINGLE_START=func_timer(NULL,0); if(!qbevent)break;evnt(25753,7657,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= -1 ; if(!qbevent)break;evnt(25753,7658,"ide_methods.bas");}while(r); S_43893:; do{ if(qbevent){evnt(25753,7659,"ide_methods.bas");if(r)goto S_43893;} do{ return_point[next_return_point++]=122; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETCOMMAND; RETURN_122:; if(!qbevent)break;evnt(25753,7660,"ide_methods.bas");}while(r); S_43895:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack size",15))))||new_error){ if(qbevent){evnt(25753,7661,"ide_methods.bas");if(r)goto S_43895;} do{ *__LONG_CALLSTACKLENGTH=string2l(_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7662,"ide_methods.bas");}while(r); S_43897:; if ((-(*__LONG_CALLSTACKLENGTH== 0 ))||new_error){ if(qbevent){evnt(25753,7663,"ide_methods.bas");if(r)goto S_43897;} do{ goto dl_exit_4788; if(!qbevent)break;evnt(25753,7663,"ide_methods.bas");}while(r); } } do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,7665,"ide_methods.bas");}while(r); S_43902:; dl_continue_4788:; }while((!(qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack",10)))|(-((func_timer(NULL,0)-*_SUB_DEBUGMODE_SINGLE_START)>*_SUB_DEBUGMODE_LONG_TIMEOUT)))))&&(!new_error)); dl_exit_4788:; if(qbevent){evnt(25753,7666,"ide_methods.bas");if(r)goto S_43902;} S_43903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack",10))))||new_error){ if(qbevent){evnt(25753,7668,"ide_methods.bas");if(r)goto S_43903;} do{ qbs_set(__STRING_CALLSTACKLIST,_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7670,"ide_methods.bas");}while(r); LABEL_SHOWCALLSTACK:; if(qbevent){evnt(25753,7671,"ide_methods.bas");r=0;} do{ SUB_CLEARSTATUSWINDOW(&(pass4789= 0 )); if(!qbevent)break;evnt(25753,7672,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4790= 1 ),qbs_new_txt_len("Paused.",7),&(pass4791= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7673,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_RETVAL=FUNC_IDECALLSTACKBOX(); if(!qbevent)break;evnt(25753,7674,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7675,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=123; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_123:; if(!qbevent)break;evnt(25753,7676,"ide_methods.bas");}while(r); S_43910:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7677,"ide_methods.bas");if(r)goto S_43910;} ww_continue_4792:; } ww_exit_4792:; }else{ S_43913:; if ((-(*__LONG_CALLSTACKLENGTH== -1 ))||new_error){ if(qbevent){evnt(25753,7679,"ide_methods.bas");if(r)goto S_43913;} do{ *__LONG_CALLSTACKLENGTH= 0 ; if(!qbevent)break;evnt(25753,7680,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4793= 0 )); if(!qbevent)break;evnt(25753,7681,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4794= 1 ),qbs_new_txt_len("Error retrieving call stack.",28),&(pass4795= 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7682,"ide_methods.bas");}while(r); S_43917:; }else{ if (-(*__LONG_CALLSTACKLENGTH== 0 )){ if(qbevent){evnt(25753,7683,"ide_methods.bas");if(r)goto S_43917;} do{ SUB_CLEARSTATUSWINDOW(&(pass4796= 0 )); if(!qbevent)break;evnt(25753,7684,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4797= 1 ),qbs_new_txt_len("No call stack log available.",28),&(pass4798= 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7685,"ide_methods.bas");}while(r); } } } do{ *_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE=~(*_SUB_DEBUGMODE_BYTE_NOFOCUSMESSAGE); if(!qbevent)break;evnt(25753,7688,"ide_methods.bas");}while(r); } sc_ec_254_end:; goto sc_4697_end; } S_43924:; if (((*_SUB_DEBUGMODE_LONG_K==( 103 ))||(*_SUB_DEBUGMODE_LONG_K==( 71 )))||new_error){ if(qbevent){evnt(25753,7690,"ide_methods.bas");if(r)goto S_43924;} S_43925:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7691,"ide_methods.bas");if(r)goto S_43925;} S_43926:; if ((func__keydown( 100304 )|func__keydown( 100303 ))||new_error){ if(qbevent){evnt(25753,7692,"ide_methods.bas");if(r)goto S_43926;} do{ *_SUB_DEBUGMODE_LONG_RESULT=FUNC_IDEGETLINENUMBERBOX(qbs_new_txt_len("Run To Line",11),__LONG_IDECY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7693,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7694,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7694,"ide_methods.bas");}while(r); S_43930:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7695,"ide_methods.bas");if(r)goto S_43930;} ww_continue_4799:; } ww_exit_4799:; LABEL_REQUESTRUNTOTHISLINE:; if(qbevent){evnt(25753,7696,"ide_methods.bas");r=0;} S_43932:; if (((-(*_SUB_DEBUGMODE_LONG_RESULT> 0 ))&(-(*_SUB_DEBUGMODE_LONG_RESULT<=*__LONG_IDEN)))||new_error){ if(qbevent){evnt(25753,7697,"ide_methods.bas");if(r)goto S_43932;} do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= 0 ; if(!qbevent)break;evnt(25753,7698,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGNEXTLINE= 0 ; if(!qbevent)break;evnt(25753,7699,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("run to line:",12),l2string(*_SUB_DEBUGMODE_LONG_RESULT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7700,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=124; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_124:; if(!qbevent)break;evnt(25753,7701,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4800= 1 )); if(!qbevent)break;evnt(25753,7702,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4801= 1 ),qbs_new_txt_len("Running...",10),&(pass4802= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7703,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=125; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_125:; if(!qbevent)break;evnt(25753,7704,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4803= 1 )); if(!qbevent)break;evnt(25753,7705,"ide_methods.bas");}while(r); } }else{ do{ *_SUB_DEBUGMODE_LONG_RESULT=FUNC_IDEGETLINENUMBERBOX(qbs_new_txt_len("Set Next Line",13),__LONG_IDECY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7708,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7709,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7709,"ide_methods.bas");}while(r); S_43946:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7710,"ide_methods.bas");if(r)goto S_43946;} ww_continue_4804:; } ww_exit_4804:; LABEL_REQUESTSETNEXTLINE:; if(qbevent){evnt(25753,7711,"ide_methods.bas");r=0;} S_43948:; if (((-(*_SUB_DEBUGMODE_LONG_RESULT> 0 ))&(-(*_SUB_DEBUGMODE_LONG_RESULT<=*__LONG_IDEN)))||new_error){ if(qbevent){evnt(25753,7712,"ide_methods.bas");if(r)goto S_43948;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_new_txt_len("set next line:",14),l2string(*_SUB_DEBUGMODE_LONG_RESULT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7713,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=126; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_126:; if(!qbevent)break;evnt(25753,7714,"ide_methods.bas");}while(r); } } } sc_ec_255_end:; goto sc_4697_end; } S_43954:; if (((*_SUB_DEBUGMODE_LONG_K==( 112 ))||(*_SUB_DEBUGMODE_LONG_K==( 80 )))||new_error){ if(qbevent){evnt(25753,7718,"ide_methods.bas");if(r)goto S_43954;} S_43955:; if ((func__keydown( 100306 )|func__keydown( 100305 ))||new_error){ if(qbevent){evnt(25753,7719,"ide_methods.bas");if(r)goto S_43955;} do{ *_SUB_DEBUGMODE_LONG_RESULT=FUNC_IDEGETLINENUMBERBOX(qbs_new_txt_len("Skip Line",9),__LONG_IDECY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7720,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7721,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7721,"ide_methods.bas");}while(r); S_43959:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7722,"ide_methods.bas");if(r)goto S_43959;} ww_continue_4805:; } ww_exit_4805:; LABEL_REQUESTTOGGLESKIPLINE:; if(qbevent){evnt(25753,7723,"ide_methods.bas");r=0;} S_43961:; if (((-(*_SUB_DEBUGMODE_LONG_RESULT> 0 ))&(-(*_SUB_DEBUGMODE_LONG_RESULT<=*__LONG_IDEN)))||new_error){ if(qbevent){evnt(25753,7724,"ide_methods.bas");if(r)goto S_43961;} do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_RESULT)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]=~(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_DEBUGMODE_LONG_RESULT)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]); if(!qbevent)break;evnt(25753,7725,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("set skip line:",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7726,"ide_methods.bas");}while(r); S_43964:; if ((-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_DEBUGMODE_LONG_RESULT)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]== 0 ))||new_error){ if(qbevent){evnt(25753,7727,"ide_methods.bas");if(r)goto S_43964;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("clear skip line:",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7727,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_RESULT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7728,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=127; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_127:; if(!qbevent)break;evnt(25753,7729,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=128; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_128:; if(!qbevent)break;evnt(25753,7730,"ide_methods.bas");}while(r); } } sc_ec_256_end:; goto sc_4697_end; } sc_4697_end:; do{ return_point[next_return_point++]=129; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETCOMMAND; RETURN_129:; if(!qbevent)break;evnt(25753,7735,"ide_methods.bas");}while(r); S_43974:; if(qbevent){evnt(25753,7737,"ide_methods.bas");if(r)goto S_43974;} S_43975:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("breakpoint",10))||qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("line number",11))||qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("watchpoint",10))))||new_error){ if(qbevent){evnt(25753,7738,"ide_methods.bas");if(r)goto S_43975;} do{ *_SUB_DEBUGMODE_LONG_BYPASSREQUESTCALLSTACK= 0 ; if(!qbevent)break;evnt(25753,7739,"ide_methods.bas");}while(r); S_43977:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("watchpoint",10))))||new_error){ if(qbevent){evnt(25753,7740,"ide_methods.bas");if(r)goto S_43977;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(qbs_new_txt_len("",0),&(pass4807= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7741,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_VALUE,&(pass4808= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7742,"ide_methods.bas");}while(r); do{ *__LONG_LATESTWATCHPOINTMET=*_SUB_DEBUGMODE_LONG_TEMPINDEX; if(!qbevent)break;evnt(25753,7743,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_VALUE,&(pass4809= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7744,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,qbs_add(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_VALUE,&(pass4810=string2l(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7745,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPELEMENTOFFSET,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_VALUE,&(pass4811= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7746,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2i(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_VALUE,&(pass4812= 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7747,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_new_txt_len(" ",1)),FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_VALUE,_SUB_DEBUGMODE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7748,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Watchpoint condition met",24),_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("#OK;#Clear Watchpoint",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7749,"ide_methods.bas");}while(r); S_43987:; if ((-(*_SUB_DEBUGMODE_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(25753,7750,"ide_methods.bas");if(r)goto S_43987;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,qbs_add(qbs_add(l2string(*_SUB_DEBUGMODE_LONG_TEMPINDEX),_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES),_SUB_DEBUGMODE_STRING_TEMPELEMENTOFFSET)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7752,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I= 0 ; if(!qbevent)break;evnt(25753,7753,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=func_instr(*_SUB_DEBUGMODE_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7754,"ide_methods.bas");}while(r); S_43991:; while((*_SUB_DEBUGMODE_LONG_I)||new_error){ if(qbevent){evnt(25753,7755,"ide_methods.bas");if(r)goto S_43991;} S_43992:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WATCHPOINTLIST,*_SUB_DEBUGMODE_LONG_I+ 8 ,_SUB_DEBUGMODE_STRING_TEMP->len,1),_SUB_DEBUGMODE_STRING_TEMP)))||new_error){ if(qbevent){evnt(25753,7756,"ide_methods.bas");if(r)goto S_43992;} do{ goto dl_exit_4813; if(!qbevent)break;evnt(25753,7756,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_I=func_instr(*_SUB_DEBUGMODE_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7757,"ide_methods.bas");}while(r); dl_continue_4813:; } dl_exit_4813:; S_43997:; if ((-(*_SUB_DEBUGMODE_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,7760,"ide_methods.bas");if(r)goto S_43997;} do{ *_SUB_DEBUGMODE_LONG_J=string2l(func_mid(__STRING_WATCHPOINTLIST,*_SUB_DEBUGMODE_LONG_I+ 4 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7762,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_add(qbs_left(__STRING_WATCHPOINTLIST,*_SUB_DEBUGMODE_LONG_I- 1 ),func_mid(__STRING_WATCHPOINTLIST,*_SUB_DEBUGMODE_LONG_I+*_SUB_DEBUGMODE_LONG_J+ 8 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7763,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("clear last watchpoint",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7766,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=130; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_130:; if(!qbevent)break;evnt(25753,7767,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,qbs_right(_SUB_DEBUGMODE_STRING_VALUE, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7769,"ide_methods.bas");}while(r); }else{ do{ *__LONG_LATESTWATCHPOINTMET= 0 ; if(!qbevent)break;evnt(25753,7771,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,7773,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,7773,"ide_methods.bas");}while(r); S_44010:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7774,"ide_methods.bas");if(r)goto S_44010;} ww_continue_4815:; } ww_exit_4815:; do{ *_SUB_DEBUGMODE_LONG_L=string2l(_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7775,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_DEBUGMODE_LONG_L; if(!qbevent)break;evnt(25753,7776,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7777,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGNEXTLINE=*_SUB_DEBUGMODE_LONG_L; if(!qbevent)break;evnt(25753,7778,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,7779,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,7780,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4816= 1 )); if(!qbevent)break;evnt(25753,7781,"ide_methods.bas");}while(r); S_44019:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("breakpoint",10))))||new_error){ if(qbevent){evnt(25753,7782,"ide_methods.bas");if(r)goto S_44019;} do{ SUB_SETSTATUSMESSAGE(&(pass4817= 1 ),qbs_add(qbs_new_txt_len("Breakpoint reached on line",26),qbs_str((int32)(*_SUB_DEBUGMODE_LONG_L))),&(pass4818= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7783,"ide_methods.bas");}while(r); S_44021:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("watchpoint",10)))){ if(qbevent){evnt(25753,7784,"ide_methods.bas");if(r)goto S_44021;} do{ SUB_SETSTATUSMESSAGE(&(pass4819= 1 ),qbs_add(qbs_add(qbs_new_txt_len("Watchpoint condition met (",26),_SUB_DEBUGMODE_STRING_TEMP),qbs_new_txt_len(")",1)),&(pass4820= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7785,"ide_methods.bas");}while(r); }else{ do{ SUB_SETSTATUSMESSAGE(&(pass4821= 1 ),qbs_new_txt_len("Paused.",7),&(pass4822= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7787,"ide_methods.bas");}while(r); } } do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,7789,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=131; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_131:; if(!qbevent)break;evnt(25753,7790,"ide_methods.bas");}while(r); S_44028:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_VARIABLEWATCHLIST->len> 0 ))&*_SUB_DEBUGMODE_BYTE_PANELACTIVE))||new_error){ if(qbevent){evnt(25753,7793,"ide_methods.bas");if(r)goto S_44028;} LABEL_REQUESTVARIABLEVALUES:; if(qbevent){evnt(25753,7794,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,FUNC_GETBYTES(qbs_new_txt_len("",0),&(pass4824= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7795,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,func_mid(__STRING_VARIABLEWATCHLIST, 9 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7796,"ide_methods.bas");}while(r); S_44031:; do{ if(qbevent){evnt(25753,7797,"ide_methods.bas");if(r)goto S_44031;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP2,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,&(pass4826= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7798,"ide_methods.bas");}while(r); S_44033:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_DEBUGMODE_STRING_TEMP2,l2string( -1 ))))||new_error){ if(qbevent){evnt(25753,7799,"ide_methods.bas");if(r)goto S_44033;} do{ goto dl_exit_4825; if(!qbevent)break;evnt(25753,7799,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_TEMPINDEX=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,&(pass4827= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7800,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,&(pass4828= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7801,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_I=string2l(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7802,"ide_methods.bas");}while(r); S_44039:; if ((-(*_SUB_DEBUGMODE_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,7803,"ide_methods.bas");if(r)goto S_44039;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,qbs_add(_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES,FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,_SUB_DEBUGMODE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7804,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENT=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,&(pass4829= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7806,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,&(pass4830= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7807,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPSTORAGE=string2l(FUNC_GETBYTES(_SUB_DEBUGMODE_STRING_TEMP,&(pass4831= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7808,"ide_methods.bas");}while(r); S_44045:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len== 0 )))||new_error){ if(qbevent){evnt(25753,7809,"ide_methods.bas");if(r)goto S_44045;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("get global var:",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7810,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("get local var:",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7812,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=132; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETVARSIZE; RETURN_132:; if(!qbevent)break;evnt(25753,7814,"ide_methods.bas");}while(r); S_44051:; if ((*_SUB_DEBUGMODE_LONG_VARSIZE)||new_error){ if(qbevent){evnt(25753,7815,"ide_methods.bas");if(r)goto S_44051;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7816,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,b2string(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7817,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+4))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7818,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+20))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7819,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,_SUB_DEBUGMODE_STRING_TEMPARRAYINDEXES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7820,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7821,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPELEMENT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7822,"ide_methods.bas");}while(r); S_44059:; if ((*_SUB_DEBUGMODE_LONG_TEMPELEMENT)||new_error){ if(qbevent){evnt(25753,7823,"ide_methods.bas");if(r)goto S_44059;} do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET=string2l(func_mid(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),(*_SUB_DEBUGMODE_LONG_TEMPELEMENT* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7824,"ide_methods.bas");}while(r); }else{ do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET= 0 ; if(!qbevent)break;evnt(25753,7826,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPELEMENTOFFSET))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7828,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_VARSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7829,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,l2string(*_SUB_DEBUGMODE_LONG_TEMPSTORAGE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7830,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7831,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(_SUB_DEBUGMODE_STRING_CMD,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7832,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(qbs_add(_SUB_DEBUGMODE_STRING_CMD,i2string(_SUB_DEBUGMODE_STRING_VARTYPE->len)),_SUB_DEBUGMODE_STRING_VARTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7833,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=133; if (next_return_point>=return_points) more_return_points(); goto LABEL_SENDCOMMAND; RETURN_133:; if(!qbevent)break;evnt(25753,7834,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7836,"ide_methods.bas");}while(r); } dl_continue_4825:; }while(1); dl_exit_4825:; } sc_ec_257_end:; goto sc_4806_end; } S_44076:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("hwnd",4))))||new_error){ if(qbevent){evnt(25753,7840,"ide_methods.bas");if(r)goto S_44076;} do{ *_SUB_DEBUGMODE_OFFSET_DEBUGGEEHWND=string2o(_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7841,"ide_methods.bas");}while(r); sc_ec_258_end:; goto sc_4806_end; } S_44078:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("address read",12))))||new_error){ if(qbevent){evnt(25753,7842,"ide_methods.bas");if(r)goto S_44078;} do{ *_SUB_DEBUGMODE_LONG_TEMPINDEX=string2l(qbs_left(_SUB_DEBUGMODE_STRING_VALUE, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7843,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPARRAYINDEX=string2l(func_mid(_SUB_DEBUGMODE_STRING_VALUE, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7844,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPELEMENT=string2l(func_mid(_SUB_DEBUGMODE_STRING_VALUE, 9 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7845,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_TEMPSTORAGE=string2l(func_mid(_SUB_DEBUGMODE_STRING_VALUE, 13 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7846,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,func_mid(_SUB_DEBUGMODE_STRING_VALUE, 17 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7847,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=134; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETVARSIZE; RETURN_134:; if(!qbevent)break;evnt(25753,7848,"ide_methods.bas");}while(r); S_44085:; if(qbevent){evnt(25753,7849,"ide_methods.bas");if(r)goto S_44085;} S_44086:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_BYTE",5))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("BYTE",4))))||new_error){ if(qbevent){evnt(25753,7850,"ide_methods.bas");if(r)goto S_44086;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((int8)(string2b(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7850,"ide_methods.bas");}while(r); sc_ec_259_end:; goto sc_4833_end; } S_44088:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _BYTE",15))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED BYTE",13))))||new_error){ if(qbevent){evnt(25753,7851,"ide_methods.bas");if(r)goto S_44088;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((uint8)(string2ub(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7851,"ide_methods.bas");}while(r); sc_ec_260_end:; goto sc_4833_end; } S_44090:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("INTEGER",7))))||new_error){ if(qbevent){evnt(25753,7852,"ide_methods.bas");if(r)goto S_44090;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((int16)(string2i(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7852,"ide_methods.bas");}while(r); sc_ec_261_end:; goto sc_4833_end; } S_44092:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED INTEGER",17))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED INTEGER",16))))||new_error){ if(qbevent){evnt(25753,7853,"ide_methods.bas");if(r)goto S_44092;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((uint16)(string2ui(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7853,"ide_methods.bas");}while(r); sc_ec_262_end:; goto sc_4833_end; } S_44094:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("LONG",4))))||new_error){ if(qbevent){evnt(25753,7854,"ide_methods.bas");if(r)goto S_44094;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((int32)(string2l(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7854,"ide_methods.bas");}while(r); sc_ec_263_end:; goto sc_4833_end; } S_44096:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED LONG",14))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED LONG",13))))||new_error){ if(qbevent){evnt(25753,7855,"ide_methods.bas");if(r)goto S_44096;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((uint32)(string2ul(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7855,"ide_methods.bas");}while(r); sc_ec_264_end:; goto sc_4833_end; } S_44098:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_INTEGER64",10))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("INTEGER64",9))))||new_error){ if(qbevent){evnt(25753,7856,"ide_methods.bas");if(r)goto S_44098;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((int64)(string2i64(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7856,"ide_methods.bas");}while(r); sc_ec_265_end:; goto sc_4833_end; } S_44100:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _INTEGER64",20))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED INTEGER64",18))))||new_error){ if(qbevent){evnt(25753,7857,"ide_methods.bas");if(r)goto S_44100;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((uint64)(string2ui64(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7857,"ide_methods.bas");}while(r); sc_ec_266_end:; goto sc_4833_end; } S_44102:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(25753,7858,"ide_methods.bas");if(r)goto S_44102;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((float)(string2s(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7858,"ide_methods.bas");}while(r); sc_ec_267_end:; goto sc_4833_end; } S_44104:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(25753,7859,"ide_methods.bas");if(r)goto S_44104;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((double)(string2d(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7859,"ide_methods.bas");}while(r); sc_ec_268_end:; goto sc_4833_end; } S_44106:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_FLOAT",6))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("FLOAT",5))))||new_error){ if(qbevent){evnt(25753,7860,"ide_methods.bas");if(r)goto S_44106;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((long double)(string2f(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7860,"ide_methods.bas");}while(r); sc_ec_269_end:; goto sc_4833_end; } S_44108:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_OFFSET",7))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("OFFSET",6))))||new_error){ if(qbevent){evnt(25753,7861,"ide_methods.bas");if(r)goto S_44108;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((int64)(string2o(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7861,"ide_methods.bas");}while(r); sc_ec_270_end:; goto sc_4833_end; } S_44110:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _OFFSET",17))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED OFFSET",15))))||new_error){ if(qbevent){evnt(25753,7862,"ide_methods.bas");if(r)goto S_44110;} do{ qbs_set(_SUB_DEBUGMODE_STRING_RECVDATA,qbs_str((uint64)(string2uo(_SUB_DEBUGMODE_STRING_RECVDATA)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7862,"ide_methods.bas");}while(r); sc_ec_271_end:; goto sc_4833_end; } sc_4833_end:; do{ tmp_long=array_check((*_SUB_DEBUGMODE_LONG_TEMPSTORAGE)-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[tmp_long])),_SUB_DEBUGMODE_STRING_RECVDATA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7865,"ide_methods.bas");}while(r); S_44114:; if ((*_SUB_DEBUGMODE_BYTE_PAUSEMODE)||new_error){ if(qbevent){evnt(25753,7866,"ide_methods.bas");if(r)goto S_44114;} do{ return_point[next_return_point++]=135; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_135:; if(!qbevent)break;evnt(25753,7866,"ide_methods.bas");}while(r); } sc_ec_272_end:; goto sc_4806_end; } S_44117:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("current sub",11))))||new_error){ if(qbevent){evnt(25753,7867,"ide_methods.bas");if(r)goto S_44117;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CURRENTSUB,_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7868,"ide_methods.bas");}while(r); S_44119:; if ((*_SUB_DEBUGMODE_LONG_ESTABILISHINGSCOPE)||new_error){ if(qbevent){evnt(25753,7869,"ide_methods.bas");if(r)goto S_44119;} do{ *_SUB_DEBUGMODE_LONG_ESTABILISHINGSCOPE= 0 ; if(!qbevent)break;evnt(25753,7870,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=136; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_136:; if(!qbevent)break;evnt(25753,7871,"ide_methods.bas");}while(r); do{ goto LABEL_REQUESTVARIABLEWATCH; if(!qbevent)break;evnt(25753,7872,"ide_methods.bas");}while(r); } sc_ec_273_end:; goto sc_4806_end; } S_44124:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("quit",4))))||new_error){ if(qbevent){evnt(25753,7874,"ide_methods.bas");if(r)goto S_44124;} do{ sub_close(*__LONG_DEBUGCLIENT,1); if(!qbevent)break;evnt(25753,7875,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4834= 0 )); if(!qbevent)break;evnt(25753,7876,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4835= 0 )); if(!qbevent)break;evnt(25753,7877,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4836= 1 ),qbs_new_txt_len("Debug session aborted.",22),&(pass4837= 15 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7878,"ide_methods.bas");}while(r); S_44129:; if ((qbs_cleanup(qbs_tmp_base,_SUB_DEBUGMODE_STRING_VALUE->len))||new_error){ if(qbevent){evnt(25753,7879,"ide_methods.bas");if(r)goto S_44129;} do{ SUB_SETSTATUSMESSAGE(&(pass4839= 2 ),_SUB_DEBUGMODE_STRING_VALUE,&(pass4840= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7880,"ide_methods.bas");}while(r); } S_44132:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7882,"ide_methods.bas");if(r)goto S_44132;} ww_continue_4841:; } ww_exit_4841:; do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,7883,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,7884,"ide_methods.bas");}while(r); sc_ec_274_end:; goto sc_4806_end; } S_44136:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("error",5))))||new_error){ if(qbevent){evnt(25753,7885,"ide_methods.bas");if(r)goto S_44136;} do{ *_SUB_DEBUGMODE_LONG_L=string2l(_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7886,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_DEBUGMODE_LONG_L; if(!qbevent)break;evnt(25753,7887,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7888,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE=*_SUB_DEBUGMODE_LONG_L; if(!qbevent)break;evnt(25753,7889,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=137; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_137:; if(!qbevent)break;evnt(25753,7890,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4842= 1 )); if(!qbevent)break;evnt(25753,7891,"ide_methods.bas");}while(r); do{ qbg_sub_color(NULL, 4 ,NULL,2); if(!qbevent)break;evnt(25753,7892,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4843= 1 ),qbs_add(qbs_new_txt_len("Error occurred on line",22),qbs_str((int32)(*_SUB_DEBUGMODE_LONG_L))),&(pass4844= 15 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7893,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_BYPASSREQUESTCALLSTACK= -1 ; if(!qbevent)break;evnt(25753,7894,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_BYTE_PAUSEMODE= -1 ; if(!qbevent)break;evnt(25753,7895,"ide_methods.bas");}while(r); sc_ec_275_end:; goto sc_4806_end; } S_44147:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("enter input",11))))||new_error){ if(qbevent){evnt(25753,7896,"ide_methods.bas");if(r)goto S_44147;} do{ *_SUB_DEBUGMODE_BYTE_ENTEREDINPUT= -1 ; if(!qbevent)break;evnt(25753,7897,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_L=string2l(_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7898,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_DEBUGMODE_LONG_L; if(!qbevent)break;evnt(25753,7899,"ide_methods.bas");}while(r); do{ *__LONG_DEBUGNEXTLINE=*_SUB_DEBUGMODE_LONG_L; if(!qbevent)break;evnt(25753,7900,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,7901,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=138; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEDISPLAY; RETURN_138:; if(!qbevent)break;evnt(25753,7902,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4845= 1 )); if(!qbevent)break;evnt(25753,7903,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4846= 1 )); if(!qbevent)break;evnt(25753,7904,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4847= 1 ),qbs_new_txt_len("SLEEP/INPUT/LINE INPUT active in your program...",48),&(pass4848= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7905,"ide_methods.bas");}while(r); do{ set_foreground_window(*_SUB_DEBUGMODE_OFFSET_DEBUGGEEHWND); if(!qbevent)break;evnt(25753,7906,"ide_methods.bas");}while(r); sc_ec_276_end:; goto sc_4806_end; } S_44158:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("leave input",11))))||new_error){ if(qbevent){evnt(25753,7907,"ide_methods.bas");if(r)goto S_44158;} do{ *_SUB_DEBUGMODE_BYTE_ENTEREDINPUT= 0 ; if(!qbevent)break;evnt(25753,7908,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass4849= 1 )); if(!qbevent)break;evnt(25753,7909,"ide_methods.bas");}while(r); S_44161:; if ((*_SUB_DEBUGMODE_BYTE_PAUSEMODE)||new_error){ if(qbevent){evnt(25753,7910,"ide_methods.bas");if(r)goto S_44161;} do{ SUB_SETSTATUSMESSAGE(&(pass4850= 1 ),qbs_new_txt_len("Paused.",7),&(pass4851= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7911,"ide_methods.bas");}while(r); do{ *_SUB_DEBUGMODE_LONG_DUMMY=FUNC_DARKENFGBG(&(pass4852= 0 )); if(!qbevent)break;evnt(25753,7912,"ide_methods.bas");}while(r); }else{ do{ SUB_SETSTATUSMESSAGE(&(pass4853= 1 ),qbs_new_txt_len("Running...",10),&(pass4854= 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7914,"ide_methods.bas");}while(r); } sc_ec_277_end:; goto sc_4806_end; } S_44167:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack size",15))))||new_error){ if(qbevent){evnt(25753,7916,"ide_methods.bas");if(r)goto S_44167;} do{ *__LONG_CALLSTACKLENGTH=string2l(_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7920,"ide_methods.bas");}while(r); S_44169:; if ((*__LONG_CALLSTACKLENGTH)||new_error){ if(qbevent){evnt(25753,7921,"ide_methods.bas");if(r)goto S_44169;} do{ *_SUB_DEBUGMODE_SINGLE_START=func_timer(NULL,0); if(!qbevent)break;evnt(25753,7922,"ide_methods.bas");}while(r); S_44171:; do{ if(qbevent){evnt(25753,7923,"ide_methods.bas");if(r)goto S_44171;} do{ return_point[next_return_point++]=139; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETCOMMAND; RETURN_139:; if(!qbevent)break;evnt(25753,7924,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,7925,"ide_methods.bas");}while(r); S_44174:; dl_continue_4855:; }while((!(qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack",10)))|(-((func_timer(NULL,0)-*_SUB_DEBUGMODE_SINGLE_START)>*_SUB_DEBUGMODE_LONG_TIMEOUT)))))&&(!new_error)); dl_exit_4855:; if(qbevent){evnt(25753,7926,"ide_methods.bas");if(r)goto S_44174;} S_44175:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("call stack",10))))||new_error){ if(qbevent){evnt(25753,7928,"ide_methods.bas");if(r)goto S_44175;} do{ qbs_set(__STRING_CALLSTACKLIST,_SUB_DEBUGMODE_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7930,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7933,"ide_methods.bas");}while(r); } sc_ec_278_end:; goto sc_4806_end; } sc_4806_end:; S_44182:; if ((func__hasfocus())||new_error){ if(qbevent){evnt(25753,7937,"ide_methods.bas");if(r)goto S_44182;} do{ return_point[next_return_point++]=140; if (next_return_point>=return_points) more_return_points(); goto LABEL_UPDATEBUTTONS; RETURN_140:; if(!qbevent)break;evnt(25753,7937,"ide_methods.bas");}while(r); } do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,7938,"ide_methods.bas");}while(r); dl_continue_4650:; }while(1); dl_exit_4650:; S_44187:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7941,"ide_methods.bas");if(r)goto S_44187;} ww_continue_4856:; } ww_exit_4856:; do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,7942,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,7943,"ide_methods.bas");}while(r); LABEL_GETCOMMAND:; if(qbevent){evnt(25753,7945,"ide_methods.bas");r=0;} do{ sub_get2(*__LONG_DEBUGCLIENT,NULL,_SUB_DEBUGMODE_STRING_TEMP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7946,"ide_methods.bas");}while(r); S_44192:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))&(-(func__connected(*__LONG_DEBUGCLIENT)== 0 ))))||new_error){ if(qbevent){evnt(25753,7947,"ide_methods.bas");if(r)goto S_44192;} do{ SUB_CLEARSTATUSWINDOW(&(pass4857= 0 )); if(!qbevent)break;evnt(25753,7948,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4858= 1 ),qbs_new_txt_len("Debug session aborted.",22),&(pass4859= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7949,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4860= 2 ),qbs_new_txt_len("Disconnected.",13),&(pass4861= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7950,"ide_methods.bas");}while(r); S_44196:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7951,"ide_methods.bas");if(r)goto S_44196;} ww_continue_4862:; } ww_exit_4862:; do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,7952,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,7953,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_BUFFER,qbs_add(_SUB_DEBUGMODE_STRING_BUFFER,_SUB_DEBUGMODE_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7955,"ide_methods.bas");}while(r); S_44202:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_DEBUGMODE_STRING_BUFFER->len>= 4 )))||new_error){ if(qbevent){evnt(25753,7957,"ide_methods.bas");if(r)goto S_44202;} do{ *_SUB_DEBUGMODE_LONG_CMDSIZE=string2l(qbs_left(_SUB_DEBUGMODE_STRING_BUFFER, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7957,"ide_methods.bas");}while(r); }else{ do{ *_SUB_DEBUGMODE_LONG_CMDSIZE= 0 ; if(!qbevent)break;evnt(25753,7957,"ide_methods.bas");}while(r); } S_44207:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_DEBUGMODE_LONG_CMDSIZE> 0 ))&(-(_SUB_DEBUGMODE_STRING_BUFFER->len>=*_SUB_DEBUGMODE_LONG_CMDSIZE))))||new_error){ if(qbevent){evnt(25753,7958,"ide_methods.bas");if(r)goto S_44207;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,func_mid(_SUB_DEBUGMODE_STRING_BUFFER, 5 ,*_SUB_DEBUGMODE_LONG_CMDSIZE,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7959,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_BUFFER,func_mid(_SUB_DEBUGMODE_STRING_BUFFER, 5 +*_SUB_DEBUGMODE_LONG_CMDSIZE,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7960,"ide_methods.bas");}while(r); S_44210:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len(":",1),0)))||new_error){ if(qbevent){evnt(25753,7962,"ide_methods.bas");if(r)goto S_44210;} do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,func_mid(_SUB_DEBUGMODE_STRING_CMD,func_instr(NULL,_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len(":",1),0)+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7963,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_left(_SUB_DEBUGMODE_STRING_CMD,func_instr(NULL,_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len(":",1),0)- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7964,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7966,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7969,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_VALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7969,"ide_methods.bas");}while(r); } do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,7971,"ide_methods.bas");}while(r); LABEL_SENDCOMMAND:; if(qbevent){evnt(25753,7973,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_add(l2string(_SUB_DEBUGMODE_STRING_CMD->len),_SUB_DEBUGMODE_STRING_CMD)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7974,"ide_methods.bas");}while(r); do{ sub_put2(*__LONG_DEBUGCLIENT,NULL,byte_element((uint64)_SUB_DEBUGMODE_STRING_CMD->chr,_SUB_DEBUGMODE_STRING_CMD->len,byte_element_4866),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7975,"ide_methods.bas");}while(r); S_44223:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3)))&(-(func__connected(*__LONG_DEBUGCLIENT)== 0 ))))||new_error){ if(qbevent){evnt(25753,7976,"ide_methods.bas");if(r)goto S_44223;} do{ SUB_CLEARSTATUSWINDOW(&(pass4867= 0 )); if(!qbevent)break;evnt(25753,7977,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4868= 1 ),qbs_new_txt_len("Debug session aborted.",22),&(pass4869= 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7978,"ide_methods.bas");}while(r); do{ SUB_SETSTATUSMESSAGE(&(pass4870= 2 ),qbs_new_txt_len("Disconnected.",13),&(pass4871= 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7979,"ide_methods.bas");}while(r); S_44227:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,7980,"ide_methods.bas");if(r)goto S_44227;} ww_continue_4872:; } ww_exit_4872:; do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,7981,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,7982,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_DEBUGMODE_STRING_CMD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7984,"ide_methods.bas");}while(r); do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,7985,"ide_methods.bas");}while(r); LABEL_UPDATEDISPLAY:; if(qbevent){evnt(25753,7987,"ide_methods.bas");r=0;} S_44234:; if ((-(*_SUB_DEBUGMODE_BYTE_PAUSEMODE== 0 ))||new_error){ if(qbevent){evnt(25753,7988,"ide_methods.bas");if(r)goto S_44234;} do{ *__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE= -1 ; if(!qbevent)break;evnt(25753,7988,"ide_methods.bas");}while(r); } do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,7989,"ide_methods.bas");}while(r); do{ SUB_UPDATETITLEOFMAINWINDOW(); if(!qbevent)break;evnt(25753,7990,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=141; if (next_return_point>=return_points) more_return_points(); goto LABEL_PRINTVERSION; RETURN_141:; if(!qbevent)break;evnt(25753,7992,"ide_methods.bas");}while(r); S_44240:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_DEBUGMODE_BYTE_PAUSEMODE!= 0 ))&(-(__STRING_VARIABLEWATCHLIST->len> 0 ))))||new_error){ if(qbevent){evnt(25753,7994,"ide_methods.bas");if(r)goto S_44240;} S_44241:; if ((*__BYTE_WATCHLISTTOCONSOLE)||new_error){ if(qbevent){evnt(25753,7995,"ide_methods.bas");if(r)goto S_44241;} do{ sub__console( 1 ); if(!qbevent)break;evnt(25753,7995,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_TOTALVISIBLEVARIABLES=string2l(func_mid(__STRING_VARIABLEWATCHLIST, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7996,"ide_methods.bas");}while(r); S_44245:; if (((-(*_SUB_DEBUGMODE_LONG_HIDEPANEL== 0 ))&(-(*_SUB_DEBUGMODE_BYTE_PANELACTIVE== -1 )))||new_error){ if(qbevent){evnt(25753,7997,"ide_methods.bas");if(r)goto S_44245;} do{ SUB_SHOWVWATCHPANEL((void*)( ((char*)(_SUB_DEBUGMODE_UDT_VWATCHPANEL)) + (0) ),_SUB_DEBUGMODE_STRING_CURRENTSUB,&(pass4874= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,7997,"ide_methods.bas");}while(r); } do{ *_SUB_DEBUGMODE_LONG_HIDEPANEL= 0 ; if(!qbevent)break;evnt(25753,7998,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,8001,"ide_methods.bas");}while(r); do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,8002,"ide_methods.bas");}while(r); LABEL_UPDATEBUTTONS:; if(qbevent){evnt(25753,8004,"ide_methods.bas");r=0;} S_44252:; fornext_value4876= 1 ; fornext_finalvalue4876=func_ubound(_SUB_DEBUGMODE_ARRAY_UDT_BUTTON,1,1); fornext_step4876= 1 ; if (fornext_step4876<0) fornext_step_negative4876=1; else fornext_step_negative4876=0; if (new_error) goto fornext_error4876; goto fornext_entrylabel4876; while(1){ fornext_value4876=fornext_step4876+(*_SUB_DEBUGMODE_LONG_I); fornext_entrylabel4876: *_SUB_DEBUGMODE_LONG_I=fornext_value4876; if (fornext_step_negative4876){ if (fornext_value4876fornext_finalvalue4876) break; } fornext_error4876:; if(qbevent){evnt(25753,8005,"ide_methods.bas");if(r)goto S_44252;} S_44253:; if (((-(*__LONG_MY==*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+2))))&(-(*__LONG_MX>=*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16))))&(-(*__LONG_MX<=(*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16))+*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+4)))))&(-(*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(32))== 0 ))&(-(*(int8*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(33))== 0 )))||new_error){ if(qbevent){evnt(25753,8007,"ide_methods.bas");if(r)goto S_44253;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,8008,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8009,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,8011,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMP,qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8012,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16)),*(int16*)(((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0])+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+2)),qbs_add(*((qbs**)((char*)_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[0]+((array_check((*_SUB_DEBUGMODE_LONG_I)-_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[4],_SUB_DEBUGMODE_ARRAY_UDT_BUTTON[5]))*16+8))),_SUB_DEBUGMODE_STRING_TEMP),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8014,"ide_methods.bas");}while(r); fornext_continue_4875:; } fornext_exit_4875:; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,8016,"ide_methods.bas");}while(r); do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,8017,"ide_methods.bas");}while(r); LABEL_GETVARSIZE:; if(qbevent){evnt(25753,8019,"ide_methods.bas");r=0;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE= 0 ; if(!qbevent)break;evnt(25753,8020,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DEBUGMODE_STRING_VARTYPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8021,"ide_methods.bas");}while(r); LABEL_CHECKVARTYPE:; if(qbevent){evnt(25753,8022,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,_SUB_DEBUGMODE_STRING_VARTYPE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8023,"ide_methods.bas");}while(r); S_44267:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,8024,"ide_methods.bas");if(r)goto S_44267;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8024,"ide_methods.bas");}while(r); } S_44270:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,8025,"ide_methods.bas");if(r)goto S_44270;} S_44271:; if ((qbs_cleanup(qbs_tmp_base,-(func_val(func_mid(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,func__instrrev(NULL,_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len(" ",1),0)+ 1 ,NULL,0))> 32 )))||new_error){ if(qbevent){evnt(25753,8026,"ide_methods.bas");if(r)goto S_44271;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_INTEGER64",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8027,"ide_methods.bas");}while(r); S_44273:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("UNSIGNED",8),0)))||new_error){ if(qbevent){evnt(25753,8028,"ide_methods.bas");if(r)goto S_44273;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _INTEGER64",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8028,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8030,"ide_methods.bas");}while(r); S_44278:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("UNSIGNED",8),0)))||new_error){ if(qbevent){evnt(25753,8031,"ide_methods.bas");if(r)goto S_44278;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8031,"ide_methods.bas");}while(r); } } S_44282:; }else{ if (qbs_cleanup(qbs_tmp_base,func_instr(NULL,qbs_new_txt_len("@_BIT@BIT@_UNSIGNED _BIT@UNSIGNED BIT@",38),qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_DEBUGMODE_STRING_TEMPVARTYPE),qbs_new_txt_len("@",1)),0))){ if(qbevent){evnt(25753,8033,"ide_methods.bas");if(r)goto S_44282;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8034,"ide_methods.bas");}while(r); S_44284:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("UNSIGNED",8),0)))||new_error){ if(qbevent){evnt(25753,8035,"ide_methods.bas");if(r)goto S_44284;} do{ qbs_set(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8035,"ide_methods.bas");}while(r); } } } S_44288:; if(qbevent){evnt(25753,8037,"ide_methods.bas");if(r)goto S_44288;} S_44289:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_BYTE",5))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _BYTE",15))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("BYTE",4))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED BYTE",13))))||new_error){ if(qbevent){evnt(25753,8038,"ide_methods.bas");if(r)goto S_44289;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=1; if(!qbevent)break;evnt(25753,8038,"ide_methods.bas");}while(r); sc_ec_279_end:; goto sc_4877_end; } S_44291:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("INTEGER",7))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED INTEGER",17))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED INTEGER",16))))||new_error){ if(qbevent){evnt(25753,8039,"ide_methods.bas");if(r)goto S_44291;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=2; if(!qbevent)break;evnt(25753,8039,"ide_methods.bas");}while(r); sc_ec_280_end:; goto sc_4877_end; } S_44293:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("LONG",4))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED LONG",14))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED LONG",13))))||new_error){ if(qbevent){evnt(25753,8040,"ide_methods.bas");if(r)goto S_44293;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=4; if(!qbevent)break;evnt(25753,8040,"ide_methods.bas");}while(r); sc_ec_281_end:; goto sc_4877_end; } S_44295:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_INTEGER64",10))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _INTEGER64",20))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("INTEGER64",9))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED INTEGER64",18))))||new_error){ if(qbevent){evnt(25753,8041,"ide_methods.bas");if(r)goto S_44295;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8; if(!qbevent)break;evnt(25753,8041,"ide_methods.bas");}while(r); sc_ec_282_end:; goto sc_4877_end; } S_44297:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("SINGLE",6))))||new_error){ if(qbevent){evnt(25753,8042,"ide_methods.bas");if(r)goto S_44297;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=4; if(!qbevent)break;evnt(25753,8042,"ide_methods.bas");}while(r); sc_ec_283_end:; goto sc_4877_end; } S_44299:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("DOUBLE",6))))||new_error){ if(qbevent){evnt(25753,8043,"ide_methods.bas");if(r)goto S_44299;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8; if(!qbevent)break;evnt(25753,8043,"ide_methods.bas");}while(r); sc_ec_284_end:; goto sc_4877_end; } S_44301:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_FLOAT",6))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("FLOAT",5))))||new_error){ if(qbevent){evnt(25753,8044,"ide_methods.bas");if(r)goto S_44301;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=32; if(!qbevent)break;evnt(25753,8044,"ide_methods.bas");}while(r); sc_ec_285_end:; goto sc_4877_end; } S_44303:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_OFFSET",7))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("_UNSIGNED _OFFSET",17))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("OFFSET",6))||qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("UNSIGNED OFFSET",15))))||new_error){ if(qbevent){evnt(25753,8045,"ide_methods.bas");if(r)goto S_44303;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8; if(!qbevent)break;evnt(25753,8045,"ide_methods.bas");}while(r); sc_ec_286_end:; goto sc_4877_end; } S_44305:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_DEBUGMODE_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING",6))))||new_error){ if(qbevent){evnt(25753,8046,"ide_methods.bas");if(r)goto S_44305;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=8+4; if(!qbevent)break;evnt(25753,8046,"ide_methods.bas");}while(r); sc_ec_287_end:; goto sc_4877_end; } do{ qbs_set(_SUB_DEBUGMODE_STRING_VARTYPE,FUNC_GETELEMENT(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_DEBUGMODE_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),_SUB_DEBUGMODE_LONG_TEMPELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8048,"ide_methods.bas");}while(r); S_44309:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,8049,"ide_methods.bas");if(r)goto S_44309;} do{ *_SUB_DEBUGMODE_LONG_VARSIZE=qbr(func_val(qbs__trim(func_mid(_SUB_DEBUGMODE_STRING_VARTYPE,func_instr(NULL,_SUB_DEBUGMODE_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)+ 8 ,NULL,0)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8051,"ide_methods.bas");}while(r); do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,8052,"ide_methods.bas");}while(r); } S_44313:; if ((qbs_cleanup(qbs_tmp_base,_SUB_DEBUGMODE_STRING_VARTYPE->len))||new_error){ if(qbevent){evnt(25753,8054,"ide_methods.bas");if(r)goto S_44313;} do{ goto LABEL_CHECKVARTYPE; if(!qbevent)break;evnt(25753,8054,"ide_methods.bas");}while(r); } sc_4877_end:; do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,8056,"ide_methods.bas");}while(r); LABEL_PRINTVERSION:; if(qbevent){evnt(25753,8058,"ide_methods.bas");r=0;} S_44318:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_VERSIONSTRINGSTATUS->len== 0 )))||new_error){ if(qbevent){evnt(25753,8060,"ide_methods.bas");if(r)goto S_44318;} do{ qbs_set(__STRING_VERSIONSTRINGSTATUS,qbs_add(qbs_new_txt_len(" v",2),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8061,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VERSIONSTRINGSTATUS,qbs_add(__STRING_VERSIONSTRINGSTATUS,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8062,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 2 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,8064,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 21 -__STRING_VERSIONSTRINGSTATUS->len,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_VERSIONSTRINGSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8065,"ide_methods.bas");}while(r); do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,8066,"ide_methods.bas");}while(r); LABEL_CHECKVWATCHPANELSIZE:; if(qbevent){evnt(25753,8068,"ide_methods.bas");r=0;} S_44325:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))< 40 ))||new_error){ if(qbevent){evnt(25753,8069,"ide_methods.bas");if(r)goto S_44325;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))= 40 ; if(!qbevent)break;evnt(25753,8069,"ide_methods.bas");}while(r); } S_44328:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))>(*__LONG_IDEWX- 12 )))||new_error){ if(qbevent){evnt(25753,8070,"ide_methods.bas");if(r)goto S_44328;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))=*__LONG_IDEWX- 12 ; if(!qbevent)break;evnt(25753,8070,"ide_methods.bas");}while(r); } S_44331:; if ((-((*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4)))>(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(25753,8071,"ide_methods.bas");if(r)goto S_44331;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(4))=(*__LONG_IDEWX- 1 )-*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(0)); if(!qbevent)break;evnt(25753,8072,"ide_methods.bas");}while(r); } S_44334:; if ((-((*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))+*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6)))>*_SUB_DEBUGMODE_LONG_VWATCHPANELLIMIT))||new_error){ if(qbevent){evnt(25753,8074,"ide_methods.bas");if(r)goto S_44334;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))=*_SUB_DEBUGMODE_LONG_VWATCHPANELLIMIT-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(2))- 1 ); if(!qbevent)break;evnt(25753,8075,"ide_methods.bas");}while(r); } S_44337:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))< 5 ))||new_error){ if(qbevent){evnt(25753,8077,"ide_methods.bas");if(r)goto S_44337;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))= 5 ; if(!qbevent)break;evnt(25753,8077,"ide_methods.bas");}while(r); } S_44340:; if ((-(*(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))>(*__LONG_IDEWY- 10 )))||new_error){ if(qbevent){evnt(25753,8078,"ide_methods.bas");if(r)goto S_44340;} do{ *(int16*)(((char*)_SUB_DEBUGMODE_UDT_VWATCHPANEL)+(6))=*__LONG_IDEWY- 10 ; if(!qbevent)break;evnt(25753,8078,"ide_methods.bas");}while(r); } do{ #include "ret155.txt" if(!qbevent)break;evnt(25753,8079,"ide_methods.bas");}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; } float FUNC_MAP(float*_FUNC_MAP_SINGLE_VALUE,float*_FUNC_MAP_SINGLE_MINRANGE,float*_FUNC_MAP_SINGLE_MAXRANGE,float*_FUNC_MAP_SINGLE_NEWMINRANGE,float*_FUNC_MAP_SINGLE_NEWMAXRANGE){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_MAP_SINGLE_MAP=(((*_FUNC_MAP_SINGLE_VALUE-*_FUNC_MAP_SINGLE_MINRANGE)/ (*_FUNC_MAP_SINGLE_MAXRANGE-*_FUNC_MAP_SINGLE_MINRANGE))*(*_FUNC_MAP_SINGLE_NEWMAXRANGE-*_FUNC_MAP_SINGLE_NEWMINRANGE))+*_FUNC_MAP_SINGLE_NEWMINRANGE; if(!qbevent)break;evnt(25753,8083,"ide_methods.bas");}while(r); 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; return *_FUNC_MAP_SINGLE_MAP; } void SUB_SHOWVWATCHPANEL(void*_SUB_SHOWVWATCHPANEL_UDT_THIS,qbs*_SUB_SHOWVWATCHPANEL_STRING_CURRENTSCOPE,int8*_SUB_SHOWVWATCHPANEL_BYTE_ACTION){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,8087,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,8088,"ide_methods.bas");}while(r); S_44347:; if ((-(*_SUB_SHOWVWATCHPANEL_BYTE_ACTION== 1 ))||new_error){ if(qbevent){evnt(25753,8090,"ide_methods.bas");if(r)goto S_44347;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_PREVIOUSVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8090,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,8090,"ide_methods.bas");}while(r); } S_44351:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_SHOWVWATCHPANEL_STRING_PREVIOUSVARIABLEWATCHLIST,__STRING_VARIABLEWATCHLIST)))||new_error){ if(qbevent){evnt(25753,8092,"ide_methods.bas");if(r)goto S_44351;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_PREVIOUSVARIABLEWATCHLIST,__STRING_VARIABLEWATCHLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8094,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_LONGESTVARNAME=string2l(qbs_left(__STRING_VARIABLEWATCHLIST, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8095,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_TOTALVISIBLEVARIABLES=string2l(func_mid(__STRING_VARIABLEWATCHLIST, 5 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8096,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))=*_SUB_SHOWVWATCHPANEL_LONG_TOTALVISIBLEVARIABLES+ 2 ; if(!qbevent)break;evnt(25753,8097,"ide_methods.bas");}while(r); S_44356:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))>(*__LONG_IDEWY- 10 )))||new_error){ if(qbevent){evnt(25753,8098,"ide_methods.bas");if(r)goto S_44356;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))=*__LONG_IDEWY- 10 ; if(!qbevent)break;evnt(25753,8098,"ide_methods.bas");}while(r); } S_44359:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))< 5 ))||new_error){ if(qbevent){evnt(25753,8099,"ide_methods.bas");if(r)goto S_44359;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))= 5 ; if(!qbevent)break;evnt(25753,8099,"ide_methods.bas");}while(r); } } do{ *_SUB_SHOWVWATCHPANEL_LONG_FG= 0 ; if(!qbevent)break;evnt(25753,8102,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_BG= 7 ; if(!qbevent)break;evnt(25753,8102,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TITLE,qbs_new_txt_len("Watch List",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8104,"ide_methods.bas");}while(r); S_44366:; if ((qbs_cleanup(qbs_tmp_base,_SUB_SHOWVWATCHPANEL_STRING_CURRENTSCOPE->len))||new_error){ if(qbevent){evnt(25753,8105,"ide_methods.bas");if(r)goto S_44366;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TITLE,qbs_add(qbs_add(_SUB_SHOWVWATCHPANEL_STRING_TITLE,qbs_new_txt_len(" - ",3)),_SUB_SHOWVWATCHPANEL_STRING_CURRENTSCOPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8105,"ide_methods.bas");}while(r); } S_44369:; if ((qbs_cleanup(qbs_tmp_base,-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))<(_SUB_SHOWVWATCHPANEL_STRING_TITLE->len+ 4 ))))||new_error){ if(qbevent){evnt(25753,8106,"ide_methods.bas");if(r)goto S_44369;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))=_SUB_SHOWVWATCHPANEL_STRING_TITLE->len+ 4 ; if(!qbevent)break;evnt(25753,8107,"ide_methods.bas");}while(r); S_44371:; if ((-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))+ 2 )>*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,8108,"ide_methods.bas");if(r)goto S_44371;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))=*__LONG_IDEWX-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))+ 2 ); if(!qbevent)break;evnt(25753,8108,"ide_methods.bas");}while(r); } } S_44375:; if ((-(*__BYTE_WATCHLISTTOCONSOLE== 0 ))||new_error){ if(qbevent){evnt(25753,8111,"ide_methods.bas");if(r)goto S_44375;} do{ *_SUB_SHOWVWATCHPANEL_LONG_VWATCHPANELLIMIT=*__LONG_IDEWY- 6 ; if(!qbevent)break;evnt(25753,8112,"ide_methods.bas");}while(r); S_44377:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))< 2 ))||new_error){ if(qbevent){evnt(25753,8114,"ide_methods.bas");if(r)goto S_44377;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))= 2 ; if(!qbevent)break;evnt(25753,8114,"ide_methods.bas");}while(r); } S_44380:; if ((-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4)))>(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(25753,8115,"ide_methods.bas");if(r)goto S_44380;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))=*__LONG_IDEWX-*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 1 ; if(!qbevent)break;evnt(25753,8115,"ide_methods.bas");}while(r); } S_44383:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))< 3 ))||new_error){ if(qbevent){evnt(25753,8116,"ide_methods.bas");if(r)goto S_44383;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))= 3 ; if(!qbevent)break;evnt(25753,8116,"ide_methods.bas");}while(r); } S_44386:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))>(*_SUB_SHOWVWATCHPANEL_LONG_VWATCHPANELLIMIT-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 1 ))))||new_error){ if(qbevent){evnt(25753,8117,"ide_methods.bas");if(r)goto S_44386;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))=*_SUB_SHOWVWATCHPANEL_LONG_VWATCHPANELLIMIT-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 1 ); if(!qbevent)break;evnt(25753,8117,"ide_methods.bas");}while(r); } S_44389:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))< 40 ))||new_error){ if(qbevent){evnt(25753,8119,"ide_methods.bas");if(r)goto S_44389;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))= 40 ; if(!qbevent)break;evnt(25753,8119,"ide_methods.bas");}while(r); } S_44392:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))>(*__LONG_IDEWX- 12 )))||new_error){ if(qbevent){evnt(25753,8120,"ide_methods.bas");if(r)goto S_44392;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))=*__LONG_IDEWX- 12 ; if(!qbevent)break;evnt(25753,8120,"ide_methods.bas");}while(r); } S_44395:; if ((-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4)))>(*__LONG_IDEWX- 1 )))||new_error){ if(qbevent){evnt(25753,8121,"ide_methods.bas");if(r)goto S_44395;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))=(*__LONG_IDEWX- 1 )-*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0)); if(!qbevent)break;evnt(25753,8122,"ide_methods.bas");}while(r); } S_44398:; if ((-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6)))>*_SUB_SHOWVWATCHPANEL_LONG_VWATCHPANELLIMIT))||new_error){ if(qbevent){evnt(25753,8124,"ide_methods.bas");if(r)goto S_44398;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))=*_SUB_SHOWVWATCHPANEL_LONG_VWATCHPANELLIMIT-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))- 1 ); if(!qbevent)break;evnt(25753,8125,"ide_methods.bas");}while(r); } S_44401:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))< 5 ))||new_error){ if(qbevent){evnt(25753,8127,"ide_methods.bas");if(r)goto S_44401;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))= 5 ; if(!qbevent)break;evnt(25753,8127,"ide_methods.bas");}while(r); } S_44404:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))>(*__LONG_IDEWY- 10 )))||new_error){ if(qbevent){evnt(25753,8128,"ide_methods.bas");if(r)goto S_44404;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))=*__LONG_IDEWY- 10 ; if(!qbevent)break;evnt(25753,8128,"ide_methods.bas");}while(r); } do{ qbg_sub_color(*_SUB_SHOWVWATCHPANEL_LONG_FG,*_SUB_SHOWVWATCHPANEL_LONG_BG,NULL,3); if(!qbevent)break;evnt(25753,8130,"ide_methods.bas");}while(r); do{ SUB_IDEBOXSHADOW(&(pass4895=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))),&(pass4896=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))),&(pass4897=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))),&(pass4898=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6)))); if(!qbevent)break;evnt(25753,8131,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 ,*_SUB_SHOWVWATCHPANEL_LONG_BG,NULL,3); if(!qbevent)break;evnt(25753,8132,"ide_methods.bas");}while(r); do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 1 ,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 1 ,func_chr( 254 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8133,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_X=_SUB_SHOWVWATCHPANEL_STRING_TITLE->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8135,"ide_methods.bas");}while(r); do{ qbg_sub_color(*_SUB_SHOWVWATCHPANEL_LONG_FG,*_SUB_SHOWVWATCHPANEL_LONG_BG,NULL,3); if(!qbevent)break;evnt(25753,8136,"ide_methods.bas");}while(r); do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))/ 2 ))-((*_SUB_SHOWVWATCHPANEL_LONG_X- 1 )/ 2 ),*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2)),qbs_add(qbs_add(qbs_new_txt_len(" ",1),_SUB_SHOWVWATCHPANEL_STRING_TITLE),qbs_new_txt_len(" ",1)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8137,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 4 ,NULL,3); if(!qbevent)break;evnt(25753,8138,"ide_methods.bas");}while(r); do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 3 ,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2)),qbs_new_txt_len(" x ",3),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8139,"ide_methods.bas");}while(r); do{ qbg_sub_color(NULL,*_SUB_SHOWVWATCHPANEL_LONG_BG,NULL,2); if(!qbevent)break;evnt(25753,8140,"ide_methods.bas");}while(r); }else{ do{ sub__echo(qbs_add(qbs_new_txt_len("-------- ",9),_SUB_SHOWVWATCHPANEL_STRING_TITLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8142,"ide_methods.bas");}while(r); } do{ *_SUB_SHOWVWATCHPANEL_LONG_Y= 0 ; if(!qbevent)break;evnt(25753,8145,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_I= 0 ; if(!qbevent)break;evnt(25753,8146,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_SHADOWX= 0 ; if(!qbevent)break;evnt(25753,8147,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_SHADOWY= 0 ; if(!qbevent)break;evnt(25753,8148,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_SHADOWLENGTH= 0 ; if(!qbevent)break;evnt(25753,8149,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(24))= 0 ; if(!qbevent)break;evnt(25753,8150,"ide_methods.bas");}while(r); S_44426:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10))== 0 ))||new_error){ if(qbevent){evnt(25753,8151,"ide_methods.bas");if(r)goto S_44426;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10))= 1 ; if(!qbevent)break;evnt(25753,8151,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMP,FUNC_GETBYTES(qbs_new_txt_len("",0),&(pass4900= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8152,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMP,func_mid(__STRING_VARIABLEWATCHLIST, 9 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8153,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_ACTUALLONGESTVARNAME= 0 ; if(!qbevent)break;evnt(25753,8154,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON= 0 ; if(!qbevent)break;evnt(25753,8155,"ide_methods.bas");}while(r); S_44433:; do{ if(qbevent){evnt(25753,8156,"ide_methods.bas");if(r)goto S_44433;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMP2,FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,&(pass4902= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8157,"ide_methods.bas");}while(r); S_44435:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_SHOWVWATCHPANEL_STRING_TEMP2,l2string( -1 ))))||new_error){ if(qbevent){evnt(25753,8158,"ide_methods.bas");if(r)goto S_44435;} do{ goto dl_exit_4901; if(!qbevent)break;evnt(25753,8158,"ide_methods.bas");}while(r); } do{ *_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX=string2l(FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,&(pass4903= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8159,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES=string2l(FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,&(pass4904= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8160,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPARRAYINDEXES,FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8161,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENT=string2l(FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,&(pass4905= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8162,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENTOFFSET=string2l(FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,&(pass4906= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8163,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_TEMPSTORAGE=string2l(FUNC_GETBYTES(_SUB_SHOWVWATCHPANEL_STRING_TEMP,&(pass4907= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8164,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_I=*_SUB_SHOWVWATCHPANEL_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,8166,"ide_methods.bas");}while(r); S_44445:; if (((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(8))>*_SUB_SHOWVWATCHPANEL_LONG_I))&(-(*__BYTE_WATCHLISTTOCONSOLE== 0 )))||new_error){ if(qbevent){evnt(25753,8167,"ide_methods.bas");if(r)goto S_44445;} do{ goto dl_continue_4901; if(!qbevent)break;evnt(25753,8167,"ide_methods.bas");}while(r); } do{ *_SUB_SHOWVWATCHPANEL_LONG_Y=*_SUB_SHOWVWATCHPANEL_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,8168,"ide_methods.bas");}while(r); S_44449:; if (((-(*_SUB_SHOWVWATCHPANEL_LONG_Y>(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 2 )))&(-(*__BYTE_WATCHLISTTOCONSOLE== 0 )))||new_error){ if(qbevent){evnt(25753,8169,"ide_methods.bas");if(r)goto S_44449;} do{ goto dl_exit_4901; if(!qbevent)break;evnt(25753,8169,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8171,"ide_methods.bas");}while(r); S_44453:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30)))||new_error){ if(qbevent){evnt(25753,8172,"ide_methods.bas");if(r)goto S_44453;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_left(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,_SUB_SHOWVWATCHPANEL_STRING_THISNAME->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8173,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES=*_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES/ 4 ; if(!qbevent)break;evnt(25753,8174,"ide_methods.bas");}while(r); S_44456:; fornext_value4910= 1 ; fornext_finalvalue4910=*_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES; fornext_step4910= 1 ; if (fornext_step4910<0) fornext_step_negative4910=1; else fornext_step_negative4910=0; if (new_error) goto fornext_error4910; goto fornext_entrylabel4910; while(1){ fornext_value4910=fornext_step4910+(*_SUB_SHOWVWATCHPANEL_LONG_J); fornext_entrylabel4910: *_SUB_SHOWVWATCHPANEL_LONG_J=fornext_value4910; if (fornext_step_negative4910){ if (fornext_value4910fornext_finalvalue4910) break; } fornext_error4910:; if(qbevent){evnt(25753,8175,"ide_methods.bas");if(r)goto S_44456;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_add(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_ltrim(qbs_str((int32)(string2l(func_mid(_SUB_SHOWVWATCHPANEL_STRING_TEMPARRAYINDEXES,(*_SUB_SHOWVWATCHPANEL_LONG_J* 4 )-( 3 ), 4 ,1))))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8176,"ide_methods.bas");}while(r); S_44458:; if ((-(*_SUB_SHOWVWATCHPANEL_LONG_J<*_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES))||new_error){ if(qbevent){evnt(25753,8177,"ide_methods.bas");if(r)goto S_44458;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_add(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_new_txt_len(", ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8177,"ide_methods.bas");}while(r); } fornext_continue_4909:; } fornext_exit_4909:; do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_add(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8179,"ide_methods.bas");}while(r); } S_44464:; if ((*_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENT)||new_error){ if(qbevent){evnt(25753,8181,"ide_methods.bas");if(r)goto S_44464;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPELEMENTLIST,func_mid(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))), 5 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8182,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,qbs_add(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,FUNC_GETELEMENT(_SUB_SHOWVWATCHPANEL_STRING_TEMPELEMENTLIST,_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8183,"ide_methods.bas");}while(r); } S_44468:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_SHOWVWATCHPANEL_STRING_THISNAME->len>*_SUB_SHOWVWATCHPANEL_LONG_ACTUALLONGESTVARNAME)))||new_error){ if(qbevent){evnt(25753,8185,"ide_methods.bas");if(r)goto S_44468;} do{ *_SUB_SHOWVWATCHPANEL_LONG_ACTUALLONGESTVARNAME=_SUB_SHOWVWATCHPANEL_STRING_THISNAME->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8185,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_ITEM,qbs_add(qbs_add(_SUB_SHOWVWATCHPANEL_STRING_THISNAME,func_space(*_SUB_SHOWVWATCHPANEL_LONG_LONGESTVARNAME-_SUB_SHOWVWATCHPANEL_STRING_THISNAME->len)),qbs_new_txt_len(" = ",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8186,"ide_methods.bas");}while(r); S_44472:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),_SUB_SHOWVWATCHPANEL_STRING_CURRENTSCOPE))|(qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25753,8187,"ide_methods.bas");if(r)goto S_44472;} S_44473:; if ((*_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENT)||new_error){ if(qbevent){evnt(25753,8188,"ide_methods.bas");if(r)goto S_44473;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPVARTYPE,FUNC_GETELEMENT(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8189,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPVARTYPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8191,"ide_methods.bas");}while(r); } do{ *_SUB_SHOWVWATCHPANEL_LONG_THISISASTRING=((-(func_instr(NULL,_SUB_SHOWVWATCHPANEL_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING *",8),0)> 0 ))|(qbs_equal(_SUB_SHOWVWATCHPANEL_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING",6)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8193,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE,FUNC_STRREPLACE(((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPSTORAGE)-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5])])),func_chr( 0 ),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8194,"ide_methods.bas");}while(r); S_44480:; if ((*_SUB_SHOWVWATCHPANEL_LONG_THISISASTRING)||new_error){ if(qbevent){evnt(25753,8195,"ide_methods.bas");if(r)goto S_44480;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_ITEM,qbs_add(qbs_add(qbs_add(_SUB_SHOWVWATCHPANEL_STRING_ITEM,func_chr( 34 )),_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8196,"ide_methods.bas");}while(r); S_44482:; if ((-(*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON> 0 ))||new_error){ if(qbevent){evnt(25753,8197,"ide_methods.bas");if(r)goto S_44482;} do{ *_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON= 0 ; if(!qbevent)break;evnt(25753,8197,"ide_methods.bas");}while(r); } }else{ S_44486:; if (((-(*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON== 0 ))&(-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(22))==(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y))))||new_error){ if(qbevent){evnt(25753,8199,"ide_methods.bas");if(r)goto S_44486;} do{ *_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON=_SUB_SHOWVWATCHPANEL_STRING_ITEM->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8199,"ide_methods.bas");}while(r); } S_44489:; if ((*__BYTE_WATCHLISTTOCONSOLE)||new_error){ if(qbevent){evnt(25753,8200,"ide_methods.bas");if(r)goto S_44489;} do{ *_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON= 0 ; if(!qbevent)break;evnt(25753,8200,"ide_methods.bas");}while(r); } S_44492:; sc_4915=*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31)); if(qbevent){evnt(25753,8202,"ide_methods.bas");if(r)goto S_44492;} S_44493:; if (((sc_4915==( 1 )))||new_error){ if(qbevent){evnt(25753,8204,"ide_methods.bas");if(r)goto S_44493;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&H",2),func_hex_float(func_val(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8204,"ide_methods.bas");}while(r); sc_ec_288_end:; goto sc_4915_end; } S_44495:; if (((sc_4915==( 2 )))||new_error){ if(qbevent){evnt(25753,8205,"ide_methods.bas");if(r)goto S_44495;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&B",2),func__bin_float(func_val(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8205,"ide_methods.bas");}while(r); sc_ec_289_end:; goto sc_4915_end; } S_44497:; if (((sc_4915==( 3 )))||new_error){ if(qbevent){evnt(25753,8206,"ide_methods.bas");if(r)goto S_44497;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&O",2),func_oct_float(func_val(_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8206,"ide_methods.bas");}while(r); sc_ec_290_end:; goto sc_4915_end; } sc_4915_end:; do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_ITEM,qbs_add(_SUB_SHOWVWATCHPANEL_STRING_ITEM,_SUB_SHOWVWATCHPANEL_STRING_TEMPVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8208,"ide_methods.bas");}while(r); } do{ qbg_sub_color(*_SUB_SHOWVWATCHPANEL_LONG_FG,NULL,NULL,1); if(!qbevent)break;evnt(25753,8210,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_ITEM,qbs_add(_SUB_SHOWVWATCHPANEL_STRING_ITEM,qbs_new_txt_len("",14))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8212,"ide_methods.bas");}while(r); S_44505:; if ((-(*__BYTE_WATCHLISTTOCONSOLE== 0 ))||new_error){ if(qbevent){evnt(25753,8213,"ide_methods.bas");if(r)goto S_44505;} do{ qbg_sub_color( 2 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,8213,"ide_methods.bas");}while(r); } } S_44509:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_SHOWVWATCHPANEL_STRING_ITEM->len>*(int32*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(24)))))||new_error){ if(qbevent){evnt(25753,8215,"ide_methods.bas");if(r)goto S_44509;} do{ *(int32*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(24))=_SUB_SHOWVWATCHPANEL_STRING_ITEM->len; if(!qbevent)break;evnt(25753,8215,"ide_methods.bas");}while(r); } S_44512:; if ((-(*__BYTE_WATCHLISTTOCONSOLE== 0 ))||new_error){ if(qbevent){evnt(25753,8216,"ide_methods.bas");if(r)goto S_44512;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMP2,func_mid(_SUB_SHOWVWATCHPANEL_STRING_ITEM,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10)),NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8217,"ide_methods.bas");}while(r); do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+ 2 ,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y,qbs_left(_SUB_SHOWVWATCHPANEL_STRING_TEMP2,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 4 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8218,"ide_methods.bas");}while(r); S_44515:; if ((qbs_cleanup(qbs_tmp_base,-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+ 2 +_SUB_SHOWVWATCHPANEL_STRING_TEMP2->len)>(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 2 ))))||new_error){ if(qbevent){evnt(25753,8219,"ide_methods.bas");if(r)goto S_44515;} do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 2 ,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y,func_chr( 26 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8220,"ide_methods.bas");}while(r); } S_44518:; if (((-(*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON> 0 ))&(-(*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON>=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10))))&(-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON-*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10)))<(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 4 )))&(-((*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON-*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10)))>(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+ 1 ))))||new_error){ if(qbevent){evnt(25753,8226,"ide_methods.bas");if(r)goto S_44518;} do{ qbg_sub_color( 15 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,8227,"ide_methods.bas");}while(r); S_44520:; if (((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(22))==(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y)))&(-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(20))==(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON-*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10))))))||new_error){ if(qbevent){evnt(25753,8228,"ide_methods.bas");if(r)goto S_44520;} do{ qbg_sub_color(NULL, 3 ,NULL,2); if(!qbevent)break;evnt(25753,8229,"ide_methods.bas");}while(r); S_44522:; if ((-(*(int8*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(35))== 2 ))||new_error){ if(qbevent){evnt(25753,8231,"ide_methods.bas");if(r)goto S_44522;} do{ *(int8*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(35))= 0 ; if(!qbevent)break;evnt(25753,8232,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))=*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))+ 1 ; if(!qbevent)break;evnt(25753,8233,"ide_methods.bas");}while(r); S_44525:; if ((-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))> 3 ))||new_error){ if(qbevent){evnt(25753,8234,"ide_methods.bas");if(r)goto S_44525;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))= 0 ; if(!qbevent)break;evnt(25753,8234,"ide_methods.bas");}while(r); } } } do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON-*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10)),*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(22)),func_chr( 29 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8237,"ide_methods.bas");}while(r); do{ qbg_sub_color(*_SUB_SHOWVWATCHPANEL_LONG_FG,*_SUB_SHOWVWATCHPANEL_LONG_BG,NULL,3); if(!qbevent)break;evnt(25753,8238,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_DISPLAYFORMATBUTTON= -1 ; if(!qbevent)break;evnt(25753,8239,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMP2,qbs_add(qbs_add(qbs_add(l2string(*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX),l2string(*_SUB_SHOWVWATCHPANEL_LONG_TEMPTOTALARRAYINDEXES* 4 )),_SUB_SHOWVWATCHPANEL_STRING_TEMPARRAYINDEXES),l2string(*_SUB_SHOWVWATCHPANEL_LONG_TEMPELEMENTOFFSET))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8243,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_J= 0 ; if(!qbevent)break;evnt(25753,8244,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_J=func_instr(*_SUB_SHOWVWATCHPANEL_LONG_J+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8245,"ide_methods.bas");}while(r); S_44537:; while((*_SUB_SHOWVWATCHPANEL_LONG_J)||new_error){ if(qbevent){evnt(25753,8246,"ide_methods.bas");if(r)goto S_44537;} S_44538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WATCHPOINTLIST,*_SUB_SHOWVWATCHPANEL_LONG_J+ 8 ,_SUB_SHOWVWATCHPANEL_STRING_TEMP2->len,1),_SUB_SHOWVWATCHPANEL_STRING_TEMP2)))||new_error){ if(qbevent){evnt(25753,8247,"ide_methods.bas");if(r)goto S_44538;} do{ goto dl_exit_4919; if(!qbevent)break;evnt(25753,8247,"ide_methods.bas");}while(r); } do{ *_SUB_SHOWVWATCHPANEL_LONG_J=func_instr(*_SUB_SHOWVWATCHPANEL_LONG_J+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8248,"ide_methods.bas");}while(r); dl_continue_4919:; } dl_exit_4919:; S_44543:; if ((-(*_SUB_SHOWVWATCHPANEL_LONG_J> 0 ))||new_error){ if(qbevent){evnt(25753,8251,"ide_methods.bas");if(r)goto S_44543;} S_44544:; if ((-(*__LONG_LATESTWATCHPOINTMET==*_SUB_SHOWVWATCHPANEL_LONG_TEMPINDEX))||new_error){ if(qbevent){evnt(25753,8252,"ide_methods.bas");if(r)goto S_44544;} do{ qbg_sub_color( 15 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,8252,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 4 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,8252,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+ 1 ,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y,func_chr( 7 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8253,"ide_methods.bas");}while(r); S_44550:; if (((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(20))==(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+ 1 )))&(-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(22))==(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y))))||new_error){ if(qbevent){evnt(25753,8254,"ide_methods.bas");if(r)goto S_44550;} do{ qbg_sub_color( 15 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,8255,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_K=string2l(func_mid(__STRING_WATCHPOINTLIST,*_SUB_SHOWVWATCHPANEL_LONG_J+ 4 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8257,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_TEMP3,func_mid(__STRING_WATCHPOINTLIST,*_SUB_SHOWVWATCHPANEL_LONG_J+ 8 ,*_SUB_SHOWVWATCHPANEL_LONG_K,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8258,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_K=string2i(qbs_right(_SUB_SHOWVWATCHPANEL_STRING_TEMP3, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8259,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_CONDITION,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len(" Watchpoint: ",13),_SUB_SHOWVWATCHPANEL_STRING_THISNAME),qbs_new_txt_len(" ",1)),func_mid(_SUB_SHOWVWATCHPANEL_STRING_TEMP3,_SUB_SHOWVWATCHPANEL_STRING_TEMP3->len-( 2 +*_SUB_SHOWVWATCHPANEL_LONG_K)+ 1 ,*_SUB_SHOWVWATCHPANEL_LONG_K,1)),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8260,"ide_methods.bas");}while(r); S_44556:; if ((qbs_cleanup(qbs_tmp_base,-((_SUB_SHOWVWATCHPANEL_STRING_CONDITION->len)>(*__LONG_IDEWX- 8 ))))||new_error){ if(qbevent){evnt(25753,8262,"ide_methods.bas");if(r)goto S_44556;} do{ qbs_set(_SUB_SHOWVWATCHPANEL_STRING_CONDITION,qbs_add(qbs_add(qbs_left(_SUB_SHOWVWATCHPANEL_STRING_CONDITION,*__LONG_IDEWX- 13 ),func_string( 3 , 250 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8263,"ide_methods.bas");}while(r); } do{ *_SUB_SHOWVWATCHPANEL_LONG_K=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+ 2 ; if(!qbevent)break;evnt(25753,8265,"ide_methods.bas");}while(r); S_44560:; if ((qbs_cleanup(qbs_tmp_base,-((*_SUB_SHOWVWATCHPANEL_LONG_K+_SUB_SHOWVWATCHPANEL_STRING_CONDITION->len)>*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,8266,"ide_methods.bas");if(r)goto S_44560;} do{ *_SUB_SHOWVWATCHPANEL_LONG_K=*__LONG_IDEWX-(_SUB_SHOWVWATCHPANEL_STRING_CONDITION->len+ 2 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8266,"ide_methods.bas");}while(r); } do{ sub__printstring(*_SUB_SHOWVWATCHPANEL_LONG_K,*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y,_SUB_SHOWVWATCHPANEL_STRING_CONDITION,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8268,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_SHADOWX=*_SUB_SHOWVWATCHPANEL_LONG_K; if(!qbevent)break;evnt(25753,8270,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_SHADOWY=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*_SUB_SHOWVWATCHPANEL_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,8271,"ide_methods.bas");}while(r); do{ *_SUB_SHOWVWATCHPANEL_LONG_SHADOWLENGTH=_SUB_SHOWVWATCHPANEL_STRING_CONDITION->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8272,"ide_methods.bas");}while(r); } do{ qbg_sub_color(*_SUB_SHOWVWATCHPANEL_LONG_FG,*_SUB_SHOWVWATCHPANEL_LONG_BG,NULL,3); if(!qbevent)break;evnt(25753,8274,"ide_methods.bas");}while(r); } }else{ do{ sub__echo(_SUB_SHOWVWATCHPANEL_STRING_ITEM); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8277,"ide_methods.bas");}while(r); } dl_continue_4901:; }while(1); dl_exit_4901:; do{ *_SUB_SHOWVWATCHPANEL_LONG_LONGESTVARNAME=*_SUB_SHOWVWATCHPANEL_LONG_ACTUALLONGESTVARNAME; if(!qbevent)break;evnt(25753,8280,"ide_methods.bas");}while(r); S_44575:; if ((-(*__BYTE_WATCHLISTTOCONSOLE== 0 ))||new_error){ if(qbevent){evnt(25753,8282,"ide_methods.bas");if(r)goto S_44575;} S_44576:; if ((*_SUB_SHOWVWATCHPANEL_LONG_SHADOWLENGTH)||new_error){ if(qbevent){evnt(25753,8283,"ide_methods.bas");if(r)goto S_44576;} do{ qbg_sub_color( 2 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,8285,"ide_methods.bas");}while(r); S_44578:; fornext_value4927=*_SUB_SHOWVWATCHPANEL_LONG_SHADOWX+ 2 ; fornext_finalvalue4927=*_SUB_SHOWVWATCHPANEL_LONG_SHADOWX+*_SUB_SHOWVWATCHPANEL_LONG_SHADOWLENGTH; fornext_step4927= 1 ; if (fornext_step4927<0) fornext_step_negative4927=1; else fornext_step_negative4927=0; if (new_error) goto fornext_error4927; goto fornext_entrylabel4927; while(1){ fornext_value4927=fornext_step4927+(*_SUB_SHOWVWATCHPANEL_LONG_X2); fornext_entrylabel4927: *_SUB_SHOWVWATCHPANEL_LONG_X2=fornext_value4927; if (fornext_step_negative4927){ if (fornext_value4927fornext_finalvalue4927) break; } fornext_error4927:; if(qbevent){evnt(25753,8286,"ide_methods.bas");if(r)goto S_44578;} do{ sub__printstring(*_SUB_SHOWVWATCHPANEL_LONG_X2,*_SUB_SHOWVWATCHPANEL_LONG_SHADOWY,func_chr(func_screen(*_SUB_SHOWVWATCHPANEL_LONG_SHADOWY,*_SUB_SHOWVWATCHPANEL_LONG_X2,NULL,0)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8287,"ide_methods.bas");}while(r); fornext_continue_4926:; } fornext_exit_4926:; } S_44582:; if ((-(*_SUB_SHOWVWATCHPANEL_LONG_TOTALVISIBLEVARIABLES>(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 2 )))||new_error){ if(qbevent){evnt(25753,8291,"ide_methods.bas");if(r)goto S_44582;} do{ *_SUB_SHOWVWATCHPANEL_LONG_Y=FUNC_IDEVBAR(&(pass4928=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 1 ),&(pass4929=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+ 1 ),&(pass4930=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 2 ),&(pass4931=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(8))),&(pass4932=*_SUB_SHOWVWATCHPANEL_LONG_TOTALVISIBLEVARIABLES-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 2 )+ 1 )); if(!qbevent)break;evnt(25753,8292,"ide_methods.bas");}while(r); S_44584:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(16))== 0 ))||new_error){ if(qbevent){evnt(25753,8293,"ide_methods.bas");if(r)goto S_44584;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(12))=*_SUB_SHOWVWATCHPANEL_LONG_Y; if(!qbevent)break;evnt(25753,8294,"ide_methods.bas");}while(r); } }else{ do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(12))= 0 ; if(!qbevent)break;evnt(25753,8297,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(8))= 1 ; if(!qbevent)break;evnt(25753,8298,"ide_methods.bas");}while(r); } S_44591:; if ((-(*(int32*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(24))>(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 4 )))||new_error){ if(qbevent){evnt(25753,8301,"ide_methods.bas");if(r)goto S_44591;} do{ *_SUB_SHOWVWATCHPANEL_LONG_X=FUNC_IDEHBAR(&(pass4933=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(0))),&(pass4934=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(2))+*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(6))- 1 ),&(pass4935=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 1 ),&(pass4936=*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10))),&(pass4937=*(int32*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(24))-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(4))- 4 )+ 1 )); if(!qbevent)break;evnt(25753,8302,"ide_methods.bas");}while(r); S_44593:; if ((-(*(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(18))== 0 ))||new_error){ if(qbevent){evnt(25753,8303,"ide_methods.bas");if(r)goto S_44593;} do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(14))=*_SUB_SHOWVWATCHPANEL_LONG_X; if(!qbevent)break;evnt(25753,8304,"ide_methods.bas");}while(r); } }else{ do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(14))= 0 ; if(!qbevent)break;evnt(25753,8307,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(10))= 1 ; if(!qbevent)break;evnt(25753,8308,"ide_methods.bas");}while(r); } } S_44601:; if ((-(*(int8*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(35))== 2 ))||new_error){ if(qbevent){evnt(25753,8311,"ide_methods.bas");if(r)goto S_44601;} do{ *(int8*)(((char*)_SUB_SHOWVWATCHPANEL_UDT_THIS)+(35))= 0 ; if(!qbevent)break;evnt(25753,8311,"ide_methods.bas");}while(r); } 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; } int32 FUNC_MULTISEARCH(qbs*_FUNC_MULTISEARCH_STRING___FULLTEXT,qbs*_FUNC_MULTISEARCH_STRING___SEARCHSTRING){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_MULTISEARCH_STRING_FULLTEXT,qbs__trim(qbs_ucase(_FUNC_MULTISEARCH_STRING___FULLTEXT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8320,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_MULTISEARCH_STRING_SEARCHSTRING,qbs__trim(qbs_ucase(_FUNC_MULTISEARCH_STRING___SEARCHSTRING))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8321,"ide_methods.bas");}while(r); S_44606:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_MULTISEARCH_STRING_FULLTEXT->len== 0 )))||new_error){ if(qbevent){evnt(25753,8322,"ide_methods.bas");if(r)goto S_44606;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,8322,"ide_methods.bas");}while(r); } S_44609:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_MULTISEARCH_STRING_SEARCHSTRING->len== 0 )))||new_error){ if(qbevent){evnt(25753,8323,"ide_methods.bas");if(r)goto S_44609;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,8323,"ide_methods.bas");}while(r); } do{ *_FUNC_MULTISEARCH_LONG_MULTISEARCH= -1 ; if(!qbevent)break;evnt(25753,8325,"ide_methods.bas");}while(r); do{ *_FUNC_MULTISEARCH_LONG_FINDPLUS=func_instr(NULL,_FUNC_MULTISEARCH_STRING_SEARCHSTRING,qbs_new_txt_len("+",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8326,"ide_methods.bas");}while(r); S_44614:; while((*_FUNC_MULTISEARCH_LONG_FINDPLUS)||new_error){ if(qbevent){evnt(25753,8327,"ide_methods.bas");if(r)goto S_44614;} do{ qbs_set(_FUNC_MULTISEARCH_STRING_THISTERM,qbs_left(_FUNC_MULTISEARCH_STRING_SEARCHSTRING,*_FUNC_MULTISEARCH_LONG_FINDPLUS- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8328,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_MULTISEARCH_STRING_SEARCHSTRING,func_mid(_FUNC_MULTISEARCH_STRING_SEARCHSTRING,*_FUNC_MULTISEARCH_LONG_FINDPLUS+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8329,"ide_methods.bas");}while(r); S_44617:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_MULTISEARCH_STRING_FULLTEXT,_FUNC_MULTISEARCH_STRING_THISTERM,0)== 0 )))||new_error){ if(qbevent){evnt(25753,8330,"ide_methods.bas");if(r)goto S_44617;} do{ *_FUNC_MULTISEARCH_LONG_MULTISEARCH= 0 ; if(!qbevent)break;evnt(25753,8330,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,8330,"ide_methods.bas");}while(r); } do{ *_FUNC_MULTISEARCH_LONG_FINDPLUS=func_instr(NULL,_FUNC_MULTISEARCH_STRING_SEARCHSTRING,qbs_new_txt_len("+",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8331,"ide_methods.bas");}while(r); ww_continue_4942:; } ww_exit_4942:; S_44623:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_MULTISEARCH_STRING_SEARCHSTRING->len))||new_error){ if(qbevent){evnt(25753,8334,"ide_methods.bas");if(r)goto S_44623;} S_44624:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_MULTISEARCH_STRING_FULLTEXT,_FUNC_MULTISEARCH_STRING_SEARCHSTRING,0)== 0 )))||new_error){ if(qbevent){evnt(25753,8335,"ide_methods.bas");if(r)goto S_44624;} do{ *_FUNC_MULTISEARCH_LONG_MULTISEARCH= 0 ; if(!qbevent)break;evnt(25753,8335,"ide_methods.bas");}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; return *_FUNC_MULTISEARCH_LONG_MULTISEARCH; } qbs* FUNC_IDEVARIABLEWATCHBOX(qbs*_FUNC_IDEVARIABLEWATCHBOX_STRING_CURRENTSCOPE,qbs*_FUNC_IDEVARIABLEWATCHBOX_STRING_FILTER,int32*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR,int32*_FUNC_IDEVARIABLEWATCHBOX_LONG_RETURNACTION){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,8342,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,8343,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,8344,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,8345,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,8346,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,8347,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,8348,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8349,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RETURNACTION= 0 ; if(!qbevent)break;evnt(25753,8354,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE,qbs_new_txt_len("GLOBAL",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8355,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN=_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8356,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXTYPELEN=((int32)(qbs_new_txt_len("Type",4))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8357,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR= 3 ; if(!qbevent)break;evnt(25753,8358,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYPECOLUMNCOLOR= 15 ; if(!qbevent)break;evnt(25753,8359,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTEDBG= 2 ; if(!qbevent)break;evnt(25753,8360,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST)[8])->id=(++mem_lock_id); if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&1){ tmp_long=_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+(264/8+1-1)*tmp_long+ 25));} if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])); }else{ free((void*)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])); } } _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4]= 1 ; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]=(*__LONG_TOTALVARIABLESCREATED)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4]+1; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[6]=1; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0]=(ptrszint)malloc(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]*264/8+1); if (!_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0]) error(257); _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[2]|=1; tmp_long=_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]; while(tmp_long--){ *(qbs**)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+(264/8+1-1)*tmp_long+ 25)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,8368,"ide_methods.bas");}while(r); S_44644:; fornext_value4948= 1 ; fornext_finalvalue4948=*__LONG_TOTALVARIABLESCREATED; fornext_step4948= 1 ; if (fornext_step4948<0) fornext_step_negative4948=1; else fornext_step_negative4948=0; if (new_error) goto fornext_error4948; goto fornext_entrylabel4948; while(1){ fornext_value4948=fornext_step4948+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X); fornext_entrylabel4948: *_FUNC_IDEVARIABLEWATCHBOX_LONG_X=fornext_value4948; if (fornext_step_negative4948){ if (fornext_value4948fornext_finalvalue4948) break; } fornext_error4948:; if(qbevent){evnt(25753,8371,"ide_methods.bas");if(r)goto S_44644;} S_44645:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12)))||new_error){ if(qbevent){evnt(25753,8372,"ide_methods.bas");if(r)goto S_44645;} do{ goto fornext_continue_4947; if(!qbevent)break;evnt(25753,8372,"ide_methods.bas");}while(r); } S_44648:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len>*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN)))||new_error){ if(qbevent){evnt(25753,8373,"ide_methods.bas");if(r)goto S_44648;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN=(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8374,"ide_methods.bas");}while(r); } S_44651:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))->len>*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXTYPELEN)))||new_error){ if(qbevent){evnt(25753,8377,"ide_methods.bas");if(r)goto S_44651;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXTYPELEN=(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8377,"ide_methods.bas");}while(r); } fornext_continue_4947:; } fornext_exit_4947:; do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM,_FUNC_IDEVARIABLEWATCHBOX_STRING_FILTER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8380,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FIRSTRUN= -1 ; if(!qbevent)break;evnt(25753,8381,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=142; if (next_return_point>=return_points) more_return_points(); goto LABEL_BUILDLIST; RETURN_142:; if(!qbevent)break;evnt(25753,8382,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FIRSTRUN= 0 ; if(!qbevent)break;evnt(25753,8383,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT=*__LONG_TOTALMAINVARIABLESCREATED+ 7 ; if(!qbevent)break;evnt(25753,8384,"ide_methods.bas");}while(r); LABEL_LISTBUILT:; if(qbevent){evnt(25753,8385,"ide_methods.bas");r=0;} S_44660:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR== -1 ))||new_error){ if(qbevent){evnt(25753,8386,"ide_methods.bas");if(r)goto S_44660;} do{ goto LABEL_GENERATEVARIABLEWATCHLIST; if(!qbevent)break;evnt(25753,8386,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,8388,"ide_methods.bas");}while(r); S_44664:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT<*_FUNC_IDEVARIABLEWATCHBOX_LONG_LASTUSEDDIALOGHEIGHT))||new_error){ if(qbevent){evnt(25753,8389,"ide_methods.bas");if(r)goto S_44664;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT=*_FUNC_IDEVARIABLEWATCHBOX_LONG_LASTUSEDDIALOGHEIGHT; if(!qbevent)break;evnt(25753,8389,"ide_methods.bas");}while(r); } S_44667:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,8390,"ide_methods.bas");if(r)goto S_44667;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,8391,"ide_methods.bas");}while(r); } S_44670:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT< 9 ))||new_error){ if(qbevent){evnt(25753,8393,"ide_methods.bas");if(r)goto S_44670;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT= 9 ; if(!qbevent)break;evnt(25753,8393,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH= 6 +*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN+*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXVARLEN+*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXTYPELEN; if(!qbevent)break;evnt(25753,8395,"ide_methods.bas");}while(r); S_44674:; if ((-(*__LONG_IDEDEBUGMODE> 0 ))||new_error){ if(qbevent){evnt(25753,8396,"ide_methods.bas");if(r)goto S_44674;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH=*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH+ 40 ; if(!qbevent)break;evnt(25753,8396,"ide_methods.bas");}while(r); } S_44677:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH< 70 ))||new_error){ if(qbevent){evnt(25753,8397,"ide_methods.bas");if(r)goto S_44677;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH= 70 ; if(!qbevent)break;evnt(25753,8397,"ide_methods.bas");}while(r); } S_44680:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,8398,"ide_methods.bas");if(r)goto S_44680;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,8398,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_UDT_P)) + (0) ),_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH,_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT,qbs_new_txt_len("Add Watch - Variable List",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8400,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,8402,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,8402,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,8403,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,8404,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,8405,"ide_methods.bas");}while(r); S_44689:; if ((-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+40))== 0 ))||new_error){ if(qbevent){evnt(25753,8406,"ide_methods.bas");if(r)goto S_44689;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Filter (multiple+terms+accepted)",33)); if(!qbevent)break;evnt(25753,8406,"ide_methods.bas");}while(r); } S_44692:; if ((-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))== 0 ))||new_error){ if(qbevent){evnt(25753,8407,"ide_methods.bas");if(r)goto S_44692;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEVARIABLEWATCHBOX_STRING_FILTER); if(!qbevent)break;evnt(25753,8407,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,8409,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,8409,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,8410,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,8411,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+28))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,8412,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+32))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT- 7 ; if(!qbevent)break;evnt(25753,8412,"ide_methods.bas");}while(r); S_44701:; if ((-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))== 0 ))||new_error){ if(qbevent){evnt(25753,8413,"ide_methods.bas");if(r)goto S_44701;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEVARIABLEWATCHBOX_STRING_L); if(!qbevent)break;evnt(25753,8413,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEVARIABLEWATCHBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8413,"ide_methods.bas");}while(r); } S_44706:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR== 0 ))||new_error){ if(qbevent){evnt(25753,8414,"ide_methods.bas");if(r)goto S_44706;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR= 1 ; if(!qbevent)break;evnt(25753,8414,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX; if(!qbevent)break;evnt(25753,8414,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR; if(!qbevent)break;evnt(25753,8415,"ide_methods.bas");}while(r); S_44712:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM->len))||new_error){ if(qbevent){evnt(25753,8417,"ide_methods.bas");if(r)goto S_44712;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len(", filtered",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8417,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8417,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(16)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Add Watch - Variable List (",27),qbs_ltrim(qbs_str((int32)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)))),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8418,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,8420,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_BUTTONSET=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,8420,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,8421,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,8422,"ide_methods.bas");}while(r); S_44722:; if (((-(*__LONG_IDEDEBUGMODE> 0 ))&(-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))== 0 )))||new_error){ if(qbevent){evnt(25753,8423,"ide_methods.bas");if(r)goto S_44722;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Add All",8),_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Remove All",11)),_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Send Value",11)),_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP),qbs_new_txt_len("Add #Watchpoint",15)),_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Close",6))); if(!qbevent)break;evnt(25753,8424,"ide_methods.bas");}while(r); }else{ do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Add All",8),_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Remove All",11)),_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Close",6))); if(!qbevent)break;evnt(25753,8426,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LASTUSEDDIALOGHEIGHT=*_FUNC_IDEVARIABLEWATCHBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,8429,"ide_methods.bas");}while(r); S_44728:; fornext_value4951= 1 ; fornext_finalvalue4951= 100 ; fornext_step4951= 1 ; if (fornext_step4951<0) fornext_step_negative4951=1; else fornext_step_negative4951=0; if (new_error) goto fornext_error4951; goto fornext_entrylabel4951; while(1){ fornext_value4951=fornext_step4951+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I); fornext_entrylabel4951: *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=fornext_value4951; if (fornext_step_negative4951){ if (fornext_value4951fornext_finalvalue4951) break; } fornext_error4951:; if(qbevent){evnt(25753,8435,"ide_methods.bas");if(r)goto S_44728;} do{ memcpy(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,8435,"ide_methods.bas");}while(r); fornext_continue_4950:; } fornext_exit_4950:; S_44731:; do{ if(qbevent){evnt(25753,8438,"ide_methods.bas");if(r)goto S_44731;} LABEL_DLGUPDATE:; if(qbevent){evnt(25753,8441,"ide_methods.bas");r=0;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,8442,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,8443,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,8443,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,8443,"ide_methods.bas");}while(r); S_44736:; fornext_value4954= 1 ; fornext_finalvalue4954= 100 ; fornext_step4954= 1 ; if (fornext_step4954<0) fornext_step_negative4954=1; else fornext_step_negative4954=0; if (new_error) goto fornext_error4954; goto fornext_entrylabel4954; while(1){ fornext_value4954=fornext_step4954+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I); fornext_entrylabel4954: *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=fornext_value4954; if (fornext_step_negative4954){ if (fornext_value4954fornext_finalvalue4954) break; } fornext_error4954:; if(qbevent){evnt(25753,8444,"ide_methods.bas");if(r)goto S_44736;} S_44737:; if ((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,8445,"ide_methods.bas");if(r)goto S_44737;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS-*_FUNC_IDEVARIABLEWATCHBOX_LONG_F; if(!qbevent)break;evnt(25753,8447,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,8448,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,8448,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEVARIABLEWATCHBOX_LONG_F); if(!qbevent)break;evnt(25753,8449,"ide_methods.bas");}while(r); S_44742:; if ((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,8450,"ide_methods.bas");if(r)goto S_44742;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,8450,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,8450,"ide_methods.bas");}while(r); } } fornext_continue_4953:; } fornext_exit_4953:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LASTFOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,8453,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,8457,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(4))+ 4 ,*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,8458,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("Double-click on an item to add it to the watch list:",52)); if (new_error) goto skip4955; makefit(tqbs); qbs_print(tqbs,0); qbs_print(nothingstring,1); skip4955: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8459,"ide_methods.bas");}while(r); S_44752:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD> 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD<*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(8))))&(-(*__LONG_IDEDEBUGMODE> 0 )))||new_error){ if(qbevent){evnt(25753,8460,"ide_methods.bas");if(r)goto S_44752;} do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD,*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(4))+ 5 ,func_chr( 194 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8461,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD,*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(4))+*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(12))- 1 ,func_chr( 193 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8462,"ide_methods.bas");}while(r); S_44755:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX))&(-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))> 0 )))||new_error){ if(qbevent){evnt(25753,8464,"ide_methods.bas");if(r)goto S_44755;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,8465,"ide_methods.bas");}while(r); S_44757:; if ((qbs_cleanup(qbs_tmp_base,(-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))!= 0 ))&(-(func_instr(NULL,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),qbs_new_txt_len("STRING *",8),0)== 0 ))&(qbs_notequal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),qbs_new_txt_len("STRING",6)))))||new_error){ if(qbevent){evnt(25753,8468,"ide_methods.bas");if(r)goto S_44757;} do{ qbg_sub_color( 15 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,8469,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+68)); if(!qbevent)break;evnt(25753,8470,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD- 1 ,*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y,func_chr( 29 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8471,"ide_methods.bas");}while(r); do{ qbg_sub_color(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FG,*_FUNC_IDEVARIABLEWATCHBOX_LONG_BG,NULL,3); if(!qbevent)break;evnt(25753,8472,"ide_methods.bas");}while(r); } } } do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,8480,"ide_methods.bas");}while(r); S_44766:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,8481,"ide_methods.bas");if(r)goto S_44766;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,8481,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEVARIABLEWATCHBOX_LONG_CY,*_FUNC_IDEVARIABLEWATCHBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,8481,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,8481,"ide_methods.bas");}while(r); } S_44771:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_QUICKDLGUPDATE)||new_error){ if(qbevent){evnt(25753,8482,"ide_methods.bas");if(r)goto S_44771;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_QUICKDLGUPDATE= 0 ; if(!qbevent)break;evnt(25753,8482,"ide_methods.bas");}while(r); do{ #include "ret159.txt" if(!qbevent)break;evnt(25753,8482,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,8485,"ide_methods.bas");}while(r); S_44776:; do{ if(qbevent){evnt(25753,8486,"ide_methods.bas");if(r)goto S_44776;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,8487,"ide_methods.bas");}while(r); S_44778:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,8488,"ide_methods.bas");if(r)goto S_44778;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,8488,"ide_methods.bas");}while(r); } S_44781:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,8489,"ide_methods.bas");if(r)goto S_44781;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,8489,"ide_methods.bas");}while(r); } S_44784:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,8490,"ide_methods.bas");if(r)goto S_44784;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,8490,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,8490,"ide_methods.bas");}while(r); } S_44788:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,8491,"ide_methods.bas");if(r)goto S_44788;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,8491,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,8491,"ide_methods.bas");}while(r); } S_44792:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,8492,"ide_methods.bas");if(r)goto S_44792;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,8492,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,8493,"ide_methods.bas");}while(r); S_44796:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_ALT!=*_FUNC_IDEVARIABLEWATCHBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,8493,"ide_methods.bas");if(r)goto S_44796;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,8493,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_OLDALT=*_FUNC_IDEVARIABLEWATCHBOX_LONG_ALT; if(!qbevent)break;evnt(25753,8494,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,8495,"ide_methods.bas");}while(r); S_44801:; dl_continue_4956:; }while((!(*_FUNC_IDEVARIABLEWATCHBOX_LONG_CHANGE))&&(!new_error)); dl_exit_4956:; if(qbevent){evnt(25753,8496,"ide_methods.bas");if(r)goto S_44801;} S_44802:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,8497,"ide_methods.bas");if(r)goto S_44802;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,8497,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,8497,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8499,"ide_methods.bas");}while(r); S_44808:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,8500,"ide_methods.bas");if(r)goto S_44808;} S_44809:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,8501,"ide_methods.bas");if(r)goto S_44809;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8502,"ide_methods.bas");}while(r); S_44811:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,8503,"ide_methods.bas");if(r)goto S_44811;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8503,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,8506,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,8506,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,8506,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,8510,"ide_methods.bas");}while(r); S_44820:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,8511,"ide_methods.bas");if(r)goto S_44820;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8511,"ide_methods.bas");}while(r); } S_44823:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,8512,"ide_methods.bas");if(r)goto S_44823;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,8512,"ide_methods.bas");}while(r); } S_44826:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,8513,"ide_methods.bas");if(r)goto S_44826;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,8513,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8513,"ide_methods.bas");}while(r); } S_44830:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,8514,"ide_methods.bas");if(r)goto S_44830;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,8514,"ide_methods.bas");}while(r); } S_44833:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS>*_FUNC_IDEVARIABLEWATCHBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,8515,"ide_methods.bas");if(r)goto S_44833;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,8515,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,8516,"ide_methods.bas");}while(r); S_44837:; fornext_value4959= 1 ; fornext_finalvalue4959= 100 ; fornext_step4959= 1 ; if (fornext_step4959<0) fornext_step_negative4959=1; else fornext_step_negative4959=0; if (new_error) goto fornext_error4959; goto fornext_entrylabel4959; while(1){ fornext_value4959=fornext_step4959+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I); fornext_entrylabel4959: *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=fornext_value4959; if (fornext_step_negative4959){ if (fornext_value4959fornext_finalvalue4959) break; } fornext_error4959:; if(qbevent){evnt(25753,8517,"ide_methods.bas");if(r)goto S_44837;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,8518,"ide_methods.bas");}while(r); S_44839:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,8519,"ide_methods.bas");if(r)goto S_44839;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUSOFFSET=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS-*_FUNC_IDEVARIABLEWATCHBOX_LONG_F; if(!qbevent)break;evnt(25753,8520,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS,_FUNC_IDEVARIABLEWATCHBOX_LONG_F,_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEVARIABLEWATCHBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEVARIABLEWATCHBOX_LONG_MOUSEDOWN,_FUNC_IDEVARIABLEWATCHBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8521,"ide_methods.bas");}while(r); } fornext_continue_4958:; } fornext_exit_4958:; S_44844:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS!=*_FUNC_IDEVARIABLEWATCHBOX_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,8525,"ide_methods.bas");if(r)goto S_44844;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PREVFOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,8527,"ide_methods.bas");}while(r); S_44846:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX))||new_error){ if(qbevent){evnt(25753,8528,"ide_methods.bas");if(r)goto S_44846;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,8529,"ide_methods.bas");}while(r); S_44848:; if ((-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,8530,"ide_methods.bas");if(r)goto S_44848;} do{ *(int8*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,8530,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,8531,"ide_methods.bas");}while(r); } } S_44854:; if ((((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,8535,"ide_methods.bas");if(r)goto S_44854;} S_44855:; fornext_value4962= 1 ; fornext_finalvalue4962=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES; fornext_step4962= 1 ; if (fornext_step4962<0) fornext_step_negative4962=1; else fornext_step_negative4962=0; if (new_error) goto fornext_error4962; goto fornext_entrylabel4962; while(1){ fornext_value4962=fornext_step4962+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y); fornext_entrylabel4962: *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=fornext_value4962; if (fornext_step_negative4962){ if (fornext_value4962fornext_finalvalue4962) break; } fornext_error4962:; if(qbevent){evnt(25753,8536,"ide_methods.bas");if(r)goto S_44855;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8537,"ide_methods.bas");}while(r); S_44857:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,8538,"ide_methods.bas");if(r)goto S_44857;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8538,"ide_methods.bas");}while(r); } S_44860:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,8539,"ide_methods.bas");if(r)goto S_44860;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8539,"ide_methods.bas");}while(r); } S_44863:; if ((qbs_cleanup(qbs_tmp_base,((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))&(-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))->len== 0 ))))|(-(func_instr(NULL,__STRING_NATIVEDATATYPES,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,0)== 0 ))))||new_error){ if(qbevent){evnt(25753,8541,"ide_methods.bas");if(r)goto S_44863;} do{ goto fornext_continue_4961; if(!qbevent)break;evnt(25753,8541,"ide_methods.bas");}while(r); } do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= -1 ; if(!qbevent)break;evnt(25753,8542,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long=*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR; 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(25753,8543,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYPECOLUMNCOLOR; 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(25753,8544,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long=*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTEDBG; 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(25753,8545,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); if (!new_error){ tmp_long= 43 ; 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(25753,8546,"ide_methods.bas");}while(r); fornext_continue_4961:; } fornext_exit_4961:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX; if(!qbevent)break;evnt(25753,8548,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8549,"ide_methods.bas");}while(r); } S_44875:; if ((((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,8552,"ide_methods.bas");if(r)goto S_44875;} S_44876:; fornext_value4964= 1 ; fornext_finalvalue4964=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES; fornext_step4964= 1 ; if (fornext_step4964<0) fornext_step_negative4964=1; else fornext_step_negative4964=0; if (new_error) goto fornext_error4964; goto fornext_entrylabel4964; while(1){ fornext_value4964=fornext_step4964+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y); fornext_entrylabel4964: *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=fornext_value4964; if (fornext_step_negative4964){ if (fornext_value4964fornext_finalvalue4964) break; } fornext_error4964:; if(qbevent){evnt(25753,8553,"ide_methods.bas");if(r)goto S_44876;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,8554,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long= 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(25753,8555,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long= 2 ; 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(25753,8556,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long= 17 ; 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(25753,8557,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); 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(25753,8558,"ide_methods.bas");}while(r); fornext_continue_4963:; } fornext_exit_4963:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX; if(!qbevent)break;evnt(25753,8560,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8561,"ide_methods.bas");}while(r); } S_44886:; if ((((-(*__LONG_IDEDEBUGMODE> 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 5 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO!= 0 )))|((-(*__LONG_IDEDEBUGMODE> 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 6 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,8565,"ide_methods.bas");if(r)goto S_44886;} LABEL_SENDVALUE:; if(qbevent){evnt(25753,8567,"ide_methods.bas");r=0;} S_44887:; if(qbevent){evnt(25753,8568,"ide_methods.bas");if(r)goto S_44887;} S_44888:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==( 5 )))||new_error){ if(qbevent){evnt(25753,8569,"ide_methods.bas");if(r)goto S_44888;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Change Value",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8570,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGPROMPT,qbs_new_txt_len("#Index to change",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8571,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGPROMPT2,qbs_new_txt_len("#New value",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8572,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION= 1 ; if(!qbevent)break;evnt(25753,8573,"ide_methods.bas");}while(r); sc_ec_291_end:; goto sc_4965_end; } S_44893:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==( 6 )))||new_error){ if(qbevent){evnt(25753,8574,"ide_methods.bas");if(r)goto S_44893;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Add Watchpoint",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8575,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGPROMPT,qbs_new_txt_len("#Index to monitor",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8576,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGPROMPT2,qbs_new_txt_len("#Condition",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8577,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION= 2 ; if(!qbevent)break;evnt(25753,8578,"ide_methods.bas");}while(r); sc_ec_292_end:; goto sc_4965_end; } sc_4965_end:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,8581,"ide_methods.bas");}while(r); S_44900:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y<=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)))||new_error){ if(qbevent){evnt(25753,8583,"ide_methods.bas");if(r)goto S_44900;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y; if(!qbevent)break;evnt(25753,8584,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_QUICKDLGUPDATE= -1 ; if(!qbevent)break;evnt(25753,8585,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=143; if (next_return_point>=return_points) more_return_points(); goto LABEL_DLGUPDATE; RETURN_143:; if(!qbevent)break;evnt(25753,8585,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)); if(!qbevent)break;evnt(25753,8586,"ide_methods.bas");}while(r); S_44905:; if ((qbs_cleanup(qbs_tmp_base,(((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 5 ))&(((qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),_FUNC_IDEVARIABLEWATCHBOX_STRING_CURRENTSCOPE))|(qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),qbs_new_txt_len("",0)))))))|(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 6 ))))||new_error){ if(qbevent){evnt(25753,8587,"ide_methods.bas");if(r)goto S_44905;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPARRAYINDEX= 0 ; if(!qbevent)break;evnt(25753,8589,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES,l2string( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8590,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPSTORAGE= 0 ; if(!qbevent)break;evnt(25753,8592,"ide_methods.bas");}while(r); S_44909:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len== 4 )))||new_error){ if(qbevent){evnt(25753,8593,"ide_methods.bas");if(r)goto S_44909;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPSTORAGE=string2l(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8594,"ide_methods.bas");}while(r); S_44911:; }else{ if (qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len> 4 ))){ if(qbevent){evnt(25753,8595,"ide_methods.bas");if(r)goto S_44911;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 4 ; if(!qbevent)break;evnt(25753,8596,"ide_methods.bas");}while(r); S_44913:; do{ if(qbevent){evnt(25753,8597,"ide_methods.bas");if(r)goto S_44913;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_VARIABLEWATCHLIST,qbs_add(qbs_add(l2string( -1 ),l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8598,"ide_methods.bas");}while(r); S_44915:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I== 0 ))||new_error){ if(qbevent){evnt(25753,8599,"ide_methods.bas");if(r)goto S_44915;} do{ goto dl_exit_4966; if(!qbevent)break;evnt(25753,8599,"ide_methods.bas");}while(r); } S_44918:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_VARIABLEWATCHLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 8 +_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES->len, 4 ,1),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET)))||new_error){ if(qbevent){evnt(25753,8600,"ide_methods.bas");if(r)goto S_44918;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPSTORAGE=string2l(func_mid(__STRING_VARIABLEWATCHLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 16 +_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES->len, 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8602,"ide_methods.bas");}while(r); do{ goto dl_exit_4966; if(!qbevent)break;evnt(25753,8603,"ide_methods.bas");}while(r); } dl_continue_4966:; }while(1); dl_exit_4966:; } } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPISUDT= 0 ; if(!qbevent)break;evnt(25753,8608,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET,l2string( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8609,"ide_methods.bas");}while(r); S_44926:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30)))||new_error){ if(qbevent){evnt(25753,8610,"ide_methods.bas");if(r)goto S_44926;} LABEL_SETARRAYRANGE3:; if(qbevent){evnt(25753,8611,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_IDEINPUTBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGPROMPT,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len("01234567890,",12),&(pass4969= 45 ),&(pass4970= 0 ),_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8612,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8613,"ide_methods.bas");}while(r); S_44929:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)||new_error){ if(qbevent){evnt(25753,8614,"ide_methods.bas");if(r)goto S_44929;} S_44930:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len> 0 )))||new_error){ if(qbevent){evnt(25753,8615,"ide_methods.bas");if(r)goto S_44930;} S_44931:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 1 ),qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(25753,8616,"ide_methods.bas");if(r)goto S_44931;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8616,"ide_methods.bas");}while(r); ww_continue_4972:; } ww_exit_4972:; do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_LINEFORMAT(_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8617,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=FUNC_COUNTELEMENTS(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8618,"ide_methods.bas");}while(r); S_44936:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I!=func_abs((int16)(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120)))-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516))))))||new_error){ if(qbevent){evnt(25753,8619,"ide_methods.bas");if(r)goto S_44936;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),qbs_add(qbs_add(qbs_new_txt_len("Array has",9),qbs_str((int16)(func_abs((int16)(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120)))-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516))))))),qbs_new_txt_len(" dimension(s).",14)),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8620,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8621,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs__trim(_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8622,"ide_methods.bas");}while(r); do{ goto LABEL_SETARRAYRANGE3; if(!qbevent)break;evnt(25753,8623,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I* 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8625,"ide_methods.bas");}while(r); S_44943:; while((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,8626,"ide_methods.bas");if(r)goto S_44943;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA=func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8627,"ide_methods.bas");}while(r); S_44945:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA)||new_error){ if(qbevent){evnt(25753,8628,"ide_methods.bas");if(r)goto S_44945;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8629,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8630,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8632,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES,l2string(qbr(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8634,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I- 1 ; if(!qbevent)break;evnt(25753,8635,"ide_methods.bas");}while(r); ww_continue_4974:; } ww_exit_4974:; }else{ do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8638,"ide_methods.bas");}while(r); } }else{ do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8641,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8645,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVARTYPE,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8646,"ide_methods.bas");}while(r); S_44963:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,8647,"ide_methods.bas");if(r)goto S_44963;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8647,"ide_methods.bas");}while(r); } S_44966:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,8648,"ide_methods.bas");if(r)goto S_44966;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8648,"ide_methods.bas");}while(r); } S_44969:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_NATIVEDATATYPES,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVARTYPE,0)== 0 )))||new_error){ if(qbevent){evnt(25753,8649,"ide_methods.bas");if(r)goto S_44969;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPISUDT= -1 ; if(!qbevent)break;evnt(25753,8651,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8652,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISUDT= 0 ; if(!qbevent)break;evnt(25753,8653,"ide_methods.bas");}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(25753,8654,"ide_methods.bas");}while(r); S_44974:; fornext_value4976= 1 ; fornext_finalvalue4976=*__LONG_LASTTYPE; fornext_step4976= 1 ; if (fornext_step4976<0) fornext_step_negative4976=1; else fornext_step_negative4976=0; if (new_error) goto fornext_error4976; goto fornext_entrylabel4976; while(1){ fornext_value4976=fornext_step4976+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I); fornext_entrylabel4976: *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=fornext_value4976; if (fornext_step_negative4976){ if (fornext_value4976fornext_finalvalue4976) break; } fornext_error4976:; if(qbevent){evnt(25753,8655,"ide_methods.bas");if(r)goto S_44974;} S_44975:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1)),_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE)))||new_error){ if(qbevent){evnt(25753,8656,"ide_methods.bas");if(r)goto S_44975;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISUDT=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,8656,"ide_methods.bas");}while(r); do{ goto fornext_exit_4975; if(!qbevent)break;evnt(25753,8656,"ide_methods.bas");}while(r); } fornext_continue_4975:; } fornext_exit_4975:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,8659,"ide_methods.bas");}while(r); S_44981:; do{ if(qbevent){evnt(25753,8660,"ide_methods.bas");if(r)goto S_44981;} S_44982:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(25753,8661,"ide_methods.bas");if(r)goto S_44982;} do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISUDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25753,8661,"ide_methods.bas");}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(25753,8661,"ide_methods.bas");}while(r); } S_44987:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(25753,8662,"ide_methods.bas");if(r)goto S_44987;} do{ goto dl_exit_4977; if(!qbevent)break;evnt(25753,8662,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,l2string(*__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8663,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,8664,"ide_methods.bas");}while(r); dl_continue_4977:; }while(1); dl_exit_4977:; do{ sub_pcopy( 0 , 4 ); if(!qbevent)break;evnt(25753,8666,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_IDEELEMENTWATCHBOX(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_new_txt_len(".",1)),_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,&(pass4978= 0 ),&(pass4979= -1 ),_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8667,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8668,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,8669,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 1 ); if(!qbevent)break;evnt(25753,8670,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,8671,"ide_methods.bas");}while(r); S_44999:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_OK== -2 ))||new_error){ if(qbevent){evnt(25753,8672,"ide_methods.bas");if(r)goto S_44999;} do{ SUB_GETID((int32*)(void*)( ((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])) + ((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120) )); if(!qbevent)break;evnt(25753,8673,"ide_methods.bas");}while(r); S_45001:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(25753,8674,"ide_methods.bas");if(r)goto S_45001;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*(int32*)(((char*)__UDT_ID)+(512))& 511 ; if(!qbevent)break;evnt(25753,8675,"ide_methods.bas");}while(r); S_45003:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(25753,8676,"ide_methods.bas");if(r)goto S_45003;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(25753,8677,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(25753,8680,"ide_methods.bas");}while(r); S_45007:; if ((((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])||new_error){ if(qbevent){evnt(25753,8681,"ide_methods.bas");if(r)goto S_45007;} S_45008:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))% 8 )||new_error){ if(qbevent){evnt(25753,8682,"ide_methods.bas");if(r)goto S_45008;} do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))=*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))+( 8 -(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))% 8 )); if(!qbevent)break;evnt(25753,8682,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))=*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))/ 8 ; if(!qbevent)break;evnt(25753,8683,"ide_methods.bas");}while(r); } }else{ do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))= 0 ; if(!qbevent)break;evnt(25753,8686,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8689,"ide_methods.bas");}while(r); S_45017:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_NUMELEMENTS(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)!= 1 )))||new_error){ if(qbevent){evnt(25753,8690,"ide_methods.bas");if(r)goto S_45017;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),qbs_new_txt_len("Only one UDT element can be selected at a time",46),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8692,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8693,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8694,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_GETELEMENT(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,&(pass4980= 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8697,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_LINEFORMAT(qbs_ucase(_FUNC_IDEVARIABLEWATCHBOX_STRING_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8700,"ide_methods.bas");}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(25753,8701,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_RESULT,FUNC_UDTREFERENCE(qbs_new_txt_len("",0),_FUNC_IDEVARIABLEWATCHBOX_STRING_V,_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8702,"ide_methods.bas");}while(r); S_45026:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25753,8703,"ide_methods.bas");if(r)goto S_45026;} do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(25753,8705,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),__STRING_ERROR_MESSAGE,qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8706,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8707,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8708,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISUDT; if(!qbevent)break;evnt(25753,8710,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(25753,8711,"ide_methods.bas");}while(r); S_45034:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(25753,8712,"ide_methods.bas");if(r)goto S_45034;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(25753,8712,"ide_methods.bas");}while(r); } S_45037:; if(qbevent){evnt(25753,8713,"ide_methods.bas");if(r)goto S_45037;} S_45038:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_BYTETYPE)))||new_error){ if(qbevent){evnt(25753,8714,"ide_methods.bas");if(r)goto S_45038;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_BYTE",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8715,"ide_methods.bas");}while(r); sc_ec_293_end:; goto sc_4981_end; } S_45040:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UBYTETYPE)))||new_error){ if(qbevent){evnt(25753,8716,"ide_methods.bas");if(r)goto S_45040;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_UNSIGNED _BYTE",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8717,"ide_methods.bas");}while(r); sc_ec_294_end:; goto sc_4981_end; } S_45042:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_INTEGERTYPE)))||new_error){ if(qbevent){evnt(25753,8718,"ide_methods.bas");if(r)goto S_45042;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("INTEGER",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8719,"ide_methods.bas");}while(r); sc_ec_295_end:; goto sc_4981_end; } S_45044:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UINTEGERTYPE)))||new_error){ if(qbevent){evnt(25753,8720,"ide_methods.bas");if(r)goto S_45044;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_UNSIGNED INTEGER",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8721,"ide_methods.bas");}while(r); sc_ec_296_end:; goto sc_4981_end; } S_45046:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_LONGTYPE)))||new_error){ if(qbevent){evnt(25753,8722,"ide_methods.bas");if(r)goto S_45046;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("LONG",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8723,"ide_methods.bas");}while(r); sc_ec_297_end:; goto sc_4981_end; } S_45048:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_ULONGTYPE)))||new_error){ if(qbevent){evnt(25753,8724,"ide_methods.bas");if(r)goto S_45048;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_UNSIGNED LONG",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8725,"ide_methods.bas");}while(r); sc_ec_298_end:; goto sc_4981_end; } S_45050:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_INTEGER64TYPE)))||new_error){ if(qbevent){evnt(25753,8726,"ide_methods.bas");if(r)goto S_45050;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_INTEGER64",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8727,"ide_methods.bas");}while(r); sc_ec_299_end:; goto sc_4981_end; } S_45052:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UINTEGER64TYPE)))||new_error){ if(qbevent){evnt(25753,8728,"ide_methods.bas");if(r)goto S_45052;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_UNSIGNED _INTEGER64",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8729,"ide_methods.bas");}while(r); sc_ec_300_end:; goto sc_4981_end; } S_45054:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_SINGLETYPE)))||new_error){ if(qbevent){evnt(25753,8730,"ide_methods.bas");if(r)goto S_45054;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("SINGLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8731,"ide_methods.bas");}while(r); sc_ec_301_end:; goto sc_4981_end; } S_45056:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_DOUBLETYPE)))||new_error){ if(qbevent){evnt(25753,8732,"ide_methods.bas");if(r)goto S_45056;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("DOUBLE",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8733,"ide_methods.bas");}while(r); sc_ec_302_end:; goto sc_4981_end; } S_45058:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_FLOATTYPE)))||new_error){ if(qbevent){evnt(25753,8734,"ide_methods.bas");if(r)goto S_45058;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_FLOAT",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8735,"ide_methods.bas");}while(r); sc_ec_303_end:; goto sc_4981_end; } S_45060:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_OFFSETTYPE)))||new_error){ if(qbevent){evnt(25753,8736,"ide_methods.bas");if(r)goto S_45060;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_OFFSET",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8737,"ide_methods.bas");}while(r); sc_ec_304_end:; goto sc_4981_end; } S_45062:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UOFFSETTYPE)))||new_error){ if(qbevent){evnt(25753,8738,"ide_methods.bas");if(r)goto S_45062;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_UNSIGNED _OFFSET",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8739,"ide_methods.bas");}while(r); sc_ec_305_end:; goto sc_4981_end; } S_45065:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25753,8741,"ide_methods.bas");if(r)goto S_45065;} S_45066:; if ((-((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25753,8742,"ide_methods.bas");if(r)goto S_45066;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8743,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_add(qbs_new_txt_len("STRING *",8),qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8746,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),qbs_new_txt_len("Cannot select full UDT",22),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8750,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8751,"ide_methods.bas");}while(r); do{ goto LABEL_DLGLOOP; if(!qbevent)break;evnt(25753,8752,"ide_methods.bas");}while(r); } sc_4981_end:; do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET,l2string(qbr(func_val(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_RESULT,func__instrrev(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_RESULT,__STRING1_SP3,0)+ 1 ,NULL,0))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8755,"ide_methods.bas");}while(r); } }else{ do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8759,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT= 0 ; if(!qbevent)break;evnt(25753,8762,"ide_methods.bas");}while(r); S_45084:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len== 4 )))||new_error){ if(qbevent){evnt(25753,8763,"ide_methods.bas");if(r)goto S_45084;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT=string2l(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8764,"ide_methods.bas");}while(r); S_45086:; }else{ if (qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len> 4 ))){ if(qbevent){evnt(25753,8765,"ide_methods.bas");if(r)goto S_45086;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 4 ; if(!qbevent)break;evnt(25753,8766,"ide_methods.bas");}while(r); S_45088:; do{ if(qbevent){evnt(25753,8767,"ide_methods.bas");if(r)goto S_45088;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_VARIABLEWATCHLIST,qbs_add(qbs_add(l2string( -1 ),l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8768,"ide_methods.bas");}while(r); S_45090:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I== 0 ))||new_error){ if(qbevent){evnt(25753,8769,"ide_methods.bas");if(r)goto S_45090;} do{ goto dl_exit_4982; if(!qbevent)break;evnt(25753,8769,"ide_methods.bas");}while(r); } S_45093:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_VARIABLEWATCHLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 8 +_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES->len, 4 ,1),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET)))||new_error){ if(qbevent){evnt(25753,8770,"ide_methods.bas");if(r)goto S_45093;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT=string2l(func_mid(__STRING_VARIABLEWATCHLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 16 +_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES->len, 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8772,"ide_methods.bas");}while(r); do{ goto dl_exit_4982; if(!qbevent)break;evnt(25753,8773,"ide_methods.bas");}while(r); } dl_continue_4982:; }while(1); dl_exit_4982:; } } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8777,"ide_methods.bas");}while(r); S_45100:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT> 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 5 )))||new_error){ if(qbevent){evnt(25753,8778,"ide_methods.bas");if(r)goto S_45100;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT)-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8779,"ide_methods.bas");}while(r); S_45102:; }else{ if (-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 6 )){ if(qbevent){evnt(25753,8780,"ide_methods.bas");if(r)goto S_45102;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8782,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,8783,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8784,"ide_methods.bas");}while(r); S_45106:; while((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,8785,"ide_methods.bas");if(r)goto S_45106;} S_45107:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 8 ,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len,1),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)))||new_error){ if(qbevent){evnt(25753,8786,"ide_methods.bas");if(r)goto S_45107;} do{ goto dl_exit_4985; if(!qbevent)break;evnt(25753,8786,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8787,"ide_methods.bas");}while(r); dl_continue_4985:; } dl_exit_4985:; S_45112:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,8790,"ide_methods.bas");if(r)goto S_45112;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_J=string2l(func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 4 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8791,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 8 ,*_FUNC_IDEVARIABLEWATCHBOX_LONG_J,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8792,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_J=string2i(qbs_right(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8793,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len-( 2 +*_FUNC_IDEVARIABLEWATCHBOX_LONG_J)+ 1 ,*_FUNC_IDEVARIABLEWATCHBOX_LONG_J,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8794,"ide_methods.bas");}while(r); } } } S_45119:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6),0)))||new_error){ if(qbevent){evnt(25753,8797,"ide_methods.bas");if(r)goto S_45119;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISWIDTH=*__LONG_IDEWX- 20 ; if(!qbevent)break;evnt(25753,8798,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISWIDTH= 45 ; if(!qbevent)break;evnt(25753,8800,"ide_methods.bas");}while(r); S_45123:; sc_4988=*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31)); if(qbevent){evnt(25753,8801,"ide_methods.bas");if(r)goto S_45123;} S_45124:; if (((sc_4988==( 1 )))||new_error){ if(qbevent){evnt(25753,8802,"ide_methods.bas");if(r)goto S_45124;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,qbs_add(qbs_new_txt_len("&H",2),func_hex_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8802,"ide_methods.bas");}while(r); sc_ec_306_end:; goto sc_4988_end; } S_45126:; if (((sc_4988==( 2 )))||new_error){ if(qbevent){evnt(25753,8803,"ide_methods.bas");if(r)goto S_45126;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,qbs_add(qbs_new_txt_len("&B",2),func__bin_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8803,"ide_methods.bas");}while(r); sc_ec_307_end:; goto sc_4988_end; } S_45128:; if (((sc_4988==( 3 )))||new_error){ if(qbevent){evnt(25753,8804,"ide_methods.bas");if(r)goto S_45128;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,qbs_add(qbs_new_txt_len("&O",2),func_oct_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_A2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8804,"ide_methods.bas");}while(r); sc_ec_308_end:; goto sc_4988_end; } sc_4988_end:; } LABEL_GETNEWVALUEINPUT:; if(qbevent){evnt(25753,8807,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_IDEINPUTBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGPROMPT2,_FUNC_IDEVARIABLEWATCHBOX_STRING_A2,qbs_new_txt_len("",0),_FUNC_IDEVARIABLEWATCHBOX_LONG_THISWIDTH,&(pass4989= 0 ),_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8808,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8809,"ide_methods.bas");}while(r); S_45134:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)||new_error){ if(qbevent){evnt(25753,8810,"ide_methods.bas");if(r)goto S_45134;} S_45135:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 6 ))||new_error){ if(qbevent){evnt(25753,8811,"ide_methods.bas");if(r)goto S_45135;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_ltrim(_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8813,"ide_methods.bas");}while(r); S_45137:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len< 2 )))||new_error){ if(qbevent){evnt(25753,8814,"ide_methods.bas");if(r)goto S_45137;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Watchpoint cleared.",19),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8815,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8816,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8817,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION= 3 ; if(!qbevent)break;evnt(25753,8818,"ide_methods.bas");}while(r); }else{ LABEL_STARTWATCHPOINTEVAL:; if(qbevent){evnt(25753,8820,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP1,qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8821,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 2 , 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8822,"ide_methods.bas");}while(r); S_45145:; if(qbevent){evnt(25753,8823,"ide_methods.bas");if(r)goto S_45145;} S_45146:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP1,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(25753,8824,"ide_methods.bas");if(r)goto S_45146;} S_45147:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len("<",1)))|(qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len(">",1)))))||new_error){ if(qbevent){evnt(25753,8825,"ide_methods.bas");if(r)goto S_45147;} do{ sub_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 1 , 2 ,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len("=",1)),1); if(!qbevent)break;evnt(25753,8826,"ide_methods.bas");}while(r); do{ goto LABEL_STARTWATCHPOINTEVAL; if(!qbevent)break;evnt(25753,8827,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_new_txt_len("=",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8829,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE,qbs__trim(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8830,"ide_methods.bas");}while(r); sc_ec_309_end:; goto sc_4991_end; } S_45153:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP1,qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(25753,8831,"ide_methods.bas");if(r)goto S_45153;} S_45154:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len("<",1)))|(qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len(">",1)))))||new_error){ if(qbevent){evnt(25753,8832,"ide_methods.bas");if(r)goto S_45154;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Invalid expression.\\nYou can use =, <>, >, >=, <, <=, and a literal value",73),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8833,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8834,"ide_methods.bas");}while(r); do{ goto LABEL_GETNEWVALUEINPUT; if(!qbevent)break;evnt(25753,8835,"ide_methods.bas");}while(r); } S_45159:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len("=",1))))||new_error){ if(qbevent){evnt(25753,8837,"ide_methods.bas");if(r)goto S_45159;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_new_txt_len(">=",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8838,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE,qbs__trim(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8839,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_new_txt_len(">",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8841,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE,qbs__trim(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8842,"ide_methods.bas");}while(r); } sc_ec_310_end:; goto sc_4991_end; } S_45166:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP1,qbs_new_txt_len("<",1))))||new_error){ if(qbevent){evnt(25753,8844,"ide_methods.bas");if(r)goto S_45166;} S_45167:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len(">",1)))|(qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2,qbs_new_txt_len("=",1)))))||new_error){ if(qbevent){evnt(25753,8845,"ide_methods.bas");if(r)goto S_45167;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_add(qbs_new_txt_len("<",1),_FUNC_IDEVARIABLEWATCHBOX_STRING_OP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8846,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE,qbs__trim(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 3 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8847,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_new_txt_len("<",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8849,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE,qbs__trim(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8850,"ide_methods.bas");}while(r); } sc_ec_311_end:; goto sc_4991_end; } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Invalid expression.\\nYou can use =, <>, >, >=, <, <=, and a literal value",73),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8853,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8854,"ide_methods.bas");}while(r); do{ goto LABEL_GETNEWVALUEINPUT; if(!qbevent)break;evnt(25753,8855,"ide_methods.bas");}while(r); sc_4991_end:; } S_45180:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION!= 3 ))||new_error){ if(qbevent){evnt(25753,8859,"ide_methods.bas");if(r)goto S_45180;} S_45181:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6),0)== 0 )))||new_error){ if(qbevent){evnt(25753,8860,"ide_methods.bas");if(r)goto S_45181;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8861,"ide_methods.bas");}while(r); S_45183:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_ltrim(qbs_str((long double)(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE)))))))))||new_error){ if(qbevent){evnt(25753,8862,"ide_methods.bas");if(r)goto S_45183;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Invalid expression.\\nYou can use =, <>, >, >=, <, <=, and a literal value\\n(scientific notation not allowed).",109),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8863,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8864,"ide_methods.bas");}while(r); do{ goto LABEL_GETNEWVALUEINPUT; if(!qbevent)break;evnt(25753,8865,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_OP,qbs_new_txt_len(" ",1)),_FUNC_IDEVARIABLEWATCHBOX_STRING_ACTUALVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8869,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8873,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8874,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,b2string(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8875,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+4))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8876,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+20))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8877,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8878,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8879,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPISUDT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8880,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPELEMENT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8881,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8882,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8883,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPSTORAGE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8884,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,i2string((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8885,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8886,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,i2string(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE->len)),_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8887,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD,i2string(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len)),_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8888,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_IDEVARIABLEWATCHBOX,_FUNC_IDEVARIABLEWATCHBOX_STRING_CMD); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8889,"ide_methods.bas");}while(r); S_45209:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION== 2 ))|(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION== 3 )))||new_error){ if(qbevent){evnt(25753,8891,"ide_methods.bas");if(r)goto S_45209;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TEMPINDEX),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPARRAYINDEXES),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPELEMENTOFFSET)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8893,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,8894,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8895,"ide_methods.bas");}while(r); S_45213:; while((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,8896,"ide_methods.bas");if(r)goto S_45213;} S_45214:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 8 ,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len,1),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)))||new_error){ if(qbevent){evnt(25753,8897,"ide_methods.bas");if(r)goto S_45214;} do{ goto dl_exit_4994; if(!qbevent)break;evnt(25753,8897,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8898,"ide_methods.bas");}while(r); dl_continue_4994:; } dl_exit_4994:; S_45219:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,8901,"ide_methods.bas");if(r)goto S_45219;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_J=string2l(func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 4 , 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8903,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_add(qbs_left(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I- 1 ),func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+*_FUNC_IDEVARIABLEWATCHBOX_LONG_J+ 8 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8904,"ide_methods.bas");}while(r); } } S_45224:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION== 2 ))||new_error){ if(qbevent){evnt(25753,8908,"ide_methods.bas");if(r)goto S_45224;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_V),i2string(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8910,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_WATCHPOINTLIST,qbs_add(qbs_add(qbs_add(__STRING_WATCHPOINTLIST,l2string( -1 )),l2string(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len)),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8911,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RETURNACTION=*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISRETURNACTION; if(!qbevent)break;evnt(25753,8914,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RETURNACTION= -1 ; if(!qbevent)break;evnt(25753,8916,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR=*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y; if(!qbevent)break;evnt(25753,8918,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,8919,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Variable is out of scope.",25),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8921,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8922,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEVARIABLEWATCHBOX_STRING_DLGTITLE,qbs_new_txt_len("Select a variable first.",24),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8925,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,8926,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX; if(!qbevent)break;evnt(25753,8928,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,8929,"ide_methods.bas");}while(r); } S_45245:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*__LONG_IDEDEBUGMODE== 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 5 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO!= 0 ))))|(((-(*__LONG_IDEDEBUGMODE> 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 7 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,8933,"ide_methods.bas");if(r)goto S_45245;} LABEL_GENERATEVARIABLEWATCHLIST:; if(qbevent){evnt(25753,8934,"ide_methods.bas");r=0;} do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8935,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8936,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,__STRING_TYPEDEFINITIONS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8937,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTVARNAME= 0 ; if(!qbevent)break;evnt(25753,8938,"ide_methods.bas");}while(r); do{ *__LONG_NEXTVWATCHDATASLOT= 0 ; if(!qbevent)break;evnt(25753,8939,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES= 0 ; if(!qbevent)break;evnt(25753,8940,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALSELECTEDVARIABLES= 0 ; if(!qbevent)break;evnt(25753,8941,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8942,"ide_methods.bas");}while(r); S_45254:; fornext_value4999= 1 ; fornext_finalvalue4999=*__LONG_TOTALVARIABLESCREATED; fornext_step4999= 1 ; if (fornext_step4999<0) fornext_step_negative4999=1; else fornext_step_negative4999=0; if (new_error) goto fornext_error4999; goto fornext_entrylabel4999; while(1){ fornext_value4999=fornext_step4999+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y); fornext_entrylabel4999: *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=fornext_value4999; if (fornext_step_negative4999){ if (fornext_value4999fornext_finalvalue4999) break; } fornext_error4999:; if(qbevent){evnt(25753,8943,"ide_methods.bas");if(r)goto S_45254;} S_45255:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR== -1 ))||new_error){ if(qbevent){evnt(25753,8944,"ide_methods.bas");if(r)goto S_45255;} S_45256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,8945,"ide_methods.bas");if(r)goto S_45256;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG,qbs_new_txt_len("Analyzing Variable List...",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8946,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_UDT_P)) + (0) ),&(pass5000= 60 ),&(pass5001= 1 ),_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8947,"ide_methods.bas");}while(r); } do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,8950,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,8951,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_C=*__LONG_TOTALVARIABLESCREATED; if(!qbevent)break;evnt(25753,8952,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_N=*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y; if(!qbevent)break;evnt(25753,8953,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXPROGRESSWIDTH= 52 ; if(!qbevent)break;evnt(25753,8955,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGE=qbr(floor(*_FUNC_IDEVARIABLEWATCHBOX_LONG_N/ ((long double)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_C))* 100 )); if(!qbevent)break;evnt(25753,8956,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGECHARS=qbr(floor(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXPROGRESSWIDTH**_FUNC_IDEVARIABLEWATCHBOX_LONG_N/ ((long double)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_C)))); if(!qbevent)break;evnt(25753,8957,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_PERCENTAGEMSG,qbs_add(qbs_add(qbs_add(func_string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGECHARS, 219 ),func_string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXPROGRESSWIDTH-*_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGECHARS, 176 )),qbs_str((int32)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGE))),qbs_new_txt_len("%",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8958,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(8))/ 2 )-(_FUNC_IDEVARIABLEWATCHBOX_STRING_PERCENTAGEMSG->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(4))+ 1 ,_FUNC_IDEVARIABLEWATCHBOX_STRING_PERCENTAGEMSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8959,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,8961,"ide_methods.bas");}while(r); } S_45271:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12)))||new_error){ if(qbevent){evnt(25753,8964,"ide_methods.bas");if(r)goto S_45271;} do{ goto fornext_continue_4998; if(!qbevent)break;evnt(25753,8964,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALSELECTEDVARIABLES=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALSELECTEDVARIABLES+ 1 ; if(!qbevent)break;evnt(25753,8966,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_add(__STRING_BACKUPVARIABLEWATCHLIST,l2string( -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8967,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_add(qbs_add(__STRING_BACKUPVARIABLEWATCHLIST,l2string((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+40)))->len)),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+40))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8968,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_add(__STRING_BACKUPVARIABLEWATCHLIST,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALSELECTEDVARIABLES))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8969,"ide_methods.bas");}while(r); S_45278:; while((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALSELECTEDVARIABLES>func_ubound(__ARRAY_UDT_BACKUPUSEDVARIABLELIST,1,1)))||new_error){ if(qbevent){evnt(25753,8970,"ide_methods.bas");if(r)goto S_45278;} do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ preserved_elements=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; } else preserved_elements=0; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALSELECTEDVARIABLES+ 999 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; if (tmp_long2len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8977,"ide_methods.bas");}while(r); S_45285:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30)))||new_error){ if(qbevent){evnt(25753,8978,"ide_methods.bas");if(r)goto S_45285;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN=*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN+(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8979,"ide_methods.bas");}while(r); } S_45288:; if ((qbs_cleanup(qbs_tmp_base,(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len))||new_error){ if(qbevent){evnt(25753,8982,"ide_methods.bas");if(r)goto S_45288;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN=*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN+string2l(qbs_left(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))), 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8983,"ide_methods.bas");}while(r); } S_45291:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN>*_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTVARNAME))||new_error){ if(qbevent){evnt(25753,8986,"ide_methods.bas");if(r)goto S_45291;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTVARNAME=*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN; if(!qbevent)break;evnt(25753,8987,"ide_methods.bas");}while(r); S_45293:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,8988,"ide_methods.bas");if(r)goto S_45293;} do{ qbs_set(__STRING_VARIABLEWATCHLIST,func_space( 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8988,"ide_methods.bas");}while(r); } do{ sub_mid(__STRING_VARIABLEWATCHLIST, 1 , 4 ,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTVARNAME),1); if(!qbevent)break;evnt(25753,8989,"ide_methods.bas");}while(r); } S_45298:; if ((qbs_cleanup(qbs_tmp_base,(-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))!= 0 ))&(-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len== 0 ))))||new_error){ if(qbevent){evnt(25753,8992,"ide_methods.bas");if(r)goto S_45298;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_GETBYTES(qbs_new_txt_len("",0),&(pass5004= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8994,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_EXPANDARRAY(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8995,"ide_methods.bas");}while(r); S_45301:; do{ if(qbevent){evnt(25753,8996,"ide_methods.bas");if(r)goto S_45301;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,FUNC_GETBYTES(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,&(pass5006= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8997,"ide_methods.bas");}while(r); S_45303:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2->len!= 4 )))||new_error){ if(qbevent){evnt(25753,8998,"ide_methods.bas");if(r)goto S_45303;} do{ goto dl_exit_5005; if(!qbevent)break;evnt(25753,8998,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LENGTH=string2l(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,8999,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,qbs_add(l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_LENGTH),FUNC_GETBYTES(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_LONG_LENGTH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9000,"ide_methods.bas");}while(r); do{ *__LONG_NEXTVWATCHDATASLOT=*__LONG_NEXTVWATCHDATASLOT+ 1 ; if(!qbevent)break;evnt(25753,9001,"ide_methods.bas");}while(r); S_45309:; while((qbs_cleanup(qbs_tmp_base,-(*__LONG_NEXTVWATCHDATASLOT>func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1))))||new_error){ if(qbevent){evnt(25753,9002,"ide_methods.bas");if(r)goto S_45309;} do{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_VWATCHRECEIVEDDATA)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&1){ preserved_elements=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; } else preserved_elements=0; __ARRAY_STRING_VWATCHRECEIVEDDATA[4]= 1 ; __ARRAY_STRING_VWATCHRECEIVEDDATA[5]=(func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1)+ 999 )-__ARRAY_STRING_VWATCHRECEIVEDDATA[4]+1; __ARRAY_STRING_VWATCHRECEIVEDDATA[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; if (tmp_long2len> 0 )))){ if(qbevent){evnt(25753,9010,"ide_methods.bas");if(r)goto S_45317;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_GETBYTES(qbs_new_txt_len("",0),&(pass5009= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9012,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_EXPANDARRAY(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9013,"ide_methods.bas");}while(r); S_45320:; do{ if(qbevent){evnt(25753,9014,"ide_methods.bas");if(r)goto S_45320;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,FUNC_GETBYTES(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,&(pass5011= 4 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9015,"ide_methods.bas");}while(r); S_45322:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2->len!= 4 )))||new_error){ if(qbevent){evnt(25753,9016,"ide_methods.bas");if(r)goto S_45322;} do{ goto dl_exit_5010; if(!qbevent)break;evnt(25753,9016,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LENGTH=string2l(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9017,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,qbs_add(l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_LENGTH),FUNC_GETBYTES(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_LONG_LENGTH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9018,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISTEMPELEMENT,qbs_add(qbs_add(l2string( -1 ),l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9020,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISELEMENTLIST,func_mid(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))), 5 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9021,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9022,"ide_methods.bas");}while(r); S_45330:; do{ if(qbevent){evnt(25753,9023,"ide_methods.bas");if(r)goto S_45330;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9024,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,FUNC_GETELEMENT(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISELEMENTLIST,_FUNC_IDEVARIABLEWATCHBOX_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9025,"ide_methods.bas");}while(r); S_45333:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9026,"ide_methods.bas");if(r)goto S_45333;} do{ goto dl_exit_5013; if(!qbevent)break;evnt(25753,9026,"ide_methods.bas");}while(r); } do{ *__LONG_NEXTVWATCHDATASLOT=*__LONG_NEXTVWATCHDATASLOT+ 1 ; if(!qbevent)break;evnt(25753,9028,"ide_methods.bas");}while(r); S_45337:; while((qbs_cleanup(qbs_tmp_base,-(*__LONG_NEXTVWATCHDATASLOT>func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1))))||new_error){ if(qbevent){evnt(25753,9029,"ide_methods.bas");if(r)goto S_45337;} do{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_VWATCHRECEIVEDDATA)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&1){ preserved_elements=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; } else preserved_elements=0; __ARRAY_STRING_VWATCHRECEIVEDDATA[4]= 1 ; __ARRAY_STRING_VWATCHRECEIVEDDATA[5]=(func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1)+ 999 )-__ARRAY_STRING_VWATCHRECEIVEDDATA[4]+1; __ARRAY_STRING_VWATCHRECEIVEDDATA[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; if (tmp_long2len> 0 )))){ if(qbevent){evnt(25753,9039,"ide_methods.bas");if(r)goto S_45347;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISTEMPELEMENT,qbs_add(qbs_add(l2string( -1 ),l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9041,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISELEMENTLIST,func_mid(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))), 5 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9042,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9043,"ide_methods.bas");}while(r); S_45351:; do{ if(qbevent){evnt(25753,9044,"ide_methods.bas");if(r)goto S_45351;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9045,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,FUNC_GETELEMENT(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISELEMENTLIST,_FUNC_IDEVARIABLEWATCHBOX_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9046,"ide_methods.bas");}while(r); S_45354:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9047,"ide_methods.bas");if(r)goto S_45354;} do{ goto dl_exit_5015; if(!qbevent)break;evnt(25753,9047,"ide_methods.bas");}while(r); } do{ *__LONG_NEXTVWATCHDATASLOT=*__LONG_NEXTVWATCHDATASLOT+ 1 ; if(!qbevent)break;evnt(25753,9049,"ide_methods.bas");}while(r); S_45358:; while((qbs_cleanup(qbs_tmp_base,-(*__LONG_NEXTVWATCHDATASLOT>func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1))))||new_error){ if(qbevent){evnt(25753,9050,"ide_methods.bas");if(r)goto S_45358;} do{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_VWATCHRECEIVEDDATA)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&1){ preserved_elements=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; } else preserved_elements=0; __ARRAY_STRING_VWATCHRECEIVEDDATA[4]= 1 ; __ARRAY_STRING_VWATCHRECEIVEDDATA[5]=(func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1)+ 999 )-__ARRAY_STRING_VWATCHRECEIVEDDATA[4]+1; __ARRAY_STRING_VWATCHRECEIVEDDATA[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; if (tmp_long2len== 0 )))){ if(qbevent){evnt(25753,9059,"ide_methods.bas");if(r)goto S_45367;} do{ *__LONG_NEXTVWATCHDATASLOT=*__LONG_NEXTVWATCHDATASLOT+ 1 ; if(!qbevent)break;evnt(25753,9061,"ide_methods.bas");}while(r); S_45369:; while((qbs_cleanup(qbs_tmp_base,-(*__LONG_NEXTVWATCHDATASLOT>func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1))))||new_error){ if(qbevent){evnt(25753,9062,"ide_methods.bas");if(r)goto S_45369;} do{ if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_VWATCHRECEIVEDDATA)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_VWATCHRECEIVEDDATA[2]&1){ preserved_elements=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; } else preserved_elements=0; __ARRAY_STRING_VWATCHRECEIVEDDATA[4]= 1 ; __ARRAY_STRING_VWATCHRECEIVEDDATA[5]=(func_ubound(__ARRAY_STRING_VWATCHRECEIVEDDATA,1,1)+ 999 )-__ARRAY_STRING_VWATCHRECEIVEDDATA[4]+1; __ARRAY_STRING_VWATCHRECEIVEDDATA[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_VWATCHRECEIVEDDATA[5]; if (tmp_long2len))||new_error){ if(qbevent){evnt(25753,9071,"ide_methods.bas");if(r)goto S_45378;} do{ sub_mid(__STRING_VARIABLEWATCHLIST, 5 , 4 ,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES),1); if(!qbevent)break;evnt(25753,9071,"ide_methods.bas");}while(r); } do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,9072,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9073,"ide_methods.bas");}while(r); } S_45384:; if ((*__LONG_MCLICK&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 2 )))||new_error){ if(qbevent){evnt(25753,9076,"ide_methods.bas");if(r)goto S_45384;} S_45385:; if (((-(((float)(FUNC_TIMEELAPSEDSINCE(_FUNC_IDEVARIABLEWATCHBOX_SINGLE_LASTCLICK)))<((float)( 0.3E+0 ))))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_CLICKEDITEM==*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)))))||new_error){ if(qbevent){evnt(25753,9077,"ide_methods.bas");if(r)goto S_45385;} S_45386:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD> 0 ))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD)))&(-(*__LONG_IDEDEBUGMODE> 0 )))||new_error){ if(qbevent){evnt(25753,9078,"ide_methods.bas");if(r)goto S_45386;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS= 5 ; if(!qbevent)break;evnt(25753,9079,"ide_methods.bas");}while(r); do{ goto LABEL_SENDVALUE; if(!qbevent)break;evnt(25753,9080,"ide_methods.bas");}while(r); S_45389:; }else{ if ((((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD> 0 ))&(-(*__LONG_MX<(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD- 1 )))&(-(*__LONG_IDEDEBUGMODE> 0 ))))|(-(*__LONG_IDEDEBUGMODE== 0 ))){ if(qbevent){evnt(25753,9082,"ide_methods.bas");if(r)goto S_45389;} do{ goto LABEL_TOGGLEWATCH; if(!qbevent)break;evnt(25753,9083,"ide_methods.bas");}while(r); } } S_45392:; }else{ if (-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_CLICKEDITEM==*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)))){ if(qbevent){evnt(25753,9085,"ide_methods.bas");if(r)goto S_45392;} S_45393:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD> 0 ))&(-(*__LONG_MX==(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+*_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD- 1 )))&(-(*__LONG_IDEDEBUGMODE> 0 )))||new_error){ if(qbevent){evnt(25753,9086,"ide_methods.bas");if(r)goto S_45393;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,9087,"ide_methods.bas");}while(r); S_45395:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),qbs_new_txt_len("STRING *",8),0)== 0 ))&(qbs_notequal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),qbs_new_txt_len("STRING",6)))))||new_error){ if(qbevent){evnt(25753,9088,"ide_methods.bas");if(r)goto S_45395;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))=*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))+ 1 ; if(!qbevent)break;evnt(25753,9089,"ide_methods.bas");}while(r); S_45397:; if ((-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))> 3 ))||new_error){ if(qbevent){evnt(25753,9090,"ide_methods.bas");if(r)goto S_45397;} do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31))= 0 ; if(!qbevent)break;evnt(25753,9091,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=144; if (next_return_point>=return_points) more_return_points(); goto LABEL_BUILDLIST; RETURN_144:; if(!qbevent)break;evnt(25753,9093,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEVARIABLEWATCHBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9094,"ide_methods.bas");}while(r); } } } } do{ *_FUNC_IDEVARIABLEWATCHBOX_SINGLE_LASTCLICK=func_timer(NULL,0); if(!qbevent)break;evnt(25753,9098,"ide_methods.bas");}while(r); S_45406:; if ((-(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))> 0 ))||new_error){ if(qbevent){evnt(25753,9099,"ide_methods.bas");if(r)goto S_45406;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_CLICKEDITEM=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,9099,"ide_methods.bas");}while(r); } do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,9100,"ide_methods.bas");}while(r); } S_45411:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 2 )))))||new_error){ if(qbevent){evnt(25753,9103,"ide_methods.bas");if(r)goto S_45411;} do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9104,"ide_methods.bas");}while(r); LABEL_TOGGLEWATCH:; if(qbevent){evnt(25753,9105,"ide_methods.bas");r=0;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,9106,"ide_methods.bas");}while(r); S_45414:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y<=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)))||new_error){ if(qbevent){evnt(25753,9108,"ide_methods.bas");if(r)goto S_45414;} do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y; if(!qbevent)break;evnt(25753,9109,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_QUICKDLGUPDATE= -1 ; if(!qbevent)break;evnt(25753,9110,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=145; if (next_return_point>=return_points) more_return_points(); goto LABEL_DLGUPDATE; RETURN_145:; if(!qbevent)break;evnt(25753,9110,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_Y=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,9111,"ide_methods.bas");}while(r); S_45419:; if (((-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))!= 0 ))&*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30)))||new_error){ if(qbevent){evnt(25753,9112,"ide_methods.bas");if(r)goto S_45419;} do{ goto LABEL_SETARRAYRANGE; if(!qbevent)break;evnt(25753,9113,"ide_methods.bas");}while(r); } do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))=~(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))); if(!qbevent)break;evnt(25753,9115,"ide_methods.bas");}while(r); S_45423:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29)))||new_error){ if(qbevent){evnt(25753,9116,"ide_methods.bas");if(r)goto S_45423;} S_45424:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30)))||new_error){ if(qbevent){evnt(25753,9117,"ide_methods.bas");if(r)goto S_45424;} LABEL_SETARRAYRANGE:; if(qbevent){evnt(25753,9118,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9119,"ide_methods.bas");}while(r); S_45426:; if ((qbs_cleanup(qbs_tmp_base,(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80)))->len))||new_error){ if(qbevent){evnt(25753,9120,"ide_methods.bas");if(r)goto S_45426;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9121,"ide_methods.bas");}while(r); } LABEL_SETARRAYRANGE2:; if(qbevent){evnt(25753,9123,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_IDEINPUTBOX(qbs_new_txt_len("Watch Array",11),qbs_add(qbs_new_txt_len("#Indexes",8),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPPROMPT),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len("01234567890,-; TOto",19),&(pass5019= 45 ),&(pass5020= 0 ),_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9124,"ide_methods.bas");}while(r); S_45430:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)||new_error){ if(qbevent){evnt(25753,9125,"ide_methods.bas");if(r)goto S_45430;} S_45431:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len> 0 )))||new_error){ if(qbevent){evnt(25753,9126,"ide_methods.bas");if(r)goto S_45431;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_ucase(_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9127,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_STRREPLACE(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_new_txt_len(" TO ",4),qbs_new_txt_len("-",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9128,"ide_methods.bas");}while(r); S_45434:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEVARIABLEWATCHBOX_STRING_V, 1 ),qbs_new_txt_len(",",1))))||new_error){ if(qbevent){evnt(25753,9129,"ide_methods.bas");if(r)goto S_45434;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9129,"ide_methods.bas");}while(r); ww_continue_5022:; } ww_exit_5022:; do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_LINEFORMAT(_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9130,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=FUNC_COUNTELEMENTS(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9131,"ide_methods.bas");}while(r); S_45439:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I!=func_abs((int16)(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120)))-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516))))))||new_error){ if(qbevent){evnt(25753,9132,"ide_methods.bas");if(r)goto S_45439;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),qbs_add(qbs_add(qbs_new_txt_len("Array has",9),qbs_str((int16)(func_abs((int16)(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120)))-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516))))))),qbs_new_txt_len(" dimension(s).",14)),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9133,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs__trim(_FUNC_IDEVARIABLEWATCHBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9134,"ide_methods.bas");}while(r); do{ goto LABEL_SETARRAYRANGE2; if(!qbevent)break;evnt(25753,9135,"ide_methods.bas");}while(r); } do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9137,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9138,"ide_methods.bas");}while(r); S_45446:; while((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,9139,"ide_methods.bas");if(r)goto S_45446;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA=func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_V,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9140,"ide_methods.bas");}while(r); S_45448:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA)||new_error){ if(qbevent){evnt(25753,9141,"ide_methods.bas");if(r)goto S_45448;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9142,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOUNDCOMMA+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9143,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9145,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_PARSERANGE(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9147,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+80))),l2string(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len)),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9148,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,FUNC_FORMATRANGE(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9149,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9150,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I- 1 ; if(!qbevent)break;evnt(25753,9151,"ide_methods.bas");}while(r); S_45459:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,9152,"ide_methods.bas");if(r)goto S_45459;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72))),qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9152,"ide_methods.bas");}while(r); } ww_continue_5024:; } ww_exit_5024:; }else{ do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,9155,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=146; if (next_return_point>=return_points) more_return_points(); goto LABEL_BUILDLIST; RETURN_146:; if(!qbevent)break;evnt(25753,9156,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEVARIABLEWATCHBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9157,"ide_methods.bas");}while(r); do{ goto LABEL_UNWATCH; if(!qbevent)break;evnt(25753,9158,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=147; if (next_return_point>=return_points) more_return_points(); goto LABEL_BUILDLIST; RETURN_147:; if(!qbevent)break;evnt(25753,9160,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEVARIABLEWATCHBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9161,"ide_methods.bas");}while(r); }else{ do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,9163,"ide_methods.bas");}while(r); do{ goto LABEL_UNWATCH; if(!qbevent)break;evnt(25753,9164,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9169,"ide_methods.bas");}while(r); S_45477:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,9170,"ide_methods.bas");if(r)goto S_45477;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9170,"ide_methods.bas");}while(r); } S_45480:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,9171,"ide_methods.bas");if(r)goto S_45480;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9171,"ide_methods.bas");}while(r); } S_45483:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_NATIVEDATATYPES,_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE,0)== 0 )))||new_error){ if(qbevent){evnt(25753,9172,"ide_methods.bas");if(r)goto S_45483;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9174,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISUDT= 0 ; if(!qbevent)break;evnt(25753,9175,"ide_methods.bas");}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(25753,9176,"ide_methods.bas");}while(r); S_45487:; fornext_value5027= 1 ; fornext_finalvalue5027=*__LONG_LASTTYPE; fornext_step5027= 1 ; if (fornext_step5027<0) fornext_step_negative5027=1; else fornext_step_negative5027=0; if (new_error) goto fornext_error5027; goto fornext_entrylabel5027; while(1){ fornext_value5027=fornext_step5027+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I); fornext_entrylabel5027: *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=fornext_value5027; if (fornext_step_negative5027){ if (fornext_value5027fornext_finalvalue5027) break; } fornext_error5027:; if(qbevent){evnt(25753,9177,"ide_methods.bas");if(r)goto S_45487;} S_45488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1)),_FUNC_IDEVARIABLEWATCHBOX_STRING_VARTYPE)))||new_error){ if(qbevent){evnt(25753,9178,"ide_methods.bas");if(r)goto S_45488;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISUDT=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,9178,"ide_methods.bas");}while(r); do{ goto fornext_exit_5026; if(!qbevent)break;evnt(25753,9178,"ide_methods.bas");}while(r); } fornext_continue_5026:; } fornext_exit_5026:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9181,"ide_methods.bas");}while(r); S_45494:; do{ if(qbevent){evnt(25753,9182,"ide_methods.bas");if(r)goto S_45494;} S_45495:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(25753,9183,"ide_methods.bas");if(r)goto S_45495;} do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISUDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25753,9183,"ide_methods.bas");}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(25753,9183,"ide_methods.bas");}while(r); } S_45500:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(25753,9184,"ide_methods.bas");if(r)goto S_45500;} do{ goto dl_exit_5028; if(!qbevent)break;evnt(25753,9184,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,l2string(*__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9185,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9186,"ide_methods.bas");}while(r); dl_continue_5028:; }while(1); dl_exit_5028:; do{ sub_pcopy( 0 , 4 ); if(!qbevent)break;evnt(25753,9188,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_IDEELEMENTWATCHBOX(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),qbs_new_txt_len(".",1)),_FUNC_IDEVARIABLEWATCHBOX_STRING_ELEMENTINDEXES,&(pass5029= 0 ),&(pass5030= 0 ),_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9189,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 0 ); if(!qbevent)break;evnt(25753,9190,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 1 ); if(!qbevent)break;evnt(25753,9191,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,9192,"ide_methods.bas");}while(r); S_45511:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_OK)||new_error){ if(qbevent){evnt(25753,9193,"ide_methods.bas");if(r)goto S_45511;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTELEMENTNAME= 0 ; if(!qbevent)break;evnt(25753,9194,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9195,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9196,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9197,"ide_methods.bas");}while(r); do{ SUB_GETID((int32*)(void*)( ((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])) + ((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120) )); if(!qbevent)break;evnt(25753,9198,"ide_methods.bas");}while(r); S_45517:; if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||new_error){ if(qbevent){evnt(25753,9199,"ide_methods.bas");if(r)goto S_45517;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*(int32*)(((char*)__UDT_ID)+(512))& 511 ; if(!qbevent)break;evnt(25753,9200,"ide_methods.bas");}while(r); S_45519:; if ((*(int32*)(((char*)__UDT_ID)+(512))&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(25753,9201,"ide_methods.bas");if(r)goto S_45519;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(25753,9202,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]; if(!qbevent)break;evnt(25753,9205,"ide_methods.bas");}while(r); S_45523:; if ((((int16*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5])])||new_error){ if(qbevent){evnt(25753,9206,"ide_methods.bas");if(r)goto S_45523;} S_45524:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))% 8 )||new_error){ if(qbevent){evnt(25753,9207,"ide_methods.bas");if(r)goto S_45524;} do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))=*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))+( 8 -(*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))% 8 )); if(!qbevent)break;evnt(25753,9207,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))=*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))/ 8 ; if(!qbevent)break;evnt(25753,9208,"ide_methods.bas");}while(r); } }else{ do{ *(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+24))= 0 ; if(!qbevent)break;evnt(25753,9211,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9214,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9215,"ide_methods.bas");}while(r); S_45534:; do{ if(qbevent){evnt(25753,9216,"ide_methods.bas");if(r)goto S_45534;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9217,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_GETELEMENT(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9218,"ide_methods.bas");}while(r); S_45537:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len== 0 )))||new_error){ if(qbevent){evnt(25753,9219,"ide_methods.bas");if(r)goto S_45537;} do{ goto dl_exit_5031; if(!qbevent)break;evnt(25753,9219,"ide_methods.bas");}while(r); } S_45540:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len>*_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTELEMENTNAME)))||new_error){ if(qbevent){evnt(25753,9222,"ide_methods.bas");if(r)goto S_45540;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTELEMENTNAME=_FUNC_IDEVARIABLEWATCHBOX_STRING_V->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9222,"ide_methods.bas");}while(r); } S_45543:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len== 0 )))||new_error){ if(qbevent){evnt(25753,9223,"ide_methods.bas");if(r)goto S_45543;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTELEMENTNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9224,"ide_methods.bas");}while(r); }else{ do{ sub_mid(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))), 1 , 4 ,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_LONGESTELEMENTNAME),1); if(!qbevent)break;evnt(25753,9226,"ide_methods.bas");}while(r); } do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),_FUNC_IDEVARIABLEWATCHBOX_STRING_V),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9228,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_V,FUNC_LINEFORMAT(qbs_ucase(_FUNC_IDEVARIABLEWATCHBOX_STRING_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9229,"ide_methods.bas");}while(r); do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(25753,9230,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_RESULT,FUNC_UDTREFERENCE(qbs_new_txt_len("",0),_FUNC_IDEVARIABLEWATCHBOX_STRING_V,_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9231,"ide_methods.bas");}while(r); S_45552:; if ((*__LONG_ERROR_HAPPENED)||new_error){ if(qbevent){evnt(25753,9232,"ide_methods.bas");if(r)goto S_45552;} do{ *__LONG_ERROR_HAPPENED= 0 ; if(!qbevent)break;evnt(25753,9234,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),__STRING_ERROR_MESSAGE,qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9235,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,9236,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9237,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9238,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9239,"ide_methods.bas");}while(r); do{ goto LABEL_UNWATCH; if(!qbevent)break;evnt(25753,9240,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISUDT; if(!qbevent)break;evnt(25753,9242,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISREFERENCE; if(!qbevent)break;evnt(25753,9243,"ide_methods.bas");}while(r); S_45563:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP&*__LONG_ISINCONVENTIONALMEMORY)||new_error){ if(qbevent){evnt(25753,9244,"ide_methods.bas");if(r)goto S_45563;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP-*__LONG_ISINCONVENTIONALMEMORY; if(!qbevent)break;evnt(25753,9244,"ide_methods.bas");}while(r); } S_45566:; if(qbevent){evnt(25753,9245,"ide_methods.bas");if(r)goto S_45566;} S_45567:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_BYTETYPE)))||new_error){ if(qbevent){evnt(25753,9246,"ide_methods.bas");if(r)goto S_45567;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_BYTE",5)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9247,"ide_methods.bas");}while(r); sc_ec_312_end:; goto sc_5035_end; } S_45569:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UBYTETYPE)))||new_error){ if(qbevent){evnt(25753,9248,"ide_methods.bas");if(r)goto S_45569;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_UNSIGNED _BYTE",15)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9249,"ide_methods.bas");}while(r); sc_ec_313_end:; goto sc_5035_end; } S_45571:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_INTEGERTYPE)))||new_error){ if(qbevent){evnt(25753,9250,"ide_methods.bas");if(r)goto S_45571;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("INTEGER",7)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9251,"ide_methods.bas");}while(r); sc_ec_314_end:; goto sc_5035_end; } S_45573:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UINTEGERTYPE)))||new_error){ if(qbevent){evnt(25753,9252,"ide_methods.bas");if(r)goto S_45573;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_UNSIGNED INTEGER",17)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9253,"ide_methods.bas");}while(r); sc_ec_315_end:; goto sc_5035_end; } S_45575:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_LONGTYPE)))||new_error){ if(qbevent){evnt(25753,9254,"ide_methods.bas");if(r)goto S_45575;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("LONG",4)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9255,"ide_methods.bas");}while(r); sc_ec_316_end:; goto sc_5035_end; } S_45577:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_ULONGTYPE)))||new_error){ if(qbevent){evnt(25753,9256,"ide_methods.bas");if(r)goto S_45577;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_UNSIGNED LONG",14)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9257,"ide_methods.bas");}while(r); sc_ec_317_end:; goto sc_5035_end; } S_45579:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_INTEGER64TYPE)))||new_error){ if(qbevent){evnt(25753,9258,"ide_methods.bas");if(r)goto S_45579;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_INTEGER64",10)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9259,"ide_methods.bas");}while(r); sc_ec_318_end:; goto sc_5035_end; } S_45581:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UINTEGER64TYPE)))||new_error){ if(qbevent){evnt(25753,9260,"ide_methods.bas");if(r)goto S_45581;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_UNSIGNED _INTEGER64",20)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9261,"ide_methods.bas");}while(r); sc_ec_319_end:; goto sc_5035_end; } S_45583:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_SINGLETYPE)))||new_error){ if(qbevent){evnt(25753,9262,"ide_methods.bas");if(r)goto S_45583;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("SINGLE",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9263,"ide_methods.bas");}while(r); sc_ec_320_end:; goto sc_5035_end; } S_45585:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_DOUBLETYPE)))||new_error){ if(qbevent){evnt(25753,9264,"ide_methods.bas");if(r)goto S_45585;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("DOUBLE",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9265,"ide_methods.bas");}while(r); sc_ec_321_end:; goto sc_5035_end; } S_45587:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_FLOATTYPE)))||new_error){ if(qbevent){evnt(25753,9266,"ide_methods.bas");if(r)goto S_45587;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_FLOAT",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9267,"ide_methods.bas");}while(r); sc_ec_322_end:; goto sc_5035_end; } S_45589:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_OFFSETTYPE)))||new_error){ if(qbevent){evnt(25753,9268,"ide_methods.bas");if(r)goto S_45589;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_OFFSET",7)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9269,"ide_methods.bas");}while(r); sc_ec_323_end:; goto sc_5035_end; } S_45591:; if (((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP==(*__LONG_UOFFSETTYPE)))||new_error){ if(qbevent){evnt(25753,9270,"ide_methods.bas");if(r)goto S_45591;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("_UNSIGNED _OFFSET",17)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9271,"ide_methods.bas");}while(r); sc_ec_324_end:; goto sc_5035_end; } S_45594:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP&*__LONG_ISSTRING)||new_error){ if(qbevent){evnt(25753,9273,"ide_methods.bas");if(r)goto S_45594;} S_45595:; if ((-((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYP&*__LONG_ISFIXEDLENGTH)== 0 ))||new_error){ if(qbevent){evnt(25753,9274,"ide_methods.bas");if(r)goto S_45595;} do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("STRING",6)),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9275,"ide_methods.bas");}while(r); }else{ do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_add(qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("STRING *",8)),qbs_str((int32)(((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])]))),__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9278,"ide_methods.bas");}while(r); } }else{ do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,9282,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9283,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9284,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9285,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Error",5),qbs_new_txt_len("Cannot add full UDT to Watch List",33),qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9286,"ide_methods.bas");}while(r); do{ goto LABEL_UNWATCH; if(!qbevent)break;evnt(25753,9287,"ide_methods.bas");}while(r); } sc_5035_end:; do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+104))),l2string(qbr(func_val(func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_RESULT,func__instrrev(NULL,_FUNC_IDEVARIABLEWATCHBOX_STRING_RESULT,__STRING1_SP3,0)+ 1 ,NULL,0)))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9290,"ide_methods.bas");}while(r); } dl_continue_5031:; }while(1); dl_exit_5031:; do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),qbs_left(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88))),(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9295,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),qbs_left(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96))),(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+96)))->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9296,"ide_methods.bas");}while(r); }else{ do{ *(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29))= 0 ; if(!qbevent)break;evnt(25753,9298,"ide_methods.bas");}while(r); do{ goto LABEL_UNWATCH; if(!qbevent)break;evnt(25753,9299,"ide_methods.bas");}while(r); } } do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long=*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR; 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(25753,9303,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYPECOLUMNCOLOR; 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(25753,9304,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long=*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTEDBG; 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(25753,9305,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); if (!new_error){ tmp_long= 43 ; 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(25753,9306,"ide_methods.bas");}while(r); }else{ LABEL_UNWATCH:; if(qbevent){evnt(25753,9308,"ide_methods.bas");r=0;} do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long= 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(25753,9309,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long= 2 ; 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(25753,9310,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long= 17 ; 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(25753,9311,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_Y)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); 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(25753,9312,"ide_methods.bas");}while(r); } } do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,9316,"ide_methods.bas");}while(r); } S_45632:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS== 2 ))&(((qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1)))&(-(*__LONG_KCTRL!= 0 ))))))||new_error){ if(qbevent){evnt(25753,9319,"ide_methods.bas");if(r)goto S_45632;} do{ return_point[next_return_point++]=148; if (next_return_point>=return_points) more_return_points(); goto LABEL_COPYLIST; RETURN_148:; if(!qbevent)break;evnt(25753,9320,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,9321,"ide_methods.bas");}while(r); } S_45636:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX))&(((qbs_greaterorequal(__STRING_K,qbs_new_txt_len(" ",1)))&(qbs_lessorequal(__STRING_K,func_chr( 126 )))))))||new_error){ if(qbevent){evnt(25753,9324,"ide_methods.bas");if(r)goto S_45636;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX; if(!qbevent)break;evnt(25753,9325,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PREVFOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,9326,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),__STRING_K); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9327,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,9328,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+76))= 0 ; if(!qbevent)break;evnt(25753,9329,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9330,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,9331,"ide_methods.bas");}while(r); } S_45645:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX))&(((-(*__LONG_KB== 18432 ))|(-(*__LONG_KB== 20480 )))))||new_error){ if(qbevent){evnt(25753,9334,"ide_methods.bas");if(r)goto S_45645;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS=*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX; if(!qbevent)break;evnt(25753,9335,"ide_methods.bas");}while(r); do{ goto dl_continue_4952; if(!qbevent)break;evnt(25753,9336,"ide_methods.bas");}while(r); } S_45649:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_FOCUS==*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX))&(qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM))))||new_error){ if(qbevent){evnt(25753,9339,"ide_methods.bas");if(r)goto S_45649;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_FILTER,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FILTERBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9340,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM,qbs_ucase(_FUNC_IDEVARIABLEWATCHBOX_STRING_FILTER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9341,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=149; if (next_return_point>=return_points) more_return_points(); goto LABEL_BUILDLIST; RETURN_149:; if(!qbevent)break;evnt(25753,9343,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEVARIABLEWATCHBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9344,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,9345,"ide_methods.bas");}while(r); S_45655:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM->len))||new_error){ if(qbevent){evnt(25753,9346,"ide_methods.bas");if(r)goto S_45655;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len(", filtered",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9346,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9346,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(16)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Add Watch - Variable List (",27),qbs_ltrim(qbs_str((int32)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)))),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9347,"ide_methods.bas");}while(r); } LABEL_DLGLOOP:; if(qbevent){evnt(25753,9350,"ide_methods.bas");r=0;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,9352,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,9353,"ide_methods.bas");}while(r); dl_continue_4952:; }while(1); dl_exit_4952:; do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_IDEVARIABLEWATCHBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9356,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9357,"ide_methods.bas");}while(r); LABEL_COPYLIST:; if(qbevent){evnt(25753,9359,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9360,"ide_methods.bas");}while(r); S_45668:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_IDEPROGNAME,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9361,"ide_methods.bas");if(r)goto S_45668;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_PROPOSEDTITLE,FUNC_FINDPROPOSEDTITLE()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9362,"ide_methods.bas");}while(r); S_45670:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_PROPOSEDTITLE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9363,"ide_methods.bas");if(r)goto S_45670;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("QB64 - Variable List Report: untitled",37),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9364,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("QB64 - Variable List Report: ",29),_FUNC_IDEVARIABLEWATCHBOX_STRING_PROPOSEDTITLE),qbs_new_txt_len(".bas",4)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9366,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(qbs_new_txt_len("QB64 - Variable List Report: ",29),__STRING_IDEPROGNAME),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9369,"ide_methods.bas");}while(r); } S_45678:; fornext_value5039= 1 ; fornext_finalvalue5039=*__LONG_TOTALVARIABLESCREATED; fornext_step5039= 1 ; if (fornext_step5039<0) fornext_step_negative5039=1; else fornext_step_negative5039=0; if (new_error) goto fornext_error5039; goto fornext_entrylabel5039; while(1){ fornext_value5039=fornext_step5039+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X); fornext_entrylabel5039: *_FUNC_IDEVARIABLEWATCHBOX_LONG_X=fornext_value5039; if (fornext_step_negative5039){ if (fornext_value5039fornext_finalvalue5039) break; } fornext_error5039:; if(qbevent){evnt(25753,9372,"ide_methods.bas");if(r)goto S_45678;} S_45679:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12)))||new_error){ if(qbevent){evnt(25753,9373,"ide_methods.bas");if(r)goto S_45679;} do{ goto fornext_continue_5038; if(!qbevent)break;evnt(25753,9373,"ide_methods.bas");}while(r); } S_45682:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM->len))||new_error){ if(qbevent){evnt(25753,9375,"ide_methods.bas");if(r)goto S_45682;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9376,"ide_methods.bas");}while(r); S_45684:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9377,"ide_methods.bas");if(r)goto S_45684;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE,_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9377,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ITEM,qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))),_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9378,"ide_methods.bas");}while(r); S_45688:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_MULTISEARCH(_FUNC_IDEVARIABLEWATCHBOX_STRING_ITEM,_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM)== 0 )))||new_error){ if(qbevent){evnt(25753,9379,"ide_methods.bas");if(r)goto S_45688;} do{ goto fornext_continue_5038; if(!qbevent)break;evnt(25753,9380,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9384,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXVARLEN-(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9385,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_new_txt_len(" ",1)),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))),func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXTYPELEN-(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9386,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,func_space( 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9388,"ide_methods.bas");}while(r); S_45696:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len> 0 )))||new_error){ if(qbevent){evnt(25753,9389,"ide_methods.bas");if(r)goto S_45696;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))),func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN-(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9390,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE),func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN-_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE->len)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9392,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,_FUNC_IDEVARIABLEWATCHBOX_STRING_L3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9395,"ide_methods.bas");}while(r); fornext_continue_5038:; } fornext_exit_5038:; do{ sub__clipboard(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9397,"ide_methods.bas");}while(r); do{ #include "ret159.txt" if(!qbevent)break;evnt(25753,9398,"ide_methods.bas");}while(r); LABEL_BUILDLIST:; if(qbevent){evnt(25753,9400,"ide_methods.bas");r=0;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXVARLEN=((int32)(qbs_new_txt_len("Variable",8))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9401,"ide_methods.bas");}while(r); S_45706:; fornext_value5043= 1 ; fornext_finalvalue5043=*__LONG_TOTALVARIABLESCREATED; fornext_step5043= 1 ; if (fornext_step5043<0) fornext_step_negative5043=1; else fornext_step_negative5043=0; if (new_error) goto fornext_error5043; goto fornext_entrylabel5043; while(1){ fornext_value5043=fornext_step5043+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X); fornext_entrylabel5043: *_FUNC_IDEVARIABLEWATCHBOX_LONG_X=fornext_value5043; if (fornext_step_negative5043){ if (fornext_value5043fornext_finalvalue5043) break; } fornext_error5043:; if(qbevent){evnt(25753,9402,"ide_methods.bas");if(r)goto S_45706;} S_45707:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12)))||new_error){ if(qbevent){evnt(25753,9403,"ide_methods.bas");if(r)goto S_45707;} do{ goto fornext_continue_5042; if(!qbevent)break;evnt(25753,9403,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN=(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))->len+ 3 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9404,"ide_methods.bas");}while(r); S_45711:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))->len> 0 )))||new_error){ if(qbevent){evnt(25753,9405,"ide_methods.bas");if(r)goto S_45711;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN=*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN+(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9406,"ide_methods.bas");}while(r); } S_45714:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN>*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXVARLEN))||new_error){ if(qbevent){evnt(25753,9408,"ide_methods.bas");if(r)goto S_45714;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXVARLEN=*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISLEN; if(!qbevent)break;evnt(25753,9408,"ide_methods.bas");}while(r); } fornext_continue_5042:; } fornext_exit_5042:; S_45718:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FIRSTRUN)||new_error){ if(qbevent){evnt(25753,9411,"ide_methods.bas");if(r)goto S_45718;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG,qbs_new_txt_len("Building Variable List...",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9412,"ide_methods.bas");}while(r); S_45720:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTVAR== -1 ))||new_error){ if(qbevent){evnt(25753,9413,"ide_methods.bas");if(r)goto S_45720;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG,qbs_new_txt_len("Analyzing Variable List...",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9413,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_UDT_P)) + (0) ),&(pass5044= 60 ),&(pass5045= 1 ),_FUNC_IDEVARIABLEWATCHBOX_STRING_MSG); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9414,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9417,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES= 0 ; if(!qbevent)break;evnt(25753,9418,"ide_methods.bas");}while(r); S_45727:; fornext_value5047= 1 ; fornext_finalvalue5047=*__LONG_TOTALVARIABLESCREATED; fornext_step5047= 1 ; if (fornext_step5047<0) fornext_step_negative5047=1; else fornext_step_negative5047=0; if (new_error) goto fornext_error5047; goto fornext_entrylabel5047; while(1){ fornext_value5047=fornext_step5047+(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X); fornext_entrylabel5047: *_FUNC_IDEVARIABLEWATCHBOX_LONG_X=fornext_value5047; if (fornext_step_negative5047){ if (fornext_value5047fornext_finalvalue5047) break; } fornext_error5047:; if(qbevent){evnt(25753,9419,"ide_methods.bas");if(r)goto S_45727;} S_45728:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_FIRSTRUN)||new_error){ if(qbevent){evnt(25753,9421,"ide_methods.bas");if(r)goto S_45728;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEVARIABLEWATCHBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,9422,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,9423,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_C=*__LONG_TOTALVARIABLESCREATED; if(!qbevent)break;evnt(25753,9424,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_N=*_FUNC_IDEVARIABLEWATCHBOX_LONG_X; if(!qbevent)break;evnt(25753,9425,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXPROGRESSWIDTH= 52 ; if(!qbevent)break;evnt(25753,9427,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGE=qbr(floor(*_FUNC_IDEVARIABLEWATCHBOX_LONG_N/ ((long double)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_C))* 100 )); if(!qbevent)break;evnt(25753,9428,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGECHARS=qbr(floor(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXPROGRESSWIDTH**_FUNC_IDEVARIABLEWATCHBOX_LONG_N/ ((long double)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_C)))); if(!qbevent)break;evnt(25753,9429,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_PERCENTAGEMSG,qbs_add(qbs_add(qbs_add(func_string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGECHARS, 219 ),func_string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXPROGRESSWIDTH-*_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGECHARS, 176 )),qbs_str((int32)(*_FUNC_IDEVARIABLEWATCHBOX_LONG_PERCENTAGE))),qbs_new_txt_len("%",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9430,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(0))+((*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(8))/ 2 )-(_FUNC_IDEVARIABLEWATCHBOX_STRING_PERCENTAGEMSG->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_UDT_P)+(4))+ 1 ,_FUNC_IDEVARIABLEWATCHBOX_STRING_PERCENTAGEMSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9431,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,9433,"ide_methods.bas");}while(r); } S_45740:; if ((*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+12)))||new_error){ if(qbevent){evnt(25753,9436,"ide_methods.bas");if(r)goto S_45740;} do{ goto fornext_continue_5046; if(!qbevent)break;evnt(25753,9436,"ide_methods.bas");}while(r); } S_45743:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM->len))||new_error){ if(qbevent){evnt(25753,9438,"ide_methods.bas");if(r)goto S_45743;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9439,"ide_methods.bas");}while(r); S_45745:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9440,"ide_methods.bas");if(r)goto S_45745;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE,_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9440,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ITEM,qbs_add(qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32))),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))),_FUNC_IDEVARIABLEWATCHBOX_STRING_THISSCOPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9441,"ide_methods.bas");}while(r); S_45749:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDEDEBUGMODE> 0 ))&(-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))== 0 ))&(-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len== 0 ))&(-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len== 4 ))))||new_error){ if(qbevent){evnt(25753,9442,"ide_methods.bas");if(r)goto S_45749;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_ITEM,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_ITEM,FUNC_STRREPLACE(((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[array_check((string2l(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))))-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5])])),func_chr( 0 ),qbs_new_txt_len(" ",1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9444,"ide_methods.bas");}while(r); } S_45752:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_MULTISEARCH(_FUNC_IDEVARIABLEWATCHBOX_STRING_ITEM,_FUNC_IDEVARIABLEWATCHBOX_STRING_SEARCHTERM)== 0 )))||new_error){ if(qbevent){evnt(25753,9446,"ide_methods.bas");if(r)goto S_45752;} do{ goto fornext_continue_5046; if(!qbevent)break;evnt(25753,9447,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES+ 1 ; if(!qbevent)break;evnt(25753,9451,"ide_methods.bas");}while(r); S_45757:; while((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES>func_ubound(_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST,1,1)))||new_error){ if(qbevent){evnt(25753,9452,"ide_methods.bas");if(r)goto S_45757;} do{ if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&1){ preserved_elements=_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]; } else preserved_elements=0; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4]= 1 ; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]=(*__LONG_TOTALVARIABLESCREATED+ 100 )-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4]+1; _FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]; if (tmp_long2len+ 1 ; if(!qbevent)break;evnt(25753,9457,"ide_methods.bas");}while(r); S_45762:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29)))||new_error){ if(qbevent){evnt(25753,9458,"ide_methods.bas");if(r)goto S_45762;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_SELECTEDBG))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9459,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 17 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9461,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9464,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_X; if(!qbevent)break;evnt(25753,9465,"ide_methods.bas");}while(r); S_45769:; if (((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_ITEMTOSELECT> 0 ))&(-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X==*_FUNC_IDEVARIABLEWATCHBOX_LONG_ITEMTOSELECT)))||new_error){ if(qbevent){evnt(25753,9466,"ide_methods.bas");if(r)goto S_45769;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_ITEMTOSELECT= 0 ; if(!qbevent)break;evnt(25753,9466,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_O[5]))*89+64))=*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES; if(!qbevent)break;evnt(25753,9466,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8))=_FUNC_IDEVARIABLEWATCHBOX_STRING_L->len+ 1 ; if(!qbevent)break;evnt(25753,9467,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16))=_FUNC_IDEVARIABLEWATCHBOX_STRING_L->len+ 2 ; if(!qbevent)break;evnt(25753,9468,"ide_methods.bas");}while(r); S_45775:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29)))||new_error){ if(qbevent){evnt(25753,9469,"ide_methods.bas");if(r)goto S_45775;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR)),qbs_new_txt_len("+",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9470,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 16 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9472,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+32)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9475,"ide_methods.bas");}while(r); S_45781:; if ((qbs_cleanup(qbs_tmp_base,(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))->len))||new_error){ if(qbevent){evnt(25753,9476,"ide_methods.bas");if(r)goto S_45781;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,qbs_add(qbs_add(qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME->len- 1 ),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+72)))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9477,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,l2string(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9481,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9482,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9483,"ide_methods.bas");}while(r); S_45787:; while((*_FUNC_IDEVARIABLEWATCHBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,9484,"ide_methods.bas");if(r)goto S_45787;} S_45788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(__STRING_WATCHPOINTLIST,*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 8 ,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len,1),_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP)))||new_error){ if(qbevent){evnt(25753,9485,"ide_methods.bas");if(r)goto S_45788;} do{ goto dl_exit_5055; if(!qbevent)break;evnt(25753,9485,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_I=func_instr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I+ 1 ,__STRING_WATCHPOINTLIST,l2string( -1 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9486,"ide_methods.bas");}while(r); dl_continue_5055:; } dl_exit_5055:; S_45793:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,9489,"ide_methods.bas");if(r)goto S_45793;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,func_chr( 16 )),func_chr( 4 )),func_chr( 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9490,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,func_chr( 16 )),func_chr( 16 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9492,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME,func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9495,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_TOTALVISIBLEVARIABLES)-_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEVARIABLEWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12))=_FUNC_IDEVARIABLEWATCHBOX_STRING_L->len+_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT->len+ 1 ; if(!qbevent)break;evnt(25753,9496,"ide_methods.bas");}while(r); S_45800:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29)))||new_error){ if(qbevent){evnt(25753,9497,"ide_methods.bas");if(r)goto S_45800;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_TYPECOLUMNCOLOR)),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9498,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,func_chr( 2 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9500,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXVARLEN-_FUNC_IDEVARIABLEWATCHBOX_STRING_THISNAME->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9502,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT,qbs_new_txt_len(" ",1)),*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))),func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXTYPELEN-(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48)))->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9503,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,func_space( 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9505,"ide_methods.bas");}while(r); S_45808:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len> 0 )))||new_error){ if(qbevent){evnt(25753,9506,"ide_methods.bas");if(r)goto S_45808;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))),func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN-(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64)))->len)),func_chr( 16 )),func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9507,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L3,_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE),func_space(*_FUNC_IDEVARIABLEWATCHBOX_LONG_MAXMODULENAMELEN-_FUNC_IDEVARIABLEWATCHBOX_STRING_MAINMODULE->len)),func_chr( 16 )),func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9509,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEXT),_FUNC_IDEVARIABLEWATCHBOX_STRING_L3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9512,"ide_methods.bas");}while(r); S_45814:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X== 1 ))||new_error){ if(qbevent){evnt(25753,9513,"ide_methods.bas");if(r)goto S_45814;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_DOUBLECLICKTHRESHOLD=_FUNC_IDEVARIABLEWATCHBOX_STRING_L->len- 3 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9513,"ide_methods.bas");}while(r); } S_45817:; if ((-(*__LONG_IDEDEBUGMODE> 0 ))||new_error){ if(qbevent){evnt(25753,9515,"ide_methods.bas");if(r)goto S_45817;} S_45818:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),_FUNC_IDEVARIABLEWATCHBOX_STRING_CURRENTSCOPE))|(qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+64))),qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25753,9516,"ide_methods.bas");if(r)goto S_45818;} S_45819:; if ((*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+29)))||new_error){ if(qbevent){evnt(25753,9517,"ide_methods.bas");if(r)goto S_45819;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_THISISASTRING=((-(func_instr(NULL,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),qbs_new_txt_len("STRING *",8),0)> 0 ))|(qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+48))),qbs_new_txt_len("STRING",6)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9518,"ide_methods.bas");}while(r); S_45821:; if ((qbs_cleanup(qbs_tmp_base,(-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))!= 0 ))&(-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len== 0 ))))||new_error){ if(qbevent){evnt(25753,9519,"ide_methods.bas");if(r)goto S_45821;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9521,"ide_methods.bas");}while(r); S_45823:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len))||new_error){ if(qbevent){evnt(25753,9522,"ide_methods.bas");if(r)goto S_45823;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len(" = ",3)),func_chr( 16 )),func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR)),qbs_new_txt_len("{",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9522,"ide_methods.bas");}while(r); } S_45826:; while((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len))||new_error){ if(qbevent){evnt(25753,9523,"ide_methods.bas");if(r)goto S_45826;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT=string2l(qbs_left(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9524,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP,func_mid(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP, 5 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9525,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,FUNC_STRREPLACE(((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT)-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5])])),func_chr( 0 ),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9526,"ide_methods.bas");}while(r); S_45830:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISISASTRING)||new_error){ if(qbevent){evnt(25753,9527,"ide_methods.bas");if(r)goto S_45830;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9528,"ide_methods.bas");}while(r); }else{ S_45833:; sc_5065=*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31)); if(qbevent){evnt(25753,9530,"ide_methods.bas");if(r)goto S_45833;} S_45834:; if (((sc_5065==( 1 )))||new_error){ if(qbevent){evnt(25753,9532,"ide_methods.bas");if(r)goto S_45834;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&H",2),func_hex_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9532,"ide_methods.bas");}while(r); sc_ec_325_end:; goto sc_5065_end; } S_45836:; if (((sc_5065==( 2 )))||new_error){ if(qbevent){evnt(25753,9533,"ide_methods.bas");if(r)goto S_45836;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&B",2),func__bin_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9533,"ide_methods.bas");}while(r); sc_ec_326_end:; goto sc_5065_end; } S_45838:; if (((sc_5065==( 3 )))||new_error){ if(qbevent){evnt(25753,9534,"ide_methods.bas");if(r)goto S_45838;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&O",2),func_oct_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9534,"ide_methods.bas");}while(r); sc_ec_327_end:; goto sc_5065_end; } sc_5065_end:; } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9537,"ide_methods.bas");}while(r); S_45843:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISISASTRING)||new_error){ if(qbevent){evnt(25753,9538,"ide_methods.bas");if(r)goto S_45843;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9538,"ide_methods.bas");}while(r); } S_45846:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMP->len))||new_error){ if(qbevent){evnt(25753,9539,"ide_methods.bas");if(r)goto S_45846;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len(",",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9539,"ide_methods.bas");}while(r); } dl_continue_5064:; } dl_exit_5064:; S_45850:; if ((qbs_cleanup(qbs_tmp_base,(*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len))||new_error){ if(qbevent){evnt(25753,9541,"ide_methods.bas");if(r)goto S_45850;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len("}",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9541,"ide_methods.bas");}while(r); } S_45853:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+30))== 0 ))&(-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+88)))->len== 0 )))){ if(qbevent){evnt(25753,9542,"ide_methods.bas");if(r)goto S_45853;} S_45854:; if ((qbs_cleanup(qbs_tmp_base,-((*(qbs**)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))->len== 4 )))||new_error){ if(qbevent){evnt(25753,9544,"ide_methods.bas");if(r)goto S_45854;} do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT=string2l(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+112)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9545,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len(" = ",3)),func_chr( 16 )),func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9546,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,FUNC_STRREPLACE(((qbs*)(((uint64*)(__ARRAY_STRING_VWATCHRECEIVEDDATA[0]))[array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_STORAGESLOT)-__ARRAY_STRING_VWATCHRECEIVEDDATA[4],__ARRAY_STRING_VWATCHRECEIVEDDATA[5])])),func_chr( 0 ),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9547,"ide_methods.bas");}while(r); S_45858:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISISASTRING)||new_error){ if(qbevent){evnt(25753,9548,"ide_methods.bas");if(r)goto S_45858;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9549,"ide_methods.bas");}while(r); }else{ S_45861:; sc_5067=*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+((array_check((*_FUNC_IDEVARIABLEWATCHBOX_LONG_X)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*120+31)); if(qbevent){evnt(25753,9551,"ide_methods.bas");if(r)goto S_45861;} S_45862:; if (((sc_5067==( 1 )))||new_error){ if(qbevent){evnt(25753,9553,"ide_methods.bas");if(r)goto S_45862;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&H",2),func_hex_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9553,"ide_methods.bas");}while(r); sc_ec_328_end:; goto sc_5067_end; } S_45864:; if (((sc_5067==( 2 )))||new_error){ if(qbevent){evnt(25753,9554,"ide_methods.bas");if(r)goto S_45864;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&B",2),func__bin_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9554,"ide_methods.bas");}while(r); sc_ec_329_end:; goto sc_5067_end; } S_45866:; if (((sc_5067==( 3 )))||new_error){ if(qbevent){evnt(25753,9555,"ide_methods.bas");if(r)goto S_45866;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE,qbs_add(qbs_new_txt_len("&O",2),func_oct_float(func_val(_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9555,"ide_methods.bas");}while(r); sc_ec_330_end:; goto sc_5067_end; } sc_5067_end:; } do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,_FUNC_IDEVARIABLEWATCHBOX_STRING_TEMPVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9558,"ide_methods.bas");}while(r); S_45871:; if ((*_FUNC_IDEVARIABLEWATCHBOX_LONG_THISISASTRING)||new_error){ if(qbevent){evnt(25753,9559,"ide_methods.bas");if(r)goto S_45871;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9559,"ide_methods.bas");}while(r); } } }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len(" = ",3)),func_chr( 16 )),func_chr(*_FUNC_IDEVARIABLEWATCHBOX_LONG_VARIABLENAMECOLOR))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9562,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len("",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9563,"ide_methods.bas");}while(r); } } } }else{ do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_new_txt_len(" ",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9567,"ide_methods.bas");}while(r); } } S_45884:; if ((-(*_FUNC_IDEVARIABLEWATCHBOX_LONG_X<*__LONG_TOTALVARIABLESCREATED))||new_error){ if(qbevent){evnt(25753,9570,"ide_methods.bas");if(r)goto S_45884;} do{ qbs_set(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,qbs_add(_FUNC_IDEVARIABLEWATCHBOX_STRING_L,_FUNC_IDEVARIABLEWATCHBOX_STRING1_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9570,"ide_methods.bas");}while(r); } fornext_continue_5046:; } fornext_exit_5046:; do{ *_FUNC_IDEVARIABLEWATCHBOX_LONG_ITEMTOSELECT= 0 ; if(!qbevent)break;evnt(25753,9572,"ide_methods.bas");}while(r); do{ #include "ret159.txt" if(!qbevent)break;evnt(25753,9573,"ide_methods.bas");}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_IDEVARIABLEWATCHBOX_STRING_IDEVARIABLEWATCHBOX);return _FUNC_IDEVARIABLEWATCHBOX_STRING_IDEVARIABLEWATCHBOX; } qbs* FUNC_IDEELEMENTWATCHBOX(qbs*_FUNC_IDEELEMENTWATCHBOX_STRING_CURRENTPATH,qbs*_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES,int32*_FUNC_IDEELEMENTWATCHBOX_LONG_LEVEL,int32*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION,int32*_FUNC_IDEELEMENTWATCHBOX_LONG_OK){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 4 , 0 ); if(!qbevent)break;evnt(25753,9579,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,9580,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,9581,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,9582,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,9583,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,9584,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,9585,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9586,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,9591,"ide_methods.bas");}while(r); S_45899:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_LEVEL== 0 ))||new_error){ if(qbevent){evnt(25753,9592,"ide_methods.bas");if(r)goto S_45899;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9592,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK= 0 ; if(!qbevent)break;evnt(25753,9594,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_VARIABLENAMECOLOR= 3 ; if(!qbevent)break;evnt(25753,9595,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_TYPECOLUMNCOLOR= 15 ; if(!qbevent)break;evnt(25753,9596,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_SELECTEDBG= 2 ; if(!qbevent)break;evnt(25753,9597,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS=_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES->len/ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9599,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST)[8])->id=(++mem_lock_id); if (_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&1){ tmp_long=_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+(264/8+1-1)*tmp_long+ 25));} if (_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])); }else{ free((void*)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])); } } _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4]= 1 ; _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]=(*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4]+1; _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[6]=1; _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]=(ptrszint)malloc(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]*264/8+1); if (!_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]) error(257); _FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[2]|=1; tmp_long=_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]; while(tmp_long--){ *(qbs**)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+(264/8+1-1)*tmp_long+ 25)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,9600,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS+ 4 ; if(!qbevent)break;evnt(25753,9601,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9602,"ide_methods.bas");}while(r); S_45910:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,9603,"ide_methods.bas");if(r)goto S_45910;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,9604,"ide_methods.bas");}while(r); } S_45913:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT< 5 ))||new_error){ if(qbevent){evnt(25753,9606,"ide_methods.bas");if(r)goto S_45913;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT= 5 ; if(!qbevent)break;evnt(25753,9606,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=150; if (next_return_point>=return_points) more_return_points(); goto LABEL_BUILDLIST; RETURN_150:; if(!qbevent)break;evnt(25753,9609,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH= 6 +*_FUNC_IDEELEMENTWATCHBOX_LONG_LONGESTNAME+*_FUNC_IDEELEMENTWATCHBOX_LONG_MAXTYPELEN; if(!qbevent)break;evnt(25753,9610,"ide_methods.bas");}while(r); S_45918:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH< 40 ))||new_error){ if(qbevent){evnt(25753,9611,"ide_methods.bas");if(r)goto S_45918;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH= 40 ; if(!qbevent)break;evnt(25753,9611,"ide_methods.bas");}while(r); } S_45921:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,9612,"ide_methods.bas");if(r)goto S_45921;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,9612,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TITLE,qbs_new_txt_len("Add UDT Elements",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9614,"ide_methods.bas");}while(r); S_45925:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9615,"ide_methods.bas");if(r)goto S_45925;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TITLE,qbs_new_txt_len("Choose UDT Element",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9615,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEELEMENTWATCHBOX_UDT_P)) + (0) ),_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH,_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT,_FUNC_IDEELEMENTWATCHBOX_STRING_TITLE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9616,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_I=*_FUNC_IDEELEMENTWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9618,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX=*_FUNC_IDEELEMENTWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,9618,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,9619,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,9620,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+28))=*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,9621,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+32))=*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT- 4 ; if(!qbevent)break;evnt(25753,9621,"ide_methods.bas");}while(r); S_45935:; if ((-(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44))== 0 ))||new_error){ if(qbevent){evnt(25753,9622,"ide_methods.bas");if(r)goto S_45935;} do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEELEMENTWATCHBOX_STRING_L); if(!qbevent)break;evnt(25753,9622,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEELEMENTWATCHBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9622,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_I=*_FUNC_IDEELEMENTWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9624,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_BUTTONSET=*_FUNC_IDEELEMENTWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,9624,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,9625,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDEELEMENTWATCHBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,9626,"ide_methods.bas");}while(r); S_45944:; if ((-(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44))== 0 ))||new_error){ if(qbevent){evnt(25753,9627,"ide_methods.bas");if(r)goto S_45944;} S_45945:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9628,"ide_methods.bas");if(r)goto S_45945;} do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEELEMENTWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7)),_FUNC_IDEELEMENTWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Up One Level",13))); if(!qbevent)break;evnt(25753,9629,"ide_methods.bas");}while(r); }else{ do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_BUTTONSET)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Add All",8),_FUNC_IDEELEMENTWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Remove All",11)),_FUNC_IDEELEMENTWATCHBOX_STRING1_SEP),qbs_new_txt_len("#Close",6))); if(!qbevent)break;evnt(25753,9631,"ide_methods.bas");}while(r); } } S_45951:; fornext_value5072= 1 ; fornext_finalvalue5072= 100 ; fornext_step5072= 1 ; if (fornext_step5072<0) fornext_step_negative5072=1; else fornext_step_negative5072=0; if (new_error) goto fornext_error5072; goto fornext_entrylabel5072; while(1){ fornext_value5072=fornext_step5072+(*_FUNC_IDEELEMENTWATCHBOX_LONG_I); fornext_entrylabel5072: *_FUNC_IDEELEMENTWATCHBOX_LONG_I=fornext_value5072; if (fornext_step_negative5072){ if (fornext_value5072fornext_finalvalue5072) break; } fornext_error5072:; if(qbevent){evnt(25753,9638,"ide_methods.bas");if(r)goto S_45951;} do{ memcpy(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEELEMENTWATCHBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,9638,"ide_methods.bas");}while(r); fornext_continue_5071:; } fornext_exit_5071:; S_45954:; do{ if(qbevent){evnt(25753,9641,"ide_methods.bas");if(r)goto S_45954;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEELEMENTWATCHBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,9644,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,9645,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,9645,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,9645,"ide_methods.bas");}while(r); S_45959:; fornext_value5075= 1 ; fornext_finalvalue5075= 100 ; fornext_step5075= 1 ; if (fornext_step5075<0) fornext_step_negative5075=1; else fornext_step_negative5075=0; if (new_error) goto fornext_error5075; goto fornext_entrylabel5075; while(1){ fornext_value5075=fornext_step5075+(*_FUNC_IDEELEMENTWATCHBOX_LONG_I); fornext_entrylabel5075: *_FUNC_IDEELEMENTWATCHBOX_LONG_I=fornext_value5075; if (fornext_step_negative5075){ if (fornext_value5075fornext_finalvalue5075) break; } fornext_error5075:; if(qbevent){evnt(25753,9646,"ide_methods.bas");if(r)goto S_45959;} S_45960:; if ((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,9647,"ide_methods.bas");if(r)goto S_45960;} do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS-*_FUNC_IDEELEMENTWATCHBOX_LONG_F; if(!qbevent)break;evnt(25753,9649,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,9650,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,9650,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEELEMENTWATCHBOX_LONG_F); if(!qbevent)break;evnt(25753,9651,"ide_methods.bas");}while(r); S_45965:; if ((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,9652,"ide_methods.bas");if(r)goto S_45965;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,9652,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,9652,"ide_methods.bas");}while(r); } } fornext_continue_5074:; } fornext_exit_5074:; do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_LASTFOCUS=*_FUNC_IDEELEMENTWATCHBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,9655,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,9659,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TEMP,_FUNC_IDEELEMENTWATCHBOX_STRING_CURRENTPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9660,"ide_methods.bas");}while(r); S_45974:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDEELEMENTWATCHBOX_STRING_TEMP->len)>(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_UDT_P)+(8))- 4 ))))||new_error){ if(qbevent){evnt(25753,9661,"ide_methods.bas");if(r)goto S_45974;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TEMP,qbs_add(func_string( 3 , 250 ),qbs_right(_FUNC_IDEELEMENTWATCHBOX_STRING_TEMP,*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_UDT_P)+(8))- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9661,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_UDT_P)+(4))+ 1 ,_FUNC_IDEELEMENTWATCHBOX_STRING_TEMP,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9662,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,9667,"ide_methods.bas");}while(r); S_45979:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,9668,"ide_methods.bas");if(r)goto S_45979;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,9668,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEELEMENTWATCHBOX_LONG_CY,*_FUNC_IDEELEMENTWATCHBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,9668,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,9668,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,9671,"ide_methods.bas");}while(r); S_45985:; do{ if(qbevent){evnt(25753,9672,"ide_methods.bas");if(r)goto S_45985;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,9673,"ide_methods.bas");}while(r); S_45987:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,9674,"ide_methods.bas");if(r)goto S_45987;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,9674,"ide_methods.bas");}while(r); } S_45990:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,9675,"ide_methods.bas");if(r)goto S_45990;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,9675,"ide_methods.bas");}while(r); } S_45993:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,9676,"ide_methods.bas");if(r)goto S_45993;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,9676,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,9676,"ide_methods.bas");}while(r); } S_45997:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,9677,"ide_methods.bas");if(r)goto S_45997;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,9677,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,9677,"ide_methods.bas");}while(r); } S_46001:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,9678,"ide_methods.bas");if(r)goto S_46001;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,9678,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,9679,"ide_methods.bas");}while(r); S_46005:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_ALT!=*_FUNC_IDEELEMENTWATCHBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,9679,"ide_methods.bas");if(r)goto S_46005;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,9679,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OLDALT=*_FUNC_IDEELEMENTWATCHBOX_LONG_ALT; if(!qbevent)break;evnt(25753,9680,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,9681,"ide_methods.bas");}while(r); S_46010:; dl_continue_5077:; }while((!(*_FUNC_IDEELEMENTWATCHBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5077:; if(qbevent){evnt(25753,9682,"ide_methods.bas");if(r)goto S_46010;} S_46011:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,9683,"ide_methods.bas");if(r)goto S_46011;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,9683,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,9683,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9685,"ide_methods.bas");}while(r); S_46017:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,9686,"ide_methods.bas");if(r)goto S_46017;} S_46018:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,9687,"ide_methods.bas");if(r)goto S_46018;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9688,"ide_methods.bas");}while(r); S_46020:; if (((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,9689,"ide_methods.bas");if(r)goto S_46020;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEELEMENTWATCHBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9689,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,9692,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,9692,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,9692,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,9696,"ide_methods.bas");}while(r); S_46029:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,9697,"ide_methods.bas");if(r)goto S_46029;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9697,"ide_methods.bas");}while(r); } S_46032:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,9698,"ide_methods.bas");if(r)goto S_46032;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS=*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,9698,"ide_methods.bas");}while(r); } S_46035:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,9699,"ide_methods.bas");if(r)goto S_46035;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS=*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,9699,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9699,"ide_methods.bas");}while(r); } S_46039:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,9700,"ide_methods.bas");if(r)goto S_46039;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS=*_FUNC_IDEELEMENTWATCHBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,9700,"ide_methods.bas");}while(r); } S_46042:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS>*_FUNC_IDEELEMENTWATCHBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,9701,"ide_methods.bas");if(r)goto S_46042;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,9701,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,9702,"ide_methods.bas");}while(r); S_46046:; fornext_value5080= 1 ; fornext_finalvalue5080= 100 ; fornext_step5080= 1 ; if (fornext_step5080<0) fornext_step_negative5080=1; else fornext_step_negative5080=0; if (new_error) goto fornext_error5080; goto fornext_entrylabel5080; while(1){ fornext_value5080=fornext_step5080+(*_FUNC_IDEELEMENTWATCHBOX_LONG_I); fornext_entrylabel5080: *_FUNC_IDEELEMENTWATCHBOX_LONG_I=fornext_value5080; if (fornext_step_negative5080){ if (fornext_value5080fornext_finalvalue5080) break; } fornext_error5080:; if(qbevent){evnt(25753,9703,"ide_methods.bas");if(r)goto S_46046;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,9704,"ide_methods.bas");}while(r); S_46048:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,9705,"ide_methods.bas");if(r)goto S_46048;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUSOFFSET=*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS-*_FUNC_IDEELEMENTWATCHBOX_LONG_F; if(!qbevent)break;evnt(25753,9706,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS,_FUNC_IDEELEMENTWATCHBOX_LONG_F,_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEELEMENTWATCHBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEELEMENTWATCHBOX_LONG_MOUSEDOWN,_FUNC_IDEELEMENTWATCHBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEELEMENTWATCHBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9707,"ide_methods.bas");}while(r); } fornext_continue_5079:; } fornext_exit_5079:; S_46053:; if ((((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,9711,"ide_methods.bas");if(r)goto S_46053;} S_46054:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9712,"ide_methods.bas");if(r)goto S_46054;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,9714,"ide_methods.bas");}while(r); S_46056:; if (((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y<=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS)))||new_error){ if(qbevent){evnt(25753,9715,"ide_methods.bas");if(r)goto S_46056;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_TOGGLEANDRETURN= -1 ; if(!qbevent)break;evnt(25753,9716,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=151; if (next_return_point>=return_points) more_return_points(); goto LABEL_TOGGLEWATCH; RETURN_151:; if(!qbevent)break;evnt(25753,9716,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_TOGGLEANDRETURN= 0 ; if(!qbevent)break;evnt(25753,9716,"ide_methods.bas");}while(r); do{ goto LABEL_BUILDLISTTORETURN; if(!qbevent)break;evnt(25753,9717,"ide_methods.bas");}while(r); } }else{ S_46063:; fornext_value5082= 1 ; fornext_finalvalue5082=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS; fornext_step5082= 1 ; if (fornext_step5082<0) fornext_step_negative5082=1; else fornext_step_negative5082=0; if (new_error) goto fornext_error5082; goto fornext_entrylabel5082; while(1){ fornext_value5082=fornext_step5082+(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y); fornext_entrylabel5082: *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=fornext_value5082; if (fornext_step_negative5082){ if (fornext_value5082fornext_finalvalue5082) break; } fornext_error5082:; if(qbevent){evnt(25753,9721,"ide_methods.bas");if(r)goto S_46063;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,*((qbs**)((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9722,"ide_methods.bas");}while(r); S_46065:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,9723,"ide_methods.bas");if(r)goto S_46065;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9723,"ide_methods.bas");}while(r); } S_46068:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,9724,"ide_methods.bas");if(r)goto S_46068;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9724,"ide_methods.bas");}while(r); } S_46071:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_NATIVEDATATYPES,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,0)> 0 )))||new_error){ if(qbevent){evnt(25753,9725,"ide_methods.bas");if(r)goto S_46071;} do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))= -1 ; if(!qbevent)break;evnt(25753,9726,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long=*_FUNC_IDEELEMENTWATCHBOX_LONG_VARIABLENAMECOLOR; 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(25753,9727,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long=*_FUNC_IDEELEMENTWATCHBOX_LONG_TYPECOLUMNCOLOR; 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(25753,9728,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long=*_FUNC_IDEELEMENTWATCHBOX_LONG_SELECTEDBG; 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(25753,9729,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); if (!new_error){ tmp_long= 43 ; 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(25753,9730,"ide_methods.bas");}while(r); } fornext_continue_5081:; } fornext_exit_5081:; } do{ goto dl_continue_5073; if(!qbevent)break;evnt(25753,9734,"ide_methods.bas");}while(r); } S_46082:; if ((((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,9737,"ide_methods.bas");if(r)goto S_46082;} S_46083:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9738,"ide_methods.bas");if(r)goto S_46083;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK= -3 ; if(!qbevent)break;evnt(25753,9740,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9741,"ide_methods.bas");}while(r); }else{ S_46087:; fornext_value5084= 1 ; fornext_finalvalue5084=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS; fornext_step5084= 1 ; if (fornext_step5084<0) fornext_step_negative5084=1; else fornext_step_negative5084=0; if (new_error) goto fornext_error5084; goto fornext_entrylabel5084; while(1){ fornext_value5084=fornext_step5084+(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y); fornext_entrylabel5084: *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=fornext_value5084; if (fornext_step_negative5084){ if (fornext_value5084fornext_finalvalue5084) break; } fornext_error5084:; if(qbevent){evnt(25753,9744,"ide_methods.bas");if(r)goto S_46087;} do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))= 0 ; if(!qbevent)break;evnt(25753,9745,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long= 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(25753,9746,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long= 2 ; 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(25753,9747,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long= 17 ; 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(25753,9748,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); 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(25753,9749,"ide_methods.bas");}while(r); fornext_continue_5083:; } fornext_exit_5083:; } do{ goto dl_continue_5073; if(!qbevent)break;evnt(25753,9752,"ide_methods.bas");}while(r); } S_46097:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,9755,"ide_methods.bas");if(r)goto S_46097;} S_46098:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9756,"ide_methods.bas");if(r)goto S_46098;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK= -4 ; if(!qbevent)break;evnt(25753,9757,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9758,"ide_methods.bas");}while(r); }else{ LABEL_BUILDLISTTORETURN:; if(qbevent){evnt(25753,9761,"ide_methods.bas");r=0;} S_46102:; fornext_value5086= 1 ; fornext_finalvalue5086=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS; fornext_step5086= 1 ; if (fornext_step5086<0) fornext_step_negative5086=1; else fornext_step_negative5086=0; if (new_error) goto fornext_error5086; goto fornext_entrylabel5086; while(1){ fornext_value5086=fornext_step5086+(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y); fornext_entrylabel5086: *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=fornext_value5086; if (fornext_step_negative5086){ if (fornext_value5086fornext_finalvalue5086) break; } fornext_error5086:; if(qbevent){evnt(25753,9762,"ide_methods.bas");if(r)goto S_46102;} S_46103:; if ((*(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24)))||new_error){ if(qbevent){evnt(25753,9763,"ide_methods.bas");if(r)goto S_46103;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,*((qbs**)((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9764,"ide_methods.bas");}while(r); S_46105:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,9765,"ide_methods.bas");if(r)goto S_46105;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9765,"ide_methods.bas");}while(r); } S_46108:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,9766,"ide_methods.bas");if(r)goto S_46108;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9766,"ide_methods.bas");}while(r); } S_46111:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_NATIVEDATATYPES,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,0)> 0 )))||new_error){ if(qbevent){evnt(25753,9767,"ide_methods.bas");if(r)goto S_46111;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_THISNAME,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[(array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9769,"ide_methods.bas");}while(r); S_46113:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST->len))||new_error){ if(qbevent){evnt(25753,9770,"ide_methods.bas");if(r)goto S_46113;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,__STRING1_SP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9770,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,qbs_add(qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,_FUNC_IDEELEMENTWATCHBOX_STRING_CURRENTPATH),_FUNC_IDEELEMENTWATCHBOX_STRING_THISNAME)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9771,"ide_methods.bas");}while(r); } } fornext_continue_5085:; } fornext_exit_5085:; S_46120:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9776,"ide_methods.bas");if(r)goto S_46120;} S_46121:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST->len> 0 )))||new_error){ if(qbevent){evnt(25753,9777,"ide_methods.bas");if(r)goto S_46121;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK= -2 ; if(!qbevent)break;evnt(25753,9778,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK= 0 ; if(!qbevent)break;evnt(25753,9780,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK=-(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST->len> 0 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9783,"ide_methods.bas");}while(r); } S_46129:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_LEVEL== 0 ))||new_error){ if(qbevent){evnt(25753,9785,"ide_methods.bas");if(r)goto S_46129;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,FUNC_STRREPLACE(_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST,_FUNC_IDEELEMENTWATCHBOX_STRING_CURRENTPATH,qbs_new_txt_len(".",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9785,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_IDEELEMENTWATCHBOX,_FUNC_IDEELEMENTWATCHBOX_STRING_RETURNLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9786,"ide_methods.bas");}while(r); } do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,9789,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9790,"ide_methods.bas");}while(r); } S_46137:; if ((*__LONG_MCLICK&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS== 1 )))||new_error){ if(qbevent){evnt(25753,9793,"ide_methods.bas");if(r)goto S_46137;} S_46138:; if (((-(((float)(FUNC_TIMEELAPSEDSINCE(_FUNC_IDEELEMENTWATCHBOX_SINGLE_LASTCLICK)))<((float)( 0.3E+0 ))))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_CLICKEDITEM==*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64)))))||new_error){ if(qbevent){evnt(25753,9794,"ide_methods.bas");if(r)goto S_46138;} S_46139:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION== 0 ))||new_error){ if(qbevent){evnt(25753,9795,"ide_methods.bas");if(r)goto S_46139;} do{ goto LABEL_TOGGLEWATCH; if(!qbevent)break;evnt(25753,9796,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,9798,"ide_methods.bas");}while(r); S_46143:; if (((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y<=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS)))||new_error){ if(qbevent){evnt(25753,9799,"ide_methods.bas");if(r)goto S_46143;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_TOGGLEANDRETURN= -1 ; if(!qbevent)break;evnt(25753,9800,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=152; if (next_return_point>=return_points) more_return_points(); goto LABEL_TOGGLEWATCH; RETURN_152:; if(!qbevent)break;evnt(25753,9800,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_TOGGLEANDRETURN= 0 ; if(!qbevent)break;evnt(25753,9800,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,9801,"ide_methods.bas");}while(r); do{ goto LABEL_BUILDLISTTORETURN; if(!qbevent)break;evnt(25753,9802,"ide_methods.bas");}while(r); } } } do{ *_FUNC_IDEELEMENTWATCHBOX_SINGLE_LASTCLICK=func_timer(NULL,0); if(!qbevent)break;evnt(25753,9806,"ide_methods.bas");}while(r); S_46153:; if ((-(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64))> 0 ))||new_error){ if(qbevent){evnt(25753,9807,"ide_methods.bas");if(r)goto S_46153;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_CLICKEDITEM=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,9807,"ide_methods.bas");}while(r); } do{ goto dl_continue_5073; if(!qbevent)break;evnt(25753,9808,"ide_methods.bas");}while(r); } S_46158:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_FOCUS== 1 )))))||new_error){ if(qbevent){evnt(25753,9811,"ide_methods.bas");if(r)goto S_46158;} do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9812,"ide_methods.bas");}while(r); LABEL_TOGGLEWATCH:; if(qbevent){evnt(25753,9813,"ide_methods.bas");r=0;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,9814,"ide_methods.bas");}while(r); S_46161:; if (((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDEELEMENTWATCHBOX_LONG_Y<=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS)))||new_error){ if(qbevent){evnt(25753,9816,"ide_methods.bas");if(r)goto S_46161;} S_46162:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9817,"ide_methods.bas");if(r)goto S_46162;} do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))= -1 ; if(!qbevent)break;evnt(25753,9818,"ide_methods.bas");}while(r); }else{ do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))=~(*(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))); if(!qbevent)break;evnt(25753,9820,"ide_methods.bas");}while(r); } S_46167:; if ((*(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24)))||new_error){ if(qbevent){evnt(25753,9822,"ide_methods.bas");if(r)goto S_46167;} S_46168:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION)||new_error){ if(qbevent){evnt(25753,9823,"ide_methods.bas");if(r)goto S_46168;} S_46169:; fornext_value5091= 1 ; fornext_finalvalue5091=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS; fornext_step5091= 1 ; if (fornext_step5091<0) fornext_step_negative5091=1; else fornext_step_negative5091=0; if (new_error) goto fornext_error5091; goto fornext_entrylabel5091; while(1){ fornext_value5091=fornext_step5091+(*_FUNC_IDEELEMENTWATCHBOX_LONG_I); fornext_entrylabel5091: *_FUNC_IDEELEMENTWATCHBOX_LONG_I=fornext_value5091; if (fornext_step_negative5091){ if (fornext_value5091fornext_finalvalue5091) break; } fornext_error5091:; if(qbevent){evnt(25753,9824,"ide_methods.bas");if(r)goto S_46169;} S_46170:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_I==*_FUNC_IDEELEMENTWATCHBOX_LONG_Y))||new_error){ if(qbevent){evnt(25753,9825,"ide_methods.bas");if(r)goto S_46170;} do{ goto fornext_continue_5090; if(!qbevent)break;evnt(25753,9825,"ide_methods.bas");}while(r); } do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))= 0 ; if(!qbevent)break;evnt(25753,9826,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long= 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(25753,9827,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long= 2 ; 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(25753,9828,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long= 17 ; 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(25753,9829,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); 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(25753,9830,"ide_methods.bas");}while(r); fornext_continue_5090:; } fornext_exit_5090:; } do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,*((qbs**)((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9834,"ide_methods.bas");}while(r); S_46181:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING *",8),0)))||new_error){ if(qbevent){evnt(25753,9835,"ide_methods.bas");if(r)goto S_46181;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("STRING",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9835,"ide_methods.bas");}while(r); } S_46184:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("BIT *",5),0)))||new_error){ if(qbevent){evnt(25753,9836,"ide_methods.bas");if(r)goto S_46184;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,qbs_new_txt_len("_BIT",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9836,"ide_methods.bas");}while(r); } S_46187:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_NATIVEDATATYPES,_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE,0)== 0 )))||new_error){ if(qbevent){evnt(25753,9837,"ide_methods.bas");if(r)goto S_46187;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9839,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_THISUDT= 0 ; if(!qbevent)break;evnt(25753,9840,"ide_methods.bas");}while(r); do{ *__LONG_E= 0 ; if(!qbevent)break;evnt(25753,9841,"ide_methods.bas");}while(r); S_46191:; fornext_value5093= 1 ; fornext_finalvalue5093=*__LONG_LASTTYPE; fornext_step5093= 1 ; if (fornext_step5093<0) fornext_step_negative5093=1; else fornext_step_negative5093=0; if (new_error) goto fornext_error5093; goto fornext_entrylabel5093; while(1){ fornext_value5093=fornext_step5093+(*_FUNC_IDEELEMENTWATCHBOX_LONG_I); fornext_entrylabel5093: *_FUNC_IDEELEMENTWATCHBOX_LONG_I=fornext_value5093; if (fornext_step_negative5093){ if (fornext_value5093fornext_finalvalue5093) break; } fornext_error5093:; if(qbevent){evnt(25753,9842,"ide_methods.bas");if(r)goto S_46191;} S_46192:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTXCNAME[0]))[(array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-__ARRAY_STRING256_UDTXCNAME[4],__ARRAY_STRING256_UDTXCNAME[5]))*256],256,1)),_FUNC_IDEELEMENTWATCHBOX_STRING_VARTYPE)))||new_error){ if(qbevent){evnt(25753,9843,"ide_methods.bas");if(r)goto S_46192;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_THISUDT=*_FUNC_IDEELEMENTWATCHBOX_LONG_I; if(!qbevent)break;evnt(25753,9843,"ide_methods.bas");}while(r); do{ goto fornext_exit_5092; if(!qbevent)break;evnt(25753,9843,"ide_methods.bas");}while(r); } fornext_continue_5092:; } fornext_exit_5092:; do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,9846,"ide_methods.bas");}while(r); S_46198:; do{ if(qbevent){evnt(25753,9847,"ide_methods.bas");if(r)goto S_46198;} S_46199:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(25753,9848,"ide_methods.bas");if(r)goto S_46199;} do{ *__LONG_E=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISUDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])]; if(!qbevent)break;evnt(25753,9848,"ide_methods.bas");}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(25753,9848,"ide_methods.bas");}while(r); } S_46204:; if ((-(*__LONG_E== 0 ))||new_error){ if(qbevent){evnt(25753,9849,"ide_methods.bas");if(r)goto S_46204;} do{ goto dl_exit_5094; if(!qbevent)break;evnt(25753,9849,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES2,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES2,l2string(*__LONG_E))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9850,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_I=*_FUNC_IDEELEMENTWATCHBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,9851,"ide_methods.bas");}while(r); dl_continue_5094:; }while(1); dl_exit_5094:; do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_V,FUNC_IDEELEMENTWATCHBOX(qbs_add(qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_CURRENTPATH,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[(array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)))-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]))*256],256,1))),qbs_new_txt_len(".",1)),_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES2,&(pass5095=*_FUNC_IDEELEMENTWATCHBOX_LONG_LEVEL+ 1 ),_FUNC_IDEELEMENTWATCHBOX_LONG_SINGLEELEMENTSELECTION,_FUNC_IDEELEMENTWATCHBOX_LONG_OK2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9853,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_OK=*_FUNC_IDEELEMENTWATCHBOX_LONG_OK2; if(!qbevent)break;evnt(25753,9854,"ide_methods.bas");}while(r); S_46212:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_OK2== -2 ))||new_error){ if(qbevent){evnt(25753,9855,"ide_methods.bas");if(r)goto S_46212;} do{ goto LABEL_BUILDLISTTORETURN; if(!qbevent)break;evnt(25753,9857,"ide_methods.bas");}while(r); S_46214:; }else{ if (-(*_FUNC_IDEELEMENTWATCHBOX_LONG_OK2== -3 )){ if(qbevent){evnt(25753,9858,"ide_methods.bas");if(r)goto S_46214;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9860,"ide_methods.bas");}while(r); S_46216:; }else{ if (-(*_FUNC_IDEELEMENTWATCHBOX_LONG_OK2== -4 )){ if(qbevent){evnt(25753,9861,"ide_methods.bas");if(r)goto S_46216;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_I=*_FUNC_IDEELEMENTWATCHBOX_LONG_Y; if(!qbevent)break;evnt(25753,9862,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))= 0 ; if(!qbevent)break;evnt(25753,9863,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long= 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(25753,9864,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long= 2 ; 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(25753,9865,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long= 17 ; 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(25753,9866,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_I)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); 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(25753,9867,"ide_methods.bas");}while(r); do{ goto dl_continue_5073; if(!qbevent)break;evnt(25753,9868,"ide_methods.bas");}while(r); } } } } do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long=*_FUNC_IDEELEMENTWATCHBOX_LONG_VARIABLENAMECOLOR; 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(25753,9872,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long=*_FUNC_IDEELEMENTWATCHBOX_LONG_TYPECOLUMNCOLOR; 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(25753,9873,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long=*_FUNC_IDEELEMENTWATCHBOX_LONG_SELECTEDBG; 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(25753,9874,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); if (!new_error){ tmp_long= 43 ; 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(25753,9875,"ide_methods.bas");}while(r); }else{ do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8)); if (!new_error){ tmp_long= 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(25753,9877,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12)); if (!new_error){ tmp_long= 2 ; 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(25753,9878,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4)); if (!new_error){ tmp_long= 17 ; 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(25753,9879,"ide_methods.bas");}while(r); do{ tqbs=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_VARLISTBOX)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])); if (!new_error){ tmp_fileno=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_Y)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16)); 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(25753,9880,"ide_methods.bas");}while(r); } } S_46237:; if ((*_FUNC_IDEELEMENTWATCHBOX_LONG_TOGGLEANDRETURN)||new_error){ if(qbevent){evnt(25753,9883,"ide_methods.bas");if(r)goto S_46237;} do{ #include "ret160.txt" if(!qbevent)break;evnt(25753,9883,"ide_methods.bas");}while(r); } do{ goto dl_continue_5073; if(!qbevent)break;evnt(25753,9884,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,9888,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,9889,"ide_methods.bas");}while(r); dl_continue_5073:; }while(1); dl_exit_5073:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,9892,"ide_methods.bas");}while(r); LABEL_BUILDLIST:; if(qbevent){evnt(25753,9894,"ide_methods.bas");r=0;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_MAXTYPELEN= 0 ; if(!qbevent)break;evnt(25753,9895,"ide_methods.bas");}while(r); S_46247:; fornext_value5097= 1 ; fornext_finalvalue5097=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS; fornext_step5097= 1 ; if (fornext_step5097<0) fornext_step_negative5097=1; else fornext_step_negative5097=0; if (new_error) goto fornext_error5097; goto fornext_entrylabel5097; while(1){ fornext_value5097=fornext_step5097+(*_FUNC_IDEELEMENTWATCHBOX_LONG_X); fornext_entrylabel5097: *_FUNC_IDEELEMENTWATCHBOX_LONG_X=fornext_value5097; if (fornext_step_negative5097){ if (fornext_value5097fornext_finalvalue5097) break; } fornext_error5097:; if(qbevent){evnt(25753,9896,"ide_methods.bas");if(r)goto S_46247;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE=string2l(func_mid(_FUNC_IDEELEMENTWATCHBOX_STRING_ELEMENTINDEXES,(*_FUNC_IDEELEMENTWATCHBOX_LONG_X* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9897,"ide_methods.bas");}while(r); S_46249:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[(array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]))*256],256,1)))->len)>*_FUNC_IDEELEMENTWATCHBOX_LONG_LONGESTNAME)))||new_error){ if(qbevent){evnt(25753,9898,"ide_methods.bas");if(r)goto S_46249;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_LONGESTNAME=((int32)(qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[(array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]))*256],256,1)))->len); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9898,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33))=*_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE; if(!qbevent)break;evnt(25753,9899,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+24))= 0 ; if(!qbevent)break;evnt(25753,9900,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(536))=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]; if(!qbevent)break;evnt(25753,9901,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)__UDT_ID)+(540))=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]; if(!qbevent)break;evnt(25753,9902,"ide_methods.bas");}while(r); S_46256:; if ((*(int32*)(((char*)__UDT_ID)+(536))&*__LONG_ISFIXEDLENGTH)||new_error){ if(qbevent){evnt(25753,9904,"ide_methods.bas");if(r)goto S_46256;} do{ *(int32*)(((char*)__UDT_ID)+(540))=((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISTYPE)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])]; if(!qbevent)break;evnt(25753,9905,"ide_methods.bas");}while(r); } do{ qbs_set(*((qbs**)((char*)(_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25))),FUNC_ID2FULLTYPENAME()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9908,"ide_methods.bas");}while(r); do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_THISLEN=(*(qbs**)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25)))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9909,"ide_methods.bas");}while(r); S_46261:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_THISLEN>*_FUNC_IDEELEMENTWATCHBOX_LONG_MAXTYPELEN))||new_error){ if(qbevent){evnt(25753,9910,"ide_methods.bas");if(r)goto S_46261;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_MAXTYPELEN=*_FUNC_IDEELEMENTWATCHBOX_LONG_THISLEN; if(!qbevent)break;evnt(25753,9910,"ide_methods.bas");}while(r); } fornext_continue_5096:; } fornext_exit_5096:; do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9913,"ide_methods.bas");}while(r); S_46266:; fornext_value5099= 1 ; fornext_finalvalue5099=*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS; fornext_step5099= 1 ; if (fornext_step5099<0) fornext_step_negative5099=1; else fornext_step_negative5099=0; if (new_error) goto fornext_error5099; goto fornext_entrylabel5099; while(1){ fornext_value5099=fornext_step5099+(*_FUNC_IDEELEMENTWATCHBOX_LONG_X); fornext_entrylabel5099: *_FUNC_IDEELEMENTWATCHBOX_LONG_X=fornext_value5099; if (fornext_step_negative5099){ if (fornext_value5099fornext_finalvalue5099) break; } fornext_error5099:; if(qbevent){evnt(25753,9914,"ide_methods.bas");if(r)goto S_46266;} do{ *_FUNC_IDEELEMENTWATCHBOX_LONG_THISELEMENT=*(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33)); if(!qbevent)break;evnt(25753,9915,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_L,func_chr( 17 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9916,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+4))=_FUNC_IDEELEMENTWATCHBOX_STRING_L->len+ 1 ; if(!qbevent)break;evnt(25753,9917,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_L,func_chr( 17 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9918,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_L,func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9920,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+8))=_FUNC_IDEELEMENTWATCHBOX_STRING_L->len+ 1 ; if(!qbevent)break;evnt(25753,9921,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+16))=_FUNC_IDEELEMENTWATCHBOX_STRING_L->len+ 2 ; if(!qbevent)break;evnt(25753,9922,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_L,func_chr( 16 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9923,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_THISNAME,qbs_rtrim(qbs_new_fixed(&((uint8*)(__ARRAY_STRING256_UDTECNAME[0]))[(array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_THISELEMENT)-__ARRAY_STRING256_UDTECNAME[4],__ARRAY_STRING256_UDTECNAME[5]))*256],256,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9925,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_THISNAME,func_chr( 16 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9926,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+12))=_FUNC_IDEELEMENTWATCHBOX_STRING_L->len+_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT->len+ 1 ; if(!qbevent)break;evnt(25753,9927,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,qbs_add(qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,func_chr( 2 )),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9928,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,func_space(*_FUNC_IDEELEMENTWATCHBOX_LONG_LONGESTNAME-_FUNC_IDEELEMENTWATCHBOX_STRING_THISNAME->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9929,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,qbs_add(qbs_add(qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT,qbs_new_txt_len(" ",1)),*((qbs**)((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0]+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25)))),func_space(*_FUNC_IDEELEMENTWATCHBOX_LONG_MAXTYPELEN-(*(qbs**)(((char*)_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[0])+((array_check((*_FUNC_IDEELEMENTWATCHBOX_LONG_X)-_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[4],_FUNC_IDEELEMENTWATCHBOX_ARRAY_UDT_VARDLGLIST[5]))*33+25)))->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9930,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_L,_FUNC_IDEELEMENTWATCHBOX_STRING_TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9932,"ide_methods.bas");}while(r); S_46282:; if ((-(*_FUNC_IDEELEMENTWATCHBOX_LONG_X<*_FUNC_IDEELEMENTWATCHBOX_LONG_TOTALELEMENTS))||new_error){ if(qbevent){evnt(25753,9933,"ide_methods.bas");if(r)goto S_46282;} do{ qbs_set(_FUNC_IDEELEMENTWATCHBOX_STRING_L,qbs_add(_FUNC_IDEELEMENTWATCHBOX_STRING_L,_FUNC_IDEELEMENTWATCHBOX_STRING1_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9933,"ide_methods.bas");}while(r); } fornext_continue_5098:; } fornext_exit_5098:; do{ #include "ret160.txt" if(!qbevent)break;evnt(25753,9935,"ide_methods.bas");}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_IDEELEMENTWATCHBOX_STRING_IDEELEMENTWATCHBOX);return _FUNC_IDEELEMENTWATCHBOX_STRING_IDEELEMENTWATCHBOX; } qbs* FUNC_FORMATRANGE(qbs*_FUNC_FORMATRANGE_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 "data161.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_FORMATRANGE_STRING_TEMP,_FUNC_FORMATRANGE_STRING___TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9940,"ide_methods.bas");}while(r); do{ *_FUNC_FORMATRANGE_LONG_V1= -1 ; if(!qbevent)break;evnt(25753,9941,"ide_methods.bas");}while(r); do{ *_FUNC_FORMATRANGE_LONG_V2= -1 ; if(!qbevent)break;evnt(25753,9942,"ide_methods.bas");}while(r); S_46290:; fornext_value5108= 1 ; fornext_finalvalue5108=_FUNC_FORMATRANGE_STRING_TEMP->len/ 4 ; fornext_step5108= 1 ; if (fornext_step5108<0) fornext_step_negative5108=1; else fornext_step_negative5108=0; if (new_error) goto fornext_error5108; goto fornext_entrylabel5108; while(1){ fornext_value5108=fornext_step5108+(*_FUNC_FORMATRANGE_LONG_I); fornext_entrylabel5108: *_FUNC_FORMATRANGE_LONG_I=fornext_value5108; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5108){ if (fornext_value5108fornext_finalvalue5108) break; } fornext_error5108:; if(qbevent){evnt(25753,9943,"ide_methods.bas");if(r)goto S_46290;} do{ *_FUNC_FORMATRANGE_LONG_V=string2l(func_mid(_FUNC_FORMATRANGE_STRING_TEMP,(*_FUNC_FORMATRANGE_LONG_I* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9944,"ide_methods.bas");}while(r); S_46292:; if ((-(*_FUNC_FORMATRANGE_LONG_V1== -1 ))||new_error){ if(qbevent){evnt(25753,9945,"ide_methods.bas");if(r)goto S_46292;} do{ *_FUNC_FORMATRANGE_LONG_V1=*_FUNC_FORMATRANGE_LONG_V; if(!qbevent)break;evnt(25753,9946,"ide_methods.bas");}while(r); }else{ S_46295:; if (((-(*_FUNC_FORMATRANGE_LONG_V==(*_FUNC_FORMATRANGE_LONG_V1+ 1 )))|(-(*_FUNC_FORMATRANGE_LONG_V==(*_FUNC_FORMATRANGE_LONG_V2+ 1 ))))||new_error){ if(qbevent){evnt(25753,9948,"ide_methods.bas");if(r)goto S_46295;} do{ *_FUNC_FORMATRANGE_LONG_V2=*_FUNC_FORMATRANGE_LONG_V; if(!qbevent)break;evnt(25753,9949,"ide_methods.bas");}while(r); }else{ S_46298:; if ((-(*_FUNC_FORMATRANGE_LONG_V2== -1 ))||new_error){ if(qbevent){evnt(25753,9951,"ide_methods.bas");if(r)goto S_46298;} do{ qbs_set(_FUNC_FORMATRANGE_STRING_A2,qbs_add(qbs_add(_FUNC_FORMATRANGE_STRING_A2,qbs_ltrim(qbs_str((int32)(*_FUNC_FORMATRANGE_LONG_V1)))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9952,"ide_methods.bas");}while(r); do{ *_FUNC_FORMATRANGE_LONG_V1=*_FUNC_FORMATRANGE_LONG_V; if(!qbevent)break;evnt(25753,9953,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_FORMATRANGE_STRING_A2,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_FORMATRANGE_STRING_A2,qbs_ltrim(qbs_str((int32)(*_FUNC_FORMATRANGE_LONG_V1)))),qbs_new_txt_len("-",1)),qbs_ltrim(qbs_str((int32)(*_FUNC_FORMATRANGE_LONG_V2)))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9955,"ide_methods.bas");}while(r); do{ *_FUNC_FORMATRANGE_LONG_V1=*_FUNC_FORMATRANGE_LONG_V; if(!qbevent)break;evnt(25753,9956,"ide_methods.bas");}while(r); do{ *_FUNC_FORMATRANGE_LONG_V2= -1 ; if(!qbevent)break;evnt(25753,9957,"ide_methods.bas");}while(r); } } } fornext_continue_5107:; } fornext_exit_5107:; S_46309:; if (((-(*_FUNC_FORMATRANGE_LONG_V1!= -1 ))&(-(*_FUNC_FORMATRANGE_LONG_V2== -1 )))||new_error){ if(qbevent){evnt(25753,9962,"ide_methods.bas");if(r)goto S_46309;} do{ qbs_set(_FUNC_FORMATRANGE_STRING_A2,qbs_add(_FUNC_FORMATRANGE_STRING_A2,qbs_ltrim(qbs_str((int32)(*_FUNC_FORMATRANGE_LONG_V1))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9962,"ide_methods.bas");}while(r); } S_46312:; if (((-(*_FUNC_FORMATRANGE_LONG_V1!= -1 ))&(-(*_FUNC_FORMATRANGE_LONG_V2!= -1 )))||new_error){ if(qbevent){evnt(25753,9963,"ide_methods.bas");if(r)goto S_46312;} do{ qbs_set(_FUNC_FORMATRANGE_STRING_A2,qbs_add(qbs_add(qbs_add(_FUNC_FORMATRANGE_STRING_A2,qbs_ltrim(qbs_str((int32)(*_FUNC_FORMATRANGE_LONG_V1)))),qbs_new_txt_len("-",1)),qbs_ltrim(qbs_str((int32)(*_FUNC_FORMATRANGE_LONG_V2))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9963,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_FORMATRANGE_STRING_FORMATRANGE,_FUNC_FORMATRANGE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9964,"ide_methods.bas");}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; qbs_maketmp(_FUNC_FORMATRANGE_STRING_FORMATRANGE);return _FUNC_FORMATRANGE_STRING_FORMATRANGE; } qbs* FUNC_EXPANDARRAY(qbs*_FUNC_EXPANDARRAY_STRING___INDEXES,qbs*_FUNC_EXPANDARRAY_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 "data162.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,9968,"ide_methods.bas");}while(r); S_46317:; if ((-(*_FUNC_EXPANDARRAY_LONG_THISLEVEL== 0 ))||new_error){ if(qbevent){evnt(25753,9970,"ide_methods.bas");if(r)goto S_46317;} do{ qbs_set(_FUNC_EXPANDARRAY_STRING_RETURNVALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9971,"ide_methods.bas");}while(r); } do{ *_FUNC_EXPANDARRAY_LONG_THISLEVEL=*_FUNC_EXPANDARRAY_LONG_THISLEVEL+ 1 ; if(!qbevent)break;evnt(25753,9974,"ide_methods.bas");}while(r); do{ *_FUNC_EXPANDARRAY_LONG_TOTALINDEXES=string2l(qbs_left(_FUNC_EXPANDARRAY_STRING___INDEXES, 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9976,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_EXPANDARRAY_STRING_INDEXES,func_mid(_FUNC_EXPANDARRAY_STRING___INDEXES, 5 ,*_FUNC_EXPANDARRAY_LONG_TOTALINDEXES,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9977,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_EXPANDARRAY_STRING_REMAININGINDEXES,func_mid(_FUNC_EXPANDARRAY_STRING___INDEXES, 5 +*_FUNC_EXPANDARRAY_LONG_TOTALINDEXES,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9978,"ide_methods.bas");}while(r); do{ *_FUNC_EXPANDARRAY_LONG_TOTALINDEXES=*_FUNC_EXPANDARRAY_LONG_TOTALINDEXES/ 4 ; if(!qbevent)break;evnt(25753,9979,"ide_methods.bas");}while(r); S_46325:; fornext_value5113= 1 ; fornext_finalvalue5113=*_FUNC_EXPANDARRAY_LONG_TOTALINDEXES; fornext_step5113= 1 ; if (fornext_step5113<0) fornext_step_negative5113=1; else fornext_step_negative5113=0; if (new_error) goto fornext_error5113; goto fornext_entrylabel5113; while(1){ fornext_value5113=fornext_step5113+(*_FUNC_EXPANDARRAY_LONG_I); fornext_entrylabel5113: *_FUNC_EXPANDARRAY_LONG_I=fornext_value5113; if (fornext_step_negative5113){ if (fornext_value5113fornext_finalvalue5113) break; } fornext_error5113:; if(qbevent){evnt(25753,9981,"ide_methods.bas");if(r)goto S_46325;} do{ qbs_set(_FUNC_EXPANDARRAY_STRING_TEMP,qbs_add(_FUNC_EXPANDARRAY_STRING___PATH,func_mid(_FUNC_EXPANDARRAY_STRING_INDEXES,(*_FUNC_EXPANDARRAY_LONG_I* 4 )-( 3 ), 4 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9982,"ide_methods.bas");}while(r); S_46327:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_EXPANDARRAY_STRING_REMAININGINDEXES->len))||new_error){ if(qbevent){evnt(25753,9983,"ide_methods.bas");if(r)goto S_46327;} do{ qbs_set(_FUNC_EXPANDARRAY_STRING_TEMP,FUNC_EXPANDARRAY(_FUNC_EXPANDARRAY_STRING_REMAININGINDEXES,_FUNC_EXPANDARRAY_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9984,"ide_methods.bas");}while(r); } S_46330:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_EXPANDARRAY_STRING_TEMP->len))||new_error){ if(qbevent){evnt(25753,9986,"ide_methods.bas");if(r)goto S_46330;} do{ qbs_set(_FUNC_EXPANDARRAY_STRING_RETURNVALUE,qbs_add(qbs_add(_FUNC_EXPANDARRAY_STRING_RETURNVALUE,l2string(_FUNC_EXPANDARRAY_STRING_TEMP->len)),_FUNC_EXPANDARRAY_STRING_TEMP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9987,"ide_methods.bas");}while(r); } fornext_continue_5112:; } fornext_exit_5112:; do{ *_FUNC_EXPANDARRAY_LONG_THISLEVEL=*_FUNC_EXPANDARRAY_LONG_THISLEVEL- 1 ; if(!qbevent)break;evnt(25753,9991,"ide_methods.bas");}while(r); S_46335:; if ((-(*_FUNC_EXPANDARRAY_LONG_THISLEVEL== 0 ))||new_error){ if(qbevent){evnt(25753,9993,"ide_methods.bas");if(r)goto S_46335;} do{ qbs_set(_FUNC_EXPANDARRAY_STRING_EXPANDARRAY,_FUNC_EXPANDARRAY_STRING_RETURNVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,9994,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free162.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_EXPANDARRAY_STRING_EXPANDARRAY);return _FUNC_EXPANDARRAY_STRING_EXPANDARRAY; } qbs* FUNC_PARSERANGE(qbs*_FUNC_PARSERANGE_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 "data163.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_46338:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs__trim(_FUNC_PARSERANGE_STRING___TEXT))->len)== 0 )))||new_error){ if(qbevent){evnt(25753,10004,"ide_methods.bas");if(r)goto S_46338;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10004,"ide_methods.bas");}while(r); } do{ if(!qbevent)break;evnt(25753,10006,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_PARSERANGE_STRING_FILTER,qbs__trim(_FUNC_PARSERANGE_STRING___TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10008,"ide_methods.bas");}while(r); do{ *_FUNC_PARSERANGE_LONG_J=func_instr(NULL,_FUNC_PARSERANGE_STRING_FILTER,qbs_new_txt_len("-",1),0)+func_instr(NULL,_FUNC_PARSERANGE_STRING_FILTER,qbs_new_txt_len(";",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10009,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_PARSERANGE_STRING_TEMP,func_space( 1000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10010,"ide_methods.bas");}while(r); S_46345:; if ((-(*_FUNC_PARSERANGE_LONG_J== 0 ))||new_error){ if(qbevent){evnt(25753,10012,"ide_methods.bas");if(r)goto S_46345;} do{ qbs_set(_FUNC_PARSERANGE_STRING_PARSERANGE,l2string(qbr(func_val(_FUNC_PARSERANGE_STRING_FILTER)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10013,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10014,"ide_methods.bas");}while(r); } do{ *_FUNC_PARSERANGE_LONG_READING= 1 ; if(!qbevent)break;evnt(25753,10017,"ide_methods.bas");}while(r); S_46350:; fornext_value5119= 1 ; fornext_finalvalue5119=_FUNC_PARSERANGE_STRING_FILTER->len; fornext_step5119= 1 ; if (fornext_step5119<0) fornext_step_negative5119=1; else fornext_step_negative5119=0; if (new_error) goto fornext_error5119; goto fornext_entrylabel5119; while(1){ fornext_value5119=fornext_step5119+(*_FUNC_PARSERANGE_LONG_J); fornext_entrylabel5119: *_FUNC_PARSERANGE_LONG_J=fornext_value5119; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5119){ if (fornext_value5119fornext_finalvalue5119) break; } fornext_error5119:; if(qbevent){evnt(25753,10018,"ide_methods.bas");if(r)goto S_46350;} do{ *_FUNC_PARSERANGE_LONG_V=qbs_asc(_FUNC_PARSERANGE_STRING_FILTER,*_FUNC_PARSERANGE_LONG_J); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10019,"ide_methods.bas");}while(r); S_46352:; if(qbevent){evnt(25753,10020,"ide_methods.bas");if(r)goto S_46352;} S_46353:; if (((*_FUNC_PARSERANGE_LONG_V==( 59 )))||new_error){ if(qbevent){evnt(25753,10021,"ide_methods.bas");if(r)goto S_46353;} do{ *_FUNC_PARSERANGE_LONG_READING= 1 ; if(!qbevent)break;evnt(25753,10022,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=153; if (next_return_point>=return_points) more_return_points(); goto LABEL_PARSEIT; RETURN_153:; if(!qbevent)break;evnt(25753,10023,"ide_methods.bas");}while(r); sc_ec_331_end:; goto sc_5121_end; } S_46356:; if (((*_FUNC_PARSERANGE_LONG_V==( 45 )))||new_error){ if(qbevent){evnt(25753,10024,"ide_methods.bas");if(r)goto S_46356;} S_46357:; if ((-(*_FUNC_PARSERANGE_LONG_PREVCHAR!= 45 ))||new_error){ if(qbevent){evnt(25753,10025,"ide_methods.bas");if(r)goto S_46357;} do{ *_FUNC_PARSERANGE_LONG_READING=*_FUNC_PARSERANGE_LONG_READING+ 1 ; if(!qbevent)break;evnt(25753,10026,"ide_methods.bas");}while(r); S_46359:; if ((-(*_FUNC_PARSERANGE_LONG_READING== 2 ))||new_error){ if(qbevent){evnt(25753,10027,"ide_methods.bas");if(r)goto S_46359;} S_46360:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_PARSERANGE_LONG_J==_FUNC_PARSERANGE_STRING_FILTER->len)))||new_error){ if(qbevent){evnt(25753,10028,"ide_methods.bas");if(r)goto S_46360;} do{ return_point[next_return_point++]=154; if (next_return_point>=return_points) more_return_points(); goto LABEL_PARSEIT; RETURN_154:; if(!qbevent)break;evnt(25753,10028,"ide_methods.bas");}while(r); } } } sc_ec_332_end:; goto sc_5121_end; } S_46365:; if ((((*_FUNC_PARSERANGE_LONG_V>=( 48 ))&&(*_FUNC_PARSERANGE_LONG_V<=( 57 ))))||new_error){ if(qbevent){evnt(25753,10031,"ide_methods.bas");if(r)goto S_46365;} S_46366:; if ((-(*_FUNC_PARSERANGE_LONG_READING== 1 ))||new_error){ if(qbevent){evnt(25753,10032,"ide_methods.bas");if(r)goto S_46366;} do{ qbs_set(_FUNC_PARSERANGE_STRING_V1,qbs_add(_FUNC_PARSERANGE_STRING_V1,func_chr(*_FUNC_PARSERANGE_LONG_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10033,"ide_methods.bas");}while(r); S_46368:; }else{ if (-(*_FUNC_PARSERANGE_LONG_READING== 2 )){ if(qbevent){evnt(25753,10034,"ide_methods.bas");if(r)goto S_46368;} do{ qbs_set(_FUNC_PARSERANGE_STRING_V2,qbs_add(_FUNC_PARSERANGE_STRING_V2,func_chr(*_FUNC_PARSERANGE_LONG_V))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10035,"ide_methods.bas");}while(r); } } S_46371:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_PARSERANGE_LONG_J==_FUNC_PARSERANGE_STRING_FILTER->len)))||new_error){ if(qbevent){evnt(25753,10037,"ide_methods.bas");if(r)goto S_46371;} do{ return_point[next_return_point++]=155; if (next_return_point>=return_points) more_return_points(); goto LABEL_PARSEIT; RETURN_155:; if(!qbevent)break;evnt(25753,10037,"ide_methods.bas");}while(r); } sc_ec_333_end:; goto sc_5121_end; } sc_5121_end:; do{ *_FUNC_PARSERANGE_LONG_PREVCHAR=*_FUNC_PARSERANGE_LONG_V; if(!qbevent)break;evnt(25753,10039,"ide_methods.bas");}while(r); fornext_continue_5118:; } fornext_exit_5118:; do{ qbs_set(_FUNC_PARSERANGE_STRING_RETURNVALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10042,"ide_methods.bas");}while(r); S_46378:; if ((*_FUNC_PARSERANGE_BYTE_ZEROINCLUDED)||new_error){ if(qbevent){evnt(25753,10043,"ide_methods.bas");if(r)goto S_46378;} do{ qbs_set(_FUNC_PARSERANGE_STRING_RETURNVALUE,l2string( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10043,"ide_methods.bas");}while(r); } S_46381:; fornext_value5125= 1 ; fornext_finalvalue5125=_FUNC_PARSERANGE_STRING_TEMP->len; fornext_step5125= 1 ; if (fornext_step5125<0) fornext_step_negative5125=1; else fornext_step_negative5125=0; if (new_error) goto fornext_error5125; goto fornext_entrylabel5125; while(1){ fornext_value5125=fornext_step5125+(*_FUNC_PARSERANGE_LONG_I); fornext_entrylabel5125: *_FUNC_PARSERANGE_LONG_I=fornext_value5125; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5125){ if (fornext_value5125fornext_finalvalue5125) break; } fornext_error5125:; if(qbevent){evnt(25753,10044,"ide_methods.bas");if(r)goto S_46381;} S_46382:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_PARSERANGE_STRING_TEMP,*_FUNC_PARSERANGE_LONG_I)== 1 )))||new_error){ if(qbevent){evnt(25753,10045,"ide_methods.bas");if(r)goto S_46382;} do{ qbs_set(_FUNC_PARSERANGE_STRING_RETURNVALUE,qbs_add(_FUNC_PARSERANGE_STRING_RETURNVALUE,l2string(*_FUNC_PARSERANGE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10045,"ide_methods.bas");}while(r); } fornext_continue_5124:; } fornext_exit_5124:; do{ qbs_set(_FUNC_PARSERANGE_STRING_PARSERANGE,_FUNC_PARSERANGE_STRING_RETURNVALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10047,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10049,"ide_methods.bas");}while(r); LABEL_PARSEIT:; if(qbevent){evnt(25753,10050,"ide_methods.bas");r=0;} do{ *_FUNC_PARSERANGE_LONG_V1=qbr(func_val(_FUNC_PARSERANGE_STRING_V1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10051,"ide_methods.bas");}while(r); do{ *_FUNC_PARSERANGE_LONG_V2=qbr(func_val(_FUNC_PARSERANGE_STRING_V2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10052,"ide_methods.bas");}while(r); S_46390:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_PARSERANGE_STRING_V2->len> 0 )))||new_error){ if(qbevent){evnt(25753,10053,"ide_methods.bas");if(r)goto S_46390;} S_46391:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_PARSERANGE_STRING_V1->len> 0 )))||new_error){ if(qbevent){evnt(25753,10054,"ide_methods.bas");if(r)goto S_46391;} S_46392:; if ((-(*_FUNC_PARSERANGE_LONG_V1>*_FUNC_PARSERANGE_LONG_V2))||new_error){ if(qbevent){evnt(25753,10055,"ide_methods.bas");if(r)goto S_46392;} do{ swap_32(&*_FUNC_PARSERANGE_LONG_V1,&*_FUNC_PARSERANGE_LONG_V2); if(!qbevent)break;evnt(25753,10055,"ide_methods.bas");}while(r); } S_46395:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_PARSERANGE_LONG_V2>_FUNC_PARSERANGE_STRING_TEMP->len)))||new_error){ if(qbevent){evnt(25753,10056,"ide_methods.bas");if(r)goto S_46395;} do{ qbs_set(_FUNC_PARSERANGE_STRING_TEMP,qbs_add(_FUNC_PARSERANGE_STRING_TEMP,func_space(*_FUNC_PARSERANGE_LONG_V2-_FUNC_PARSERANGE_STRING_TEMP->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10056,"ide_methods.bas");}while(r); } S_46398:; if ((-(*_FUNC_PARSERANGE_LONG_V1== 0 ))||new_error){ if(qbevent){evnt(25753,10057,"ide_methods.bas");if(r)goto S_46398;} do{ *_FUNC_PARSERANGE_BYTE_ZEROINCLUDED= -1 ; if(!qbevent)break;evnt(25753,10057,"ide_methods.bas");}while(r); do{ *_FUNC_PARSERANGE_LONG_V1= 1 ; if(!qbevent)break;evnt(25753,10057,"ide_methods.bas");}while(r); } S_46402:; fornext_value5132=*_FUNC_PARSERANGE_LONG_V1; fornext_finalvalue5132=*_FUNC_PARSERANGE_LONG_V2; fornext_step5132= 1 ; if (fornext_step5132<0) fornext_step_negative5132=1; else fornext_step_negative5132=0; if (new_error) goto fornext_error5132; goto fornext_entrylabel5132; while(1){ fornext_value5132=fornext_step5132+(*_FUNC_PARSERANGE_LONG_I); fornext_entrylabel5132: *_FUNC_PARSERANGE_LONG_I=fornext_value5132; if (fornext_step_negative5132){ if (fornext_value5132fornext_finalvalue5132) break; } fornext_error5132:; if(qbevent){evnt(25753,10058,"ide_methods.bas");if(r)goto S_46402;} do{ tqbs=_FUNC_PARSERANGE_STRING_TEMP; if (!new_error){ tmp_fileno=*_FUNC_PARSERANGE_LONG_I; if (!new_error){ tmp_long= 1 ; 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(25753,10059,"ide_methods.bas");}while(r); fornext_continue_5131:; } fornext_exit_5131:; } }else{ S_46407:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_PARSERANGE_LONG_V1>_FUNC_PARSERANGE_STRING_TEMP->len)))||new_error){ if(qbevent){evnt(25753,10063,"ide_methods.bas");if(r)goto S_46407;} do{ qbs_set(_FUNC_PARSERANGE_STRING_TEMP,qbs_add(_FUNC_PARSERANGE_STRING_TEMP,func_space(*_FUNC_PARSERANGE_LONG_V1-_FUNC_PARSERANGE_STRING_TEMP->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10063,"ide_methods.bas");}while(r); } S_46410:; if ((-(*_FUNC_PARSERANGE_LONG_V1== 0 ))||new_error){ if(qbevent){evnt(25753,10064,"ide_methods.bas");if(r)goto S_46410;} do{ *_FUNC_PARSERANGE_BYTE_ZEROINCLUDED= -1 ; if(!qbevent)break;evnt(25753,10065,"ide_methods.bas");}while(r); }else{ do{ tqbs=_FUNC_PARSERANGE_STRING_TEMP; if (!new_error){ tmp_fileno=*_FUNC_PARSERANGE_LONG_V1; if (!new_error){ tmp_long= 1 ; 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(25753,10067,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_PARSERANGE_STRING_V1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10070,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_PARSERANGE_STRING_V2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10071,"ide_methods.bas");}while(r); do{ #include "ret163.txt" if(!qbevent)break;evnt(25753,10072,"ide_methods.bas");}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; qbs_maketmp(_FUNC_PARSERANGE_STRING_PARSERANGE);return _FUNC_PARSERANGE_STRING_PARSERANGE; } int32 FUNC_IDECALLSTACKBOX(){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,10078,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,10079,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10080,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,10081,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,10082,"ide_methods.bas");}while(r); do{ if (_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4]+1; _FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]),0,_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,10083,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,10084,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10085,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT=*__LONG_CALLSTACKLENGTH+ 4 ; if(!qbevent)break;evnt(25753,10090,"ide_methods.bas");}while(r); S_46428:; if ((-(*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,10091,"ide_methods.bas");if(r)goto S_46428;} do{ *_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,10092,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH= 52 ; if(!qbevent)break;evnt(25753,10095,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP,__STRING_CALLSTACKLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10096,"ide_methods.bas");}while(r); S_46433:; do{ if(qbevent){evnt(25753,10097,"ide_methods.bas");if(r)goto S_46433;} do{ *_FUNC_IDECALLSTACKBOX_LONG_I=func_instr(NULL,_FUNC_IDECALLSTACKBOX_STRING_TEMP,_FUNC_IDECALLSTACKBOX_STRING1_SEP,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10098,"ide_methods.bas");}while(r); S_46435:; if ((*_FUNC_IDECALLSTACKBOX_LONG_I)||new_error){ if(qbevent){evnt(25753,10099,"ide_methods.bas");if(r)goto S_46435;} do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP2,qbs_left(_FUNC_IDECALLSTACKBOX_STRING_TEMP,*_FUNC_IDECALLSTACKBOX_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10100,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP,func_mid(_FUNC_IDECALLSTACKBOX_STRING_TEMP,*_FUNC_IDECALLSTACKBOX_LONG_I+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10101,"ide_methods.bas");}while(r); S_46438:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDECALLSTACKBOX_STRING_TEMP2->len+ 6 )>*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH)))||new_error){ if(qbevent){evnt(25753,10102,"ide_methods.bas");if(r)goto S_46438;} do{ *_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH=_FUNC_IDECALLSTACKBOX_STRING_TEMP2->len+ 6 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10102,"ide_methods.bas");}while(r); } }else{ S_46442:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDECALLSTACKBOX_STRING_TEMP->len+ 6 )>*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH)))||new_error){ if(qbevent){evnt(25753,10104,"ide_methods.bas");if(r)goto S_46442;} do{ *_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH=_FUNC_IDECALLSTACKBOX_STRING_TEMP->len+ 6 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10104,"ide_methods.bas");}while(r); } do{ goto dl_exit_5135; if(!qbevent)break;evnt(25753,10105,"ide_methods.bas");}while(r); } dl_continue_5135:; }while(1); dl_exit_5135:; S_46448:; if ((-(*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,10109,"ide_methods.bas");if(r)goto S_46448;} do{ *_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,10109,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_UDT_P)) + (0) ),_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH,_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT,qbs_new_txt_len("$DEBUG MODE",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10111,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,10113,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_I=*_FUNC_IDECALLSTACKBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10114,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,10115,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,10116,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+28))=*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,10117,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+32))=*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT- 4 ; if(!qbevent)break;evnt(25753,10117,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(__STRING_CALLSTACKLIST); if(!qbevent)break;evnt(25753,10118,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+64))=*__LONG_CALLSTACKLENGTH; if(!qbevent)break;evnt(25753,10119,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Call Stack",10)); if(!qbevent)break;evnt(25753,10120,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_I=*_FUNC_IDECALLSTACKBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10122,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,10123,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,10124,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Go To Line",11),_FUNC_IDECALLSTACKBOX_STRING1_SEP),qbs_new_txt_len("#Close",6)),_FUNC_IDECALLSTACKBOX_STRING1_SEP),qbs_new_txt_len("Co#py",5))); if(!qbevent)break;evnt(25753,10125,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,10126,"ide_methods.bas");}while(r); S_46466:; fornext_value5141= 1 ; fornext_finalvalue5141= 100 ; fornext_step5141= 1 ; if (fornext_step5141<0) fornext_step_negative5141=1; else fornext_step_negative5141=0; if (new_error) goto fornext_error5141; goto fornext_entrylabel5141; while(1){ fornext_value5141=fornext_step5141+(*_FUNC_IDECALLSTACKBOX_LONG_I); fornext_entrylabel5141: *_FUNC_IDECALLSTACKBOX_LONG_I=fornext_value5141; if (fornext_step_negative5141){ if (fornext_value5141fornext_finalvalue5141) break; } fornext_error5141:; if(qbevent){evnt(25753,10132,"ide_methods.bas");if(r)goto S_46466;} do{ memcpy(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDECALLSTACKBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,10132,"ide_methods.bas");}while(r); fornext_continue_5140:; } fornext_exit_5140:; S_46469:; do{ if(qbevent){evnt(25753,10135,"ide_methods.bas");if(r)goto S_46469;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,10138,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,10139,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,10139,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,10139,"ide_methods.bas");}while(r); S_46474:; fornext_value5144= 1 ; fornext_finalvalue5144= 100 ; fornext_step5144= 1 ; if (fornext_step5144<0) fornext_step_negative5144=1; else fornext_step_negative5144=0; if (new_error) goto fornext_error5144; goto fornext_entrylabel5144; while(1){ fornext_value5144=fornext_step5144+(*_FUNC_IDECALLSTACKBOX_LONG_I); fornext_entrylabel5144: *_FUNC_IDECALLSTACKBOX_LONG_I=fornext_value5144; if (fornext_step_negative5144){ if (fornext_value5144fornext_finalvalue5144) break; } fornext_error5144:; if(qbevent){evnt(25753,10140,"ide_methods.bas");if(r)goto S_46474;} S_46475:; if ((*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,10141,"ide_methods.bas");if(r)goto S_46475;} do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS-*_FUNC_IDECALLSTACKBOX_LONG_F; if(!qbevent)break;evnt(25753,10143,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,10144,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,10144,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDECALLSTACKBOX_LONG_F); if(!qbevent)break;evnt(25753,10145,"ide_methods.bas");}while(r); S_46480:; if ((*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,10146,"ide_methods.bas");if(r)goto S_46480;} do{ *_FUNC_IDECALLSTACKBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,10146,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,10146,"ide_methods.bas");}while(r); } } fornext_continue_5143:; } fornext_exit_5143:; do{ *_FUNC_IDECALLSTACKBOX_LONG_LASTFOCUS=*_FUNC_IDECALLSTACKBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,10149,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10153,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_UDT_P)+(4))+ 1 ,qbs_new_txt_len("Most recent sub/function calls in your program:",47),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10153,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,10158,"ide_methods.bas");}while(r); S_46490:; if ((*_FUNC_IDECALLSTACKBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,10159,"ide_methods.bas");if(r)goto S_46490;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10159,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDECALLSTACKBOX_LONG_CY,*_FUNC_IDECALLSTACKBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,10159,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10159,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,10162,"ide_methods.bas");}while(r); S_46496:; do{ if(qbevent){evnt(25753,10163,"ide_methods.bas");if(r)goto S_46496;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,10164,"ide_methods.bas");}while(r); S_46498:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,10165,"ide_methods.bas");if(r)goto S_46498;} do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10165,"ide_methods.bas");}while(r); } S_46501:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,10166,"ide_methods.bas");if(r)goto S_46501;} do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10166,"ide_methods.bas");}while(r); } S_46504:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,10167,"ide_methods.bas");if(r)goto S_46504;} do{ *_FUNC_IDECALLSTACKBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,10167,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10167,"ide_methods.bas");}while(r); } S_46508:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,10168,"ide_methods.bas");if(r)goto S_46508;} do{ *_FUNC_IDECALLSTACKBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,10168,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10168,"ide_methods.bas");}while(r); } S_46512:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,10169,"ide_methods.bas");if(r)goto S_46512;} do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10169,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,10170,"ide_methods.bas");}while(r); S_46516:; if ((-(*_FUNC_IDECALLSTACKBOX_LONG_ALT!=*_FUNC_IDECALLSTACKBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,10170,"ide_methods.bas");if(r)goto S_46516;} do{ *_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10170,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_LONG_OLDALT=*_FUNC_IDECALLSTACKBOX_LONG_ALT; if(!qbevent)break;evnt(25753,10171,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,10172,"ide_methods.bas");}while(r); S_46521:; dl_continue_5145:; }while((!(*_FUNC_IDECALLSTACKBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5145:; if(qbevent){evnt(25753,10173,"ide_methods.bas");if(r)goto S_46521;} S_46522:; if ((*_FUNC_IDECALLSTACKBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,10174,"ide_methods.bas");if(r)goto S_46522;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,10174,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,10174,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10176,"ide_methods.bas");}while(r); S_46528:; if ((*_FUNC_IDECALLSTACKBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,10177,"ide_methods.bas");if(r)goto S_46528;} S_46529:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,10178,"ide_methods.bas");if(r)goto S_46529;} do{ *_FUNC_IDECALLSTACKBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10179,"ide_methods.bas");}while(r); S_46531:; if (((-(*_FUNC_IDECALLSTACKBOX_LONG_K>= 65 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,10180,"ide_methods.bas");if(r)goto S_46531;} do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDECALLSTACKBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10180,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10183,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,10183,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10183,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,10187,"ide_methods.bas");}while(r); S_46540:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,10188,"ide_methods.bas");if(r)goto S_46540;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10188,"ide_methods.bas");}while(r); } S_46543:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,10189,"ide_methods.bas");if(r)goto S_46543;} do{ *_FUNC_IDECALLSTACKBOX_LONG_FOCUS=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,10189,"ide_methods.bas");}while(r); } S_46546:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,10190,"ide_methods.bas");if(r)goto S_46546;} do{ *_FUNC_IDECALLSTACKBOX_LONG_FOCUS=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,10190,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10190,"ide_methods.bas");}while(r); } S_46550:; if ((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,10191,"ide_methods.bas");if(r)goto S_46550;} do{ *_FUNC_IDECALLSTACKBOX_LONG_FOCUS=*_FUNC_IDECALLSTACKBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,10191,"ide_methods.bas");}while(r); } S_46553:; if ((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS>*_FUNC_IDECALLSTACKBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,10192,"ide_methods.bas");if(r)goto S_46553;} do{ *_FUNC_IDECALLSTACKBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,10192,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,10193,"ide_methods.bas");}while(r); S_46557:; fornext_value5148= 1 ; fornext_finalvalue5148= 100 ; fornext_step5148= 1 ; if (fornext_step5148<0) fornext_step_negative5148=1; else fornext_step_negative5148=0; if (new_error) goto fornext_error5148; goto fornext_entrylabel5148; while(1){ fornext_value5148=fornext_step5148+(*_FUNC_IDECALLSTACKBOX_LONG_I); fornext_entrylabel5148: *_FUNC_IDECALLSTACKBOX_LONG_I=fornext_value5148; if (fornext_step_negative5148){ if (fornext_value5148fornext_finalvalue5148) break; } fornext_error5148:; if(qbevent){evnt(25753,10194,"ide_methods.bas");if(r)goto S_46557;} do{ *_FUNC_IDECALLSTACKBOX_LONG_T=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,10195,"ide_methods.bas");}while(r); S_46559:; if ((*_FUNC_IDECALLSTACKBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,10196,"ide_methods.bas");if(r)goto S_46559;} do{ *_FUNC_IDECALLSTACKBOX_LONG_FOCUSOFFSET=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS-*_FUNC_IDECALLSTACKBOX_LONG_F; if(!qbevent)break;evnt(25753,10197,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDECALLSTACKBOX_LONG_FOCUS,_FUNC_IDECALLSTACKBOX_LONG_F,_FUNC_IDECALLSTACKBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDECALLSTACKBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDECALLSTACKBOX_LONG_MOUSEDOWN,_FUNC_IDECALLSTACKBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDECALLSTACKBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10198,"ide_methods.bas");}while(r); } fornext_continue_5147:; } fornext_exit_5147:; S_46564:; if ((*__LONG_MCLICK&(-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 1 )))||new_error){ if(qbevent){evnt(25753,10203,"ide_methods.bas");if(r)goto S_46564;} S_46565:; if (((-(((float)(FUNC_TIMEELAPSEDSINCE(_FUNC_IDECALLSTACKBOX_SINGLE_LASTCLICK)))<((float)( 0.3E+0 ))))&(-(*_FUNC_IDECALLSTACKBOX_LONG_CLICKEDITEM==*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+64)))))||new_error){ if(qbevent){evnt(25753,10204,"ide_methods.bas");if(r)goto S_46565;} do{ goto LABEL_SETIDECY; if(!qbevent)break;evnt(25753,10205,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_SINGLE_LASTCLICK=func_timer(NULL,0); if(!qbevent)break;evnt(25753,10207,"ide_methods.bas");}while(r); S_46569:; if ((-(*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+64))> 0 ))||new_error){ if(qbevent){evnt(25753,10208,"ide_methods.bas");if(r)goto S_46569;} do{ *_FUNC_IDECALLSTACKBOX_LONG_CLICKEDITEM=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10208,"ide_methods.bas");}while(r); } do{ goto dl_continue_5142; if(!qbevent)break;evnt(25753,10209,"ide_methods.bas");}while(r); } S_46574:; if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 1 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 )))))||new_error){ if(qbevent){evnt(25753,10212,"ide_methods.bas");if(r)goto S_46574;} LABEL_SETIDECY:; if(qbevent){evnt(25753,10213,"ide_methods.bas");r=0;} do{ *_FUNC_IDECALLSTACKBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,10214,"ide_methods.bas");}while(r); S_46576:; if (((-(*_FUNC_IDECALLSTACKBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_Y<=*__LONG_CALLSTACKLENGTH)))||new_error){ if(qbevent){evnt(25753,10215,"ide_methods.bas");if(r)goto S_46576;} do{ qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*89+72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10216,"ide_methods.bas");}while(r); do{ *__LONG_IDEGOTOBOX_LASTLINENUM=qbr(func_val(func_mid(_FUNC_IDECALLSTACKBOX_STRING_TEMP,func__instrrev(NULL,_FUNC_IDECALLSTACKBOX_STRING_TEMP,qbs_new_txt_len(" ",1),0)+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10217,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDEGOTOBOX_LASTLINENUM; if(!qbevent)break;evnt(25753,10218,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,10219,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,10220,"ide_methods.bas");}while(r); do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,10221,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10222,"ide_methods.bas");}while(r); } } S_46586:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,10226,"ide_methods.bas");if(r)goto S_46586;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10227,"ide_methods.bas");}while(r); } S_46589:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,10230,"ide_methods.bas");if(r)goto S_46589;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10231,"ide_methods.bas");}while(r); } S_46592:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 ))))|(((qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1)))&(-(*__LONG_KCTRL!= 0 ))))))||new_error){ if(qbevent){evnt(25753,10234,"ide_methods.bas");if(r)goto S_46592;} do{ sub__clipboard(FUNC_STRREPLACE(__STRING_CALLSTACKLIST,_FUNC_IDECALLSTACKBOX_STRING1_SEP,func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10235,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECALLSTACKBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,10239,"ide_methods.bas");}while(r); do{ *_FUNC_IDECALLSTACKBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,10240,"ide_methods.bas");}while(r); dl_continue_5142:; }while(1); dl_exit_5142:; do{ *_FUNC_IDECALLSTACKBOX_LONG_IDECALLSTACKBOX= 0 ; if(!qbevent)break;evnt(25753,10243,"ide_methods.bas");}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; return *_FUNC_IDECALLSTACKBOX_LONG_IDECALLSTACKBOX; } 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 "data165.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub__printstring(*_SUB_IDEBOX_LONG_X,*_SUB_IDEBOX_LONG_Y,qbs_add(qbs_add(func_chr( 218 ),func_string(*_SUB_IDEBOX_LONG_W- 2 , 196 )),func_chr( 191 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10248,"ide_methods.bas");}while(r); S_46600:; fornext_value5150=*_SUB_IDEBOX_LONG_Y+ 1 ; fornext_finalvalue5150=*_SUB_IDEBOX_LONG_Y+*_SUB_IDEBOX_LONG_H- 2 ; fornext_step5150= 1 ; if (fornext_step5150<0) fornext_step_negative5150=1; else fornext_step_negative5150=0; if (new_error) goto fornext_error5150; goto fornext_entrylabel5150; while(1){ fornext_value5150=fornext_step5150+(*_SUB_IDEBOX_LONG_Y2); fornext_entrylabel5150: *_SUB_IDEBOX_LONG_Y2=fornext_value5150; if (fornext_step_negative5150){ if (fornext_value5150fornext_finalvalue5150) break; } fornext_error5150:; if(qbevent){evnt(25753,10249,"ide_methods.bas");if(r)goto S_46600;} do{ sub__printstring(*_SUB_IDEBOX_LONG_X,*_SUB_IDEBOX_LONG_Y2,qbs_add(qbs_add(func_chr( 179 ),func_space(*_SUB_IDEBOX_LONG_W- 2 )),func_chr( 179 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10250,"ide_methods.bas");}while(r); fornext_continue_5149:; } fornext_exit_5149:; do{ sub__printstring(*_SUB_IDEBOX_LONG_X,*_SUB_IDEBOX_LONG_Y+*_SUB_IDEBOX_LONG_H- 1 ,qbs_add(qbs_add(func_chr( 192 ),func_string(*_SUB_IDEBOX_LONG_W- 2 , 196 )),func_chr( 217 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10252,"ide_methods.bas");}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_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 "data166.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ SUB_IDEBOX(_SUB_IDEBOXSHADOW_LONG_X,_SUB_IDEBOXSHADOW_LONG_Y,_SUB_IDEBOXSHADOW_LONG_W,_SUB_IDEBOXSHADOW_LONG_H); if(!qbevent)break;evnt(25753,10257,"ide_methods.bas");}while(r); do{ qbg_sub_color( 2 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,10260,"ide_methods.bas");}while(r); S_46606:; fornext_value5152=*_SUB_IDEBOXSHADOW_LONG_Y+ 1 ; fornext_finalvalue5152=*_SUB_IDEBOXSHADOW_LONG_Y+*_SUB_IDEBOXSHADOW_LONG_H- 1 ; fornext_step5152= 1 ; if (fornext_step5152<0) fornext_step_negative5152=1; else fornext_step_negative5152=0; if (new_error) goto fornext_error5152; goto fornext_entrylabel5152; while(1){ fornext_value5152=fornext_step5152+(*_SUB_IDEBOXSHADOW_LONG_Y2); fornext_entrylabel5152: *_SUB_IDEBOXSHADOW_LONG_Y2=fornext_value5152; if (fornext_step_negative5152){ if (fornext_value5152fornext_finalvalue5152) break; } fornext_error5152:; if(qbevent){evnt(25753,10261,"ide_methods.bas");if(r)goto S_46606;} S_46607:; fornext_value5154=*_SUB_IDEBOXSHADOW_LONG_X+*_SUB_IDEBOXSHADOW_LONG_W; fornext_finalvalue5154=*_SUB_IDEBOXSHADOW_LONG_X+*_SUB_IDEBOXSHADOW_LONG_W+ 1 ; fornext_step5154= 1 ; if (fornext_step5154<0) fornext_step_negative5154=1; else fornext_step_negative5154=0; if (new_error) goto fornext_error5154; goto fornext_entrylabel5154; while(1){ fornext_value5154=fornext_step5154+(*_SUB_IDEBOXSHADOW_LONG_X2); fornext_entrylabel5154: *_SUB_IDEBOXSHADOW_LONG_X2=fornext_value5154; if (fornext_step_negative5154){ if (fornext_value5154fornext_finalvalue5154) break; } fornext_error5154:; if(qbevent){evnt(25753,10262,"ide_methods.bas");if(r)goto S_46607;} S_46608:; if (((-(*_SUB_IDEBOXSHADOW_LONG_X2<=*__LONG_IDEWX))&(-(*_SUB_IDEBOXSHADOW_LONG_Y2<=(*__LONG_IDEWY+*__LONG_IDESUBWINDOW))))||new_error){ if(qbevent){evnt(25753,10263,"ide_methods.bas");if(r)goto S_46608;} do{ sub__printstring(*_SUB_IDEBOXSHADOW_LONG_X2,*_SUB_IDEBOXSHADOW_LONG_Y2,func_chr(func_screen(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X2,NULL,0)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10264,"ide_methods.bas");}while(r); } fornext_continue_5153:; } fornext_exit_5153:; fornext_continue_5151:; } fornext_exit_5151:; do{ *_SUB_IDEBOXSHADOW_LONG_Y2=*_SUB_IDEBOXSHADOW_LONG_Y+*_SUB_IDEBOXSHADOW_LONG_H; if(!qbevent)break;evnt(25753,10269,"ide_methods.bas");}while(r); S_46614:; if ((-(*_SUB_IDEBOXSHADOW_LONG_Y2<=(*__LONG_IDEWY+*__LONG_IDESUBWINDOW)))||new_error){ if(qbevent){evnt(25753,10270,"ide_methods.bas");if(r)goto S_46614;} S_46615:; fornext_value5156=*_SUB_IDEBOXSHADOW_LONG_X+ 2 ; fornext_finalvalue5156=*_SUB_IDEBOXSHADOW_LONG_X+*_SUB_IDEBOXSHADOW_LONG_W+ 1 ; fornext_step5156= 1 ; if (fornext_step5156<0) fornext_step_negative5156=1; else fornext_step_negative5156=0; if (new_error) goto fornext_error5156; goto fornext_entrylabel5156; while(1){ fornext_value5156=fornext_step5156+(*_SUB_IDEBOXSHADOW_LONG_X2); fornext_entrylabel5156: *_SUB_IDEBOXSHADOW_LONG_X2=fornext_value5156; if (fornext_step_negative5156){ if (fornext_value5156fornext_finalvalue5156) break; } fornext_error5156:; if(qbevent){evnt(25753,10271,"ide_methods.bas");if(r)goto S_46615;} S_46616:; if ((-(*_SUB_IDEBOXSHADOW_LONG_X2<=*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,10272,"ide_methods.bas");if(r)goto S_46616;} do{ sub__printstring(*_SUB_IDEBOXSHADOW_LONG_X2,*_SUB_IDEBOXSHADOW_LONG_Y2,func_chr(func_screen(*_SUB_IDEBOXSHADOW_LONG_Y2,*_SUB_IDEBOXSHADOW_LONG_X2,NULL,0)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10273,"ide_methods.bas");}while(r); } fornext_continue_5155:; } fornext_exit_5155:; } 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; } 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 "data167.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if (_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY)[8])->id=(++mem_lock_id); if (_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[2]&1){ tmp_long=_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]); free((void*)(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0])); } _FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[4]= 0 ; _FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[5]=( 0 )-_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[4]+1; _FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[6]=1; _FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0]=(ptrszint)malloc(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[5]*8); if (!_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0]) error(257); _FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[2]|=1; tmp_long=_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[5]; if (_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,10282,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,10285,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,10286,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10287,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,10288,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,10289,"ide_methods.bas");}while(r); do{ if (_FUNC_IDECHANGE_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECHANGE_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDECHANGE_ARRAY_UDT_O[0]),0,_FUNC_IDECHANGE_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDECHANGE_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECHANGE_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDECHANGE_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECHANGE_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,10290,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,10291,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10292,"ide_methods.bas");}while(r); S_46630:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,10298,"ide_methods.bas");if(r)goto S_46630;} S_46631:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,10299,"ide_methods.bas");if(r)goto S_46631;} do{ qbs_set(_FUNC_IDECHANGE_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10300,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10301,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,10302,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,10302,"ide_methods.bas");}while(r); S_46636:; if ((-(*_FUNC_IDECHANGE_LONG_SX2<*_FUNC_IDECHANGE_LONG_SX1))||new_error){ if(qbevent){evnt(25753,10303,"ide_methods.bas");if(r)goto S_46636;} do{ swap_32(&*_FUNC_IDECHANGE_LONG_SX1,&*_FUNC_IDECHANGE_LONG_SX2); if(!qbevent)break;evnt(25753,10303,"ide_methods.bas");}while(r); } S_46639:; fornext_value5158=*_FUNC_IDECHANGE_LONG_SX1; fornext_finalvalue5158=*_FUNC_IDECHANGE_LONG_SX2- 1 ; fornext_step5158= 1 ; if (fornext_step5158<0) fornext_step_negative5158=1; else fornext_step_negative5158=0; if (new_error) goto fornext_error5158; goto fornext_entrylabel5158; while(1){ fornext_value5158=fornext_step5158+(*_FUNC_IDECHANGE_LONG_X); fornext_entrylabel5158: *_FUNC_IDECHANGE_LONG_X=fornext_value5158; if (fornext_step_negative5158){ if (fornext_value5158fornext_finalvalue5158) break; } fornext_error5158:; if(qbevent){evnt(25753,10304,"ide_methods.bas");if(r)goto S_46639;} S_46640:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_X<=_FUNC_IDECHANGE_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,10305,"ide_methods.bas");if(r)goto S_46640;} 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(25753,10305,"ide_methods.bas");}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(25753,10305,"ide_methods.bas");}while(r); } fornext_continue_5157:; } fornext_exit_5157:; } } S_46648:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDECHANGE_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,10309,"ide_methods.bas");if(r)goto S_46648;} do{ qbs_set(_FUNC_IDECHANGE_STRING_A2,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10310,"ide_methods.bas");}while(r); } do{ SUB_RETRIEVESEARCHHISTORY(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10313,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I= 0 ; if(!qbevent)break;evnt(25753,10315,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDECHANGE_UDT_P)) + (0) ),&(pass5160= 60 ),&(pass5161= 14 ),qbs_new_txt_len("Change",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10316,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10317,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,10318,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,10319,"ide_methods.bas");}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]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,10320,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Find What",10)); if(!qbevent)break;evnt(25753,10321,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDECHANGE_STRING_A2); if(!qbevent)break;evnt(25753,10322,"ide_methods.bas");}while(r); S_46660:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDECHANGE_STRING_A2->len> 0 )))||new_error){ if(qbevent){evnt(25753,10323,"ide_methods.bas");if(r)goto S_46660;} do{ *(int8*)(((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]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,10324,"ide_methods.bas");}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]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,10325,"ide_methods.bas");}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]))*89+81))=_FUNC_IDECHANGE_STRING_A2->len; if(!qbevent)break;evnt(25753,10327,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10329,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,10330,"ide_methods.bas");}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]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,10331,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Change #To",10)); if(!qbevent)break;evnt(25753,10332,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(__STRING_IDECHANGETO); if(!qbevent)break;evnt(25753,10333,"ide_methods.bas");}while(r); S_46670:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_IDECHANGETO->len> 0 )))||new_error){ if(qbevent){evnt(25753,10334,"ide_methods.bas");if(r)goto S_46670;} do{ *(int8*)(((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]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,10335,"ide_methods.bas");}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]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,10336,"ide_methods.bas");}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]))*89+81))=__STRING_IDECHANGETO->len; if(!qbevent)break;evnt(25753,10338,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10340,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10341,"ide_methods.bas");}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]))*89+24))= 8 ; if(!qbevent)break;evnt(25753,10342,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Match Upper/Lowercase",22)); if(!qbevent)break;evnt(25753,10343,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDCASESENS; if(!qbevent)break;evnt(25753,10344,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10345,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10346,"ide_methods.bas");}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]))*89+24))= 9 ; if(!qbevent)break;evnt(25753,10347,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Whole Word",11)); if(!qbevent)break;evnt(25753,10348,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDWHOLEWORD; if(!qbevent)break;evnt(25753,10349,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10350,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10351,"ide_methods.bas");}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]))*89+24))= 10 ; if(!qbevent)break;evnt(25753,10352,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Search Backwards",17)); if(!qbevent)break;evnt(25753,10353,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDBACKWARDS; if(!qbevent)break;evnt(25753,10354,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10356,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10357,"ide_methods.bas");}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]))*89+24))= 11 ; if(!qbevent)break;evnt(25753,10358,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Ignore 'comments",17)); if(!qbevent)break;evnt(25753,10359,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDNOCOMMENTS; if(!qbevent)break;evnt(25753,10360,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10362,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10363,"ide_methods.bas");}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]))*89+20))= 29 ; if(!qbevent)break;evnt(25753,10364,"ide_methods.bas");}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]))*89+24))= 11 ; if(!qbevent)break;evnt(25753,10365,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Look only in 'comments",23)); if(!qbevent)break;evnt(25753,10366,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDONLYCOMMENTS; if(!qbevent)break;evnt(25753,10367,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10369,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10370,"ide_methods.bas");}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]))*89+24))= 12 ; if(!qbevent)break;evnt(25753,10371,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Ignore ",7),func_chr( 34 )),qbs_new_txt_len("#strings",8)),func_chr( 34 ))); if(!qbevent)break;evnt(25753,10372,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDNOSTRINGS; if(!qbevent)break;evnt(25753,10373,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10375,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,10376,"ide_methods.bas");}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]))*89+20))= 29 ; if(!qbevent)break;evnt(25753,10377,"ide_methods.bas");}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]))*89+24))= 12 ; if(!qbevent)break;evnt(25753,10378,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Look only in ",13),func_chr( 34 )),qbs_new_txt_len("st#rings",8)),func_chr( 34 ))); if(!qbevent)break;evnt(25753,10379,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDONLYSTRINGS; if(!qbevent)break;evnt(25753,10380,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_I=*_FUNC_IDECHANGE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10382,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_BUTTONSID=*_FUNC_IDECHANGE_LONG_I; if(!qbevent)break;evnt(25753,10383,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,10384,"ide_methods.bas");}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]))*89+24))= 14 ; if(!qbevent)break;evnt(25753,10385,"ide_methods.bas");}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]))*89+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(25753,10386,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,10387,"ide_methods.bas");}while(r); S_46718:; fornext_value5167= 1 ; fornext_finalvalue5167= 100 ; fornext_step5167= 1 ; if (fornext_step5167<0) fornext_step_negative5167=1; else fornext_step_negative5167=0; if (new_error) goto fornext_error5167; goto fornext_entrylabel5167; while(1){ fornext_value5167=fornext_step5167+(*_FUNC_IDECHANGE_LONG_I); fornext_entrylabel5167: *_FUNC_IDECHANGE_LONG_I=fornext_value5167; if (fornext_step_negative5167){ if (fornext_value5167fornext_finalvalue5167) break; } fornext_error5167:; if(qbevent){evnt(25753,10391,"ide_methods.bas");if(r)goto S_46718;} 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]))*89)+ 0,((char*)_FUNC_IDECHANGE_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,10391,"ide_methods.bas");}while(r); fornext_continue_5166:; } fornext_exit_5166:; S_46721:; do{ if(qbevent){evnt(25753,10394,"ide_methods.bas");if(r)goto S_46721;} do{ return_point[next_return_point++]=156; if (next_return_point>=return_points) more_return_points(); goto LABEL_DISPLAYDIALOG; RETURN_156:; if(!qbevent)break;evnt(25753,10397,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_LASTFOCUS=*_FUNC_IDECHANGE_LONG_F- 1 ; if(!qbevent)break;evnt(25753,10398,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,10405,"ide_methods.bas");}while(r); S_46725:; if ((*_FUNC_IDECHANGE_LONG_CX)||new_error){ if(qbevent){evnt(25753,10406,"ide_methods.bas");if(r)goto S_46725;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10406,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDECHANGE_LONG_CY,*_FUNC_IDECHANGE_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,10406,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10406,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGE_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,10409,"ide_methods.bas");}while(r); S_46731:; do{ if(qbevent){evnt(25753,10410,"ide_methods.bas");if(r)goto S_46731;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,10411,"ide_methods.bas");}while(r); S_46733:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,10412,"ide_methods.bas");if(r)goto S_46733;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10412,"ide_methods.bas");}while(r); } S_46736:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,10413,"ide_methods.bas");if(r)goto S_46736;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10413,"ide_methods.bas");}while(r); } S_46739:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,10414,"ide_methods.bas");if(r)goto S_46739;} do{ *_FUNC_IDECHANGE_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,10414,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10414,"ide_methods.bas");}while(r); } S_46743:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,10415,"ide_methods.bas");if(r)goto S_46743;} do{ *_FUNC_IDECHANGE_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,10415,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10415,"ide_methods.bas");}while(r); } S_46747:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,10416,"ide_methods.bas");if(r)goto S_46747;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10416,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGE_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,10417,"ide_methods.bas");}while(r); S_46751:; if ((-(*_FUNC_IDECHANGE_LONG_ALT!=*_FUNC_IDECHANGE_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,10417,"ide_methods.bas");if(r)goto S_46751;} do{ *_FUNC_IDECHANGE_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10417,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGE_LONG_OLDALT=*_FUNC_IDECHANGE_LONG_ALT; if(!qbevent)break;evnt(25753,10418,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,10419,"ide_methods.bas");}while(r); S_46756:; dl_continue_5169:; }while((!(*_FUNC_IDECHANGE_LONG_CHANGE))&&(!new_error)); dl_exit_5169:; if(qbevent){evnt(25753,10420,"ide_methods.bas");if(r)goto S_46756;} S_46757:; if ((*_FUNC_IDECHANGE_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,10421,"ide_methods.bas");if(r)goto S_46757;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,10421,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,10421,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDECHANGE_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10423,"ide_methods.bas");}while(r); S_46763:; if ((*_FUNC_IDECHANGE_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,10424,"ide_methods.bas");if(r)goto S_46763;} S_46764:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,10425,"ide_methods.bas");if(r)goto S_46764;} do{ *_FUNC_IDECHANGE_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10426,"ide_methods.bas");}while(r); S_46766:; if (((-(*_FUNC_IDECHANGE_LONG_K>= 65 ))&(-(*_FUNC_IDECHANGE_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,10427,"ide_methods.bas");if(r)goto S_46766;} do{ qbs_set(_FUNC_IDECHANGE_STRING_ALTLETTER,func_chr(*_FUNC_IDECHANGE_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10427,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10430,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,10430,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10430,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,10434,"ide_methods.bas");}while(r); S_46775:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,10435,"ide_methods.bas");if(r)goto S_46775;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10435,"ide_methods.bas");}while(r); } S_46778:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,10436,"ide_methods.bas");if(r)goto S_46778;} do{ *_FUNC_IDECHANGE_LONG_FOCUS=*_FUNC_IDECHANGE_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,10436,"ide_methods.bas");}while(r); } S_46781:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,10437,"ide_methods.bas");if(r)goto S_46781;} do{ *_FUNC_IDECHANGE_LONG_FOCUS=*_FUNC_IDECHANGE_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,10437,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10437,"ide_methods.bas");}while(r); } S_46785:; if ((-(*_FUNC_IDECHANGE_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,10438,"ide_methods.bas");if(r)goto S_46785;} do{ *_FUNC_IDECHANGE_LONG_FOCUS=*_FUNC_IDECHANGE_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,10438,"ide_methods.bas");}while(r); } S_46788:; if ((-(*_FUNC_IDECHANGE_LONG_FOCUS>*_FUNC_IDECHANGE_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,10439,"ide_methods.bas");if(r)goto S_46788;} do{ *_FUNC_IDECHANGE_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,10439,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGE_LONG_F= 1 ; if(!qbevent)break;evnt(25753,10440,"ide_methods.bas");}while(r); S_46792:; fornext_value5172= 1 ; fornext_finalvalue5172= 100 ; fornext_step5172= 1 ; if (fornext_step5172<0) fornext_step_negative5172=1; else fornext_step_negative5172=0; if (new_error) goto fornext_error5172; goto fornext_entrylabel5172; while(1){ fornext_value5172=fornext_step5172+(*_FUNC_IDECHANGE_LONG_I); fornext_entrylabel5172: *_FUNC_IDECHANGE_LONG_I=fornext_value5172; if (fornext_step_negative5172){ if (fornext_value5172fornext_finalvalue5172) break; } fornext_error5172:; if(qbevent){evnt(25753,10441,"ide_methods.bas");if(r)goto S_46792;} 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]))*89+36)); if(!qbevent)break;evnt(25753,10442,"ide_methods.bas");}while(r); S_46794:; if ((*_FUNC_IDECHANGE_LONG_T)||new_error){ if(qbevent){evnt(25753,10443,"ide_methods.bas");if(r)goto S_46794;} do{ *_FUNC_IDECHANGE_LONG_FOCUSOFFSET=*_FUNC_IDECHANGE_LONG_FOCUS-*_FUNC_IDECHANGE_LONG_F; if(!qbevent)break;evnt(25753,10444,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,10445,"ide_methods.bas");}while(r); } fornext_continue_5171:; } fornext_exit_5171:; S_46799:; if ((-(*_FUNC_IDECHANGE_LONG_FOCUS!=*_FUNC_IDECHANGE_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,10451,"ide_methods.bas");if(r)goto S_46799;} do{ *_FUNC_IDECHANGE_LONG_PREVFOCUS=*_FUNC_IDECHANGE_LONG_FOCUS; if(!qbevent)break;evnt(25753,10453,"ide_methods.bas");}while(r); S_46801:; if (((-(*_FUNC_IDECHANGE_LONG_FOCUS== 1 ))|(-(*_FUNC_IDECHANGE_LONG_FOCUS== 2 )))||new_error){ if(qbevent){evnt(25753,10454,"ide_methods.bas");if(r)goto S_46801;} do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_FOCUS)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_FOCUS)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,10455,"ide_methods.bas");}while(r); S_46803:; if ((-(*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_FOCUS)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,10456,"ide_methods.bas");if(r)goto S_46803;} do{ *(int8*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_FOCUS)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,10456,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_FOCUS)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,10457,"ide_methods.bas");}while(r); } } S_46809:; if (((-(*_FUNC_IDECHANGE_LONG_FOCUS== 6 ))&(-(*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))== 1 )))||new_error){ if(qbevent){evnt(25753,10462,"ide_methods.bas");if(r)goto S_46809;} do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10463,"ide_methods.bas");}while(r); S_46811:; }else{ if ((-(*_FUNC_IDECHANGE_LONG_FOCUS== 7 ))&(-(*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))== 1 ))){ if(qbevent){evnt(25753,10464,"ide_methods.bas");if(r)goto S_46811;} do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10465,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10466,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10467,"ide_methods.bas");}while(r); S_46815:; }else{ if ((-(*_FUNC_IDECHANGE_LONG_FOCUS== 8 ))&(-(*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))== 1 ))){ if(qbevent){evnt(25753,10468,"ide_methods.bas");if(r)goto S_46815;} do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10469,"ide_methods.bas");}while(r); S_46817:; }else{ if ((-(*_FUNC_IDECHANGE_LONG_FOCUS== 9 ))&(-(*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))== 1 ))){ if(qbevent){evnt(25753,10470,"ide_methods.bas");if(r)goto S_46817;} do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10471,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10472,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,10473,"ide_methods.bas");}while(r); } } } } S_46822:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDECHANGE_LONG_FOCUS== 12 ))&(-(*_FUNC_IDECHANGE_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,10476,"ide_methods.bas");if(r)goto S_46822;} do{ qbs_set(_FUNC_IDECHANGE_STRING_IDECHANGE,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10477,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10478,"ide_methods.bas");}while(r); } S_46826:; if ((qbs_cleanup(qbs_tmp_base,-(func_ubound(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY,1,1)> 0 )))||new_error){ if(qbevent){evnt(25753,10481,"ide_methods.bas");if(r)goto S_46826;} S_46827:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 72 )))))&(-(*_FUNC_IDECHANGE_LONG_FOCUS== 1 ))))||new_error){ if(qbevent){evnt(25753,10482,"ide_methods.bas");if(r)goto S_46827;} S_46828:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_LNlen; if(!qbevent)break;evnt(25753,10487,"ide_methods.bas");}while(r); } S_46836:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 80 )))))&(-(*_FUNC_IDECHANGE_LONG_FOCUS== 1 ))))||new_error){ if(qbevent){evnt(25753,10490,"ide_methods.bas");if(r)goto S_46836;} S_46837:; if ((-(*_FUNC_IDECHANGE_LONG_LN> 1 ))||new_error){ if(qbevent){evnt(25753,10491,"ide_methods.bas");if(r)goto S_46837;} do{ *_FUNC_IDECHANGE_LONG_LN=*_FUNC_IDECHANGE_LONG_LN- 1 ; if(!qbevent)break;evnt(25753,10492,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDECHANGE_LONG_LN= 1 ; if(!qbevent)break;evnt(25753,10494,"ide_methods.bas");}while(r); } do{ tmp_long=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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),((qbs*)(((uint64*)(_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[0]))[array_check((*_FUNC_IDECHANGE_LONG_LN)-_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[4],_FUNC_IDECHANGE_ARRAY_STRING_SEARCHHISTORY[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10496,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,10497,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,10497,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+81))=((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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,10497,"ide_methods.bas");}while(r); } } S_46848:; if (((-(*_FUNC_IDECHANGE_LONG_FOCUS== 11 ))&(-(*_FUNC_IDECHANGE_LONG_INFO!= 0 )))||new_error){ if(qbevent){evnt(25753,10501,"ide_methods.bas");if(r)goto S_46848;} 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]))*89+64)); if(!qbevent)break;evnt(25753,10502,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,10503,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,10504,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDNOCOMMENTS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10505,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDONLYCOMMENTS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10506,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDNOSTRINGS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10507,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDONLYSTRINGS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10508,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10510,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDECHANGE_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10511,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10512,"ide_methods.bas");}while(r); do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10513,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGED= 0 ; if(!qbevent)break;evnt(25753,10515,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_S,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10517,"ide_methods.bas");}while(r); S_46862:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,10518,"ide_methods.bas");if(r)goto S_46862;} do{ qbs_set(_FUNC_IDECHANGE_STRING_S,qbs_ucase(_FUNC_IDECHANGE_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10518,"ide_methods.bas");}while(r); } S_46865:; fornext_value5177= 1 ; fornext_finalvalue5177=*__LONG_IDEN; fornext_step5177= 1 ; if (fornext_step5177<0) fornext_step_negative5177=1; else fornext_step_negative5177=0; if (new_error) goto fornext_error5177; goto fornext_entrylabel5177; while(1){ fornext_value5177=fornext_step5177+(*_FUNC_IDECHANGE_LONG_Y); fornext_entrylabel5177: *_FUNC_IDECHANGE_LONG_Y=fornext_value5177; if (fornext_step_negative5177){ if (fornext_value5177fornext_finalvalue5177) break; } fornext_error5177:; if(qbevent){evnt(25753,10520,"ide_methods.bas");if(r)goto S_46865;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10521,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_MAXPROGRESSWIDTH=*(int32*)(((char*)_FUNC_IDECHANGE_UDT_P)+(8))- 4 ; if(!qbevent)break;evnt(25753,10522,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_PERCENTAGE=qbr(floor(*_FUNC_IDECHANGE_LONG_Y/ ((long double)(*__LONG_IDEN))* 100 )); if(!qbevent)break;evnt(25753,10523,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_PERCENTAGECHARS=qbr(floor(*_FUNC_IDECHANGE_LONG_MAXPROGRESSWIDTH**_FUNC_IDECHANGE_LONG_Y/ ((long double)(*__LONG_IDEN)))); if(!qbevent)break;evnt(25753,10524,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_PERCENTAGEMSG,qbs_add(func_string(*_FUNC_IDECHANGE_LONG_PERCENTAGECHARS, 219 ),func_string(*_FUNC_IDECHANGE_LONG_MAXPROGRESSWIDTH-*_FUNC_IDECHANGE_LONG_PERCENTAGECHARS, 176 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10525,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHANGE_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDECHANGE_UDT_P)+(4))+ 7 ,_FUNC_IDECHANGE_STRING_PERCENTAGEMSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10526,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,10527,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_L,FUNC_IDEGETLINE(_FUNC_IDECHANGE_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10529,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGE_STRING_L2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10530,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_X1= 1 ; if(!qbevent)break;evnt(25753,10532,"ide_methods.bas");}while(r); LABEL_IDECHANGEALL:; if(qbevent){evnt(25753,10533,"ide_methods.bas");r=0;} S_46876:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,10534,"ide_methods.bas");if(r)goto S_46876;} do{ qbs_set(_FUNC_IDECHANGE_STRING_L3,qbs_ucase(_FUNC_IDECHANGE_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10534,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDECHANGE_STRING_L3,_FUNC_IDECHANGE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10534,"ide_methods.bas");}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(25753,10535,"ide_methods.bas");}while(r); S_46882:; if ((*_FUNC_IDECHANGE_LONG_X)||new_error){ if(qbevent){evnt(25753,10537,"ide_methods.bas");if(r)goto S_46882;} S_46883:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(25753,10538,"ide_methods.bas");if(r)goto S_46883;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 1 ; if(!qbevent)break;evnt(25753,10539,"ide_methods.bas");}while(r); S_46885:; if ((-(*_FUNC_IDECHANGE_LONG_X> 1 ))||new_error){ if(qbevent){evnt(25753,10540,"ide_methods.bas");if(r)goto S_46885;} 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(25753,10541,"ide_methods.bas");}while(r); S_46887:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 65 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(25753,10542,"ide_methods.bas");if(r)goto S_46887;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,10542,"ide_methods.bas");}while(r); } S_46890:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 48 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(25753,10543,"ide_methods.bas");if(r)goto S_46890;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,10543,"ide_methods.bas");}while(r); } } S_46894:; 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(25753,10545,"ide_methods.bas");if(r)goto S_46894;} 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(25753,10546,"ide_methods.bas");}while(r); S_46896:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 65 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(25753,10547,"ide_methods.bas");if(r)goto S_46896;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,10547,"ide_methods.bas");}while(r); } S_46899:; if (((-(*_FUNC_IDECHANGE_LONG_C>= 48 ))&(-(*_FUNC_IDECHANGE_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(25753,10548,"ide_methods.bas");if(r)goto S_46899;} do{ *_FUNC_IDECHANGE_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,10548,"ide_methods.bas");}while(r); } } S_46903:; if ((-(*_FUNC_IDECHANGE_LONG_WHOLE== 0 ))||new_error){ if(qbevent){evnt(25753,10550,"ide_methods.bas");if(r)goto S_46903;} S_46904:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_X1<=_FUNC_IDECHANGE_STRING_L->len)))||new_error){ if(qbevent){evnt(25753,10551,"ide_methods.bas");if(r)goto S_46904;} 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(25753,10552,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_X1=*_FUNC_IDECHANGE_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,10553,"ide_methods.bas");}while(r); do{ goto LABEL_IDECHANGEALL; if(!qbevent)break;evnt(25753,10554,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,10556,"ide_methods.bas");}while(r); } } } do{ if(!qbevent)break;evnt(25753,10561,"ide_methods.bas");}while(r); S_46914:; if ((*_FUNC_IDECHANGE_LONG_X)||new_error){ if(qbevent){evnt(25753,10562,"ide_methods.bas");if(r)goto S_46914;} do{ SUB_FINDQUOTECOMMENT(_FUNC_IDECHANGE_STRING_L,_FUNC_IDECHANGE_LONG_X,_FUNC_IDECHANGE_BYTE_COMMENT,_FUNC_IDECHANGE_BYTE_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10563,"ide_methods.bas");}while(r); S_46916:; if (((-(*__INTEGER_IDEFINDNOCOMMENTS!= 0 ))&*_FUNC_IDECHANGE_BYTE_COMMENT)||new_error){ if(qbevent){evnt(25753,10564,"ide_methods.bas");if(r)goto S_46916;} do{ *_FUNC_IDECHANGE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,10564,"ide_methods.bas");}while(r); } S_46919:; if (((-(*__INTEGER_IDEFINDNOSTRINGS!= 0 ))&*_FUNC_IDECHANGE_BYTE_QUOTE)||new_error){ if(qbevent){evnt(25753,10565,"ide_methods.bas");if(r)goto S_46919;} do{ *_FUNC_IDECHANGE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,10565,"ide_methods.bas");}while(r); } S_46922:; if (((-(*__INTEGER_IDEFINDONLYCOMMENTS!= 0 ))&(-(*_FUNC_IDECHANGE_BYTE_COMMENT== 0 )))||new_error){ if(qbevent){evnt(25753,10566,"ide_methods.bas");if(r)goto S_46922;} do{ *_FUNC_IDECHANGE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,10566,"ide_methods.bas");}while(r); } S_46925:; if (((-(*__INTEGER_IDEFINDONLYSTRINGS!= 0 ))&(-(*_FUNC_IDECHANGE_BYTE_QUOTE== 0 )))||new_error){ if(qbevent){evnt(25753,10567,"ide_methods.bas");if(r)goto S_46925;} do{ *_FUNC_IDECHANGE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,10567,"ide_methods.bas");}while(r); } } S_46929:; if ((*_FUNC_IDECHANGE_LONG_X)||new_error){ if(qbevent){evnt(25753,10570,"ide_methods.bas");if(r)goto S_46929;} 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(25753,10571,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_CHANGED=*_FUNC_IDECHANGE_LONG_CHANGED+ 1 ; if(!qbevent)break;evnt(25753,10572,"ide_methods.bas");}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(25753,10573,"ide_methods.bas");}while(r); S_46933:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDECHANGE_LONG_X1<=_FUNC_IDECHANGE_STRING_L->len)))||new_error){ if(qbevent){evnt(25753,10574,"ide_methods.bas");if(r)goto S_46933;} do{ goto LABEL_IDECHANGEALL; if(!qbevent)break;evnt(25753,10574,"ide_methods.bas");}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(25753,10577,"ide_methods.bas");}while(r); S_46938:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDECHANGE_STRING_L2,_FUNC_IDECHANGE_STRING_L)))||new_error){ if(qbevent){evnt(25753,10579,"ide_methods.bas");if(r)goto S_46938;} do{ SUB_IDESETLINE(_FUNC_IDECHANGE_LONG_Y,_FUNC_IDECHANGE_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10579,"ide_methods.bas");}while(r); } fornext_continue_5176:; } fornext_exit_5176:; do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10583,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass5185= 0 )); if(!qbevent)break;evnt(25753,10584,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,10585,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,10586,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,10587,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,10588,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,10589,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10590,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=157; if (next_return_point>=return_points) more_return_points(); goto LABEL_DISPLAYDIALOG; RETURN_157:; if(!qbevent)break;evnt(25753,10591,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,10592,"ide_methods.bas");}while(r); S_46952:; if ((-(*_FUNC_IDECHANGE_LONG_CHANGED== 0 ))||new_error){ if(qbevent){evnt(25753,10594,"ide_methods.bas");if(r)goto S_46952;} do{ SUB_IDENOMATCH(&(pass5186= 0 )); if(!qbevent)break;evnt(25753,10595,"ide_methods.bas");}while(r); }else{ do{ SUB_IDECHANGED(_FUNC_IDECHANGE_LONG_CHANGED); if(!qbevent)break;evnt(25753,10597,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,10597,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,10597,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHANGE_LONG_BUTTONSID)-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),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("Close",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10600,"ide_methods.bas");}while(r); } S_46961:; if ((qbs_cleanup(qbs_tmp_base,(((-(*_FUNC_IDECHANGE_LONG_FOCUS== 10 ))&(-(*_FUNC_IDECHANGE_LONG_INFO!= 0 ))))|(qbs_equal(__STRING_K,func_chr( 13 )))))||new_error){ if(qbevent){evnt(25753,10604,"ide_methods.bas");if(r)goto S_46961;} 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]))*89+64)); if(!qbevent)break;evnt(25753,10605,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,10606,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,10607,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDNOCOMMENTS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10608,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDONLYCOMMENTS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10609,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDNOSTRINGS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10610,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDONLYSTRINGS=*(int32*)(((char*)_FUNC_IDECHANGE_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHANGE_ARRAY_UDT_O[4],_FUNC_IDECHANGE_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,10611,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10612,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10613,"ide_methods.bas");}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(25753,10614,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10615,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGE_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,10623,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,10624,"ide_methods.bas");}while(r); dl_continue_5168:; }while(1); dl_exit_5168:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10626,"ide_methods.bas");}while(r); LABEL_DISPLAYDIALOG:; if(qbevent){evnt(25753,10627,"ide_methods.bas");r=0;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECHANGE_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,10628,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_F= 1 ; if(!qbevent)break;evnt(25753,10629,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,10629,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGE_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,10629,"ide_methods.bas");}while(r); S_46982:; fornext_value5188= 1 ; fornext_finalvalue5188= 100 ; fornext_step5188= 1 ; if (fornext_step5188<0) fornext_step_negative5188=1; else fornext_step_negative5188=0; if (new_error) goto fornext_error5188; goto fornext_entrylabel5188; while(1){ fornext_value5188=fornext_step5188+(*_FUNC_IDECHANGE_LONG_I); fornext_entrylabel5188: *_FUNC_IDECHANGE_LONG_I=fornext_value5188; if (fornext_step_negative5188){ if (fornext_value5188fornext_finalvalue5188) break; } fornext_error5188:; if(qbevent){evnt(25753,10630,"ide_methods.bas");if(r)goto S_46982;} S_46983:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,10632,"ide_methods.bas");if(r)goto S_46983;} 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]))*89+60))=*_FUNC_IDECHANGE_LONG_FOCUS-*_FUNC_IDECHANGE_LONG_F; if(!qbevent)break;evnt(25753,10635,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,10637,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,10637,"ide_methods.bas");}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]))*89) ),_FUNC_IDECHANGE_LONG_F); if(!qbevent)break;evnt(25753,10639,"ide_methods.bas");}while(r); S_46988:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,10641,"ide_methods.bas");if(r)goto S_46988;} 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]))*89+52)); if(!qbevent)break;evnt(25753,10641,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,10641,"ide_methods.bas");}while(r); } } fornext_continue_5187:; } fornext_exit_5187:; do{ #include "ret167.txt" if(!qbevent)break;evnt(25753,10645,"ide_methods.bas");}while(r); 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; qbs_maketmp(_FUNC_IDECHANGE_STRING_IDECHANGE);return _FUNC_IDECHANGE_STRING_IDECHANGE; } void SUB_FINDQUOTECOMMENT(qbs*_SUB_FINDQUOTECOMMENT_STRING_TEXT,int32*_SUB_FINDQUOTECOMMENT_LONG___CURSOR,int8*_SUB_FINDQUOTECOMMENT_BYTE_C,int8*_SUB_FINDQUOTECOMMENT_BYTE_Q){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_FINDQUOTECOMMENT_BYTE_C= 0 ; if(!qbevent)break;evnt(25753,10649,"ide_methods.bas");}while(r); do{ *_SUB_FINDQUOTECOMMENT_BYTE_Q= 0 ; if(!qbevent)break;evnt(25753,10649,"ide_methods.bas");}while(r); do{ *_SUB_FINDQUOTECOMMENT_LONG_CURSOR=*_SUB_FINDQUOTECOMMENT_LONG___CURSOR; if(!qbevent)break;evnt(25753,10650,"ide_methods.bas");}while(r); S_46998:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_FINDQUOTECOMMENT_LONG_CURSOR>_SUB_FINDQUOTECOMMENT_STRING_TEXT->len)))||new_error){ if(qbevent){evnt(25753,10651,"ide_methods.bas");if(r)goto S_46998;} do{ *_SUB_FINDQUOTECOMMENT_LONG_CURSOR=_SUB_FINDQUOTECOMMENT_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10651,"ide_methods.bas");}while(r); } S_47001:; fornext_value5193= 1 ; fornext_finalvalue5193=*_SUB_FINDQUOTECOMMENT_LONG_CURSOR; fornext_step5193= 1 ; if (fornext_step5193<0) fornext_step_negative5193=1; else fornext_step_negative5193=0; if (new_error) goto fornext_error5193; goto fornext_entrylabel5193; while(1){ fornext_value5193=fornext_step5193+(*_SUB_FINDQUOTECOMMENT_LONG_FIND_K); fornext_entrylabel5193: *_SUB_FINDQUOTECOMMENT_LONG_FIND_K=fornext_value5193; if (fornext_step_negative5193){ if (fornext_value5193fornext_finalvalue5193) break; } fornext_error5193:; if(qbevent){evnt(25753,10652,"ide_methods.bas");if(r)goto S_47001;} S_47002:; qbs_set(sc_5194,func_mid(_SUB_FINDQUOTECOMMENT_STRING_TEXT,*_SUB_FINDQUOTECOMMENT_LONG_FIND_K, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25753,10653,"ide_methods.bas");if(r)goto S_47002;} S_47003:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5194,func_chr( 34 ))))||new_error){ if(qbevent){evnt(25753,10654,"ide_methods.bas");if(r)goto S_47003;} do{ *_SUB_FINDQUOTECOMMENT_BYTE_Q=~(*_SUB_FINDQUOTECOMMENT_BYTE_Q); if(!qbevent)break;evnt(25753,10654,"ide_methods.bas");}while(r); sc_ec_334_end:; goto sc_5194_end; } S_47005:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5194,qbs_new_txt_len("'",1))))||new_error){ if(qbevent){evnt(25753,10655,"ide_methods.bas");if(r)goto S_47005;} S_47006:; if ((-(*_SUB_FINDQUOTECOMMENT_BYTE_Q== 0 ))||new_error){ if(qbevent){evnt(25753,10655,"ide_methods.bas");if(r)goto S_47006;} do{ *_SUB_FINDQUOTECOMMENT_BYTE_C= -1 ; if(!qbevent)break;evnt(25753,10655,"ide_methods.bas");}while(r); do{ goto fornext_exit_5192; if(!qbevent)break;evnt(25753,10655,"ide_methods.bas");}while(r); } sc_ec_335_end:; goto sc_5194_end; } S_47010:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5194,qbs_new_txt_len("R",1))||qbs_equal(sc_5194,qbs_new_txt_len("r",1))))||new_error){ if(qbevent){evnt(25753,10656,"ide_methods.bas");if(r)goto S_47010;} S_47011:; if ((-(*_SUB_FINDQUOTECOMMENT_BYTE_Q== 0 ))||new_error){ if(qbevent){evnt(25753,10657,"ide_methods.bas");if(r)goto S_47011;} S_47012:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_ucase(func_mid(_SUB_FINDQUOTECOMMENT_STRING_TEXT,*_SUB_FINDQUOTECOMMENT_LONG_FIND_K- 1 , 5 ,1)),qbs_new_txt_len(" REM ",5)))|(qbs_equal(qbs_ucase(func_mid(_SUB_FINDQUOTECOMMENT_STRING_TEXT,*_SUB_FINDQUOTECOMMENT_LONG_FIND_K- 1 , 5 ,1)),qbs_new_txt_len(":REM ",5)))|(((-((*_SUB_FINDQUOTECOMMENT_LONG_FIND_K+ 2 )==(_SUB_FINDQUOTECOMMENT_STRING_TEXT->len)))&(qbs_equal(qbs_ucase(func_mid(_SUB_FINDQUOTECOMMENT_STRING_TEXT,*_SUB_FINDQUOTECOMMENT_LONG_FIND_K- 1 , 4 ,1)),qbs_new_txt_len(" REM",4)))))|(((-((*_SUB_FINDQUOTECOMMENT_LONG_FIND_K+ 2 )==(_SUB_FINDQUOTECOMMENT_STRING_TEXT->len)))&(qbs_equal(qbs_ucase(func_mid(_SUB_FINDQUOTECOMMENT_STRING_TEXT,*_SUB_FINDQUOTECOMMENT_LONG_FIND_K- 1 , 4 ,1)),qbs_new_txt_len(":REM",4)))))|(((-(*_SUB_FINDQUOTECOMMENT_LONG_FIND_K== 1 ))&(qbs_equal(qbs_ucase(qbs_left(_SUB_FINDQUOTECOMMENT_STRING_TEXT, 4 )),qbs_new_txt_len("REM ",4)))))|(((-(*_SUB_FINDQUOTECOMMENT_LONG_FIND_K== 1 ))&(qbs_equal(qbs_ucase(_SUB_FINDQUOTECOMMENT_STRING_TEXT),qbs_new_txt_len("REM",3)))))))||new_error){ if(qbevent){evnt(25753,10663,"ide_methods.bas");if(r)goto S_47012;} do{ *_SUB_FINDQUOTECOMMENT_BYTE_C= -1 ; if(!qbevent)break;evnt(25753,10664,"ide_methods.bas");}while(r); do{ goto fornext_exit_5192; if(!qbevent)break;evnt(25753,10664,"ide_methods.bas");}while(r); } } sc_ec_336_end:; goto sc_5194_end; } sc_5194_end:; fornext_continue_5192:; } fornext_exit_5192:; 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_IDECHANGED(int32*_SUB_IDECHANGED_LONG_TOTALCHANGES){ 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" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_47019:; if ((-(*_SUB_IDECHANGED_LONG_TOTALCHANGES> 1 ))||new_error){ if(qbevent){evnt(25753,10672,"ide_methods.bas");if(r)goto S_47019;} do{ qbs_set(_SUB_IDECHANGED_STRING_PL,qbs_new_txt_len("s",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10672,"ide_methods.bas");}while(r); } do{ *_SUB_IDECHANGED_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Change Complete",15),qbs_add(qbs_add(qbs_add(qbs_ltrim(qbs_str((int32)(*_SUB_IDECHANGED_LONG_TOTALCHANGES))),qbs_new_txt_len(" substitution",13)),_SUB_IDECHANGED_STRING_PL),qbs_new_txt_len(".",1)),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10673,"ide_methods.bas");}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_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 "data170.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,10679,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,10680,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,10681,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10682,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,10683,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,10684,"ide_methods.bas");}while(r); do{ if (_FUNC_IDECHANGEIT_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECHANGEIT_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDECHANGEIT_ARRAY_UDT_O[0]),0,_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDECHANGEIT_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECHANGEIT_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDECHANGEIT_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECHANGEIT_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,10685,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,10686,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHANGEIT_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10687,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_I= 0 ; if(!qbevent)break;evnt(25753,10691,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_W= 45 ; if(!qbevent)break;evnt(25753,10692,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(0))=( 40 )-(*_FUNC_IDECHANGEIT_LONG_W/ 2 ); if(!qbevent)break;evnt(25753,10693,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(4))=*__LONG_IDEWY- 4 ; if(!qbevent)break;evnt(25753,10694,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(8))=*_FUNC_IDECHANGEIT_LONG_W; if(!qbevent)break;evnt(25753,10695,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(12))= 2 ; if(!qbevent)break;evnt(25753,10696,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHANGEIT_UDT_P)+(16))=FUNC_IDENEWTXT(qbs_new_txt_len("Change",6)); if(!qbevent)break;evnt(25753,10697,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_I=*_FUNC_IDECHANGEIT_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,10699,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,10700,"ide_methods.bas");}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]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,10701,"ide_methods.bas");}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]))*89+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(25753,10702,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,10703,"ide_methods.bas");}while(r); S_47044:; fornext_value5198= 1 ; fornext_finalvalue5198= 100 ; fornext_step5198= 1 ; if (fornext_step5198<0) fornext_step_negative5198=1; else fornext_step_negative5198=0; if (new_error) goto fornext_error5198; goto fornext_entrylabel5198; while(1){ fornext_value5198=fornext_step5198+(*_FUNC_IDECHANGEIT_LONG_I); fornext_entrylabel5198: *_FUNC_IDECHANGEIT_LONG_I=fornext_value5198; if (fornext_step_negative5198){ if (fornext_value5198fornext_finalvalue5198) break; } fornext_error5198:; if(qbevent){evnt(25753,10707,"ide_methods.bas");if(r)goto S_47044;} 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]))*89)+ 0,((char*)_FUNC_IDECHANGEIT_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,10707,"ide_methods.bas");}while(r); fornext_continue_5197:; } fornext_exit_5197:; S_47047:; do{ if(qbevent){evnt(25753,10710,"ide_methods.bas");if(r)goto S_47047;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECHANGEIT_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,10713,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_F= 1 ; if(!qbevent)break;evnt(25753,10714,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,10714,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,10714,"ide_methods.bas");}while(r); S_47052:; fornext_value5201= 1 ; fornext_finalvalue5201= 100 ; fornext_step5201= 1 ; if (fornext_step5201<0) fornext_step_negative5201=1; else fornext_step_negative5201=0; if (new_error) goto fornext_error5201; goto fornext_entrylabel5201; while(1){ fornext_value5201=fornext_step5201+(*_FUNC_IDECHANGEIT_LONG_I); fornext_entrylabel5201: *_FUNC_IDECHANGEIT_LONG_I=fornext_value5201; if (fornext_step_negative5201){ if (fornext_value5201fornext_finalvalue5201) break; } fornext_error5201:; if(qbevent){evnt(25753,10715,"ide_methods.bas");if(r)goto S_47052;} S_47053:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,10716,"ide_methods.bas");if(r)goto S_47053;} 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]))*89+60))=*_FUNC_IDECHANGEIT_LONG_FOCUS-*_FUNC_IDECHANGEIT_LONG_F; if(!qbevent)break;evnt(25753,10718,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,10719,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,10719,"ide_methods.bas");}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]))*89) ),_FUNC_IDECHANGEIT_LONG_F); if(!qbevent)break;evnt(25753,10720,"ide_methods.bas");}while(r); S_47058:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,10721,"ide_methods.bas");if(r)goto S_47058;} 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]))*89+52)); if(!qbevent)break;evnt(25753,10721,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,10721,"ide_methods.bas");}while(r); } } fornext_continue_5200:; } fornext_exit_5200:; do{ *_FUNC_IDECHANGEIT_LONG_LASTFOCUS=*_FUNC_IDECHANGEIT_LONG_F- 1 ; if(!qbevent)break;evnt(25753,10724,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,10731,"ide_methods.bas");}while(r); S_47066:; if ((*_FUNC_IDECHANGEIT_LONG_CX)||new_error){ if(qbevent){evnt(25753,10732,"ide_methods.bas");if(r)goto S_47066;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10732,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDECHANGEIT_LONG_CY,*_FUNC_IDECHANGEIT_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,10732,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10732,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,10735,"ide_methods.bas");}while(r); S_47072:; do{ if(qbevent){evnt(25753,10736,"ide_methods.bas");if(r)goto S_47072;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,10737,"ide_methods.bas");}while(r); S_47074:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,10738,"ide_methods.bas");if(r)goto S_47074;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10738,"ide_methods.bas");}while(r); } S_47077:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,10739,"ide_methods.bas");if(r)goto S_47077;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10739,"ide_methods.bas");}while(r); } S_47080:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,10740,"ide_methods.bas");if(r)goto S_47080;} do{ *_FUNC_IDECHANGEIT_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,10740,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10740,"ide_methods.bas");}while(r); } S_47084:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,10741,"ide_methods.bas");if(r)goto S_47084;} do{ *_FUNC_IDECHANGEIT_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,10741,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10741,"ide_methods.bas");}while(r); } S_47088:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,10742,"ide_methods.bas");if(r)goto S_47088;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10742,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,10743,"ide_methods.bas");}while(r); S_47092:; if ((-(*_FUNC_IDECHANGEIT_LONG_ALT!=*_FUNC_IDECHANGEIT_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,10743,"ide_methods.bas");if(r)goto S_47092;} do{ *_FUNC_IDECHANGEIT_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,10743,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_OLDALT=*_FUNC_IDECHANGEIT_LONG_ALT; if(!qbevent)break;evnt(25753,10744,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,10745,"ide_methods.bas");}while(r); S_47097:; dl_continue_5202:; }while((!(*_FUNC_IDECHANGEIT_LONG_CHANGE))&&(!new_error)); dl_exit_5202:; if(qbevent){evnt(25753,10746,"ide_methods.bas");if(r)goto S_47097;} S_47098:; if ((*_FUNC_IDECHANGEIT_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,10747,"ide_methods.bas");if(r)goto S_47098;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,10747,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,10747,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10749,"ide_methods.bas");}while(r); S_47104:; if ((*_FUNC_IDECHANGEIT_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,10750,"ide_methods.bas");if(r)goto S_47104;} S_47105:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,10751,"ide_methods.bas");if(r)goto S_47105;} do{ *_FUNC_IDECHANGEIT_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10752,"ide_methods.bas");}while(r); S_47107:; if (((-(*_FUNC_IDECHANGEIT_LONG_K>= 65 ))&(-(*_FUNC_IDECHANGEIT_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,10753,"ide_methods.bas");if(r)goto S_47107;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,func_chr(*_FUNC_IDECHANGEIT_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10753,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10756,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,10756,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,10756,"ide_methods.bas");}while(r); S_47115:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,10759,"ide_methods.bas");if(r)goto S_47115;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10759,"ide_methods.bas");}while(r); } S_47118:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("S",1))))||new_error){ if(qbevent){evnt(25753,10760,"ide_methods.bas");if(r)goto S_47118;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_ALTLETTER,qbs_new_txt_len("S",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10760,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,10763,"ide_methods.bas");}while(r); S_47122:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,10764,"ide_methods.bas");if(r)goto S_47122;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10764,"ide_methods.bas");}while(r); } S_47125:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,10765,"ide_methods.bas");if(r)goto S_47125;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS=*_FUNC_IDECHANGEIT_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,10765,"ide_methods.bas");}while(r); } S_47128:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,10766,"ide_methods.bas");if(r)goto S_47128;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS=*_FUNC_IDECHANGEIT_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,10766,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10766,"ide_methods.bas");}while(r); } S_47132:; if ((-(*_FUNC_IDECHANGEIT_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,10767,"ide_methods.bas");if(r)goto S_47132;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS=*_FUNC_IDECHANGEIT_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,10767,"ide_methods.bas");}while(r); } S_47135:; if ((-(*_FUNC_IDECHANGEIT_LONG_FOCUS>*_FUNC_IDECHANGEIT_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,10768,"ide_methods.bas");if(r)goto S_47135;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,10768,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_F= 1 ; if(!qbevent)break;evnt(25753,10769,"ide_methods.bas");}while(r); S_47139:; fornext_value5205= 1 ; fornext_finalvalue5205= 100 ; fornext_step5205= 1 ; if (fornext_step5205<0) fornext_step_negative5205=1; else fornext_step_negative5205=0; if (new_error) goto fornext_error5205; goto fornext_entrylabel5205; while(1){ fornext_value5205=fornext_step5205+(*_FUNC_IDECHANGEIT_LONG_I); fornext_entrylabel5205: *_FUNC_IDECHANGEIT_LONG_I=fornext_value5205; if (fornext_step_negative5205){ if (fornext_value5205fornext_finalvalue5205) break; } fornext_error5205:; if(qbevent){evnt(25753,10770,"ide_methods.bas");if(r)goto S_47139;} 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]))*89+36)); if(!qbevent)break;evnt(25753,10771,"ide_methods.bas");}while(r); S_47141:; if ((*_FUNC_IDECHANGEIT_LONG_T)||new_error){ if(qbevent){evnt(25753,10772,"ide_methods.bas");if(r)goto S_47141;} do{ *_FUNC_IDECHANGEIT_LONG_FOCUSOFFSET=*_FUNC_IDECHANGEIT_LONG_FOCUS-*_FUNC_IDECHANGEIT_LONG_F; if(!qbevent)break;evnt(25753,10773,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,10774,"ide_methods.bas");}while(r); } fornext_continue_5204:; } fornext_exit_5204:; S_47146:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(25753,10779,"ide_methods.bas");if(r)goto S_47146;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10780,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10781,"ide_methods.bas");}while(r); } S_47150:; if ((*_FUNC_IDECHANGEIT_LONG_INFO)||new_error){ if(qbevent){evnt(25753,10784,"ide_methods.bas");if(r)goto S_47150;} S_47151:; if ((-(*_FUNC_IDECHANGEIT_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(25753,10785,"ide_methods.bas");if(r)goto S_47151;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10785,"ide_methods.bas");}while(r); } S_47154:; if ((-(*_FUNC_IDECHANGEIT_LONG_INFO== 2 ))||new_error){ if(qbevent){evnt(25753,10786,"ide_methods.bas");if(r)goto S_47154;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10786,"ide_methods.bas");}while(r); } S_47157:; if ((-(*_FUNC_IDECHANGEIT_LONG_INFO== 3 ))||new_error){ if(qbevent){evnt(25753,10787,"ide_methods.bas");if(r)goto S_47157;} do{ qbs_set(_FUNC_IDECHANGEIT_STRING_IDECHANGEIT,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10787,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,10788,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHANGEIT_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,10792,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHANGEIT_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,10793,"ide_methods.bas");}while(r); dl_continue_5199:; }while(1); dl_exit_5199:; 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_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 "data171.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_47165:; fornext_value5207= 1 ; fornext_finalvalue5207=*__LONG_IDEBMKN; fornext_step5207= 1 ; if (fornext_step5207<0) fornext_step_negative5207=1; else fornext_step_negative5207=0; if (new_error) goto fornext_error5207; goto fornext_entrylabel5207; while(1){ fornext_value5207=fornext_step5207+(*_SUB_IDEDELLINE_LONG_B); fornext_entrylabel5207: *_SUB_IDEDELLINE_LONG_B=fornext_value5207; if (fornext_step_negative5207){ if (fornext_value5207fornext_finalvalue5207) break; } fornext_error5207:; if(qbevent){evnt(25753,10801,"ide_methods.bas");if(r)goto S_47165;} S_47166:; 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(25753,10802,"ide_methods.bas");if(r)goto S_47166;} 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(25753,10803,"ide_methods.bas");}while(r); S_47168:; if ((-(*_SUB_IDEDELLINE_LONG_Y== 0 ))||new_error){ if(qbevent){evnt(25753,10803,"ide_methods.bas");if(r)goto S_47168;} do{ *_SUB_IDEDELLINE_LONG_Y= 1 ; if(!qbevent)break;evnt(25753,10803,"ide_methods.bas");}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(25753,10804,"ide_methods.bas");}while(r); } fornext_continue_5206:; } fornext_exit_5206:; S_47174:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(25753,10808,"ide_methods.bas");if(r)goto S_47174;} S_47175:; if (((-(*__LONG_IDEN>func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)))|(-(*__LONG_IDEN>func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1))))||new_error){ if(qbevent){evnt(25753,10809,"ide_methods.bas");if(r)goto S_47175;} do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ preserved_elements=__ARRAY_BYTE_IDEBREAKPOINTS[5]; } else preserved_elements=0; __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); tmp_long=__ARRAY_BYTE_IDEBREAKPOINTS[5]; __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ preserved_elements=__ARRAY_BYTE_IDESKIPLINES[5]; } else preserved_elements=0; __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDESKIPLINES[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); tmp_long=__ARRAY_BYTE_IDESKIPLINES[5]; __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementsfornext_finalvalue5209) break; } fornext_error5209:; if(qbevent){evnt(25753,10814,"ide_methods.bas");if(r)goto S_47179;} do{ swap_8(&((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDEDELLINE_LONG_B)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])],&((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDEDELLINE_LONG_B+ 1 )-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]); if(!qbevent)break;evnt(25753,10815,"ide_methods.bas");}while(r); fornext_continue_5208:; } fornext_exit_5208:; do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ preserved_elements=__ARRAY_BYTE_IDEBREAKPOINTS[5]; } else preserved_elements=0; __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN- 1 )-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); tmp_long=__ARRAY_BYTE_IDEBREAKPOINTS[5]; __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementsfornext_finalvalue5211) break; } fornext_error5211:; if(qbevent){evnt(25753,10819,"ide_methods.bas");if(r)goto S_47183;} do{ swap_8(&((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDEDELLINE_LONG_B)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])],&((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDEDELLINE_LONG_B- 1 )-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]); if(!qbevent)break;evnt(25753,10820,"ide_methods.bas");}while(r); fornext_continue_5210:; } fornext_exit_5210:; do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ preserved_elements=__ARRAY_BYTE_IDESKIPLINES[5]; } else preserved_elements=0; __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN- 1 )-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDESKIPLINES[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); tmp_long=__ARRAY_BYTE_IDESKIPLINES[5]; __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementslen-*__LONG_IDELI+ 1 - 8 -*_SUB_IDEDELLINE_LONG_TEXTLEN))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10827,"ide_methods.bas");}while(r); do{ *__LONG_IDEN=*__LONG_IDEN- 1 ; if(!qbevent)break;evnt(25753,10828,"ide_methods.bas");}while(r); S_47192:; if ((-(*_SUB_IDEDELLINE_LONG_I>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,10830,"ide_methods.bas");if(r)goto S_47192;} do{ SUB_IDEGOTOLINE(__LONG_IDEN); if(!qbevent)break;evnt(25753,10830,"ide_methods.bas");}while(r); } 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_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 "data172.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__INTEGER_IDETXTLAST= 0 ; if(!qbevent)break;evnt(25753,10835,"ide_methods.bas");}while(r); 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; } 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 "data173.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,10839,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10840,"ide_methods.bas");}while(r); S_47198:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 1 ))||new_error){ if(qbevent){evnt(25753,10843,"ide_methods.bas");if(r)goto S_47198;} S_47199:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(25753,10844,"ide_methods.bas");if(r)goto S_47199;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(25753,10844,"ide_methods.bas");}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(25753,10845,"ide_methods.bas");}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(25753,10845,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10846,"ide_methods.bas");}while(r); S_47205:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,10847,"ide_methods.bas");if(r)goto S_47205;} 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(25753,10848,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_SUB_IDEDRAWOBJ_LONG_Y,*_SUB_IDEDRAWOBJ_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,10849,"ide_methods.bas");}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(25753,10849,"ide_methods.bas");}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(25753,10850,"ide_methods.bas");}while(r); } S_47211:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))== 0 ))||new_error){ if(qbevent){evnt(25753,10852,"ide_methods.bas");if(r)goto S_47211;} do{ *_SUB_IDEDRAWOBJ_LONG_X2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(8))- 1 ; if(!qbevent)break;evnt(25753,10852,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))=*_SUB_IDEDRAWOBJ_LONG_X2-*_SUB_IDEDRAWOBJ_LONG_X- 3 ; if(!qbevent)break;evnt(25753,10852,"ide_methods.bas");}while(r); } do{ SUB_IDEBOX(_SUB_IDEDRAWOBJ_LONG_X,&(pass5213=*_SUB_IDEDRAWOBJ_LONG_Y- 1 ),&(pass5214=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 4 ),&(pass5215= 3 )); if(!qbevent)break;evnt(25753,10853,"ide_methods.bas");}while(r); S_47216:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))== 0 ))||new_error){ if(qbevent){evnt(25753,10854,"ide_methods.bas");if(r)goto S_47216;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))=FUNC_IDENEWTXT(qbs_new_txt_len("",0)); if(!qbevent)break;evnt(25753,10854,"ide_methods.bas");}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(25753,10855,"ide_methods.bas");}while(r); S_47220:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))>_SUB_IDEDRAWOBJ_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,10856,"ide_methods.bas");if(r)goto S_47220;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))=_SUB_IDEDRAWOBJ_STRING_A->len; if(!qbevent)break;evnt(25753,10856,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_CX=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81)); if(!qbevent)break;evnt(25753,10857,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_TX= 1 ; if(!qbevent)break;evnt(25753,10859,"ide_methods.bas");}while(r); S_47225:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEDRAWOBJ_STRING_A->len>*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)))))||new_error){ if(qbevent){evnt(25753,10860,"ide_methods.bas");if(r)goto S_47225;} S_47226:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 ))||new_error){ if(qbevent){evnt(25753,10861,"ide_methods.bas");if(r)goto S_47226;} do{ *_SUB_IDEDRAWOBJ_LONG_TX=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))-*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 1 ; if(!qbevent)break;evnt(25753,10862,"ide_methods.bas");}while(r); S_47228:; if ((-(*_SUB_IDEDRAWOBJ_LONG_TX< 1 ))||new_error){ if(qbevent){evnt(25753,10863,"ide_methods.bas");if(r)goto S_47228;} do{ *_SUB_IDEDRAWOBJ_LONG_TX= 1 ; if(!qbevent)break;evnt(25753,10863,"ide_methods.bas");}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(25753,10864,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_CX=*_SUB_IDEDRAWOBJ_LONG_CX-*_SUB_IDEDRAWOBJ_LONG_TX+ 1 ; if(!qbevent)break;evnt(25753,10865,"ide_methods.bas");}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(25753,10867,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEDRAWOBJ_LONG_SX1=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(77)); if(!qbevent)break;evnt(25753,10871,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_SX2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81)); if(!qbevent)break;evnt(25753,10871,"ide_methods.bas");}while(r); S_47239:; if ((-(*_SUB_IDEDRAWOBJ_LONG_SX1>*_SUB_IDEDRAWOBJ_LONG_SX2))||new_error){ if(qbevent){evnt(25753,10872,"ide_methods.bas");if(r)goto S_47239;} do{ swap_32(&*_SUB_IDEDRAWOBJ_LONG_SX1,&*_SUB_IDEDRAWOBJ_LONG_SX2); if(!qbevent)break;evnt(25753,10872,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_X=*_SUB_IDEDRAWOBJ_LONG_X+ 2 ; if(!qbevent)break;evnt(25753,10874,"ide_methods.bas");}while(r); S_47243:; if (((-(*(int8*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(76))== 0 ))|(-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))!= 0 )))||new_error){ if(qbevent){evnt(25753,10876,"ide_methods.bas");if(r)goto S_47243;} do{ sub__printstring(*_SUB_IDEDRAWOBJ_LONG_X,*_SUB_IDEDRAWOBJ_LONG_Y,_SUB_IDEDRAWOBJ_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10877,"ide_methods.bas");}while(r); }else{ S_47246:; fornext_value5220= 1 ; fornext_finalvalue5220=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step5220= 1 ; if (fornext_step5220<0) fornext_step_negative5220=1; else fornext_step_negative5220=0; if (new_error) goto fornext_error5220; goto fornext_entrylabel5220; while(1){ fornext_value5220=fornext_step5220+(*_SUB_IDEDRAWOBJ_LONG_COLORCHAR); fornext_entrylabel5220: *_SUB_IDEDRAWOBJ_LONG_COLORCHAR=fornext_value5220; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5220){ if (fornext_value5220fornext_finalvalue5220) break; } fornext_error5220:; if(qbevent){evnt(25753,10879,"ide_methods.bas");if(r)goto S_47246;} S_47247:; if (((-((*_SUB_IDEDRAWOBJ_LONG_COLORCHAR+*_SUB_IDEDRAWOBJ_LONG_TX- 2 )>=*_SUB_IDEDRAWOBJ_LONG_SX1))&(-((*_SUB_IDEDRAWOBJ_LONG_COLORCHAR+*_SUB_IDEDRAWOBJ_LONG_TX- 2 )<*_SUB_IDEDRAWOBJ_LONG_SX2)))||new_error){ if(qbevent){evnt(25753,10880,"ide_methods.bas");if(r)goto S_47247;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,10880,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10880,"ide_methods.bas");}while(r); } do{ sub__printstring(*_SUB_IDEDRAWOBJ_LONG_X- 1 +*_SUB_IDEDRAWOBJ_LONG_COLORCHAR,*_SUB_IDEDRAWOBJ_LONG_Y,func_mid(_SUB_IDEDRAWOBJ_STRING_A,*_SUB_IDEDRAWOBJ_LONG_COLORCHAR, 1 ,1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10881,"ide_methods.bas");}while(r); fornext_continue_5219:; } fornext_exit_5219:; } S_47255:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 ))||new_error){ if(qbevent){evnt(25753,10885,"ide_methods.bas");if(r)goto S_47255;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*_SUB_IDEDRAWOBJ_LONG_X+*_SUB_IDEDRAWOBJ_LONG_CX; if(!qbevent)break;evnt(25753,10885,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(56))=*_SUB_IDEDRAWOBJ_LONG_Y; if(!qbevent)break;evnt(25753,10885,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(25753,10886,"ide_methods.bas");}while(r); } S_47261:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 2 ))||new_error){ if(qbevent){evnt(25753,10890,"ide_methods.bas");if(r)goto S_47261;} S_47262:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(25753,10891,"ide_methods.bas");if(r)goto S_47262;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(25753,10891,"ide_methods.bas");}while(r); } S_47265:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))== 0 ))||new_error){ if(qbevent){evnt(25753,10892,"ide_methods.bas");if(r)goto S_47265;} 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(25753,10892,"ide_methods.bas");}while(r); } S_47268:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))== 0 ))||new_error){ if(qbevent){evnt(25753,10893,"ide_methods.bas");if(r)goto S_47268;} 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(25753,10893,"ide_methods.bas");}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(25753,10894,"ide_methods.bas");}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(25753,10894,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10895,"ide_methods.bas");}while(r); do{ SUB_IDEBOX(_SUB_IDEDRAWOBJ_LONG_X,_SUB_IDEDRAWOBJ_LONG_Y,&(pass5222=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 2 ),&(pass5223=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))+ 2 )); if(!qbevent)break;evnt(25753,10896,"ide_methods.bas");}while(r); S_47275:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,10897,"ide_methods.bas");if(r)goto S_47275;} 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(25753,10898,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_W=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 2 ; if(!qbevent)break;evnt(25753,10899,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_M=*_SUB_IDEDRAWOBJ_LONG_W/ 2 ; if(!qbevent)break;evnt(25753,10900,"ide_methods.bas");}while(r); S_47279:; if ((*_SUB_IDEDRAWOBJ_LONG_W& 1 )||new_error){ if(qbevent){evnt(25753,10900,"ide_methods.bas");if(r)goto S_47279;} do{ *_SUB_IDEDRAWOBJ_LONG_M=*_SUB_IDEDRAWOBJ_LONG_M+ 1 ; if(!qbevent)break;evnt(25753,10900,"ide_methods.bas");}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(25753,10901,"ide_methods.bas");}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(25753,10901,"ide_methods.bas");}while(r); } S_47285:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))== 0 ))||new_error){ if(qbevent){evnt(25753,10904,"ide_methods.bas");if(r)goto S_47285;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))= -1 ; if(!qbevent)break;evnt(25753,10904,"ide_methods.bas");}while(r); } S_47288:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))== 0 ))||new_error){ if(qbevent){evnt(25753,10905,"ide_methods.bas");if(r)goto S_47288;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))=FUNC_IDENEWTXT(qbs_new_txt_len("",0)); if(!qbevent)break;evnt(25753,10905,"ide_methods.bas");}while(r); } S_47291:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))== 0 ))||new_error){ if(qbevent){evnt(25753,10906,"ide_methods.bas");if(r)goto S_47291;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(72))=FUNC_IDENEWTXT(qbs_new_txt_len("",0)); if(!qbevent)break;evnt(25753,10906,"ide_methods.bas");}while(r); } S_47294:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))== 0 ))||new_error){ if(qbevent){evnt(25753,10907,"ide_methods.bas");if(r)goto S_47294;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))= 1 ; if(!qbevent)break;evnt(25753,10907,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_S=func_abs((int32)(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64)))); if(!qbevent)break;evnt(25753,10908,"ide_methods.bas");}while(r); S_47298:; if ((-(*_SUB_IDEDRAWOBJ_LONG_S>=(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32)))))||new_error){ if(qbevent){evnt(25753,10909,"ide_methods.bas");if(r)goto S_47298;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))=*_SUB_IDEDRAWOBJ_LONG_S-*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(25753,10909,"ide_methods.bas");}while(r); } S_47301:; if ((-(*_SUB_IDEDRAWOBJ_LONG_S<*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))))||new_error){ if(qbevent){evnt(25753,10910,"ide_methods.bas");if(r)goto S_47301;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81))=*_SUB_IDEDRAWOBJ_LONG_S; if(!qbevent)break;evnt(25753,10910,"ide_methods.bas");}while(r); } S_47304:; if (((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))!= 0 ))&(-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))> 0 )))||new_error){ if(qbevent){evnt(25753,10911,"ide_methods.bas");if(r)goto S_47304;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))); if(!qbevent)break;evnt(25753,10911,"ide_methods.bas");}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(25753,10912,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(25753,10913,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Y= 1 ; if(!qbevent)break;evnt(25753,10914,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_V1=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(81)); if(!qbevent)break;evnt(25753,10915,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10916,"ide_methods.bas");}while(r); S_47312:; fornext_value5225= 1 ; fornext_finalvalue5225=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step5225= 1 ; if (fornext_step5225<0) fornext_step_negative5225=1; else fornext_step_negative5225=0; if (new_error) goto fornext_error5225; goto fornext_entrylabel5225; while(1){ fornext_value5225=fornext_step5225+(*_SUB_IDEDRAWOBJ_LONG_I2); fornext_entrylabel5225: *_SUB_IDEDRAWOBJ_LONG_I2=fornext_value5225; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5225){ if (fornext_value5225fornext_finalvalue5225) break; } fornext_error5225:; if(qbevent){evnt(25753,10917,"ide_methods.bas");if(r)goto S_47312;} 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(25753,10918,"ide_methods.bas");}while(r); S_47314:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEDRAWOBJ_STRING_A2,_SUB_IDEDRAWOBJ_STRING1_SEP)))||new_error){ if(qbevent){evnt(25753,10919,"ide_methods.bas");if(r)goto S_47314;} 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(25753,10919,"ide_methods.bas");}while(r); } S_47317:; 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(25753,10920,"ide_methods.bas");if(r)goto S_47317;} S_47318:; if ((-(*_SUB_IDEDRAWOBJ_LONG_N<*_SUB_IDEDRAWOBJ_LONG_V1))||new_error){ if(qbevent){evnt(25753,10921,"ide_methods.bas");if(r)goto S_47318;} }else{ S_47320:; if ((-(*_SUB_IDEDRAWOBJ_LONG_Y<=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(32))))||new_error){ if(qbevent){evnt(25753,10924,"ide_methods.bas");if(r)goto S_47320;} do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_add(qbs_new_txt_len(" ",1),qbs_rtrim(_SUB_IDEDRAWOBJ_STRING_A3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10925,"ide_methods.bas");}while(r); S_47322:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,10926,"ide_methods.bas");if(r)goto S_47322;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,10927,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(68))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24))+*_SUB_IDEDRAWOBJ_LONG_Y; if(!qbevent)break;evnt(25753,10928,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10930,"ide_methods.bas");}while(r); } S_47328:; 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(25753,10932,"ide_methods.bas");if(r)goto S_47328;} 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(25753,10933,"ide_methods.bas");}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(25753,10933,"ide_methods.bas");}while(r); S_47331:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal((qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 2 )),(qbs_add(func_chr( 32 ),func_chr( 195 )))))|(qbs_equal((qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 2 )),(qbs_add(func_chr( 32 ),func_chr( 192 )))))))||new_error){ if(qbevent){evnt(25753,10934,"ide_methods.bas");if(r)goto S_47331;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))+ 2 ; if(!qbevent)break;evnt(25753,10935,"ide_methods.bas");}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(25753,10939,"ide_methods.bas");}while(r); S_47336:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_IDEDRAWOBJ_STRING_A3,func_chr( 16 ),0)))||new_error){ if(qbevent){evnt(25753,10940,"ide_methods.bas");if(r)goto S_47336;} do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER= 0 ; if(!qbevent)break;evnt(25753,10945,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_RIGHTSIDELIMIT=func_pos( 1 )+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))- 1 ; if(!qbevent)break;evnt(25753,10946,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_CF=func_pos( 1 ); if(!qbevent)break;evnt(25753,10947,"ide_methods.bas");}while(r); S_47340:; do{ if(qbevent){evnt(25753,10948,"ide_methods.bas");if(r)goto S_47340;} do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER=*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ; if(!qbevent)break;evnt(25753,10949,"ide_methods.bas");}while(r); S_47342:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEDRAWOBJ_LONG_CHARACTER>_SUB_IDEDRAWOBJ_STRING_A3->len)))||new_error){ if(qbevent){evnt(25753,10950,"ide_methods.bas");if(r)goto S_47342;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))-(func_pos( 1 )-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))))+ 1 )); if (new_error) goto skip5230; makefit(tqbs); qbs_print(tqbs,0); skip5230: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10951,"ide_methods.bas");}while(r); do{ goto dl_exit_5228; if(!qbevent)break;evnt(25753,10952,"ide_methods.bas");}while(r); } S_47346:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER)== 16 ))&(-(*_SUB_IDEDRAWOBJ_LONG_CHARACTER<_SUB_IDEDRAWOBJ_STRING_A3->len))))||new_error){ if(qbevent){evnt(25753,10954,"ide_methods.bas");if(r)goto S_47346;} S_47347:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 )>= 0 ))&(-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 )<= 15 ))))||new_error){ if(qbevent){evnt(25753,10955,"ide_methods.bas");if(r)goto S_47347;} do{ qbg_sub_color(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ),NULL,NULL,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10956,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER=*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ; if(!qbevent)break;evnt(25753,10957,"ide_methods.bas");}while(r); do{ goto dl_continue_5228; if(!qbevent)break;evnt(25753,10958,"ide_methods.bas");}while(r); S_47351:; }else{ if (qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 )== 16 ))){ if(qbevent){evnt(25753,10959,"ide_methods.bas");if(r)goto S_47351;} S_47352:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,10960,"ide_methods.bas");if(r)goto S_47352;} do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,10960,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,10960,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER=*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ; if(!qbevent)break;evnt(25753,10961,"ide_methods.bas");}while(r); do{ goto dl_continue_5228; if(!qbevent)break;evnt(25753,10962,"ide_methods.bas");}while(r); } } S_47360:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER)== 17 ))&(-(*_SUB_IDEDRAWOBJ_LONG_CHARACTER<_SUB_IDEDRAWOBJ_STRING_A3->len)))){ if(qbevent){evnt(25753,10964,"ide_methods.bas");if(r)goto S_47360;} S_47361:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 )>= 0 ))&(-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 )<= 15 ))))||new_error){ if(qbevent){evnt(25753,10965,"ide_methods.bas");if(r)goto S_47361;} S_47362:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))!=*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,10966,"ide_methods.bas");if(r)goto S_47362;} do{ qbg_sub_color(NULL,qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ),NULL,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10966,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER=*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ; if(!qbevent)break;evnt(25753,10967,"ide_methods.bas");}while(r); do{ goto dl_continue_5228; if(!qbevent)break;evnt(25753,10968,"ide_methods.bas");}while(r); S_47367:; }else{ if (qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 )== 17 ))){ if(qbevent){evnt(25753,10969,"ide_methods.bas");if(r)goto S_47367;} S_47368:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,10970,"ide_methods.bas");if(r)goto S_47368;} do{ qbg_sub_color(NULL, 0 ,NULL,2); if(!qbevent)break;evnt(25753,10970,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color(NULL, 7 ,NULL,2); if(!qbevent)break;evnt(25753,10970,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER=*_SUB_IDEDRAWOBJ_LONG_CHARACTER+ 1 ; if(!qbevent)break;evnt(25753,10971,"ide_methods.bas");}while(r); do{ goto dl_continue_5228; if(!qbevent)break;evnt(25753,10972,"ide_methods.bas");}while(r); } } S_47376:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDEDRAWOBJ_LONG_CHARACTER== 1 ))&(((qbs_equal((qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 2 )),(qbs_add(func_chr( 32 ),func_chr( 195 )))))|(qbs_equal((qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 2 )),(qbs_add(func_chr( 32 ),func_chr( 192 ))))))))){ if(qbevent){evnt(25753,10974,"ide_methods.bas");if(r)goto S_47376;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10975,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 3 )); if (new_error) goto skip5233; makefit(tqbs); qbs_print(tqbs,0); skip5233: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10976,"ide_methods.bas");}while(r); S_47379:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,10977,"ide_methods.bas");if(r)goto S_47379;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,10977,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10977,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_CHARACTER= 3 ; if(!qbevent)break;evnt(25753,10978,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_CF=*_SUB_IDEDRAWOBJ_LONG_CF+ 3 ; if(!qbevent)break;evnt(25753,10979,"ide_methods.bas");}while(r); do{ goto dl_continue_5228; if(!qbevent)break;evnt(25753,10980,"ide_methods.bas");}while(r); } } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_mid(_SUB_IDEDRAWOBJ_STRING_A3,*_SUB_IDEDRAWOBJ_LONG_CHARACTER, 1 ,1)); if (new_error) goto skip5234; makefit(tqbs); qbs_print(tqbs,0); skip5234: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10982,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_CF=*_SUB_IDEDRAWOBJ_LONG_CF+ 1 ; if(!qbevent)break;evnt(25753,10983,"ide_methods.bas");}while(r); S_47390:; dl_continue_5228:; }while((!(-(*_SUB_IDEDRAWOBJ_LONG_CF>*_SUB_IDEDRAWOBJ_LONG_RIGHTSIDELIMIT)))&&(!new_error)); dl_exit_5228:; if(qbevent){evnt(25753,10984,"ide_methods.bas");if(r)goto S_47390;} S_47391:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEDRAWOBJ_LONG_CHARACTER<_SUB_IDEDRAWOBJ_STRING_A3->len)))||new_error){ if(qbevent){evnt(25753,10985,"ide_methods.bas");if(r)goto S_47391;} do{ sub__printstring(*_SUB_IDEDRAWOBJ_LONG_RIGHTSIDELIMIT,func_csrlin(),func_chr( 26 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10985,"ide_methods.bas");}while(r); } S_47394:; if ((-(func_pos( 1 )<*_SUB_IDEDRAWOBJ_LONG_RIGHTSIDELIMIT))||new_error){ if(qbevent){evnt(25753,10986,"ide_methods.bas");if(r)goto S_47394;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*_SUB_IDEDRAWOBJ_LONG_RIGHTSIDELIMIT-func_pos( 1 ))); if (new_error) goto skip5236; makefit(tqbs); qbs_print(tqbs,0); skip5236: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10987,"ide_methods.bas");}while(r); } }else{ S_47398:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEDRAWOBJ_STRING_A3->len>*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)))))||new_error){ if(qbevent){evnt(25753,10990,"ide_methods.bas");if(r)goto S_47398;} do{ sub_mid(_SUB_IDEDRAWOBJ_STRING_A3,*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)), 1 ,func_chr( 26 ),1); if(!qbevent)break;evnt(25753,10990,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_add(_SUB_IDEDRAWOBJ_STRING_A3,func_space(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10991,"ide_methods.bas");}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(25753,10992,"ide_methods.bas");}while(r); S_47403:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal((qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 2 )),(qbs_add(func_chr( 32 ),func_chr( 195 )))))|(qbs_equal((qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 2 )),(qbs_add(func_chr( 32 ),func_chr( 192 )))))))||new_error){ if(qbevent){evnt(25753,10994,"ide_methods.bas");if(r)goto S_47403;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10995,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_left(_SUB_IDEDRAWOBJ_STRING_A3, 3 )); if (new_error) goto skip5238; makefit(tqbs); qbs_print(tqbs,0); skip5238: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10996,"ide_methods.bas");}while(r); S_47406:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,10997,"ide_methods.bas");if(r)goto S_47406;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,10997,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,10997,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_mid(_SUB_IDEDRAWOBJ_STRING_A3, 4 ,NULL,0)); if (new_error) goto skip5239; makefit(tqbs); qbs_print(tqbs,0); skip5239: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10998,"ide_methods.bas");}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEDRAWOBJ_STRING_A3); if (new_error) goto skip5240; makefit(tqbs); qbs_print(tqbs,0); skip5240: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11000,"ide_methods.bas");}while(r); } } S_47416:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDEDRAWOBJ_STRING_A3,qbs_add(func_chr( 196 ),qbs_new_txt_len("*",1)),0)> 0 )))||new_error){ if(qbevent){evnt(25753,11004,"ide_methods.bas");if(r)goto S_47416;} S_47417:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64))==*_SUB_IDEDRAWOBJ_LONG_N))||new_error){ if(qbevent){evnt(25753,11005,"ide_methods.bas");if(r)goto S_47417;} do{ qbg_sub_color( 2 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,11005,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11005,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))+ 4 ,*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(24))+*_SUB_IDEDRAWOBJ_LONG_Y,qbs_new_txt_len("*",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11006,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_Y=*_SUB_IDEDRAWOBJ_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,11008,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEDRAWOBJ_LONG_N=*_SUB_IDEDRAWOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,11011,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11012,"ide_methods.bas");}while(r); } fornext_continue_5224:; } fornext_exit_5224:; do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(85))=*_SUB_IDEDRAWOBJ_LONG_N- 1 ; if(!qbevent)break;evnt(25753,11015,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_TNUM=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(85)); if(!qbevent)break;evnt(25753,11017,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_TSEL=func_abs((int32)(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64)))); if(!qbevent)break;evnt(25753,11018,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_Q=FUNC_IDEVBAR(&(pass5241=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))+*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))+ 1 ),&(pass5242=*(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(25753,11020,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(25753,11022,"ide_methods.bas");}while(r); } S_47437:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 3 ))||new_error){ if(qbevent){evnt(25753,11026,"ide_methods.bas");if(r)goto S_47437;} S_47438:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(25753,11027,"ide_methods.bas");if(r)goto S_47438;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(25753,11027,"ide_methods.bas");}while(r); } S_47441:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28))== 0 ))||new_error){ if(qbevent){evnt(25753,11028,"ide_methods.bas");if(r)goto S_47441;} 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(25753,11028,"ide_methods.bas");}while(r); } S_47444:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))== 0 ))||new_error){ if(qbevent){evnt(25753,11029,"ide_methods.bas");if(r)goto S_47444;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(44))=FUNC_IDENEWTXT(qbs_new_txt_len("#OK",3)); if(!qbevent)break;evnt(25753,11029,"ide_methods.bas");}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(25753,11030,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_N= 1 ; if(!qbevent)break;evnt(25753,11031,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_C= 0 ; if(!qbevent)break;evnt(25753,11032,"ide_methods.bas");}while(r); S_47450:; fornext_value5244= 1 ; fornext_finalvalue5244=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step5244= 1 ; if (fornext_step5244<0) fornext_step_negative5244=1; else fornext_step_negative5244=0; if (new_error) goto fornext_error5244; goto fornext_entrylabel5244; while(1){ fornext_value5244=fornext_step5244+(*_SUB_IDEDRAWOBJ_LONG_I2); fornext_entrylabel5244: *_SUB_IDEDRAWOBJ_LONG_I2=fornext_value5244; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5244){ if (fornext_value5244fornext_finalvalue5244) break; } fornext_error5244:; if(qbevent){evnt(25753,11033,"ide_methods.bas");if(r)goto S_47450;} 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(25753,11034,"ide_methods.bas");}while(r); S_47452:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEDRAWOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(25753,11035,"ide_methods.bas");if(r)goto S_47452;} do{ *_SUB_IDEDRAWOBJ_LONG_N=*_SUB_IDEDRAWOBJ_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,11036,"ide_methods.bas");}while(r); }else{ S_47455:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEDRAWOBJ_STRING_A,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(25753,11038,"ide_methods.bas");if(r)goto S_47455;} do{ *_SUB_IDEDRAWOBJ_LONG_C=*_SUB_IDEDRAWOBJ_LONG_C+ 1 ; if(!qbevent)break;evnt(25753,11038,"ide_methods.bas");}while(r); } } fornext_continue_5243:; } fornext_exit_5243:; do{ *_SUB_IDEDRAWOBJ_LONG_W=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(28)); if(!qbevent)break;evnt(25753,11041,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_C=*_SUB_IDEDRAWOBJ_LONG_C+(*_SUB_IDEDRAWOBJ_LONG_N* 4 ); if(!qbevent)break;evnt(25753,11042,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_WHITESPACE=*_SUB_IDEDRAWOBJ_LONG_W-*_SUB_IDEDRAWOBJ_LONG_C; if(!qbevent)break;evnt(25753,11043,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_SPACING=*_SUB_IDEDRAWOBJ_LONG_WHITESPACE/ (*_SUB_IDEDRAWOBJ_LONG_N+ 1 ); if(!qbevent)break;evnt(25753,11044,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_F2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))+ 1 ; if(!qbevent)break;evnt(25753,11045,"ide_methods.bas");}while(r); S_47465:; if (((-(*_SUB_IDEDRAWOBJ_LONG_F2< 1 ))|(-(*_SUB_IDEDRAWOBJ_LONG_F2>*_SUB_IDEDRAWOBJ_LONG_N)))||new_error){ if(qbevent){evnt(25753,11046,"ide_methods.bas");if(r)goto S_47465;} S_47466:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(48)))||new_error){ if(qbevent){evnt(25753,11047,"ide_methods.bas");if(r)goto S_47466;} do{ *_SUB_IDEDRAWOBJ_LONG_F2=*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(48)); if(!qbevent)break;evnt(25753,11047,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEDRAWOBJ_LONG_N2= 1 ; if(!qbevent)break;evnt(25753,11049,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11050,"ide_methods.bas");}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(25753,11051,"ide_methods.bas");}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(25753,11052,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11053,"ide_methods.bas");}while(r); S_47475:; fornext_value5247= 1 ; fornext_finalvalue5247=_SUB_IDEDRAWOBJ_STRING_A->len; fornext_step5247= 1 ; if (fornext_step5247<0) fornext_step_negative5247=1; else fornext_step_negative5247=0; if (new_error) goto fornext_error5247; goto fornext_entrylabel5247; while(1){ fornext_value5247=fornext_step5247+(*_SUB_IDEDRAWOBJ_LONG_I2); fornext_entrylabel5247: *_SUB_IDEDRAWOBJ_LONG_I2=fornext_value5247; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5247){ if (fornext_value5247fornext_finalvalue5247) break; } fornext_error5247:; if(qbevent){evnt(25753,11054,"ide_methods.bas");if(r)goto S_47475;} 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(25753,11055,"ide_methods.bas");}while(r); S_47477:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEDRAWOBJ_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(25753,11056,"ide_methods.bas");if(r)goto S_47477;} 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(25753,11056,"ide_methods.bas");}while(r); } S_47480:; 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(25753,11057,"ide_methods.bas");if(r)goto S_47480;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_space(*_SUB_IDEDRAWOBJ_LONG_SPACING)); if (new_error) goto skip5250; makefit(tqbs); qbs_print(tqbs,0); skip5250: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11058,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_X=*_SUB_IDEDRAWOBJ_LONG_X+*_SUB_IDEDRAWOBJ_LONG_SPACING; if(!qbevent)break;evnt(25753,11059,"ide_methods.bas");}while(r); S_47483:; if ((-(*_SUB_IDEDRAWOBJ_LONG_F2==*_SUB_IDEDRAWOBJ_LONG_N2))||new_error){ if(qbevent){evnt(25753,11060,"ide_methods.bas");if(r)goto S_47483;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11060,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11060,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("< ",2)); if (new_error) goto skip5251; makefit(tqbs); qbs_print(tqbs,0); skip5251: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11061,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11062,"ide_methods.bas");}while(r); do{ SUB_IDEHPRINT(_SUB_IDEDRAWOBJ_STRING_A3); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11062,"ide_methods.bas");}while(r); S_47491:; if ((-(*_SUB_IDEDRAWOBJ_LONG_F2==*_SUB_IDEDRAWOBJ_LONG_N2))||new_error){ if(qbevent){evnt(25753,11063,"ide_methods.bas");if(r)goto S_47491;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11063,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11063,"ide_methods.bas");}while(r); } S_47496:; if ((-(*_SUB_IDEDRAWOBJ_LONG_N2==(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))+ 1 )))||new_error){ if(qbevent){evnt(25753,11064,"ide_methods.bas");if(r)goto S_47496;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*_SUB_IDEDRAWOBJ_LONG_X+ 2 ; if(!qbevent)break;evnt(25753,11065,"ide_methods.bas");}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(25753,11065,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" >",2)); if (new_error) goto skip5252; makefit(tqbs); qbs_print(tqbs,0); skip5252: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11067,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11068,"ide_methods.bas");}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(25753,11069,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEDRAWOBJ_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11070,"ide_methods.bas");}while(r); do{ *_SUB_IDEDRAWOBJ_LONG_N2=*_SUB_IDEDRAWOBJ_LONG_N2+ 1 ; if(!qbevent)break;evnt(25753,11071,"ide_methods.bas");}while(r); } fornext_continue_5246:; } fornext_exit_5246:; do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+*_SUB_IDEDRAWOBJ_LONG_N; if(!qbevent)break;evnt(25753,11074,"ide_methods.bas");}while(r); } S_47509:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(36))== 4 ))||new_error){ if(qbevent){evnt(25753,11078,"ide_methods.bas");if(r)goto S_47509;} S_47510:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))== 0 ))||new_error){ if(qbevent){evnt(25753,11079,"ide_methods.bas");if(r)goto S_47510;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(20))= 2 ; if(!qbevent)break;evnt(25753,11079,"ide_methods.bas");}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(25753,11080,"ide_methods.bas");}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(25753,11080,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_SUB_IDEDRAWOBJ_LONG_Y,*_SUB_IDEDRAWOBJ_LONG_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,11081,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11082,"ide_methods.bas");}while(r); S_47517:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(64)))||new_error){ if(qbevent){evnt(25753,11083,"ide_methods.bas");if(r)goto S_47517;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("[X] ",4)); if (new_error) goto skip5253; makefit(tqbs); qbs_print(tqbs,0); skip5253: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11084,"ide_methods.bas");}while(r); }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("[ ] ",4)); if (new_error) goto skip5254; makefit(tqbs); qbs_print(tqbs,0); skip5254: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11086,"ide_methods.bas");}while(r); } S_47522:; if ((*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,11088,"ide_methods.bas");if(r)goto S_47522;} 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(25753,11089,"ide_methods.bas");}while(r); do{ SUB_IDEHPRINT(_SUB_IDEDRAWOBJ_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11090,"ide_methods.bas");}while(r); } S_47526:; if ((-(*(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(60))== 0 ))||new_error){ if(qbevent){evnt(25753,11092,"ide_methods.bas");if(r)goto S_47526;} do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(52))=*_SUB_IDEDRAWOBJ_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,11092,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEDRAWOBJ_UDT_O)+(56))=*_SUB_IDEDRAWOBJ_LONG_Y; if(!qbevent)break;evnt(25753,11092,"ide_methods.bas");}while(r); } do{ *_SUB_IDEDRAWOBJ_LONG_F=*_SUB_IDEDRAWOBJ_LONG_F+ 1 ; if(!qbevent)break;evnt(25753,11093,"ide_methods.bas");}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; } 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 "data174.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11099,"ide_methods.bas");}while(r); do{ SUB_IDEBOXSHADOW((int32*)(void*)( ((char*)(_SUB_IDEDRAWPAR_UDT_P)) + (0) ),(int32*)(void*)( ((char*)(_SUB_IDEDRAWPAR_UDT_P)) + (4) ),&(pass5255=*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(8))+ 2 ),&(pass5256=*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(12))+ 2 )); if(!qbevent)break;evnt(25753,11099,"ide_methods.bas");}while(r); S_47534:; if ((*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(16)))||new_error){ if(qbevent){evnt(25753,11100,"ide_methods.bas");if(r)goto S_47534;} 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(25753,11101,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11102,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(0))+((*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(8))/ 2 ))-((*_SUB_IDEDRAWPAR_LONG_X- 1 )/ 2 ),*(int32*)(((char*)_SUB_IDEDRAWPAR_UDT_P)+(4)),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)),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11102,"ide_methods.bas");}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* FUNC_IDEFILEEXISTS(qbs*_FUNC_IDEFILEEXISTS_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 "data175.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_IDEFILEEXISTS_LONG_L=_FUNC_IDEFILEEXISTS_STRING_F->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11107,"ide_methods.bas");}while(r); S_47540:; do{ if(qbevent){evnt(25753,11108,"ide_methods.bas");if(r)goto S_47540;} S_47541:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEFILEEXISTS_LONG_L<_FUNC_IDEFILEEXISTS_STRING_F->len)))||new_error){ if(qbevent){evnt(25753,11109,"ide_methods.bas");if(r)goto S_47541;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_M,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("File ",5),func_chr( 34 )),func_string( 3 , 250 )),qbs_right(_FUNC_IDEFILEEXISTS_STRING_F,*_FUNC_IDEFILEEXISTS_LONG_L)),func_chr( 34 )),qbs_new_txt_len(" already exists. Overwrite?",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11110,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_M,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("File ",5),func_chr( 34 )),_FUNC_IDEFILEEXISTS_STRING_F),func_chr( 34 )),qbs_new_txt_len(" already exists. Overwrite?",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11112,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEEXISTS_LONG_L=*_FUNC_IDEFILEEXISTS_LONG_L- 1 ; if(!qbevent)break;evnt(25753,11114,"ide_methods.bas");}while(r); S_47547:; dl_continue_5260:; }while((!(qbs_cleanup(qbs_tmp_base,-((_FUNC_IDEFILEEXISTS_STRING_M->len+ 4 )<((*__LONG_IDEWX- 6 ))))))&&(!new_error)); dl_exit_5260:; if(qbevent){evnt(25753,11115,"ide_methods.bas");if(r)goto S_47547;} do{ *_FUNC_IDEFILEEXISTS_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Save",4),_FUNC_IDEFILEEXISTS_STRING_M,qbs_new_txt_len("#Yes;#No",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11117,"ide_methods.bas");}while(r); S_47549:; if ((-(*_FUNC_IDEFILEEXISTS_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,11118,"ide_methods.bas");if(r)goto S_47549;} do{ qbs_set(_FUNC_IDEFILEEXISTS_STRING_IDEFILEEXISTS,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11118,"ide_methods.bas");}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(25753,11118,"ide_methods.bas");}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; 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 "data176.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if (_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY)[8])->id=(++mem_lock_id); if (_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[2]&1){ tmp_long=_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]); free((void*)(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0])); } _FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[4]= 0 ; _FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[5]=( 0 )-_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[4]+1; _FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[6]=1; _FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0]=(ptrszint)malloc(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[5]*8); if (!_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0]) error(257); _FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[2]|=1; tmp_long=_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[5]; if (_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,11123,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,11125,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,11126,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11127,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,11128,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,11129,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEFIND_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEFIND_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDEFIND_ARRAY_UDT_O[0]),0,_FUNC_IDEFIND_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEFIND_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEFIND_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEFIND_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEFIND_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,11130,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,11131,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFIND_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11132,"ide_methods.bas");}while(r); S_47563:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,11138,"ide_methods.bas");if(r)goto S_47563;} S_47564:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,11139,"ide_methods.bas");if(r)goto S_47564;} do{ qbs_set(_FUNC_IDEFIND_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11140,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFIND_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11141,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,11142,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,11142,"ide_methods.bas");}while(r); S_47569:; if ((-(*_FUNC_IDEFIND_LONG_SX2<*_FUNC_IDEFIND_LONG_SX1))||new_error){ if(qbevent){evnt(25753,11143,"ide_methods.bas");if(r)goto S_47569;} do{ swap_32(&*_FUNC_IDEFIND_LONG_SX1,&*_FUNC_IDEFIND_LONG_SX2); if(!qbevent)break;evnt(25753,11143,"ide_methods.bas");}while(r); } S_47572:; fornext_value5264=*_FUNC_IDEFIND_LONG_SX1; fornext_finalvalue5264=*_FUNC_IDEFIND_LONG_SX2- 1 ; fornext_step5264= 1 ; if (fornext_step5264<0) fornext_step_negative5264=1; else fornext_step_negative5264=0; if (new_error) goto fornext_error5264; goto fornext_entrylabel5264; while(1){ fornext_value5264=fornext_step5264+(*_FUNC_IDEFIND_LONG_X); fornext_entrylabel5264: *_FUNC_IDEFIND_LONG_X=fornext_value5264; if (fornext_step_negative5264){ if (fornext_value5264fornext_finalvalue5264) break; } fornext_error5264:; if(qbevent){evnt(25753,11144,"ide_methods.bas");if(r)goto S_47572;} S_47573:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEFIND_LONG_X<=_FUNC_IDEFIND_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,11145,"ide_methods.bas");if(r)goto S_47573;} 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(25753,11145,"ide_methods.bas");}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(25753,11145,"ide_methods.bas");}while(r); } fornext_continue_5263:; } fornext_exit_5263:; } } S_47581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEFIND_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,11149,"ide_methods.bas");if(r)goto S_47581;} do{ qbs_set(_FUNC_IDEFIND_STRING_A2,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11150,"ide_methods.bas");}while(r); } do{ SUB_RETRIEVESEARCHHISTORY(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11153,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I= 0 ; if(!qbevent)break;evnt(25753,11155,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEFIND_UDT_P)) + (0) ),&(pass5266= 60 ),&(pass5267= 11 ),qbs_new_txt_len("Find",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11156,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11157,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,11158,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,11159,"ide_methods.bas");}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]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,11160,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Find What",10)); if(!qbevent)break;evnt(25753,11161,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEFIND_STRING_A2); if(!qbevent)break;evnt(25753,11162,"ide_methods.bas");}while(r); S_47593:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEFIND_STRING_A2->len> 0 )))||new_error){ if(qbevent){evnt(25753,11163,"ide_methods.bas");if(r)goto S_47593;} do{ *(int8*)(((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]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,11164,"ide_methods.bas");}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]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,11165,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEFIND_STRING_A2->len; if(!qbevent)break;evnt(25753,11167,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11171,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11172,"ide_methods.bas");}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]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,11173,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Match Upper/Lowercase",22)); if(!qbevent)break;evnt(25753,11174,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDCASESENS; if(!qbevent)break;evnt(25753,11175,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11177,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11178,"ide_methods.bas");}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]))*89+24))= 6 ; if(!qbevent)break;evnt(25753,11179,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Whole Word",11)); if(!qbevent)break;evnt(25753,11180,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDWHOLEWORD; if(!qbevent)break;evnt(25753,11181,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11183,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11184,"ide_methods.bas");}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]))*89+24))= 7 ; if(!qbevent)break;evnt(25753,11185,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Search Backwards",17)); if(!qbevent)break;evnt(25753,11186,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDBACKWARDS; if(!qbevent)break;evnt(25753,11187,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11189,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11190,"ide_methods.bas");}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]))*89+24))= 8 ; if(!qbevent)break;evnt(25753,11191,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Ignore 'comments",17)); if(!qbevent)break;evnt(25753,11192,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDNOCOMMENTS; if(!qbevent)break;evnt(25753,11193,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11195,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11196,"ide_methods.bas");}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]))*89+20))= 29 ; if(!qbevent)break;evnt(25753,11197,"ide_methods.bas");}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]))*89+24))= 8 ; if(!qbevent)break;evnt(25753,11198,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Look only in 'comments",23)); if(!qbevent)break;evnt(25753,11199,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDONLYCOMMENTS; if(!qbevent)break;evnt(25753,11200,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11202,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11203,"ide_methods.bas");}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]))*89+24))= 9 ; if(!qbevent)break;evnt(25753,11204,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Ignore ",7),func_chr( 34 )),qbs_new_txt_len("s#trings",8)),func_chr( 34 ))); if(!qbevent)break;evnt(25753,11205,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDNOSTRINGS; if(!qbevent)break;evnt(25753,11206,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11208,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11209,"ide_methods.bas");}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]))*89+20))= 29 ; if(!qbevent)break;evnt(25753,11210,"ide_methods.bas");}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]))*89+24))= 9 ; if(!qbevent)break;evnt(25753,11211,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Look only in ",13),func_chr( 34 )),qbs_new_txt_len("st#rings",8)),func_chr( 34 ))); if(!qbevent)break;evnt(25753,11212,"ide_methods.bas");}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]))*89+64))=*__INTEGER_IDEFINDONLYSTRINGS; if(!qbevent)break;evnt(25753,11213,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_I=*_FUNC_IDEFIND_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11215,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,11216,"ide_methods.bas");}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]))*89+24))= 11 ; if(!qbevent)break;evnt(25753,11217,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEFIND_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,11218,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,11219,"ide_methods.bas");}while(r); S_47640:; fornext_value5271= 1 ; fornext_finalvalue5271= 100 ; fornext_step5271= 1 ; if (fornext_step5271<0) fornext_step_negative5271=1; else fornext_step_negative5271=0; if (new_error) goto fornext_error5271; goto fornext_entrylabel5271; while(1){ fornext_value5271=fornext_step5271+(*_FUNC_IDEFIND_LONG_I); fornext_entrylabel5271: *_FUNC_IDEFIND_LONG_I=fornext_value5271; if (fornext_step_negative5271){ if (fornext_value5271fornext_finalvalue5271) break; } fornext_error5271:; if(qbevent){evnt(25753,11223,"ide_methods.bas");if(r)goto S_47640;} 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]))*89)+ 0,((char*)_FUNC_IDEFIND_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,11223,"ide_methods.bas");}while(r); fornext_continue_5270:; } fornext_exit_5270:; S_47643:; do{ if(qbevent){evnt(25753,11226,"ide_methods.bas");if(r)goto S_47643;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEFIND_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,11230,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_F= 1 ; if(!qbevent)break;evnt(25753,11231,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,11231,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,11231,"ide_methods.bas");}while(r); S_47648:; fornext_value5274= 1 ; fornext_finalvalue5274= 100 ; fornext_step5274= 1 ; if (fornext_step5274<0) fornext_step_negative5274=1; else fornext_step_negative5274=0; if (new_error) goto fornext_error5274; goto fornext_entrylabel5274; while(1){ fornext_value5274=fornext_step5274+(*_FUNC_IDEFIND_LONG_I); fornext_entrylabel5274: *_FUNC_IDEFIND_LONG_I=fornext_value5274; if (fornext_step_negative5274){ if (fornext_value5274fornext_finalvalue5274) break; } fornext_error5274:; if(qbevent){evnt(25753,11232,"ide_methods.bas");if(r)goto S_47648;} S_47649:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,11233,"ide_methods.bas");if(r)goto S_47649;} 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]))*89+60))=*_FUNC_IDEFIND_LONG_FOCUS-*_FUNC_IDEFIND_LONG_F; if(!qbevent)break;evnt(25753,11236,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,11237,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,11237,"ide_methods.bas");}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]))*89) ),_FUNC_IDEFIND_LONG_F); if(!qbevent)break;evnt(25753,11238,"ide_methods.bas");}while(r); S_47654:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,11239,"ide_methods.bas");if(r)goto S_47654;} 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]))*89+52)); if(!qbevent)break;evnt(25753,11239,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,11239,"ide_methods.bas");}while(r); } } fornext_continue_5273:; } fornext_exit_5273:; do{ *_FUNC_IDEFIND_LONG_LASTFOCUS=*_FUNC_IDEFIND_LONG_F- 1 ; if(!qbevent)break;evnt(25753,11242,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,11249,"ide_methods.bas");}while(r); S_47662:; if ((*_FUNC_IDEFIND_LONG_CX)||new_error){ if(qbevent){evnt(25753,11250,"ide_methods.bas");if(r)goto S_47662;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11250,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEFIND_LONG_CY,*_FUNC_IDEFIND_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,11250,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11250,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFIND_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,11253,"ide_methods.bas");}while(r); S_47668:; do{ if(qbevent){evnt(25753,11254,"ide_methods.bas");if(r)goto S_47668;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,11255,"ide_methods.bas");}while(r); S_47670:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,11256,"ide_methods.bas");if(r)goto S_47670;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11256,"ide_methods.bas");}while(r); } S_47673:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,11257,"ide_methods.bas");if(r)goto S_47673;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11257,"ide_methods.bas");}while(r); } S_47676:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,11258,"ide_methods.bas");if(r)goto S_47676;} do{ *_FUNC_IDEFIND_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,11258,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11258,"ide_methods.bas");}while(r); } S_47680:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,11259,"ide_methods.bas");if(r)goto S_47680;} do{ *_FUNC_IDEFIND_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,11259,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11259,"ide_methods.bas");}while(r); } S_47684:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,11260,"ide_methods.bas");if(r)goto S_47684;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11260,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFIND_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,11261,"ide_methods.bas");}while(r); S_47688:; if ((-(*_FUNC_IDEFIND_LONG_ALT!=*_FUNC_IDEFIND_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,11261,"ide_methods.bas");if(r)goto S_47688;} do{ *_FUNC_IDEFIND_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11261,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFIND_LONG_OLDALT=*_FUNC_IDEFIND_LONG_ALT; if(!qbevent)break;evnt(25753,11262,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,11263,"ide_methods.bas");}while(r); S_47693:; dl_continue_5275:; }while((!(*_FUNC_IDEFIND_LONG_CHANGE))&&(!new_error)); dl_exit_5275:; if(qbevent){evnt(25753,11264,"ide_methods.bas");if(r)goto S_47693;} S_47694:; if ((*_FUNC_IDEFIND_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,11265,"ide_methods.bas");if(r)goto S_47694;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,11265,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,11265,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEFIND_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11267,"ide_methods.bas");}while(r); S_47700:; if ((*_FUNC_IDEFIND_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,11268,"ide_methods.bas");if(r)goto S_47700;} S_47701:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,11269,"ide_methods.bas");if(r)goto S_47701;} do{ *_FUNC_IDEFIND_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11270,"ide_methods.bas");}while(r); S_47703:; if (((-(*_FUNC_IDEFIND_LONG_K>= 65 ))&(-(*_FUNC_IDEFIND_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,11271,"ide_methods.bas");if(r)goto S_47703;} do{ qbs_set(_FUNC_IDEFIND_STRING_ALTLETTER,func_chr(*_FUNC_IDEFIND_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11271,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11274,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,11274,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11274,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,11278,"ide_methods.bas");}while(r); S_47712:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,11279,"ide_methods.bas");if(r)goto S_47712;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11279,"ide_methods.bas");}while(r); } S_47715:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,11280,"ide_methods.bas");if(r)goto S_47715;} do{ *_FUNC_IDEFIND_LONG_FOCUS=*_FUNC_IDEFIND_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,11280,"ide_methods.bas");}while(r); } S_47718:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,11281,"ide_methods.bas");if(r)goto S_47718;} do{ *_FUNC_IDEFIND_LONG_FOCUS=*_FUNC_IDEFIND_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,11281,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11281,"ide_methods.bas");}while(r); } S_47722:; if ((-(*_FUNC_IDEFIND_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,11282,"ide_methods.bas");if(r)goto S_47722;} do{ *_FUNC_IDEFIND_LONG_FOCUS=*_FUNC_IDEFIND_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,11282,"ide_methods.bas");}while(r); } S_47725:; if ((-(*_FUNC_IDEFIND_LONG_FOCUS>*_FUNC_IDEFIND_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,11283,"ide_methods.bas");if(r)goto S_47725;} do{ *_FUNC_IDEFIND_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,11283,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFIND_LONG_F= 1 ; if(!qbevent)break;evnt(25753,11284,"ide_methods.bas");}while(r); S_47729:; fornext_value5278= 1 ; fornext_finalvalue5278= 100 ; fornext_step5278= 1 ; if (fornext_step5278<0) fornext_step_negative5278=1; else fornext_step_negative5278=0; if (new_error) goto fornext_error5278; goto fornext_entrylabel5278; while(1){ fornext_value5278=fornext_step5278+(*_FUNC_IDEFIND_LONG_I); fornext_entrylabel5278: *_FUNC_IDEFIND_LONG_I=fornext_value5278; if (fornext_step_negative5278){ if (fornext_value5278fornext_finalvalue5278) break; } fornext_error5278:; if(qbevent){evnt(25753,11285,"ide_methods.bas");if(r)goto S_47729;} 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]))*89+36)); if(!qbevent)break;evnt(25753,11286,"ide_methods.bas");}while(r); S_47731:; if ((*_FUNC_IDEFIND_LONG_T)||new_error){ if(qbevent){evnt(25753,11287,"ide_methods.bas");if(r)goto S_47731;} do{ *_FUNC_IDEFIND_LONG_FOCUSOFFSET=*_FUNC_IDEFIND_LONG_FOCUS-*_FUNC_IDEFIND_LONG_F; if(!qbevent)break;evnt(25753,11288,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,11289,"ide_methods.bas");}while(r); } fornext_continue_5277:; } fornext_exit_5277:; S_47736:; if ((-(*_FUNC_IDEFIND_LONG_FOCUS!=*_FUNC_IDEFIND_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,11295,"ide_methods.bas");if(r)goto S_47736;} do{ *_FUNC_IDEFIND_LONG_PREVFOCUS=*_FUNC_IDEFIND_LONG_FOCUS; if(!qbevent)break;evnt(25753,11297,"ide_methods.bas");}while(r); S_47738:; if ((-(*_FUNC_IDEFIND_LONG_FOCUS== 1 ))||new_error){ if(qbevent){evnt(25753,11298,"ide_methods.bas");if(r)goto S_47738;} do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_FOCUS)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_FOCUS)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,11299,"ide_methods.bas");}while(r); S_47740:; if ((-(*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_FOCUS)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,11300,"ide_methods.bas");if(r)goto S_47740;} do{ *(int8*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_FOCUS)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,11300,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFIND_LONG_FOCUS)-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,11301,"ide_methods.bas");}while(r); } } S_47746:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEFIND_LONG_FOCUS== 10 ))&(-(*_FUNC_IDEFIND_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,11305,"ide_methods.bas");if(r)goto S_47746;} do{ qbs_set(_FUNC_IDEFIND_STRING_IDEFIND,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11306,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11307,"ide_methods.bas");}while(r); } S_47750:; if (((-(*_FUNC_IDEFIND_LONG_FOCUS== 5 ))&(-(*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))== 1 )))||new_error){ if(qbevent){evnt(25753,11311,"ide_methods.bas");if(r)goto S_47750;} do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11312,"ide_methods.bas");}while(r); S_47752:; }else{ if ((-(*_FUNC_IDEFIND_LONG_FOCUS== 6 ))&(-(*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))== 1 ))){ if(qbevent){evnt(25753,11313,"ide_methods.bas");if(r)goto S_47752;} do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11314,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11315,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11316,"ide_methods.bas");}while(r); S_47756:; }else{ if ((-(*_FUNC_IDEFIND_LONG_FOCUS== 7 ))&(-(*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))== 1 ))){ if(qbevent){evnt(25753,11317,"ide_methods.bas");if(r)goto S_47756;} do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11318,"ide_methods.bas");}while(r); S_47758:; }else{ if ((-(*_FUNC_IDEFIND_LONG_FOCUS== 8 ))&(-(*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))== 1 ))){ if(qbevent){evnt(25753,11319,"ide_methods.bas");if(r)goto S_47758;} do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11320,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11321,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11322,"ide_methods.bas");}while(r); } } } } S_47763:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEFIND_LONG_FOCUS== 9 ))&(-(*_FUNC_IDEFIND_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,11325,"ide_methods.bas");if(r)goto S_47763;} 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]))*89+64)); if(!qbevent)break;evnt(25753,11326,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,11327,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,11328,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDNOCOMMENTS=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,11329,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDONLYCOMMENTS=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,11330,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDNOSTRINGS=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,11331,"ide_methods.bas");}while(r); do{ *__INTEGER_IDEFINDONLYSTRINGS=*(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,11332,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11333,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEFINDTEXT,_FUNC_IDEFIND_STRING_S); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11334,"ide_methods.bas");}while(r); do{ SUB_IDEADDSEARCHED(__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11335,"ide_methods.bas");}while(r); do{ SUB_IDEFINDAGAIN(&(pass5280= 0 )); if(!qbevent)break;evnt(25753,11336,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11337,"ide_methods.bas");}while(r); } S_47777:; if ((qbs_cleanup(qbs_tmp_base,-(func_ubound(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY,1,1)> 0 )))||new_error){ if(qbevent){evnt(25753,11340,"ide_methods.bas");if(r)goto S_47777;} S_47778:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 72 )))))&(-(*_FUNC_IDEFIND_LONG_FOCUS== 1 ))))||new_error){ if(qbevent){evnt(25753,11341,"ide_methods.bas");if(r)goto S_47778;} S_47779:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEFIND_LONG_LNlen; if(!qbevent)break;evnt(25753,11346,"ide_methods.bas");}while(r); } S_47787:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 80 )))))&(-(*_FUNC_IDEFIND_LONG_FOCUS== 1 ))))||new_error){ if(qbevent){evnt(25753,11349,"ide_methods.bas");if(r)goto S_47787;} S_47788:; if ((-(*_FUNC_IDEFIND_LONG_LN> 1 ))||new_error){ if(qbevent){evnt(25753,11350,"ide_methods.bas");if(r)goto S_47788;} do{ *_FUNC_IDEFIND_LONG_LN=*_FUNC_IDEFIND_LONG_LN- 1 ; if(!qbevent)break;evnt(25753,11351,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEFIND_LONG_LN= 1 ; if(!qbevent)break;evnt(25753,11353,"ide_methods.bas");}while(r); } do{ tmp_long=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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),((qbs*)(((uint64*)(_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[0]))[array_check((*_FUNC_IDEFIND_LONG_LN)-_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[4],_FUNC_IDEFIND_ARRAY_STRING_SEARCHHISTORY[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11355,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,11356,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,11356,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFIND_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFIND_ARRAY_UDT_O[4],_FUNC_IDEFIND_ARRAY_UDT_O[5]))*89+81))=((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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,11356,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEFIND_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,11363,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFIND_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,11364,"ide_methods.bas");}while(r); dl_continue_5272:; }while(1); dl_exit_5272:; 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; qbs_maketmp(_FUNC_IDEFIND_STRING_IDEFIND);return _FUNC_IDEFIND_STRING_IDEFIND; } void SUB_IDEFINDAGAIN(int8*_SUB_IDEFINDAGAIN_BYTE_SHOWFLAGS){ 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 "data177.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,11369,"ide_methods.bas");}while(r); S_47803:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(25753,11371,"ide_methods.bas");if(r)goto S_47803;} S_47804:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(25753,11372,"ide_methods.bas");if(r)goto S_47804;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(25753,11372,"ide_methods.bas");}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(25753,11372,"ide_methods.bas");}while(r); } } do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_S,__STRING_IDEFINDTEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11375,"ide_methods.bas");}while(r); S_47811:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,11376,"ide_methods.bas");if(r)goto S_47811;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_S,qbs_ucase(_SUB_IDEFINDAGAIN_STRING_S)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11376,"ide_methods.bas");}while(r); } do{ *_SUB_IDEFINDAGAIN_LONG_START=*__LONG_IDECY; if(!qbevent)break;evnt(25753,11377,"ide_methods.bas");}while(r); do{ *_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_START; if(!qbevent)break;evnt(25753,11378,"ide_methods.bas");}while(r); LABEL_IDEFINDNEXT2:; if(qbevent){evnt(25753,11380,"ide_methods.bas");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(25753,11381,"ide_methods.bas");}while(r); S_47817:; if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||new_error){ if(qbevent){evnt(25753,11382,"ide_methods.bas");if(r)goto S_47817;} do{ qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_ucase(_SUB_IDEFINDAGAIN_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11382,"ide_methods.bas");}while(r); } S_47820:; if ((-(*_SUB_IDEFINDAGAIN_LONG_Y==*_SUB_IDEFINDAGAIN_LONG_START))||new_error){ if(qbevent){evnt(25753,11384,"ide_methods.bas");if(r)goto S_47820;} S_47821:; if ((-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 ))||new_error){ if(qbevent){evnt(25753,11386,"ide_methods.bas");if(r)goto S_47821;} S_47822:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,11387,"ide_methods.bas");if(r)goto S_47822;} S_47823:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(25753,11388,"ide_methods.bas");if(r)goto S_47823;} 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(25753,11388,"ide_methods.bas");}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(25753,11388,"ide_methods.bas");}while(r); } }else{ S_47829:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(25753,11390,"ide_methods.bas");if(r)goto S_47829;} 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(25753,11390,"ide_methods.bas");}while(r); } } }else{ S_47834:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,11393,"ide_methods.bas");if(r)goto S_47834;} S_47835:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(25753,11394,"ide_methods.bas");if(r)goto S_47835;} 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(25753,11394,"ide_methods.bas");}while(r); } }else{ S_47839:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||new_error){ if(qbevent){evnt(25753,11396,"ide_methods.bas");if(r)goto S_47839;} 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(25753,11396,"ide_methods.bas");}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(25753,11396,"ide_methods.bas");}while(r); } } } } do{ *_SUB_IDEFINDAGAIN_LONG_X1= 1 ; if(!qbevent)break;evnt(25753,11401,"ide_methods.bas");}while(r); S_47848:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,11402,"ide_methods.bas");if(r)goto S_47848;} 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(25753,11403,"ide_methods.bas");}while(r); S_47850:; if ((-(*_SUB_IDEFINDAGAIN_LONG_X1< 0 ))||new_error){ if(qbevent){evnt(25753,11404,"ide_methods.bas");if(r)goto S_47850;} do{ *_SUB_IDEFINDAGAIN_LONG_X1= 0 ; if(!qbevent)break;evnt(25753,11404,"ide_methods.bas");}while(r); } } LABEL_IDEFINDAGAIN2:; if(qbevent){evnt(25753,11407,"ide_methods.bas");r=0;} S_47854:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,11409,"ide_methods.bas");if(r)goto S_47854;} do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(25753,11410,"ide_methods.bas");}while(r); S_47856:; fornext_value5293=*_SUB_IDEFINDAGAIN_LONG_X1; fornext_finalvalue5293= 1 ; fornext_step5293= -1 ; if (fornext_step5293<0) fornext_step_negative5293=1; else fornext_step_negative5293=0; if (new_error) goto fornext_error5293; goto fornext_entrylabel5293; while(1){ fornext_value5293=fornext_step5293+(*_SUB_IDEFINDAGAIN_LONG_XX); fornext_entrylabel5293: *_SUB_IDEFINDAGAIN_LONG_XX=fornext_value5293; if (fornext_step_negative5293){ if (fornext_value5293fornext_finalvalue5293) break; } fornext_error5293:; if(qbevent){evnt(25753,11411,"ide_methods.bas");if(r)goto S_47856;} S_47857:; 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(25753,11412,"ide_methods.bas");if(r)goto S_47857;} do{ *_SUB_IDEFINDAGAIN_LONG_XXO=*_SUB_IDEFINDAGAIN_LONG_XX- 1 ; if(!qbevent)break;evnt(25753,11413,"ide_methods.bas");}while(r); S_47859:; fornext_value5295=*_SUB_IDEFINDAGAIN_LONG_XX; fornext_finalvalue5295=*_SUB_IDEFINDAGAIN_LONG_XX+_SUB_IDEFINDAGAIN_STRING_S->len- 1 ; fornext_step5295= 1 ; if (fornext_step5295<0) fornext_step_negative5295=1; else fornext_step_negative5295=0; if (new_error) goto fornext_error5295; goto fornext_entrylabel5295; while(1){ fornext_value5295=fornext_step5295+(*_SUB_IDEFINDAGAIN_LONG_XX2); fornext_entrylabel5295: *_SUB_IDEFINDAGAIN_LONG_XX2=fornext_value5295; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5295){ if (fornext_value5295fornext_finalvalue5295) break; } fornext_error5295:; if(qbevent){evnt(25753,11414,"ide_methods.bas");if(r)goto S_47859;} S_47860:; 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(25753,11415,"ide_methods.bas");if(r)goto S_47860;} do{ goto fornext_exit_5294; if(!qbevent)break;evnt(25753,11415,"ide_methods.bas");}while(r); } fornext_continue_5294:; } fornext_exit_5294:; S_47864:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEFINDAGAIN_LONG_XX2==(*_SUB_IDEFINDAGAIN_LONG_XX+_SUB_IDEFINDAGAIN_STRING_S->len))))||new_error){ if(qbevent){evnt(25753,11417,"ide_methods.bas");if(r)goto S_47864;} do{ *_SUB_IDEFINDAGAIN_LONG_X=*_SUB_IDEFINDAGAIN_LONG_XX; if(!qbevent)break;evnt(25753,11419,"ide_methods.bas");}while(r); do{ goto fornext_exit_5292; if(!qbevent)break;evnt(25753,11420,"ide_methods.bas");}while(r); } } fornext_continue_5292:; } fornext_exit_5292:; }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(25753,11425,"ide_methods.bas");}while(r); } S_47873:; if ((*_SUB_IDEFINDAGAIN_LONG_X)||new_error){ if(qbevent){evnt(25753,11429,"ide_methods.bas");if(r)goto S_47873;} S_47874:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(25753,11430,"ide_methods.bas");if(r)goto S_47874;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 1 ; if(!qbevent)break;evnt(25753,11431,"ide_methods.bas");}while(r); S_47876:; if ((-(*_SUB_IDEFINDAGAIN_LONG_X> 1 ))||new_error){ if(qbevent){evnt(25753,11432,"ide_methods.bas");if(r)goto S_47876;} 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(25753,11433,"ide_methods.bas");}while(r); S_47878:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 65 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(25753,11434,"ide_methods.bas");if(r)goto S_47878;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,11434,"ide_methods.bas");}while(r); } S_47881:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 48 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(25753,11435,"ide_methods.bas");if(r)goto S_47881;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,11435,"ide_methods.bas");}while(r); } } S_47885:; 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(25753,11437,"ide_methods.bas");if(r)goto S_47885;} 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(25753,11438,"ide_methods.bas");}while(r); S_47887:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 65 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 90 )))||new_error){ if(qbevent){evnt(25753,11439,"ide_methods.bas");if(r)goto S_47887;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,11439,"ide_methods.bas");}while(r); } S_47890:; if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 48 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 57 )))||new_error){ if(qbevent){evnt(25753,11440,"ide_methods.bas");if(r)goto S_47890;} do{ *_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ; if(!qbevent)break;evnt(25753,11440,"ide_methods.bas");}while(r); } } S_47894:; if ((-(*_SUB_IDEFINDAGAIN_LONG_WHOLE== 0 ))||new_error){ if(qbevent){evnt(25753,11442,"ide_methods.bas");if(r)goto S_47894;} do{ *_SUB_IDEFINDAGAIN_LONG_X1=*_SUB_IDEFINDAGAIN_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,11443,"ide_methods.bas");}while(r); S_47896:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,11443,"ide_methods.bas");if(r)goto S_47896;} do{ *_SUB_IDEFINDAGAIN_LONG_X1=*_SUB_IDEFINDAGAIN_LONG_X- 1 ; if(!qbevent)break;evnt(25753,11443,"ide_methods.bas");}while(r); } do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(25753,11444,"ide_methods.bas");}while(r); S_47900:; 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(25753,11445,"ide_methods.bas");if(r)goto S_47900;} do{ goto LABEL_IDEFINDAGAIN2; if(!qbevent)break;evnt(25753,11445,"ide_methods.bas");}while(r); } } } } S_47906:; if ((*_SUB_IDEFINDAGAIN_LONG_X)||new_error){ if(qbevent){evnt(25753,11450,"ide_methods.bas");if(r)goto S_47906;} do{ SUB_FINDQUOTECOMMENT(_SUB_IDEFINDAGAIN_STRING_L,_SUB_IDEFINDAGAIN_LONG_X,_SUB_IDEFINDAGAIN_BYTE_COMMENT,_SUB_IDEFINDAGAIN_BYTE_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11451,"ide_methods.bas");}while(r); S_47908:; if (((-(*__INTEGER_IDEFINDNOCOMMENTS!= 0 ))&*_SUB_IDEFINDAGAIN_BYTE_COMMENT)||new_error){ if(qbevent){evnt(25753,11452,"ide_methods.bas");if(r)goto S_47908;} do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(25753,11452,"ide_methods.bas");}while(r); } S_47911:; if (((-(*__INTEGER_IDEFINDNOSTRINGS!= 0 ))&*_SUB_IDEFINDAGAIN_BYTE_QUOTE)||new_error){ if(qbevent){evnt(25753,11453,"ide_methods.bas");if(r)goto S_47911;} do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(25753,11453,"ide_methods.bas");}while(r); } S_47914:; if (((-(*__INTEGER_IDEFINDONLYCOMMENTS!= 0 ))&(-(*_SUB_IDEFINDAGAIN_BYTE_COMMENT== 0 )))||new_error){ if(qbevent){evnt(25753,11454,"ide_methods.bas");if(r)goto S_47914;} do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(25753,11454,"ide_methods.bas");}while(r); } S_47917:; if (((-(*__INTEGER_IDEFINDONLYSTRINGS!= 0 ))&(-(*_SUB_IDEFINDAGAIN_BYTE_QUOTE== 0 )))||new_error){ if(qbevent){evnt(25753,11455,"ide_methods.bas");if(r)goto S_47917;} do{ *_SUB_IDEFINDAGAIN_LONG_X= 0 ; if(!qbevent)break;evnt(25753,11455,"ide_methods.bas");}while(r); } } S_47921:; if ((*_SUB_IDEFINDAGAIN_LONG_X)||new_error){ if(qbevent){evnt(25753,11458,"ide_methods.bas");if(r)goto S_47921;} do{ *__LONG_IDESELECT= 1 ; if(!qbevent)break;evnt(25753,11459,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*_SUB_IDEFINDAGAIN_LONG_X; if(!qbevent)break;evnt(25753,11460,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_IDEFINDAGAIN_LONG_Y; if(!qbevent)break;evnt(25753,11460,"ide_methods.bas");}while(r); do{ *__LONG_SEARCHSTRINGFOUNDON=*__LONG_IDECY; if(!qbevent)break;evnt(25753,11461,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1=*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11462,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*_SUB_IDEFINDAGAIN_LONG_Y; if(!qbevent)break;evnt(25753,11462,"ide_methods.bas");}while(r); S_47928:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(25753,11464,"ide_methods.bas");if(r)goto S_47928;} S_47929:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(25753,11465,"ide_methods.bas");if(r)goto S_47929;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(25753,11465,"ide_methods.bas");}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(25753,11465,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDEFINDINVERT= 0 ; if(!qbevent)break;evnt(25753,11466,"ide_methods.bas");}while(r); } do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,11468,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11469,"ide_methods.bas");}while(r); } S_47939:; if ((*__INTEGER_IDEFINDBACKWARDS)||new_error){ if(qbevent){evnt(25753,11472,"ide_methods.bas");if(r)goto S_47939;} do{ *_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_Y- 1 ; if(!qbevent)break;evnt(25753,11473,"ide_methods.bas");}while(r); S_47941:; if (((-(*_SUB_IDEFINDAGAIN_LONG_Y==(*_SUB_IDEFINDAGAIN_LONG_START- 1 )))&(-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(25753,11474,"ide_methods.bas");if(r)goto S_47941;} do{ SUB_IDENOMATCH(_SUB_IDEFINDAGAIN_BYTE_SHOWFLAGS); if(!qbevent)break;evnt(25753,11475,"ide_methods.bas");}while(r); S_47943:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(25753,11476,"ide_methods.bas");if(r)goto S_47943;} S_47944:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(25753,11477,"ide_methods.bas");if(r)goto S_47944;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(25753,11477,"ide_methods.bas");}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(25753,11477,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDEFINDINVERT= 0 ; if(!qbevent)break;evnt(25753,11478,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11480,"ide_methods.bas");}while(r); } S_47953:; if ((-(*_SUB_IDEFINDAGAIN_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(25753,11482,"ide_methods.bas");if(r)goto S_47953;} do{ *_SUB_IDEFINDAGAIN_LONG_Y=*__LONG_IDEN; if(!qbevent)break;evnt(25753,11482,"ide_methods.bas");}while(r); do{ *_SUB_IDEFINDAGAIN_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(25753,11482,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(25753,11483,"ide_methods.bas");}while(r); }else{ do{ *_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,11485,"ide_methods.bas");}while(r); S_47960:; if (((-(*_SUB_IDEFINDAGAIN_LONG_Y==(*_SUB_IDEFINDAGAIN_LONG_START+ 1 )))&(-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 )))||new_error){ if(qbevent){evnt(25753,11486,"ide_methods.bas");if(r)goto S_47960;} do{ SUB_IDENOMATCH(_SUB_IDEFINDAGAIN_BYTE_SHOWFLAGS); if(!qbevent)break;evnt(25753,11487,"ide_methods.bas");}while(r); S_47962:; if ((*__INTEGER_IDEFINDINVERT)||new_error){ if(qbevent){evnt(25753,11488,"ide_methods.bas");if(r)goto S_47962;} S_47963:; if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||new_error){ if(qbevent){evnt(25753,11489,"ide_methods.bas");if(r)goto S_47963;} do{ *__INTEGER_IDEFINDBACKWARDS= 1 ; if(!qbevent)break;evnt(25753,11489,"ide_methods.bas");}while(r); }else{ do{ *__INTEGER_IDEFINDBACKWARDS= 0 ; if(!qbevent)break;evnt(25753,11489,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDEFINDINVERT= 0 ; if(!qbevent)break;evnt(25753,11490,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11492,"ide_methods.bas");}while(r); } S_47972:; if ((-(*_SUB_IDEFINDAGAIN_LONG_Y>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,11494,"ide_methods.bas");if(r)goto S_47972;} do{ *_SUB_IDEFINDAGAIN_LONG_Y= 1 ; if(!qbevent)break;evnt(25753,11494,"ide_methods.bas");}while(r); do{ *_SUB_IDEFINDAGAIN_LONG_LOOPED= 1 ; if(!qbevent)break;evnt(25753,11494,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEFINDNEXT2; if(!qbevent)break;evnt(25753,11495,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free177.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 "data178.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_47978:; if ((-(*_FUNC_IDEGETLINE_LONG_I!= -1 ))||new_error){ if(qbevent){evnt(25753,11500,"ide_methods.bas");if(r)goto S_47978;} do{ SUB_IDEGOTOLINE(_FUNC_IDEGETLINE_LONG_I); if(!qbevent)break;evnt(25753,11500,"ide_methods.bas");}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(25753,11501,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free178.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_IDECENTERCURRENTLINE(){ 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 "data179.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_47982:; if ((-(*__LONG_IDEN<=(*__LONG_IDEWY- 8 )))||new_error){ if(qbevent){evnt(25753,11505,"ide_methods.bas");if(r)goto S_47982;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11505,"ide_methods.bas");}while(r); } do{ *__LONG_IDESY=*__LONG_IDECY-((*__LONG_IDEWY- 8 )/ 2 ); if(!qbevent)break;evnt(25753,11506,"ide_methods.bas");}while(r); S_47986:; if ((-(*__LONG_IDESY< 1 ))||new_error){ if(qbevent){evnt(25753,11507,"ide_methods.bas");if(r)goto S_47986;} do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(25753,11507,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free179.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_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 "data180.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_47989:; if ((-(*__LONG_IDEL==*_SUB_IDEGOTOLINE_LONG_I))||new_error){ if(qbevent){evnt(25753,11511,"ide_methods.bas");if(r)goto S_47989;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11511,"ide_methods.bas");}while(r); } S_47992:; if ((-(*_SUB_IDEGOTOLINE_LONG_I< 1 ))||new_error){ if(qbevent){evnt(25753,11512,"ide_methods.bas");if(r)goto S_47992;} do{ *_SUB_IDEGOTOLINE_LONG_I= 1 ; if(!qbevent)break;evnt(25753,11512,"ide_methods.bas");}while(r); } S_47995:; if ((-(*_SUB_IDEGOTOLINE_LONG_I<*__LONG_IDEL))||new_error){ if(qbevent){evnt(25753,11514,"ide_methods.bas");if(r)goto S_47995;} S_47996:; do{ if(qbevent){evnt(25753,11515,"ide_methods.bas");if(r)goto S_47996;} do{ *__LONG_IDEL=*__LONG_IDEL- 1 ; if(!qbevent)break;evnt(25753,11516,"ide_methods.bas");}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(25753,11517,"ide_methods.bas");}while(r); S_47999:; dl_continue_5303:; }while((!(-(*__LONG_IDEL==*_SUB_IDEGOTOLINE_LONG_I)))&&(!new_error)); dl_exit_5303:; if(qbevent){evnt(25753,11518,"ide_methods.bas");if(r)goto S_47999;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11519,"ide_methods.bas");}while(r); } S_48002:; do{ if(qbevent){evnt(25753,11522,"ide_methods.bas");if(r)goto S_48002;} S_48003:; if ((-(*__LONG_IDEL==*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,11523,"ide_methods.bas");if(r)goto S_48003;} 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(25753,11523,"ide_methods.bas");}while(r); do{ *__LONG_IDEN=*__LONG_IDEN+ 1 ; if(!qbevent)break;evnt(25753,11523,"ide_methods.bas");}while(r); } do{ *__LONG_IDEL=*__LONG_IDEL+ 1 ; if(!qbevent)break;evnt(25753,11524,"ide_methods.bas");}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(25753,11525,"ide_methods.bas");}while(r); S_48009:; dl_continue_5304:; }while((!(-(*__LONG_IDEL==*_SUB_IDEGOTOLINE_LONG_I)))&&(!new_error)); dl_exit_5304:; if(qbevent){evnt(25753,11526,"ide_methods.bas");if(r)goto S_48009;} exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free180.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 "data181.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_I2; if(!qbevent)break;evnt(25753,11530,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_LONG_N=*_FUNC_IDEHBAR_LONG_N2; if(!qbevent)break;evnt(25753,11530,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11548,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X,*_FUNC_IDEHBAR_LONG_Y,func_chr( 27 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11549,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 1 ,*_FUNC_IDEHBAR_LONG_Y,func_chr( 26 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11550,"ide_methods.bas");}while(r); S_48015:; fornext_value5306=*_FUNC_IDEHBAR_LONG_X+ 1 ; fornext_finalvalue5306=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ; fornext_step5306= 1 ; if (fornext_step5306<0) fornext_step_negative5306=1; else fornext_step_negative5306=0; if (new_error) goto fornext_error5306; goto fornext_entrylabel5306; while(1){ fornext_value5306=fornext_step5306+(*_FUNC_IDEHBAR_LONG_X2); fornext_entrylabel5306: *_FUNC_IDEHBAR_LONG_X2=fornext_value5306; if (fornext_step_negative5306){ if (fornext_value5306fornext_finalvalue5306) break; } fornext_error5306:; if(qbevent){evnt(25753,11551,"ide_methods.bas");if(r)goto S_48015;} do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 176 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11552,"ide_methods.bas");}while(r); fornext_continue_5305:; } fornext_exit_5305:; S_48018:; if ((-(*_FUNC_IDEHBAR_LONG_N< 1 ))||new_error){ if(qbevent){evnt(25753,11557,"ide_methods.bas");if(r)goto S_48018;} do{ *_FUNC_IDEHBAR_LONG_N= 1 ; if(!qbevent)break;evnt(25753,11557,"ide_methods.bas");}while(r); } S_48021:; if ((-(*_FUNC_IDEHBAR_LONG_I< 1 ))||new_error){ if(qbevent){evnt(25753,11558,"ide_methods.bas");if(r)goto S_48021;} do{ *_FUNC_IDEHBAR_LONG_I= 1 ; if(!qbevent)break;evnt(25753,11558,"ide_methods.bas");}while(r); } S_48024:; if ((-(*_FUNC_IDEHBAR_LONG_I>*_FUNC_IDEHBAR_LONG_N))||new_error){ if(qbevent){evnt(25753,11559,"ide_methods.bas");if(r)goto S_48024;} do{ *_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_N; if(!qbevent)break;evnt(25753,11559,"ide_methods.bas");}while(r); } S_48027:; if ((-(*_FUNC_IDEHBAR_LONG_H== 2 ))||new_error){ if(qbevent){evnt(25753,11561,"ide_methods.bas");if(r)goto S_48027;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X; if(!qbevent)break;evnt(25753,11562,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11563,"ide_methods.bas");}while(r); } S_48031:; if ((-(*_FUNC_IDEHBAR_LONG_H== 3 ))||new_error){ if(qbevent){evnt(25753,11566,"ide_methods.bas");if(r)goto S_48031;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,11567,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11569,"ide_methods.bas");}while(r); } S_48035:; if ((-(*_FUNC_IDEHBAR_LONG_H== 4 ))||new_error){ if(qbevent){evnt(25753,11572,"ide_methods.bas");if(r)goto S_48035;} S_48036:; if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25753,11573,"ide_methods.bas");if(r)goto S_48036;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,11574,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11576,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(25753,11579,"ide_methods.bas");}while(r); S_48041:; if ((-(((float)(*_FUNC_IDEHBAR_SINGLE_P))<((float)( 0.5E+0 ))))||new_error){ if(qbevent){evnt(25753,11580,"ide_methods.bas");if(r)goto S_48041;} do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,11580,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 2 ; if(!qbevent)break;evnt(25753,11580,"ide_methods.bas");}while(r); } do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11581,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(25753,11582,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11583,"ide_methods.bas");}while(r); } } S_48051:; if ((-(*_FUNC_IDEHBAR_LONG_H> 4 ))||new_error){ if(qbevent){evnt(25753,11587,"ide_methods.bas");if(r)goto S_48051;} S_48052:; if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25753,11588,"ide_methods.bas");if(r)goto S_48052;} do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+(*_FUNC_IDEHBAR_LONG_H/ 4 ); if(!qbevent)break;evnt(25753,11589,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11591,"ide_methods.bas");}while(r); } S_48056:; if ((-(*_FUNC_IDEHBAR_LONG_I== 1 ))||new_error){ if(qbevent){evnt(25753,11593,"ide_methods.bas");if(r)goto S_48056;} do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,11594,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11595,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(25753,11596,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11597,"ide_methods.bas");}while(r); } S_48062:; if ((-(*_FUNC_IDEHBAR_LONG_I==*_FUNC_IDEHBAR_LONG_N))||new_error){ if(qbevent){evnt(25753,11599,"ide_methods.bas");if(r)goto S_48062;} do{ *_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ; if(!qbevent)break;evnt(25753,11600,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11601,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(25753,11602,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11603,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(25753,11606,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_SINGLE_P=*_FUNC_IDEHBAR_SINGLE_P*(*_FUNC_IDEHBAR_LONG_H- 4 ); if(!qbevent)break;evnt(25753,11607,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_LONG_X2=qbr(*_FUNC_IDEHBAR_LONG_X+ 2 +floor(*_FUNC_IDEHBAR_SINGLE_P)); if(!qbevent)break;evnt(25753,11608,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11609,"ide_methods.bas");}while(r); do{ *_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2; if(!qbevent)break;evnt(25753,11610,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11611,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free181.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 "data182.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_48075:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_IDEHLEN_STRING_A,qbs_new_txt_len("#",1),0)))||new_error){ if(qbevent){evnt(25753,11618,"ide_methods.bas");if(r)goto S_48075;} do{ *_FUNC_IDEHLEN_LONG_IDEHLEN=_FUNC_IDEHLEN_STRING_A->len- 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11618,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEHLEN_LONG_IDEHLEN=_FUNC_IDEHLEN_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11618,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free182.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 "data183.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11622,"ide_methods.bas");}while(r); S_48081:; fornext_value5312= 1 ; fornext_finalvalue5312=_SUB_IDEHPRINT_STRING_A->len; fornext_step5312= 1 ; if (fornext_step5312<0) fornext_step_negative5312=1; else fornext_step_negative5312=0; if (new_error) goto fornext_error5312; goto fornext_entrylabel5312; while(1){ fornext_value5312=fornext_step5312+(*_SUB_IDEHPRINT_LONG_I); fornext_entrylabel5312: *_SUB_IDEHPRINT_LONG_I=fornext_value5312; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5312){ if (fornext_value5312fornext_finalvalue5312) break; } fornext_error5312:; if(qbevent){evnt(25753,11623,"ide_methods.bas");if(r)goto S_48081;} 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(25753,11624,"ide_methods.bas");}while(r); S_48083:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEHPRINT_STRING_C,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(25753,11625,"ide_methods.bas");if(r)goto S_48083;} S_48084:; if ((*__LONG_IDEHL)||new_error){ if(qbevent){evnt(25753,11626,"ide_methods.bas");if(r)goto S_48084;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11626,"ide_methods.bas");}while(r); } }else{ do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_IDEHPRINT_STRING_C); if (new_error) goto skip5314; makefit(tqbs); qbs_print(tqbs,0); skip5314: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11628,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11628,"ide_methods.bas");}while(r); } fornext_continue_5311:; } fornext_exit_5311:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free183.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 "data184.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_48092:; fornext_value5317= 1 ; fornext_finalvalue5317=*__LONG_IDEBMKN; fornext_step5317= 1 ; if (fornext_step5317<0) fornext_step_negative5317=1; else fornext_step_negative5317=0; if (new_error) goto fornext_error5317; goto fornext_entrylabel5317; while(1){ fornext_value5317=fornext_step5317+(*_SUB_IDEINSLINE_LONG_B); fornext_entrylabel5317: *_SUB_IDEINSLINE_LONG_B=fornext_value5317; if (fornext_step_negative5317){ if (fornext_value5317fornext_finalvalue5317) break; } fornext_error5317:; if(qbevent){evnt(25753,11636,"ide_methods.bas");if(r)goto S_48092;} S_48093:; 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(25753,11637,"ide_methods.bas");if(r)goto S_48093;} 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(25753,11638,"ide_methods.bas");}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(25753,11639,"ide_methods.bas");}while(r); } fornext_continue_5316:; } fornext_exit_5316:; S_48098:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(25753,11643,"ide_methods.bas");if(r)goto S_48098;} do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ preserved_elements=__ARRAY_BYTE_IDEBREAKPOINTS[5]; } else preserved_elements=0; __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN+ 1 )-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); tmp_long=__ARRAY_BYTE_IDEBREAKPOINTS[5]; __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementsfornext_finalvalue5319) break; } fornext_error5319:; if(qbevent){evnt(25753,11645,"ide_methods.bas");if(r)goto S_48100;} do{ swap_8(&((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDEINSLINE_LONG_B)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])],&((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDEINSLINE_LONG_B- 1 )-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]); if(!qbevent)break;evnt(25753,11646,"ide_methods.bas");}while(r); fornext_continue_5318:; } fornext_exit_5318:; do{ tmp_long=array_check((*_SUB_IDEINSLINE_LONG_I)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,11648,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ preserved_elements=__ARRAY_BYTE_IDESKIPLINES[5]; } else preserved_elements=0; __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN+ 1 )-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDESKIPLINES[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); tmp_long=__ARRAY_BYTE_IDESKIPLINES[5]; __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementsfornext_finalvalue5321) break; } fornext_error5321:; if(qbevent){evnt(25753,11651,"ide_methods.bas");if(r)goto S_48105;} do{ swap_8(&((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDEINSLINE_LONG_B)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])],&((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDEINSLINE_LONG_B- 1 )-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]); if(!qbevent)break;evnt(25753,11652,"ide_methods.bas");}while(r); fornext_continue_5320:; } fornext_exit_5320:; do{ tmp_long=array_check((*_SUB_IDEINSLINE_LONG_I)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= 0 ; if(!qbevent)break;evnt(25753,11654,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEINSLINE_STRING_TEXT,qbs_rtrim(_SUB_IDEINSLINE_STRING_TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11657,"ide_methods.bas");}while(r); S_48111:; if ((-(*_SUB_IDEINSLINE_LONG_I== -1 ))||new_error){ if(qbevent){evnt(25753,11659,"ide_methods.bas");if(r)goto S_48111;} do{ *_SUB_IDEINSLINE_LONG_I=*__LONG_IDEL; if(!qbevent)break;evnt(25753,11659,"ide_methods.bas");}while(r); } S_48114:; if ((-(*_SUB_IDEINSLINE_LONG_I>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,11661,"ide_methods.bas");if(r)goto S_48114;} do{ SUB_IDESETLINE(_SUB_IDEINSLINE_LONG_I,_SUB_IDEINSLINE_STRING_TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11662,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11663,"ide_methods.bas");}while(r); } do{ SUB_IDEGOTOLINE(_SUB_IDEINSLINE_LONG_I); if(!qbevent)break;evnt(25753,11665,"ide_methods.bas");}while(r); do{ *_SUB_IDEINSLINE_LONG_TEXTLEN=_SUB_IDEINSLINE_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11667,"ide_methods.bas");}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(25753,11668,"ide_methods.bas");}while(r); do{ *__LONG_IDEN=*__LONG_IDEN+ 1 ; if(!qbevent)break;evnt(25753,11669,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free184.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_IDEINPUTBOX(qbs*_FUNC_IDEINPUTBOX_STRING_TITLE,qbs*_FUNC_IDEINPUTBOX_STRING_CAPTION,qbs*_FUNC_IDEINPUTBOX_STRING_INITIALVALUE,qbs*_FUNC_IDEINPUTBOX_STRING_VALIDINPUT,int32*_FUNC_IDEINPUTBOX_LONG_BOXWIDTH,int32*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH,int32*_FUNC_IDEINPUTBOX_LONG_OK){ 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 "data185.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,11676,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,11677,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11678,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,11679,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,11680,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEINPUTBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEINPUTBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,11681,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,11682,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEINPUTBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11683,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,11688,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_OK= 0 ; if(!qbevent)break;evnt(25753,11689,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEINPUTBOX_UDT_P)) + (0) ),_FUNC_IDEINPUTBOX_LONG_BOXWIDTH,&(pass5328= 5 ),_FUNC_IDEINPUTBOX_STRING_TITLE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11691,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_I=*_FUNC_IDEINPUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11693,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,11694,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,11695,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,11696,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(_FUNC_IDEINPUTBOX_STRING_CAPTION); if(!qbevent)break;evnt(25753,11697,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEINPUTBOX_STRING_INITIALVALUE); if(!qbevent)break;evnt(25753,11698,"ide_methods.bas");}while(r); S_48139:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEINPUTBOX_STRING_INITIALVALUE->len> 0 )))||new_error){ if(qbevent){evnt(25753,11699,"ide_methods.bas");if(r)goto S_48139;} do{ *(int8*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,11699,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,11700,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDEINPUTBOX_STRING_INITIALVALUE->len; if(!qbevent)break;evnt(25753,11701,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_I=*_FUNC_IDEINPUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11703,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,11704,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,11705,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEINPUTBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,11706,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,11707,"ide_methods.bas");}while(r); S_48149:; fornext_value5332= 1 ; fornext_finalvalue5332= 100 ; fornext_step5332= 1 ; if (fornext_step5332<0) fornext_step_negative5332=1; else fornext_step_negative5332=0; if (new_error) goto fornext_error5332; goto fornext_entrylabel5332; while(1){ fornext_value5332=fornext_step5332+(*_FUNC_IDEINPUTBOX_LONG_I); fornext_entrylabel5332: *_FUNC_IDEINPUTBOX_LONG_I=fornext_value5332; if (fornext_step_negative5332){ if (fornext_value5332fornext_finalvalue5332) break; } fornext_error5332:; if(qbevent){evnt(25753,11711,"ide_methods.bas");if(r)goto S_48149;} do{ memcpy(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEINPUTBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,11711,"ide_methods.bas");}while(r); fornext_continue_5331:; } fornext_exit_5331:; S_48152:; do{ if(qbevent){evnt(25753,11714,"ide_methods.bas");if(r)goto S_48152;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEINPUTBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,11718,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,11719,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,11719,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,11719,"ide_methods.bas");}while(r); S_48157:; fornext_value5335= 1 ; fornext_finalvalue5335= 100 ; fornext_step5335= 1 ; if (fornext_step5335<0) fornext_step_negative5335=1; else fornext_step_negative5335=0; if (new_error) goto fornext_error5335; goto fornext_entrylabel5335; while(1){ fornext_value5335=fornext_step5335+(*_FUNC_IDEINPUTBOX_LONG_I); fornext_entrylabel5335: *_FUNC_IDEINPUTBOX_LONG_I=fornext_value5335; if (fornext_step_negative5335){ if (fornext_value5335fornext_finalvalue5335) break; } fornext_error5335:; if(qbevent){evnt(25753,11720,"ide_methods.bas");if(r)goto S_48157;} S_48158:; if ((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,11721,"ide_methods.bas");if(r)goto S_48158;} do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEINPUTBOX_LONG_FOCUS-*_FUNC_IDEINPUTBOX_LONG_F; if(!qbevent)break;evnt(25753,11724,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,11725,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,11725,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEINPUTBOX_LONG_F); if(!qbevent)break;evnt(25753,11726,"ide_methods.bas");}while(r); S_48163:; if ((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,11727,"ide_methods.bas");if(r)goto S_48163;} do{ *_FUNC_IDEINPUTBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,11727,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,11727,"ide_methods.bas");}while(r); } } fornext_continue_5334:; } fornext_exit_5334:; do{ *_FUNC_IDEINPUTBOX_LONG_LASTFOCUS=*_FUNC_IDEINPUTBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,11730,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,11737,"ide_methods.bas");}while(r); S_48171:; if ((*_FUNC_IDEINPUTBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,11738,"ide_methods.bas");if(r)goto S_48171;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11738,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEINPUTBOX_LONG_CY,*_FUNC_IDEINPUTBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,11738,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11738,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,11741,"ide_methods.bas");}while(r); S_48177:; do{ if(qbevent){evnt(25753,11742,"ide_methods.bas");if(r)goto S_48177;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,11743,"ide_methods.bas");}while(r); S_48179:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,11744,"ide_methods.bas");if(r)goto S_48179;} do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11744,"ide_methods.bas");}while(r); } S_48182:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,11745,"ide_methods.bas");if(r)goto S_48182;} do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11745,"ide_methods.bas");}while(r); } S_48185:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,11746,"ide_methods.bas");if(r)goto S_48185;} do{ *_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,11746,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11746,"ide_methods.bas");}while(r); } S_48189:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,11747,"ide_methods.bas");if(r)goto S_48189;} do{ *_FUNC_IDEINPUTBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,11747,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11747,"ide_methods.bas");}while(r); } S_48193:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,11748,"ide_methods.bas");if(r)goto S_48193;} do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11748,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEINPUTBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,11749,"ide_methods.bas");}while(r); S_48197:; if ((-(*_FUNC_IDEINPUTBOX_LONG_ALT!=*_FUNC_IDEINPUTBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,11749,"ide_methods.bas");if(r)goto S_48197;} do{ *_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,11749,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEINPUTBOX_LONG_OLDALT=*_FUNC_IDEINPUTBOX_LONG_ALT; if(!qbevent)break;evnt(25753,11750,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,11751,"ide_methods.bas");}while(r); S_48202:; dl_continue_5336:; }while((!(*_FUNC_IDEINPUTBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5336:; if(qbevent){evnt(25753,11752,"ide_methods.bas");if(r)goto S_48202;} S_48203:; if ((*_FUNC_IDEINPUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,11753,"ide_methods.bas");if(r)goto S_48203;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,11753,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,11753,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEINPUTBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11755,"ide_methods.bas");}while(r); S_48209:; if ((*_FUNC_IDEINPUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,11756,"ide_methods.bas");if(r)goto S_48209;} S_48210:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,11757,"ide_methods.bas");if(r)goto S_48210;} do{ *_FUNC_IDEINPUTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11758,"ide_methods.bas");}while(r); S_48212:; if (((-(*_FUNC_IDEINPUTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEINPUTBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,11759,"ide_methods.bas");if(r)goto S_48212;} do{ qbs_set(_FUNC_IDEINPUTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEINPUTBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11759,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11762,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,11762,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11762,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,11766,"ide_methods.bas");}while(r); S_48221:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,11767,"ide_methods.bas");if(r)goto S_48221;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11767,"ide_methods.bas");}while(r); } S_48224:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,11768,"ide_methods.bas");if(r)goto S_48224;} do{ *_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,11768,"ide_methods.bas");}while(r); } S_48227:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,11769,"ide_methods.bas");if(r)goto S_48227;} do{ *_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,11769,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11769,"ide_methods.bas");}while(r); } S_48231:; if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,11770,"ide_methods.bas");if(r)goto S_48231;} do{ *_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,11770,"ide_methods.bas");}while(r); } S_48234:; if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS>*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,11771,"ide_methods.bas");if(r)goto S_48234;} do{ *_FUNC_IDEINPUTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,11771,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEINPUTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,11772,"ide_methods.bas");}while(r); S_48238:; fornext_value5339= 1 ; fornext_finalvalue5339= 100 ; fornext_step5339= 1 ; if (fornext_step5339<0) fornext_step_negative5339=1; else fornext_step_negative5339=0; if (new_error) goto fornext_error5339; goto fornext_entrylabel5339; while(1){ fornext_value5339=fornext_step5339+(*_FUNC_IDEINPUTBOX_LONG_I); fornext_entrylabel5339: *_FUNC_IDEINPUTBOX_LONG_I=fornext_value5339; if (fornext_step_negative5339){ if (fornext_value5339fornext_finalvalue5339) break; } fornext_error5339:; if(qbevent){evnt(25753,11773,"ide_methods.bas");if(r)goto S_48238;} do{ *_FUNC_IDEINPUTBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,11774,"ide_methods.bas");}while(r); S_48240:; if ((*_FUNC_IDEINPUTBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,11775,"ide_methods.bas");if(r)goto S_48240;} do{ *_FUNC_IDEINPUTBOX_LONG_FOCUSOFFSET=*_FUNC_IDEINPUTBOX_LONG_FOCUS-*_FUNC_IDEINPUTBOX_LONG_F; if(!qbevent)break;evnt(25753,11776,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEINPUTBOX_LONG_FOCUS,_FUNC_IDEINPUTBOX_LONG_F,_FUNC_IDEINPUTBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEINPUTBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN,_FUNC_IDEINPUTBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEINPUTBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11777,"ide_methods.bas");}while(r); } fornext_continue_5338:; } fornext_exit_5338:; S_48245:; if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS!=*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,11783,"ide_methods.bas");if(r)goto S_48245;} do{ *_FUNC_IDEINPUTBOX_LONG_PREVFOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,11785,"ide_methods.bas");}while(r); S_48247:; if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 1 ))||new_error){ if(qbevent){evnt(25753,11786,"ide_methods.bas");if(r)goto S_48247;} do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,11787,"ide_methods.bas");}while(r); S_48249:; if ((-(*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,11788,"ide_methods.bas");if(r)goto S_48249;} do{ *(int8*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,11788,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,11789,"ide_methods.bas");}while(r); } } S_48255:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEINPUTBOX_STRING_VALIDINPUT->len))||new_error){ if(qbevent){evnt(25753,11793,"ide_methods.bas");if(r)goto S_48255;} do{ qbs_set(_FUNC_IDEINPUTBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11794,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEINPUTBOX_STRING_TEMPA,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11795,"ide_methods.bas");}while(r); S_48258:; fornext_value5343= 1 ; fornext_finalvalue5343=_FUNC_IDEINPUTBOX_STRING_A->len; fornext_step5343= 1 ; if (fornext_step5343<0) fornext_step_negative5343=1; else fornext_step_negative5343=0; if (new_error) goto fornext_error5343; goto fornext_entrylabel5343; while(1){ fornext_value5343=fornext_step5343+(*_FUNC_IDEINPUTBOX_LONG_I); fornext_entrylabel5343: *_FUNC_IDEINPUTBOX_LONG_I=fornext_value5343; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5343){ if (fornext_value5343fornext_finalvalue5343) break; } fornext_error5343:; if(qbevent){evnt(25753,11796,"ide_methods.bas");if(r)goto S_48258;} S_48259:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDEINPUTBOX_STRING_VALIDINPUT,func_mid(_FUNC_IDEINPUTBOX_STRING_A,*_FUNC_IDEINPUTBOX_LONG_I, 1 ,1),0)> 0 )))||new_error){ if(qbevent){evnt(25753,11797,"ide_methods.bas");if(r)goto S_48259;} do{ qbs_set(_FUNC_IDEINPUTBOX_STRING_TEMPA,qbs_add(_FUNC_IDEINPUTBOX_STRING_TEMPA,func_mid(_FUNC_IDEINPUTBOX_STRING_A,*_FUNC_IDEINPUTBOX_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11798,"ide_methods.bas");}while(r); } fornext_continue_5342:; } fornext_exit_5342:; do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEINPUTBOX_STRING_TEMPA); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11801,"ide_methods.bas");}while(r); } S_48265:; if ((*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH)||new_error){ if(qbevent){evnt(25753,11804,"ide_methods.bas");if(r)goto S_48265;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11805,"ide_methods.bas");}while(r); } S_48268:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEINPUTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,11808,"ide_methods.bas");if(r)goto S_48268;} do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,11809,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11810,"ide_methods.bas");}while(r); } S_48272:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEINPUTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,11813,"ide_methods.bas");if(r)goto S_48272;} do{ qbs_set(_FUNC_IDEINPUTBOX_STRING_IDEINPUTBOX,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11814,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_OK= -1 ; if(!qbevent)break;evnt(25753,11815,"ide_methods.bas");}while(r); do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,11816,"ide_methods.bas");}while(r); do{ sub__keyclear(NULL,0); if(!qbevent)break;evnt(25753,11817,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11818,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,11822,"ide_methods.bas");}while(r); do{ *_FUNC_IDEINPUTBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,11823,"ide_methods.bas");}while(r); dl_continue_5333:; }while(1); dl_exit_5333:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free185.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_IDEINPUTBOX_STRING_IDEINPUTBOX);return _FUNC_IDEINPUTBOX_STRING_IDEINPUTBOX; } 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 "data186.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_48282:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,11830,"ide_methods.bas");if(r)goto S_48282;} S_48283:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,11831,"ide_methods.bas");if(r)goto S_48283;} do{ qbs_set(_SUB_IDENEWSF_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11832,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDENEWSF_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11833,"ide_methods.bas");}while(r); do{ *_SUB_IDENEWSF_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,11834,"ide_methods.bas");}while(r); do{ *_SUB_IDENEWSF_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,11834,"ide_methods.bas");}while(r); S_48288:; if ((-(*_SUB_IDENEWSF_LONG_SX2<*_SUB_IDENEWSF_LONG_SX1))||new_error){ if(qbevent){evnt(25753,11835,"ide_methods.bas");if(r)goto S_48288;} do{ swap_32(&*_SUB_IDENEWSF_LONG_SX1,&*_SUB_IDENEWSF_LONG_SX2); if(!qbevent)break;evnt(25753,11835,"ide_methods.bas");}while(r); } S_48291:; fornext_value5347=*_SUB_IDENEWSF_LONG_SX1; fornext_finalvalue5347=*_SUB_IDENEWSF_LONG_SX2- 1 ; fornext_step5347= 1 ; if (fornext_step5347<0) fornext_step_negative5347=1; else fornext_step_negative5347=0; if (new_error) goto fornext_error5347; goto fornext_entrylabel5347; while(1){ fornext_value5347=fornext_step5347+(*_SUB_IDENEWSF_LONG_X); fornext_entrylabel5347: *_SUB_IDENEWSF_LONG_X=fornext_value5347; if (fornext_step_negative5347){ if (fornext_value5347fornext_finalvalue5347) break; } fornext_error5347:; if(qbevent){evnt(25753,11836,"ide_methods.bas");if(r)goto S_48291;} S_48292:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDENEWSF_LONG_X<=_SUB_IDENEWSF_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,11837,"ide_methods.bas");if(r)goto S_48292;} 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(25753,11837,"ide_methods.bas");}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(25753,11837,"ide_methods.bas");}while(r); } fornext_continue_5346:; } fornext_exit_5346:; } } do{ qbs_set(_SUB_IDENEWSF_STRING_NEWSF,FUNC_IDEINPUTBOX(qbs_add(qbs_new_txt_len("New ",4),_SUB_IDENEWSF_STRING_SF),qbs_new_txt_len("#Name",5),_SUB_IDENEWSF_STRING_A2,qbs_new_txt_len("",0),&(pass5349= 60 ),&(pass5350= 40 ),&(pass5351= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11842,"ide_methods.bas");}while(r); S_48301:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDENEWSF_STRING_NEWSF->len))||new_error){ if(qbevent){evnt(25753,11844,"ide_methods.bas");if(r)goto S_48301;} do{ *_SUB_IDENEWSF_LONG_Y=*__LONG_IDEN; if(!qbevent)break;evnt(25753,11845,"ide_methods.bas");}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,11846,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11846,"ide_methods.bas");}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,11847,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_add(qbs_add(_SUB_IDENEWSF_STRING_SF,qbs_new_txt_len(" ",1)),_SUB_IDENEWSF_STRING_NEWSF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11847,"ide_methods.bas");}while(r); do{ *__LONG_IDESY=*_SUB_IDENEWSF_LONG_Y; if(!qbevent)break;evnt(25753,11848,"ide_methods.bas");}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,11849,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(_SUB_IDENEWSF_LONG_Y,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11849,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_IDENEWSF_LONG_Y; if(!qbevent)break;evnt(25753,11850,"ide_methods.bas");}while(r); do{ *_SUB_IDENEWSF_LONG_Y=*_SUB_IDENEWSF_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,11851,"ide_methods.bas");}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(25753,11851,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,11852,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,11852,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,11853,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,11854,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free186.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_IDENEWFOLDER(qbs*_FUNC_IDENEWFOLDER_STRING_THISPATH){ 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 "data187.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDENEWFOLDER_STRING_NEWFOLDER,FUNC_IDEINPUTBOX(qbs_new_txt_len("New Folder",10),qbs_new_txt_len("#Name",5),qbs_new_txt_len("",0),qbs_new_txt_len("",0),&(pass5354= 60 ),&(pass5355= 0 ),&(pass5356= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11859,"ide_methods.bas");}while(r); S_48319:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDENEWFOLDER_STRING_NEWFOLDER->len))||new_error){ if(qbevent){evnt(25753,11861,"ide_methods.bas");if(r)goto S_48319;} S_48320:; if ((qbs_cleanup(qbs_tmp_base,func__direxists(qbs_add(qbs_add(_FUNC_IDENEWFOLDER_STRING_THISPATH,__STRING1_IDEPATHSEP),_FUNC_IDENEWFOLDER_STRING_NEWFOLDER))))||new_error){ if(qbevent){evnt(25753,11862,"ide_methods.bas");if(r)goto S_48320;} do{ qbs_set(_FUNC_IDENEWFOLDER_STRING_IDENEWFOLDER,_FUNC_IDENEWFOLDER_STRING_NEWFOLDER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11863,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,11864,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 5 ; if(!qbevent)break;evnt(25753,11866,"ide_methods.bas");}while(r); do{ sub_mkdir(qbs_add(qbs_add(_FUNC_IDENEWFOLDER_STRING_THISPATH,__STRING1_IDEPATHSEP),_FUNC_IDENEWFOLDER_STRING_NEWFOLDER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11867,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,11868,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDENEWFOLDER_STRING_IDENEWFOLDER,_FUNC_IDENEWFOLDER_STRING_NEWFOLDER); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11869,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free187.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_IDENEWFOLDER_STRING_IDENEWFOLDER);return _FUNC_IDENEWFOLDER_STRING_IDENEWFOLDER; } 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 "data188.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__INTEGER_IDETXTLAST=*__INTEGER_IDETXTLAST+ 1 ; if(!qbevent)break;evnt(25753,11875,"ide_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11876,"ide_methods.bas");}while(r); do{ *_FUNC_IDENEWTXT_LONG_IDENEWTXT=*__INTEGER_IDETXTLAST; if(!qbevent)break;evnt(25753,11877,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free188.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(int8*_SUB_IDENOMATCH_BYTE_SHOWFLAGS){ 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 "data189.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_IDENOMATCH_STRING_MSG,qbs_new_txt_len("Match not found.",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11881,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDENOMATCH_STRING_C,qbs_new_txt_len(", ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11882,"ide_methods.bas");}while(r); S_48334:; if ((*_SUB_IDENOMATCH_BYTE_SHOWFLAGS)||new_error){ if(qbevent){evnt(25753,11883,"ide_methods.bas");if(r)goto S_48334;} S_48335:; if ((*__INTEGER_IDEFINDCASESENS)||new_error){ if(qbevent){evnt(25753,11884,"ide_methods.bas");if(r)goto S_48335;} do{ qbs_set(_SUB_IDENOMATCH_STRING_FLAGS,qbs_add(_SUB_IDENOMATCH_STRING_FLAGS,qbs_new_txt_len("match case",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11884,"ide_methods.bas");}while(r); do{ *_SUB_IDENOMATCH_LONG_FLAGSET=*_SUB_IDENOMATCH_LONG_FLAGSET+ 1 ; if(!qbevent)break;evnt(25753,11884,"ide_methods.bas");}while(r); } S_48339:; if ((*__INTEGER_IDEFINDWHOLEWORD)||new_error){ if(qbevent){evnt(25753,11885,"ide_methods.bas");if(r)goto S_48339;} do{ qbs_set(_SUB_IDENOMATCH_STRING_FLAGS,qbs_add(qbs_add(_SUB_IDENOMATCH_STRING_FLAGS,qbs_left(_SUB_IDENOMATCH_STRING_C,func_abs((int32)(*_SUB_IDENOMATCH_LONG_FLAGSET))* 2 )),qbs_new_txt_len("whole word",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11885,"ide_methods.bas");}while(r); do{ *_SUB_IDENOMATCH_LONG_FLAGSET=*_SUB_IDENOMATCH_LONG_FLAGSET+ 1 ; if(!qbevent)break;evnt(25753,11885,"ide_methods.bas");}while(r); } S_48343:; if ((*__INTEGER_IDEFINDNOCOMMENTS)||new_error){ if(qbevent){evnt(25753,11886,"ide_methods.bas");if(r)goto S_48343;} do{ qbs_set(_SUB_IDENOMATCH_STRING_FLAGS,qbs_add(qbs_add(_SUB_IDENOMATCH_STRING_FLAGS,qbs_left(_SUB_IDENOMATCH_STRING_C,func_abs((int32)(*_SUB_IDENOMATCH_LONG_FLAGSET))* 2 )),qbs_new_txt_len("no comments",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11886,"ide_methods.bas");}while(r); do{ *_SUB_IDENOMATCH_LONG_FLAGSET=*_SUB_IDENOMATCH_LONG_FLAGSET+ 1 ; if(!qbevent)break;evnt(25753,11886,"ide_methods.bas");}while(r); } S_48347:; if ((*__INTEGER_IDEFINDONLYCOMMENTS)||new_error){ if(qbevent){evnt(25753,11887,"ide_methods.bas");if(r)goto S_48347;} do{ qbs_set(_SUB_IDENOMATCH_STRING_FLAGS,qbs_add(qbs_add(_SUB_IDENOMATCH_STRING_FLAGS,qbs_left(_SUB_IDENOMATCH_STRING_C,func_abs((int32)(*_SUB_IDENOMATCH_LONG_FLAGSET))* 2 )),qbs_new_txt_len("only comments",13))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11887,"ide_methods.bas");}while(r); do{ *_SUB_IDENOMATCH_LONG_FLAGSET=*_SUB_IDENOMATCH_LONG_FLAGSET+ 1 ; if(!qbevent)break;evnt(25753,11887,"ide_methods.bas");}while(r); } S_48351:; if ((*__INTEGER_IDEFINDNOSTRINGS)||new_error){ if(qbevent){evnt(25753,11888,"ide_methods.bas");if(r)goto S_48351;} do{ qbs_set(_SUB_IDENOMATCH_STRING_FLAGS,qbs_add(qbs_add(_SUB_IDENOMATCH_STRING_FLAGS,qbs_left(_SUB_IDENOMATCH_STRING_C,func_abs((int32)(*_SUB_IDENOMATCH_LONG_FLAGSET))* 2 )),qbs_new_txt_len("no strings",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11888,"ide_methods.bas");}while(r); do{ *_SUB_IDENOMATCH_LONG_FLAGSET=*_SUB_IDENOMATCH_LONG_FLAGSET+ 1 ; if(!qbevent)break;evnt(25753,11888,"ide_methods.bas");}while(r); } S_48355:; if ((*__INTEGER_IDEFINDONLYSTRINGS)||new_error){ if(qbevent){evnt(25753,11889,"ide_methods.bas");if(r)goto S_48355;} do{ qbs_set(_SUB_IDENOMATCH_STRING_FLAGS,qbs_add(qbs_add(_SUB_IDENOMATCH_STRING_FLAGS,qbs_left(_SUB_IDENOMATCH_STRING_C,func_abs((int32)(*_SUB_IDENOMATCH_LONG_FLAGSET))* 2 )),qbs_new_txt_len("only strings",12))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11889,"ide_methods.bas");}while(r); do{ *_SUB_IDENOMATCH_LONG_FLAGSET=*_SUB_IDENOMATCH_LONG_FLAGSET+ 1 ; if(!qbevent)break;evnt(25753,11889,"ide_methods.bas");}while(r); } S_48359:; if ((-(*_SUB_IDENOMATCH_LONG_FLAGSET> 1 ))||new_error){ if(qbevent){evnt(25753,11890,"ide_methods.bas");if(r)goto S_48359;} do{ qbs_set(_SUB_IDENOMATCH_STRING_PL,qbs_new_txt_len("s",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11890,"ide_methods.bas");}while(r); } S_48362:; if ((*_SUB_IDENOMATCH_LONG_FLAGSET)||new_error){ if(qbevent){evnt(25753,11891,"ide_methods.bas");if(r)goto S_48362;} do{ qbs_set(_SUB_IDENOMATCH_STRING_MSG,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_IDENOMATCH_STRING_MSG,qbs_new_txt_len("\\n(Flag",7)),_SUB_IDENOMATCH_STRING_PL),qbs_new_txt_len(": ",2)),_SUB_IDENOMATCH_STRING_FLAGS),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11891,"ide_methods.bas");}while(r); } } do{ *_SUB_IDENOMATCH_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Search complete",15),_SUB_IDENOMATCH_STRING_MSG,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11893,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free189.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_IDEFILEDIALOG(qbs*_FUNC_IDEFILEDIALOG_STRING_PROGRAMNAME,int8*_FUNC_IDEFILEDIALOG_BYTE_MODE){ 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 "data190.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,11897,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,11900,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,11901,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11902,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,11903,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,11904,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4]+1; _FUNC_IDEFILEDIALOG_ARRAY_UDT_O[6]=1; if (_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[2]&4){ _FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0]),0,_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEFILEDIALOG_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,11905,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,11906,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11907,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING_IDEPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11911,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_FILELIST,FUNC_IDEZFILELIST(_FUNC_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_LONG_ALLFILES,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11912,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATHLIST,FUNC_IDEZPATHLIST(_FUNC_IDEFILEDIALOG_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11913,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I= 0 ; if(!qbevent)break;evnt(25753,11915,"ide_methods.bas");}while(r); S_48380:; if ((-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 1 ))||new_error){ if(qbevent){evnt(25753,11916,"ide_methods.bas");if(r)goto S_48380;} do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEFILEDIALOG_UDT_P)) + (0) ),&(pass5360= 70 ),&(pass5361=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ),qbs_new_txt_len("Open",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11917,"ide_methods.bas");}while(r); S_48382:; }else{ if (-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 2 )){ if(qbevent){evnt(25753,11918,"ide_methods.bas");if(r)goto S_48382;} do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEFILEDIALOG_UDT_P)) + (0) ),&(pass5362= 70 ),&(pass5363=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ),qbs_new_txt_len("Save As",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11919,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEFILEDIALOG_LONG_I=*_FUNC_IDEFILEDIALOG_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11921,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,11922,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,11923,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,11924,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("File #Name",10)); if(!qbevent)break;evnt(25753,11925,"ide_methods.bas");}while(r); S_48390:; if ((-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 2 ))||new_error){ if(qbevent){evnt(25753,11926,"ide_methods.bas");if(r)goto S_48390;} do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEFILEDIALOG_STRING_PROGRAMNAME); if(!qbevent)break;evnt(25753,11927,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,11928,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,11929,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDEFILEDIALOG_STRING_PROGRAMNAME->len; if(!qbevent)break;evnt(25753,11930,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_I=*_FUNC_IDEFILEDIALOG_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11933,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,11934,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,11935,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+28))= 32 ; if(!qbevent)break;evnt(25753,11936,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 14 ; if(!qbevent)break;evnt(25753,11936,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Files",6)); if(!qbevent)break;evnt(25753,11937,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEFILEDIALOG_STRING_FILELIST); if(!qbevent)break;evnt(25753,11938,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_FILELIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11938,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I=*_FUNC_IDEFILEDIALOG_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11939,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,11940,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+20))= 37 ; if(!qbevent)break;evnt(25753,11941,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,11941,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+28))= 31 ; if(!qbevent)break;evnt(25753,11942,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+32))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 16 ; if(!qbevent)break;evnt(25753,11942,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Paths",6)); if(!qbevent)break;evnt(25753,11943,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEFILEDIALOG_STRING_PATHLIST); if(!qbevent)break;evnt(25753,11944,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11944,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I=*_FUNC_IDEFILEDIALOG_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11945,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,11946,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+20))= 37 ; if(!qbevent)break;evnt(25753,11947,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 9 ; if(!qbevent)break;evnt(25753,11948,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len(".#BAS Only",10)); if(!qbevent)break;evnt(25753,11949,"ide_methods.bas");}while(r); S_48418:; if ((*_FUNC_IDEFILEDIALOG_LONG_ALLFILES)||new_error){ if(qbevent){evnt(25753,11950,"ide_methods.bas");if(r)goto S_48418;} do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,11950,"ide_methods.bas");}while(r); }else{ do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,11950,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_PREVBASONLY=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,11951,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I=*_FUNC_IDEFILEDIALOG_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11952,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,11953,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+20))= 56 ; if(!qbevent)break;evnt(25753,11954,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 9 ; if(!qbevent)break;evnt(25753,11955,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_new_txt_len("Ne#w Folder",11)); if(!qbevent)break;evnt(25753,11956,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I=*_FUNC_IDEFILEDIALOG_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,11957,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,11958,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+24))=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 7 ; if(!qbevent)break;evnt(25753,11959,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEFILEDIALOG_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,11960,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,11961,"ide_methods.bas");}while(r); S_48434:; fornext_value5366= 1 ; fornext_finalvalue5366= 100 ; fornext_step5366= 1 ; if (fornext_step5366<0) fornext_step_negative5366=1; else fornext_step_negative5366=0; if (new_error) goto fornext_error5366; goto fornext_entrylabel5366; while(1){ fornext_value5366=fornext_step5366+(*_FUNC_IDEFILEDIALOG_LONG_I); fornext_entrylabel5366: *_FUNC_IDEFILEDIALOG_LONG_I=fornext_value5366; if (fornext_step_negative5366){ if (fornext_value5366fornext_finalvalue5366) break; } fornext_error5366:; if(qbevent){evnt(25753,11965,"ide_methods.bas");if(r)goto S_48434;} do{ memcpy(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEFILEDIALOG_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,11965,"ide_methods.bas");}while(r); fornext_continue_5365:; } fornext_exit_5365:; S_48437:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 1 ))&(-(__STRING_IDEOPENFILE->len> 0 ))))||new_error){ if(qbevent){evnt(25753,11968,"ide_methods.bas");if(r)goto S_48437;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_F,__STRING_IDEOPENFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11968,"ide_methods.bas");}while(r); do{ goto LABEL_DIRECTLOAD; if(!qbevent)break;evnt(25753,11968,"ide_methods.bas");}while(r); } S_48441:; do{ if(qbevent){evnt(25753,11970,"ide_methods.bas");if(r)goto S_48441;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEFILEDIALOG_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,11973,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_F= 1 ; if(!qbevent)break;evnt(25753,11974,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,11974,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,11974,"ide_methods.bas");}while(r); S_48446:; fornext_value5370= 1 ; fornext_finalvalue5370= 100 ; fornext_step5370= 1 ; if (fornext_step5370<0) fornext_step_negative5370=1; else fornext_step_negative5370=0; if (new_error) goto fornext_error5370; goto fornext_entrylabel5370; while(1){ fornext_value5370=fornext_step5370+(*_FUNC_IDEFILEDIALOG_LONG_I); fornext_entrylabel5370: *_FUNC_IDEFILEDIALOG_LONG_I=fornext_value5370; if (fornext_step_negative5370){ if (fornext_value5370fornext_finalvalue5370) break; } fornext_error5370:; if(qbevent){evnt(25753,11975,"ide_methods.bas");if(r)goto S_48446;} S_48447:; if ((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,11976,"ide_methods.bas");if(r)goto S_48447;} do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEFILEDIALOG_LONG_FOCUS-*_FUNC_IDEFILEDIALOG_LONG_F; if(!qbevent)break;evnt(25753,11978,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,11979,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,11979,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEFILEDIALOG_LONG_F); if(!qbevent)break;evnt(25753,11980,"ide_methods.bas");}while(r); S_48452:; if ((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,11981,"ide_methods.bas");if(r)goto S_48452;} do{ *_FUNC_IDEFILEDIALOG_LONG_CX=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,11981,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_CY=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,11981,"ide_methods.bas");}while(r); } } fornext_continue_5369:; } fornext_exit_5369:; do{ *_FUNC_IDEFILEDIALOG_LONG_LASTFOCUS=*_FUNC_IDEFILEDIALOG_LONG_F- 1 ; if(!qbevent)break;evnt(25753,11984,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,11988,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDEFILEDIALOG_UDT_P)+(4))+ 4 ,qbs_new_txt_len("Path: ",6),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11988,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,_FUNC_IDEFILEDIALOG_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11989,"ide_methods.bas");}while(r); S_48462:; if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_IDEFILEDIALOG_STRING_A->len== 2 ))&(qbs_equal(qbs_right(_FUNC_IDEFILEDIALOG_STRING_A, 1 ),qbs_new_txt_len(":",1)))))||new_error){ if(qbevent){evnt(25753,11990,"ide_methods.bas");if(r)goto S_48462;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,qbs_add(_FUNC_IDEFILEDIALOG_STRING_A,qbs_new_txt_len("\\",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11990,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_W=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_UDT_P)+(8))- 8 ; if(!qbevent)break;evnt(25753,11991,"ide_methods.bas");}while(r); S_48466:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDEFILEDIALOG_STRING_A->len)>(*_FUNC_IDEFILEDIALOG_LONG_W- 3 ))))||new_error){ if(qbevent){evnt(25753,11992,"ide_methods.bas");if(r)goto S_48466;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,qbs_add(func_string( 3 , 250 ),qbs_right(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_W- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11992,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_UDT_P)+(0))+ 2 + 6 ,*(int32*)(((char*)_FUNC_IDEFILEDIALOG_UDT_P)+(4))+ 4 ,_FUNC_IDEFILEDIALOG_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,11993,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,11998,"ide_methods.bas");}while(r); S_48471:; if ((*_FUNC_IDEFILEDIALOG_LONG_CX)||new_error){ if(qbevent){evnt(25753,11999,"ide_methods.bas");if(r)goto S_48471;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11999,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEFILEDIALOG_LONG_CY,*_FUNC_IDEFILEDIALOG_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,11999,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,11999,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,12002,"ide_methods.bas");}while(r); S_48477:; do{ if(qbevent){evnt(25753,12003,"ide_methods.bas");if(r)goto S_48477;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,12004,"ide_methods.bas");}while(r); S_48479:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,12005,"ide_methods.bas");if(r)goto S_48479;} do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12005,"ide_methods.bas");}while(r); } S_48482:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,12006,"ide_methods.bas");if(r)goto S_48482;} do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12006,"ide_methods.bas");}while(r); } S_48485:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,12007,"ide_methods.bas");if(r)goto S_48485;} do{ *_FUNC_IDEFILEDIALOG_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,12007,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12007,"ide_methods.bas");}while(r); } S_48489:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,12008,"ide_methods.bas");if(r)goto S_48489;} do{ *_FUNC_IDEFILEDIALOG_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,12008,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12008,"ide_methods.bas");}while(r); } S_48493:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,12009,"ide_methods.bas");if(r)goto S_48493;} do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12009,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,12010,"ide_methods.bas");}while(r); S_48497:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_ALT!=*_FUNC_IDEFILEDIALOG_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,12010,"ide_methods.bas");if(r)goto S_48497;} do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12010,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_OLDALT=*_FUNC_IDEFILEDIALOG_LONG_ALT; if(!qbevent)break;evnt(25753,12011,"ide_methods.bas");}while(r); S_48501:; if ((-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 1 ))||new_error){ if(qbevent){evnt(25753,12013,"ide_methods.bas");if(r)goto S_48501;} S_48502:; if ((-(func__totaldroppedfiles()> 0 ))||new_error){ if(qbevent){evnt(25753,12014,"ide_methods.bas");if(r)goto S_48502;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),func__droppedfile( 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12015,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,12016,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,12017,"ide_methods.bas");}while(r); do{ sub__finishdrop(); if(!qbevent)break;evnt(25753,12018,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,12019,"ide_methods.bas");}while(r); } } do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,12023,"ide_methods.bas");}while(r); S_48511:; dl_continue_5373:; }while((!(*_FUNC_IDEFILEDIALOG_LONG_CHANGE))&&(!new_error)); dl_exit_5373:; if(qbevent){evnt(25753,12024,"ide_methods.bas");if(r)goto S_48511;} S_48512:; if ((*_FUNC_IDEFILEDIALOG_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,12025,"ide_methods.bas");if(r)goto S_48512;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,12025,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,12025,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12027,"ide_methods.bas");}while(r); S_48518:; if ((*_FUNC_IDEFILEDIALOG_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,12028,"ide_methods.bas");if(r)goto S_48518;} S_48519:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,12029,"ide_methods.bas");if(r)goto S_48519;} do{ *_FUNC_IDEFILEDIALOG_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12030,"ide_methods.bas");}while(r); S_48521:; if (((-(*_FUNC_IDEFILEDIALOG_LONG_K>= 65 ))&(-(*_FUNC_IDEFILEDIALOG_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,12031,"ide_methods.bas");if(r)goto S_48521;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_ALTLETTER,func_chr(*_FUNC_IDEFILEDIALOG_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12031,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,12034,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,12034,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,12034,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,12038,"ide_methods.bas");}while(r); S_48530:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,12039,"ide_methods.bas");if(r)goto S_48530;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12039,"ide_methods.bas");}while(r); } S_48533:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,12040,"ide_methods.bas");if(r)goto S_48533;} do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS=*_FUNC_IDEFILEDIALOG_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,12040,"ide_methods.bas");}while(r); } S_48536:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,12041,"ide_methods.bas");if(r)goto S_48536;} do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS=*_FUNC_IDEFILEDIALOG_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,12041,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12041,"ide_methods.bas");}while(r); } S_48540:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,12042,"ide_methods.bas");if(r)goto S_48540;} do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS=*_FUNC_IDEFILEDIALOG_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,12042,"ide_methods.bas");}while(r); } S_48543:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS>*_FUNC_IDEFILEDIALOG_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,12043,"ide_methods.bas");if(r)goto S_48543;} do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,12043,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEFILEDIALOG_LONG_F= 1 ; if(!qbevent)break;evnt(25753,12044,"ide_methods.bas");}while(r); S_48547:; fornext_value5377= 1 ; fornext_finalvalue5377= 100 ; fornext_step5377= 1 ; if (fornext_step5377<0) fornext_step_negative5377=1; else fornext_step_negative5377=0; if (new_error) goto fornext_error5377; goto fornext_entrylabel5377; while(1){ fornext_value5377=fornext_step5377+(*_FUNC_IDEFILEDIALOG_LONG_I); fornext_entrylabel5377: *_FUNC_IDEFILEDIALOG_LONG_I=fornext_value5377; if (fornext_step_negative5377){ if (fornext_value5377fornext_finalvalue5377) break; } fornext_error5377:; if(qbevent){evnt(25753,12045,"ide_methods.bas");if(r)goto S_48547;} do{ *_FUNC_IDEFILEDIALOG_LONG_T=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,12046,"ide_methods.bas");}while(r); S_48549:; if ((*_FUNC_IDEFILEDIALOG_LONG_T)||new_error){ if(qbevent){evnt(25753,12047,"ide_methods.bas");if(r)goto S_48549;} do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUSOFFSET=*_FUNC_IDEFILEDIALOG_LONG_FOCUS-*_FUNC_IDEFILEDIALOG_LONG_F; if(!qbevent)break;evnt(25753,12048,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEFILEDIALOG_LONG_I)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEFILEDIALOG_LONG_FOCUS,_FUNC_IDEFILEDIALOG_LONG_F,_FUNC_IDEFILEDIALOG_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEFILEDIALOG_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEFILEDIALOG_LONG_MOUSEDOWN,_FUNC_IDEFILEDIALOG_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEFILEDIALOG_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12049,"ide_methods.bas");}while(r); } fornext_continue_5376:; } fornext_exit_5376:; S_48554:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS!=*_FUNC_IDEFILEDIALOG_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,12064,"ide_methods.bas");if(r)goto S_48554;} do{ *_FUNC_IDEFILEDIALOG_LONG_PREVFOCUS=*_FUNC_IDEFILEDIALOG_LONG_FOCUS; if(!qbevent)break;evnt(25753,12066,"ide_methods.bas");}while(r); S_48556:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 1 ))||new_error){ if(qbevent){evnt(25753,12067,"ide_methods.bas");if(r)goto S_48556;} do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_FOCUS)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_FOCUS)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,12068,"ide_methods.bas");}while(r); S_48558:; if ((-(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_FOCUS)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,12069,"ide_methods.bas");if(r)goto S_48558;} do{ *(int8*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_FOCUS)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,12069,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEFILEDIALOG_LONG_FOCUS)-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,12070,"ide_methods.bas");}while(r); } } S_48564:; if ((-(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))!=*_FUNC_IDEFILEDIALOG_LONG_PREVBASONLY))||new_error){ if(qbevent){evnt(25753,12074,"ide_methods.bas");if(r)goto S_48564;} do{ *_FUNC_IDEFILEDIALOG_LONG_PREVBASONLY=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,12075,"ide_methods.bas");}while(r); S_48566:; if ((-(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))== 0 ))||new_error){ if(qbevent){evnt(25753,12076,"ide_methods.bas");if(r)goto S_48566;} do{ *_FUNC_IDEFILEDIALOG_LONG_ALLFILES= 1 ; if(!qbevent)break;evnt(25753,12076,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEFILEDIALOG_LONG_ALLFILES= 0 ; if(!qbevent)break;evnt(25753,12076,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_LONG_ALLFILES,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12077,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12078,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12079,"ide_methods.bas");}while(r); } S_48575:; if (((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 5 ))&(-(*_FUNC_IDEFILEDIALOG_LONG_INFO!= 0 )))||new_error){ if(qbevent){evnt(25753,12082,"ide_methods.bas");if(r)goto S_48575;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_NEWPATH,FUNC_IDENEWFOLDER(_FUNC_IDEFILEDIALOG_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12084,"ide_methods.bas");}while(r); S_48577:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEFILEDIALOG_STRING_NEWPATH->len))||new_error){ if(qbevent){evnt(25753,12085,"ide_methods.bas");if(r)goto S_48577;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_F,FUNC_REMOVEDOUBLESLASHES(_FUNC_IDEFILEDIALOG_STRING_NEWPATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12086,"ide_methods.bas");}while(r); do{ goto LABEL_CHANGEPATH; if(!qbevent)break;evnt(25753,12087,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12089,"ide_methods.bas");}while(r); } } S_48584:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 7 ))&(-(*_FUNC_IDEFILEDIALOG_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,12093,"ide_methods.bas");if(r)goto S_48584;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_IDEFILEDIALOG,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12094,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12095,"ide_methods.bas");}while(r); } S_48588:; if (((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 2 ))&(-(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))!=*_FUNC_IDEFILEDIALOG_LONG_PREVFILEBOXSEL)))||new_error){ if(qbevent){evnt(25753,12098,"ide_methods.bas");if(r)goto S_48588;} do{ *_FUNC_IDEFILEDIALOG_LONG_PREVFILEBOXSEL=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,12099,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12100,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+76))= 0 ; if(!qbevent)break;evnt(25753,12101,"ide_methods.bas");}while(r); } S_48593:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 3 ))||new_error){ if(qbevent){evnt(25753,12104,"ide_methods.bas");if(r)goto S_48593;} S_48594:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(__STRING_K,func_chr( 13 )))|(-(*_FUNC_IDEFILEDIALOG_LONG_INFO== 1 ))))&(-(*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))>= 1 ))))||new_error){ if(qbevent){evnt(25753,12105,"ide_methods.bas");if(r)goto S_48594;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_NEWPATH,FUNC_REMOVEDOUBLESLASHES(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12106,"ide_methods.bas");}while(r); S_48596:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEFILEDIALOG_STRING_NEWPATH,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,12107,"ide_methods.bas");if(r)goto S_48596;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_NEWPATH,qbs_new_txt_len("..",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12108,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_F,_FUNC_IDEFILEDIALOG_STRING_NEWPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12109,"ide_methods.bas");}while(r); do{ goto LABEL_CHANGEPATH; if(!qbevent)break;evnt(25753,12110,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATH,FUNC_REMOVEDOUBLESLASHES(FUNC_IDEZCHANGEPATH(_FUNC_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_STRING_NEWPATH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12112,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_LONG_ALLFILES,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12113,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12114,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12116,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,12117,"ide_methods.bas");}while(r); S_48606:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_INFO== 1 ))||new_error){ if(qbevent){evnt(25753,12118,"ide_methods.bas");if(r)goto S_48606;} do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12118,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12119,"ide_methods.bas");}while(r); } } } S_48613:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEFILEDIALOG_LONG_INFO== 1 ))&(-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 2 ))))|(((-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 6 ))&(-(*_FUNC_IDEFILEDIALOG_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,12125,"ide_methods.bas");if(r)goto S_48613;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_F,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12126,"ide_methods.bas");}while(r); S_48615:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_FUNC_IDEFILEDIALOG_STRING_F)))||new_error){ if(qbevent){evnt(25753,12128,"ide_methods.bas");if(r)goto S_48615;} do{ goto LABEL_DIRECTLOAD; if(!qbevent)break;evnt(25753,12128,"ide_methods.bas");}while(r); } S_48618:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len("",0)))&(-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 1 ))&(qbs_equal(__STRING_K,func_chr( 13 )))))||new_error){ if(qbevent){evnt(25753,12130,"ide_methods.bas");if(r)goto S_48618;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_LONG_ALLFILES,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12132,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12133,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12134,"ide_methods.bas");}while(r); S_48622:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len("",0)))&(-(*_FUNC_IDEFILEDIALOG_LONG_FOCUS== 6 ))&(-(*_FUNC_IDEFILEDIALOG_LONG_INFO!= 0 )))){ if(qbevent){evnt(25753,12135,"ide_methods.bas");if(r)goto S_48622;} do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12136,"ide_methods.bas");}while(r); } } LABEL_CHANGEPATH:; if(qbevent){evnt(25753,12140,"ide_methods.bas");r=0;} S_48625:; if ((qbs_cleanup(qbs_tmp_base,func__direxists(qbs_add(qbs_add(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEFILEDIALOG_STRING_F))))||new_error){ if(qbevent){evnt(25753,12141,"ide_methods.bas");if(r)goto S_48625;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATH,FUNC_REMOVEDOUBLESLASHES(FUNC_IDEZGETFILEPATH(_FUNC_IDEFILEDIALOG_STRING_PATH,qbs_add(_FUNC_IDEFILEDIALOG_STRING_F,__STRING1_IDEPATHSEP)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12143,"ide_methods.bas");}while(r); S_48627:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,12144,"ide_methods.bas");if(r)goto S_48627;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12144,"ide_methods.bas");}while(r); } S_48630:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEFILEDIALOG_STRING_NEWPATH->len== 0 )))||new_error){ if(qbevent){evnt(25753,12146,"ide_methods.bas");if(r)goto S_48630;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12147,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,12148,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_NEWPATH,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12150,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_LONG_ALLFILES,qbs_new_txt_len("",0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12152,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12153,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12154,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12155,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12156,"ide_methods.bas");}while(r); } S_48642:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len("?",1),0)> 0 ))|(-(func_instr(NULL,_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len("*",1),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,12160,"ide_methods.bas");if(r)goto S_48642;} S_48643:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len("/",1),0)> 0 ))|(-(func_instr(NULL,_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len("\\",1),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,12161,"ide_methods.bas");if(r)goto S_48643;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATH,FUNC_REMOVEDOUBLESLASHES(FUNC_IDEZGETFILEPATH(_FUNC_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_STRING_F))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12163,"ide_methods.bas");}while(r); S_48645:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,12164,"ide_methods.bas");if(r)goto S_48645;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12164,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12165,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12166,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEFILEDIALOG_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12168,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+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_IDEFILEDIALOG_STRING_PATH,&(pass5381= 2 ),_FUNC_IDEFILEDIALOG_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12169,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= -1 ; if(!qbevent)break;evnt(25753,12170,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,12171,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,12172,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,12173,"ide_methods.bas");}while(r); S_48657:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_lcase(qbs_right(_FUNC_IDEFILEDIALOG_STRING_F, 4 )),qbs_new_txt_len(".bas",4))))||new_error){ if(qbevent){evnt(25753,12174,"ide_methods.bas");if(r)goto S_48657;} do{ *_FUNC_IDEFILEDIALOG_LONG_ALLFILES= 0 ; if(!qbevent)break;evnt(25753,12175,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,12176,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_PREVBASONLY=*(int32*)(((char*)_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[4],_FUNC_IDEFILEDIALOG_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,12177,"ide_methods.bas");}while(r); } do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12179,"ide_methods.bas");}while(r); } LABEL_DIRECTLOAD:; if(qbevent){evnt(25753,12182,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_PATH,FUNC_REMOVEDOUBLESLASHES(FUNC_IDEZGETFILEPATH(_FUNC_IDEFILEDIALOG_STRING_PATH,_FUNC_IDEFILEDIALOG_STRING_F))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12183,"ide_methods.bas");}while(r); S_48665:; if ((-(*__LONG_IDEERROR> 1 ))||new_error){ if(qbevent){evnt(25753,12184,"ide_methods.bas");if(r)goto S_48665;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12184,"ide_methods.bas");}while(r); } S_48668:; if ((-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 1 ))||new_error){ if(qbevent){evnt(25753,12186,"ide_methods.bas");if(r)goto S_48668;} S_48669:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_add(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEFILEDIALOG_STRING_F))== 0 )))||new_error){ if(qbevent){evnt(25753,12187,"ide_methods.bas");if(r)goto S_48669;} S_48670:; if ((qbs_cleanup(qbs_tmp_base,((qbs_notequal(qbs_lcase(qbs_right(_FUNC_IDEFILEDIALOG_STRING_F, 4 )),qbs_new_txt_len(".bas",4))))&(-(*_FUNC_IDEFILEDIALOG_LONG_ALLFILES== 0 ))))||new_error){ if(qbevent){evnt(25753,12189,"ide_methods.bas");if(r)goto S_48670;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_F,qbs_add(_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12189,"ide_methods.bas");}while(r); } } do{ *__LONG_IDEERROR= 2 ; if(!qbevent)break;evnt(25753,12193,"ide_methods.bas");}while(r); S_48675:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_add(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEFILEDIALOG_STRING_F))== 0 )))||new_error){ if(qbevent){evnt(25753,12194,"ide_methods.bas");if(r)goto S_48675;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12194,"ide_methods.bas");}while(r); } S_48678:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_BINARYFORMATCHECK(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP,_FUNC_IDEFILEDIALOG_STRING_F)> 0 )))||new_error){ if(qbevent){evnt(25753,12196,"ide_methods.bas");if(r)goto S_48678;} S_48679:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEOPENFILE->len))||new_error){ if(qbevent){evnt(25753,12197,"ide_methods.bas");if(r)goto S_48679;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_IDEFILEDIALOG,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12198,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12199,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEFILEDIALOG_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,12201,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENLOOP; if(!qbevent)break;evnt(25753,12201,"ide_methods.bas");}while(r); } } do{ *__LONG_IDEERROR= 3 ; if(!qbevent)break;evnt(25753,12206,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12207,"ide_methods.bas");}while(r); do{ *__LONG_IDEL= 1 ; if(!qbevent)break;evnt(25753,12207,"ide_methods.bas");}while(r); do{ *__LONG_IDELI= 1 ; if(!qbevent)break;evnt(25753,12207,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(25753,12207,"ide_methods.bas");}while(r); do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(25753,12207,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,12208,"ide_methods.bas");}while(r); do{ *__LONG_IDESY= 1 ; if(!qbevent)break;evnt(25753,12209,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,12210,"ide_methods.bas");}while(r); do{ *__LONG_IDECY= 1 ; if(!qbevent)break;evnt(25753,12211,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,12212,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; if(!qbevent)break;evnt(25753,12213,"ide_methods.bas");}while(r); do{ SUB_LINEINPUT3LOAD(qbs_add(qbs_add(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEFILEDIALOG_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12214,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,func_space(__STRING_LINEINPUT3BUFFER->len* 8 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12215,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I2= 1 ; if(!qbevent)break;evnt(25753,12216,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_N= 0 ; if(!qbevent)break;evnt(25753,12217,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHRTAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12218,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_SPACE1,qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12219,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_SPACE2,qbs_new_txt_len(" ",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12219,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_SPACE3,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12219,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_SPACE4,qbs_new_txt_len(" ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12219,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR7,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR11,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR12,func_chr( 12 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR28,func_chr( 28 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR29,func_chr( 29 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR30,func_chr( 30 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_CHR31,func_chr( 31 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12220,"ide_methods.bas");}while(r); S_48715:; do{ if(qbevent){evnt(25753,12221,"ide_methods.bas");if(r)goto S_48715;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12222,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_L=_FUNC_IDEFILEDIALOG_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12223,"ide_methods.bas");}while(r); S_48718:; if ((*_FUNC_IDEFILEDIALOG_LONG_L)||new_error){ if(qbevent){evnt(25753,12224,"ide_methods.bas");if(r)goto S_48718;} do{ *_FUNC_IDEFILEDIALOG_LONG_ASCA=qbs_asc(_FUNC_IDEFILEDIALOG_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12224,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEFILEDIALOG_LONG_ASCA= -1 ; if(!qbevent)break;evnt(25753,12224,"ide_methods.bas");}while(r); } S_48723:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_ASCA!= 13 ))||new_error){ if(qbevent){evnt(25753,12225,"ide_methods.bas");if(r)goto S_48723;} S_48724:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_ASCA!= -1 ))||new_error){ if(qbevent){evnt(25753,12226,"ide_methods.bas");if(r)goto S_48724;} LABEL_IDEOPENFIXTABS:; if(qbevent){evnt(25753,12228,"ide_methods.bas");r=0;} do{ *_FUNC_IDEFILEDIALOG_LONG_X=func_instr(NULL,_FUNC_IDEFILEDIALOG_STRING_A,_FUNC_IDEFILEDIALOG_STRING_CHRTAB,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12229,"ide_methods.bas");}while(r); S_48726:; if ((*_FUNC_IDEFILEDIALOG_LONG_X)||new_error){ if(qbevent){evnt(25753,12230,"ide_methods.bas");if(r)goto S_48726;} do{ *_FUNC_IDEFILEDIALOG_LONG_X2=(*_FUNC_IDEFILEDIALOG_LONG_X- 1 )% 4 ; if(!qbevent)break;evnt(25753,12231,"ide_methods.bas");}while(r); S_48728:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_X2== 0 ))||new_error){ if(qbevent){evnt(25753,12232,"ide_methods.bas");if(r)goto S_48728;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_X- 1 ),_FUNC_IDEFILEDIALOG_STRING_SPACE4),qbs_right(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_L-*_FUNC_IDEFILEDIALOG_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12232,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_L=*_FUNC_IDEFILEDIALOG_LONG_L+ 3 ; if(!qbevent)break;evnt(25753,12232,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(25753,12232,"ide_methods.bas");}while(r); } S_48733:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_X2== 1 ))||new_error){ if(qbevent){evnt(25753,12233,"ide_methods.bas");if(r)goto S_48733;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_X- 1 ),_FUNC_IDEFILEDIALOG_STRING_SPACE3),qbs_right(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_L-*_FUNC_IDEFILEDIALOG_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12233,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_L=*_FUNC_IDEFILEDIALOG_LONG_L+ 2 ; if(!qbevent)break;evnt(25753,12233,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(25753,12233,"ide_methods.bas");}while(r); } S_48738:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_X2== 2 ))||new_error){ if(qbevent){evnt(25753,12234,"ide_methods.bas");if(r)goto S_48738;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_X- 1 ),_FUNC_IDEFILEDIALOG_STRING_SPACE2),qbs_right(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_L-*_FUNC_IDEFILEDIALOG_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12234,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_L=*_FUNC_IDEFILEDIALOG_LONG_L+ 1 ; if(!qbevent)break;evnt(25753,12234,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(25753,12234,"ide_methods.bas");}while(r); } S_48743:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_X2== 3 ))||new_error){ if(qbevent){evnt(25753,12235,"ide_methods.bas");if(r)goto S_48743;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_X- 1 ),_FUNC_IDEFILEDIALOG_STRING_SPACE1),qbs_right(_FUNC_IDEFILEDIALOG_STRING_A,*_FUNC_IDEFILEDIALOG_LONG_L-*_FUNC_IDEFILEDIALOG_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12235,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; if(!qbevent)break;evnt(25753,12235,"ide_methods.bas");}while(r); } } } do{ sub_mid(__STRING_IDET,*_FUNC_IDEFILEDIALOG_LONG_I2,*_FUNC_IDEFILEDIALOG_LONG_L+ 8 ,qbs_add(qbs_add(l2string(*_FUNC_IDEFILEDIALOG_LONG_L),_FUNC_IDEFILEDIALOG_STRING_A),l2string(*_FUNC_IDEFILEDIALOG_LONG_L)),1); if(!qbevent)break;evnt(25753,12238,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_I2=*_FUNC_IDEFILEDIALOG_LONG_I2+*_FUNC_IDEFILEDIALOG_LONG_L+ 8 ; if(!qbevent)break;evnt(25753,12238,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_N=*_FUNC_IDEFILEDIALOG_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,12238,"ide_methods.bas");}while(r); } S_48753:; dl_continue_5385:; }while((!(-(*_FUNC_IDEFILEDIALOG_LONG_ASCA== 13 )))&&(!new_error)); dl_exit_5385:; if(qbevent){evnt(25753,12240,"ide_methods.bas");if(r)goto S_48753;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12241,"ide_methods.bas");}while(r); do{ *__LONG_IDEN=*_FUNC_IDEFILEDIALOG_LONG_N; if(!qbevent)break;evnt(25753,12242,"ide_methods.bas");}while(r); S_48756:; if ((-(*_FUNC_IDEFILEDIALOG_LONG_N== 0 ))||new_error){ if(qbevent){evnt(25753,12242,"ide_methods.bas");if(r)goto S_48756;} do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12242,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; if(!qbevent)break;evnt(25753,12242,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDET,qbs_left(__STRING_IDET,*_FUNC_IDEFILEDIALOG_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12242,"ide_methods.bas");}while(r); } do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); }else{ free((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); } } __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,__ARRAY_BYTE_IDEBREAKPOINTS[5]*1); }else{ __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc(__ARRAY_BYTE_IDEBREAKPOINTS[5]*1,1); if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } if(!qbevent)break;evnt(25753,12243,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); }else{ free((void*)(__ARRAY_BYTE_IDESKIPLINES[0])); } } __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(*__LONG_IDEN)-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_BYTE_IDESKIPLINES[5]*1); memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,__ARRAY_BYTE_IDESKIPLINES[5]*1); }else{ __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc(__ARRAY_BYTE_IDESKIPLINES[5]*1,1); if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } if(!qbevent)break;evnt(25753,12244,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12245,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12246,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST)[8])->id=(++mem_lock_id); if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&1){ tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--) { qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)); qbs_free(*(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112));} if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&4){ cmem_dynamic_free((uint8*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); }else{ free((void*)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])); } } __ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]= 0 ; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]=( 1000 )-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4]+1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[6]=1; __ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]=(ptrszint)malloc(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]*960/8+1); if (!__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]) error(257); __ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]|=1; tmp_long=__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]; while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 32)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 40)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 48)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 56)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 64)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 72)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 80)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 88)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 96)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } if(!qbevent)break;evnt(25753,12246,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12247,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12248,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= 0 ; if(!qbevent)break;evnt(25753,12248,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,12250,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_IDEFILEDIALOG_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12251,"ide_methods.bas");}while(r); do{ sub__title(qbs_add(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - ",3)),__STRING_WINDOWTITLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12251,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*__LONG_CUSTOMKEYWORDSLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12252,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_IDEFILEDIALOG_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12253,"ide_methods.bas");}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(25753,12254,"ide_methods.bas");}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(25753,12255,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12256,"ide_methods.bas");}while(r); S_48778:; }else{ if (-(*_FUNC_IDEFILEDIALOG_BYTE_MODE== 2 )){ if(qbevent){evnt(25753,12257,"ide_methods.bas");if(r)goto S_48778;} S_48779:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(_FUNC_IDEFILEDIALOG_STRING_F)== 0 )))||new_error){ if(qbevent){evnt(25753,12258,"ide_methods.bas");if(r)goto S_48779;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_F,qbs_add(_FUNC_IDEFILEDIALOG_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12258,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 3 ; if(!qbevent)break;evnt(25753,12260,"ide_methods.bas");}while(r); do{ sub_open(qbs_add(qbs_add(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEFILEDIALOG_STRING_F), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12261,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,12262,"ide_methods.bas");}while(r); S_48785:; if ((func_lof( 150 ))||new_error){ if(qbevent){evnt(25753,12263,"ide_methods.bas");if(r)goto S_48785;} do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,12264,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_A,FUNC_IDEFILEEXISTS(_FUNC_IDEFILEDIALOG_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12265,"ide_methods.bas");}while(r); S_48788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEFILEDIALOG_STRING_A,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(25753,12266,"ide_methods.bas");if(r)goto S_48788;} do{ qbs_set(_FUNC_IDEFILEDIALOG_STRING_IDEFILEDIALOG,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12267,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12268,"ide_methods.bas");}while(r); } }else{ do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,12271,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_IDEFILEDIALOG_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12273,"ide_methods.bas");}while(r); do{ sub__title(qbs_add(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - ",3)),__STRING_WINDOWTITLE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12273,"ide_methods.bas");}while(r); do{ SUB_IDESAVE(qbs_add(qbs_add(_FUNC_IDEFILEDIALOG_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_IDEFILEDIALOG_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12274,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_IDEFILEDIALOG_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12275,"ide_methods.bas");}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(25753,12276,"ide_methods.bas");}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(25753,12277,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12278,"ide_methods.bas");}while(r); } } } LABEL_IDEOPENLOOP:; if(qbevent){evnt(25753,12282,"ide_methods.bas");r=0;} do{ *_FUNC_IDEFILEDIALOG_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,12285,"ide_methods.bas");}while(r); do{ *_FUNC_IDEFILEDIALOG_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,12286,"ide_methods.bas");}while(r); dl_continue_5368:; }while(1); dl_exit_5368:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free190.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_IDEFILEDIALOG_STRING_IDEFILEDIALOG);return _FUNC_IDEFILEDIALOG_STRING_IDEFILEDIALOG; } 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 "data191.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(0))=((*__LONG_IDEWX/ 2 ))-(*_SUB_IDEPAR_LONG_W/ 2 ); if(!qbevent)break;evnt(25753,12291,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(4))=(((*__LONG_IDEWY+*__LONG_IDESUBWINDOW)/ 2 ))-(*_SUB_IDEPAR_LONG_H/ 2 ); if(!qbevent)break;evnt(25753,12292,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(8))=*_SUB_IDEPAR_LONG_W; if(!qbevent)break;evnt(25753,12293,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(12))=*_SUB_IDEPAR_LONG_H; if(!qbevent)break;evnt(25753,12294,"ide_methods.bas");}while(r); S_48811:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEPAR_STRING_TITLE->len))||new_error){ if(qbevent){evnt(25753,12295,"ide_methods.bas");if(r)goto S_48811;} do{ *(int32*)(((char*)_SUB_IDEPAR_UDT_PAR)+(16))=FUNC_IDENEWTXT(_SUB_IDEPAR_STRING_TITLE); if(!qbevent)break;evnt(25753,12295,"ide_methods.bas");}while(r); } do{ sub__resize( 2 ,NULL); if(!qbevent)break;evnt(25753,12296,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free191.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 "data192.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,12300,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,12301,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,12302,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,12303,"ide_methods.bas");}while(r); do{ *_FUNC_IDERESTORE_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Backup found",12),qbs_new_txt_len("Recover program from auto-saved backup?",39),qbs_new_txt_len("#Yes;#No",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12304,"ide_methods.bas");}while(r); S_48820:; if ((-(*_FUNC_IDERESTORE_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,12305,"ide_methods.bas");if(r)goto S_48820;} do{ qbs_set(_FUNC_IDERESTORE_STRING_IDERESTORE,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12305,"ide_methods.bas");}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(25753,12305,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free192.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; } qbs* FUNC_IDECLEARHISTORY(qbs*_FUNC_IDECLEARHISTORY_STRING_WHICHHISTORY){ 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 "data193.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_48825:; if(qbevent){evnt(25753,12309,"ide_methods.bas");if(r)goto S_48825;} S_48826:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDECLEARHISTORY_STRING_WHICHHISTORY,qbs_new_txt_len("SEARCH",6))))||new_error){ if(qbevent){evnt(25753,12310,"ide_methods.bas");if(r)goto S_48826;} do{ qbs_set(_FUNC_IDECLEARHISTORY_STRING_T,qbs_new_txt_len("Clear search history",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12310,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECLEARHISTORY_STRING_M,qbs_new_txt_len("This cannot be undone. Proceed?",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12310,"ide_methods.bas");}while(r); sc_ec_337_end:; goto sc_5390_end; } S_48829:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDECLEARHISTORY_STRING_WHICHHISTORY,qbs_new_txt_len("FILES",5))))||new_error){ if(qbevent){evnt(25753,12311,"ide_methods.bas");if(r)goto S_48829;} do{ qbs_set(_FUNC_IDECLEARHISTORY_STRING_T,qbs_new_txt_len("Clear recent files",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12311,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECLEARHISTORY_STRING_M,qbs_new_txt_len("This cannot be undone. Proceed?",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12311,"ide_methods.bas");}while(r); sc_ec_338_end:; goto sc_5390_end; } sc_5390_end:; do{ *_FUNC_IDECLEARHISTORY_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDECLEARHISTORY_STRING_T,_FUNC_IDECLEARHISTORY_STRING_M,qbs_new_txt_len("#Yes;#No",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12313,"ide_methods.bas");}while(r); S_48834:; if ((-(*_FUNC_IDECLEARHISTORY_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,12314,"ide_methods.bas");if(r)goto S_48834;} do{ qbs_set(_FUNC_IDECLEARHISTORY_STRING_IDECLEARHISTORY,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12314,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDECLEARHISTORY_STRING_IDECLEARHISTORY,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12314,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free193.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_IDECLEARHISTORY_STRING_IDECLEARHISTORY);return _FUNC_IDECLEARHISTORY_STRING_IDECLEARHISTORY; } 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 "data194.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_IDEERROR= 6 ; if(!qbevent)break;evnt(25753,12318,"ide_methods.bas");}while(r); do{ sub_open(_SUB_IDESAVE_STRING_F, 4 ,NULL,NULL, 151 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12319,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,12320,"ide_methods.bas");}while(r); S_48842:; fornext_value5393= 1 ; fornext_finalvalue5393=*__LONG_IDEN; fornext_step5393= 1 ; if (fornext_step5393<0) fornext_step_negative5393=1; else fornext_step_negative5393=0; if (new_error) goto fornext_error5393; goto fornext_entrylabel5393; while(1){ fornext_value5393=fornext_step5393+(*_SUB_IDESAVE_LONG_I); fornext_entrylabel5393: *_SUB_IDESAVE_LONG_I=fornext_value5393; if (fornext_step_negative5393){ if (fornext_value5393fornext_finalvalue5393) break; } fornext_error5393:; if(qbevent){evnt(25753,12321,"ide_methods.bas");if(r)goto S_48842;} do{ qbs_set(_SUB_IDESAVE_STRING_A,FUNC_IDEGETLINE(_SUB_IDESAVE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12322,"ide_methods.bas");}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 151 ; if (new_error) goto skip5394; sub_file_print(tmp_fileno,_SUB_IDESAVE_STRING_A, 0, 0, 1); if (new_error) goto skip5394; skip5394: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25753,12323,"ide_methods.bas");}while(r); fornext_continue_5392:; } fornext_exit_5392:; do{ sub_close( 151 ,1); if(!qbevent)break;evnt(25753,12325,"ide_methods.bas");}while(r); do{ SUB_IDESAVEBOOKMARKS(_SUB_IDESAVE_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12326,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNSAVED= 0 ; if(!qbevent)break;evnt(25753,12327,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free194.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_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 "data195.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDESAVENOW_STRING_M,qbs_new_txt_len("Program is not saved. Save it now?",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12331,"ide_methods.bas");}while(r); do{ *_FUNC_IDESAVENOW_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("",0),_FUNC_IDESAVENOW_STRING_M,qbs_new_txt_len("#Yes;#No;#Cancel",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12332,"ide_methods.bas");}while(r); S_48851:; if(qbevent){evnt(25753,12333,"ide_methods.bas");if(r)goto S_48851;} S_48852:; if (((*_FUNC_IDESAVENOW_LONG_RESULT==( 1 )))||new_error){ if(qbevent){evnt(25753,12334,"ide_methods.bas");if(r)goto S_48852;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12334,"ide_methods.bas");}while(r); sc_ec_339_end:; goto sc_5395_end; } S_48854:; if (((*_FUNC_IDESAVENOW_LONG_RESULT==( 2 )))||new_error){ if(qbevent){evnt(25753,12335,"ide_methods.bas");if(r)goto S_48854;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("N",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12335,"ide_methods.bas");}while(r); sc_ec_340_end:; goto sc_5395_end; } S_48856:; if (((*_FUNC_IDESAVENOW_LONG_RESULT==( 0 ))||(*_FUNC_IDESAVENOW_LONG_RESULT==( 3 )))||new_error){ if(qbevent){evnt(25753,12336,"ide_methods.bas");if(r)goto S_48856;} do{ qbs_set(_FUNC_IDESAVENOW_STRING_IDESAVENOW,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12336,"ide_methods.bas");}while(r); sc_ec_341_end:; goto sc_5395_end; } sc_5395_end:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free195.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 "data196.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_IDESETLINE_STRING_TEXT,qbs_rtrim(_SUB_IDESETLINE_STRING_TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12342,"ide_methods.bas");}while(r); S_48860:; if ((-(*_SUB_IDESETLINE_LONG_I!= -1 ))||new_error){ if(qbevent){evnt(25753,12344,"ide_methods.bas");if(r)goto S_48860;} do{ SUB_IDEGOTOLINE(_SUB_IDESETLINE_LONG_I); if(!qbevent)break;evnt(25753,12344,"ide_methods.bas");}while(r); } do{ *_SUB_IDESETLINE_LONG_TEXTLEN=_SUB_IDESETLINE_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12345,"ide_methods.bas");}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(25753,12346,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free196.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; } float FUNC_TIMEELAPSEDSINCE(float*_FUNC_TIMEELAPSEDSINCE_SINGLE_STARTTIME){ 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 "data197.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_48865:; if ((-(((float)(*_FUNC_TIMEELAPSEDSINCE_SINGLE_STARTTIME))>((float)(func_timer(NULL,0)))))||new_error){ if(qbevent){evnt(25753,12351,"ide_methods.bas");if(r)goto S_48865;} do{ *_FUNC_TIMEELAPSEDSINCE_SINGLE_STARTTIME=*_FUNC_TIMEELAPSEDSINCE_SINGLE_STARTTIME- 86400 ; if(!qbevent)break;evnt(25753,12351,"ide_methods.bas");}while(r); } do{ *_FUNC_TIMEELAPSEDSINCE_SINGLE_TIMEELAPSEDSINCE=func_timer(NULL,0)-*_FUNC_TIMEELAPSEDSINCE_SINGLE_STARTTIME; if(!qbevent)break;evnt(25753,12352,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free197.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_TIMEELAPSEDSINCE_SINGLE_TIMEELAPSEDSINCE; } 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 "data198.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_48869:; if ((-(*__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE== 0 ))||new_error){ if(qbevent){evnt(25753,12357,"ide_methods.bas");if(r)goto S_48869;} do{ sub__palettecolor( 1 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12358,"ide_methods.bas");}while(r); do{ sub__palettecolor( 2 ,func__rgb32( 84 , 84 , 84 ), 0 ,1); if(!qbevent)break;evnt(25753,12359,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12360,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1); if(!qbevent)break;evnt(25753,12361,"ide_methods.bas");}while(r); do{ sub__palettecolor( 7 ,*__ULONG_IDECHROMACOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12362,"ide_methods.bas");}while(r); do{ sub__palettecolor( 8 ,*__ULONG_IDENUMBERSCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12363,"ide_methods.bas");}while(r); do{ sub__palettecolor( 10 ,*__ULONG_IDEMETACOMMANDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12364,"ide_methods.bas");}while(r); do{ sub__palettecolor( 11 ,*__ULONG_IDECOMMENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12365,"ide_methods.bas");}while(r); do{ sub__palettecolor( 12 ,*__ULONG_IDEKEYWORDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12366,"ide_methods.bas");}while(r); do{ sub__palettecolor( 13 ,*__ULONG_IDETEXTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12367,"ide_methods.bas");}while(r); do{ sub__palettecolor( 14 ,*__ULONG_IDEQUOTECOLOR, 0 ,1); if(!qbevent)break;evnt(25753,12368,"ide_methods.bas");}while(r); } do{ *__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE= 0 ; if(!qbevent)break;evnt(25753,12370,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,qbs_add(func_chr( 34 ),qbs_new_txt_len(" =<>+-/\\^:;,*()'",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12372,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_INITIALNUM__ASCII_CHR_046__CHAR,qbs_new_txt_len("0123456789-.&",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12373,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_NUM__ASCII_CHR_046__CHAR,qbs_new_txt_len("0123456789EDed+-.`%&!#~HBOhboACFacf",35)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12374,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,12376,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,12378,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,12379,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_SINGLE_STARTTIME=func_timer(NULL,0); if(!qbevent)break;evnt(25753,12381,"ide_methods.bas");}while(r); S_48890:; if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||new_error){ if(qbevent){evnt(25753,12383,"ide_methods.bas");if(r)goto S_48890;} S_48891:; if ((-(*__LONG_IDEFOCUSLINE!= 0 ))||new_error){ if(qbevent){evnt(25753,12384,"ide_methods.bas");if(r)goto S_48891;} S_48892:; if ((*__INTEGER_IDECHANGEMADE)||new_error){ if(qbevent){evnt(25753,12388,"ide_methods.bas");if(r)goto S_48892;} do{ *_SUB_IDESHOWTEXT_BYTE_MANUALLIST= 0 ; if(!qbevent)break;evnt(25753,12388,"ide_methods.bas");}while(r); } S_48895:; if ((-(*_SUB_IDESHOWTEXT_BYTE_MANUALLIST== 0 ))||new_error){ if(qbevent){evnt(25753,12389,"ide_methods.bas");if(r)goto S_48895;} do{ *_SUB_IDESHOWTEXT_BYTE_MANUALLIST= -1 ; if(!qbevent)break;evnt(25753,12390,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*__LONG_CUSTOMKEYWORDSLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12391,"ide_methods.bas");}while(r); S_48898:; fornext_value5400= 1 ; fornext_finalvalue5400=*__LONG_IDEN; fornext_step5400= 1 ; if (fornext_step5400<0) fornext_step_negative5400=1; else fornext_step_negative5400=0; if (new_error) goto fornext_error5400; goto fornext_entrylabel5400; while(1){ fornext_value5400=fornext_step5400+(*_SUB_IDESHOWTEXT_LONG_Y); fornext_entrylabel5400: *_SUB_IDESHOWTEXT_LONG_Y=fornext_value5400; if (fornext_step_negative5400){ if (fornext_value5400fornext_finalvalue5400) break; } fornext_error5400:; if(qbevent){evnt(25753,12392,"ide_methods.bas");if(r)goto S_48898;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_ucase(qbs__trim(FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_Y)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12393,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_SF= 0 ; if(!qbevent)break;evnt(25753,12394,"ide_methods.bas");}while(r); S_48901:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_A, 4 ),qbs_new_txt_len("SUB ",4))))||new_error){ if(qbevent){evnt(25753,12395,"ide_methods.bas");if(r)goto S_48901;} do{ *_SUB_IDESHOWTEXT_LONG_SF= 1 ; if(!qbevent)break;evnt(25753,12395,"ide_methods.bas");}while(r); } S_48904:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_A, 9 ),qbs_new_txt_len("FUNCTION ",9))))||new_error){ if(qbevent){evnt(25753,12396,"ide_methods.bas");if(r)goto S_48904;} do{ *_SUB_IDESHOWTEXT_LONG_SF= 2 ; if(!qbevent)break;evnt(25753,12396,"ide_methods.bas");}while(r); } S_48907:; if ((*_SUB_IDESHOWTEXT_LONG_SF)||new_error){ if(qbevent){evnt(25753,12397,"ide_methods.bas");if(r)goto S_48907;} S_48908:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A, 7 ),qbs_new_txt_len(" STATIC",7))))||new_error){ if(qbevent){evnt(25753,12398,"ide_methods.bas");if(r)goto S_48908;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_rtrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,_SUB_IDESHOWTEXT_STRING_A->len- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12399,"ide_methods.bas");}while(r); } S_48911:; if ((-(*_SUB_IDESHOWTEXT_LONG_SF== 1 ))||new_error){ if(qbevent){evnt(25753,12402,"ide_methods.bas");if(r)goto S_48911;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,func_mid(_SUB_IDESHOWTEXT_STRING_A, 5 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12403,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,func_mid(_SUB_IDESHOWTEXT_STRING_A, 10 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12405,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_ltrim(qbs_rtrim(_SUB_IDESHOWTEXT_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12408,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_X=func_instr(NULL,_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len("(",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12409,"ide_methods.bas");}while(r); S_48918:; if ((*_SUB_IDESHOWTEXT_LONG_X)||new_error){ if(qbevent){evnt(25753,12410,"ide_methods.bas");if(r)goto S_48918;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_rtrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_X- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12411,"ide_methods.bas");}while(r); }else{ do{ SUB_CLEANSUBNAME(_SUB_IDESHOWTEXT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12413,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_add(__STRING_LISTOFCUSTOMKEYWORDS,qbs_new_txt_len("@",1)),FUNC_REMOVESYMBOL2(_SUB_IDESHOWTEXT_STRING_A)),qbs_new_txt_len("@",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12415,"ide_methods.bas");}while(r); } fornext_continue_5399:; } fornext_exit_5399:; } }else{ do{ *_SUB_IDESHOWTEXT_BYTE_MANUALLIST= 0 ; if(!qbevent)break;evnt(25753,12420,"ide_methods.bas");}while(r); } S_48930:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDESHOWTEXT_STRING_PREVLISTOFCUSTOMWORDS,__STRING_LISTOFCUSTOMKEYWORDS)))||new_error){ if(qbevent){evnt(25753,12423,"ide_methods.bas");if(r)goto S_48930;} S_48931:; if ((-(*_SUB_IDESHOWTEXT_BYTE_MANUALLIST== 0 ))||new_error){ if(qbevent){evnt(25753,12424,"ide_methods.bas");if(r)goto S_48931;} S_48932:; do{ if(qbevent){evnt(25753,12425,"ide_methods.bas");if(r)goto S_48932;} do{ *_SUB_IDESHOWTEXT_LONG_ATSIGN=func_instr(*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,__STRING_LISTOFCUSTOMKEYWORDS,qbs_new_txt_len("@",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12426,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_NEXTAT=func_instr(*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,__STRING_LISTOFCUSTOMKEYWORDS,qbs_new_txt_len("@",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12427,"ide_methods.bas");}while(r); S_48935:; if ((-(*_SUB_IDESHOWTEXT_LONG_NEXTAT== 0 ))||new_error){ if(qbevent){evnt(25753,12428,"ide_methods.bas");if(r)goto S_48935;} do{ goto dl_exit_5402; if(!qbevent)break;evnt(25753,12428,"ide_methods.bas");}while(r); } S_48938:; if ((-(*_SUB_IDESHOWTEXT_LONG_ATSIGN>*__LONG_CUSTOMKEYWORDSLENGTH))||new_error){ if(qbevent){evnt(25753,12429,"ide_methods.bas");if(r)goto S_48938;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,FUNC_REMOVESYMBOL2(func_mid(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,(*_SUB_IDESHOWTEXT_LONG_NEXTAT-*_SUB_IDESHOWTEXT_LONG_ATSIGN)- 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12430,"ide_methods.bas");}while(r); S_48940:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len))||new_error){ if(qbevent){evnt(25753,12431,"ide_methods.bas");if(r)goto S_48940;} do{ *_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS= 8 + 1024 ; if(!qbevent)break;evnt(25753,12432,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS=*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS+ 128 ; if(!qbevent)break;evnt(25753,12433,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_HASHRES1=FUNC_HASHFIND(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12434,"ide_methods.bas");}while(r); S_48944:; if ((-(*_SUB_IDESHOWTEXT_LONG_HASHRES1!= 0 ))||new_error){ if(qbevent){evnt(25753,12435,"ide_methods.bas");if(r)goto S_48944;} do{ *_SUB_IDESHOWTEXT_LONG_HASHRES1= 1 ; if(!qbevent)break;evnt(25753,12435,"ide_methods.bas");}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS= 8 + 1024 ; if(!qbevent)break;evnt(25753,12436,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS=*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS+ 64 ; if(!qbevent)break;evnt(25753,12437,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_HASHRES2=FUNC_HASHFIND(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESREF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12438,"ide_methods.bas");}while(r); S_48950:; if ((-(*_SUB_IDESHOWTEXT_LONG_HASHRES2!= 0 ))||new_error){ if(qbevent){evnt(25753,12439,"ide_methods.bas");if(r)goto S_48950;} do{ *_SUB_IDESHOWTEXT_LONG_HASHRES2= 1 ; if(!qbevent)break;evnt(25753,12439,"ide_methods.bas");}while(r); } S_48953:; if ((-((*_SUB_IDESHOWTEXT_LONG_HASHRES1+*_SUB_IDESHOWTEXT_LONG_HASHRES2)==( 0 )))||new_error){ if(qbevent){evnt(25753,12440,"ide_methods.bas");if(r)goto S_48953;} do{ sub_mid(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,(*_SUB_IDESHOWTEXT_LONG_NEXTAT-*_SUB_IDESHOWTEXT_LONG_ATSIGN)- 1 ,func_string(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len,(qbs_new_txt_len("@",1)->chr[0])),1); if(!qbevent)break;evnt(25753,12442,"ide_methods.bas");}while(r); } } } dl_continue_5402:; }while(1); dl_exit_5402:; } S_48960:; fornext_value5406= 1 ; fornext_finalvalue5406=__STRING_LISTOFCUSTOMKEYWORDS->len; fornext_step5406= 1 ; if (fornext_step5406<0) fornext_step_negative5406=1; else fornext_step_negative5406=0; if (new_error) goto fornext_error5406; goto fornext_entrylabel5406; while(1){ fornext_value5406=fornext_step5406+(*_SUB_IDESHOWTEXT_LONG_I); fornext_entrylabel5406: *_SUB_IDESHOWTEXT_LONG_I=fornext_value5406; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5406){ if (fornext_value5406fornext_finalvalue5406) break; } fornext_error5406:; if(qbevent){evnt(25753,12449,"ide_methods.bas");if(r)goto S_48960;} do{ *_SUB_IDESHOWTEXT_LONG_CHECKCHAR=qbs_asc(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12450,"ide_methods.bas");}while(r); S_48962:; if ((-(*_SUB_IDESHOWTEXT_LONG_CHECKCHAR== 64 ))||new_error){ if(qbevent){evnt(25753,12451,"ide_methods.bas");if(r)goto S_48962;} S_48963:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_TEMPLIST, 1 ),qbs_new_txt_len("@",1))))||new_error){ if(qbevent){evnt(25753,12452,"ide_methods.bas");if(r)goto S_48963;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_TEMPLIST,qbs_add(_SUB_IDESHOWTEXT_STRING_TEMPLIST,qbs_new_txt_len("@",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12452,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_SUB_IDESHOWTEXT_STRING_TEMPLIST,qbs_add(_SUB_IDESHOWTEXT_STRING_TEMPLIST,func_chr(*_SUB_IDESHOWTEXT_LONG_CHECKCHAR))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12454,"ide_methods.bas");}while(r); } fornext_continue_5405:; } fornext_exit_5405:; do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,_SUB_IDESHOWTEXT_STRING_TEMPLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12457,"ide_methods.bas");}while(r); S_48971:; while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,__STRING_FIX046,0)))||new_error){ if(qbevent){evnt(25753,12459,"ide_methods.bas");if(r)goto S_48971;} do{ *_SUB_IDESHOWTEXT_LONG_X=func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,__STRING_FIX046,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12460,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_X- 1 ),qbs_new_txt_len(".",1)),qbs_right(__STRING_LISTOFCUSTOMKEYWORDS,__STRING_LISTOFCUSTOMKEYWORDS->len-*_SUB_IDESHOWTEXT_LONG_X+ 1 -__STRING_FIX046->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12461,"ide_methods.bas");}while(r); dl_continue_5408:; } dl_exit_5408:; do{ qbs_set(_SUB_IDESHOWTEXT_STRING_PREVLISTOFCUSTOMWORDS,__STRING_LISTOFCUSTOMKEYWORDS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12464,"ide_methods.bas");}while(r); } } do{ *_SUB_IDESHOWTEXT_LONG_CC= -1 ; if(!qbevent)break;evnt(25753,12469,"ide_methods.bas");}while(r); S_48979:; if ((-(*__LONG_IDECX<*__LONG_IDESX))||new_error){ if(qbevent){evnt(25753,12471,"ide_methods.bas");if(r)goto S_48979;} do{ *__LONG_IDESX=*__LONG_IDECX; if(!qbevent)break;evnt(25753,12471,"ide_methods.bas");}while(r); } S_48982:; if ((-(*__LONG_IDECY<*__LONG_IDESY))||new_error){ if(qbevent){evnt(25753,12472,"ide_methods.bas");if(r)goto S_48982;} do{ *__LONG_IDESY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,12472,"ide_methods.bas");}while(r); } S_48985:; if ((-(((*__LONG_IDECX+*__LONG_MAXLINENUMBERLENGTH)-*__LONG_IDESX)>=((*__LONG_IDEWX- 2 ))))||new_error){ if(qbevent){evnt(25753,12473,"ide_methods.bas");if(r)goto S_48985;} do{ *__LONG_IDESX=(*__LONG_IDECX+*__LONG_MAXLINENUMBERLENGTH)-(*__LONG_IDEWX- 3 ); if(!qbevent)break;evnt(25753,12473,"ide_methods.bas");}while(r); } S_48988:; if ((-((*__LONG_IDECY-*__LONG_IDESY)>=((*__LONG_IDEWY- 8 ))))||new_error){ if(qbevent){evnt(25753,12474,"ide_methods.bas");if(r)goto S_48988;} do{ *__LONG_IDESY=*__LONG_IDECY-(*__LONG_IDEWY- 9 ); if(!qbevent)break;evnt(25753,12474,"ide_methods.bas");}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,12476,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(25753,12477,"ide_methods.bas");}while(r); S_48993:; if ((-(*_SUB_IDESHOWTEXT_LONG_SY1>*_SUB_IDESHOWTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(25753,12478,"ide_methods.bas");if(r)goto S_48993;} do{ swap_32(&*_SUB_IDESHOWTEXT_LONG_SY1,&*_SUB_IDESHOWTEXT_LONG_SY2); if(!qbevent)break;evnt(25753,12478,"ide_methods.bas");}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,12479,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,12480,"ide_methods.bas");}while(r); S_48998:; if ((-(*_SUB_IDESHOWTEXT_LONG_SX1>*_SUB_IDESHOWTEXT_LONG_SX2))||new_error){ if(qbevent){evnt(25753,12481,"ide_methods.bas");if(r)goto S_48998;} do{ swap_32(&*_SUB_IDESHOWTEXT_LONG_SX1,&*_SUB_IDESHOWTEXT_LONG_SX2); if(!qbevent)break;evnt(25753,12481,"ide_methods.bas");}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY; if(!qbevent)break;evnt(25753,12483,"ide_methods.bas");}while(r); do{ *__BYTE_ENTERINGRGB= 0 ; if(!qbevent)break;evnt(25753,12484,"ide_methods.bas");}while(r); S_49003:; if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||new_error){ if(qbevent){evnt(25753,12486,"ide_methods.bas");if(r)goto S_49003;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 0 ; if(!qbevent)break;evnt(25753,12487,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND= 0 ; if(!qbevent)break;evnt(25753,12488,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12489,"ide_methods.bas");}while(r); do{ SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_A,&(pass5412=_SUB_IDESHOWTEXT_STRING_A->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12490,"ide_methods.bas");}while(r); S_49008:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A, 1 ),qbs_new_txt_len("_",1)))&(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== 0 ))))||new_error){ if(qbevent){evnt(25753,12491,"ide_methods.bas");if(r)goto S_49008;} S_49009:; fornext_value5414=*__LONG_IDECY- 1 ; fornext_finalvalue5414= 1 ; fornext_step5414= -1 ; if (fornext_step5414<0) fornext_step_negative5414=1; else fornext_step_negative5414=0; if (new_error) goto fornext_error5414; goto fornext_entrylabel5414; while(1){ fornext_value5414=fornext_step5414+(*_SUB_IDESHOWTEXT_LONG_IDECY_I); fornext_entrylabel5414: *_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value5414; if (fornext_step_negative5414){ if (fornext_value5414fornext_finalvalue5414) break; } fornext_error5414:; if(qbevent){evnt(25753,12493,"ide_methods.bas");if(r)goto S_49009;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12494,"ide_methods.bas");}while(r); do{ SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass5416=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12495,"ide_methods.bas");}while(r); S_49012:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))|(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== -1 ))))||new_error){ if(qbevent){evnt(25753,12496,"ide_methods.bas");if(r)goto S_49012;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*_SUB_IDESHOWTEXT_LONG_IDECY_I+ 1 ; if(!qbevent)break;evnt(25753,12496,"ide_methods.bas");}while(r); do{ goto fornext_exit_5413; if(!qbevent)break;evnt(25753,12496,"ide_methods.bas");}while(r); } fornext_continue_5413:; } fornext_exit_5413:; S_49017:; if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART== 0 ))||new_error){ if(qbevent){evnt(25753,12498,"ide_methods.bas");if(r)goto S_49017;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 1 ; if(!qbevent)break;evnt(25753,12498,"ide_methods.bas");}while(r); } S_49020:; fornext_value5418=*__LONG_IDECY+ 1 ; fornext_finalvalue5418=*__LONG_IDEN; fornext_step5418= 1 ; if (fornext_step5418<0) fornext_step_negative5418=1; else fornext_step_negative5418=0; if (new_error) goto fornext_error5418; goto fornext_entrylabel5418; while(1){ fornext_value5418=fornext_step5418+(*_SUB_IDESHOWTEXT_LONG_IDECY_I); fornext_entrylabel5418: *_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value5418; if (fornext_step_negative5418){ if (fornext_value5418fornext_finalvalue5418) break; } fornext_error5418:; if(qbevent){evnt(25753,12501,"ide_methods.bas");if(r)goto S_49020;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12502,"ide_methods.bas");}while(r); do{ SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass5420=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12503,"ide_methods.bas");}while(r); S_49023:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))|(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== -1 ))))||new_error){ if(qbevent){evnt(25753,12504,"ide_methods.bas");if(r)goto S_49023;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND=*_SUB_IDESHOWTEXT_LONG_IDECY_I; if(!qbevent)break;evnt(25753,12504,"ide_methods.bas");}while(r); do{ goto fornext_exit_5417; if(!qbevent)break;evnt(25753,12504,"ide_methods.bas");}while(r); } fornext_continue_5417:; } fornext_exit_5417:; S_49028:; if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND== 0 ))||new_error){ if(qbevent){evnt(25753,12506,"ide_methods.bas");if(r)goto S_49028;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*__LONG_IDEN; if(!qbevent)break;evnt(25753,12506,"ide_methods.bas");}while(r); } }else{ S_49032:; if ((-(*__LONG_IDECY> 1 ))||new_error){ if(qbevent){evnt(25753,12508,"ide_methods.bas");if(r)goto S_49032;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(&(pass5421=*__LONG_IDECY- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12508,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12508,"ide_methods.bas");}while(r); } do{ SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass5423=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12509,"ide_methods.bas");}while(r); S_49038:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))&(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== 0 ))))||new_error){ if(qbevent){evnt(25753,12510,"ide_methods.bas");if(r)goto S_49038;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND=*__LONG_IDECY; if(!qbevent)break;evnt(25753,12511,"ide_methods.bas");}while(r); S_49040:; fornext_value5425=*__LONG_IDECY- 1 ; fornext_finalvalue5425= 1 ; fornext_step5425= -1 ; if (fornext_step5425<0) fornext_step_negative5425=1; else fornext_step_negative5425=0; if (new_error) goto fornext_error5425; goto fornext_entrylabel5425; while(1){ fornext_value5425=fornext_step5425+(*_SUB_IDESHOWTEXT_LONG_IDECY_I); fornext_entrylabel5425: *_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value5425; if (fornext_step_negative5425){ if (fornext_value5425fornext_finalvalue5425) break; } fornext_error5425:; if(qbevent){evnt(25753,12514,"ide_methods.bas");if(r)goto S_49040;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12515,"ide_methods.bas");}while(r); do{ SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass5427=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12516,"ide_methods.bas");}while(r); S_49043:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))|(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== -1 ))))||new_error){ if(qbevent){evnt(25753,12517,"ide_methods.bas");if(r)goto S_49043;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*_SUB_IDESHOWTEXT_LONG_IDECY_I+ 1 ; if(!qbevent)break;evnt(25753,12517,"ide_methods.bas");}while(r); do{ goto fornext_exit_5424; if(!qbevent)break;evnt(25753,12517,"ide_methods.bas");}while(r); } fornext_continue_5424:; } fornext_exit_5424:; S_49048:; if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART== 0 ))||new_error){ if(qbevent){evnt(25753,12519,"ide_methods.bas");if(r)goto S_49048;} do{ *_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 1 ; if(!qbevent)break;evnt(25753,12519,"ide_methods.bas");}while(r); } } } S_49053:; if ((-(*__LONG_IDECY> 1 ))||new_error){ if(qbevent){evnt(25753,12523,"ide_methods.bas");if(r)goto S_49053;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(&(pass5428=*__LONG_IDECY- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12523,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12523,"ide_methods.bas");}while(r); } do{ *__LONG_ACTIVEINCLUDELINK= 0 ; if(!qbevent)break;evnt(25753,12525,"ide_methods.bas");}while(r); S_49059:; fornext_value5430= 0 ; fornext_finalvalue5430=(*__LONG_IDEWY- 9 ); fornext_step5430= 1 ; if (fornext_step5430<0) fornext_step_negative5430=1; else fornext_step_negative5430=0; if (new_error) goto fornext_error5430; goto fornext_entrylabel5430; while(1){ fornext_value5430=fornext_step5430+(*_SUB_IDESHOWTEXT_LONG_Y); fornext_entrylabel5430: *_SUB_IDESHOWTEXT_LONG_Y=fornext_value5430; if (fornext_step_negative5430){ if (fornext_value5430fornext_finalvalue5430) break; } fornext_error5430:; if(qbevent){evnt(25753,12527,"ide_methods.bas");if(r)goto S_49059;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12528,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 179 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12529,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=158; if (next_return_point>=return_points) more_return_points(); goto LABEL_SHOWLINENUMBER; RETURN_158:; if(!qbevent)break;evnt(25753,12531,"ide_methods.bas");}while(r); S_49063:; if ((((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY!=*_SUB_IDESHOWTEXT_LONG_L))&(-(*__LONG_IDEDEBUGMODE== 0 )))|((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY==*_SUB_IDESHOWTEXT_LONG_L))&(-(*__LONG_IDEDEBUGMODE!= 0 ))))||new_error){ if(qbevent){evnt(25753,12533,"ide_methods.bas");if(r)goto S_49063;} do{ qbg_sub_color( 7 , 4 ,NULL,3); if(!qbevent)break;evnt(25753,12534,"ide_methods.bas");}while(r); S_49065:; }else{ if ((-(*__LONG_IDECY==*_SUB_IDESHOWTEXT_LONG_L))|(((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND))))){ if(qbevent){evnt(25753,12535,"ide_methods.bas");if(r)goto S_49065;} S_49066:; if (((-(*__BYTE_HIDECURRENTLINEHIGHLIGHT== 0 ))&(-(*__LONG_IDESYSTEM== 1 )))||new_error){ if(qbevent){evnt(25753,12536,"ide_methods.bas");if(r)goto S_49066;} do{ qbg_sub_color( 7 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,12536,"ide_methods.bas");}while(r); } }else{ do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12538,"ide_methods.bas");}while(r); } } S_49072:; if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,12541,"ide_methods.bas");if(r)goto S_49072;} S_49073:; while((!(-(*_SUB_IDESHOWTEXT_LONG_Lid=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_INVALIDLINE[2]&1){ preserved_elements=__ARRAY_BYTE_INVALIDLINE[5]; } else preserved_elements=0; __ARRAY_BYTE_INVALIDLINE[4]= 0 ; __ARRAY_BYTE_INVALIDLINE[5]=(func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1)+ 1000 )-__ARRAY_BYTE_INVALIDLINE[4]+1; __ARRAY_BYTE_INVALIDLINE[6]=1; if (__ARRAY_BYTE_INVALIDLINE[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_INVALIDLINE[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_INVALIDLINE[0])); tmp_long=__ARRAY_BYTE_INVALIDLINE[5]; __ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_INVALIDLINE[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementslen))&(-(*__LONG_IDECX>= 1 ))))||new_error){ if(qbevent){evnt(25753,12550,"ide_methods.bas");if(r)goto S_49080;} do{ *_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12551,"ide_methods.bas");}while(r); S_49082:; if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||new_error){ if(qbevent){evnt(25753,12552,"ide_methods.bas");if(r)goto S_49082;} S_49083:; 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(25753,12553,"ide_methods.bas");if(r)goto S_49083;} do{ *_SUB_IDESHOWTEXT_LONG_CC= -1 ; if(!qbevent)break;evnt(25753,12553,"ide_methods.bas");}while(r); } } } do{ SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_A,__LONG_IDECX,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12559,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT=*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT; if(!qbevent)break;evnt(25753,12560,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE=*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE; if(!qbevent)break;evnt(25753,12561,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS= 0 ; if(!qbevent)break;evnt(25753,12564,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKET1= 0 ; if(!qbevent)break;evnt(25753,12565,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKET2= 0 ; if(!qbevent)break;evnt(25753,12566,"ide_methods.bas");}while(r); S_49094:; if (((-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 )))&(-(*__INTEGER_BRACKETHIGHLIGHT== -1 )))||new_error){ if(qbevent){evnt(25753,12567,"ide_methods.bas");if(r)goto S_49094;} do{ *_SUB_IDESHOWTEXT_LONG_INQUOTE= 0 ; if(!qbevent)break;evnt(25753,12568,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_COMMENT= 0 ; if(!qbevent)break;evnt(25753,12569,"ide_methods.bas");}while(r); S_49097:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,1),qbs_new_txt_len("(",1))))||new_error){ if(qbevent){evnt(25753,12570,"ide_methods.bas");if(r)goto S_49097;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ; if(!qbevent)break;evnt(25753,12571,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKET1=*__LONG_IDECX; if(!qbevent)break;evnt(25753,12572,"ide_methods.bas");}while(r); LABEL_SCANBRACKET2:; if(qbevent){evnt(25753,12573,"ide_methods.bas");r=0;} S_49100:; fornext_value5434=*_SUB_IDESHOWTEXT_LONG_BRACKET1+ 1 ; fornext_finalvalue5434=_SUB_IDESHOWTEXT_STRING_A->len; fornext_step5434= 1 ; if (fornext_step5434<0) fornext_step_negative5434=1; else fornext_step_negative5434=0; if (new_error) goto fornext_error5434; goto fornext_entrylabel5434; while(1){ fornext_value5434=fornext_step5434+(*_SUB_IDESHOWTEXT_LONG_K); fornext_entrylabel5434: *_SUB_IDESHOWTEXT_LONG_K=fornext_value5434; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5434){ if (fornext_value5434fornext_finalvalue5434) break; } fornext_error5434:; if(qbevent){evnt(25753,12574,"ide_methods.bas");if(r)goto S_49100;} S_49101:; qbs_set(sc_5436,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25753,12575,"ide_methods.bas");if(r)goto S_49101;} S_49102:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5436,func_chr( 34 ))))||new_error){ if(qbevent){evnt(25753,12576,"ide_methods.bas");if(r)goto S_49102;} do{ *_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE); if(!qbevent)break;evnt(25753,12577,"ide_methods.bas");}while(r); sc_ec_342_end:; goto sc_5436_end; } S_49104:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5436,qbs_new_txt_len("'",1))))||new_error){ if(qbevent){evnt(25753,12578,"ide_methods.bas");if(r)goto S_49104;} S_49105:; if ((-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))||new_error){ if(qbevent){evnt(25753,12579,"ide_methods.bas");if(r)goto S_49105;} do{ *_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ; if(!qbevent)break;evnt(25753,12579,"ide_methods.bas");}while(r); do{ goto fornext_exit_5433; if(!qbevent)break;evnt(25753,12579,"ide_methods.bas");}while(r); } sc_ec_343_end:; goto sc_5436_end; } sc_5436_end:; S_49110:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,1),qbs_new_txt_len(")",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))))||new_error){ if(qbevent){evnt(25753,12581,"ide_methods.bas");if(r)goto S_49110;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS- 1 ; if(!qbevent)break;evnt(25753,12582,"ide_methods.bas");}while(r); S_49112:; if ((-(*_SUB_IDESHOWTEXT_LONG_BRACKETS== 0 ))||new_error){ if(qbevent){evnt(25753,12583,"ide_methods.bas");if(r)goto S_49112;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKET2=*_SUB_IDESHOWTEXT_LONG_K; if(!qbevent)break;evnt(25753,12583,"ide_methods.bas");}while(r); do{ goto fornext_exit_5433; if(!qbevent)break;evnt(25753,12583,"ide_methods.bas");}while(r); } S_49116:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,1),qbs_new_txt_len("(",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 )))){ if(qbevent){evnt(25753,12584,"ide_methods.bas");if(r)goto S_49116;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS+ 1 ; if(!qbevent)break;evnt(25753,12585,"ide_methods.bas");}while(r); } } fornext_continue_5433:; } fornext_exit_5433:; S_49120:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX- 1 , 1 ,1),qbs_new_txt_len("(",1)))&(qbs_notequal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,1),func_chr( 34 ))))){ if(qbevent){evnt(25753,12588,"ide_methods.bas");if(r)goto S_49120;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ; if(!qbevent)break;evnt(25753,12589,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKET1=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,12590,"ide_methods.bas");}while(r); do{ goto LABEL_SCANBRACKET2; if(!qbevent)break;evnt(25753,12591,"ide_methods.bas");}while(r); S_49124:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,1),qbs_new_txt_len(")",1)))){ if(qbevent){evnt(25753,12592,"ide_methods.bas");if(r)goto S_49124;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ; if(!qbevent)break;evnt(25753,12593,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKET2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,12594,"ide_methods.bas");}while(r); LABEL_SCANBRACKET1:; if(qbevent){evnt(25753,12595,"ide_methods.bas");r=0;} S_49127:; fornext_value5438=*_SUB_IDESHOWTEXT_LONG_BRACKET2- 1 ; fornext_finalvalue5438= 1 ; fornext_step5438= -1 ; if (fornext_step5438<0) fornext_step_negative5438=1; else fornext_step_negative5438=0; if (new_error) goto fornext_error5438; goto fornext_entrylabel5438; while(1){ fornext_value5438=fornext_step5438+(*_SUB_IDESHOWTEXT_LONG_K); fornext_entrylabel5438: *_SUB_IDESHOWTEXT_LONG_K=fornext_value5438; if (fornext_step_negative5438){ if (fornext_value5438fornext_finalvalue5438) break; } fornext_error5438:; if(qbevent){evnt(25753,12596,"ide_methods.bas");if(r)goto S_49127;} S_49128:; qbs_set(sc_5439,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25753,12597,"ide_methods.bas");if(r)goto S_49128;} S_49129:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5439,func_chr( 34 ))))||new_error){ if(qbevent){evnt(25753,12598,"ide_methods.bas");if(r)goto S_49129;} do{ *_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE); if(!qbevent)break;evnt(25753,12599,"ide_methods.bas");}while(r); sc_ec_344_end:; goto sc_5439_end; } sc_5439_end:; S_49132:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,1),qbs_new_txt_len("(",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))))||new_error){ if(qbevent){evnt(25753,12601,"ide_methods.bas");if(r)goto S_49132;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS- 1 ; if(!qbevent)break;evnt(25753,12602,"ide_methods.bas");}while(r); S_49134:; if ((-(*_SUB_IDESHOWTEXT_LONG_BRACKETS== 0 ))||new_error){ if(qbevent){evnt(25753,12603,"ide_methods.bas");if(r)goto S_49134;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKET1=*_SUB_IDESHOWTEXT_LONG_K; if(!qbevent)break;evnt(25753,12603,"ide_methods.bas");}while(r); do{ goto fornext_exit_5437; if(!qbevent)break;evnt(25753,12603,"ide_methods.bas");}while(r); } S_49138:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,1),qbs_new_txt_len(")",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 )))){ if(qbevent){evnt(25753,12604,"ide_methods.bas");if(r)goto S_49138;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS+ 1 ; if(!qbevent)break;evnt(25753,12605,"ide_methods.bas");}while(r); } } fornext_continue_5437:; } fornext_exit_5437:; S_49142:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX- 1 , 1 ,1),qbs_new_txt_len(")",1)))&(qbs_notequal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,1),func_chr( 34 ))))){ if(qbevent){evnt(25753,12608,"ide_methods.bas");if(r)goto S_49142;} do{ *_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ; if(!qbevent)break;evnt(25753,12609,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_BRACKET2=*__LONG_IDECX- 1 ; if(!qbevent)break;evnt(25753,12610,"ide_methods.bas");}while(r); do{ goto LABEL_SCANBRACKET1; if(!qbevent)break;evnt(25753,12611,"ide_methods.bas");}while(r); } } } } } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12618,"ide_methods.bas");}while(r); S_49149:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX==(_SUB_IDESHOWTEXT_STRING_A->len+ 1 )))&(-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 )))))||new_error){ if(qbevent){evnt(25753,12620,"ide_methods.bas");if(r)goto S_49149;} S_49150:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 5 ),qbs_new_txt_len("_RGB(",5)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 7 ),qbs_new_txt_len("_RGB32(",7)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 6 ),qbs_new_txt_len("_RGBA(",6)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 8 ),qbs_new_txt_len("_RGBA32(",8))))|((((qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 4 ),qbs_new_txt_len("RGB(",4)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 6 ),qbs_new_txt_len("RGB32(",6)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 5 ),qbs_new_txt_len("RGBA(",5)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 7 ),qbs_new_txt_len("RGBA32(",7)))))&(-(*__LONG_QB64PREFIX_SET== 1 )))))||new_error){ if(qbevent){evnt(25753,12628,"ide_methods.bas");if(r)goto S_49150;} do{ *_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX=_SUB_IDESHOWTEXT_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12629,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_add(_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len(" --> Shift+ENTER to open the RGB mixer",38))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12630,"ide_methods.bas");}while(r); do{ *__BYTE_ENTERINGRGB= -1 ; if(!qbevent)break;evnt(25753,12631,"ide_methods.bas");}while(r); } S_49155:; }else{ if (-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 ))){ if(qbevent){evnt(25753,12633,"ide_methods.bas");if(r)goto S_49155;} S_49156:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 5 , 5 ,1),qbs_new_txt_len("_RGB(",5)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 7 , 7 ,1),qbs_new_txt_len("_RGB32(",7)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 6 , 6 ,1),qbs_new_txt_len("_RGBA(",6)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 8 , 8 ,1),qbs_new_txt_len("_RGBA32(",8))))|((((qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 4 , 4 ,1),qbs_new_txt_len("RGB(",4)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 6 , 6 ,1),qbs_new_txt_len("RGB32(",6)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 5 , 5 ,1),qbs_new_txt_len("RGBA(",5)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 7 , 7 ,1),qbs_new_txt_len("RGBA32(",7)))))&(-(*__LONG_QB64PREFIX_SET== 1 )))))||new_error){ if(qbevent){evnt(25753,12641,"ide_methods.bas");if(r)goto S_49156;} S_49157:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len("0123456789",10),func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX, 1 ,1),0)== 0 )))||new_error){ if(qbevent){evnt(25753,12642,"ide_methods.bas");if(r)goto S_49157;} do{ *__BYTE_ENTERINGRGB= -1 ; if(!qbevent)break;evnt(25753,12642,"ide_methods.bas");}while(r); } } } } do{ *_SUB_IDESHOWTEXT_LONG_FINDINCLUDE=func__instrrev(NULL,_SUB_IDESHOWTEXT_STRING_A2,qbs_new_txt_len("$INCLUDE",8),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12646,"ide_methods.bas");}while(r); S_49163:; if ((-(*_SUB_IDESHOWTEXT_LONG_FINDINCLUDE> 0 ))||new_error){ if(qbevent){evnt(25753,12647,"ide_methods.bas");if(r)goto S_49163;} do{ *_SUB_IDESHOWTEXT_LONG_LINK_IDECX=_SUB_IDESHOWTEXT_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12648,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1=func_instr(*_SUB_IDESHOWTEXT_LONG_FINDINCLUDE+ 8 ,_SUB_IDESHOWTEXT_STRING_A2,qbs_new_txt_len("'",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12649,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE2=func_instr(*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1+ 1 ,_SUB_IDESHOWTEXT_STRING_A2,qbs_new_txt_len("'",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12650,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_ACTIVEINCLUDELINKFILE,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1+ 1 ,*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE2-*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1- 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12651,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12652,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_F,qbs_add(_SUB_IDESHOWTEXT_STRING_P,__STRING_ACTIVEINCLUDELINKFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12653,"ide_methods.bas");}while(r); S_49170:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_SUB_IDESHOWTEXT_STRING_F)|func__fileexists(__STRING_ACTIVEINCLUDELINKFILE)))||new_error){ if(qbevent){evnt(25753,12654,"ide_methods.bas");if(r)goto S_49170;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_add(_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len(" --> Double-click to open",25))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12655,"ide_methods.bas");}while(r); do{ *__LONG_ACTIVEINCLUDELINK=*__LONG_IDECY; if(!qbevent)break;evnt(25753,12655,"ide_methods.bas");}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(25753,12660,"ide_methods.bas");}while(r); do{ sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0); if(!qbevent)break;evnt(25753,12661,"ide_methods.bas");}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(25753,12663,"ide_methods.bas");}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_INQUOTE= 0 ; if(!qbevent)break;evnt(25753,12667,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_METACOMMAND= 0 ; if(!qbevent)break;evnt(25753,12668,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_COMMENT= 0 ; if(!qbevent)break;evnt(25753,12669,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD= 0 ; if(!qbevent)break;evnt(25753,12670,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12670,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= 0 ; if(!qbevent)break;evnt(25753,12671,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH= 0 ; if(!qbevent)break;evnt(25753,12672,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_INTEGER_PREVBG=func__backgroundcolor(NULL,0); if(!qbevent)break;evnt(25753,12673,"ide_methods.bas");}while(r); S_49189:; fornext_value5444= 1 ; fornext_finalvalue5444=_SUB_IDESHOWTEXT_STRING_A2->len; fornext_step5444= 1 ; if (fornext_step5444<0) fornext_step_negative5444=1; else fornext_step_negative5444=0; if (new_error) goto fornext_error5444; goto fornext_entrylabel5444; while(1){ fornext_value5444=fornext_step5444+(*_SUB_IDESHOWTEXT_LONG_M); fornext_entrylabel5444: *_SUB_IDESHOWTEXT_LONG_M=fornext_value5444; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5444){ if (fornext_value5444fornext_finalvalue5444) break; } fornext_error5444:; if(qbevent){evnt(25753,12675,"ide_methods.bas");if(r)goto S_49189;} S_49190:; if ((-(FUNC_TIMEELAPSEDSINCE(_SUB_IDESHOWTEXT_SINGLE_STARTTIME)> 1 ))||new_error){ if(qbevent){evnt(25753,12676,"ide_methods.bas");if(r)goto S_49190;} do{ *_SUB_IDESHOWTEXT_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Syntax Highlighter Disabled",27),qbs_new_txt_len("Syntax Highlighter has been disabled to avoid slowing down the IDE.\\nYou can reenable the Highlighter in the 'Options' menu.",124),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12677,"ide_methods.bas");}while(r); do{ *__BYTE_DISABLESYNTAXHIGHLIGHTER= -1 ; if(!qbevent)break;evnt(25753,12678,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12679,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__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("Syntax #Highlighter",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12680,"ide_methods.bas");}while(r); do{ goto LABEL_NOSYNTAXHIGHLIGHTING; if(!qbevent)break;evnt(25753,12681,"ide_methods.bas");}while(r); } S_49197:; if ((-(*_SUB_IDESHOWTEXT_LONG_M>(*__LONG_IDESX+*__LONG_IDEWX- 2 )))||new_error){ if(qbevent){evnt(25753,12683,"ide_methods.bas");if(r)goto S_49197;} do{ goto fornext_exit_5443; if(!qbevent)break;evnt(25753,12683,"ide_methods.bas");}while(r); } S_49200:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDESELECT== 1 ))&(-(__STRING_IDECURRENTSINGLELINESELECTION->len> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH== 0 ))&(-(*__INTEGER_MULTIHIGHLIGHT== -1 ))))||new_error){ if(qbevent){evnt(25753,12684,"ide_methods.bas");if(r)goto S_49200;} S_49201:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M,__STRING_IDECURRENTSINGLELINESELECTION->len,1)),qbs_lcase(__STRING_IDECURRENTSINGLELINESELECTION))))||new_error){ if(qbevent){evnt(25753,12685,"ide_methods.bas");if(r)goto S_49201;} S_49202:; if ((-(*_SUB_IDESHOWTEXT_LONG_M> 1 ))||new_error){ if(qbevent){evnt(25753,12687,"ide_methods.bas");if(r)goto S_49202;} S_49203:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M- 1 , 1 ,1),0)> 0 )))||new_error){ if(qbevent){evnt(25753,12688,"ide_methods.bas");if(r)goto S_49203;} S_49204:; if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)<(_SUB_IDESHOWTEXT_STRING_A2->len)))&(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,1),0)> 0 ))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,1),qbs_new_txt_len(".",1)))))))||new_error){ if(qbevent){evnt(25753,12691,"ide_methods.bas");if(r)goto S_49204;} do{ *_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12692,"ide_methods.bas");}while(r); S_49206:; }else{ if (qbs_cleanup(qbs_tmp_base,-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)>=(_SUB_IDESHOWTEXT_STRING_A2->len)))){ if(qbevent){evnt(25753,12693,"ide_methods.bas");if(r)goto S_49206;} do{ *_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12694,"ide_methods.bas");}while(r); } } } }else{ S_49211:; if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)<(_SUB_IDESHOWTEXT_STRING_A2->len)))&(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,1),0)> 0 ))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,1),qbs_new_txt_len(".",1)))))))||new_error){ if(qbevent){evnt(25753,12700,"ide_methods.bas");if(r)goto S_49211;} do{ *_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12701,"ide_methods.bas");}while(r); S_49213:; }else{ if (qbs_cleanup(qbs_tmp_base,-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)>=(_SUB_IDESHOWTEXT_STRING_A2->len)))){ if(qbevent){evnt(25753,12702,"ide_methods.bas");if(r)goto S_49213;} do{ *_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12703,"ide_methods.bas");}while(r); } } } } } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12709,"ide_methods.bas");}while(r); S_49220:; if ((-(*_SUB_IDESHOWTEXT_LONG_COMMENT== 0 ))||new_error){ if(qbevent){evnt(25753,12711,"ide_methods.bas");if(r)goto S_49220;} S_49221:; if(qbevent){evnt(25753,12712,"ide_methods.bas");if(r)goto S_49221;} S_49222:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_chr( 34 ))))||new_error){ if(qbevent){evnt(25753,12713,"ide_methods.bas");if(r)goto S_49222;} do{ *_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE); if(!qbevent)break;evnt(25753,12713,"ide_methods.bas");}while(r); sc_ec_345_end:; goto sc_5464_end; } S_49224:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,qbs_new_txt_len("'",1))))||new_error){ if(qbevent){evnt(25753,12714,"ide_methods.bas");if(r)goto S_49224;} S_49225:; if ((-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))||new_error){ if(qbevent){evnt(25753,12714,"ide_methods.bas");if(r)goto S_49225;} do{ *_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ; if(!qbevent)break;evnt(25753,12714,"ide_methods.bas");}while(r); } sc_ec_346_end:; goto sc_5464_end; } sc_5464_end:; } do{ qbg_sub_color( 13 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12718,"ide_methods.bas");}while(r); S_49231:; if ((((int8*)(__ARRAY_BYTE_INVALIDLINE[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_INVALIDLINE[4],__ARRAY_BYTE_INVALIDLINE[5])])||new_error){ if(qbevent){evnt(25753,12720,"ide_methods.bas");if(r)goto S_49231;} do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12720,"ide_methods.bas");}while(r); do{ goto LABEL_SKIPSYNTAXHIGHLIGHTER; if(!qbevent)break;evnt(25753,12720,"ide_methods.bas");}while(r); } S_49235:; if ((qbs_cleanup(qbs_tmp_base,(((-(_SUB_IDESHOWTEXT_STRING_OLDCHAR->len> 0 ))|(-(*_SUB_IDESHOWTEXT_LONG_M== 1 ))))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))))||new_error){ if(qbevent){evnt(25753,12722,"ide_methods.bas");if(r)goto S_49235;} S_49236:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_INITIALNUM__ASCII_CHR_046__CHAR,_SUB_IDESHOWTEXT_STRING_THISCHAR,0)> 0 ))&(qbs_notequal(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len(")",1)))&(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,_SUB_IDESHOWTEXT_STRING_OLDCHAR,0)> 0 ))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len("?",1)))))))||new_error){ if(qbevent){evnt(25753,12723,"ide_methods.bas");if(r)goto S_49236;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12725,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_IS_NUMBER= 0 ; if(!qbevent)break;evnt(25753,12726,"ide_methods.bas");}while(r); S_49239:; fornext_value5467=*_SUB_IDESHOWTEXT_LONG_M; fornext_finalvalue5467=_SUB_IDESHOWTEXT_STRING_A2->len; fornext_step5467= 1 ; if (fornext_step5467<0) fornext_step_negative5467=1; else fornext_step_negative5467=0; if (new_error) goto fornext_error5467; goto fornext_entrylabel5467; while(1){ fornext_value5467=fornext_step5467+(*_SUB_IDESHOWTEXT_LONG_I); fornext_entrylabel5467: *_SUB_IDESHOWTEXT_LONG_I=fornext_value5467; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5467){ if (fornext_value5467fornext_finalvalue5467) break; } fornext_error5467:; if(qbevent){evnt(25753,12728,"ide_methods.bas");if(r)goto S_49239;} S_49240:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_NUM__ASCII_CHR_046__CHAR,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1),0)== 0 )))||new_error){ if(qbevent){evnt(25753,12729,"ide_methods.bas");if(r)goto S_49240;} do{ goto fornext_exit_5466; if(!qbevent)break;evnt(25753,12729,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_add(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12730,"ide_methods.bas");}while(r); fornext_continue_5466:; } fornext_exit_5466:; S_49245:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("-",1)))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len(".",1)))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("&",1)))))||new_error){ if(qbevent){evnt(25753,12733,"ide_methods.bas");if(r)goto S_49245;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12734,"ide_methods.bas");}while(r); }else{ S_49248:; if ((qbs_cleanup(qbs_tmp_base,FUNC_ISNUMBER(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)))||new_error){ if(qbevent){evnt(25753,12736,"ide_methods.bas");if(r)goto S_49248;} do{ *_SUB_IDESHOWTEXT_LONG_IS_NUMBER= -1 ; if(!qbevent)break;evnt(25753,12737,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12738,"ide_methods.bas");}while(r); S_49251:; }else{ if (qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_USERDEFINELIST,qbs_add(qbs_new_txt_len("@",1),qbs_ucase(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)),0)> 0 ))){ if(qbevent){evnt(25753,12739,"ide_methods.bas");if(r)goto S_49251;} S_49252:; fornext_value5471=*_SUB_IDESHOWTEXT_LONG_I; fornext_finalvalue5471=_SUB_IDESHOWTEXT_STRING_A2->len; fornext_step5471= 1 ; if (fornext_step5471<0) fornext_step_negative5471=1; else fornext_step_negative5471=0; if (new_error) goto fornext_error5471; goto fornext_entrylabel5471; while(1){ fornext_value5471=fornext_step5471+(*_SUB_IDESHOWTEXT_LONG_I); fornext_entrylabel5471: *_SUB_IDESHOWTEXT_LONG_I=fornext_value5471; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5471){ if (fornext_value5471fornext_finalvalue5471) break; } fornext_error5471:; if(qbevent){evnt(25753,12741,"ide_methods.bas");if(r)goto S_49252;} S_49253:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1),0)> 0 )))||new_error){ if(qbevent){evnt(25753,12742,"ide_methods.bas");if(r)goto S_49253;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_RIGHT__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12742,"ide_methods.bas");}while(r); do{ goto LABEL_KEYWORDACQUIRED; if(!qbevent)break;evnt(25753,12742,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_add(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12743,"ide_methods.bas");}while(r); fornext_continue_5470:; } fornext_exit_5470:; do{ goto LABEL_KEYWORDACQUIRED; if(!qbevent)break;evnt(25753,12745,"ide_methods.bas");}while(r); } } } do{ goto LABEL_SETOLDCHAR; if(!qbevent)break;evnt(25753,12748,"ide_methods.bas");}while(r); } S_49264:; if ((qbs_cleanup(qbs_tmp_base,(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,_SUB_IDESHOWTEXT_STRING_OLDCHAR,0)> 0 ))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len("?",1)))))&(-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,_SUB_IDESHOWTEXT_STRING_THISCHAR,0)== 0 ))))||new_error){ if(qbevent){evnt(25753,12751,"ide_methods.bas");if(r)goto S_49264;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12753,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_RIGHT__ASCII_CHR_046__SEP,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12754,"ide_methods.bas");}while(r); S_49267:; fornext_value5474=*_SUB_IDESHOWTEXT_LONG_M; fornext_finalvalue5474=_SUB_IDESHOWTEXT_STRING_A2->len; fornext_step5474= 1 ; if (fornext_step5474<0) fornext_step_negative5474=1; else fornext_step_negative5474=0; if (new_error) goto fornext_error5474; goto fornext_entrylabel5474; while(1){ fornext_value5474=fornext_step5474+(*_SUB_IDESHOWTEXT_LONG_I); fornext_entrylabel5474: *_SUB_IDESHOWTEXT_LONG_I=fornext_value5474; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5474){ if (fornext_value5474fornext_finalvalue5474) break; } fornext_error5474:; if(qbevent){evnt(25753,12755,"ide_methods.bas");if(r)goto S_49267;} S_49268:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1),0)> 0 )))||new_error){ if(qbevent){evnt(25753,12756,"ide_methods.bas");if(r)goto S_49268;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_RIGHT__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12756,"ide_methods.bas");}while(r); do{ goto fornext_exit_5473; if(!qbevent)break;evnt(25753,12756,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_add(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12757,"ide_methods.bas");}while(r); fornext_continue_5473:; } fornext_exit_5473:; S_49274:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDESHOWTEXT_LONG_COMMENT== 0 ))&(qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD, 1 ),qbs_new_txt_len("?",1)))))||new_error){ if(qbevent){evnt(25753,12759,"ide_methods.bas");if(r)goto S_49274;} do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD= 1 ; if(!qbevent)break;evnt(25753,12759,"ide_methods.bas");}while(r); do{ goto LABEL_SETOLDCHAR; if(!qbevent)break;evnt(25753,12759,"ide_methods.bas");}while(r); } LABEL_KEYWORDACQUIRED:; if(qbevent){evnt(25753,12760,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_ucase(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12761,"ide_methods.bas");}while(r); S_49279:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,__STRING_LISTOFKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD),qbs_new_txt_len("@",1)),0)> 0 ))|(((-(*__LONG_QB64PREFIX_SET== 1 ))&(-(func_instr(NULL,__STRING_LISTOFKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@_",2),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD),qbs_new_txt_len("@",1)),0)> 0 ))))))||new_error){ if(qbevent){evnt(25753,12763,"ide_methods.bas");if(r)goto S_49279;} S_49280:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$END",4))))||new_error){ if(qbevent){evnt(25753,12765,"ide_methods.bas");if(r)goto S_49280;} S_49281:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M, 7 ,1)),qbs_new_txt_len("$END IF",7))))||new_error){ if(qbevent){evnt(25753,12766,"ide_methods.bas");if(r)goto S_49281;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$END IF",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12766,"ide_methods.bas");}while(r); } S_49284:; }else{ if (qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("THEN",4)))&(((qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 3 )),qbs_new_txt_len("$IF",3)))|(qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 7 )),qbs_new_txt_len("$ELSEIF",7))))))){ if(qbevent){evnt(25753,12769,"ide_methods.bas");if(r)goto S_49284;} do{ *_SUB_IDESHOWTEXT_LONG_METACOMMAND= -1 ; if(!qbevent)break;evnt(25753,12770,"ide_methods.bas");}while(r); S_49286:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$ASSERTS",8)))){ if(qbevent){evnt(25753,12771,"ide_methods.bas");if(r)goto S_49286;} S_49287:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs__trim(_SUB_IDESHOWTEXT_STRING_A2)),qbs_new_txt_len("$ASSERTS:CONSOLE",16))))||new_error){ if(qbevent){evnt(25753,12772,"ide_methods.bas");if(r)goto S_49287;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$ASSERTS:CONSOLE",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12773,"ide_methods.bas");}while(r); } } } } do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12776,"ide_methods.bas");}while(r); S_49292:; }else{ if (qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),FUNC_REMOVESYMBOL2(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)),qbs_new_txt_len("@",1)),0)> 0 ))){ if(qbevent){evnt(25753,12777,"ide_methods.bas");if(r)goto S_49292;} do{ *_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= -1 ; if(!qbevent)break;evnt(25753,12778,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12779,"ide_methods.bas");}while(r); S_49295:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,__STRING_USERDEFINELIST,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD),qbs_new_txt_len("@",1)),0)> 0 ))&(((qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 3 )),qbs_new_txt_len("$IF",3)))|(qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 7 )),qbs_new_txt_len("$ELSEIF",7))))))){ if(qbevent){evnt(25753,12782,"ide_methods.bas");if(r)goto S_49295;} do{ *_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= -1 ; if(!qbevent)break;evnt(25753,12783,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12784,"ide_methods.bas");}while(r); } } } } } LABEL_SETOLDCHAR:; if(qbevent){evnt(25753,12788,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_OLDCHAR,_SUB_IDESHOWTEXT_STRING_THISCHAR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12789,"ide_methods.bas");}while(r); S_49302:; if (((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD> 0 ))&*__INTEGER_KEYWORDHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,12791,"ide_methods.bas");if(r)goto S_49302;} S_49303:; if ((*_SUB_IDESHOWTEXT_LONG_IS_NUMBER)||new_error){ if(qbevent){evnt(25753,12792,"ide_methods.bas");if(r)goto S_49303;} do{ qbg_sub_color( 8 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12793,"ide_methods.bas");}while(r); S_49305:; }else{ if (*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD){ if(qbevent){evnt(25753,12794,"ide_methods.bas");if(r)goto S_49305;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12795,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 12 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12797,"ide_methods.bas");}while(r); } } S_49310:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD, 1 ),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(25753,12799,"ide_methods.bas");if(r)goto S_49310;} do{ *_SUB_IDESHOWTEXT_LONG_METACOMMAND= -1 ; if(!qbevent)break;evnt(25753,12799,"ide_methods.bas");}while(r); } } S_49314:; if ((*_SUB_IDESHOWTEXT_LONG_COMMENT)||new_error){ if(qbevent){evnt(25753,12802,"ide_methods.bas");if(r)goto S_49314;} do{ qbg_sub_color( 11 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12803,"ide_methods.bas");}while(r); S_49316:; if ((*_SUB_IDESHOWTEXT_LONG_METACOMMAND)||new_error){ if(qbevent){evnt(25753,12804,"ide_methods.bas");if(r)goto S_49316;} S_49317:; if(qbevent){evnt(25753,12805,"ide_methods.bas");if(r)goto S_49317;} S_49318:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$INCLUDE",8))))||new_error){ if(qbevent){evnt(25753,12806,"ide_methods.bas");if(r)goto S_49318;} S_49319:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,1)== 0 )))||new_error){ if(qbevent){evnt(25753,12807,"ide_methods.bas");if(r)goto S_49319;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12807,"ide_methods.bas");}while(r); } sc_ec_347_end:; goto sc_5479_end; } S_49322:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$DYNAMIC",8))||qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$STATIC",7))))||new_error){ if(qbevent){evnt(25753,12808,"ide_methods.bas");if(r)goto S_49322;} S_49323:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$DYNAMIC",8),1)== 0 ))&(-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$STATIC",7),1)== 0 ))))||new_error){ if(qbevent){evnt(25753,12809,"ide_methods.bas");if(r)goto S_49323;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12809,"ide_methods.bas");}while(r); } sc_ec_348_end:; goto sc_5479_end; } sc_5479_end:; } S_49328:; }else{ if (*_SUB_IDESHOWTEXT_LONG_METACOMMAND){ if(qbevent){evnt(25753,12812,"ide_methods.bas");if(r)goto S_49328;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12813,"ide_methods.bas");}while(r); S_49330:; }else{ if (qbs_cleanup(qbs_tmp_base,*_SUB_IDESHOWTEXT_LONG_INQUOTE|(qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_chr( 34 ))))){ if(qbevent){evnt(25753,12814,"ide_methods.bas");if(r)goto S_49330;} do{ qbg_sub_color( 14 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12815,"ide_methods.bas");}while(r); } } } LABEL_SKIPSYNTAXHIGHLIGHTER:; if(qbevent){evnt(25753,12818,"ide_methods.bas");r=0;} S_49333:; if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))&(((-(*_SUB_IDESHOWTEXT_LONG_LINK_IDECX> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_M>*_SUB_IDESHOWTEXT_LONG_LINK_IDECX)))))||new_error){ if(qbevent){evnt(25753,12820,"ide_methods.bas");if(r)goto S_49333;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12820,"ide_methods.bas");}while(r); } S_49336:; if ((((-(*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_M>*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX))))||new_error){ if(qbevent){evnt(25753,12821,"ide_methods.bas");if(r)goto S_49336;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12821,"ide_methods.bas");}while(r); } S_49339:; if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))&(((-(*_SUB_IDESHOWTEXT_LONG_M==*_SUB_IDESHOWTEXT_LONG_BRACKET1))|(-(*_SUB_IDESHOWTEXT_LONG_M==*_SUB_IDESHOWTEXT_LONG_BRACKET2)))))||new_error){ if(qbevent){evnt(25753,12823,"ide_methods.bas");if(r)goto S_49339;} do{ qbg_sub_color(NULL, 5 ,NULL,2); if(!qbevent)break;evnt(25753,12824,"ide_methods.bas");}while(r); S_49341:; }else{ if ((-(*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH> 0 ))&(-(*__INTEGER_MULTIHIGHLIGHT== -1 ))){ if(qbevent){evnt(25753,12825,"ide_methods.bas");if(r)goto S_49341;} do{ *_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH- 1 ; if(!qbevent)break;evnt(25753,12826,"ide_methods.bas");}while(r); do{ qbg_sub_color(NULL, 5 ,NULL,2); if(!qbevent)break;evnt(25753,12827,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color(NULL,*_SUB_IDESHOWTEXT_INTEGER_PREVBG,NULL,2); if(!qbevent)break;evnt(25753,12829,"ide_methods.bas");}while(r); } } S_49347:; if ((*__BYTE_SHOWLINENUMBERS)||new_error){ if(qbevent){evnt(25753,12832,"ide_methods.bas");if(r)goto S_49347;} S_49348:; if (((-((( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)+*__LONG_MAXLINENUMBERLENGTH)>=( 2 +*__LONG_MAXLINENUMBERLENGTH)))&(-((( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)+*__LONG_MAXLINENUMBERLENGTH)<*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,12833,"ide_methods.bas");if(r)goto S_49348;} do{ sub__printstring(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)+*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_THISCHAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12834,"ide_methods.bas");}while(r); } }else{ S_49352:; if (((-(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)>=( 2 )))&(-(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)<*__LONG_IDEWX)))||new_error){ if(qbevent){evnt(25753,12837,"ide_methods.bas");if(r)goto S_49352;} do{ sub__printstring( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_THISCHAR,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12838,"ide_methods.bas");}while(r); } } S_49356:; if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,12843,"ide_methods.bas");if(r)goto S_49356;} do{ qbg_sub_color(NULL, 6 ,NULL,2); if(!qbevent)break;evnt(25753,12843,"ide_methods.bas");}while(r); } S_49359:; if ((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD> 0 ))||new_error){ if(qbevent){evnt(25753,12844,"ide_methods.bas");if(r)goto S_49359;} do{ *_SUB_IDESHOWTEXT_LONG_ISKEYWORD=*_SUB_IDESHOWTEXT_LONG_ISKEYWORD- 1 ; if(!qbevent)break;evnt(25753,12844,"ide_methods.bas");}while(r); } S_49362:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))&(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("REM",3)))))||new_error){ if(qbevent){evnt(25753,12845,"ide_methods.bas");if(r)goto S_49362;} do{ *_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ; if(!qbevent)break;evnt(25753,12845,"ide_methods.bas");}while(r); } S_49365:; if ((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))||new_error){ if(qbevent){evnt(25753,12846,"ide_methods.bas");if(r)goto S_49365;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12846,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_METACOMMAND= 0 ; if(!qbevent)break;evnt(25753,12846,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_IS_NUMBER= 0 ; if(!qbevent)break;evnt(25753,12846,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= 0 ; if(!qbevent)break;evnt(25753,12846,"ide_methods.bas");}while(r); } fornext_continue_5443:; } fornext_exit_5443:; S_49372:; if (((((-(*__LONG_IDESYSTEM== 1 ))|(-(*__LONG_IDESYSTEM== 2 ))))&(-(*__LONG_IDESELECT!= 0 )))||new_error){ if(qbevent){evnt(25753,12850,"ide_methods.bas");if(r)goto S_49372;} S_49373:; if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||new_error){ if(qbevent){evnt(25753,12851,"ide_methods.bas");if(r)goto S_49373;} S_49374:; if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(25753,12852,"ide_methods.bas");if(r)goto S_49374;} do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,12853,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX; if(!qbevent)break;evnt(25753,12854,"ide_methods.bas");}while(r); S_49377:; fornext_value5481= 2 +*__LONG_MAXLINENUMBERLENGTH; fornext_finalvalue5481=(*__LONG_IDEWX- 1 ); fornext_step5481= 1 ; if (fornext_step5481<0) fornext_step_negative5481=1; else fornext_step_negative5481=0; if (new_error) goto fornext_error5481; goto fornext_entrylabel5481; while(1){ fornext_value5481=fornext_step5481+(*_SUB_IDESHOWTEXT_LONG_X); fornext_entrylabel5481: *_SUB_IDESHOWTEXT_LONG_X=fornext_value5481; if (fornext_step_negative5481){ if (fornext_value5481fornext_finalvalue5481) break; } fornext_error5481:; if(qbevent){evnt(25753,12855,"ide_methods.bas");if(r)goto S_49377;} S_49378:; if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||new_error){ if(qbevent){evnt(25753,12856,"ide_methods.bas");if(r)goto S_49378;} do{ *_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0); if(!qbevent)break;evnt(25753,12857,"ide_methods.bas");}while(r); S_49380:; if ((-(*_SUB_IDESHOWTEXT_LONG_A== 63 ))||new_error){ if(qbevent){evnt(25753,12859,"ide_methods.bas");if(r)goto S_49380;} do{ *_SUB_IDESHOWTEXT_LONG_C=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X, 1 ,1); if(!qbevent)break;evnt(25753,12860,"ide_methods.bas");}while(r); }else{ do{ *_SUB_IDESHOWTEXT_LONG_C= 1 ; if(!qbevent)break;evnt(25753,12862,"ide_methods.bas");}while(r); } S_49385:; if ((-((*_SUB_IDESHOWTEXT_LONG_C& 15 )== 0 ))||new_error){ if(qbevent){evnt(25753,12864,"ide_methods.bas");if(r)goto S_49385;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,12865,"ide_methods.bas");}while(r); do{ sub__printstring(*_SUB_IDESHOWTEXT_LONG_X,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,qbs_new_txt_len("?",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12866,"ide_methods.bas");}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,12867,"ide_methods.bas");}while(r); }else{ do{ sub__printstring(*_SUB_IDESHOWTEXT_LONG_X,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr(*_SUB_IDESHOWTEXT_LONG_A),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12869,"ide_methods.bas");}while(r); } } do{ *_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,12874,"ide_methods.bas");}while(r); fornext_continue_5480:; } fornext_exit_5480:; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12876,"ide_methods.bas");}while(r); }else{ S_49397:; if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||new_error){ if(qbevent){evnt(25753,12878,"ide_methods.bas");if(r)goto S_49397;} do{ goto LABEL_NOFINALSELECT; if(!qbevent)break;evnt(25753,12878,"ide_methods.bas");}while(r); } do{ qbg_sub_locate(*_SUB_IDESHOWTEXT_LONG_Y+ 3 , 2 +*__LONG_MAXLINENUMBERLENGTH,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,12879,"ide_methods.bas");}while(r); do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,12880,"ide_methods.bas");}while(r); S_49402:; fornext_value5483=*__LONG_IDESX; fornext_finalvalue5483=*__LONG_IDESX+*__LONG_IDEWX-( 2 +*__LONG_MAXLINENUMBERLENGTH); fornext_step5483= 1 ; if (fornext_step5483<0) fornext_step_negative5483=1; else fornext_step_negative5483=0; if (new_error) goto fornext_error5483; goto fornext_entrylabel5483; while(1){ fornext_value5483=fornext_step5483+(*_SUB_IDESHOWTEXT_LONG_X); fornext_entrylabel5483: *_SUB_IDESHOWTEXT_LONG_X=fornext_value5483; if (fornext_step_negative5483){ if (fornext_value5483fornext_finalvalue5483) break; } fornext_error5483:; if(qbevent){evnt(25753,12882,"ide_methods.bas");if(r)goto S_49402;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_X, 1 ,1)); if (new_error) goto skip5484; makefit(tqbs); qbs_print(tqbs,0); skip5484: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12883,"ide_methods.bas");}while(r); fornext_continue_5482:; } fornext_exit_5482:; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12886,"ide_methods.bas");}while(r); LABEL_NOFINALSELECT:; if(qbevent){evnt(25753,12887,"ide_methods.bas");r=0;} } } } do{ *_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ; if(!qbevent)break;evnt(25753,12892,"ide_methods.bas");}while(r); fornext_continue_5429:; } fornext_exit_5429:; }else{ LABEL_NOSYNTAXHIGHLIGHTING:; if(qbevent){evnt(25753,12895,"ide_methods.bas");r=0;} do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12897,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY; if(!qbevent)break;evnt(25753,12898,"ide_methods.bas");}while(r); S_49414:; fornext_value5486= 0 ; fornext_finalvalue5486=(*__LONG_IDEWY- 9 ); fornext_step5486= 1 ; if (fornext_step5486<0) fornext_step_negative5486=1; else fornext_step_negative5486=0; if (new_error) goto fornext_error5486; goto fornext_entrylabel5486; while(1){ fornext_value5486=fornext_step5486+(*_SUB_IDESHOWTEXT_LONG_Y); fornext_entrylabel5486: *_SUB_IDESHOWTEXT_LONG_Y=fornext_value5486; if (fornext_step_negative5486){ if (fornext_value5486fornext_finalvalue5486) break; } fornext_error5486:; if(qbevent){evnt(25753,12899,"ide_methods.bas");if(r)goto S_49414;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12900,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 179 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12901,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=159; if (next_return_point>=return_points) more_return_points(); goto LABEL_SHOWLINENUMBER; RETURN_159:; if(!qbevent)break;evnt(25753,12903,"ide_methods.bas");}while(r); S_49418:; if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY!=*_SUB_IDESHOWTEXT_LONG_L)))||new_error){ if(qbevent){evnt(25753,12905,"ide_methods.bas");if(r)goto S_49418;} do{ qbg_sub_color( 13 , 4 ,NULL,3); if(!qbevent)break;evnt(25753,12905,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12905,"ide_methods.bas");}while(r); } S_49423:; if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,12907,"ide_methods.bas");if(r)goto S_49423;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12908,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space(*__LONG_IDESX+(*__LONG_IDEWX- 3 )-*__LONG_MAXLINENUMBERLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12909,"ide_methods.bas");}while(r); do{ sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0); if(!qbevent)break;evnt(25753,12910,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,qbs_right(_SUB_IDESHOWTEXT_STRING_A2,(*__LONG_IDEWX- 2 )-*__LONG_MAXLINENUMBERLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12911,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space((*__LONG_IDEWX- 2 )-*__LONG_MAXLINENUMBERLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12913,"ide_methods.bas");}while(r); } do{ sub__printstring( 2 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_A2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12915,"ide_methods.bas");}while(r); S_49432:; if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,12917,"ide_methods.bas");if(r)goto S_49432;} S_49433:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX<=_SUB_IDESHOWTEXT_STRING_A->len))&(-(*__LONG_IDECX>= 1 ))))||new_error){ if(qbevent){evnt(25753,12918,"ide_methods.bas");if(r)goto S_49433;} do{ *_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12919,"ide_methods.bas");}while(r); S_49435:; if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||new_error){ if(qbevent){evnt(25753,12920,"ide_methods.bas");if(r)goto S_49435;} S_49436:; 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(25753,12921,"ide_methods.bas");if(r)goto S_49436;} do{ *_SUB_IDESHOWTEXT_LONG_CC= -1 ; if(!qbevent)break;evnt(25753,12921,"ide_methods.bas");}while(r); } } } } S_49442:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,12927,"ide_methods.bas");if(r)goto S_49442;} S_49443:; if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||new_error){ if(qbevent){evnt(25753,12928,"ide_methods.bas");if(r)goto S_49443;} S_49444:; if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(25753,12929,"ide_methods.bas");if(r)goto S_49444;} do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,12930,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX; if(!qbevent)break;evnt(25753,12931,"ide_methods.bas");}while(r); S_49447:; fornext_value5489= 2 +*__LONG_MAXLINENUMBERLENGTH; fornext_finalvalue5489=(*__LONG_IDEWX- 1 ); fornext_step5489= 1 ; if (fornext_step5489<0) fornext_step_negative5489=1; else fornext_step_negative5489=0; if (new_error) goto fornext_error5489; goto fornext_entrylabel5489; while(1){ fornext_value5489=fornext_step5489+(*_SUB_IDESHOWTEXT_LONG_X); fornext_entrylabel5489: *_SUB_IDESHOWTEXT_LONG_X=fornext_value5489; if (fornext_step_negative5489){ if (fornext_value5489fornext_finalvalue5489) break; } fornext_error5489:; if(qbevent){evnt(25753,12932,"ide_methods.bas");if(r)goto S_49447;} S_49448:; if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||new_error){ if(qbevent){evnt(25753,12933,"ide_methods.bas");if(r)goto S_49448;} do{ *_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0); if(!qbevent)break;evnt(25753,12934,"ide_methods.bas");}while(r); do{ sub__printstring(*_SUB_IDESHOWTEXT_LONG_X,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr(*_SUB_IDESHOWTEXT_LONG_A),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12934,"ide_methods.bas");}while(r); } do{ *_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,12936,"ide_methods.bas");}while(r); fornext_continue_5488:; } fornext_exit_5488:; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12938,"ide_methods.bas");}while(r); }else{ S_49456:; if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||new_error){ if(qbevent){evnt(25753,12940,"ide_methods.bas");if(r)goto S_49456;} do{ goto LABEL_NOFINALSELECT0; if(!qbevent)break;evnt(25753,12940,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 1 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,12941,"ide_methods.bas");}while(r); do{ sub__printstring( 2 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_A2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12941,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12942,"ide_methods.bas");}while(r); LABEL_NOFINALSELECT0:; if(qbevent){evnt(25753,12943,"ide_methods.bas");r=0;} } } } do{ *_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ; if(!qbevent)break;evnt(25753,12948,"ide_methods.bas");}while(r); fornext_continue_5485:; } fornext_exit_5485:; } do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,12952,"ide_methods.bas");}while(r); S_49469:; fornext_value5491= 1 ; fornext_finalvalue5491=*__LONG_IDEBMKN; fornext_step5491= 1 ; if (fornext_step5491<0) fornext_step_negative5491=1; else fornext_step_negative5491=0; if (new_error) goto fornext_error5491; goto fornext_entrylabel5491; while(1){ fornext_value5491=fornext_step5491+(*_SUB_IDESHOWTEXT_LONG_B); fornext_entrylabel5491: *_SUB_IDESHOWTEXT_LONG_B=fornext_value5491; if (fornext_step_negative5491){ if (fornext_value5491fornext_finalvalue5491) break; } fornext_error5491:; if(qbevent){evnt(25753,12953,"ide_methods.bas");if(r)goto S_49469;} 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(25753,12954,"ide_methods.bas");}while(r); S_49471:; if (((-(*_SUB_IDESHOWTEXT_LONG_Y>=*__LONG_IDESY))&(-(*_SUB_IDESHOWTEXT_LONG_Y<=(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||new_error){ if(qbevent){evnt(25753,12955,"ide_methods.bas");if(r)goto S_49471;} do{ sub__printstring( 1 , 3 +*_SUB_IDESHOWTEXT_LONG_Y-*__LONG_IDESY,func_chr( 197 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12956,"ide_methods.bas");}while(r); } fornext_continue_5490:; } fornext_exit_5490:; do{ *_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass5492= 3 ),&(pass5493=(*__LONG_IDEWY- 8 )),__LONG_IDECY,__LONG_IDEN); if(!qbevent)break;evnt(25753,12960,"ide_methods.bas");}while(r); do{ *_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEHBAR(&(pass5494= 2 ),&(pass5495=(*__LONG_IDEWY- 5 )),&(pass5496=(*__LONG_IDEWX- 2 )),__LONG_IDESX,&(pass5497= 608 )); if(!qbevent)break;evnt(25753,12961,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,12964,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_A,func_space( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12965,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12966,"ide_methods.bas");}while(r); do{ sub_rset(_SUB_IDESHOWTEXT_STRING_A,qbs_ltrim(qbs_str((int32)(*__LONG_IDECY)))); if(!qbevent)break;evnt(25753,12967,"ide_methods.bas");}while(r); S_49481:; if ((-(*__LONG_IDECX< 100000 ))||new_error){ if(qbevent){evnt(25753,12968,"ide_methods.bas");if(r)goto S_49481;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_B,func_space( 10 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12969,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESHOWTEXT_STRING_C,qbs_ltrim(qbs_str((int32)(*__LONG_IDECX)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12970,"ide_methods.bas");}while(r); S_49484:; if ((-(*_SUB_IDESHOWTEXT_LONG_CC!= -1 ))||new_error){ if(qbevent){evnt(25753,12971,"ide_methods.bas");if(r)goto S_49484;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_C,qbs_add(qbs_add(qbs_add(_SUB_IDESHOWTEXT_STRING_C,qbs_new_txt_len("(",1)),FUNC_STR2(_SUB_IDESHOWTEXT_LONG_CC)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12971,"ide_methods.bas");}while(r); } do{ sub_lset(_SUB_IDESHOWTEXT_STRING_B,_SUB_IDESHOWTEXT_STRING_C); if(!qbevent)break;evnt(25753,12972,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_LINENUMBERSTATUS,qbs_add(qbs_add(_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len(":",1)),_SUB_IDESHOWTEXT_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12974,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 20 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_LINENUMBERSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12976,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,12978,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*__LONG_IDECY-*__LONG_IDESY+ 3 ,*__LONG_MAXLINENUMBERLENGTH+*__LONG_IDECX-*__LONG_IDESX+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,12978,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,12978,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,12980,"ide_methods.bas");}while(r); LABEL_SHOWLINENUMBER:; if(qbevent){evnt(25753,12981,"ide_methods.bas");r=0;} S_49495:; while((-(*_SUB_IDESHOWTEXT_LONG_L>func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)))||new_error){ if(qbevent){evnt(25753,12982,"ide_methods.bas");if(r)goto S_49495;} do{ if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){ preserved_elements=__ARRAY_BYTE_IDEBREAKPOINTS[5]; } else preserved_elements=0; __ARRAY_BYTE_IDEBREAKPOINTS[4]= 0 ; __ARRAY_BYTE_IDEBREAKPOINTS[5]=(func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)+ 100 )-__ARRAY_BYTE_IDEBREAKPOINTS[4]+1; __ARRAY_BYTE_IDEBREAKPOINTS[6]=1; if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0])); tmp_long=__ARRAY_BYTE_IDEBREAKPOINTS[5]; __ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elementsfunc_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1)))||new_error){ if(qbevent){evnt(25753,12986,"ide_methods.bas");if(r)goto S_49498;} do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_BYTE_IDESKIPLINES[2]&1){ preserved_elements=__ARRAY_BYTE_IDESKIPLINES[5]; } else preserved_elements=0; __ARRAY_BYTE_IDESKIPLINES[4]= 0 ; __ARRAY_BYTE_IDESKIPLINES[5]=(func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1)+ 100 )-__ARRAY_BYTE_IDESKIPLINES[4]+1; __ARRAY_BYTE_IDESKIPLINES[6]=1; if (__ARRAY_BYTE_IDESKIPLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_BYTE_IDESKIPLINES[0]),preserved_elements*1); cmem_dynamic_free((uint8*)(__ARRAY_BYTE_IDESKIPLINES[0])); tmp_long=__ARRAY_BYTE_IDESKIPLINES[5]; __ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*1); memcpy((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),redim_preserve_cmem_buffer,preserved_elements*1); if (preserved_elements 0 ))&(-(*__LONG_SEARCHSTRINGFOUNDON==*_SUB_IDESHOWTEXT_LONG_L)))|((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))&(-(*__LONG_VWATCHON== 1 ))))||new_error){ if(qbevent){evnt(25753,12992,"ide_methods.bas");if(r)goto S_49505;} do{ qbg_sub_color( 13 , 5 ,NULL,3); if(!qbevent)break;evnt(25753,12993,"ide_methods.bas");}while(r); S_49507:; if (((-(*__LONG_SEARCHSTRINGFOUNDON> 0 ))&(-(*__LONG_SEARCHSTRINGFOUNDON==*_SUB_IDESHOWTEXT_LONG_L)))||new_error){ if(qbevent){evnt(25753,12994,"ide_methods.bas");if(r)goto S_49507;} do{ *__LONG_SEARCHSTRINGFOUNDON= 0 ; if(!qbevent)break;evnt(25753,12994,"ide_methods.bas");}while(r); } } S_49511:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]!= 0 )))||new_error){ if(qbevent){evnt(25753,12996,"ide_methods.bas");if(r)goto S_49511;} do{ qbg_sub_color(NULL, 4 ,NULL,2); if(!qbevent)break;evnt(25753,12996,"ide_methods.bas");}while(r); } S_49514:; if (((-(*__LONG_VWATCHON== 1 ))&(-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )))||new_error){ if(qbevent){evnt(25753,12997,"ide_methods.bas");if(r)goto S_49514;} do{ qbg_sub_color( 14 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,12997,"ide_methods.bas");}while(r); } do{ sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_space(*__LONG_MAXLINENUMBERLENGTH),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,12998,"ide_methods.bas");}while(r); S_49518:; if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,12999,"ide_methods.bas");if(r)goto S_49518;} do{ qbs_set(_SUB_IDESHOWTEXT_STRING_L2,qbs_str((int32)(*_SUB_IDESHOWTEXT_LONG_L))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13000,"ide_methods.bas");}while(r); S_49520:; if ((qbs_cleanup(qbs_tmp_base,-(( 2 +*__LONG_MAXLINENUMBERLENGTH-(_SUB_IDESHOWTEXT_STRING_L2->len+ 1 ))>=( 2 ))))||new_error){ if(qbevent){evnt(25753,13001,"ide_methods.bas");if(r)goto S_49520;} do{ sub__printstring( 2 +*__LONG_MAXLINENUMBERLENGTH-(_SUB_IDESHOWTEXT_STRING_L2->len+ 1 ),*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_L2,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13002,"ide_methods.bas");}while(r); S_49522:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(25753,13003,"ide_methods.bas");if(r)goto S_49522;} S_49523:; if ((-(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]!= 0 ))||new_error){ if(qbevent){evnt(25753,13004,"ide_methods.bas");if(r)goto S_49523;} do{ sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 7 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13005,"ide_methods.bas");}while(r); S_49525:; }else{ if (-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )){ if(qbevent){evnt(25753,13006,"ide_methods.bas");if(r)goto S_49525;} do{ sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,qbs_new_txt_len("!",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13007,"ide_methods.bas");}while(r); } } } } } S_49531:; if ((*__BYTE_SHOWLINENUMBERSSEPARATOR)||new_error){ if(qbevent){evnt(25753,13012,"ide_methods.bas");if(r)goto S_49531;} S_49532:; if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||new_error){ if(qbevent){evnt(25753,13013,"ide_methods.bas");if(r)goto S_49532;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,13014,"ide_methods.bas");}while(r); do{ sub__printstring( 1 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13015,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 1 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 179 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13017,"ide_methods.bas");}while(r); } }else{ S_49539:; if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||new_error){ if(qbevent){evnt(25753,13020,"ide_methods.bas");if(r)goto S_49539;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,13021,"ide_methods.bas");}while(r); do{ sub__printstring( 1 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13022,"ide_methods.bas");}while(r); } } do{ qbg_sub_color(NULL, 1 ,NULL,2); if(!qbevent)break;evnt(25753,13025,"ide_methods.bas");}while(r); }else{ S_49546:; if (((-(*__LONG_VWATCHON== 1 ))&(((-(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]!= 0 ))|(-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )))))||new_error){ if(qbevent){evnt(25753,13027,"ide_methods.bas");if(r)goto S_49546;} do{ qbg_sub_color( 7 , 4 ,NULL,3); if(!qbevent)break;evnt(25753,13028,"ide_methods.bas");}while(r); S_49548:; if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||new_error){ if(qbevent){evnt(25753,13029,"ide_methods.bas");if(r)goto S_49548;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,13030,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13031,"ide_methods.bas");}while(r); S_49551:; }else{ if (-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )){ if(qbevent){evnt(25753,13032,"ide_methods.bas");if(r)goto S_49551;} do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,13033,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,qbs_new_txt_len("!",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13034,"ide_methods.bas");}while(r); }else{ do{ sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 7 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13036,"ide_methods.bas");}while(r); } } S_49557:; }else{ if ((-(*__LONG_VWATCHON== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))){ if(qbevent){evnt(25753,13038,"ide_methods.bas");if(r)goto S_49557;} do{ qbg_sub_color( 10 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,13039,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13040,"ide_methods.bas");}while(r); } } } do{ #include "ret198.txt" if(!qbevent)break;evnt(25753,13043,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free198.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 "data199.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,13050,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,13051,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13052,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13053,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13054,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDESUBS_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDESUBS_ARRAY_UDT_O[0]),0,_FUNC_IDESUBS_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDESUBS_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDESUBS_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDESUBS_ARRAY_UDT_O[0]) error(257); } _FUNC_IDESUBS_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,13055,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13056,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13057,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_A2,qbs_ucase(FUNC_GETWORDATCURSOR())); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13061,"ide_methods.bas");}while(r); S_49572:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_A2->len> 1 )))||new_error){ if(qbevent){evnt(25753,13062,"ide_methods.bas");if(r)goto S_49572;} S_49573:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_FUNC_IDESUBS_STRING_A2, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,13063,"ide_methods.bas");if(r)goto S_49573;} do{ qbs_set(_FUNC_IDESUBS_STRING_A2,qbs_left(_FUNC_IDESUBS_STRING_A2,_FUNC_IDESUBS_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13064,"ide_methods.bas");}while(r); S_49575:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_A2->len== 0 )))||new_error){ if(qbevent){evnt(25753,13065,"ide_methods.bas");if(r)goto S_49575;} do{ goto dl_exit_5503; if(!qbevent)break;evnt(25753,13065,"ide_methods.bas");}while(r); } dl_continue_5503:; } dl_exit_5503:; } do{ qbs_set(_FUNC_IDESUBS_STRING_L,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13071,"ide_methods.bas");}while(r); S_49581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDESUBS_STRING_L,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,13072,"ide_methods.bas");if(r)goto S_49581;} 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(25753,13072,"ide_methods.bas");}while(r); } S_49584:; if ((-(*__LONG_IDEWX< 100 ))||new_error){ if(qbevent){evnt(25753,13074,"ide_methods.bas");if(r)goto S_49584;} do{ *_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT= 20 ; if(!qbevent)break;evnt(25753,13075,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT= 42 ; if(!qbevent)break;evnt(25753,13077,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_MAXMODULENAMELEN=_FUNC_IDESUBS_STRING_L->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13080,"ide_methods.bas");}while(r); S_49590:; if ((-(*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN>(*_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT+ 2 )))||new_error){ if(qbevent){evnt(25753,13081,"ide_methods.bas");if(r)goto S_49590;} do{ qbs_set(_FUNC_IDESUBS_STRING_L,qbs_add(qbs_left(_FUNC_IDESUBS_STRING_L,*_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT- 1 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13082,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_MAXMODULENAMELEN=*_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT; if(!qbevent)break;evnt(25753,13083,"ide_methods.bas");}while(r); S_49593:; }else{ if (-(*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN< 10 )){ if(qbevent){evnt(25753,13084,"ide_methods.bas");if(r)goto S_49593;} do{ *_FUNC_IDESUBS_LONG_MAXMODULENAMELEN= 10 ; if(!qbevent)break;evnt(25753,13085,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDESUBS_STRING_LY,l2string( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13088,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LYSORTED,_FUNC_IDESUBS_STRING_LY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13089,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_CURRENTLYVIEWINGWHICHSUBFUNC= 1 ; if(!qbevent)break;evnt(25753,13090,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_PREFERCURRENTCURSORSUBFUNC= 0 ; if(!qbevent)break;evnt(25753,13091,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_INSIDEDECLARE= 0 ; if(!qbevent)break;evnt(25753,13092,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_FOUNDEXTERNALSUBFUNC= 0 ; if(!qbevent)break;evnt(25753,13093,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_MAXLINECOUNT= 0 ; if(!qbevent)break;evnt(25753,13094,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&1){ if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0])); }else{ free((void*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0])); } } _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4]= 1 ; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]=( 100 )-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4]+1; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[6]=1; if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&4){ _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]*998); memset((void*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]),0,_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]*998); }else{ _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]=(ptrszint)calloc(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]*998,1); if (!_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]) error(257); } _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]|=1; } if(!qbevent)break;evnt(25753,13096,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&1){ if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0])); }else{ free((void*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0])); } } _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4]= 1 ; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]=( 100 )-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4]+1; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[6]=1; if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&4){ _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]*998); memset((void*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]),0,_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]*998); }else{ _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]=(ptrszint)calloc(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]*998,1); if (!_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]) error(257); } _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]|=1; } if(!qbevent)break;evnt(25753,13097,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&1){ if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0])); }else{ free((void*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0])); } } _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4]= 0 ; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]=( 100 )-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4]+1; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[6]=1; if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&4){ _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]*4); memset((void*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]),0,_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]*4); }else{ _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]=(ptrszint)calloc(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]*4,1); if (!_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]) error(257); } _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]|=1; } if(!qbevent)break;evnt(25753,13098,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[2]&1){ tmp_long=_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]))[tmp_long]); free((void*)(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0])); } _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]=( 100 )-_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4]+1; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[6]=1; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]=(ptrszint)malloc(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]*8); if (!_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]) error(257); _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[2]|=1; tmp_long=_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]; if (_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,13099,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_LONG_SUBLINES)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&1){ if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0])); }else{ free((void*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0])); } } _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4]= 0 ; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]=( 100 )-_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4]+1; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[6]=1; if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&4){ _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]*4); memset((void*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]),0,_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]*4); }else{ _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]=(ptrszint)calloc(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]*4,1); if (!_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]) error(257); } _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]|=1; } if(!qbevent)break;evnt(25753,13100,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_STRING_ARGS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_STRING_ARGS)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_STRING_ARGS[2]&1){ tmp_long=_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_ARGS[0]))[tmp_long]); free((void*)(_FUNC_IDESUBS_ARRAY_STRING_ARGS[0])); } _FUNC_IDESUBS_ARRAY_STRING_ARGS[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_ARGS[5]=( 100 )-_FUNC_IDESUBS_ARRAY_STRING_ARGS[4]+1; _FUNC_IDESUBS_ARRAY_STRING_ARGS[6]=1; _FUNC_IDESUBS_ARRAY_STRING_ARGS[0]=(ptrszint)malloc(_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]*8); if (!_FUNC_IDESUBS_ARRAY_STRING_ARGS[0]) error(257); _FUNC_IDESUBS_ARRAY_STRING_ARGS[2]|=1; tmp_long=_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]; if (_FUNC_IDESUBS_ARRAY_STRING_ARGS[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_ARGS[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_ARGS[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,13101,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESUBS_ARRAY_STRING_SF[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_STRING_SF)[8])->id=(++mem_lock_id); if (_FUNC_IDESUBS_ARRAY_STRING_SF[2]&1){ tmp_long=_FUNC_IDESUBS_ARRAY_STRING_SF[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SF[0]))[tmp_long]); free((void*)(_FUNC_IDESUBS_ARRAY_STRING_SF[0])); } _FUNC_IDESUBS_ARRAY_STRING_SF[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_SF[5]=( 100 )-_FUNC_IDESUBS_ARRAY_STRING_SF[4]+1; _FUNC_IDESUBS_ARRAY_STRING_SF[6]=1; _FUNC_IDESUBS_ARRAY_STRING_SF[0]=(ptrszint)malloc(_FUNC_IDESUBS_ARRAY_STRING_SF[5]*8); if (!_FUNC_IDESUBS_ARRAY_STRING_SF[0]) error(257); _FUNC_IDESUBS_ARRAY_STRING_SF[2]|=1; tmp_long=_FUNC_IDESUBS_ARRAY_STRING_SF[5]; if (_FUNC_IDESUBS_ARRAY_STRING_SF[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SF[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SF[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,13102,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_TOTALSUBS= 0 ; if(!qbevent)break;evnt(25753,13104,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_MODULESIZE= 0 ; if(!qbevent)break;evnt(25753,13105,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG=*__BYTE_IDESORTSUBS; if(!qbevent)break;evnt(25753,13106,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_SUBCLOSED= 0 ; if(!qbevent)break;evnt(25753,13107,"ide_methods.bas");}while(r); S_49614:; fornext_value5508= 1 ; fornext_finalvalue5508=*__LONG_IDEN; fornext_step5508= 1 ; if (fornext_step5508<0) fornext_step_negative5508=1; else fornext_step_negative5508=0; if (new_error) goto fornext_error5508; goto fornext_entrylabel5508; while(1){ fornext_value5508=fornext_step5508+(*_FUNC_IDESUBS_LONG_Y); fornext_entrylabel5508: *_FUNC_IDESUBS_LONG_Y=fornext_value5508; if (fornext_step_negative5508){ if (fornext_value5508fornext_finalvalue5508) break; } fornext_error5508:; if(qbevent){evnt(25753,13109,"ide_methods.bas");if(r)goto S_49614;} do{ qbs_set(_FUNC_IDESUBS_STRING_A,FUNC_IDEGETLINE(_FUNC_IDESUBS_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13110,"ide_methods.bas");}while(r); S_49616:; if ((-(*_FUNC_IDESUBS_LONG_SUBCLOSED== 0 ))||new_error){ if(qbevent){evnt(25753,13111,"ide_methods.bas");if(r)goto S_49616;} do{ *_FUNC_IDESUBS_LONG_MODULESIZE=*_FUNC_IDESUBS_LONG_MODULESIZE+ 1 ; if(!qbevent)break;evnt(25753,13111,"ide_methods.bas");}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(25753,13112,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_SF= 0 ; if(!qbevent)break;evnt(25753,13113,"ide_methods.bas");}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(25753,13114,"ide_methods.bas");}while(r); S_49622:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_IDESUBS_STRING_NCA, 8 ),qbs_new_txt_len("DECLARE ",8)))&(-(func_instr(NULL,_FUNC_IDESUBS_STRING_NCA,qbs_new_txt_len(" LIBRARY",8),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,13115,"ide_methods.bas");if(r)goto S_49622;} do{ *_FUNC_IDESUBS_LONG_INSIDEDECLARE= -1 ; if(!qbevent)break;evnt(25753,13115,"ide_methods.bas");}while(r); } S_49625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDESUBS_STRING_NCA, 11 ),qbs_new_txt_len("END DECLARE",11))))||new_error){ if(qbevent){evnt(25753,13116,"ide_methods.bas");if(r)goto S_49625;} do{ *_FUNC_IDESUBS_LONG_INSIDEDECLARE= 0 ; if(!qbevent)break;evnt(25753,13116,"ide_methods.bas");}while(r); } S_49628:; 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(25753,13117,"ide_methods.bas");if(r)goto S_49628;} do{ *_FUNC_IDESUBS_LONG_SF= 1 ; if(!qbevent)break;evnt(25753,13117,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_SF,qbs_new_txt_len("SUB ",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13117,"ide_methods.bas");}while(r); } S_49632:; 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(25753,13118,"ide_methods.bas");if(r)goto S_49632;} do{ *_FUNC_IDESUBS_LONG_SF= 2 ; if(!qbevent)break;evnt(25753,13118,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_SF,qbs_new_txt_len("FUNC ",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13118,"ide_methods.bas");}while(r); } S_49636:; if ((*_FUNC_IDESUBS_LONG_SF)||new_error){ if(qbevent){evnt(25753,13119,"ide_methods.bas");if(r)goto S_49636;} do{ *_FUNC_IDESUBS_LONG_TOTALSUBS=*_FUNC_IDESUBS_LONG_TOTALSUBS+ 1 ; if(!qbevent)break;evnt(25753,13121,"ide_methods.bas");}while(r); S_49638:; if ((~(*_FUNC_IDESUBS_LONG_INSIDEDECLARE))||new_error){ if(qbevent){evnt(25753,13122,"ide_methods.bas");if(r)goto S_49638;} do{ *_FUNC_IDESUBS_LONG_LASTOPENSUB=*_FUNC_IDESUBS_LONG_TOTALSUBS; if(!qbevent)break;evnt(25753,13122,"ide_methods.bas");}while(r); } S_49641:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDESUBS_LONG_TOTALSUBS>func_ubound(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST,1,1))))||new_error){ if(qbevent){evnt(25753,13123,"ide_methods.bas");if(r)goto S_49641;} do{ if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4]= 1 ; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4]+1; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[6]=1; if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]),preserved_elements*998); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0])); tmp_long=_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*998); memcpy((void*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]),redim_preserve_cmem_buffer,preserved_elements*998); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4]= 1 ; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4]+1; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[6]=1; if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]),preserved_elements*998); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0])); tmp_long=_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*998); memcpy((void*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]),redim_preserve_cmem_buffer,preserved_elements*998); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4]= 0 ; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4]+1; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[6]=1; if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0])); tmp_long=_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4]+1; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4]= 0 ; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4]+1; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[6]=1; if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0])); tmp_long=_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING_ARGS[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING_ARGS[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_ARGS[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_STRING_ARGS[4]+1; _FUNC_IDESUBS_ARRAY_STRING_ARGS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING_SF[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING_SF[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING_SF[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_SF[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS+ 99 )-_FUNC_IDESUBS_ARRAY_STRING_SF[4]+1; _FUNC_IDESUBS_ARRAY_STRING_SF[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDESUBS_ARRAY_STRING_SF[5]; if (tmp_long2len- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13134,"ide_methods.bas");}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(25753,13138,"ide_methods.bas");}while(r); S_49654:; if (((-(*__LONG_IDECY>=*_FUNC_IDESUBS_LONG_Y))&(~(*_FUNC_IDESUBS_LONG_INSIDEDECLARE)))||new_error){ if(qbevent){evnt(25753,13142,"ide_methods.bas");if(r)goto S_49654;} do{ *_FUNC_IDESUBS_LONG_CURRENTLYVIEWINGWHICHSUBFUNC=qbr((_FUNC_IDESUBS_STRING_LY->len/ ((long double)( 4 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13143,"ide_methods.bas");}while(r); } S_49657:; if ((-(*_FUNC_IDESUBS_LONG_SF== 1 ))||new_error){ if(qbevent){evnt(25753,13147,"ide_methods.bas");if(r)goto S_49657;} 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(25753,13148,"ide_methods.bas");}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(25753,13150,"ide_methods.bas");}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(25753,13152,"ide_methods.bas");}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(25753,13153,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13154,"ide_methods.bas");}while(r); S_49665:; if ((*_FUNC_IDESUBS_LONG_X)||new_error){ if(qbevent){evnt(25753,13155,"ide_methods.bas");if(r)goto S_49665;} do{ SUB_FINDQUOTECOMMENT(_FUNC_IDESUBS_STRING_A,_FUNC_IDESUBS_LONG_X,_FUNC_IDESUBS_BYTE_COMMENT,_FUNC_IDESUBS_BYTE_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13155,"ide_methods.bas");}while(r); } S_49668:; if (((-(*_FUNC_IDESUBS_LONG_X> 0 ))&(-(*_FUNC_IDESUBS_BYTE_COMMENT== 0 ))&(-(*_FUNC_IDESUBS_BYTE_QUOTE== 0 )))||new_error){ if(qbevent){evnt(25753,13156,"ide_methods.bas");if(r)goto S_49668;} 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(25753,13157,"ide_methods.bas");}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(25753,13158,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_X= 1 ; if(!qbevent)break;evnt(25753,13159,"ide_methods.bas");}while(r); S_49672:; fornext_value5515= 2 ; fornext_finalvalue5515=_FUNC_IDESUBS_STRING_ARGS->len; fornext_step5515= 1 ; if (fornext_step5515<0) fornext_step_negative5515=1; else fornext_step_negative5515=0; if (new_error) goto fornext_error5515; goto fornext_entrylabel5515; while(1){ fornext_value5515=fornext_step5515+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel5515: *_FUNC_IDESUBS_LONG_I=fornext_value5515; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5515){ if (fornext_value5515fornext_finalvalue5515) break; } fornext_error5515:; if(qbevent){evnt(25753,13160,"ide_methods.bas");if(r)goto S_49672;} S_49673:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDESUBS_STRING_ARGS,*_FUNC_IDESUBS_LONG_I)== 40 )))||new_error){ if(qbevent){evnt(25753,13161,"ide_methods.bas");if(r)goto S_49673;} do{ *_FUNC_IDESUBS_LONG_X=*_FUNC_IDESUBS_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,13161,"ide_methods.bas");}while(r); } S_49676:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDESUBS_STRING_ARGS,*_FUNC_IDESUBS_LONG_I)== 41 )))||new_error){ if(qbevent){evnt(25753,13162,"ide_methods.bas");if(r)goto S_49676;} do{ *_FUNC_IDESUBS_LONG_X=*_FUNC_IDESUBS_LONG_X- 1 ; if(!qbevent)break;evnt(25753,13162,"ide_methods.bas");}while(r); } S_49679:; if ((-(*_FUNC_IDESUBS_LONG_X== 0 ))||new_error){ if(qbevent){evnt(25753,13163,"ide_methods.bas");if(r)goto S_49679;} do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_left(_FUNC_IDESUBS_STRING_ARGS,*_FUNC_IDESUBS_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13163,"ide_methods.bas");}while(r); do{ goto fornext_exit_5514; if(!qbevent)break;evnt(25753,13163,"ide_methods.bas");}while(r); } fornext_continue_5514:; } fornext_exit_5514:; }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_N,_FUNC_IDESUBS_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13166,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_new_txt_len("()",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13167,"ide_methods.bas");}while(r); } do{ SUB_CLEANSUBNAME(_FUNC_IDESUBS_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13169,"ide_methods.bas");}while(r); S_49689:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_N->len>*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN)))||new_error){ if(qbevent){evnt(25753,13170,"ide_methods.bas");if(r)goto S_49689;} do{ *_FUNC_IDESUBS_LONG_MAXMODULENAMELEN=_FUNC_IDESUBS_STRING_N->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13170,"ide_methods.bas");}while(r); } S_49692:; if ((-(*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN>*_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT))||new_error){ if(qbevent){evnt(25753,13171,"ide_methods.bas");if(r)goto S_49692;} do{ *_FUNC_IDESUBS_LONG_MAXMODULENAMELEN=*_FUNC_IDESUBS_LONG_MODULENAMELENLIMIT; if(!qbevent)break;evnt(25753,13171,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_N2,_FUNC_IDESUBS_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13175,"ide_methods.bas");}while(r); S_49696:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_N2->len> 1 )))||new_error){ if(qbevent){evnt(25753,13176,"ide_methods.bas");if(r)goto S_49696;} S_49697:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_FUNC_IDESUBS_STRING_N2, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,13177,"ide_methods.bas");if(r)goto S_49697;} do{ qbs_set(_FUNC_IDESUBS_STRING_N2,qbs_left(_FUNC_IDESUBS_STRING_N,_FUNC_IDESUBS_STRING_N2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13178,"ide_methods.bas");}while(r); dl_continue_5520:; } dl_exit_5520:; } S_49701:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDESUBS_STRING_A2,qbs_ucase(_FUNC_IDESUBS_STRING_N2))))||new_error){ if(qbevent){evnt(25753,13181,"ide_methods.bas");if(r)goto S_49701;} do{ *_FUNC_IDESUBS_LONG_PREFERCURRENTCURSORSUBFUNC=qbr((_FUNC_IDESUBS_STRING_LY->len/ ((long double)( 4 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13181,"ide_methods.bas");}while(r); } S_49704:; if ((-(*_FUNC_IDESUBS_LONG_INSIDEDECLARE== -1 ))||new_error){ if(qbevent){evnt(25753,13183,"ide_methods.bas");if(r)goto S_49704;} do{ qbs_set(_FUNC_IDESUBS_STRING_N,qbs_add(qbs_new_txt_len("*",1),_FUNC_IDESUBS_STRING_N)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13184,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_FOUNDEXTERNALSUBFUNC= -1 ; if(!qbevent)break;evnt(25753,13185,"ide_methods.bas");}while(r); }else{ S_49708:; if ((-(*_FUNC_IDESUBS_LONG_SUBCLOSED== 0 ))||new_error){ if(qbevent){evnt(25753,13187,"ide_methods.bas");if(r)goto S_49708;} do{ *_FUNC_IDESUBS_LONG_MODULESIZE= 0 ; if(!qbevent)break;evnt(25753,13187,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=160; if (next_return_point>=return_points) more_return_points(); goto LABEL_ADDLINECOUNT; RETURN_160:; if(!qbevent)break;evnt(25753,13187,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_SUBCLOSED= 0 ; if(!qbevent)break;evnt(25753,13188,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_MODULESIZE= 0 ; if(!qbevent)break;evnt(25753,13189,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4],_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]))[tmp_long])),_FUNC_IDESUBS_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13193,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4],_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]); if (!new_error) ((int32*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]))[tmp_long]=*_FUNC_IDESUBS_LONG_Y; if(!qbevent)break;evnt(25753,13194,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING_ARGS[4],_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_ARGS[0]))[tmp_long])),_FUNC_IDESUBS_STRING_ARGS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13195,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING_SF[4],_FUNC_IDESUBS_ARRAY_STRING_SF[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SF[0]))[tmp_long])),_FUNC_IDESUBS_STRING_SF); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13196,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDESUBS_LONG_I=func_instr(NULL,_FUNC_IDESUBS_STRING_NCA,qbs_new_txt_len(" ",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13199,"ide_methods.bas");}while(r); S_49721:; while((-(*_FUNC_IDESUBS_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,13200,"ide_methods.bas");if(r)goto S_49721;} do{ qbs_set(_FUNC_IDESUBS_STRING_NCA,qbs_add(qbs_left(_FUNC_IDESUBS_STRING_NCA,*_FUNC_IDESUBS_LONG_I),func_mid(_FUNC_IDESUBS_STRING_NCA,*_FUNC_IDESUBS_LONG_I+ 2 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13201,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_I=func_instr(*_FUNC_IDESUBS_LONG_I,_FUNC_IDESUBS_STRING_NCA,qbs_new_txt_len(" ",2),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13202,"ide_methods.bas");}while(r); dl_continue_5523:; } dl_exit_5523:; do{ *_FUNC_IDESUBS_LONG_CURSOR= 0 ; if(!qbevent)break;evnt(25753,13205,"ide_methods.bas");}while(r); LABEL_LOOKFORENDSUB:; if(qbevent){evnt(25753,13206,"ide_methods.bas");r=0;} do{ *_FUNC_IDESUBS_LONG_SF=func_instr(*_FUNC_IDESUBS_LONG_CURSOR+ 1 ,_FUNC_IDESUBS_STRING_NCA,qbs_new_txt_len("END SUB",7),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13207,"ide_methods.bas");}while(r); S_49727:; if ((-(*_FUNC_IDESUBS_LONG_SF== 0 ))||new_error){ if(qbevent){evnt(25753,13208,"ide_methods.bas");if(r)goto S_49727;} do{ *_FUNC_IDESUBS_LONG_SF=func_instr(*_FUNC_IDESUBS_LONG_CURSOR+ 1 ,_FUNC_IDESUBS_STRING_NCA,qbs_new_txt_len("END FUNCTION",12),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13208,"ide_methods.bas");}while(r); } S_49730:; if ((*_FUNC_IDESUBS_LONG_SF)||new_error){ if(qbevent){evnt(25753,13210,"ide_methods.bas");if(r)goto S_49730;} do{ SUB_FINDQUOTECOMMENT(_FUNC_IDESUBS_STRING_NCA,_FUNC_IDESUBS_LONG_SF,_FUNC_IDESUBS_BYTE_COMMENT,_FUNC_IDESUBS_BYTE_QUOTE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13211,"ide_methods.bas");}while(r); S_49732:; if ((*_FUNC_IDESUBS_BYTE_COMMENT|*_FUNC_IDESUBS_BYTE_QUOTE)||new_error){ if(qbevent){evnt(25753,13212,"ide_methods.bas");if(r)goto S_49732;} do{ *_FUNC_IDESUBS_LONG_CURSOR=*_FUNC_IDESUBS_LONG_SF; if(!qbevent)break;evnt(25753,13212,"ide_methods.bas");}while(r); do{ goto LABEL_LOOKFORENDSUB; if(!qbevent)break;evnt(25753,13212,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=161; if (next_return_point>=return_points) more_return_points(); goto LABEL_ADDLINECOUNT; RETURN_161:; if(!qbevent)break;evnt(25753,13213,"ide_methods.bas");}while(r); } } fornext_continue_5507:; } fornext_exit_5507:; S_49740:; if ((-(*_FUNC_IDESUBS_LONG_SUBCLOSED== 0 ))||new_error){ if(qbevent){evnt(25753,13218,"ide_methods.bas");if(r)goto S_49740;} do{ return_point[next_return_point++]=162; if (next_return_point>=return_points) more_return_points(); goto LABEL_ADDLINECOUNT; RETURN_162:; if(!qbevent)break;evnt(25753,13218,"ide_methods.bas");}while(r); } S_49743:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDESUBS_LONG_TOTALSUBS> 0 ))&(-(*_FUNC_IDESUBS_LONG_TOTALSUBSid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4]= 1 ; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4]+1; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[6]=1; if (_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]),preserved_elements*998); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0])); tmp_long=_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]; _FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*998); memcpy((void*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]),redim_preserve_cmem_buffer,preserved_elements*998); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4]= 1 ; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4]+1; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[6]=1; if (_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]),preserved_elements*998); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0])); tmp_long=_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]; _FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*998); memcpy((void*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]),redim_preserve_cmem_buffer,preserved_elements*998); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4]= 0 ; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4]+1; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[6]=1; if (_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0])); tmp_long=_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]; _FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4]+1; _FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4]= 0 ; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4]+1; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[6]=1; if (_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]),preserved_elements*4); cmem_dynamic_free((uint8*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0])); tmp_long=_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5]; _FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*4); memcpy((void*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]),redim_preserve_cmem_buffer,preserved_elements*4); if (preserved_elementsid=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING_ARGS[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING_ARGS[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_ARGS[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING_ARGS[4]+1; _FUNC_IDESUBS_ARRAY_STRING_ARGS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDESUBS_ARRAY_STRING_ARGS[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDESUBS_ARRAY_STRING_SF[2]&1){ preserved_elements=_FUNC_IDESUBS_ARRAY_STRING_SF[5]; } else preserved_elements=0; _FUNC_IDESUBS_ARRAY_STRING_SF[4]= 0 ; _FUNC_IDESUBS_ARRAY_STRING_SF[5]=(*_FUNC_IDESUBS_LONG_TOTALSUBS)-_FUNC_IDESUBS_ARRAY_STRING_SF[4]+1; _FUNC_IDESUBS_ARRAY_STRING_SF[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDESUBS_ARRAY_STRING_SF[5]; if (tmp_long2 0 ))||new_error){ if(qbevent){evnt(25753,13232,"ide_methods.bas");if(r)goto S_49752;} S_49753:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_ltrim(qbs_str((int32)(*_FUNC_IDESUBS_LONG_MAXLINECOUNT))))->len)<= 10 )))||new_error){ if(qbevent){evnt(25753,13233,"ide_methods.bas");if(r)goto S_49753;} do{ *_FUNC_IDESUBS_LONG_MAXLINECOUNTSPACE= 10 ; if(!qbevent)break;evnt(25753,13234,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LINESHEADER,qbs_new_txt_len("Line count",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13235,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_EXTERNAL,qbs_new_txt_len("external",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13236,"ide_methods.bas");}while(r); } S_49758:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_ltrim(qbs_str((int32)(*_FUNC_IDESUBS_LONG_MAXLINECOUNT))))->len)<= 5 )))||new_error){ if(qbevent){evnt(25753,13238,"ide_methods.bas");if(r)goto S_49758;} do{ *_FUNC_IDESUBS_LONG_MAXLINECOUNTSPACE= 5 ; if(!qbevent)break;evnt(25753,13239,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LINESHEADER,qbs_new_txt_len("Lines",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13240,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_EXTERNAL,func_chr( 196 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13241,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_L,qbs_add(_FUNC_IDESUBS_STRING_L,func_space((*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN+ 2 )-_FUNC_IDESUBS_STRING_L->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13244,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSIZED,_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13245,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTEDSIZED,_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13246,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_L,qbs_add(_FUNC_IDESUBS_STRING_L,qbs_new_txt_len(" Type Arguments",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13247,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTED,_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13248,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTED,_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13249,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSIZED,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_LSIZED,qbs_new_txt_len(" ",2)),_FUNC_IDESUBS_STRING_LINESHEADER),qbs_new_txt_len(" Type Arguments",17)),_FUNC_IDESUBS_STRING1_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13250,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTEDSIZED,qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_LSORTEDSIZED,qbs_new_txt_len(" ",2)),_FUNC_IDESUBS_STRING_LINESHEADER),qbs_new_txt_len(" Type Arguments",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13251,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_L,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13253,"ide_methods.bas");}while(r); S_49773:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDESUBS_STRING_L,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,13254,"ide_methods.bas");if(r)goto S_49773;} 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(25753,13254,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_LSIZED,_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13255,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_DIALOGWIDTH= 50 ; if(!qbevent)break;evnt(25753,13259,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_ARGSLENGTH= 2 ; if(!qbevent)break;evnt(25753,13260,"ide_methods.bas");}while(r); S_49780:; fornext_value5526= 1 ; fornext_finalvalue5526=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5526= 1 ; if (fornext_step5526<0) fornext_step_negative5526=1; else fornext_step_negative5526=0; if (new_error) goto fornext_error5526; goto fornext_entrylabel5526; while(1){ fornext_value5526=fornext_step5526+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel5526: *_FUNC_IDESUBS_LONG_X=fornext_value5526; if (fornext_step_negative5526){ if (fornext_value5526fornext_finalvalue5526) break; } fornext_error5526:; if(qbevent){evnt(25753,13261,"ide_methods.bas");if(r)goto S_49780;} do{ qbs_set(_FUNC_IDESUBS_STRING_N,((qbs*)(((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[4],_FUNC_IDESUBS_ARRAY_STRING_SUBNAMES[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13262,"ide_methods.bas");}while(r); S_49782:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_N->len>*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN)))||new_error){ if(qbevent){evnt(25753,13263,"ide_methods.bas");if(r)goto S_49782;} do{ qbs_set(_FUNC_IDESUBS_STRING_N,qbs_add(qbs_left(_FUNC_IDESUBS_STRING_N,*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN- 3 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13264,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_N,qbs_add(_FUNC_IDESUBS_STRING_N,func_space(*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN-_FUNC_IDESUBS_STRING_N->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13266,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,((qbs*)(((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_ARGS[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING_ARGS[4],_FUNC_IDESUBS_ARRAY_STRING_ARGS[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13269,"ide_methods.bas");}while(r); S_49788:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_ARGS->len>*_FUNC_IDESUBS_LONG_ARGSLENGTH)))||new_error){ if(qbevent){evnt(25753,13270,"ide_methods.bas");if(r)goto S_49788;} do{ *_FUNC_IDESUBS_LONG_ARGSLENGTH=_FUNC_IDESUBS_STRING_ARGS->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13270,"ide_methods.bas");}while(r); } S_49791:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDESUBS_STRING_ARGS->len<=(*__LONG_IDEWX- 41 ))))||new_error){ if(qbevent){evnt(25753,13271,"ide_methods.bas");if(r)goto S_49791;} 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(25753,13272,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_ARGS,qbs_add(qbs_left(_FUNC_IDESUBS_STRING_ARGS,(*__LONG_IDEWX- 44 )),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13274,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_SF,((qbs*)(((uint64*)(_FUNC_IDESUBS_ARRAY_STRING_SF[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING_SF[4],_FUNC_IDESUBS_ARRAY_STRING_SF[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13277,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_L,_FUNC_IDESUBS_STRING1_SEP),func_chr( 195 )),func_chr( 196 )),_FUNC_IDESUBS_STRING_N),qbs_new_txt_len(" ",2)),func_chr( 16 )),func_chr( 2 )),_FUNC_IDESUBS_STRING_SF),func_chr( 16 )),func_chr( 16 )),_FUNC_IDESUBS_STRING_ARGS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13280,"ide_methods.bas");}while(r); S_49798:; if ((-(((int32*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4],_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5])]== 0 ))||new_error){ if(qbevent){evnt(25753,13282,"ide_methods.bas");if(r)goto S_49798;} do{ qbs_set(_FUNC_IDESUBS_STRING_NUM,_FUNC_IDESUBS_STRING_EXTERNAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13282,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDESUBS_STRING_NUM,qbs_ltrim(qbs_str((int32)(((int32*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4],_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13282,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_LSIZED,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_IDESUBS_STRING_LSIZED,func_chr( 195 )),func_chr( 196 )),_FUNC_IDESUBS_STRING_N),qbs_new_txt_len(" ",2)),func_chr( 16 )),func_chr( 2 )),func_space(*_FUNC_IDESUBS_LONG_MAXLINECOUNTSPACE-_FUNC_IDESUBS_STRING_NUM->len)),_FUNC_IDESUBS_STRING_NUM),qbs_new_txt_len(" ",2)),_FUNC_IDESUBS_STRING_SF),func_chr( 16 )),func_chr( 16 )),_FUNC_IDESUBS_STRING_ARGS),_FUNC_IDESUBS_STRING1_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13285,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LISTITEM,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_N,qbs_new_txt_len(" ",2)),func_chr( 1 )),func_chr( 16 )),func_chr( 2 )),_FUNC_IDESUBS_STRING_SF),func_chr( 16 )),func_chr( 16 )),_FUNC_IDESUBS_STRING_ARGS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13287,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_LISTITEMLENGTH=_FUNC_IDESUBS_STRING_LISTITEM->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13288,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[tmp_long*998],998,1),qbs_ucase(_FUNC_IDESUBS_STRING_LISTITEM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13289,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]))[tmp_long*998],998,1),_FUNC_IDESUBS_STRING_LISTITEM); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13290,"ide_methods.bas");}while(r); do{ sub_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]))*998],998,1), 992 , 6 ,qbs_add(l2string(((int32*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4],_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5])]),i2string(*_FUNC_IDESUBS_LONG_LISTITEMLENGTH)),1); if(!qbevent)break;evnt(25753,13291,"ide_methods.bas");}while(r); do{ sub_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]))*998],998,1), 992 , 6 ,qbs_add(l2string(((int32*)(_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[0]))[array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[4],_FUNC_IDESUBS_ARRAY_LONG_SUBLINES[5])]),i2string(*_FUNC_IDESUBS_LONG_LISTITEMLENGTH)),1); if(!qbevent)break;evnt(25753,13292,"ide_methods.bas");}while(r); fornext_continue_5525:; } fornext_exit_5525:; do{ sub_mid(_FUNC_IDESUBS_STRING_L,func__instrrev(NULL,_FUNC_IDESUBS_STRING_L,func_chr( 195 ),0), 1 ,func_chr( 192 ),1); if(!qbevent)break;evnt(25753,13295,"ide_methods.bas");}while(r); do{ sub_mid(_FUNC_IDESUBS_STRING_LSIZED,func__instrrev(NULL,_FUNC_IDESUBS_STRING_LSIZED,func_chr( 195 ),0), 1 ,func_chr( 192 ),1); if(!qbevent)break;evnt(25753,13296,"ide_methods.bas");}while(r); S_49813:; if ((-(*_FUNC_IDESUBS_LONG_TOTALSUBS> 1 ))||new_error){ if(qbevent){evnt(25753,13298,"ide_methods.bas");if(r)goto S_49813;} do{ SUB_SORT(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13299,"ide_methods.bas");}while(r); S_49815:; fornext_value5536= 1 ; fornext_finalvalue5536=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5536= 1 ; if (fornext_step5536<0) fornext_step_negative5536=1; else fornext_step_negative5536=0; if (new_error) goto fornext_error5536; goto fornext_entrylabel5536; while(1){ fornext_value5536=fornext_step5536+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel5536: *_FUNC_IDESUBS_LONG_X=fornext_value5536; if (fornext_step_negative5536){ if (fornext_value5536fornext_finalvalue5536) break; } fornext_error5536:; if(qbevent){evnt(25753,13301,"ide_methods.bas");if(r)goto S_49815;} do{ *_FUNC_IDESUBS_LONG_LISTITEMLENGTH=string2i(func_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]))*998],998,1),998- 2 , 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13302,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LYSORTED,qbs_add(_FUNC_IDESUBS_STRING_LYSORTED,func_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]))*998],998,1),998- 6 , 4 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13303,"ide_methods.bas");}while(r); S_49818:; fornext_value5540= 1 ; fornext_finalvalue5540=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5540= 1 ; if (fornext_step5540<0) fornext_step_negative5540=1; else fornext_step_negative5540=0; if (new_error) goto fornext_error5540; goto fornext_entrylabel5540; while(1){ fornext_value5540=fornext_step5540+(*_FUNC_IDESUBS_LONG_RESTORECASEBKP); fornext_entrylabel5540: *_FUNC_IDESUBS_LONG_RESTORECASEBKP=fornext_value5540; if (fornext_step_negative5540){ if (fornext_value5540fornext_finalvalue5540) break; } fornext_error5540:; if(qbevent){evnt(25753,13304,"ide_methods.bas");if(r)goto S_49818;} S_49819:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]))*998],998,1),998- 6 , 4 ,1),func_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_RESTORECASEBKP)-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]))*998],998,1),998- 6 , 4 ,1))))||new_error){ if(qbevent){evnt(25753,13305,"ide_methods.bas");if(r)goto S_49819;} do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTED,qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_LSORTED,_FUNC_IDESUBS_STRING1_SEP),func_chr( 195 )),func_chr( 196 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13306,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_TEMP,qbs_left(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_RESTORECASEBKP)-_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_CASEBKPSUBSLIST[5]))*998],998,1),*_FUNC_IDESUBS_LONG_LISTITEMLENGTH)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13307,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTED,qbs_add(qbs_add(_FUNC_IDESUBS_STRING_LSORTED,qbs_left(_FUNC_IDESUBS_STRING_TEMP,func_instr(NULL,_FUNC_IDESUBS_STRING_TEMP,func_chr( 1 ),0)- 1 )),func_mid(_FUNC_IDESUBS_STRING_TEMP,func_instr(NULL,_FUNC_IDESUBS_STRING_TEMP,func_chr( 1 ),0)+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13309,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_NUM,qbs_ltrim(qbs_str((int32)(((int32*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]))[array_check((*_FUNC_IDESUBS_LONG_RESTORECASEBKP)-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4],_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13311,"ide_methods.bas");}while(r); S_49824:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDESUBS_STRING_TEMP, 1 ),qbs_new_txt_len("*",1))))||new_error){ if(qbevent){evnt(25753,13312,"ide_methods.bas");if(r)goto S_49824;} do{ qbs_set(_FUNC_IDESUBS_STRING_NUM,_FUNC_IDESUBS_STRING_EXTERNAL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13312,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTEDSIZED,qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_LSORTEDSIZED,_FUNC_IDESUBS_STRING1_SEP),func_chr( 195 )),func_chr( 196 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13313,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESUBS_STRING_LSORTEDSIZED,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDESUBS_STRING_LSORTEDSIZED,qbs_left(_FUNC_IDESUBS_STRING_TEMP,func_instr(NULL,_FUNC_IDESUBS_STRING_TEMP,func_chr( 1 ),0)- 1 )),func_space(*_FUNC_IDESUBS_LONG_MAXLINECOUNTSPACE-_FUNC_IDESUBS_STRING_NUM->len)),func_chr( 16 )),func_chr( 2 )),_FUNC_IDESUBS_STRING_NUM),qbs_new_txt_len(" ",2)),func_mid(_FUNC_IDESUBS_STRING_TEMP,func_instr(NULL,_FUNC_IDESUBS_STRING_TEMP,func_chr( 1 ),0)+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13316,"ide_methods.bas");}while(r); do{ goto fornext_exit_5539; if(!qbevent)break;evnt(25753,13317,"ide_methods.bas");}while(r); } fornext_continue_5539:; } fornext_exit_5539:; fornext_continue_5535:; } fornext_exit_5535:; do{ sub_mid(_FUNC_IDESUBS_STRING_LSORTED,func__instrrev(NULL,_FUNC_IDESUBS_STRING_LSORTED,func_chr( 195 ),0), 1 ,func_chr( 192 ),1); if(!qbevent)break;evnt(25753,13322,"ide_methods.bas");}while(r); do{ sub_mid(_FUNC_IDESUBS_STRING_LSORTEDSIZED,func__instrrev(NULL,_FUNC_IDESUBS_STRING_LSORTEDSIZED,func_chr( 195 ),0), 1 ,func_chr( 192 ),1); if(!qbevent)break;evnt(25753,13323,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG=*__BYTE_IDESORTSUBS; if(!qbevent)break;evnt(25753,13324,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG= 0 ; if(!qbevent)break;evnt(25753,13326,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_I= 0 ; if(!qbevent)break;evnt(25753,13330,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_DIALOGHEIGHT=*_FUNC_IDESUBS_LONG_TOTALSUBS+ 4 ; if(!qbevent)break;evnt(25753,13331,"ide_methods.bas");}while(r); S_49841:; if ((-(*_FUNC_IDESUBS_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,13332,"ide_methods.bas");if(r)goto S_49841;} do{ *_FUNC_IDESUBS_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,13333,"ide_methods.bas");}while(r); } S_49844:; if ((-((*_FUNC_IDESUBS_LONG_ARGSLENGTH+*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN+*_FUNC_IDESUBS_LONG_MAXLINECOUNTSPACE+ 20 )>*_FUNC_IDESUBS_LONG_DIALOGWIDTH))||new_error){ if(qbevent){evnt(25753,13336,"ide_methods.bas");if(r)goto S_49844;} do{ *_FUNC_IDESUBS_LONG_DIALOGWIDTH=*_FUNC_IDESUBS_LONG_ARGSLENGTH+*_FUNC_IDESUBS_LONG_MAXMODULENAMELEN+*_FUNC_IDESUBS_LONG_MAXLINECOUNTSPACE+ 20 ; if(!qbevent)break;evnt(25753,13336,"ide_methods.bas");}while(r); } S_49847:; if ((-(*_FUNC_IDESUBS_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,13337,"ide_methods.bas");if(r)goto S_49847;} do{ *_FUNC_IDESUBS_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,13337,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDESUBS_UDT_P)) + (0) ),_FUNC_IDESUBS_LONG_DIALOGWIDTH,_FUNC_IDESUBS_LONG_DIALOGHEIGHT,qbs_new_txt_len("SUBs",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13339,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_I=*_FUNC_IDESUBS_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13341,"ide_methods.bas");}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]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,13342,"ide_methods.bas");}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]))*89+24))= 1 ; if(!qbevent)break;evnt(25753,13343,"ide_methods.bas");}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]))*89+28))=*_FUNC_IDESUBS_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,13345,"ide_methods.bas");}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]))*89+32))=*_FUNC_IDESUBS_LONG_DIALOGHEIGHT- 3 ; if(!qbevent)break;evnt(25753,13345,"ide_methods.bas");}while(r); S_49856:; if ((-(*_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG== 0 ))||new_error){ if(qbevent){evnt(25753,13346,"ide_methods.bas");if(r)goto S_49856;} S_49857:; if ((*__BYTE_IDESUBSLENGTH)||new_error){ if(qbevent){evnt(25753,13347,"ide_methods.bas");if(r)goto S_49857;} 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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDESUBS_STRING_LSIZED); if(!qbevent)break;evnt(25753,13348,"ide_methods.bas");}while(r); }else{ 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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDESUBS_STRING_L); if(!qbevent)break;evnt(25753,13350,"ide_methods.bas");}while(r); } S_49862:; if ((-(*_FUNC_IDESUBS_LONG_PREFERCURRENTCURSORSUBFUNC!= 0 ))||new_error){ if(qbevent){evnt(25753,13353,"ide_methods.bas");if(r)goto S_49862;} 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]))*89+64))=*_FUNC_IDESUBS_LONG_PREFERCURRENTCURSORSUBFUNC; if(!qbevent)break;evnt(25753,13354,"ide_methods.bas");}while(r); }else{ 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]))*89+64))=*_FUNC_IDESUBS_LONG_CURRENTLYVIEWINGWHICHSUBFUNC; if(!qbevent)break;evnt(25753,13356,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*(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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSORTED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13359,"ide_methods.bas");}while(r); S_49869:; if ((*__BYTE_IDESUBSLENGTH)||new_error){ if(qbevent){evnt(25753,13360,"ide_methods.bas");if(r)goto S_49869;} 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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDESUBS_STRING_LSORTEDSIZED); if(!qbevent)break;evnt(25753,13361,"ide_methods.bas");}while(r); }else{ 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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDESUBS_STRING_LSORTED); if(!qbevent)break;evnt(25753,13363,"ide_methods.bas");}while(r); } S_49874:; if ((-(*_FUNC_IDESUBS_LONG_PREFERCURRENTCURSORSUBFUNC!= 0 ))||new_error){ if(qbevent){evnt(25753,13365,"ide_methods.bas");if(r)goto S_49874;} S_49875:; fornext_value5545= 1 ; fornext_finalvalue5545=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5545= 1 ; if (fornext_step5545<0) fornext_step_negative5545=1; else fornext_step_negative5545=0; if (new_error) goto fornext_error5545; goto fornext_entrylabel5545; while(1){ fornext_value5545=fornext_step5545+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel5545: *_FUNC_IDESUBS_LONG_X=fornext_value5545; if (fornext_step_negative5545){ if (fornext_value5545fornext_finalvalue5545) break; } fornext_error5545:; if(qbevent){evnt(25753,13366,"ide_methods.bas");if(r)goto S_49875;} S_49876:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_IDESUBS_STRING_LY,(*_FUNC_IDESUBS_LONG_PREFERCURRENTCURSORSUBFUNC* 4 )-( 3 ), 4 ,1),func_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]))*998],998,1),998- 6 , 4 ,1))))||new_error){ if(qbevent){evnt(25753,13367,"ide_methods.bas");if(r)goto S_49876;} 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]))*89+64))=*_FUNC_IDESUBS_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,13368,"ide_methods.bas");}while(r); do{ goto fornext_exit_5544; if(!qbevent)break;evnt(25753,13369,"ide_methods.bas");}while(r); } fornext_continue_5544:; } fornext_exit_5544:; }else{ S_49882:; fornext_value5548= 1 ; fornext_finalvalue5548=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5548= 1 ; if (fornext_step5548<0) fornext_step_negative5548=1; else fornext_step_negative5548=0; if (new_error) goto fornext_error5548; goto fornext_entrylabel5548; while(1){ fornext_value5548=fornext_step5548+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel5548: *_FUNC_IDESUBS_LONG_X=fornext_value5548; if (fornext_step_negative5548){ if (fornext_value5548fornext_finalvalue5548) break; } fornext_error5548:; if(qbevent){evnt(25753,13373,"ide_methods.bas");if(r)goto S_49882;} S_49883:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_IDESUBS_STRING_LY,(*_FUNC_IDESUBS_LONG_CURRENTLYVIEWINGWHICHSUBFUNC* 4 )-( 3 ), 4 ,1),func_mid(qbs_new_fixed(&((uint8*)(_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[0]))[(array_check((*_FUNC_IDESUBS_LONG_X)-_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[4],_FUNC_IDESUBS_ARRAY_STRING998_SORTEDSUBSLIST[5]))*998],998,1),998- 6 , 4 ,1))))||new_error){ if(qbevent){evnt(25753,13374,"ide_methods.bas");if(r)goto S_49883;} 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]))*89+64))=*_FUNC_IDESUBS_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,13375,"ide_methods.bas");}while(r); do{ goto fornext_exit_5547; if(!qbevent)break;evnt(25753,13376,"ide_methods.bas");}while(r); } fornext_continue_5547:; } fornext_exit_5547:; } } 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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Program Items",13)); if(!qbevent)break;evnt(25753,13381,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_I=*_FUNC_IDESUBS_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13383,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,13384,"ide_methods.bas");}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]))*89+20))= 2 ; if(!qbevent)break;evnt(25753,13385,"ide_methods.bas");}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]))*89+24))=*_FUNC_IDESUBS_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,13386,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Line Count",11)); if(!qbevent)break;evnt(25753,13387,"ide_methods.bas");}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]))*89+64))=*__BYTE_IDESUBSLENGTH; if(!qbevent)break;evnt(25753,13388,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_I=*_FUNC_IDESUBS_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13390,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,13391,"ide_methods.bas");}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]))*89+20))= 18 ; if(!qbevent)break;evnt(25753,13392,"ide_methods.bas");}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]))*89+24))=*_FUNC_IDESUBS_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,13393,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Sort",5)); if(!qbevent)break;evnt(25753,13394,"ide_methods.bas");}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]))*89+64))=*_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG; if(!qbevent)break;evnt(25753,13395,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_I=*_FUNC_IDESUBS_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13397,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,13398,"ide_methods.bas");}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]))*89+28))= 26 ; if(!qbevent)break;evnt(25753,13399,"ide_methods.bas");}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]))*89+20))=*_FUNC_IDESUBS_LONG_DIALOGWIDTH- 22 ; if(!qbevent)break;evnt(25753,13400,"ide_methods.bas");}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]))*89+24))=*_FUNC_IDESUBS_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,13401,"ide_methods.bas");}while(r); S_49908:; if ((-(*__LONG_IDEDEBUGMODE== 0 ))||new_error){ if(qbevent){evnt(25753,13402,"ide_methods.bas");if(r)goto S_49908;} 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]))*89+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(25753,13403,"ide_methods.bas");}while(r); }else{ 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]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#View",5),_FUNC_IDESUBS_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,13405,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,13407,"ide_methods.bas");}while(r); S_49914:; fornext_value5551= 1 ; fornext_finalvalue5551= 100 ; fornext_step5551= 1 ; if (fornext_step5551<0) fornext_step_negative5551=1; else fornext_step_negative5551=0; if (new_error) goto fornext_error5551; goto fornext_entrylabel5551; while(1){ fornext_value5551=fornext_step5551+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel5551: *_FUNC_IDESUBS_LONG_I=fornext_value5551; if (fornext_step_negative5551){ if (fornext_value5551fornext_finalvalue5551) break; } fornext_error5551:; if(qbevent){evnt(25753,13413,"ide_methods.bas");if(r)goto S_49914;} 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]))*89)+ 0,((char*)_FUNC_IDESUBS_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,13413,"ide_methods.bas");}while(r); fornext_continue_5550:; } fornext_exit_5550:; S_49917:; do{ if(qbevent){evnt(25753,13416,"ide_methods.bas");if(r)goto S_49917;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDESUBS_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,13419,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_F= 1 ; if(!qbevent)break;evnt(25753,13420,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,13420,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,13420,"ide_methods.bas");}while(r); S_49922:; fornext_value5554= 1 ; fornext_finalvalue5554= 100 ; fornext_step5554= 1 ; if (fornext_step5554<0) fornext_step_negative5554=1; else fornext_step_negative5554=0; if (new_error) goto fornext_error5554; goto fornext_entrylabel5554; while(1){ fornext_value5554=fornext_step5554+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel5554: *_FUNC_IDESUBS_LONG_I=fornext_value5554; if (fornext_step_negative5554){ if (fornext_value5554fornext_finalvalue5554) break; } fornext_error5554:; if(qbevent){evnt(25753,13421,"ide_methods.bas");if(r)goto S_49922;} S_49923:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,13422,"ide_methods.bas");if(r)goto S_49923;} 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]))*89+60))=*_FUNC_IDESUBS_LONG_FOCUS-*_FUNC_IDESUBS_LONG_F; if(!qbevent)break;evnt(25753,13425,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,13426,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,13426,"ide_methods.bas");}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]))*89) ),_FUNC_IDESUBS_LONG_F); if(!qbevent)break;evnt(25753,13427,"ide_methods.bas");}while(r); S_49928:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,13428,"ide_methods.bas");if(r)goto S_49928;} 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]))*89+52)); if(!qbevent)break;evnt(25753,13428,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,13428,"ide_methods.bas");}while(r); } } fornext_continue_5553:; } fornext_exit_5553:; do{ *_FUNC_IDESUBS_LONG_LASTFOCUS=*_FUNC_IDESUBS_LONG_F- 1 ; if(!qbevent)break;evnt(25753,13431,"ide_methods.bas");}while(r); S_49935:; if ((*_FUNC_IDESUBS_LONG_FOUNDEXTERNALSUBFUNC)||new_error){ if(qbevent){evnt(25753,13435,"ide_methods.bas");if(r)goto S_49935;} do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,13436,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDESUBS_UDT_P)+(0))+*(int32*)(((char*)_FUNC_IDESUBS_UDT_P)+(8))- 32 ,*(int32*)(((char*)_FUNC_IDESUBS_UDT_P)+(4))+*(int32*)(((char*)_FUNC_IDESUBS_UDT_P)+(12)),qbs_new_txt_len("* external",10),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13437,"ide_methods.bas");}while(r); } do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,13442,"ide_methods.bas");}while(r); S_49940:; if ((*_FUNC_IDESUBS_LONG_CX)||new_error){ if(qbevent){evnt(25753,13443,"ide_methods.bas");if(r)goto S_49940;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13443,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDESUBS_LONG_CY,*_FUNC_IDESUBS_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,13443,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13443,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,13446,"ide_methods.bas");}while(r); S_49946:; do{ if(qbevent){evnt(25753,13447,"ide_methods.bas");if(r)goto S_49946;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,13448,"ide_methods.bas");}while(r); S_49948:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,13449,"ide_methods.bas");if(r)goto S_49948;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13449,"ide_methods.bas");}while(r); } S_49951:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,13450,"ide_methods.bas");if(r)goto S_49951;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13450,"ide_methods.bas");}while(r); } S_49954:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,13451,"ide_methods.bas");if(r)goto S_49954;} do{ *_FUNC_IDESUBS_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,13451,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13451,"ide_methods.bas");}while(r); } S_49958:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,13452,"ide_methods.bas");if(r)goto S_49958;} do{ *_FUNC_IDESUBS_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,13452,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13452,"ide_methods.bas");}while(r); } S_49962:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,13453,"ide_methods.bas");if(r)goto S_49962;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13453,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,13454,"ide_methods.bas");}while(r); S_49966:; if ((-(*_FUNC_IDESUBS_LONG_ALT!=*_FUNC_IDESUBS_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,13454,"ide_methods.bas");if(r)goto S_49966;} do{ *_FUNC_IDESUBS_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13454,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_OLDALT=*_FUNC_IDESUBS_LONG_ALT; if(!qbevent)break;evnt(25753,13455,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,13456,"ide_methods.bas");}while(r); S_49971:; dl_continue_5555:; }while((!(*_FUNC_IDESUBS_LONG_CHANGE))&&(!new_error)); dl_exit_5555:; if(qbevent){evnt(25753,13457,"ide_methods.bas");if(r)goto S_49971;} S_49972:; if ((*_FUNC_IDESUBS_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,13458,"ide_methods.bas");if(r)goto S_49972;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,13458,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,13458,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESUBS_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13460,"ide_methods.bas");}while(r); S_49978:; if ((*_FUNC_IDESUBS_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,13461,"ide_methods.bas");if(r)goto S_49978;} S_49979:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,13462,"ide_methods.bas");if(r)goto S_49979;} do{ *_FUNC_IDESUBS_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13463,"ide_methods.bas");}while(r); S_49981:; if (((-(*_FUNC_IDESUBS_LONG_K>= 65 ))&(-(*_FUNC_IDESUBS_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,13464,"ide_methods.bas");if(r)goto S_49981;} do{ qbs_set(_FUNC_IDESUBS_STRING_ALTLETTER,func_chr(*_FUNC_IDESUBS_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13464,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13467,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,13467,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13467,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,13471,"ide_methods.bas");}while(r); S_49990:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,13472,"ide_methods.bas");if(r)goto S_49990;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13472,"ide_methods.bas");}while(r); } S_49993:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,13473,"ide_methods.bas");if(r)goto S_49993;} do{ *_FUNC_IDESUBS_LONG_FOCUS=*_FUNC_IDESUBS_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,13473,"ide_methods.bas");}while(r); } S_49996:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,13474,"ide_methods.bas");if(r)goto S_49996;} do{ *_FUNC_IDESUBS_LONG_FOCUS=*_FUNC_IDESUBS_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,13474,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13474,"ide_methods.bas");}while(r); } S_50000:; if ((-(*_FUNC_IDESUBS_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,13475,"ide_methods.bas");if(r)goto S_50000;} do{ *_FUNC_IDESUBS_LONG_FOCUS=*_FUNC_IDESUBS_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,13475,"ide_methods.bas");}while(r); } S_50003:; if ((-(*_FUNC_IDESUBS_LONG_FOCUS>*_FUNC_IDESUBS_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,13476,"ide_methods.bas");if(r)goto S_50003;} do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13476,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_F= 1 ; if(!qbevent)break;evnt(25753,13477,"ide_methods.bas");}while(r); S_50007:; fornext_value5558= 1 ; fornext_finalvalue5558= 100 ; fornext_step5558= 1 ; if (fornext_step5558<0) fornext_step_negative5558=1; else fornext_step_negative5558=0; if (new_error) goto fornext_error5558; goto fornext_entrylabel5558; while(1){ fornext_value5558=fornext_step5558+(*_FUNC_IDESUBS_LONG_I); fornext_entrylabel5558: *_FUNC_IDESUBS_LONG_I=fornext_value5558; if (fornext_step_negative5558){ if (fornext_value5558fornext_finalvalue5558) break; } fornext_error5558:; if(qbevent){evnt(25753,13478,"ide_methods.bas");if(r)goto S_50007;} 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]))*89+36)); if(!qbevent)break;evnt(25753,13479,"ide_methods.bas");}while(r); S_50009:; if ((*_FUNC_IDESUBS_LONG_T)||new_error){ if(qbevent){evnt(25753,13480,"ide_methods.bas");if(r)goto S_50009;} do{ *_FUNC_IDESUBS_LONG_FOCUSOFFSET=*_FUNC_IDESUBS_LONG_FOCUS-*_FUNC_IDESUBS_LONG_F; if(!qbevent)break;evnt(25753,13481,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,13482,"ide_methods.bas");}while(r); } fornext_continue_5557:; } fornext_exit_5557:; S_50014:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDESUBS_LONG_FOCUS== 5 ))&(-(*_FUNC_IDESUBS_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,13487,"ide_methods.bas");if(r)goto S_50014;} do{ qbs_set(_FUNC_IDESUBS_STRING_IDESUBS,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13488,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=163; if (next_return_point>=return_points) more_return_points(); goto LABEL_SAVESORTSETTINGS; RETURN_163:; if(!qbevent)break;evnt(25753,13489,"ide_methods.bas");}while(r); do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,13490,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13491,"ide_methods.bas");}while(r); } S_50020:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDESUBS_LONG_FOCUS== 4 ))&(-(*_FUNC_IDESUBS_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDESUBS_LONG_INFO== 1 ))&(-(*_FUNC_IDESUBS_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(25753,13494,"ide_methods.bas");if(r)goto S_50020;} 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]))*89+64)); if(!qbevent)break;evnt(25753,13495,"ide_methods.bas");}while(r); S_50022:; if ((-(*_FUNC_IDESUBS_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(25753,13496,"ide_methods.bas");if(r)goto S_50022;} do{ *_FUNC_IDESUBS_LONG_Y=-(*_FUNC_IDESUBS_LONG_Y); if(!qbevent)break;evnt(25753,13496,"ide_methods.bas");}while(r); } do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,13497,"ide_methods.bas");}while(r); S_50026:; if ((-(*_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG== 0 ))||new_error){ if(qbevent){evnt(25753,13498,"ide_methods.bas");if(r)goto S_50026;} 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(25753,13499,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDECY=string2l(func_mid(_FUNC_IDESUBS_STRING_LYSORTED,(*_FUNC_IDESUBS_LONG_Y* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13501,"ide_methods.bas");}while(r); } do{ *__LONG_IDESY=*__LONG_IDECY; if(!qbevent)break;evnt(25753,13503,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,13504,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; if(!qbevent)break;evnt(25753,13505,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=164; if (next_return_point>=return_points) more_return_points(); goto LABEL_SAVESORTSETTINGS; RETURN_164:; if(!qbevent)break;evnt(25753,13507,"ide_methods.bas");}while(r); do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,13508,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13509,"ide_methods.bas");}while(r); } S_50038:; if ((-(*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))!=*__BYTE_IDESUBSLENGTH))||new_error){ if(qbevent){evnt(25753,13512,"ide_methods.bas");if(r)goto S_50038;} do{ *__BYTE_IDESUBSLENGTH=*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,13513,"ide_methods.bas");}while(r); S_50040:; if ((*__BYTE_IDESUBSLENGTH)||new_error){ if(qbevent){evnt(25753,13514,"ide_methods.bas");if(r)goto S_50040;} S_50041:; if ((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64)))||new_error){ if(qbevent){evnt(25753,13515,"ide_methods.bas");if(r)goto S_50041;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSORTEDSIZED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13516,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSIZED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13518,"ide_methods.bas");}while(r); } }else{ S_50047:; if ((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64)))||new_error){ if(qbevent){evnt(25753,13521,"ide_methods.bas");if(r)goto S_50047;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSORTED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13522,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13524,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13527,"ide_methods.bas");}while(r); } S_50055:; if ((-(*_FUNC_IDESUBS_LONG_TOTALSUBS> 1 ))||new_error){ if(qbevent){evnt(25753,13530,"ide_methods.bas");if(r)goto S_50055;} S_50056:; if ((-(*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))!=*_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG))||new_error){ if(qbevent){evnt(25753,13531,"ide_methods.bas");if(r)goto S_50056;} do{ *_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG=*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,13532,"ide_methods.bas");}while(r); S_50058:; if ((-(*_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG== 0 ))||new_error){ if(qbevent){evnt(25753,13534,"ide_methods.bas");if(r)goto S_50058;} do{ *_FUNC_IDESUBS_LONG_PREVIOUSSELECTION= -1 ; if(!qbevent)break;evnt(25753,13536,"ide_methods.bas");}while(r); S_50060:; if ((-(*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))> 0 ))||new_error){ if(qbevent){evnt(25753,13537,"ide_methods.bas");if(r)goto S_50060;} do{ qbs_set(_FUNC_IDESUBS_STRING_TARGETSOURCELINE,func_mid(_FUNC_IDESUBS_STRING_LYSORTED,(*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13538,"ide_methods.bas");}while(r); S_50062:; fornext_value5560= 1 ; fornext_finalvalue5560=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5560= 1 ; if (fornext_step5560<0) fornext_step_negative5560=1; else fornext_step_negative5560=0; if (new_error) goto fornext_error5560; goto fornext_entrylabel5560; while(1){ fornext_value5560=fornext_step5560+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel5560: *_FUNC_IDESUBS_LONG_X=fornext_value5560; if (fornext_step_negative5560){ if (fornext_value5560fornext_finalvalue5560) break; } fornext_error5560:; if(qbevent){evnt(25753,13539,"ide_methods.bas");if(r)goto S_50062;} S_50063:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_IDESUBS_STRING_LY,(*_FUNC_IDESUBS_LONG_X* 4 )-( 3 ), 4 ,1),_FUNC_IDESUBS_STRING_TARGETSOURCELINE)))||new_error){ if(qbevent){evnt(25753,13540,"ide_methods.bas");if(r)goto S_50063;} do{ *_FUNC_IDESUBS_LONG_PREVIOUSSELECTION=*_FUNC_IDESUBS_LONG_X; if(!qbevent)break;evnt(25753,13541,"ide_methods.bas");}while(r); } fornext_continue_5559:; } fornext_exit_5559:; } S_50068:; if ((*__BYTE_IDESUBSLENGTH)||new_error){ if(qbevent){evnt(25753,13546,"ide_methods.bas");if(r)goto S_50068;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSIZED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13547,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13549,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))=*_FUNC_IDESUBS_LONG_PREVIOUSSELECTION; if(!qbevent)break;evnt(25753,13551,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13552,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDESUBS_LONG_PREVIOUSSELECTION= -1 ; if(!qbevent)break;evnt(25753,13555,"ide_methods.bas");}while(r); S_50077:; if ((-(*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))> 0 ))||new_error){ if(qbevent){evnt(25753,13556,"ide_methods.bas");if(r)goto S_50077;} do{ qbs_set(_FUNC_IDESUBS_STRING_TARGETSOURCELINE,func_mid(_FUNC_IDESUBS_STRING_LY,(*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))* 4 )-( 3 ), 4 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13557,"ide_methods.bas");}while(r); S_50079:; fornext_value5562= 1 ; fornext_finalvalue5562=*_FUNC_IDESUBS_LONG_TOTALSUBS; fornext_step5562= 1 ; if (fornext_step5562<0) fornext_step_negative5562=1; else fornext_step_negative5562=0; if (new_error) goto fornext_error5562; goto fornext_entrylabel5562; while(1){ fornext_value5562=fornext_step5562+(*_FUNC_IDESUBS_LONG_X); fornext_entrylabel5562: *_FUNC_IDESUBS_LONG_X=fornext_value5562; if (fornext_step_negative5562){ if (fornext_value5562fornext_finalvalue5562) break; } fornext_error5562:; if(qbevent){evnt(25753,13558,"ide_methods.bas");if(r)goto S_50079;} S_50080:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_IDESUBS_STRING_LYSORTED,(*_FUNC_IDESUBS_LONG_X* 4 )-( 3 ), 4 ,1),_FUNC_IDESUBS_STRING_TARGETSOURCELINE)))||new_error){ if(qbevent){evnt(25753,13559,"ide_methods.bas");if(r)goto S_50080;} do{ *_FUNC_IDESUBS_LONG_PREVIOUSSELECTION=*_FUNC_IDESUBS_LONG_X; if(!qbevent)break;evnt(25753,13560,"ide_methods.bas");}while(r); } fornext_continue_5561:; } fornext_exit_5561:; } S_50085:; if ((*__BYTE_IDESUBSLENGTH)||new_error){ if(qbevent){evnt(25753,13565,"ide_methods.bas");if(r)goto S_50085;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSORTEDSIZED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13566,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDESUBS_STRING_LSORTED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13568,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDESUBS_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDESUBS_ARRAY_UDT_O[4],_FUNC_IDESUBS_ARRAY_UDT_O[5]))*89+64))=*_FUNC_IDESUBS_LONG_PREVIOUSSELECTION; if(!qbevent)break;evnt(25753,13570,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13571,"ide_methods.bas");}while(r); } } } do{ *_FUNC_IDESUBS_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,13577,"ide_methods.bas");}while(r); do{ *_FUNC_IDESUBS_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,13578,"ide_methods.bas");}while(r); dl_continue_5552:; }while(1); dl_exit_5552:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13581,"ide_methods.bas");}while(r); LABEL_SAVESORTSETTINGS:; if(qbevent){evnt(25753,13582,"ide_methods.bas");r=0;} do{ *__BYTE_IDESORTSUBS=*_FUNC_IDESUBS_LONG_SORTEDSUBSFLAG; if(!qbevent)break;evnt(25753,13583,"ide_methods.bas");}while(r); S_50100:; if ((*__BYTE_IDESORTSUBS)||new_error){ if(qbevent){evnt(25753,13584,"ide_methods.bas");if(r)goto S_50100;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SortSUBs",12),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13585,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SortSUBs",12),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13587,"ide_methods.bas");}while(r); } S_50105:; if ((*__BYTE_IDESUBSLENGTH)||new_error){ if(qbevent){evnt(25753,13590,"ide_methods.bas");if(r)goto S_50105;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SUBsLength",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13591,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_SUBsLength",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13593,"ide_methods.bas");}while(r); } do{ #include "ret199.txt" if(!qbevent)break;evnt(25753,13595,"ide_methods.bas");}while(r); LABEL_ADDLINECOUNT:; if(qbevent){evnt(25753,13597,"ide_methods.bas");r=0;} do{ *_FUNC_IDESUBS_LONG_MODULESIZE=*_FUNC_IDESUBS_LONG_MODULESIZE+ 1 ; if(!qbevent)break;evnt(25753,13598,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_FUNC_IDESUBS_LONG_LASTOPENSUB)-_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[4],_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[5]); if (!new_error) ((int32*)(_FUNC_IDESUBS_ARRAY_LONG_TOTALLINES[0]))[tmp_long]=*_FUNC_IDESUBS_LONG_MODULESIZE; if(!qbevent)break;evnt(25753,13599,"ide_methods.bas");}while(r); S_50113:; if ((-(*_FUNC_IDESUBS_LONG_MODULESIZE>*_FUNC_IDESUBS_LONG_MAXLINECOUNT))||new_error){ if(qbevent){evnt(25753,13600,"ide_methods.bas");if(r)goto S_50113;} do{ *_FUNC_IDESUBS_LONG_MAXLINECOUNT=*_FUNC_IDESUBS_LONG_MODULESIZE; if(!qbevent)break;evnt(25753,13600,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESUBS_LONG_SUBCLOSED= -1 ; if(!qbevent)break;evnt(25753,13601,"ide_methods.bas");}while(r); do{ #include "ret199.txt" if(!qbevent)break;evnt(25753,13602,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free199.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 "data200.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,13609,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,13610,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13611,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13612,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13613,"ide_methods.bas");}while(r); do{ if (_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]),0,_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,13614,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13615,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13616,"ide_methods.bas");}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(25753,13622,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH=_FUNC_IDELANGUAGEBOX_STRING_L->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13623,"ide_methods.bas");}while(r); S_50128:; fornext_value5565= 2 ; fornext_finalvalue5565= 27 ; fornext_step5565= 1 ; if (fornext_step5565<0) fornext_step_negative5565=1; else fornext_step_negative5565=0; if (new_error) goto fornext_error5565; goto fornext_entrylabel5565; while(1){ fornext_value5565=fornext_step5565+(*_FUNC_IDELANGUAGEBOX_LONG_X); fornext_entrylabel5565: *_FUNC_IDELANGUAGEBOX_LONG_X=fornext_value5565; if (fornext_step_negative5565){ if (fornext_value5565fornext_finalvalue5565) break; } fornext_error5565:; if(qbevent){evnt(25753,13624,"ide_methods.bas");if(r)goto S_50128;} 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(25753,13625,"ide_methods.bas");}while(r); S_50130:; if ((qbs_cleanup(qbs_tmp_base,-(((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[array_check((*_FUNC_IDELANGUAGEBOX_LONG_X)-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5])]))->len>*_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH)))||new_error){ if(qbevent){evnt(25753,13626,"ide_methods.bas");if(r)goto S_50130;} do{ *_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH=((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[array_check((*_FUNC_IDELANGUAGEBOX_LONG_X)-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5])]))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13626,"ide_methods.bas");}while(r); } fornext_continue_5564:; } fornext_exit_5564:; do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_L,qbs_ucase(_FUNC_IDELANGUAGEBOX_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13628,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,13630,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_DIALOGHEIGHT= 27 + 5 ; if(!qbevent)break;evnt(25753,13631,"ide_methods.bas");}while(r); S_50137:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,13632,"ide_methods.bas");if(r)goto S_50137;} do{ *_FUNC_IDELANGUAGEBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,13633,"ide_methods.bas");}while(r); } S_50140:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH< 60 ))||new_error){ if(qbevent){evnt(25753,13635,"ide_methods.bas");if(r)goto S_50140;} do{ *_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH= 60 ; if(!qbevent)break;evnt(25753,13635,"ide_methods.bas");}while(r); } S_50143:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,13636,"ide_methods.bas");if(r)goto S_50143;} do{ *_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,13636,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_UDT_P)) + (0) ),_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH,_FUNC_IDELANGUAGEBOX_LONG_DIALOGHEIGHT,qbs_new_txt_len("Language",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13638,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_I=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13640,"ide_methods.bas");}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]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,13641,"ide_methods.bas");}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]))*89+24))= 3 ; if(!qbevent)break;evnt(25753,13642,"ide_methods.bas");}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]))*89+28))=*_FUNC_IDELANGUAGEBOX_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,13643,"ide_methods.bas");}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]))*89+32))=*_FUNC_IDELANGUAGEBOX_LONG_DIALOGHEIGHT- 5 ; if(!qbevent)break;evnt(25753,13643,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDELANGUAGEBOX_STRING_L); if(!qbevent)break;evnt(25753,13644,"ide_methods.bas");}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]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,13645,"ide_methods.bas");}while(r); S_50154:; if ((*__LONG_IDECPINDEX)||new_error){ if(qbevent){evnt(25753,13645,"ide_methods.bas");if(r)goto S_50154;} 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]))*89+64))=*__LONG_IDECPINDEX; if(!qbevent)break;evnt(25753,13645,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Code Pages",10)); if(!qbevent)break;evnt(25753,13646,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_I=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13648,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,13649,"ide_methods.bas");}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]))*89+24))=*_FUNC_IDELANGUAGEBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,13650,"ide_methods.bas");}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]))*89+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(25753,13651,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,13652,"ide_methods.bas");}while(r); S_50163:; fornext_value5569= 1 ; fornext_finalvalue5569= 100 ; fornext_step5569= 1 ; if (fornext_step5569<0) fornext_step_negative5569=1; else fornext_step_negative5569=0; if (new_error) goto fornext_error5569; goto fornext_entrylabel5569; while(1){ fornext_value5569=fornext_step5569+(*_FUNC_IDELANGUAGEBOX_LONG_I); fornext_entrylabel5569: *_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value5569; if (fornext_step_negative5569){ if (fornext_value5569fornext_finalvalue5569) break; } fornext_error5569:; if(qbevent){evnt(25753,13661,"ide_methods.bas");if(r)goto S_50163;} 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]))*89)+ 0,((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,13661,"ide_methods.bas");}while(r); fornext_continue_5568:; } fornext_exit_5568:; S_50166:; do{ if(qbevent){evnt(25753,13664,"ide_methods.bas");if(r)goto S_50166;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,13667,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,13668,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,13668,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,13668,"ide_methods.bas");}while(r); S_50171:; fornext_value5572= 1 ; fornext_finalvalue5572= 100 ; fornext_step5572= 1 ; if (fornext_step5572<0) fornext_step_negative5572=1; else fornext_step_negative5572=0; if (new_error) goto fornext_error5572; goto fornext_entrylabel5572; while(1){ fornext_value5572=fornext_step5572+(*_FUNC_IDELANGUAGEBOX_LONG_I); fornext_entrylabel5572: *_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value5572; if (fornext_step_negative5572){ if (fornext_value5572fornext_finalvalue5572) break; } fornext_error5572:; if(qbevent){evnt(25753,13669,"ide_methods.bas");if(r)goto S_50171;} S_50172:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,13670,"ide_methods.bas");if(r)goto S_50172;} 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]))*89+60))=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS-*_FUNC_IDELANGUAGEBOX_LONG_F; if(!qbevent)break;evnt(25753,13672,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,13673,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,13673,"ide_methods.bas");}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]))*89) ),_FUNC_IDELANGUAGEBOX_LONG_F); if(!qbevent)break;evnt(25753,13674,"ide_methods.bas");}while(r); S_50177:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,13675,"ide_methods.bas");if(r)goto S_50177;} 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]))*89+52)); if(!qbevent)break;evnt(25753,13675,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,13675,"ide_methods.bas");}while(r); } } fornext_continue_5571:; } fornext_exit_5571:; do{ *_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS=*_FUNC_IDELANGUAGEBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,13678,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,13682,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(4))+ 1 ,qbs_new_txt_len("Code-page for ASCII-UNICODE mapping (Default = CP437):",54),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13683,"ide_methods.bas");}while(r); do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,13684,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+(4))+ 2 ,qbs_new_txt_len("(affects the display of TTF fonts set in Options-Display)",57),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13685,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,13690,"ide_methods.bas");}while(r); S_50189:; if ((*_FUNC_IDELANGUAGEBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,13691,"ide_methods.bas");if(r)goto S_50189;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13691,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDELANGUAGEBOX_LONG_CY,*_FUNC_IDELANGUAGEBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,13691,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13691,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,13694,"ide_methods.bas");}while(r); S_50195:; do{ if(qbevent){evnt(25753,13695,"ide_methods.bas");if(r)goto S_50195;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,13696,"ide_methods.bas");}while(r); S_50197:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,13697,"ide_methods.bas");if(r)goto S_50197;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13697,"ide_methods.bas");}while(r); } S_50200:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,13698,"ide_methods.bas");if(r)goto S_50200;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13698,"ide_methods.bas");}while(r); } S_50203:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,13699,"ide_methods.bas");if(r)goto S_50203;} do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,13699,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13699,"ide_methods.bas");}while(r); } S_50207:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,13700,"ide_methods.bas");if(r)goto S_50207;} do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,13700,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13700,"ide_methods.bas");}while(r); } S_50211:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,13701,"ide_methods.bas");if(r)goto S_50211;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13701,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,13702,"ide_methods.bas");}while(r); S_50215:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_ALT!=*_FUNC_IDELANGUAGEBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,13702,"ide_methods.bas");if(r)goto S_50215;} do{ *_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13702,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_OLDALT=*_FUNC_IDELANGUAGEBOX_LONG_ALT; if(!qbevent)break;evnt(25753,13703,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,13704,"ide_methods.bas");}while(r); S_50220:; dl_continue_5573:; }while((!(*_FUNC_IDELANGUAGEBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5573:; if(qbevent){evnt(25753,13705,"ide_methods.bas");if(r)goto S_50220;} S_50221:; if ((*_FUNC_IDELANGUAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,13706,"ide_methods.bas");if(r)goto S_50221;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,13706,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,13706,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13708,"ide_methods.bas");}while(r); S_50227:; if ((*_FUNC_IDELANGUAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,13709,"ide_methods.bas");if(r)goto S_50227;} S_50228:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,13710,"ide_methods.bas");if(r)goto S_50228;} do{ *_FUNC_IDELANGUAGEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13711,"ide_methods.bas");}while(r); S_50230:; if (((-(*_FUNC_IDELANGUAGEBOX_LONG_K>= 65 ))&(-(*_FUNC_IDELANGUAGEBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,13712,"ide_methods.bas");if(r)goto S_50230;} do{ qbs_set(_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDELANGUAGEBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13712,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13715,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,13715,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13715,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,13719,"ide_methods.bas");}while(r); S_50239:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,13720,"ide_methods.bas");if(r)goto S_50239;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13720,"ide_methods.bas");}while(r); } S_50242:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,13721,"ide_methods.bas");if(r)goto S_50242;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,13721,"ide_methods.bas");}while(r); } S_50245:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,13722,"ide_methods.bas");if(r)goto S_50245;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,13722,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13722,"ide_methods.bas");}while(r); } S_50249:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,13723,"ide_methods.bas");if(r)goto S_50249;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,13723,"ide_methods.bas");}while(r); } S_50252:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS>*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,13724,"ide_methods.bas");if(r)goto S_50252;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13724,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,13725,"ide_methods.bas");}while(r); S_50256:; fornext_value5576= 1 ; fornext_finalvalue5576= 100 ; fornext_step5576= 1 ; if (fornext_step5576<0) fornext_step_negative5576=1; else fornext_step_negative5576=0; if (new_error) goto fornext_error5576; goto fornext_entrylabel5576; while(1){ fornext_value5576=fornext_step5576+(*_FUNC_IDELANGUAGEBOX_LONG_I); fornext_entrylabel5576: *_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value5576; if (fornext_step_negative5576){ if (fornext_value5576fornext_finalvalue5576) break; } fornext_error5576:; if(qbevent){evnt(25753,13726,"ide_methods.bas");if(r)goto S_50256;} 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]))*89+36)); if(!qbevent)break;evnt(25753,13727,"ide_methods.bas");}while(r); S_50258:; if ((*_FUNC_IDELANGUAGEBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,13728,"ide_methods.bas");if(r)goto S_50258;} do{ *_FUNC_IDELANGUAGEBOX_LONG_FOCUSOFFSET=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS-*_FUNC_IDELANGUAGEBOX_LONG_F; if(!qbevent)break;evnt(25753,13729,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,13730,"ide_methods.bas");}while(r); } fornext_continue_5575:; } fornext_exit_5575:; S_50263:; 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(25753,13735,"ide_methods.bas");if(r)goto S_50263;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13737,"ide_methods.bas");}while(r); } S_50266:; 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(25753,13740,"ide_methods.bas");if(r)goto S_50266;} 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]))*89+64)); if(!qbevent)break;evnt(25753,13741,"ide_methods.bas");}while(r); S_50268:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_Y< 1 ))||new_error){ if(qbevent){evnt(25753,13742,"ide_methods.bas");if(r)goto S_50268;} do{ *_FUNC_IDELANGUAGEBOX_LONG_Y=-(*_FUNC_IDELANGUAGEBOX_LONG_Y); if(!qbevent)break;evnt(25753,13742,"ide_methods.bas");}while(r); } S_50271:; fornext_value5578= 128 ; fornext_finalvalue5578= 255 ; fornext_step5578= 1 ; if (fornext_step5578<0) fornext_step_negative5578=1; else fornext_step_negative5578=0; if (new_error) goto fornext_error5578; goto fornext_entrylabel5578; while(1){ fornext_value5578=fornext_step5578+(*_FUNC_IDELANGUAGEBOX_LONG_X); fornext_entrylabel5578: *_FUNC_IDELANGUAGEBOX_LONG_X=fornext_value5578; if (fornext_step_negative5578){ if (fornext_value5578fornext_finalvalue5578) break; } fornext_error5578:; if(qbevent){evnt(25753,13744,"ide_methods.bas");if(r)goto S_50271;} 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(25753,13745,"ide_methods.bas");}while(r); S_50273:; if ((-(*_FUNC_IDELANGUAGEBOX_LONG_U== 0 ))||new_error){ if(qbevent){evnt(25753,13746,"ide_methods.bas");if(r)goto S_50273;} do{ *_FUNC_IDELANGUAGEBOX_LONG_U= 9744 ; if(!qbevent)break;evnt(25753,13746,"ide_methods.bas");}while(r); } do{ sub__mapunicode(*_FUNC_IDELANGUAGEBOX_LONG_U,*_FUNC_IDELANGUAGEBOX_LONG_X); if(!qbevent)break;evnt(25753,13747,"ide_methods.bas");}while(r); fornext_continue_5577:; } fornext_exit_5577:; do{ *_FUNC_IDELANGUAGEBOX_INTEGER_V=*_FUNC_IDELANGUAGEBOX_LONG_Y; if(!qbevent)break;evnt(25753,13751,"ide_methods.bas");}while(r); do{ *__LONG_IDECPINDEX=*_FUNC_IDELANGUAGEBOX_INTEGER_V; if(!qbevent)break;evnt(25753,13751,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CodePage",12),qbs_str((int32)(*__LONG_IDECPINDEX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13752,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13753,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,13758,"ide_methods.bas");}while(r); do{ *_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,13759,"ide_methods.bas");}while(r); dl_continue_5570:; }while(1); dl_exit_5570:; do{ *_FUNC_IDELANGUAGEBOX_LONG_IDELANGUAGEBOX= 0 ; if(!qbevent)break;evnt(25753,13762,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free200.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; } int32 FUNC_IDEWARNINGBOX(){ 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 "data201.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,13769,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,13770,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13771,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13772,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13773,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEWARNINGBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEWARNINGBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,13774,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13775,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13776,"ide_methods.bas");}while(r); S_50295:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEPROGNAME->len))||new_error){ if(qbevent){evnt(25753,13781,"ide_methods.bas");if(r)goto S_50295;} do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_THISPROG,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13781,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_THISPROG,qbs_add(qbs_new_txt_len("Untitled",8),__STRING_TEMPFOLDERINDEXSTR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13781,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_MAXMODULENAMELEN=_FUNC_IDEWARNINGBOX_STRING_THISPROG->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13782,"ide_methods.bas");}while(r); S_50301:; fornext_value5582= 1 ; fornext_finalvalue5582=*__LONG_WARNINGLISTITEMS; fornext_step5582= 1 ; if (fornext_step5582<0) fornext_step_negative5582=1; else fornext_step_negative5582=0; if (new_error) goto fornext_error5582; goto fornext_entrylabel5582; while(1){ fornext_value5582=fornext_step5582+(*_FUNC_IDEWARNINGBOX_LONG_X); fornext_entrylabel5582: *_FUNC_IDEWARNINGBOX_LONG_X=fornext_value5582; if (fornext_step_negative5582){ if (fornext_value5582fornext_finalvalue5582) break; } fornext_error5582:; if(qbevent){evnt(25753,13785,"ide_methods.bas");if(r)goto S_50301;} S_50302:; if ((-(((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5])]== 0 ))||new_error){ if(qbevent){evnt(25753,13786,"ide_methods.bas");if(r)goto S_50302;} do{ goto fornext_continue_5581; if(!qbevent)break;evnt(25753,13786,"ide_methods.bas");}while(r); } S_50305:; if ((-(((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5])]> 0 ))||new_error){ if(qbevent){evnt(25753,13788,"ide_methods.bas");if(r)goto S_50305;} S_50306:; if ((qbs_cleanup(qbs_tmp_base,-(((qbs*)(((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_STRING_WARNINGINCFILES[4],__ARRAY_STRING_WARNINGINCFILES[5])]))->len>*_FUNC_IDEWARNINGBOX_LONG_MAXMODULENAMELEN)))||new_error){ if(qbevent){evnt(25753,13789,"ide_methods.bas");if(r)goto S_50306;} do{ *_FUNC_IDEWARNINGBOX_LONG_MAXMODULENAMELEN=((qbs*)(((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_STRING_WARNINGINCFILES[4],__ARRAY_STRING_WARNINGINCFILES[5])]))->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13790,"ide_methods.bas");}while(r); } } fornext_continue_5581:; } fornext_exit_5581:; do{ *_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH= 60 ; if(!qbevent)break;evnt(25753,13796,"ide_methods.bas");}while(r); S_50312:; fornext_value5586= 1 ; fornext_finalvalue5586=*__LONG_WARNINGLISTITEMS; fornext_step5586= 1 ; if (fornext_step5586<0) fornext_step_negative5586=1; else fornext_step_negative5586=0; if (new_error) goto fornext_error5586; goto fornext_entrylabel5586; while(1){ fornext_value5586=fornext_step5586+(*_FUNC_IDEWARNINGBOX_LONG_X); fornext_entrylabel5586: *_FUNC_IDEWARNINGBOX_LONG_X=fornext_value5586; if (fornext_step_negative5586){ if (fornext_value5586fornext_finalvalue5586) break; } fornext_error5586:; if(qbevent){evnt(25753,13797,"ide_methods.bas");if(r)goto S_50312;} S_50313:; if ((-(((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5])]== 0 ))||new_error){ if(qbevent){evnt(25753,13798,"ide_methods.bas");if(r)goto S_50313;} do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L,qbs_add(_FUNC_IDEWARNINGBOX_STRING_L,((qbs*)(((uint64*)(__ARRAY_STRING_WARNING[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_STRING_WARNING[4],__ARRAY_STRING_WARNING[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13799,"ide_methods.bas");}while(r); S_50315:; if (((-(*_FUNC_IDEWARNINGBOX_LONG_X> 1 ))&(-(*_FUNC_IDEWARNINGBOX_LONG_TREECONNECTION> 0 )))||new_error){ if(qbevent){evnt(25753,13800,"ide_methods.bas");if(r)goto S_50315;} do{ tqbs=_FUNC_IDEWARNINGBOX_STRING_L; if (!new_error){ tmp_fileno=*_FUNC_IDEWARNINGBOX_LONG_TREECONNECTION; if (!new_error){ tmp_long= 192 ; 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(25753,13800,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L3,qbs_add(func_chr( 16 ),func_chr( 2 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13802,"ide_methods.bas");}while(r); S_50320:; if ((-(((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5])]> 0 ))||new_error){ if(qbevent){evnt(25753,13803,"ide_methods.bas");if(r)goto S_50320;} do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_NUM,func_space(((int32)(qbs_str((int32)(*__LONG_MAXLINENUMBER)))->len)+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13804,"ide_methods.bas");}while(r); do{ sub_rset(_FUNC_IDEWARNINGBOX_STRING_NUM,FUNC_STR2((&(((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5])])))); if(!qbevent)break;evnt(25753,13805,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L3,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDEWARNINGBOX_STRING_L3,((qbs*)(((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_STRING_WARNINGINCFILES[4],__ARRAY_STRING_WARNINGINCFILES[5])]))),func_space(*_FUNC_IDEWARNINGBOX_LONG_MAXMODULENAMELEN-((qbs*)(((uint64*)(__ARRAY_STRING_WARNINGINCFILES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_STRING_WARNINGINCFILES[4],__ARRAY_STRING_WARNINGINCFILES[5])]))->len)),qbs_new_txt_len(":",1)),func_chr( 16 )),func_chr( 16 )),_FUNC_IDEWARNINGBOX_STRING_NUM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13806,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_NUM,func_space(((int32)(qbs_str((int32)(*__LONG_MAXLINENUMBER)))->len)+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13808,"ide_methods.bas");}while(r); do{ sub_rset(_FUNC_IDEWARNINGBOX_STRING_NUM,FUNC_STR2((&(((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5])])))); if(!qbevent)break;evnt(25753,13809,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L3,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDEWARNINGBOX_STRING_L3,_FUNC_IDEWARNINGBOX_STRING_THISPROG),func_space(*_FUNC_IDEWARNINGBOX_LONG_MAXMODULENAMELEN-_FUNC_IDEWARNINGBOX_STRING_THISPROG->len)),qbs_new_txt_len(":",1)),func_chr( 16 )),func_chr( 16 )),_FUNC_IDEWARNINGBOX_STRING_NUM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13810,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_TREECONNECTION=_FUNC_IDEWARNINGBOX_STRING_L->len+ 1 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13812,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_TEXT,((qbs*)(((uint64*)(__ARRAY_STRING_WARNING[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_X)-__ARRAY_STRING_WARNING[4],__ARRAY_STRING_WARNING[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13813,"ide_methods.bas");}while(r); S_50331:; if ((qbs_cleanup(qbs_tmp_base,-((((int32)(qbs_add(_FUNC_IDEWARNINGBOX_STRING_L3,_FUNC_IDEWARNINGBOX_STRING_TEXT))->len)+ 6 )>*_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH)))||new_error){ if(qbevent){evnt(25753,13814,"ide_methods.bas");if(r)goto S_50331;} do{ *_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH=((int32)(qbs_add(_FUNC_IDEWARNINGBOX_STRING_L3,_FUNC_IDEWARNINGBOX_STRING_TEXT))->len)+ 6 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13814,"ide_methods.bas");}while(r); } S_50334:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEWARNINGBOX_STRING_TEXT->len))||new_error){ if(qbevent){evnt(25753,13815,"ide_methods.bas");if(r)goto S_50334;} do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_IDEWARNINGBOX_STRING_L,func_chr( 195 )),func_chr( 196 )),_FUNC_IDEWARNINGBOX_STRING_L3),qbs_new_txt_len(": ",2)),_FUNC_IDEWARNINGBOX_STRING_TEXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13816,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDEWARNINGBOX_STRING_L,func_chr( 195 )),func_chr( 196 )),_FUNC_IDEWARNINGBOX_STRING_L3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13818,"ide_methods.bas");}while(r); } } S_50340:; if ((-(*_FUNC_IDEWARNINGBOX_LONG_X<*__LONG_WARNINGLISTITEMS))||new_error){ if(qbevent){evnt(25753,13821,"ide_methods.bas");if(r)goto S_50340;} do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_L,qbs_add(_FUNC_IDEWARNINGBOX_STRING_L,_FUNC_IDEWARNINGBOX_STRING1_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13821,"ide_methods.bas");}while(r); } fornext_continue_5585:; } fornext_exit_5585:; S_50344:; if ((-(((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[array_check((*__LONG_WARNINGLISTITEMS)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5])]> 0 ))||new_error){ if(qbevent){evnt(25753,13824,"ide_methods.bas");if(r)goto S_50344;} do{ tqbs=_FUNC_IDEWARNINGBOX_STRING_L; if (!new_error){ tmp_fileno=*_FUNC_IDEWARNINGBOX_LONG_TREECONNECTION; if (!new_error){ tmp_long= 192 ; 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(25753,13825,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,13828,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_DIALOGHEIGHT=*__LONG_WARNINGLISTITEMS+ 4 ; if(!qbevent)break;evnt(25753,13829,"ide_methods.bas");}while(r); S_50349:; if ((-(*_FUNC_IDEWARNINGBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,13830,"ide_methods.bas");if(r)goto S_50349;} do{ *_FUNC_IDEWARNINGBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,13831,"ide_methods.bas");}while(r); } S_50352:; if ((-(*_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,13834,"ide_methods.bas");if(r)goto S_50352;} do{ *_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,13834,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEWARNINGBOX_UDT_P)) + (0) ),_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH,_FUNC_IDEWARNINGBOX_LONG_DIALOGHEIGHT,qbs_new_txt_len("Compilation status",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13836,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_I=*_FUNC_IDEWARNINGBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13838,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,13839,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,13840,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+28))=*_FUNC_IDEWARNINGBOX_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,13841,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+32))=*_FUNC_IDEWARNINGBOX_LONG_DIALOGHEIGHT- 4 ; if(!qbevent)break;evnt(25753,13841,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEWARNINGBOX_STRING_L); if(!qbevent)break;evnt(25753,13842,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,13843,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("Warnings (",10),qbs_ltrim(qbs_str((int32)(*__LONG_TOTALWARNINGS)))),qbs_new_txt_len(")",1))); if(!qbevent)break;evnt(25753,13844,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_I=*_FUNC_IDEWARNINGBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,13846,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,13847,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDEWARNINGBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,13848,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#Go to",6),_FUNC_IDEWARNINGBOX_STRING1_SEP),qbs_new_txt_len("#Close",6))); if(!qbevent)break;evnt(25753,13849,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,13850,"ide_methods.bas");}while(r); S_50369:; fornext_value5592= 1 ; fornext_finalvalue5592= 100 ; fornext_step5592= 1 ; if (fornext_step5592<0) fornext_step_negative5592=1; else fornext_step_negative5592=0; if (new_error) goto fornext_error5592; goto fornext_entrylabel5592; while(1){ fornext_value5592=fornext_step5592+(*_FUNC_IDEWARNINGBOX_LONG_I); fornext_entrylabel5592: *_FUNC_IDEWARNINGBOX_LONG_I=fornext_value5592; if (fornext_step_negative5592){ if (fornext_value5592fornext_finalvalue5592) break; } fornext_error5592:; if(qbevent){evnt(25753,13859,"ide_methods.bas");if(r)goto S_50369;} do{ memcpy(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEWARNINGBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,13859,"ide_methods.bas");}while(r); fornext_continue_5591:; } fornext_exit_5591:; S_50372:; do{ if(qbevent){evnt(25753,13862,"ide_methods.bas");if(r)goto S_50372;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEWARNINGBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,13865,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,13866,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,13866,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,13866,"ide_methods.bas");}while(r); S_50377:; fornext_value5595= 1 ; fornext_finalvalue5595= 100 ; fornext_step5595= 1 ; if (fornext_step5595<0) fornext_step_negative5595=1; else fornext_step_negative5595=0; if (new_error) goto fornext_error5595; goto fornext_entrylabel5595; while(1){ fornext_value5595=fornext_step5595+(*_FUNC_IDEWARNINGBOX_LONG_I); fornext_entrylabel5595: *_FUNC_IDEWARNINGBOX_LONG_I=fornext_value5595; if (fornext_step_negative5595){ if (fornext_value5595fornext_finalvalue5595) break; } fornext_error5595:; if(qbevent){evnt(25753,13867,"ide_methods.bas");if(r)goto S_50377;} S_50378:; if ((*(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,13868,"ide_methods.bas");if(r)goto S_50378;} do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEWARNINGBOX_LONG_FOCUS-*_FUNC_IDEWARNINGBOX_LONG_F; if(!qbevent)break;evnt(25753,13870,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,13871,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,13871,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEWARNINGBOX_LONG_F); if(!qbevent)break;evnt(25753,13872,"ide_methods.bas");}while(r); S_50383:; if ((*(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,13873,"ide_methods.bas");if(r)goto S_50383;} do{ *_FUNC_IDEWARNINGBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,13873,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,13873,"ide_methods.bas");}while(r); } } fornext_continue_5594:; } fornext_exit_5594:; do{ *_FUNC_IDEWARNINGBOX_LONG_LASTFOCUS=*_FUNC_IDEWARNINGBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,13876,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,13880,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEWARNINGBOX_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDEWARNINGBOX_UDT_P)+(4))+ 1 ,qbs_new_txt_len("Double-click on an item to jump to the line indicated",53),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13880,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,13885,"ide_methods.bas");}while(r); S_50393:; if ((*_FUNC_IDEWARNINGBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,13886,"ide_methods.bas");if(r)goto S_50393;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13886,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEWARNINGBOX_LONG_CY,*_FUNC_IDEWARNINGBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,13886,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13886,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,13889,"ide_methods.bas");}while(r); S_50399:; do{ if(qbevent){evnt(25753,13890,"ide_methods.bas");if(r)goto S_50399;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,13891,"ide_methods.bas");}while(r); S_50401:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,13892,"ide_methods.bas");if(r)goto S_50401;} do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13892,"ide_methods.bas");}while(r); } S_50404:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,13893,"ide_methods.bas");if(r)goto S_50404;} do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13893,"ide_methods.bas");}while(r); } S_50407:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,13894,"ide_methods.bas");if(r)goto S_50407;} do{ *_FUNC_IDEWARNINGBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,13894,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13894,"ide_methods.bas");}while(r); } S_50411:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,13895,"ide_methods.bas");if(r)goto S_50411;} do{ *_FUNC_IDEWARNINGBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,13895,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13895,"ide_methods.bas");}while(r); } S_50415:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,13896,"ide_methods.bas");if(r)goto S_50415;} do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13896,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,13897,"ide_methods.bas");}while(r); S_50419:; if ((-(*_FUNC_IDEWARNINGBOX_LONG_ALT!=*_FUNC_IDEWARNINGBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,13897,"ide_methods.bas");if(r)goto S_50419;} do{ *_FUNC_IDEWARNINGBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,13897,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_OLDALT=*_FUNC_IDEWARNINGBOX_LONG_ALT; if(!qbevent)break;evnt(25753,13898,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,13899,"ide_methods.bas");}while(r); S_50424:; dl_continue_5596:; }while((!(*_FUNC_IDEWARNINGBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5596:; if(qbevent){evnt(25753,13900,"ide_methods.bas");if(r)goto S_50424;} S_50425:; if ((*_FUNC_IDEWARNINGBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,13901,"ide_methods.bas");if(r)goto S_50425;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,13901,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,13901,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13903,"ide_methods.bas");}while(r); S_50431:; if ((*_FUNC_IDEWARNINGBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,13904,"ide_methods.bas");if(r)goto S_50431;} S_50432:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,13905,"ide_methods.bas");if(r)goto S_50432;} do{ *_FUNC_IDEWARNINGBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13906,"ide_methods.bas");}while(r); S_50434:; if (((-(*_FUNC_IDEWARNINGBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEWARNINGBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,13907,"ide_methods.bas");if(r)goto S_50434;} do{ qbs_set(_FUNC_IDEWARNINGBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEWARNINGBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13907,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13910,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,13910,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,13910,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,13914,"ide_methods.bas");}while(r); S_50443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,13915,"ide_methods.bas");if(r)goto S_50443;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13915,"ide_methods.bas");}while(r); } S_50446:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,13916,"ide_methods.bas");if(r)goto S_50446;} do{ *_FUNC_IDEWARNINGBOX_LONG_FOCUS=*_FUNC_IDEWARNINGBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,13916,"ide_methods.bas");}while(r); } S_50449:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,13917,"ide_methods.bas");if(r)goto S_50449;} do{ *_FUNC_IDEWARNINGBOX_LONG_FOCUS=*_FUNC_IDEWARNINGBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,13917,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13917,"ide_methods.bas");}while(r); } S_50453:; if ((-(*_FUNC_IDEWARNINGBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,13918,"ide_methods.bas");if(r)goto S_50453;} do{ *_FUNC_IDEWARNINGBOX_LONG_FOCUS=*_FUNC_IDEWARNINGBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,13918,"ide_methods.bas");}while(r); } S_50456:; if ((-(*_FUNC_IDEWARNINGBOX_LONG_FOCUS>*_FUNC_IDEWARNINGBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,13919,"ide_methods.bas");if(r)goto S_50456;} do{ *_FUNC_IDEWARNINGBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,13919,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEWARNINGBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,13920,"ide_methods.bas");}while(r); S_50460:; fornext_value5599= 1 ; fornext_finalvalue5599= 100 ; fornext_step5599= 1 ; if (fornext_step5599<0) fornext_step_negative5599=1; else fornext_step_negative5599=0; if (new_error) goto fornext_error5599; goto fornext_entrylabel5599; while(1){ fornext_value5599=fornext_step5599+(*_FUNC_IDEWARNINGBOX_LONG_I); fornext_entrylabel5599: *_FUNC_IDEWARNINGBOX_LONG_I=fornext_value5599; if (fornext_step_negative5599){ if (fornext_value5599fornext_finalvalue5599) break; } fornext_error5599:; if(qbevent){evnt(25753,13921,"ide_methods.bas");if(r)goto S_50460;} do{ *_FUNC_IDEWARNINGBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,13922,"ide_methods.bas");}while(r); S_50462:; if ((*_FUNC_IDEWARNINGBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,13923,"ide_methods.bas");if(r)goto S_50462;} do{ *_FUNC_IDEWARNINGBOX_LONG_FOCUSOFFSET=*_FUNC_IDEWARNINGBOX_LONG_FOCUS-*_FUNC_IDEWARNINGBOX_LONG_F; if(!qbevent)break;evnt(25753,13924,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEWARNINGBOX_LONG_I)-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEWARNINGBOX_LONG_FOCUS,_FUNC_IDEWARNINGBOX_LONG_F,_FUNC_IDEWARNINGBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEWARNINGBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEWARNINGBOX_LONG_MOUSEDOWN,_FUNC_IDEWARNINGBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEWARNINGBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13925,"ide_methods.bas");}while(r); } fornext_continue_5598:; } fornext_exit_5598:; S_50467:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEWARNINGBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEWARNINGBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,13930,"ide_methods.bas");if(r)goto S_50467;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13931,"ide_methods.bas");}while(r); } S_50470:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEWARNINGBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEWARNINGBOX_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDEWARNINGBOX_LONG_INFO== 1 ))&(-(*_FUNC_IDEWARNINGBOX_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(25753,13934,"ide_methods.bas");if(r)goto S_50470;} do{ *_FUNC_IDEWARNINGBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[4],_FUNC_IDEWARNINGBOX_ARRAY_UDT_O[5]))*89+64)))); if(!qbevent)break;evnt(25753,13935,"ide_methods.bas");}while(r); S_50472:; if (((-(*_FUNC_IDEWARNINGBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDEWARNINGBOX_LONG_Y<=*__LONG_WARNINGLISTITEMS))&(-(((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_Y)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5])]> 0 )))||new_error){ if(qbevent){evnt(25753,13936,"ide_methods.bas");if(r)goto S_50472;} do{ *__LONG_IDEGOTOBOX_LASTLINENUM=((int32*)(__ARRAY_LONG_WARNINGLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_Y)-__ARRAY_LONG_WARNINGLINES[4],__ARRAY_LONG_WARNINGLINES[5])]; if(!qbevent)break;evnt(25753,13937,"ide_methods.bas");}while(r); do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,13938,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*__LONG_IDEGOTOBOX_LASTLINENUM; if(!qbevent)break;evnt(25753,13939,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,13940,"ide_methods.bas");}while(r); S_50477:; if ((-(((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_Y)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5])]> 0 ))||new_error){ if(qbevent){evnt(25753,13941,"ide_methods.bas");if(r)goto S_50477;} do{ *__LONG_WARNINGININCLUDE=*__LONG_IDECY; if(!qbevent)break;evnt(25753,13942,"ide_methods.bas");}while(r); do{ *__LONG_WARNINGININCLUDELINE=((int32*)(__ARRAY_LONG_WARNINGINCLINES[0]))[array_check((*_FUNC_IDEWARNINGBOX_LONG_Y)-__ARRAY_LONG_WARNINGINCLINES[4],__ARRAY_LONG_WARNINGINCLINES[5])]; if(!qbevent)break;evnt(25753,13943,"ide_methods.bas");}while(r); } do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,13945,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,13946,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEWARNINGBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,13951,"ide_methods.bas");}while(r); do{ *_FUNC_IDEWARNINGBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,13952,"ide_methods.bas");}while(r); dl_continue_5593:; }while(1); dl_exit_5593:; do{ *_FUNC_IDEWARNINGBOX_LONG_IDEWARNINGBOX= 0 ; if(!qbevent)break;evnt(25753,13955,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free201.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_IDEWARNINGBOX_LONG_IDEWARNINGBOX; } void SUB_IDEOBJUPDATE(void*_SUB_IDEOBJUPDATE_UDT_O,int32*_SUB_IDEOBJUPDATE_LONG_FOCUS,int32*_SUB_IDEOBJUPDATE_LONG_F,int32*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET,qbs*_SUB_IDEOBJUPDATE_STRING_KK,qbs*_SUB_IDEOBJUPDATE_STRING_ALTLETTER,int32*_SUB_IDEOBJUPDATE_LONG_MB,int32*_SUB_IDEOBJUPDATE_LONG_MOUSEDOWN,int32*_SUB_IDEOBJUPDATE_LONG_MOUSEUP,int32*_SUB_IDEOBJUPDATE_LONG_MX,int32*_SUB_IDEOBJUPDATE_LONG_MY,int32*_SUB_IDEOBJUPDATE_LONG_INFO,int32*_SUB_IDEOBJUPDATE_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 "data202.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,13959,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,13960,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEOBJUPDATE_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13961,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_T=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(36)); if(!qbevent)break;evnt(25753,13963,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_MOUSEUP=*_SUB_IDEOBJUPDATE_LONG_MOUSEUP; if(!qbevent)break;evnt(25753,13964,"ide_methods.bas");}while(r); S_50494:; if ((-(*_SUB_IDEOBJUPDATE_LONG_T== 1 ))||new_error){ if(qbevent){evnt(25753,13965,"ide_methods.bas");if(r)goto S_50494;} S_50495:; if ((*_SUB_IDEOBJUPDATE_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(25753,13966,"ide_methods.bas");if(r)goto S_50495;} do{ *_SUB_IDEOBJUPDATE_LONG_X1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(20)); if(!qbevent)break;evnt(25753,13967,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_Y=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(24)); if(!qbevent)break;evnt(25753,13967,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X2=*_SUB_IDEOBJUPDATE_LONG_X1; if(!qbevent)break;evnt(25753,13968,"ide_methods.bas");}while(r); S_50499:; if ((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,13969,"ide_methods.bas");if(r)goto S_50499;} do{ *_SUB_IDEOBJUPDATE_LONG_X2=*_SUB_IDEOBJUPDATE_LONG_X2+FUNC_IDEHLEN(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13970,"ide_methods.bas");}while(r); } S_50502:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MY>=(*_SUB_IDEOBJUPDATE_LONG_Y- 1 )))&(-(*_SUB_IDEOBJUPDATE_LONG_MY<=(*_SUB_IDEOBJUPDATE_LONG_Y+ 1 ))))||new_error){ if(qbevent){evnt(25753,13972,"ide_methods.bas");if(r)goto S_50502;} S_50503:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX>=*_SUB_IDEOBJUPDATE_LONG_X1))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<=(*_SUB_IDEOBJUPDATE_LONG_X2+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(28))+ 3 ))))||new_error){ if(qbevent){evnt(25753,13973,"ide_methods.bas");if(r)goto S_50503;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F; if(!qbevent)break;evnt(25753,13974,"ide_methods.bas");}while(r); S_50505:; if ((-(*_SUB_IDEOBJUPDATE_LONG_MY==*_SUB_IDEOBJUPDATE_LONG_Y))||new_error){ if(qbevent){evnt(25753,13976,"ide_methods.bas");if(r)goto S_50505;} S_50506:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX>(*_SUB_IDEOBJUPDATE_LONG_X2+ 1 )))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<(*_SUB_IDEOBJUPDATE_LONG_X2+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(28))+ 2 ))))||new_error){ if(qbevent){evnt(25753,13977,"ide_methods.bas");if(r)goto S_50506;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13978,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X=*_SUB_IDEOBJUPDATE_LONG_MX-*_SUB_IDEOBJUPDATE_LONG_X2- 2 ; if(!qbevent)break;evnt(25753,13979,"ide_methods.bas");}while(r); S_50509:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDEOBJUPDATE_LONG_X==*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))))&(-(*_SUB_IDEOBJUPDATE_LONG_X!=_SUB_IDEOBJUPDATE_STRING_A->len))))||new_error){ if(qbevent){evnt(25753,13980,"ide_methods.bas");if(r)goto S_50509;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13981,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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_IDEOBJUPDATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13982,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))= 0 ; if(!qbevent)break;evnt(25753,13983,"ide_methods.bas");}while(r); }else{ S_50514:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEOBJUPDATE_LONG_X<=_SUB_IDEOBJUPDATE_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,13985,"ide_methods.bas");if(r)goto S_50514;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*_SUB_IDEOBJUPDATE_LONG_X; if(!qbevent)break;evnt(25753,13985,"ide_methods.bas");}while(r); }else{ do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=_SUB_IDEOBJUPDATE_STRING_A->len; if(!qbevent)break;evnt(25753,13985,"ide_methods.bas");}while(r); } do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,13986,"ide_methods.bas");}while(r); } } } } } } do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13994,"ide_methods.bas");}while(r); S_50527:; if ((-(*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(25753,13995,"ide_methods.bas");if(r)goto S_50527;} S_50528:; if ((qbs_cleanup(qbs_tmp_base,(-(_SUB_IDEOBJUPDATE_STRING_KK->len== 1 ))|(-(*__LONG_KB!= 0 ))))||new_error){ if(qbevent){evnt(25753,13996,"ide_methods.bas");if(r)goto S_50528;} S_50529:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEOBJUPDATE_STRING_KK->len== 1 )))||new_error){ if(qbevent){evnt(25753,13997,"ide_methods.bas");if(r)goto S_50529;} do{ *_SUB_IDEOBJUPDATE_LONG_K=qbs_asc(_SUB_IDEOBJUPDATE_STRING_KK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13997,"ide_methods.bas");}while(r); } S_50532:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK),qbs_new_txt_len("V",1))))))||new_error){ if(qbevent){evnt(25753,13998,"ide_methods.bas");if(r)goto S_50532;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13999,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X=func_instr(NULL,_SUB_IDEOBJUPDATE_STRING_CLIP,func_chr( 13 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14000,"ide_methods.bas");}while(r); S_50535:; if ((*_SUB_IDEOBJUPDATE_LONG_X)||new_error){ if(qbevent){evnt(25753,14001,"ide_methods.bas");if(r)goto S_50535;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_CLIP,qbs_left(_SUB_IDEOBJUPDATE_STRING_CLIP,*_SUB_IDEOBJUPDATE_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14001,"ide_methods.bas");}while(r); } do{ *_SUB_IDEOBJUPDATE_LONG_X=func_instr(NULL,_SUB_IDEOBJUPDATE_STRING_CLIP,func_chr( 10 ),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14002,"ide_methods.bas");}while(r); S_50539:; if ((*_SUB_IDEOBJUPDATE_LONG_X)||new_error){ if(qbevent){evnt(25753,14003,"ide_methods.bas");if(r)goto S_50539;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_CLIP,qbs_left(_SUB_IDEOBJUPDATE_STRING_CLIP,*_SUB_IDEOBJUPDATE_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14003,"ide_methods.bas");}while(r); } S_50542:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEOBJUPDATE_STRING_CLIP->len))||new_error){ if(qbevent){evnt(25753,14004,"ide_methods.bas");if(r)goto S_50542;} S_50543:; if ((*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76)))||new_error){ if(qbevent){evnt(25753,14005,"ide_methods.bas");if(r)goto S_50543;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14006,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14006,"ide_methods.bas");}while(r); S_50546:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14007,"ide_methods.bas");if(r)goto S_50546;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14007,"ide_methods.bas");}while(r); } S_50549:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14008,"ide_methods.bas");if(r)goto S_50549;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1),_SUB_IDEOBJUPDATE_STRING_CLIP),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14009,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*_SUB_IDEOBJUPDATE_LONG_SX1; if(!qbevent)break;evnt(25753,14010,"ide_methods.bas");}while(r); S_50552:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,14011,"ide_methods.bas");if(r)goto S_50552;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*_SUB_IDEOBJUPDATE_LONG_SX1+_SUB_IDEOBJUPDATE_STRING_CLIP->len; if(!qbevent)break;evnt(25753,14011,"ide_methods.bas");}while(r); } do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14012,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))),_SUB_IDEOBJUPDATE_STRING_CLIP),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14015,"ide_methods.bas");}while(r); S_50559:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,14016,"ide_methods.bas");if(r)goto S_50559;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))+_SUB_IDEOBJUPDATE_STRING_CLIP->len; if(!qbevent)break;evnt(25753,14016,"ide_methods.bas");}while(r); } } } do{ *_SUB_IDEOBJUPDATE_LONG_K= 255 ; if(!qbevent)break;evnt(25753,14019,"ide_methods.bas");}while(r); } S_50566:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK),qbs_new_txt_len("A",1))))))||new_error){ if(qbevent){evnt(25753,14022,"ide_methods.bas");if(r)goto S_50566;} S_50567:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEOBJUPDATE_STRING_A->len> 0 )))||new_error){ if(qbevent){evnt(25753,14023,"ide_methods.bas");if(r)goto S_50567;} do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= -1 ; if(!qbevent)break;evnt(25753,14024,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77))= 0 ; if(!qbevent)break;evnt(25753,14025,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=_SUB_IDEOBJUPDATE_STRING_A->len; if(!qbevent)break;evnt(25753,14026,"ide_methods.bas");}while(r); } do{ *_SUB_IDEOBJUPDATE_LONG_K= 255 ; if(!qbevent)break;evnt(25753,14028,"ide_methods.bas");}while(r); } S_50574:; if ((qbs_cleanup(qbs_tmp_base,((*__LONG_KCTRL&(-(*__LONG_KB== 20992 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK),qbs_new_txt_len("C",1)))))))||new_error){ if(qbevent){evnt(25753,14031,"ide_methods.bas");if(r)goto S_50574;} S_50575:; if ((*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76)))||new_error){ if(qbevent){evnt(25753,14032,"ide_methods.bas");if(r)goto S_50575;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14033,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14033,"ide_methods.bas");}while(r); S_50578:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14034,"ide_methods.bas");if(r)goto S_50578;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14034,"ide_methods.bas");}while(r); } S_50581:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14035,"ide_methods.bas");if(r)goto S_50581;} do{ sub__clipboard(func_mid(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1+ 1 ,*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14035,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEOBJUPDATE_LONG_K= 255 ; if(!qbevent)break;evnt(25753,14037,"ide_methods.bas");}while(r); } S_50587:; if ((qbs_cleanup(qbs_tmp_base,((*__LONG_KSHIFT&(-(*__LONG_KB== 21248 )))|(*__LONG_KCONTROL&(qbs_equal(qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK),qbs_new_txt_len("X",1)))))))||new_error){ if(qbevent){evnt(25753,14040,"ide_methods.bas");if(r)goto S_50587;} S_50588:; if ((*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76)))||new_error){ if(qbevent){evnt(25753,14041,"ide_methods.bas");if(r)goto S_50588;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14042,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14042,"ide_methods.bas");}while(r); S_50591:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14043,"ide_methods.bas");if(r)goto S_50591;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14043,"ide_methods.bas");}while(r); } S_50594:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14044,"ide_methods.bas");if(r)goto S_50594;} do{ sub__clipboard(func_mid(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1+ 1 ,*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14045,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14047,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*_SUB_IDEOBJUPDATE_LONG_SX1; if(!qbevent)break;evnt(25753,14048,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14049,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEOBJUPDATE_LONG_K= 255 ; if(!qbevent)break;evnt(25753,14052,"ide_methods.bas");}while(r); } S_50603:; if (((-(*_SUB_IDEOBJUPDATE_LONG_K== 8 ))&(-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))> 0 )))||new_error){ if(qbevent){evnt(25753,14055,"ide_methods.bas");if(r)goto S_50603;} S_50604:; if ((*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76)))||new_error){ if(qbevent){evnt(25753,14056,"ide_methods.bas");if(r)goto S_50604;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14057,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14057,"ide_methods.bas");}while(r); S_50607:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14058,"ide_methods.bas");if(r)goto S_50607;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14058,"ide_methods.bas");}while(r); } S_50610:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14059,"ide_methods.bas");if(r)goto S_50610;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14061,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14062,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A1,qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14065,"ide_methods.bas");}while(r); S_50616:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))<=_SUB_IDEOBJUPDATE_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,14066,"ide_methods.bas");if(r)goto S_50616;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14066,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14066,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(_SUB_IDEOBJUPDATE_STRING_A1,_SUB_IDEOBJUPDATE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14067,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))- 1 ; if(!qbevent)break;evnt(25753,14067,"ide_methods.bas");}while(r); } S_50624:; }else{ if ((-(*_SUB_IDEOBJUPDATE_LONG_K== 8 ))&*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))){ if(qbevent){evnt(25753,14069,"ide_methods.bas");if(r)goto S_50624;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14070,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14070,"ide_methods.bas");}while(r); S_50627:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14071,"ide_methods.bas");if(r)goto S_50627;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14071,"ide_methods.bas");}while(r); } S_50630:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14072,"ide_methods.bas");if(r)goto S_50630;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14074,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14075,"ide_methods.bas");}while(r); } } } S_50635:; if (((-(*_SUB_IDEOBJUPDATE_LONG_K!= 8 ))&(-(*_SUB_IDEOBJUPDATE_LONG_K!= 9 ))&(-(*_SUB_IDEOBJUPDATE_LONG_K!= 0 ))&(-(*_SUB_IDEOBJUPDATE_LONG_K!= 10 ))&(-(*_SUB_IDEOBJUPDATE_LONG_K!= 13 ))&(-(*_SUB_IDEOBJUPDATE_LONG_K!= 26 ))&(-(*_SUB_IDEOBJUPDATE_LONG_K!= 255 ))&((((-(*__LONG_KALT== 0 ))&(-(*__LONG_KCTRL== 0 )))|((-(*__LONG_KALT== -1 ))&(-(*__LONG_KCTRL== -1 ))))))||new_error){ if(qbevent){evnt(25753,14078,"ide_methods.bas");if(r)goto S_50635;} S_50636:; if ((*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76)))||new_error){ if(qbevent){evnt(25753,14079,"ide_methods.bas");if(r)goto S_50636;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14080,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14080,"ide_methods.bas");}while(r); S_50639:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14081,"ide_methods.bas");if(r)goto S_50639;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14081,"ide_methods.bas");}while(r); } S_50642:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14082,"ide_methods.bas");if(r)goto S_50642;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14084,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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_IDEOBJUPDATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14085,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14086,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*_SUB_IDEOBJUPDATE_LONG_SX1; if(!qbevent)break;evnt(25753,14087,"ide_methods.bas");}while(r); } } S_50649:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))> 0 ))||new_error){ if(qbevent){evnt(25753,14090,"ide_methods.bas");if(r)goto S_50649;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A1,qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14090,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14090,"ide_methods.bas");}while(r); } S_50654:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))<=_SUB_IDEOBJUPDATE_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,14091,"ide_methods.bas");if(r)goto S_50654;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14091,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14091,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_add(_SUB_IDEOBJUPDATE_STRING_A1,_SUB_IDEOBJUPDATE_STRING_KK),_SUB_IDEOBJUPDATE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14092,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))+ 1 ; if(!qbevent)break;evnt(25753,14092,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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_IDEOBJUPDATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14094,"ide_methods.bas");}while(r); } S_50664:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("S",1))))))||new_error){ if(qbevent){evnt(25753,14096,"ide_methods.bas");if(r)goto S_50664;} S_50665:; if ((*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76)))||new_error){ if(qbevent){evnt(25753,14097,"ide_methods.bas");if(r)goto S_50665;} do{ *_SUB_IDEOBJUPDATE_LONG_SX1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77)); if(!qbevent)break;evnt(25753,14098,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SX2=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14098,"ide_methods.bas");}while(r); S_50668:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SX1>*_SUB_IDEOBJUPDATE_LONG_SX2))||new_error){ if(qbevent){evnt(25753,14099,"ide_methods.bas");if(r)goto S_50668;} do{ swap_32(&*_SUB_IDEOBJUPDATE_LONG_SX1,&*_SUB_IDEOBJUPDATE_LONG_SX2); if(!qbevent)break;evnt(25753,14099,"ide_methods.bas");}while(r); } S_50671:; if ((-((*_SUB_IDEOBJUPDATE_LONG_SX2-*_SUB_IDEOBJUPDATE_LONG_SX1)>( 0 )))||new_error){ if(qbevent){evnt(25753,14100,"ide_methods.bas");if(r)goto S_50671;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_SX1),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_SX2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14102,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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_IDEOBJUPDATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14103,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*_SUB_IDEOBJUPDATE_LONG_SX1; if(!qbevent)break;evnt(25753,14104,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14105,"ide_methods.bas");}while(r); } }else{ S_50678:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))> 0 ))||new_error){ if(qbevent){evnt(25753,14108,"ide_methods.bas");if(r)goto S_50678;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A1,qbs_left(_SUB_IDEOBJUPDATE_STRING_A,*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14108,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A1,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14108,"ide_methods.bas");}while(r); } S_50683:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))<_SUB_IDEOBJUPDATE_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,14109,"ide_methods.bas");if(r)goto S_50683;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14109,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14109,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,qbs_add(_SUB_IDEOBJUPDATE_STRING_A1,_SUB_IDEOBJUPDATE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14110,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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_IDEOBJUPDATE_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14111,"ide_methods.bas");}while(r); } } S_50692:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("K",1))))))||new_error){ if(qbevent){evnt(25753,14116,"ide_methods.bas");if(r)goto S_50692;} do{ return_point[next_return_point++]=165; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_165:; if(!qbevent)break;evnt(25753,14116,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))- 1 ; if(!qbevent)break;evnt(25753,14116,"ide_methods.bas");}while(r); } S_50696:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("M",1))))))||new_error){ if(qbevent){evnt(25753,14117,"ide_methods.bas");if(r)goto S_50696;} do{ return_point[next_return_point++]=166; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_166:; if(!qbevent)break;evnt(25753,14117,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))+ 1 ; if(!qbevent)break;evnt(25753,14117,"ide_methods.bas");}while(r); } S_50700:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("G",1))))))||new_error){ if(qbevent){evnt(25753,14118,"ide_methods.bas");if(r)goto S_50700;} do{ return_point[next_return_point++]=167; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_167:; if(!qbevent)break;evnt(25753,14118,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))= 0 ; if(!qbevent)break;evnt(25753,14118,"ide_methods.bas");}while(r); } S_50704:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("O",1))))))||new_error){ if(qbevent){evnt(25753,14119,"ide_methods.bas");if(r)goto S_50704;} do{ return_point[next_return_point++]=168; if (next_return_point>=return_points) more_return_points(); goto LABEL_SELECTCHECK; RETURN_168:; if(!qbevent)break;evnt(25753,14119,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=_SUB_IDEOBJUPDATE_STRING_A->len; if(!qbevent)break;evnt(25753,14119,"ide_methods.bas");}while(r); } S_50708:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))< 0 ))||new_error){ if(qbevent){evnt(25753,14120,"ide_methods.bas");if(r)goto S_50708;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))= 0 ; if(!qbevent)break;evnt(25753,14120,"ide_methods.bas");}while(r); } S_50711:; if ((qbs_cleanup(qbs_tmp_base,-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))>_SUB_IDEOBJUPDATE_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,14121,"ide_methods.bas");if(r)goto S_50711;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))=_SUB_IDEOBJUPDATE_STRING_A->len; if(!qbevent)break;evnt(25753,14121,"ide_methods.bas");}while(r); } S_50714:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))==*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77))))||new_error){ if(qbevent){evnt(25753,14122,"ide_methods.bas");if(r)goto S_50714;} do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14122,"ide_methods.bas");}while(r); } } S_50718:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEOBJUPDATE_STRING_ALTLETTER->len))||new_error){ if(qbevent){evnt(25753,14125,"ide_methods.bas");if(r)goto S_50718;} S_50719:; if ((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,14126,"ide_methods.bas");if(r)goto S_50719;} do{ *_SUB_IDEOBJUPDATE_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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(25753,14127,"ide_methods.bas");}while(r); S_50721:; if ((*_SUB_IDEOBJUPDATE_LONG_X)||new_error){ if(qbevent){evnt(25753,14128,"ide_methods.bas");if(r)goto S_50721;} S_50722:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_SUB_IDEOBJUPDATE_LONG_X+ 1 , 1 ,1)),_SUB_IDEOBJUPDATE_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(25753,14129,"ide_methods.bas");if(r)goto S_50722;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F; if(!qbevent)break;evnt(25753,14129,"ide_methods.bas");}while(r); } } } } do{ *_SUB_IDEOBJUPDATE_LONG_F=*_SUB_IDEOBJUPDATE_LONG_F+ 1 ; if(!qbevent)break;evnt(25753,14133,"ide_methods.bas");}while(r); } S_50730:; if ((-(*_SUB_IDEOBJUPDATE_LONG_T== 2 ))||new_error){ if(qbevent){evnt(25753,14136,"ide_methods.bas");if(r)goto S_50730;} do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(72)))-__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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14137,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14140,"ide_methods.bas");}while(r); do{ if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS)[8])->id=(++mem_lock_id); if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&1){ tmp_long=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[tmp_long]); free((void*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0])); } _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]= 0 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]=( 0 )-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[6]=1; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]=(ptrszint)malloc(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]*8); if (!_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]) error(257); _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]|=1; tmp_long=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&4){ while(tmp_long--) ((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,14141,"ide_methods.bas");}while(r); do{ if (_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS)[8])->id=(++mem_lock_id); if (_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]&1){ tmp_long=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]))[tmp_long]); free((void*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0])); } _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]= 0 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]=( 0 )-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[6]=1; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]=(ptrszint)malloc(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]*8); if (!_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]) error(257); _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]|=1; tmp_long=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]&4){ while(tmp_long--) ((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,14142,"ide_methods.bas");}while(r); S_50735:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEOBJUPDATE_STRING_A->len> 0 )))||new_error){ if(qbevent){evnt(25753,14143,"ide_methods.bas");if(r)goto S_50735;} do{ *_SUB_IDEOBJUPDATE_LONG_N= 0 ; if(!qbevent)break;evnt(25753,14144,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X= 1 ; if(!qbevent)break;evnt(25753,14144,"ide_methods.bas");}while(r); S_50738:; do{ if(qbevent){evnt(25753,14145,"ide_methods.bas");if(r)goto S_50738;} do{ *_SUB_IDEOBJUPDATE_LONG_X2=func_instr(*_SUB_IDEOBJUPDATE_LONG_X,_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING1_SEP,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14146,"ide_methods.bas");}while(r); S_50740:; if ((-(*_SUB_IDEOBJUPDATE_LONG_X2> 0 ))||new_error){ if(qbevent){evnt(25753,14147,"ide_methods.bas");if(r)goto S_50740;} do{ *_SUB_IDEOBJUPDATE_LONG_N=*_SUB_IDEOBJUPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,14148,"ide_methods.bas");}while(r); S_50742:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEOBJUPDATE_LONG_N>func_ubound(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS,1,1))))||new_error){ if(qbevent){evnt(25753,14149,"ide_methods.bas");if(r)goto S_50742;} do{ if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&1){ preserved_elements=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; } else preserved_elements=0; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]= 1 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]=(*_SUB_IDEOBJUPDATE_LONG_N+ 999 )-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]&1){ preserved_elements=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; } else preserved_elements=0; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]= 1 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]=(*_SUB_IDEOBJUPDATE_LONG_N+ 999 )-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; if (tmp_long2len))||new_error){ if(qbevent){evnt(25753,14155,"ide_methods.bas");if(r)goto S_50748;} S_50749:; while((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])))< 32 ))|(-(qbs_asc(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])))> 126 ))))||new_error){ if(qbevent){evnt(25753,14156,"ide_methods.bas");if(r)goto S_50749;} do{ tmp_long=array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[tmp_long])),func_mid(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14157,"ide_methods.bas");}while(r); S_50751:; if ((qbs_cleanup(qbs_tmp_base,-(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])]))->len== 0 )))||new_error){ if(qbevent){evnt(25753,14158,"ide_methods.bas");if(r)goto S_50751;} do{ goto dl_exit_5632; if(!qbevent)break;evnt(25753,14158,"ide_methods.bas");}while(r); } dl_continue_5632:; } dl_exit_5632:; } }else{ do{ *_SUB_IDEOBJUPDATE_LONG_N=*_SUB_IDEOBJUPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,14162,"ide_methods.bas");}while(r); S_50758:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEOBJUPDATE_LONG_N>func_ubound(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS,1,1))))||new_error){ if(qbevent){evnt(25753,14163,"ide_methods.bas");if(r)goto S_50758;} do{ if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&1){ preserved_elements=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; } else preserved_elements=0; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]= 1 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]=(*_SUB_IDEOBJUPDATE_LONG_N+ 999 )-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]&1){ preserved_elements=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; } else preserved_elements=0; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]= 1 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]=(*_SUB_IDEOBJUPDATE_LONG_N+ 999 )-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; if (tmp_long2len-*_SUB_IDEOBJUPDATE_LONG_X+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14167,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]))[tmp_long])),qbs_right(_SUB_IDEOBJUPDATE_STRING_A,_SUB_IDEOBJUPDATE_STRING_A->len-*_SUB_IDEOBJUPDATE_LONG_X+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14168,"ide_methods.bas");}while(r); S_50764:; if ((qbs_cleanup(qbs_tmp_base,((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])]))->len))||new_error){ if(qbevent){evnt(25753,14169,"ide_methods.bas");if(r)goto S_50764;} S_50765:; while((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])))< 32 ))|(-(qbs_asc(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])))> 126 ))))||new_error){ if(qbevent){evnt(25753,14170,"ide_methods.bas");if(r)goto S_50765;} do{ tmp_long=array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[tmp_long])),func_mid(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])), 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14171,"ide_methods.bas");}while(r); S_50767:; if ((qbs_cleanup(qbs_tmp_base,-(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])]))->len== 0 )))||new_error){ if(qbevent){evnt(25753,14172,"ide_methods.bas");if(r)goto S_50767;} do{ goto dl_exit_5637; if(!qbevent)break;evnt(25753,14172,"ide_methods.bas");}while(r); } dl_continue_5637:; } dl_exit_5637:; } do{ goto dl_exit_5630; if(!qbevent)break;evnt(25753,14175,"ide_methods.bas");}while(r); } do{ *_SUB_IDEOBJUPDATE_LONG_X=*_SUB_IDEOBJUPDATE_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,14177,"ide_methods.bas");}while(r); dl_continue_5630:; }while(1); dl_exit_5630:; do{ if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[2]&1){ preserved_elements=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; } else preserved_elements=0; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]= 1 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]=(*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[2]&1){ preserved_elements=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; } else preserved_elements=0; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]= 1 ; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]=(*_SUB_IDEOBJUPDATE_LONG_N)-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4]+1; _SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5]; if (tmp_long2=*_SUB_IDEOBJUPDATE_LONG_X1))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<=*_SUB_IDEOBJUPDATE_LONG_X2))&(-(*_SUB_IDEOBJUPDATE_LONG_MY>=*_SUB_IDEOBJUPDATE_LONG_Y1))&(-(*_SUB_IDEOBJUPDATE_LONG_MY<=*_SUB_IDEOBJUPDATE_LONG_Y2)))||new_error){ if(qbevent){evnt(25753,14186,"ide_methods.bas");if(r)goto S_50784;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F; if(!qbevent)break;evnt(25753,14187,"ide_methods.bas");}while(r); S_50786:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX>*_SUB_IDEOBJUPDATE_LONG_X1))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<*_SUB_IDEOBJUPDATE_LONG_X2))&(-(*_SUB_IDEOBJUPDATE_LONG_MY>*_SUB_IDEOBJUPDATE_LONG_Y1))&(-(*_SUB_IDEOBJUPDATE_LONG_MY<*_SUB_IDEOBJUPDATE_LONG_Y2)))||new_error){ if(qbevent){evnt(25753,14188,"ide_methods.bas");if(r)goto S_50786;} do{ *_SUB_IDEOBJUPDATE_LONG_Y=*_SUB_IDEOBJUPDATE_LONG_MY-*_SUB_IDEOBJUPDATE_LONG_Y1- 1 ; if(!qbevent)break;evnt(25753,14189,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_Y=*_SUB_IDEOBJUPDATE_LONG_Y+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14190,"ide_methods.bas");}while(r); S_50789:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))==*_SUB_IDEOBJUPDATE_LONG_Y))||new_error){ if(qbevent){evnt(25753,14191,"ide_methods.bas");if(r)goto S_50789;} do{ *_SUB_IDEOBJUPDATE_LONG_INFO= 1 ; if(!qbevent)break;evnt(25753,14191,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*_SUB_IDEOBJUPDATE_LONG_Y; if(!qbevent)break;evnt(25753,14192,"ide_methods.bas");}while(r); S_50793:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85))))||new_error){ if(qbevent){evnt(25753,14193,"ide_methods.bas");if(r)goto S_50793;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85))); if(!qbevent)break;evnt(25753,14193,"ide_methods.bas");}while(r); } } } } S_50799:; if ((*_SUB_IDEOBJUPDATE_LONG_MB)||new_error){ if(qbevent){evnt(25753,14199,"ide_methods.bas");if(r)goto S_50799;} S_50800:; if ((-(*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(25753,14200,"ide_methods.bas");if(r)goto S_50800;} do{ *_SUB_IDEOBJUPDATE_LONG_X1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(20)); if(!qbevent)break;evnt(25753,14202,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_Y1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(24)); if(!qbevent)break;evnt(25753,14202,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X2=*_SUB_IDEOBJUPDATE_LONG_X1+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(28))+ 1 ; if(!qbevent)break;evnt(25753,14203,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_Y2=*_SUB_IDEOBJUPDATE_LONG_Y1+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(25753,14203,"ide_methods.bas");}while(r); S_50805:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX>=*_SUB_IDEOBJUPDATE_LONG_X1))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<=*_SUB_IDEOBJUPDATE_LONG_X2))&(-(*_SUB_IDEOBJUPDATE_LONG_MY>=*_SUB_IDEOBJUPDATE_LONG_Y1))&(-(*_SUB_IDEOBJUPDATE_LONG_MY<=*_SUB_IDEOBJUPDATE_LONG_Y2)))||new_error){ if(qbevent){evnt(25753,14204,"ide_methods.bas");if(r)goto S_50805;} S_50806:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX==*_SUB_IDEOBJUPDATE_LONG_X2))&(-(*_SUB_IDEOBJUPDATE_LONG_MY>(*_SUB_IDEOBJUPDATE_LONG_Y1+ 1 )))&(-(*_SUB_IDEOBJUPDATE_LONG_MY<(*_SUB_IDEOBJUPDATE_LONG_Y2- 1 ))))||new_error){ if(qbevent){evnt(25753,14206,"ide_methods.bas");if(r)goto S_50806;} do{ *_SUB_IDEOBJUPDATE_LONG_TSEL=func_abs((int32)(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64)))); if(!qbevent)break;evnt(25753,14208,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_TNUM=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85)); if(!qbevent)break;evnt(25753,14209,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_Q=FUNC_IDEVBAR(_SUB_IDEOBJUPDATE_LONG_X2,&(pass5639=*_SUB_IDEOBJUPDATE_LONG_Y1+ 1 ),(int32*)(void*)( ((char*)(_SUB_IDEOBJUPDATE_UDT_O)) + (32) ),_SUB_IDEOBJUPDATE_LONG_TSEL,_SUB_IDEOBJUPDATE_LONG_TNUM); if(!qbevent)break;evnt(25753,14210,"ide_methods.bas");}while(r); S_50810:; if ((-(*_SUB_IDEOBJUPDATE_LONG_MY<*_SUB_IDEOBJUPDATE_LONG_Q))||new_error){ if(qbevent){evnt(25753,14212,"ide_methods.bas");if(r)goto S_50810;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 73 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14213,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,14214,"ide_methods.bas");}while(r); } S_50814:; if ((-(*_SUB_IDEOBJUPDATE_LONG_MY>*_SUB_IDEOBJUPDATE_LONG_Q))||new_error){ if(qbevent){evnt(25753,14216,"ide_methods.bas");if(r)goto S_50814;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 81 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14217,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,14218,"ide_methods.bas");}while(r); } } S_50819:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX==*_SUB_IDEOBJUPDATE_LONG_X2))&(-(*_SUB_IDEOBJUPDATE_LONG_MY==(*_SUB_IDEOBJUPDATE_LONG_Y1+ 1 ))))||new_error){ if(qbevent){evnt(25753,14222,"ide_methods.bas");if(r)goto S_50819;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 72 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14223,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,14224,"ide_methods.bas");}while(r); } S_50823:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX==*_SUB_IDEOBJUPDATE_LONG_X2))&(-(*_SUB_IDEOBJUPDATE_LONG_MY==(*_SUB_IDEOBJUPDATE_LONG_Y2- 1 ))))||new_error){ if(qbevent){evnt(25753,14226,"ide_methods.bas");if(r)goto S_50823;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_KK,qbs_add(func_chr( 0 ),func_chr( 80 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14227,"ide_methods.bas");}while(r); do{ SUB_IDEWAIT(); if(!qbevent)break;evnt(25753,14228,"ide_methods.bas");}while(r); } } } } S_50830:; if ((-(*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(25753,14236,"ide_methods.bas");if(r)goto S_50830;} S_50831:; if ((*_SUB_IDEOBJUPDATE_LONG_MW)||new_error){ if(qbevent){evnt(25753,14237,"ide_methods.bas");if(r)goto S_50831;} S_50832:; if ((-(*_SUB_IDEOBJUPDATE_LONG_MW< 0 ))||new_error){ if(qbevent){evnt(25753,14239,"ide_methods.bas");if(r)goto S_50832;} S_50833:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))))||new_error){ if(qbevent){evnt(25753,14240,"ide_methods.bas");if(r)goto S_50833;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14240,"ide_methods.bas");}while(r); } }else{ do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(32))- 1 ; if(!qbevent)break;evnt(25753,14242,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))+(*_SUB_IDEOBJUPDATE_LONG_MW* 3 ); if(!qbevent)break;evnt(25753,14244,"ide_methods.bas");}while(r); S_50840:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 1 ))||new_error){ if(qbevent){evnt(25753,14245,"ide_methods.bas");if(r)goto S_50840;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(25753,14245,"ide_methods.bas");}while(r); } S_50843:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85))))||new_error){ if(qbevent){evnt(25753,14246,"ide_methods.bas");if(r)goto S_50843;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85)); if(!qbevent)break;evnt(25753,14246,"ide_methods.bas");}while(r); } } S_50847:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 72 ))))))||new_error){ if(qbevent){evnt(25753,14249,"ide_methods.bas");if(r)goto S_50847;} S_50848:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(25753,14250,"ide_methods.bas");if(r)goto S_50848;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))); if(!qbevent)break;evnt(25753,14251,"ide_methods.bas");}while(r); }else{ do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))- 1 ; if(!qbevent)break;evnt(25753,14253,"ide_methods.bas");}while(r); S_50852:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 1 ))||new_error){ if(qbevent){evnt(25753,14254,"ide_methods.bas");if(r)goto S_50852;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(25753,14254,"ide_methods.bas");}while(r); } } } S_50857:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 80 ))))))||new_error){ if(qbevent){evnt(25753,14258,"ide_methods.bas");if(r)goto S_50857;} S_50858:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(25753,14259,"ide_methods.bas");if(r)goto S_50858;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))); if(!qbevent)break;evnt(25753,14260,"ide_methods.bas");}while(r); }else{ do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))+ 1 ; if(!qbevent)break;evnt(25753,14262,"ide_methods.bas");}while(r); S_50862:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85))))||new_error){ if(qbevent){evnt(25753,14263,"ide_methods.bas");if(r)goto S_50862;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85)); if(!qbevent)break;evnt(25753,14263,"ide_methods.bas");}while(r); } } } S_50867:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 73 ))))))||new_error){ if(qbevent){evnt(25753,14267,"ide_methods.bas");if(r)goto S_50867;} S_50868:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(25753,14268,"ide_methods.bas");if(r)goto S_50868;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))); if(!qbevent)break;evnt(25753,14269,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))-*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(32))+ 1 ; if(!qbevent)break;evnt(25753,14271,"ide_methods.bas");}while(r); S_50872:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 1 ))||new_error){ if(qbevent){evnt(25753,14272,"ide_methods.bas");if(r)goto S_50872;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(25753,14272,"ide_methods.bas");}while(r); } } S_50876:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),func_chr( 81 ))))))||new_error){ if(qbevent){evnt(25753,14275,"ide_methods.bas");if(r)goto S_50876;} S_50877:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))< 0 ))||new_error){ if(qbevent){evnt(25753,14276,"ide_methods.bas");if(r)goto S_50877;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))); if(!qbevent)break;evnt(25753,14277,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(32))- 1 ; if(!qbevent)break;evnt(25753,14279,"ide_methods.bas");}while(r); S_50881:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))>*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85))))||new_error){ if(qbevent){evnt(25753,14280,"ide_methods.bas");if(r)goto S_50881;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85)); if(!qbevent)break;evnt(25753,14280,"ide_methods.bas");}while(r); } } S_50885:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("w",1))))))||new_error){ if(qbevent){evnt(25753,14283,"ide_methods.bas");if(r)goto S_50885;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(25753,14284,"ide_methods.bas");}while(r); } S_50888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("u",1))))))||new_error){ if(qbevent){evnt(25753,14287,"ide_methods.bas");if(r)goto S_50888;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(85)); if(!qbevent)break;evnt(25753,14288,"ide_methods.bas");}while(r); } S_50891:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEOBJUPDATE_STRING_KK->len== 1 )))||new_error){ if(qbevent){evnt(25753,14291,"ide_methods.bas");if(r)goto S_50891;} do{ *_SUB_IDEOBJUPDATE_LONG_RESETKEYBTIMER= 0 ; if(!qbevent)break;evnt(25753,14292,"ide_methods.bas");}while(r); S_50893:; if ((-(FUNC_TIMEELAPSEDSINCE(_SUB_IDEOBJUPDATE_SINGLE_LASTKEYBINPUT)> 1 ))||new_error){ if(qbevent){evnt(25753,14293,"ide_methods.bas");if(r)goto S_50893;} do{ qbs_set(__STRING_FILEDLGSEARCHTERM,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14293,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_RESETKEYBTIMER= -1 ; if(!qbevent)break;evnt(25753,14293,"ide_methods.bas");}while(r); } do{ *_SUB_IDEOBJUPDATE_SINGLE_LASTKEYBINPUT=func_timer(NULL,0); if(!qbevent)break;evnt(25753,14294,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_K=qbs_asc(qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14295,"ide_methods.bas");}while(r); S_50899:; if (((-(*_SUB_IDEOBJUPDATE_LONG_K< 32 ))|(-(*_SUB_IDEOBJUPDATE_LONG_K> 126 )))||new_error){ if(qbevent){evnt(25753,14296,"ide_methods.bas");if(r)goto S_50899;} do{ goto LABEL_SELECTED; if(!qbevent)break;evnt(25753,14297,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_FILEDLGSEARCHTERM,qbs_add(__STRING_FILEDLGSEARCHTERM,qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14300,"ide_methods.bas");}while(r); S_50903:; if ((qbs_cleanup(qbs_tmp_base,(-(__STRING_FILEDLGSEARCHTERM->len== 2 ))&(qbs_equal(qbs_left(__STRING_FILEDLGSEARCHTERM, 1 ),qbs_right(__STRING_FILEDLGSEARCHTERM, 1 )))))||new_error){ if(qbevent){evnt(25753,14302,"ide_methods.bas");if(r)goto S_50903;} do{ *_SUB_IDEOBJUPDATE_LONG_RESETKEYBTIMER= -1 ; if(!qbevent)break;evnt(25753,14305,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_FILEDLGSEARCHTERM,qbs_ucase(_SUB_IDEOBJUPDATE_STRING_KK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14306,"ide_methods.bas");}while(r); } do{ *_SUB_IDEOBJUPDATE_LONG_SEARCHPASS= 1 ; if(!qbevent)break;evnt(25753,14309,"ide_methods.bas");}while(r); S_50908:; if ((~(*_SUB_IDEOBJUPDATE_LONG_RESETKEYBTIMER))||new_error){ if(qbevent){evnt(25753,14310,"ide_methods.bas");if(r)goto S_50908;} do{ *_SUB_IDEOBJUPDATE_LONG_STARTSEARCH=func_abs((int32)(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64)))); if(!qbevent)break;evnt(25753,14310,"ide_methods.bas");}while(r); }else{ do{ *_SUB_IDEOBJUPDATE_LONG_STARTSEARCH=func_abs((int32)(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))))+ 1 ; if(!qbevent)break;evnt(25753,14310,"ide_methods.bas");}while(r); } S_50913:; if (((-(*_SUB_IDEOBJUPDATE_LONG_STARTSEARCH< 1 ))|(-(*_SUB_IDEOBJUPDATE_LONG_STARTSEARCH>*_SUB_IDEOBJUPDATE_LONG_N)))||new_error){ if(qbevent){evnt(25753,14311,"ide_methods.bas");if(r)goto S_50913;} do{ *_SUB_IDEOBJUPDATE_LONG_STARTSEARCH= 1 ; if(!qbevent)break;evnt(25753,14311,"ide_methods.bas");}while(r); } LABEL_RETRYFIND:; if(qbevent){evnt(25753,14312,"ide_methods.bas");r=0;} S_50916:; if ((-(*_SUB_IDEOBJUPDATE_LONG_SEARCHPASS> 2 ))||new_error){ if(qbevent){evnt(25753,14313,"ide_methods.bas");if(r)goto S_50916;} do{ goto LABEL_SELECTED; if(!qbevent)break;evnt(25753,14313,"ide_methods.bas");}while(r); } S_50919:; fornext_value5643=*_SUB_IDEOBJUPDATE_LONG_STARTSEARCH; fornext_finalvalue5643=*_SUB_IDEOBJUPDATE_LONG_N; fornext_step5643= 1 ; if (fornext_step5643<0) fornext_step_negative5643=1; else fornext_step_negative5643=0; if (new_error) goto fornext_error5643; goto fornext_entrylabel5643; while(1){ fornext_value5643=fornext_step5643+(*_SUB_IDEOBJUPDATE_LONG_FINDMATCH); fornext_entrylabel5643: *_SUB_IDEOBJUPDATE_LONG_FINDMATCH=fornext_value5643; if (fornext_step_negative5643){ if (fornext_value5643fornext_finalvalue5643) break; } fornext_error5643:; if(qbevent){evnt(25753,14314,"ide_methods.bas");if(r)goto S_50919;} S_50920:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_FINDMATCH)-_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_LISTBOXITEMS[5])])),__STRING_FILEDLGSEARCHTERM->len)),qbs_ucase(__STRING_FILEDLGSEARCHTERM))))||new_error){ if(qbevent){evnt(25753,14315,"ide_methods.bas");if(r)goto S_50920;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*_SUB_IDEOBJUPDATE_LONG_FINDMATCH; if(!qbevent)break;evnt(25753,14316,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]))[array_check((*_SUB_IDEOBJUPDATE_LONG_FINDMATCH)-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14317,"ide_methods.bas");}while(r); do{ goto LABEL_SELECTED; if(!qbevent)break;evnt(25753,14318,"ide_methods.bas");}while(r); } fornext_continue_5642:; } fornext_exit_5642:; do{ *_SUB_IDEOBJUPDATE_LONG_STARTSEARCH= 1 ; if(!qbevent)break;evnt(25753,14322,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SEARCHPASS=*_SUB_IDEOBJUPDATE_LONG_SEARCHPASS+ 1 ; if(!qbevent)break;evnt(25753,14323,"ide_methods.bas");}while(r); do{ goto LABEL_RETRYFIND; if(!qbevent)break;evnt(25753,14324,"ide_methods.bas");}while(r); LABEL_SELECTED:; if(qbevent){evnt(25753,14325,"ide_methods.bas");r=0;} } } S_50931:; if ((qbs_cleanup(qbs_tmp_base,(-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))> 0 ))&(-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))<=func_ubound(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS,1,1)))))||new_error){ if(qbevent){evnt(25753,14328,"ide_methods.bas");if(r)goto S_50931;} do{ tmp_long=array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),((qbs*)(((uint64*)(_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64)))-_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[4],_SUB_IDEOBJUPDATE_ARRAY_STRING_ORIGINALLISTBOXITEMS[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14328,"ide_methods.bas");}while(r); } S_50934:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEOBJUPDATE_STRING_ALTLETTER->len))||new_error){ if(qbevent){evnt(25753,14331,"ide_methods.bas");if(r)goto S_50934;} S_50935:; if ((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,14332,"ide_methods.bas");if(r)goto S_50935;} do{ *_SUB_IDEOBJUPDATE_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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(25753,14333,"ide_methods.bas");}while(r); S_50937:; if ((*_SUB_IDEOBJUPDATE_LONG_X)||new_error){ if(qbevent){evnt(25753,14334,"ide_methods.bas");if(r)goto S_50937;} S_50938:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_SUB_IDEOBJUPDATE_LONG_X+ 1 , 1 ,1)),_SUB_IDEOBJUPDATE_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(25753,14335,"ide_methods.bas");if(r)goto S_50938;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F; if(!qbevent)break;evnt(25753,14335,"ide_methods.bas");}while(r); } } } } do{ *_SUB_IDEOBJUPDATE_LONG_F=*_SUB_IDEOBJUPDATE_LONG_F+ 1 ; if(!qbevent)break;evnt(25753,14339,"ide_methods.bas");}while(r); } S_50946:; if ((-(*_SUB_IDEOBJUPDATE_LONG_T== 3 ))||new_error){ if(qbevent){evnt(25753,14342,"ide_methods.bas");if(r)goto S_50946;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14345,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_N= 1 ; if(!qbevent)break;evnt(25753,14346,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,14347,"ide_methods.bas");}while(r); S_50950:; fornext_value5647= 1 ; fornext_finalvalue5647=_SUB_IDEOBJUPDATE_STRING_A->len; fornext_step5647= 1 ; if (fornext_step5647<0) fornext_step_negative5647=1; else fornext_step_negative5647=0; if (new_error) goto fornext_error5647; goto fornext_entrylabel5647; while(1){ fornext_value5647=fornext_step5647+(*_SUB_IDEOBJUPDATE_LONG_I2); fornext_entrylabel5647: *_SUB_IDEOBJUPDATE_LONG_I2=fornext_value5647; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5647){ if (fornext_value5647fornext_finalvalue5647) break; } fornext_error5647:; if(qbevent){evnt(25753,14348,"ide_methods.bas");if(r)goto S_50950;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,func_mid(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14349,"ide_methods.bas");}while(r); S_50952:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(25753,14350,"ide_methods.bas");if(r)goto S_50952;} do{ *_SUB_IDEOBJUPDATE_LONG_N=*_SUB_IDEOBJUPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,14350,"ide_methods.bas");}while(r); } S_50955:; if ((-(*_SUB_IDEOBJUPDATE_LONG_X== 1 ))||new_error){ if(qbevent){evnt(25753,14351,"ide_methods.bas");if(r)goto S_50955;} S_50956:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_IDEOBJUPDATE_STRING_A2),_SUB_IDEOBJUPDATE_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(25753,14352,"ide_methods.bas");if(r)goto S_50956;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F+*_SUB_IDEOBJUPDATE_LONG_N- 1 ; if(!qbevent)break;evnt(25753,14353,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_INFO=*_SUB_IDEOBJUPDATE_LONG_N; if(!qbevent)break;evnt(25753,14354,"ide_methods.bas");}while(r); } } S_50961:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_A2,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(25753,14357,"ide_methods.bas");if(r)goto S_50961;} do{ *_SUB_IDEOBJUPDATE_LONG_X= 1 ; if(!qbevent)break;evnt(25753,14357,"ide_methods.bas");}while(r); }else{ do{ *_SUB_IDEOBJUPDATE_LONG_X= 0 ; if(!qbevent)break;evnt(25753,14357,"ide_methods.bas");}while(r); } fornext_continue_5646:; } fornext_exit_5646:; S_50967:; if ((*_SUB_IDEOBJUPDATE_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(25753,14361,"ide_methods.bas");if(r)goto S_50967;} S_50968:; if ((-(*_SUB_IDEOBJUPDATE_LONG_MY==(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(24)))))||new_error){ if(qbevent){evnt(25753,14362,"ide_methods.bas");if(r)goto S_50968;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14363,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_N= 1 ; if(!qbevent)break;evnt(25753,14364,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_C= 0 ; if(!qbevent)break;evnt(25753,14365,"ide_methods.bas");}while(r); S_50972:; fornext_value5650= 1 ; fornext_finalvalue5650=_SUB_IDEOBJUPDATE_STRING_A->len; fornext_step5650= 1 ; if (fornext_step5650<0) fornext_step_negative5650=1; else fornext_step_negative5650=0; if (new_error) goto fornext_error5650; goto fornext_entrylabel5650; while(1){ fornext_value5650=fornext_step5650+(*_SUB_IDEOBJUPDATE_LONG_I2); fornext_entrylabel5650: *_SUB_IDEOBJUPDATE_LONG_I2=fornext_value5650; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5650){ if (fornext_value5650fornext_finalvalue5650) break; } fornext_error5650:; if(qbevent){evnt(25753,14366,"ide_methods.bas");if(r)goto S_50972;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,func_mid(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14367,"ide_methods.bas");}while(r); S_50974:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(25753,14368,"ide_methods.bas");if(r)goto S_50974;} do{ *_SUB_IDEOBJUPDATE_LONG_N=*_SUB_IDEOBJUPDATE_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,14369,"ide_methods.bas");}while(r); }else{ S_50977:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEOBJUPDATE_STRING_A,qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(25753,14371,"ide_methods.bas");if(r)goto S_50977;} do{ *_SUB_IDEOBJUPDATE_LONG_C=*_SUB_IDEOBJUPDATE_LONG_C+ 1 ; if(!qbevent)break;evnt(25753,14371,"ide_methods.bas");}while(r); } } fornext_continue_5649:; } fornext_exit_5649:; do{ *_SUB_IDEOBJUPDATE_LONG_W=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(28)); if(!qbevent)break;evnt(25753,14374,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_C=*_SUB_IDEOBJUPDATE_LONG_C+(*_SUB_IDEOBJUPDATE_LONG_N* 4 ); if(!qbevent)break;evnt(25753,14375,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_WHITESPACE=*_SUB_IDEOBJUPDATE_LONG_W-*_SUB_IDEOBJUPDATE_LONG_C; if(!qbevent)break;evnt(25753,14376,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_SPACING=*_SUB_IDEOBJUPDATE_LONG_WHITESPACE/ (*_SUB_IDEOBJUPDATE_LONG_N+ 1 ); if(!qbevent)break;evnt(25753,14377,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_N2= 1 ; if(!qbevent)break;evnt(25753,14382,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14383,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(20)); if(!qbevent)break;evnt(25753,14385,"ide_methods.bas");}while(r); S_50989:; fornext_value5653= 1 ; fornext_finalvalue5653=_SUB_IDEOBJUPDATE_STRING_A->len; fornext_step5653= 1 ; if (fornext_step5653<0) fornext_step_negative5653=1; else fornext_step_negative5653=0; if (new_error) goto fornext_error5653; goto fornext_entrylabel5653; while(1){ fornext_value5653=fornext_step5653+(*_SUB_IDEOBJUPDATE_LONG_I2); fornext_entrylabel5653: *_SUB_IDEOBJUPDATE_LONG_I2=fornext_value5653; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5653){ if (fornext_value5653fornext_finalvalue5653) break; } fornext_error5653:; if(qbevent){evnt(25753,14387,"ide_methods.bas");if(r)goto S_50989;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A2,func_mid(_SUB_IDEOBJUPDATE_STRING_A,*_SUB_IDEOBJUPDATE_LONG_I2, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14388,"ide_methods.bas");}while(r); S_50991:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEOBJUPDATE_STRING_A2,func_chr( 0 ))))||new_error){ if(qbevent){evnt(25753,14389,"ide_methods.bas");if(r)goto S_50991;} do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A3,qbs_add(_SUB_IDEOBJUPDATE_STRING_A3,_SUB_IDEOBJUPDATE_STRING_A2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14389,"ide_methods.bas");}while(r); } S_50994:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDEOBJUPDATE_STRING_A2,func_chr( 0 )))|(-(*_SUB_IDEOBJUPDATE_LONG_I2==_SUB_IDEOBJUPDATE_STRING_A->len))))||new_error){ if(qbevent){evnt(25753,14390,"ide_methods.bas");if(r)goto S_50994;} do{ *_SUB_IDEOBJUPDATE_LONG_X=*_SUB_IDEOBJUPDATE_LONG_X+*_SUB_IDEOBJUPDATE_LONG_SPACING; if(!qbevent)break;evnt(25753,14392,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X2=FUNC_IDEHLEN(_SUB_IDEOBJUPDATE_STRING_A3)+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14402,"ide_methods.bas");}while(r); S_50997:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX>=*_SUB_IDEOBJUPDATE_LONG_X))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<(*_SUB_IDEOBJUPDATE_LONG_X+*_SUB_IDEOBJUPDATE_LONG_X2))))||new_error){ if(qbevent){evnt(25753,14403,"ide_methods.bas");if(r)goto S_50997;} do{ *_SUB_IDEOBJUPDATE_LONG_INFO=*_SUB_IDEOBJUPDATE_LONG_N2; if(!qbevent)break;evnt(25753,14403,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F+*_SUB_IDEOBJUPDATE_LONG_N2- 1 ; if(!qbevent)break;evnt(25753,14403,"ide_methods.bas");}while(r); } do{ *_SUB_IDEOBJUPDATE_LONG_X=*_SUB_IDEOBJUPDATE_LONG_X+*_SUB_IDEOBJUPDATE_LONG_X2; if(!qbevent)break;evnt(25753,14406,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEOBJUPDATE_STRING_A3,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14407,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_N2=*_SUB_IDEOBJUPDATE_LONG_N2+ 1 ; if(!qbevent)break;evnt(25753,14408,"ide_methods.bas");}while(r); } fornext_continue_5652:; } fornext_exit_5652:; } } S_51008:; if (((-(*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET>= 0 ))&(-(*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET<*_SUB_IDEOBJUPDATE_LONG_N)))||new_error){ if(qbevent){evnt(25753,14415,"ide_methods.bas");if(r)goto S_51008;} do{ *_SUB_IDEOBJUPDATE_LONG_F2=*_SUB_IDEOBJUPDATE_LONG_F+*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET; if(!qbevent)break;evnt(25753,14416,"ide_methods.bas");}while(r); S_51010:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,func_chr( 13 )))|(qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,qbs_new_txt_len(" ",1)))))||new_error){ if(qbevent){evnt(25753,14417,"ide_methods.bas");if(r)goto S_51010;} do{ *_SUB_IDEOBJUPDATE_LONG_INFO=*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET+ 1 ; if(!qbevent)break;evnt(25753,14418,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEOBJUPDATE_LONG_F=*_SUB_IDEOBJUPDATE_LONG_F+*_SUB_IDEOBJUPDATE_LONG_N; if(!qbevent)break;evnt(25753,14422,"ide_methods.bas");}while(r); } S_51016:; if ((-(*_SUB_IDEOBJUPDATE_LONG_T== 4 ))||new_error){ if(qbevent){evnt(25753,14425,"ide_methods.bas");if(r)goto S_51016;} S_51017:; if ((*_SUB_IDEOBJUPDATE_LONG_MOUSEDOWN)||new_error){ if(qbevent){evnt(25753,14427,"ide_methods.bas");if(r)goto S_51017;} do{ *_SUB_IDEOBJUPDATE_LONG_Y=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(4))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(24)); if(!qbevent)break;evnt(25753,14428,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X1=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(0))+*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(20)); if(!qbevent)break;evnt(25753,14429,"ide_methods.bas");}while(r); do{ *_SUB_IDEOBJUPDATE_LONG_X2=*_SUB_IDEOBJUPDATE_LONG_X1+ 2 ; if(!qbevent)break;evnt(25753,14429,"ide_methods.bas");}while(r); S_51021:; if ((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,14430,"ide_methods.bas");if(r)goto S_51021;} do{ *_SUB_IDEOBJUPDATE_LONG_X2=*_SUB_IDEOBJUPDATE_LONG_X2+ 1 +FUNC_IDEHLEN(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14431,"ide_methods.bas");}while(r); } S_51024:; if ((-(*_SUB_IDEOBJUPDATE_LONG_MY==*_SUB_IDEOBJUPDATE_LONG_Y))||new_error){ if(qbevent){evnt(25753,14433,"ide_methods.bas");if(r)goto S_51024;} S_51025:; if (((-(*_SUB_IDEOBJUPDATE_LONG_MX>=*_SUB_IDEOBJUPDATE_LONG_X1))&(-(*_SUB_IDEOBJUPDATE_LONG_MX<=*_SUB_IDEOBJUPDATE_LONG_X2)))||new_error){ if(qbevent){evnt(25753,14434,"ide_methods.bas");if(r)goto S_51025;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F; if(!qbevent)break;evnt(25753,14435,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))+ 1 ; if(!qbevent)break;evnt(25753,14436,"ide_methods.bas");}while(r); S_51028:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))> 1 ))||new_error){ if(qbevent){evnt(25753,14436,"ide_methods.bas");if(r)goto S_51028;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 0 ; if(!qbevent)break;evnt(25753,14436,"ide_methods.bas");}while(r); } } } } S_51034:; if ((-(*_SUB_IDEOBJUPDATE_LONG_FOCUSOFFSET== 0 ))||new_error){ if(qbevent){evnt(25753,14440,"ide_methods.bas");if(r)goto S_51034;} S_51035:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("H",1))))))||new_error){ if(qbevent){evnt(25753,14471,"ide_methods.bas");if(r)goto S_51035;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 1 ; if(!qbevent)break;evnt(25753,14471,"ide_methods.bas");}while(r); } S_51038:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,(qbs_add(func_chr( 0 ),qbs_new_txt_len("P",1))))))||new_error){ if(qbevent){evnt(25753,14472,"ide_methods.bas");if(r)goto S_51038;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 0 ; if(!qbevent)break;evnt(25753,14472,"ide_methods.bas");}while(r); } S_51041:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEOBJUPDATE_STRING_KK,qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(25753,14473,"ide_methods.bas");if(r)goto S_51041;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))+ 1 ; if(!qbevent)break;evnt(25753,14474,"ide_methods.bas");}while(r); S_51043:; if ((-(*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))> 1 ))||new_error){ if(qbevent){evnt(25753,14474,"ide_methods.bas");if(r)goto S_51043;} do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(64))= 0 ; if(!qbevent)break;evnt(25753,14474,"ide_methods.bas");}while(r); } } } S_51048:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEOBJUPDATE_STRING_ALTLETTER->len))||new_error){ if(qbevent){evnt(25753,14479,"ide_methods.bas");if(r)goto S_51048;} S_51049:; if ((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))||new_error){ if(qbevent){evnt(25753,14480,"ide_methods.bas");if(r)goto S_51049;} do{ *_SUB_IDEOBJUPDATE_LONG_X=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_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(25753,14481,"ide_methods.bas");}while(r); S_51051:; if ((*_SUB_IDEOBJUPDATE_LONG_X)||new_error){ if(qbevent){evnt(25753,14482,"ide_methods.bas");if(r)goto S_51051;} S_51052:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(40)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_SUB_IDEOBJUPDATE_LONG_X+ 1 , 1 ,1)),_SUB_IDEOBJUPDATE_STRING_ALTLETTER)))||new_error){ if(qbevent){evnt(25753,14483,"ide_methods.bas");if(r)goto S_51052;} do{ *_SUB_IDEOBJUPDATE_LONG_FOCUS=*_SUB_IDEOBJUPDATE_LONG_F; if(!qbevent)break;evnt(25753,14483,"ide_methods.bas");}while(r); } } } } do{ *_SUB_IDEOBJUPDATE_LONG_F=*_SUB_IDEOBJUPDATE_LONG_F+ 1 ; if(!qbevent)break;evnt(25753,14487,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14490,"ide_methods.bas");}while(r); LABEL_SELECTCHECK:; if(qbevent){evnt(25753,14491,"ide_methods.bas");r=0;} S_51061:; if ((*__LONG_KSHIFT&(-(*(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))== 0 )))||new_error){ if(qbevent){evnt(25753,14492,"ide_methods.bas");if(r)goto S_51061;} do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= -1 ; if(!qbevent)break;evnt(25753,14492,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(77))=*(int32*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(81)); if(!qbevent)break;evnt(25753,14492,"ide_methods.bas");}while(r); } S_51065:; if ((-(*__LONG_KSHIFT== 0 ))||new_error){ if(qbevent){evnt(25753,14493,"ide_methods.bas");if(r)goto S_51065;} do{ *(int8*)(((char*)_SUB_IDEOBJUPDATE_UDT_O)+(76))= 0 ; if(!qbevent)break;evnt(25753,14493,"ide_methods.bas");}while(r); } do{ #include "ret202.txt" if(!qbevent)break;evnt(25753,14494,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free202.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 "data203.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_IDEVBAR_LONG_I=*_FUNC_IDEVBAR_LONG_I2; if(!qbevent)break;evnt(25753,14498,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_LONG_N=*_FUNC_IDEVBAR_LONG_N2; if(!qbevent)break;evnt(25753,14498,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,14503,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y,func_chr( 24 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14504,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 1 ,func_chr( 25 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14505,"ide_methods.bas");}while(r); S_51074:; fornext_value5658=*_FUNC_IDEVBAR_LONG_Y+ 1 ; fornext_finalvalue5658=*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 2 ; fornext_step5658= 1 ; if (fornext_step5658<0) fornext_step_negative5658=1; else fornext_step_negative5658=0; if (new_error) goto fornext_error5658; goto fornext_entrylabel5658; while(1){ fornext_value5658=fornext_step5658+(*_FUNC_IDEVBAR_LONG_Y2); fornext_entrylabel5658: *_FUNC_IDEVBAR_LONG_Y2=fornext_value5658; if (fornext_step_negative5658){ if (fornext_value5658fornext_finalvalue5658) break; } fornext_error5658:; if(qbevent){evnt(25753,14506,"ide_methods.bas");if(r)goto S_51074;} do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 176 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14507,"ide_methods.bas");}while(r); fornext_continue_5657:; } fornext_exit_5657:; S_51077:; if ((-(*_FUNC_IDEVBAR_LONG_N< 1 ))||new_error){ if(qbevent){evnt(25753,14512,"ide_methods.bas");if(r)goto S_51077;} do{ *_FUNC_IDEVBAR_LONG_N= 1 ; if(!qbevent)break;evnt(25753,14512,"ide_methods.bas");}while(r); } S_51080:; if ((-(*_FUNC_IDEVBAR_LONG_I< 1 ))||new_error){ if(qbevent){evnt(25753,14513,"ide_methods.bas");if(r)goto S_51080;} do{ *_FUNC_IDEVBAR_LONG_I= 1 ; if(!qbevent)break;evnt(25753,14513,"ide_methods.bas");}while(r); } S_51083:; if ((-(*_FUNC_IDEVBAR_LONG_I>*_FUNC_IDEVBAR_LONG_N))||new_error){ if(qbevent){evnt(25753,14514,"ide_methods.bas");if(r)goto S_51083;} do{ *_FUNC_IDEVBAR_LONG_I=*_FUNC_IDEVBAR_LONG_N; if(!qbevent)break;evnt(25753,14514,"ide_methods.bas");}while(r); } S_51086:; if ((-(*_FUNC_IDEVBAR_LONG_H== 2 ))||new_error){ if(qbevent){evnt(25753,14516,"ide_methods.bas");if(r)goto S_51086;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y; if(!qbevent)break;evnt(25753,14517,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14518,"ide_methods.bas");}while(r); } S_51090:; if ((-(*_FUNC_IDEVBAR_LONG_H== 3 ))||new_error){ if(qbevent){evnt(25753,14521,"ide_methods.bas");if(r)goto S_51090;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,14522,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14524,"ide_methods.bas");}while(r); } S_51094:; if ((-(*_FUNC_IDEVBAR_LONG_H== 4 ))||new_error){ if(qbevent){evnt(25753,14527,"ide_methods.bas");if(r)goto S_51094;} S_51095:; if ((-(*_FUNC_IDEVBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25753,14528,"ide_methods.bas");if(r)goto S_51095;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,14529,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14531,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVBAR_SINGLE_P=(*_FUNC_IDEVBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEVBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(25753,14534,"ide_methods.bas");}while(r); S_51100:; if ((-(((float)(*_FUNC_IDEVBAR_SINGLE_P))<((float)( 0.5E+0 ))))||new_error){ if(qbevent){evnt(25753,14535,"ide_methods.bas");if(r)goto S_51100;} do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,14535,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 2 ; if(!qbevent)break;evnt(25753,14535,"ide_methods.bas");}while(r); } do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14536,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(25753,14537,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14538,"ide_methods.bas");}while(r); } } S_51110:; if ((-(*_FUNC_IDEVBAR_LONG_H> 4 ))||new_error){ if(qbevent){evnt(25753,14542,"ide_methods.bas");if(r)goto S_51110;} S_51111:; if ((-(*_FUNC_IDEVBAR_LONG_N== 1 ))||new_error){ if(qbevent){evnt(25753,14543,"ide_methods.bas");if(r)goto S_51111;} do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+(*_FUNC_IDEVBAR_LONG_H/ 4 ); if(!qbevent)break;evnt(25753,14544,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14546,"ide_methods.bas");}while(r); } S_51115:; if ((-(*_FUNC_IDEVBAR_LONG_I== 1 ))||new_error){ if(qbevent){evnt(25753,14548,"ide_methods.bas");if(r)goto S_51115;} do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,14549,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14550,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(25753,14551,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14552,"ide_methods.bas");}while(r); } S_51121:; if ((-(*_FUNC_IDEVBAR_LONG_I==*_FUNC_IDEVBAR_LONG_N))||new_error){ if(qbevent){evnt(25753,14554,"ide_methods.bas");if(r)goto S_51121;} do{ *_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 2 ; if(!qbevent)break;evnt(25753,14555,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14556,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(25753,14557,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14558,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEVBAR_SINGLE_P=(*_FUNC_IDEVBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEVBAR_LONG_N- 1 ))); if(!qbevent)break;evnt(25753,14561,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_SINGLE_P=*_FUNC_IDEVBAR_SINGLE_P*(*_FUNC_IDEVBAR_LONG_H- 4 ); if(!qbevent)break;evnt(25753,14562,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_LONG_Y2=qbr(*_FUNC_IDEVBAR_LONG_Y+ 2 +floor(*_FUNC_IDEVBAR_SINGLE_P)); if(!qbevent)break;evnt(25753,14563,"ide_methods.bas");}while(r); do{ sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14564,"ide_methods.bas");}while(r); do{ *_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2; if(!qbevent)break;evnt(25753,14565,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14566,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free203.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 "data204.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub__delay( 0.1E+0 ); if(!qbevent)break;evnt(25753,14571,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free204.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_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 "data205.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,_FUNC_IDEZCHANGEPATH_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14576,"ide_methods.bas");}while(r); S_51136:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,14578,"ide_methods.bas");if(r)goto S_51136;} S_51137:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH,qbs_new_txt_len("..",2))))||new_error){ if(qbevent){evnt(25753,14580,"ide_methods.bas");if(r)goto S_51137;} S_51138:; fornext_value5662=_FUNC_IDEZCHANGEPATH_STRING_PATH->len; fornext_finalvalue5662= 1 ; fornext_step5662= -1 ; if (fornext_step5662<0) fornext_step_negative5662=1; else fornext_step_negative5662=0; if (new_error) goto fornext_error5662; goto fornext_entrylabel5662; while(1){ fornext_value5662=fornext_step5662+(*_FUNC_IDEZCHANGEPATH_LONG_X); fornext_entrylabel5662: *_FUNC_IDEZCHANGEPATH_LONG_X=fornext_value5662; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5662){ if (fornext_value5662fornext_finalvalue5662) break; } fornext_error5662:; if(qbevent){evnt(25753,14581,"ide_methods.bas");if(r)goto S_51138;} 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(25753,14582,"ide_methods.bas");}while(r); S_51140:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_A,qbs_new_txt_len("\\",1))))||new_error){ if(qbevent){evnt(25753,14583,"ide_methods.bas");if(r)goto S_51140;} 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(25753,14584,"ide_methods.bas");}while(r); do{ goto fornext_exit_5661; if(!qbevent)break;evnt(25753,14585,"ide_methods.bas");}while(r); } fornext_continue_5661:; } fornext_exit_5661:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14588,"ide_methods.bas");}while(r); } S_51147:; 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(25753,14591,"ide_methods.bas");if(r)goto S_51147;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,_FUNC_IDEZCHANGEPATH_STRING_NEWPATH); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14592,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14593,"ide_methods.bas");}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(25753,14595,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14596,"ide_methods.bas");}while(r); } S_51154:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,14599,"ide_methods.bas");if(r)goto S_51154;} S_51155:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_NEWPATH,qbs_new_txt_len("..",2))))||new_error){ if(qbevent){evnt(25753,14602,"ide_methods.bas");if(r)goto S_51155;} S_51156:; fornext_value5666=_FUNC_IDEZCHANGEPATH_STRING_PATH->len; fornext_finalvalue5666= 1 ; fornext_step5666= -1 ; if (fornext_step5666<0) fornext_step_negative5666=1; else fornext_step_negative5666=0; if (new_error) goto fornext_error5666; goto fornext_entrylabel5666; while(1){ fornext_value5666=fornext_step5666+(*_FUNC_IDEZCHANGEPATH_LONG_X); fornext_entrylabel5666: *_FUNC_IDEZCHANGEPATH_LONG_X=fornext_value5666; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5666){ if (fornext_value5666fornext_finalvalue5666) break; } fornext_error5666:; if(qbevent){evnt(25753,14603,"ide_methods.bas");if(r)goto S_51156;} 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(25753,14604,"ide_methods.bas");}while(r); S_51158:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_A,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25753,14605,"ide_methods.bas");if(r)goto S_51158;} 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(25753,14606,"ide_methods.bas");}while(r); S_51160:; if ((-(*_FUNC_IDEZCHANGEPATH_LONG_X== 1 ))||new_error){ if(qbevent){evnt(25753,14607,"ide_methods.bas");if(r)goto S_51160;} do{ qbs_set(_FUNC_IDEZCHANGEPATH_STRING_IDEZCHANGEPATH,qbs_new_txt_len("/",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14607,"ide_methods.bas");}while(r); } do{ goto fornext_exit_5665; if(!qbevent)break;evnt(25753,14608,"ide_methods.bas");}while(r); } fornext_continue_5665:; } fornext_exit_5665:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14611,"ide_methods.bas");}while(r); } S_51168:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZCHANGEPATH_STRING_PATH,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25753,14613,"ide_methods.bas");if(r)goto S_51168;} 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(25753,14613,"ide_methods.bas");}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(25753,14613,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14614,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free205.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*_FUNC_IDEZFILELIST_STRING_MASK){ 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 "data206.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,14620,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZFILELIST_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14621,"ide_methods.bas");}while(r); S_51177:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,14623,"ide_methods.bas");if(r)goto S_51177;} 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(25753,14624,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14624,"ide_methods.bas");}while(r); S_51180:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(25753,14625,"ide_methods.bas");if(r)goto S_51180;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /A-D ",16),FUNC_QUOTEDFILENAME(_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(25753,14625,"ide_methods.bas");}while(r); } S_51183:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 1 ))||new_error){ if(qbevent){evnt(25753,14626,"ide_methods.bas");if(r)goto S_51183;} do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /A-D ",16),FUNC_QUOTEDFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len("\\*.* >.\\internal\\temp\\files.txt",31)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14626,"ide_methods.bas");}while(r); } S_51186:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 2 ))||new_error){ if(qbevent){evnt(25753,14627,"ide_methods.bas");if(r)goto S_51186;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /A-D ",16),FUNC_QUOTEDFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len("\\",1)),FUNC_QUOTEDFILENAME(_FUNC_IDEZFILELIST_STRING_MASK)),qbs_new_txt_len(" >.\\internal\\temp\\files.txt",27)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14627,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14628,"ide_methods.bas");}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(25753,14629,"ide_methods.bas");}while(r); S_51191:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(25753,14630,"ide_methods.bas");if(r)goto S_51191;} do{ tmp_fileno= 150 ; if (new_error) goto skip5671; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZFILELIST_STRING_A); if (new_error) goto skip5671; skip5671: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14631,"ide_methods.bas");}while(r); S_51193:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEZFILELIST_STRING_A->len))||new_error){ if(qbevent){evnt(25753,14632,"ide_methods.bas");if(r)goto S_51193;} S_51194:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_PATH,qbs_new_txt_len("internal/help",13))))||new_error){ if(qbevent){evnt(25753,14633,"ide_methods.bas");if(r)goto S_51194;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_A,qbs_add(qbs_left(_FUNC_IDEZFILELIST_STRING_A,(_FUNC_IDEZFILELIST_STRING_A->len- 5 )/ 2 ),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14633,"ide_methods.bas");}while(r); } S_51197:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,14634,"ide_methods.bas");if(r)goto S_51197;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,_FUNC_IDEZFILELIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14634,"ide_methods.bas");}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(25753,14634,"ide_methods.bas");}while(r); } } dl_continue_5670:; } dl_exit_5670:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14637,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZFILELIST_STRING_IDEZFILELIST,_FUNC_IDEZFILELIST_STRING_FILELIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14638,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14639,"ide_methods.bas");}while(r); } S_51208:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,14642,"ide_methods.bas");if(r)goto S_51208;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14643,"ide_methods.bas");}while(r); S_51210:; if ((-(*_FUNC_IDEZFILELIST_LONG_METHOD== 0 ))||new_error){ if(qbevent){evnt(25753,14644,"ide_methods.bas");if(r)goto S_51210;} S_51211:; fornext_value5675= 1 ; fornext_finalvalue5675= 2 ; fornext_step5675= 1 ; if (fornext_step5675<0) fornext_step_negative5675=1; else fornext_step_negative5675=0; if (new_error) goto fornext_error5675; goto fornext_entrylabel5675; while(1){ fornext_value5675=fornext_step5675+(*_FUNC_IDEZFILELIST_LONG_I); fornext_entrylabel5675: *_FUNC_IDEZFILELIST_LONG_I=fornext_value5675; if (fornext_step_negative5675){ if (fornext_value5675fornext_finalvalue5675) break; } fornext_error5675:; if(qbevent){evnt(25753,14645,"ide_methods.bas");if(r)goto S_51211;} 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(25753,14646,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14646,"ide_methods.bas");}while(r); S_51214:; if ((-(*_FUNC_IDEZFILELIST_LONG_I== 1 ))||new_error){ if(qbevent){evnt(25753,14647,"ide_methods.bas");if(r)goto S_51214;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_QUOTEDFILENAME(_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(" | sort >./internal/temp/files.txt",34)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14647,"ide_methods.bas");}while(r); } S_51217:; if ((-(*_FUNC_IDEZFILELIST_LONG_I== 2 ))||new_error){ if(qbevent){evnt(25753,14648,"ide_methods.bas");if(r)goto S_51217;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_QUOTEDFILENAME(_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(" | sort >./internal/temp/files.txt",34)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14648,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=169; if (next_return_point>=return_points) more_return_points(); goto LABEL_ADDTOLIST; RETURN_169:; if(!qbevent)break;evnt(25753,14649,"ide_methods.bas");}while(r); fornext_continue_5674:; } fornext_exit_5674:; S_51222:; }else{ if (-(*_FUNC_IDEZFILELIST_LONG_METHOD== 1 )){ if(qbevent){evnt(25753,14651,"ide_methods.bas");if(r)goto S_51222;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_QUOTEDFILENAME(_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(" | sort >./internal/temp/files.txt",34)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14652,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=170; if (next_return_point>=return_points) more_return_points(); goto LABEL_ADDTOLIST; RETURN_170:; if(!qbevent)break;evnt(25753,14653,"ide_methods.bas");}while(r); S_51225:; }else{ if (-(*_FUNC_IDEZFILELIST_LONG_METHOD== 2 )){ if(qbevent){evnt(25753,14654,"ide_methods.bas");if(r)goto S_51225;} do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_QUOTEDFILENAME(_FUNC_IDEZFILELIST_STRING_PATH)),qbs_new_txt_len(" -maxdepth 1 -type f -name ",27)),func_chr( 34 )),_FUNC_IDEZFILELIST_STRING_MASK),func_chr( 34 )),qbs_new_txt_len(" | sort >./internal/temp/files.txt",34)),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14655,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=171; if (next_return_point>=return_points) more_return_points(); goto LABEL_ADDTOLIST; RETURN_171:; if(!qbevent)break;evnt(25753,14656,"ide_methods.bas");}while(r); } } } do{ qbs_set(_FUNC_IDEZFILELIST_STRING_IDEZFILELIST,_FUNC_IDEZFILELIST_STRING_FILELIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14658,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14659,"ide_methods.bas");}while(r); LABEL_ADDTOLIST:; if(qbevent){evnt(25753,14661,"ide_methods.bas");r=0;} 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(25753,14662,"ide_methods.bas");}while(r); S_51232:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(25753,14663,"ide_methods.bas");if(r)goto S_51232;} do{ tmp_fileno= 150 ; if (new_error) goto skip5677; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZFILELIST_STRING_A); if (new_error) goto skip5677; skip5677: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14664,"ide_methods.bas");}while(r); S_51234:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZFILELIST_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(25753,14665,"ide_methods.bas");if(r)goto S_51234;} do{ goto dl_exit_5676; if(!qbevent)break;evnt(25753,14665,"ide_methods.bas");}while(r); } S_51237:; fornext_value5680=_FUNC_IDEZFILELIST_STRING_A->len; fornext_finalvalue5680= 1 ; fornext_step5680= -1 ; if (fornext_step5680<0) fornext_step_negative5680=1; else fornext_step_negative5680=0; if (new_error) goto fornext_error5680; goto fornext_entrylabel5680; while(1){ fornext_value5680=fornext_step5680+(*_FUNC_IDEZFILELIST_LONG_X); fornext_entrylabel5680: *_FUNC_IDEZFILELIST_LONG_X=fornext_value5680; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5680){ if (fornext_value5680fornext_finalvalue5680) break; } fornext_error5680:; if(qbevent){evnt(25753,14666,"ide_methods.bas");if(r)goto S_51237;} 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(25753,14667,"ide_methods.bas");}while(r); S_51239:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_A2,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25753,14668,"ide_methods.bas");if(r)goto S_51239;} 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(25753,14669,"ide_methods.bas");}while(r); do{ goto fornext_exit_5679; if(!qbevent)break;evnt(25753,14670,"ide_methods.bas");}while(r); } fornext_continue_5679:; } fornext_exit_5679:; S_51244:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_PATH,qbs_new_txt_len("internal/help",13))))||new_error){ if(qbevent){evnt(25753,14673,"ide_methods.bas");if(r)goto S_51244;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_A,qbs_add(qbs_left(_FUNC_IDEZFILELIST_STRING_A,(_FUNC_IDEZFILELIST_STRING_A->len- 5 )/ 2 ),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14673,"ide_methods.bas");}while(r); } S_51247:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZFILELIST_STRING_FILELIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,14674,"ide_methods.bas");if(r)goto S_51247;} do{ qbs_set(_FUNC_IDEZFILELIST_STRING_FILELIST,_FUNC_IDEZFILELIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14674,"ide_methods.bas");}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(25753,14674,"ide_methods.bas");}while(r); } dl_continue_5676:; } dl_exit_5676:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14676,"ide_methods.bas");}while(r); do{ #include "ret206.txt" if(!qbevent)break;evnt(25753,14677,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free206.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 "data207.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_51256:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,14685,"ide_methods.bas");if(r)goto S_51256;} do{ sub_shell2(qbs_new_txt_len("cd >.\\internal\\temp\\root.txt",28),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14686,"ide_methods.bas");}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(25753,14687,"ide_methods.bas");}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip5684; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZGETROOT_STRING_A); if (new_error) goto skip5684; skip5684: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14688,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZGETROOT_STRING_IDEZGETROOT,_FUNC_IDEZGETROOT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14689,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14690,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14691,"ide_methods.bas");}while(r); }else{ do{ sub_shell2(qbs_new_txt_len("pwd >./internal/temp/root.txt",29),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14693,"ide_methods.bas");}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(25753,14694,"ide_methods.bas");}while(r); do{ tmp_fileno= 150 ; if (new_error) goto skip5685; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZGETROOT_STRING_A); if (new_error) goto skip5685; skip5685: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14695,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZGETROOT_STRING_IDEZGETROOT,_FUNC_IDEZGETROOT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14696,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14697,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14698,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free207.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 "data208.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,14704,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZPATHLIST_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14705,"ide_methods.bas");}while(r); S_51273:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,14707,"ide_methods.bas");if(r)goto S_51273;} 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(25753,14708,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14708,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14709,"ide_methods.bas");}while(r); S_51277:; 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(25753,14709,"ide_methods.bas");if(r)goto S_51277;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14709,"ide_methods.bas");}while(r); } do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("dir /b /ON /AD ",15),FUNC_QUOTEDFILENAME(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(25753,14710,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14711,"ide_methods.bas");}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(25753,14712,"ide_methods.bas");}while(r); S_51283:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(25753,14713,"ide_methods.bas");if(r)goto S_51283;} do{ tmp_fileno= 150 ; if (new_error) goto skip5688; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZPATHLIST_STRING_A); if (new_error) goto skip5688; skip5688: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14714,"ide_methods.bas");}while(r); S_51285:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,14715,"ide_methods.bas");if(r)goto S_51285;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14715,"ide_methods.bas");}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(25753,14715,"ide_methods.bas");}while(r); } dl_continue_5687:; } dl_exit_5687:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14717,"ide_methods.bas");}while(r); do{ *_FUNC_IDEZPATHLIST_LONG_C= 0 ; if(!qbevent)break;evnt(25753,14719,"ide_methods.bas");}while(r); S_51293:; fornext_value5690= 1 ; fornext_finalvalue5690=_FUNC_IDEZPATHLIST_STRING_PATH->len; fornext_step5690= 1 ; if (fornext_step5690<0) fornext_step_negative5690=1; else fornext_step_negative5690=0; if (new_error) goto fornext_error5690; goto fornext_entrylabel5690; while(1){ fornext_value5690=fornext_step5690+(*_FUNC_IDEZPATHLIST_LONG_X); fornext_entrylabel5690: *_FUNC_IDEZPATHLIST_LONG_X=fornext_value5690; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5690){ if (fornext_value5690fornext_finalvalue5690) break; } fornext_error5690:; if(qbevent){evnt(25753,14720,"ide_methods.bas");if(r)goto S_51293;} 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(25753,14721,"ide_methods.bas");}while(r); S_51295:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_B,__STRING1_IDEPATHSEP)))||new_error){ if(qbevent){evnt(25753,14722,"ide_methods.bas");if(r)goto S_51295;} do{ *_FUNC_IDEZPATHLIST_LONG_C=*_FUNC_IDEZPATHLIST_LONG_C+ 1 ; if(!qbevent)break;evnt(25753,14722,"ide_methods.bas");}while(r); } fornext_continue_5689:; } fornext_exit_5689:; S_51299:; if ((-(*_FUNC_IDEZPATHLIST_LONG_C>= 1 ))||new_error){ if(qbevent){evnt(25753,14724,"ide_methods.bas");if(r)goto S_51299;} S_51300:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEZPATHLIST_STRING_PATHLIST->len))||new_error){ if(qbevent){evnt(25753,14725,"ide_methods.bas");if(r)goto S_51300;} 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(25753,14725,"ide_methods.bas");}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(25753,14725,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEZPATHLIST_LONG_D=( int32 )logical_drives(); if(!qbevent)break;evnt(25753,14733,"ide_methods.bas");}while(r); S_51307:; fornext_value5694= 0 ; fornext_finalvalue5694= 25 ; fornext_step5694= 1 ; if (fornext_step5694<0) fornext_step_negative5694=1; else fornext_step_negative5694=0; if (new_error) goto fornext_error5694; goto fornext_entrylabel5694; while(1){ fornext_value5694=fornext_step5694+(*_FUNC_IDEZPATHLIST_LONG_I); fornext_entrylabel5694: *_FUNC_IDEZPATHLIST_LONG_I=fornext_value5694; if (fornext_step_negative5694){ if (fornext_value5694fornext_finalvalue5694) break; } fornext_error5694:; if(qbevent){evnt(25753,14734,"ide_methods.bas");if(r)goto S_51307;} S_51308:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_FUNC_IDEZPATHLIST_STRING_PATHLIST, 1 ),_FUNC_IDEZPATHLIST_STRING1_SEP))&(-(_FUNC_IDEZPATHLIST_STRING_PATHLIST->len> 0 ))))||new_error){ if(qbevent){evnt(25753,14735,"ide_methods.bas");if(r)goto S_51308;} 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(25753,14735,"ide_methods.bas");}while(r); } S_51311:; if ((func__readbit(*_FUNC_IDEZPATHLIST_LONG_D,*_FUNC_IDEZPATHLIST_LONG_I))||new_error){ if(qbevent){evnt(25753,14736,"ide_methods.bas");if(r)goto S_51311;} 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(25753,14737,"ide_methods.bas");}while(r); } fornext_continue_5693:; } fornext_exit_5693:; do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST,_FUNC_IDEZPATHLIST_STRING_PATHLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14741,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14742,"ide_methods.bas");}while(r); } S_51318:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("LNX",3))))||new_error){ if(qbevent){evnt(25753,14745,"ide_methods.bas");if(r)goto S_51318;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14746,"ide_methods.bas");}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(25753,14747,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14747,"ide_methods.bas");}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_new_txt_len("find ",5),FUNC_QUOTEDFILENAME(_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(25753,14748,"ide_methods.bas");}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(25753,14749,"ide_methods.bas");}while(r); S_51324:; while((!(func_eof( 150 )))||new_error){ if(qbevent){evnt(25753,14750,"ide_methods.bas");if(r)goto S_51324;} do{ tmp_fileno= 150 ; if (new_error) goto skip5697; sub_file_line_input_string(tmp_fileno,_FUNC_IDEZPATHLIST_STRING_A); if (new_error) goto skip5697; skip5697: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14751,"ide_methods.bas");}while(r); S_51326:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZPATHLIST_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(25753,14752,"ide_methods.bas");if(r)goto S_51326;} do{ goto dl_exit_5696; if(!qbevent)break;evnt(25753,14752,"ide_methods.bas");}while(r); } S_51329:; fornext_value5700=_FUNC_IDEZPATHLIST_STRING_A->len; fornext_finalvalue5700= 1 ; fornext_step5700= -1 ; if (fornext_step5700<0) fornext_step_negative5700=1; else fornext_step_negative5700=0; if (new_error) goto fornext_error5700; goto fornext_entrylabel5700; while(1){ fornext_value5700=fornext_step5700+(*_FUNC_IDEZPATHLIST_LONG_X); fornext_entrylabel5700: *_FUNC_IDEZPATHLIST_LONG_X=fornext_value5700; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5700){ if (fornext_value5700fornext_finalvalue5700) break; } fornext_error5700:; if(qbevent){evnt(25753,14753,"ide_methods.bas");if(r)goto S_51329;} 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(25753,14754,"ide_methods.bas");}while(r); S_51331:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_A2,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25753,14755,"ide_methods.bas");if(r)goto S_51331;} 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(25753,14756,"ide_methods.bas");}while(r); do{ goto fornext_exit_5699; if(!qbevent)break;evnt(25753,14757,"ide_methods.bas");}while(r); } fornext_continue_5699:; } fornext_exit_5699:; S_51336:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,14760,"ide_methods.bas");if(r)goto S_51336;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14760,"ide_methods.bas");}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(25753,14760,"ide_methods.bas");}while(r); } dl_continue_5696:; } dl_exit_5696:; do{ sub_close( 150 ,1); if(!qbevent)break;evnt(25753,14762,"ide_methods.bas");}while(r); S_51343:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEZPATHLIST_STRING_PATH,qbs_new_txt_len("/",1))))||new_error){ if(qbevent){evnt(25753,14764,"ide_methods.bas");if(r)goto S_51343;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_A,qbs_new_txt_len("..",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14765,"ide_methods.bas");}while(r); S_51345:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEZPATHLIST_STRING_PATHLIST,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,14767,"ide_methods.bas");if(r)goto S_51345;} do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_PATHLIST,_FUNC_IDEZPATHLIST_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14767,"ide_methods.bas");}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(25753,14767,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEZPATHLIST_STRING_IDEZPATHLIST,_FUNC_IDEZPATHLIST_STRING_PATHLIST); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14770,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14771,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free208.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 "data209.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_P,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14777,"ide_methods.bas");}while(r); S_51355:; fornext_value5705=_FUNC_IDEZTAKEPATH_STRING_F->len; fornext_finalvalue5705= 1 ; fornext_step5705= -1 ; if (fornext_step5705<0) fornext_step_negative5705=1; else fornext_step_negative5705=0; if (new_error) goto fornext_error5705; goto fornext_entrylabel5705; while(1){ fornext_value5705=fornext_step5705+(*_FUNC_IDEZTAKEPATH_LONG_I); fornext_entrylabel5705: *_FUNC_IDEZTAKEPATH_LONG_I=fornext_value5705; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5705){ if (fornext_value5705fornext_finalvalue5705) break; } fornext_error5705:; if(qbevent){evnt(25753,14779,"ide_methods.bas");if(r)goto S_51355;} 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(25753,14780,"ide_methods.bas");}while(r); S_51357:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDEZTAKEPATH_STRING_A,qbs_new_txt_len("\\",1)))|(qbs_equal(_FUNC_IDEZTAKEPATH_STRING_A,qbs_new_txt_len("/",1)))))||new_error){ if(qbevent){evnt(25753,14781,"ide_methods.bas");if(r)goto S_51357;} 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(25753,14782,"ide_methods.bas");}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(25753,14783,"ide_methods.bas");}while(r); do{ goto fornext_exit_5704; if(!qbevent)break;evnt(25753,14784,"ide_methods.bas");}while(r); } fornext_continue_5704:; } fornext_exit_5704:; do{ qbs_set(_FUNC_IDEZTAKEPATH_STRING_IDEZTAKEPATH,_FUNC_IDEZTAKEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14787,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14788,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free209.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 "data210.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,FUNC_IDEZTAKEPATH(_FUNC_IDEZGETFILEPATH_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14797,"ide_methods.bas");}while(r); S_51366:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEZGETFILEPATH_STRING_P->len== 0 )))||new_error){ if(qbevent){evnt(25753,14800,"ide_methods.bas");if(r)goto S_51366;} do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,_FUNC_IDEZGETFILEPATH_STRING_ROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14800,"ide_methods.bas");}while(r); } S_51369:; if ((qbs_cleanup(qbs_tmp_base,func__direxists(qbs_add(qbs_add(_FUNC_IDEZGETFILEPATH_STRING_ROOT,__STRING1_IDEPATHSEP),_FUNC_IDEZGETFILEPATH_STRING_P))))||new_error){ if(qbevent){evnt(25753,14803,"ide_methods.bas");if(r)goto S_51369;} 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(25753,14803,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 4 ; if(!qbevent)break;evnt(25753,14807,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P2,_FUNC_IDEZGETFILEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14808,"ide_methods.bas");}while(r); S_51374:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_OS,qbs_new_txt_len("WIN",3))))||new_error){ if(qbevent){evnt(25753,14809,"ide_methods.bas");if(r)goto S_51374;} S_51375:; 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(25753,14810,"ide_methods.bas");if(r)goto S_51375;} 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(25753,14810,"ide_methods.bas");}while(r); } } S_51379:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(_FUNC_IDEZGETFILEPATH_STRING_P2)== 0 )))||new_error){ if(qbevent){evnt(25753,14812,"ide_methods.bas");if(r)goto S_51379;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14812,"ide_methods.bas");}while(r); } do{ sub_chdir(_FUNC_IDEZGETFILEPATH_STRING_P2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14814,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; if(!qbevent)break;evnt(25753,14815,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_P,func__cwd()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14817,"ide_methods.bas");}while(r); do{ sub_chdir(__STRING_IDEROOT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14819,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEZGETFILEPATH_STRING_IDEZGETFILEPATH,_FUNC_IDEZGETFILEPATH_STRING_P); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14821,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free210.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; } 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 "data211.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,14827,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,14828,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,14829,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,14830,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,14831,"ide_methods.bas");}while(r); do{ if (_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]),0,_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDELAYOUTBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,14832,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,14833,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14834,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,14838,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDELAYOUTBOX_UDT_P)) + (0) ),&(pass5711= 60 ),&(pass5712= 9 ),qbs_new_txt_len("Code Layout",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14839,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,14841,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTID=*_FUNC_IDELAYOUTBOX_LONG_I; if(!qbevent)break;evnt(25753,14842,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,14843,"ide_methods.bas");}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]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,14844,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Auto Spacing & Upper/Lowercase Formatting",42)); if(!qbevent)break;evnt(25753,14845,"ide_methods.bas");}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]))*89+64))=*__LONG_IDEAUTOLAYOUT; if(!qbevent)break;evnt(25753,14846,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,14848,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTKWCAPITALSID=*_FUNC_IDELAYOUTBOX_LONG_I; if(!qbevent)break;evnt(25753,14849,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,14850,"ide_methods.bas");}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]))*89+24))= 3 ; if(!qbevent)break;evnt(25753,14851,"ide_methods.bas");}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]))*89+20))= 6 ; if(!qbevent)break;evnt(25753,14852,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Keywords in CAPITALS",21)); if(!qbevent)break;evnt(25753,14853,"ide_methods.bas");}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]))*89+64))=*__BYTE_IDEAUTOLAYOUTKWCAPITALS; if(!qbevent)break;evnt(25753,14854,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,14856,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTID=*_FUNC_IDELAYOUTBOX_LONG_I; if(!qbevent)break;evnt(25753,14857,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,14858,"ide_methods.bas");}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]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,14859,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Auto #Indent -",14)); if(!qbevent)break;evnt(25753,14860,"ide_methods.bas");}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]))*89+64))=*__LONG_IDEAUTOINDENT; if(!qbevent)break;evnt(25753,14861,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A2,FUNC_STR2(__LONG_IDEAUTOINDENTSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14863,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,14864,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTSIZEID=*_FUNC_IDELAYOUTBOX_LONG_I; if(!qbevent)break;evnt(25753,14865,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,14866,"ide_methods.bas");}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]))*89+20))= 20 ; if(!qbevent)break;evnt(25753,14867,"ide_methods.bas");}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]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,14868,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Spacing",8)); if(!qbevent)break;evnt(25753,14869,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDELAYOUTBOX_STRING_A2); if(!qbevent)break;evnt(25753,14870,"ide_methods.bas");}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]))*89+81))=_FUNC_IDELAYOUTBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,14871,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,14873,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDEINDENTSUBSID=*_FUNC_IDELAYOUTBOX_LONG_I; if(!qbevent)break;evnt(25753,14874,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,14875,"ide_methods.bas");}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]))*89+20))= 6 ; if(!qbevent)break;evnt(25753,14876,"ide_methods.bas");}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]))*89+24))= 7 ; if(!qbevent)break;evnt(25753,14877,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Indent SUBs and #FUNCTIONs",26)); if(!qbevent)break;evnt(25753,14878,"ide_methods.bas");}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]))*89+64))=*__LONG_IDEINDENTSUBS; if(!qbevent)break;evnt(25753,14879,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_I=*_FUNC_IDELAYOUTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,14881,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_BUTTONSID=*_FUNC_IDELAYOUTBOX_LONG_I; if(!qbevent)break;evnt(25753,14882,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,14883,"ide_methods.bas");}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]))*89+24))= 9 ; if(!qbevent)break;evnt(25753,14884,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDELAYOUTBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,14885,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,14886,"ide_methods.bas");}while(r); S_51438:; fornext_value5715= 1 ; fornext_finalvalue5715= 100 ; fornext_step5715= 1 ; if (fornext_step5715<0) fornext_step_negative5715=1; else fornext_step_negative5715=0; if (new_error) goto fornext_error5715; goto fornext_entrylabel5715; while(1){ fornext_value5715=fornext_step5715+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel5715: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value5715; if (fornext_step_negative5715){ if (fornext_value5715fornext_finalvalue5715) break; } fornext_error5715:; if(qbevent){evnt(25753,14890,"ide_methods.bas");if(r)goto S_51438;} 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]))*89)+ 0,((char*)_FUNC_IDELAYOUTBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,14890,"ide_methods.bas");}while(r); fornext_continue_5714:; } fornext_exit_5714:; S_51441:; do{ if(qbevent){evnt(25753,14893,"ide_methods.bas");if(r)goto S_51441;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDELAYOUTBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,14897,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,14898,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,14898,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,14898,"ide_methods.bas");}while(r); S_51446:; fornext_value5718= 1 ; fornext_finalvalue5718= 100 ; fornext_step5718= 1 ; if (fornext_step5718<0) fornext_step_negative5718=1; else fornext_step_negative5718=0; if (new_error) goto fornext_error5718; goto fornext_entrylabel5718; while(1){ fornext_value5718=fornext_step5718+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel5718: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value5718; if (fornext_step_negative5718){ if (fornext_value5718fornext_finalvalue5718) break; } fornext_error5718:; if(qbevent){evnt(25753,14899,"ide_methods.bas");if(r)goto S_51446;} S_51447:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,14900,"ide_methods.bas");if(r)goto S_51447;} 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]))*89+60))=*_FUNC_IDELAYOUTBOX_LONG_FOCUS-*_FUNC_IDELAYOUTBOX_LONG_F; if(!qbevent)break;evnt(25753,14903,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,14904,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,14904,"ide_methods.bas");}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]))*89) ),_FUNC_IDELAYOUTBOX_LONG_F); if(!qbevent)break;evnt(25753,14905,"ide_methods.bas");}while(r); S_51452:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,14906,"ide_methods.bas");if(r)goto S_51452;} 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]))*89+52)); if(!qbevent)break;evnt(25753,14906,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,14906,"ide_methods.bas");}while(r); } } fornext_continue_5717:; } fornext_exit_5717:; do{ *_FUNC_IDELAYOUTBOX_LONG_LASTFOCUS=*_FUNC_IDELAYOUTBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,14909,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,14916,"ide_methods.bas");}while(r); S_51460:; if ((*_FUNC_IDELAYOUTBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,14917,"ide_methods.bas");if(r)goto S_51460;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,14917,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDELAYOUTBOX_LONG_CY,*_FUNC_IDELAYOUTBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,14917,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,14917,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,14920,"ide_methods.bas");}while(r); S_51466:; do{ if(qbevent){evnt(25753,14921,"ide_methods.bas");if(r)goto S_51466;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,14922,"ide_methods.bas");}while(r); S_51468:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,14923,"ide_methods.bas");if(r)goto S_51468;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,14923,"ide_methods.bas");}while(r); } S_51471:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,14924,"ide_methods.bas");if(r)goto S_51471;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,14924,"ide_methods.bas");}while(r); } S_51474:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,14925,"ide_methods.bas");if(r)goto S_51474;} do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,14925,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,14925,"ide_methods.bas");}while(r); } S_51478:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,14926,"ide_methods.bas");if(r)goto S_51478;} do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,14926,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,14926,"ide_methods.bas");}while(r); } S_51482:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,14927,"ide_methods.bas");if(r)goto S_51482;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,14927,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,14928,"ide_methods.bas");}while(r); S_51486:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_ALT!=*_FUNC_IDELAYOUTBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,14928,"ide_methods.bas");if(r)goto S_51486;} do{ *_FUNC_IDELAYOUTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,14928,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_OLDALT=*_FUNC_IDELAYOUTBOX_LONG_ALT; if(!qbevent)break;evnt(25753,14929,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,14930,"ide_methods.bas");}while(r); S_51491:; dl_continue_5719:; }while((!(*_FUNC_IDELAYOUTBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5719:; if(qbevent){evnt(25753,14931,"ide_methods.bas");if(r)goto S_51491;} S_51492:; if ((*_FUNC_IDELAYOUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,14932,"ide_methods.bas");if(r)goto S_51492;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,14932,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,14932,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14934,"ide_methods.bas");}while(r); S_51498:; if ((*_FUNC_IDELAYOUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,14935,"ide_methods.bas");if(r)goto S_51498;} S_51499:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,14936,"ide_methods.bas");if(r)goto S_51499;} do{ *_FUNC_IDELAYOUTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14937,"ide_methods.bas");}while(r); S_51501:; if (((-(*_FUNC_IDELAYOUTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDELAYOUTBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,14938,"ide_methods.bas");if(r)goto S_51501;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDELAYOUTBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14938,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,14941,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,14941,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,14941,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,14945,"ide_methods.bas");}while(r); S_51510:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,14946,"ide_methods.bas");if(r)goto S_51510;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14946,"ide_methods.bas");}while(r); } S_51513:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,14947,"ide_methods.bas");if(r)goto S_51513;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS=*_FUNC_IDELAYOUTBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,14947,"ide_methods.bas");}while(r); } S_51516:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,14948,"ide_methods.bas");if(r)goto S_51516;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS=*_FUNC_IDELAYOUTBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,14948,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14948,"ide_methods.bas");}while(r); } S_51520:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,14949,"ide_methods.bas");if(r)goto S_51520;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS=*_FUNC_IDELAYOUTBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,14949,"ide_methods.bas");}while(r); } S_51523:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS>*_FUNC_IDELAYOUTBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,14950,"ide_methods.bas");if(r)goto S_51523;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,14950,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,14951,"ide_methods.bas");}while(r); S_51527:; fornext_value5722= 1 ; fornext_finalvalue5722= 100 ; fornext_step5722= 1 ; if (fornext_step5722<0) fornext_step_negative5722=1; else fornext_step_negative5722=0; if (new_error) goto fornext_error5722; goto fornext_entrylabel5722; while(1){ fornext_value5722=fornext_step5722+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel5722: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value5722; if (fornext_step_negative5722){ if (fornext_value5722fornext_finalvalue5722) break; } fornext_error5722:; if(qbevent){evnt(25753,14952,"ide_methods.bas");if(r)goto S_51527;} 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]))*89+36)); if(!qbevent)break;evnt(25753,14953,"ide_methods.bas");}while(r); S_51529:; if ((*_FUNC_IDELAYOUTBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,14954,"ide_methods.bas");if(r)goto S_51529;} do{ *_FUNC_IDELAYOUTBOX_LONG_FOCUSOFFSET=*_FUNC_IDELAYOUTBOX_LONG_FOCUS-*_FUNC_IDELAYOUTBOX_LONG_F; if(!qbevent)break;evnt(25753,14955,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,14956,"ide_methods.bas");}while(r); } fornext_continue_5721:; } fornext_exit_5721:; S_51534:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS!=*_FUNC_IDELAYOUTBOX_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,14962,"ide_methods.bas");if(r)goto S_51534;} do{ *_FUNC_IDELAYOUTBOX_LONG_PREVFOCUS=*_FUNC_IDELAYOUTBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,14964,"ide_methods.bas");}while(r); S_51536:; if ((-(*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_FOCUS)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+36))== 1 ))||new_error){ if(qbevent){evnt(25753,14965,"ide_methods.bas");if(r)goto S_51536;} do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_FOCUS)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_FOCUS)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,14966,"ide_methods.bas");}while(r); S_51538:; if ((-(*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_FOCUS)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,14967,"ide_methods.bas");if(r)goto S_51538;} do{ *(int8*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_FOCUS)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,14967,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_FOCUS)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,14968,"ide_methods.bas");}while(r); } } 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((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTSIZEID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14972,"ide_methods.bas");}while(r); S_51545:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDELAYOUTBOX_STRING_A->len> 2 )))||new_error){ if(qbevent){evnt(25753,14973,"ide_methods.bas");if(r)goto S_51545;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_left(_FUNC_IDELAYOUTBOX_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14973,"ide_methods.bas");}while(r); } S_51548:; fornext_value5726= 1 ; fornext_finalvalue5726=_FUNC_IDELAYOUTBOX_STRING_A->len; fornext_step5726= 1 ; if (fornext_step5726<0) fornext_step_negative5726=1; else fornext_step_negative5726=0; if (new_error) goto fornext_error5726; goto fornext_entrylabel5726; while(1){ fornext_value5726=fornext_step5726+(*_FUNC_IDELAYOUTBOX_LONG_I); fornext_entrylabel5726: *_FUNC_IDELAYOUTBOX_LONG_I=fornext_value5726; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5726){ if (fornext_value5726fornext_finalvalue5726) break; } fornext_error5726:; if(qbevent){evnt(25753,14974,"ide_methods.bas");if(r)goto S_51548;} 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(25753,14975,"ide_methods.bas");}while(r); S_51550:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDELAYOUTBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDELAYOUTBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,14976,"ide_methods.bas");if(r)goto S_51550;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14976,"ide_methods.bas");}while(r); do{ goto fornext_exit_5725; if(!qbevent)break;evnt(25753,14976,"ide_methods.bas");}while(r); } S_51554:; if (((-(*_FUNC_IDELAYOUTBOX_LONG_A< 48 ))|(-(*_FUNC_IDELAYOUTBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,14977,"ide_methods.bas");if(r)goto S_51554;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14977,"ide_methods.bas");}while(r); do{ goto fornext_exit_5725; if(!qbevent)break;evnt(25753,14977,"ide_methods.bas");}while(r); } fornext_continue_5725:; } fornext_exit_5725:; S_51559:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDELAYOUTBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,14979,"ide_methods.bas");if(r)goto S_51559;} do{ *_FUNC_IDELAYOUTBOX_LONG_A=qbr(func_val(_FUNC_IDELAYOUTBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14980,"ide_methods.bas");}while(r); S_51561:; if ((-(*_FUNC_IDELAYOUTBOX_LONG_A> 64 ))||new_error){ if(qbevent){evnt(25753,14981,"ide_methods.bas");if(r)goto S_51561;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_A,qbs_new_txt_len("64",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14981,"ide_methods.bas");}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTSIZEID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,14983,"ide_methods.bas");}while(r); S_51566:; if (((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS==*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTKWCAPITALSID))&(-(*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTKWCAPITALSID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))== 1 )))||new_error){ if(qbevent){evnt(25753,14985,"ide_methods.bas");if(r)goto S_51566;} do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,14986,"ide_methods.bas");}while(r); } S_51569:; if (((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS==*_FUNC_IDELAYOUTBOX_LONG_IDEINDENTSUBSID))&(-(*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEINDENTSUBSID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))== 1 )))||new_error){ if(qbevent){evnt(25753,14989,"ide_methods.bas");if(r)goto S_51569;} do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,14990,"ide_methods.bas");}while(r); } S_51572:; if ((-(*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))== 0 ))||new_error){ if(qbevent){evnt(25753,14993,"ide_methods.bas");if(r)goto S_51572;} do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTKWCAPITALSID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,14993,"ide_methods.bas");}while(r); } S_51575:; if ((-(*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))== 0 ))||new_error){ if(qbevent){evnt(25753,14994,"ide_methods.bas");if(r)goto S_51575;} do{ *(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEINDENTSUBSID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,14994,"ide_methods.bas");}while(r); } S_51578:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS==(*_FUNC_IDELAYOUTBOX_LONG_BUTTONSID+ 1 )))&(-(*_FUNC_IDELAYOUTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,14996,"ide_methods.bas");if(r)goto S_51578;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,14996,"ide_methods.bas");}while(r); } S_51581:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDELAYOUTBOX_LONG_FOCUS==*_FUNC_IDELAYOUTBOX_LONG_BUTTONSID))&(-(*_FUNC_IDELAYOUTBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,14997,"ide_methods.bas");if(r)goto S_51581;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,14999,"ide_methods.bas");}while(r); S_51583:; if ((-(*_FUNC_IDELAYOUTBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,14999,"ide_methods.bas");if(r)goto S_51583;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(25753,14999,"ide_methods.bas");}while(r); } S_51586:; if ((-(*__LONG_IDEAUTOLAYOUT!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15000,"ide_methods.bas");if(r)goto S_51586;} do{ *__LONG_IDEAUTOLAYOUT=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15000,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(25753,15000,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOLAYOUTKWCAPITALSID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15002,"ide_methods.bas");}while(r); S_51591:; if ((-(*_FUNC_IDELAYOUTBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15002,"ide_methods.bas");if(r)goto S_51591;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(25753,15002,"ide_methods.bas");}while(r); } S_51594:; if ((-(*__BYTE_IDEAUTOLAYOUTKWCAPITALS!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15003,"ide_methods.bas");if(r)goto S_51594;} do{ *__BYTE_IDEAUTOLAYOUTKWCAPITALS=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15003,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(25753,15003,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15005,"ide_methods.bas");}while(r); S_51599:; if ((-(*_FUNC_IDELAYOUTBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15005,"ide_methods.bas");if(r)goto S_51599;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(25753,15005,"ide_methods.bas");}while(r); } S_51602:; if ((-(*__LONG_IDEAUTOINDENT!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15006,"ide_methods.bas");if(r)goto S_51602;} do{ *__LONG_IDEAUTOINDENT=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15006,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(25753,15006,"ide_methods.bas");}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((*_FUNC_IDELAYOUTBOX_LONG_IDEAUTOINDENTSIZEID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15008,"ide_methods.bas");}while(r); S_51607:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDELAYOUTBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15009,"ide_methods.bas");if(r)goto S_51607;} do{ qbs_set(_FUNC_IDELAYOUTBOX_STRING_V,qbs_new_txt_len("4",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15009,"ide_methods.bas");}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(25753,15010,"ide_methods.bas");}while(r); S_51611:; if (((-(*_FUNC_IDELAYOUTBOX_INTEGER_V< 0 ))|(-(*_FUNC_IDELAYOUTBOX_INTEGER_V> 64 )))||new_error){ if(qbevent){evnt(25753,15011,"ide_methods.bas");if(r)goto S_51611;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 4 ; if(!qbevent)break;evnt(25753,15011,"ide_methods.bas");}while(r); } S_51614:; if ((-(*__LONG_IDEAUTOINDENTSIZE!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15012,"ide_methods.bas");if(r)goto S_51614;} do{ *__LONG_IDEAUTOINDENTSIZE=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15013,"ide_methods.bas");}while(r); S_51616:; if ((-(*__LONG_IDEAUTOINDENT!= 0 ))||new_error){ if(qbevent){evnt(25753,15014,"ide_methods.bas");if(r)goto S_51616;} do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(25753,15014,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDELAYOUTBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDELAYOUTBOX_LONG_IDEINDENTSUBSID)-_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[4],_FUNC_IDELAYOUTBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15017,"ide_methods.bas");}while(r); S_51621:; if ((-(*_FUNC_IDELAYOUTBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15017,"ide_methods.bas");if(r)goto S_51621;} do{ *_FUNC_IDELAYOUTBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(25753,15017,"ide_methods.bas");}while(r); } S_51624:; if ((-(*__LONG_IDEINDENTSUBS!=*_FUNC_IDELAYOUTBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15018,"ide_methods.bas");if(r)goto S_51624;} do{ *__LONG_IDEINDENTSUBS=*_FUNC_IDELAYOUTBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15018,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_IDELAYOUTBOX= 1 ; if(!qbevent)break;evnt(25753,15018,"ide_methods.bas");}while(r); } S_51628:; if ((*__LONG_IDEAUTOLAYOUT)||new_error){ if(qbevent){evnt(25753,15020,"ide_methods.bas");if(r)goto S_51628;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoFormat",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15021,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoFormat",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15023,"ide_methods.bas");}while(r); } S_51633:; if ((*__BYTE_IDEAUTOLAYOUTKWCAPITALS)||new_error){ if(qbevent){evnt(25753,15025,"ide_methods.bas");if(r)goto S_51633;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_KeywordCapital",18),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15026,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_KeywordCapital",18),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15028,"ide_methods.bas");}while(r); } S_51638:; if ((*__LONG_IDEAUTOINDENT)||new_error){ if(qbevent){evnt(25753,15030,"ide_methods.bas");if(r)goto S_51638;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoIndent",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15031,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoIndent",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15033,"ide_methods.bas");}while(r); } do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSize",14),qbs_str((int32)(*__LONG_IDEAUTOINDENTSIZE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15035,"ide_methods.bas");}while(r); S_51644:; if ((*__LONG_IDEINDENTSUBS)||new_error){ if(qbevent){evnt(25753,15036,"ide_methods.bas");if(r)goto S_51644;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSUBs",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15037,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_IndentSUBs",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15039,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15041,"ide_methods.bas");}while(r); } do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,15046,"ide_methods.bas");}while(r); do{ *_FUNC_IDELAYOUTBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,15047,"ide_methods.bas");}while(r); dl_continue_5716:; }while(1); dl_exit_5716:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free211.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 "data212.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_A2,FUNC_STR2(__LONG_IDEBACKUPSIZE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15052,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEBACKUPBOX_STRING_V,FUNC_IDEINPUTBOX(qbs_new_txt_len("Backup/Undo",11),qbs_new_txt_len("#Undo buffer limit (10-2000MB)",30),_FUNC_IDEBACKUPBOX_STRING_A2,qbs_new_txt_len("0123456789",10),&(pass5729= 50 ),&(pass5730= 4 ),&(pass5731= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15053,"ide_methods.bas");}while(r); S_51656:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEBACKUPBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15054,"ide_methods.bas");if(r)goto S_51656;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15054,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEBACKUPBOX_LONG_V=qbr(func_val(_FUNC_IDEBACKUPBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15057,"ide_methods.bas");}while(r); S_51660:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_V< 10 ))||new_error){ if(qbevent){evnt(25753,15058,"ide_methods.bas");if(r)goto S_51660;} do{ *_FUNC_IDEBACKUPBOX_LONG_V= 10 ; if(!qbevent)break;evnt(25753,15058,"ide_methods.bas");}while(r); } S_51663:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_V> 2000 ))||new_error){ if(qbevent){evnt(25753,15059,"ide_methods.bas");if(r)goto S_51663;} do{ *_FUNC_IDEBACKUPBOX_LONG_V= 2000 ; if(!qbevent)break;evnt(25753,15059,"ide_methods.bas");}while(r); } S_51666:; if ((-(*_FUNC_IDEBACKUPBOX_LONG_V<*__LONG_IDEBACKUPSIZE))||new_error){ if(qbevent){evnt(25753,15061,"ide_methods.bas");if(r)goto S_51666;} 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(25753,15062,"ide_methods.bas");}while(r); do{ sub_close( 151 ,1); if(!qbevent)break;evnt(25753,15062,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOBASE= 0 ; if(!qbevent)break;evnt(25753,15063,"ide_methods.bas");}while(r); do{ *__LONG_IDEUNDOPOS= 0 ; if(!qbevent)break;evnt(25753,15064,"ide_methods.bas");}while(r); } do{ *__LONG_IDEBACKUPSIZE=*_FUNC_IDEBACKUPBOX_LONG_V; if(!qbevent)break;evnt(25753,15067,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BackupSize",10),qbs_add(qbs_str((int32)(*_FUNC_IDEBACKUPBOX_LONG_V)),qbs_new_txt_len(" 'in MB",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15068,"ide_methods.bas");}while(r); do{ *_FUNC_IDEBACKUPBOX_LONG_IDEBACKUPBOX= 1 ; if(!qbevent)break;evnt(25753,15069,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free212.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; } void SUB_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 "data213.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_51675:; if ((-(*__LONG_IDEGOTOBOX_LASTLINENUM> 0 ))||new_error){ if(qbevent){evnt(25753,15073,"ide_methods.bas");if(r)goto S_51675;} do{ qbs_set(_SUB_IDEGOTOBOX_STRING_A2,FUNC_STR2(__LONG_IDEGOTOBOX_LASTLINENUM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15073,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEGOTOBOX_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15073,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEGOTOBOX_STRING_V,FUNC_IDEINPUTBOX(qbs_new_txt_len("Go To Line",10),qbs_new_txt_len("#Line",5),_SUB_IDEGOTOBOX_STRING_A2,qbs_new_txt_len("0123456789",10),&(pass5732= 30 ),&(pass5733= 8 ),&(pass5734= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15074,"ide_methods.bas");}while(r); S_51681:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEGOTOBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15075,"ide_methods.bas");if(r)goto S_51681;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15075,"ide_methods.bas");}while(r); } do{ *_SUB_IDEGOTOBOX_LONG_V=qbr(func_val(_SUB_IDEGOTOBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15077,"ide_methods.bas");}while(r); S_51685:; if ((-(*_SUB_IDEGOTOBOX_LONG_V< 1 ))||new_error){ if(qbevent){evnt(25753,15078,"ide_methods.bas");if(r)goto S_51685;} do{ *_SUB_IDEGOTOBOX_LONG_V= 1 ; if(!qbevent)break;evnt(25753,15078,"ide_methods.bas");}while(r); } S_51688:; if ((-(*_SUB_IDEGOTOBOX_LONG_V>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,15079,"ide_methods.bas");if(r)goto S_51688;} do{ *_SUB_IDEGOTOBOX_LONG_V=*__LONG_IDEN; if(!qbevent)break;evnt(25753,15079,"ide_methods.bas");}while(r); } do{ *__LONG_IDEGOTOBOX_LASTLINENUM=*_SUB_IDEGOTOBOX_LONG_V; if(!qbevent)break;evnt(25753,15080,"ide_methods.bas");}while(r); do{ SUB_ADDQUICKNAVHISTORY(); if(!qbevent)break;evnt(25753,15081,"ide_methods.bas");}while(r); do{ *__LONG_IDECY=*_SUB_IDEGOTOBOX_LONG_V; if(!qbevent)break;evnt(25753,15082,"ide_methods.bas");}while(r); do{ SUB_IDECENTERCURRENTLINE(); if(!qbevent)break;evnt(25753,15083,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,15084,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free213.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_IDESETTCPPORTBOX(){ 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 "data214.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_IDESETTCPPORTBOX_STRING_A2,FUNC_STR2(__LONG_IDEBASETCPPORT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15088,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDESETTCPPORTBOX_STRING_V,FUNC_IDEINPUTBOX(qbs_new_txt_len("Base TCP/IP Port Number",23),qbs_new_txt_len("#Port number for $DEBUG mode",28),_SUB_IDESETTCPPORTBOX_STRING_A2,qbs_new_txt_len("0123456789",10),&(pass5735= 45 ),&(pass5736= 5 ),&(pass5737= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15089,"ide_methods.bas");}while(r); S_51698:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESETTCPPORTBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15090,"ide_methods.bas");if(r)goto S_51698;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15090,"ide_methods.bas");}while(r); } do{ *__LONG_IDEBASETCPPORT=qbr(func_val(_SUB_IDESETTCPPORTBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15092,"ide_methods.bas");}while(r); S_51702:; if ((-(*__LONG_IDEBASETCPPORT== 0 ))||new_error){ if(qbevent){evnt(25753,15093,"ide_methods.bas");if(r)goto S_51702;} do{ *__LONG_IDEBASETCPPORT= 9000 ; if(!qbevent)break;evnt(25753,15093,"ide_methods.bas");}while(r); } do{ SUB_WRITECONFIGSETTING(__STRING_DEBUGSETTINGSSECTION,qbs_new_txt_len("BaseTCPPort",11),FUNC_STR2(__LONG_IDEBASETCPPORT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15094,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free214.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_IDEGETLINENUMBERBOX(qbs*_FUNC_IDEGETLINENUMBERBOX_STRING_TITLE,int32*_FUNC_IDEGETLINENUMBERBOX_LONG_INITIALVALUE){ 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 "data215.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_IDEGETLINENUMBERBOX_STRING_A2,FUNC_STR2(_FUNC_IDEGETLINENUMBERBOX_LONG_INITIALVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15098,"ide_methods.bas");}while(r); S_51707:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEGETLINENUMBERBOX_STRING_A2,qbs_new_txt_len("0",1))))||new_error){ if(qbevent){evnt(25753,15099,"ide_methods.bas");if(r)goto S_51707;} do{ qbs_set(_FUNC_IDEGETLINENUMBERBOX_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15099,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEGETLINENUMBERBOX_STRING_V,FUNC_IDEINPUTBOX(_FUNC_IDEGETLINENUMBERBOX_STRING_TITLE,qbs_new_txt_len("#Line",5),_FUNC_IDEGETLINENUMBERBOX_STRING_A2,qbs_new_txt_len("0123456789",10),&(pass5739= 30 ),&(pass5740= 8 ),&(pass5741= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15100,"ide_methods.bas");}while(r); S_51711:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEGETLINENUMBERBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15101,"ide_methods.bas");if(r)goto S_51711;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15101,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEGETLINENUMBERBOX_LONG_V=qbr(func_val(_FUNC_IDEGETLINENUMBERBOX_STRING_V)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15103,"ide_methods.bas");}while(r); S_51715:; if ((-(*_FUNC_IDEGETLINENUMBERBOX_LONG_V< 1 ))||new_error){ if(qbevent){evnt(25753,15104,"ide_methods.bas");if(r)goto S_51715;} do{ *_FUNC_IDEGETLINENUMBERBOX_LONG_V= 1 ; if(!qbevent)break;evnt(25753,15104,"ide_methods.bas");}while(r); } S_51718:; if ((-(*_FUNC_IDEGETLINENUMBERBOX_LONG_V>*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,15105,"ide_methods.bas");if(r)goto S_51718;} do{ *_FUNC_IDEGETLINENUMBERBOX_LONG_V=*__LONG_IDEN; if(!qbevent)break;evnt(25753,15105,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEGETLINENUMBERBOX_LONG_IDEGETLINENUMBERBOX=*_FUNC_IDEGETLINENUMBERBOX_LONG_V; if(!qbevent)break;evnt(25753,15107,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free215.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_IDEGETLINENUMBERBOX_LONG_IDEGETLINENUMBERBOX; } int32 FUNC_IDECOMPILERSETTINGSBOX(){ 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 "data216.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,15113,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,15114,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15115,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15116,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15117,"ide_methods.bas");}while(r); do{ if (_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4]+1; _FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0]),0,_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,15118,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15119,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15120,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15121,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15122,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15123,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15124,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15125,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15126,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECOMPILERSETTINGSBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15127,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,15131,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y= 0 ; if(!qbevent)break;evnt(25753,15132,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15134,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_OPTIMIZECHECKBOX=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15135,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15136,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 2 ; if(!qbevent)break;evnt(25753,15137,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15137,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Compile #program with C++ optimization flag",43)); if(!qbevent)break;evnt(25753,15138,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64))=*__ULONG_OPTIMIZECPPPROGRAM; if(!qbevent)break;evnt(25753,15139,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15141,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_STRIPDEBUGCHECKBOX=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15142,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15143,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15144,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15144,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Strip C++ symbols from executable",34)); if(!qbevent)break;evnt(25753,15145,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64))=-(*__ULONG_STRIPDEBUGSYMBOLS); if(!qbevent)break;evnt(25753,15146,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15148,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_ADDDEBUGSYMBOLSCHECKBOX=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15149,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15150,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15151,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15151,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Add C++ Debug Information",26)); if(!qbevent)break;evnt(25753,15152,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64))=*__LONG_INCLUDE_GDB_DEBUGGING_INFO; if(!qbevent)break;evnt(25753,15153,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15155,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECOMPILERSETTINGSBOX_STRING_A2,FUNC_STR2(&(pass5742=*__LONG_IDEWY+*__LONG_IDESUBWINDOW))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15157,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15158,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_EXTRACPPFLAGSTEXTBOX=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15159,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15160,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+20))= 2 ; if(!qbevent)break;evnt(25753,15161,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 2 ; if(!qbevent)break;evnt(25753,15162,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15162,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15162,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("C++ Compiler #Flags",19)); if(!qbevent)break;evnt(25753,15163,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(__STRING_EXTRACPPFLAGS); if(!qbevent)break;evnt(25753,15164,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECOMPILERSETTINGSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15165,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECOMPILERSETTINGSBOX_STRING_A2,FUNC_STR2(&(pass5744=*__LONG_IDEWY+*__LONG_IDESUBWINDOW))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15167,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15168,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_EXTRALINKERFLAGSTEXTBOX=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15169,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15170,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+20))= 2 ; if(!qbevent)break;evnt(25753,15171,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 2 ; if(!qbevent)break;evnt(25753,15172,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15172,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15172,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("C++ #Linker Flags",17)); if(!qbevent)break;evnt(25753,15173,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(__STRING_EXTRALINKERFLAGS); if(!qbevent)break;evnt(25753,15174,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECOMPILERSETTINGSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15175,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECOMPILERSETTINGSBOX_STRING_A2,FUNC_STR2(&(pass5746=*__LONG_IDEWY+*__LONG_IDESUBWINDOW))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15177,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15178,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_MAXPARALLELTEXTBOX=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15179,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15180,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+20))= 2 ; if(!qbevent)break;evnt(25753,15181,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 2 ; if(!qbevent)break;evnt(25753,15182,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15182,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15182,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Max C++ Compiler Processes",27)); if(!qbevent)break;evnt(25753,15183,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(FUNC_STR2((int32*)__ULONG_MAXPARALLELPROCESSES)); if(!qbevent)break;evnt(25753,15184,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECOMPILERSETTINGSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15185,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15187,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15189,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_USEOLDAUDIOBACKEND=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15190,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15191,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15192,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15192,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Use old audio backend (LGPL)",29)); if(!qbevent)break;evnt(25753,15193,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64))=~(*__ULONG_USEMINIAUDIOBACKEND); if(!qbevent)break;evnt(25753,15194,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15196,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15198,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_BUTTONSID=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I; if(!qbevent)break;evnt(25753,15199,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,15200,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,15201,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+24))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y; if(!qbevent)break;evnt(25753,15201,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDECOMPILERSETTINGSBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,15202,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,15203,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDECOMPILERSETTINGSBOX_UDT_P)) + (0) ),&(pass5748= 60 ),_FUNC_IDECOMPILERSETTINGSBOX_LONG_Y,qbs_new_txt_len("Compiler Settings",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15205,"ide_methods.bas");}while(r); S_51811:; fornext_value5750= 1 ; fornext_finalvalue5750= 100 ; fornext_step5750= 1 ; if (fornext_step5750<0) fornext_step_negative5750=1; else fornext_step_negative5750=0; if (new_error) goto fornext_error5750; goto fornext_entrylabel5750; while(1){ fornext_value5750=fornext_step5750+(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I); fornext_entrylabel5750: *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=fornext_value5750; if (fornext_step_negative5750){ if (fornext_value5750fornext_finalvalue5750) break; } fornext_error5750:; if(qbevent){evnt(25753,15209,"ide_methods.bas");if(r)goto S_51811;} do{ memcpy(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDECOMPILERSETTINGSBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,15209,"ide_methods.bas");}while(r); fornext_continue_5749:; } fornext_exit_5749:; S_51814:; do{ if(qbevent){evnt(25753,15212,"ide_methods.bas");if(r)goto S_51814;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECOMPILERSETTINGSBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,15216,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15217,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,15217,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,15217,"ide_methods.bas");}while(r); S_51819:; fornext_value5753= 1 ; fornext_finalvalue5753= 100 ; fornext_step5753= 1 ; if (fornext_step5753<0) fornext_step_negative5753=1; else fornext_step_negative5753=0; if (new_error) goto fornext_error5753; goto fornext_entrylabel5753; while(1){ fornext_value5753=fornext_step5753+(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I); fornext_entrylabel5753: *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=fornext_value5753; if (fornext_step_negative5753){ if (fornext_value5753fornext_finalvalue5753) break; } fornext_error5753:; if(qbevent){evnt(25753,15218,"ide_methods.bas");if(r)goto S_51819;} S_51820:; if ((*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,15219,"ide_methods.bas");if(r)goto S_51820;} do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS-*_FUNC_IDECOMPILERSETTINGSBOX_LONG_F; if(!qbevent)break;evnt(25753,15222,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,15223,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,15223,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDECOMPILERSETTINGSBOX_LONG_F); if(!qbevent)break;evnt(25753,15224,"ide_methods.bas");}while(r); S_51825:; if ((*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,15225,"ide_methods.bas");if(r)goto S_51825;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,15225,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,15225,"ide_methods.bas");}while(r); } } fornext_continue_5752:; } fornext_exit_5752:; do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_LASTFOCUS=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,15228,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,15235,"ide_methods.bas");}while(r); S_51833:; if ((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,15236,"ide_methods.bas");if(r)goto S_51833;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15236,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_CY,*_FUNC_IDECOMPILERSETTINGSBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,15236,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15236,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,15239,"ide_methods.bas");}while(r); S_51839:; do{ if(qbevent){evnt(25753,15240,"ide_methods.bas");if(r)goto S_51839;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,15241,"ide_methods.bas");}while(r); S_51841:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,15242,"ide_methods.bas");if(r)goto S_51841;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15242,"ide_methods.bas");}while(r); } S_51844:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,15243,"ide_methods.bas");if(r)goto S_51844;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15243,"ide_methods.bas");}while(r); } S_51847:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,15244,"ide_methods.bas");if(r)goto S_51847;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,15244,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15244,"ide_methods.bas");}while(r); } S_51851:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,15245,"ide_methods.bas");if(r)goto S_51851;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,15245,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15245,"ide_methods.bas");}while(r); } S_51855:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,15246,"ide_methods.bas");if(r)goto S_51855;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15246,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,15247,"ide_methods.bas");}while(r); S_51859:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_ALT!=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,15247,"ide_methods.bas");if(r)goto S_51859;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15247,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_OLDALT=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_ALT; if(!qbevent)break;evnt(25753,15248,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,15249,"ide_methods.bas");}while(r); S_51864:; dl_continue_5754:; }while((!(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5754:; if(qbevent){evnt(25753,15250,"ide_methods.bas");if(r)goto S_51864;} S_51865:; if ((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15251,"ide_methods.bas");if(r)goto S_51865;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,15251,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,15251,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDECOMPILERSETTINGSBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15253,"ide_methods.bas");}while(r); S_51871:; if ((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15254,"ide_methods.bas");if(r)goto S_51871;} S_51872:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,15255,"ide_methods.bas");if(r)goto S_51872;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15256,"ide_methods.bas");}while(r); S_51874:; if (((-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_K>= 65 ))&(-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,15257,"ide_methods.bas");if(r)goto S_51874;} do{ qbs_set(_FUNC_IDECOMPILERSETTINGSBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15257,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15260,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,15260,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15260,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,15264,"ide_methods.bas");}while(r); S_51883:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15265,"ide_methods.bas");if(r)goto S_51883;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15265,"ide_methods.bas");}while(r); } S_51886:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,15266,"ide_methods.bas");if(r)goto S_51886;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,15266,"ide_methods.bas");}while(r); } S_51889:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,15267,"ide_methods.bas");if(r)goto S_51889;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,15267,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15267,"ide_methods.bas");}while(r); } S_51893:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,15268,"ide_methods.bas");if(r)goto S_51893;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,15268,"ide_methods.bas");}while(r); } S_51896:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS>*_FUNC_IDECOMPILERSETTINGSBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,15269,"ide_methods.bas");if(r)goto S_51896;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15269,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15270,"ide_methods.bas");}while(r); S_51900:; fornext_value5757= 1 ; fornext_finalvalue5757= 100 ; fornext_step5757= 1 ; if (fornext_step5757<0) fornext_step_negative5757=1; else fornext_step_negative5757=0; if (new_error) goto fornext_error5757; goto fornext_entrylabel5757; while(1){ fornext_value5757=fornext_step5757+(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I); fornext_entrylabel5757: *_FUNC_IDECOMPILERSETTINGSBOX_LONG_I=fornext_value5757; if (fornext_step_negative5757){ if (fornext_value5757fornext_finalvalue5757) break; } fornext_error5757:; if(qbevent){evnt(25753,15271,"ide_methods.bas");if(r)goto S_51900;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_T=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,15272,"ide_methods.bas");}while(r); S_51902:; if ((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,15273,"ide_methods.bas");if(r)goto S_51902;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUSOFFSET=*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS-*_FUNC_IDECOMPILERSETTINGSBOX_LONG_F; if(!qbevent)break;evnt(25753,15274,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_I)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS,_FUNC_IDECOMPILERSETTINGSBOX_LONG_F,_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDECOMPILERSETTINGSBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDECOMPILERSETTINGSBOX_LONG_MOUSEDOWN,_FUNC_IDECOMPILERSETTINGSBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDECOMPILERSETTINGSBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15275,"ide_methods.bas");}while(r); } fornext_continue_5756:; } fornext_exit_5756:; S_51907:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS==(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_BUTTONSID+ 1 )))&(-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,15281,"ide_methods.bas");if(r)goto S_51907;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15281,"ide_methods.bas");}while(r); } S_51910:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_FOCUS==*_FUNC_IDECOMPILERSETTINGSBOX_LONG_BUTTONSID))&(-(*_FUNC_IDECOMPILERSETTINGSBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,15282,"ide_methods.bas");if(r)goto S_51910;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_OPTIMIZECHECKBOX)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15284,"ide_methods.bas");}while(r); S_51912:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15284,"ide_methods.bas");if(r)goto S_51912;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,15284,"ide_methods.bas");}while(r); } S_51915:; if ((-(*__ULONG_OPTIMIZECPPPROGRAM!=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15285,"ide_methods.bas");if(r)goto S_51915;} do{ *__ULONG_OPTIMIZECPPPROGRAM=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15286,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("OptimizeCppProgram",18),FUNC_BOOLTOTFSTRING((int32*)__ULONG_OPTIMIZECPPPROGRAM)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15287,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_STRIPDEBUGCHECKBOX)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15290,"ide_methods.bas");}while(r); S_51920:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15290,"ide_methods.bas");if(r)goto S_51920;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,15290,"ide_methods.bas");}while(r); } S_51923:; if ((-(*__ULONG_STRIPDEBUGSYMBOLS!=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15291,"ide_methods.bas");if(r)goto S_51923;} do{ *__ULONG_STRIPDEBUGSYMBOLS=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15292,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("StripDebugSymbols",17),FUNC_BOOLTOTFSTRING((int32*)__ULONG_STRIPDEBUGSYMBOLS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15293,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_ADDDEBUGSYMBOLSCHECKBOX)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15296,"ide_methods.bas");}while(r); S_51928:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15296,"ide_methods.bas");if(r)goto S_51928;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,15296,"ide_methods.bas");}while(r); } S_51931:; if ((-(*__LONG_INCLUDE_GDB_DEBUGGING_INFO!=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V))||new_error){ if(qbevent){evnt(25753,15297,"ide_methods.bas");if(r)goto S_51931;} do{ *__LONG_INCLUDE_GDB_DEBUGGING_INFO=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15298,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DebugInfo",9),FUNC_BOOLTOTFSTRING(__LONG_INCLUDE_GDB_DEBUGGING_INFO)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15299,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_USEOLDAUDIOBACKEND)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,15302,"ide_methods.bas");}while(r); S_51936:; if ((-(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,15302,"ide_methods.bas");if(r)goto S_51936;} do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,15302,"ide_methods.bas");}while(r); } S_51939:; if ((-(*__ULONG_USEMINIAUDIOBACKEND!=(~(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V))))||new_error){ if(qbevent){evnt(25753,15303,"ide_methods.bas");if(r)goto S_51939;} do{ *__ULONG_USEMINIAUDIOBACKEND=~(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V); if(!qbevent)break;evnt(25753,15304,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("UseMiniaudioBackend",19),FUNC_BOOLTOTFSTRING((int32*)__ULONG_USEMINIAUDIOBACKEND)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15305,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V=qbr_float_to_long(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_MAXPARALLELTEXTBOX)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15308,"ide_methods.bas");}while(r); S_51944:; if (((-(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V> 0 ))&(-(*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V!=*__ULONG_MAXPARALLELPROCESSES)))||new_error){ if(qbevent){evnt(25753,15309,"ide_methods.bas");if(r)goto S_51944;} do{ *__ULONG_MAXPARALLELPROCESSES=*_FUNC_IDECOMPILERSETTINGSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,15310,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("MaxParallelProcesses",20),FUNC_STR2((int32*)__ULONG_MAXPARALLELPROCESSES)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15311,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_EXTRACPPFLAGS,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_EXTRACPPFLAGSTEXTBOX)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15314,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("ExtraCppFlags",13),__STRING_EXTRACPPFLAGS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15315,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_EXTRALINKERFLAGS,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECOMPILERSETTINGSBOX_LONG_EXTRALINKERFLAGSTEXTBOX)-_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[4],_FUNC_IDECOMPILERSETTINGSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15317,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COMPILERSETTINGSSECTION,qbs_new_txt_len("ExtraLinkerFlags",16),__STRING_EXTRALINKERFLAGS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15318,"ide_methods.bas");}while(r); do{ SUB_PURGETEMPORARYBUILDFILES(__STRING_OS,&(pass5758=*__LONG_MACOSX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15321,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,15322,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15324,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,15329,"ide_methods.bas");}while(r); do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,15330,"ide_methods.bas");}while(r); dl_continue_5751:; }while(1); dl_exit_5751:; do{ *_FUNC_IDECOMPILERSETTINGSBOX_LONG_IDECOMPILERSETTINGSBOX= 0 ; if(!qbevent)break;evnt(25753,15333,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free216.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_IDECOMPILERSETTINGSBOX_LONG_IDECOMPILERSETTINGSBOX; } int32 FUNC_IDEMESSAGEBOX(qbs*_FUNC_IDEMESSAGEBOX_STRING_TITLESTR,qbs*_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,qbs*_FUNC_IDEMESSAGEBOX_STRING_BUTTONS){ 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 "data217.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,15339,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,15340,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15341,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15342,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15343,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,15344,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15345,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEMESSAGEBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15346,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,FUNC_STRREPLACE(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,qbs_new_txt_len("\\n",2),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15350,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES= 1 ; if(!qbevent)break;evnt(25753,15351,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]&2){ error(10); }else{ if (_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4]= 1 ; _FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]=( 8 )-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4]+1; _FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[6]=1; _FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]=(ptrszint)malloc(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]*8); if (!_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]) error(257); _FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]|=1; tmp_long=_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]; if (_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(25753,15352,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN= 1 ; if(!qbevent)break;evnt(25753,15353,"ide_methods.bas");}while(r); S_51972:; do{ if(qbevent){evnt(25753,15354,"ide_methods.bas");if(r)goto S_51972;} do{ *_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN=func_instr(*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN+ 1 ,_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,func_chr( 10 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15355,"ide_methods.bas");}while(r); S_51974:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN> 0 ))||new_error){ if(qbevent){evnt(25753,15356,"ide_methods.bas");if(r)goto S_51974;} do{ tmp_long=array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),func_mid(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN,*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN-*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15357,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_TW=((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15358,"ide_methods.bas");}while(r); S_51977:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_TW>*_FUNC_IDEMESSAGEBOX_LONG_W))||new_error){ if(qbevent){evnt(25753,15359,"ide_methods.bas");if(r)goto S_51977;} do{ *_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_TW; if(!qbevent)break;evnt(25753,15359,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN=*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN+ 1 ; if(!qbevent)break;evnt(25753,15360,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES=*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES+ 1 ; if(!qbevent)break;evnt(25753,15361,"ide_methods.bas");}while(r); S_51982:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES>func_ubound(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE,1,1))))||new_error){ if(qbevent){evnt(25753,15362,"ide_methods.bas");if(r)goto S_51982;} do{ goto dl_exit_5762; if(!qbevent)break;evnt(25753,15362,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),func_mid(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15364,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_TW=((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15365,"ide_methods.bas");}while(r); S_51988:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_TW>*_FUNC_IDEMESSAGEBOX_LONG_W))||new_error){ if(qbevent){evnt(25753,15366,"ide_methods.bas");if(r)goto S_51988;} do{ *_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_TW; if(!qbevent)break;evnt(25753,15366,"ide_methods.bas");}while(r); } do{ goto dl_exit_5762; if(!qbevent)break;evnt(25753,15367,"ide_methods.bas");}while(r); } dl_continue_5762:; }while(1); dl_exit_5762:; S_51994:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15371,"ide_methods.bas");if(r)goto S_51994;} do{ qbs_set(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15371,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS= 1 ; if(!qbevent)break;evnt(25753,15372,"ide_methods.bas");}while(r); S_51998:; fornext_value5766= 1 ; fornext_finalvalue5766=_FUNC_IDEMESSAGEBOX_STRING_BUTTONS->len; fornext_step5766= 1 ; if (fornext_step5766<0) fornext_step_negative5766=1; else fornext_step_negative5766=0; if (new_error) goto fornext_error5766; goto fornext_entrylabel5766; while(1){ fornext_value5766=fornext_step5766+(*_FUNC_IDEMESSAGEBOX_LONG_I); fornext_entrylabel5766: *_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value5766; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5766){ if (fornext_value5766fornext_finalvalue5766) break; } fornext_error5766:; if(qbevent){evnt(25753,15373,"ide_methods.bas");if(r)goto S_51998;} S_51999:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,*_FUNC_IDEMESSAGEBOX_LONG_I)== 59 )))||new_error){ if(qbevent){evnt(25753,15374,"ide_methods.bas");if(r)goto S_51999;} do{ *_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS=*_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS+ 1 ; if(!qbevent)break;evnt(25753,15374,"ide_methods.bas");}while(r); } fornext_continue_5765:; } fornext_exit_5765:; do{ *_FUNC_IDEMESSAGEBOX_LONG_BUTTONSLEN=(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS->len)+(*_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS* 6 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15376,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,15378,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_W2=_FUNC_IDEMESSAGEBOX_STRING_TITLESTR->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15379,"ide_methods.bas");}while(r); S_52006:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_W<*_FUNC_IDEMESSAGEBOX_LONG_W2))||new_error){ if(qbevent){evnt(25753,15380,"ide_methods.bas");if(r)goto S_52006;} do{ *_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_W2; if(!qbevent)break;evnt(25753,15380,"ide_methods.bas");}while(r); } S_52009:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_W<*_FUNC_IDEMESSAGEBOX_LONG_BUTTONSLEN))||new_error){ if(qbevent){evnt(25753,15381,"ide_methods.bas");if(r)goto S_52009;} do{ *_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_BUTTONSLEN; if(!qbevent)break;evnt(25753,15381,"ide_methods.bas");}while(r); } S_52012:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_W>(*__LONG_IDEWX- 4 )))||new_error){ if(qbevent){evnt(25753,15382,"ide_methods.bas");if(r)goto S_52012;} do{ *_FUNC_IDEMESSAGEBOX_LONG_W=*__LONG_IDEWX- 4 ; if(!qbevent)break;evnt(25753,15382,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_UDT_P)) + (0) ),_FUNC_IDEMESSAGEBOX_LONG_W,&(pass5770= 3 +*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES),_FUNC_IDEMESSAGEBOX_STRING_TITLESTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15383,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_I=*_FUNC_IDEMESSAGEBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15385,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,15386,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+24))= 3 +*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES; if(!qbevent)break;evnt(25753,15387,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(FUNC_STRREPLACE(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,qbs_new_txt_len(";",1),_FUNC_IDEMESSAGEBOX_STRING1_SEP)); if(!qbevent)break;evnt(25753,15388,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,15389,"ide_methods.bas");}while(r); S_52021:; fornext_value5772= 1 ; fornext_finalvalue5772= 100 ; fornext_step5772= 1 ; if (fornext_step5772<0) fornext_step_negative5772=1; else fornext_step_negative5772=0; if (new_error) goto fornext_error5772; goto fornext_entrylabel5772; while(1){ fornext_value5772=fornext_step5772+(*_FUNC_IDEMESSAGEBOX_LONG_I); fornext_entrylabel5772: *_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value5772; if (fornext_step_negative5772){ if (fornext_value5772fornext_finalvalue5772) break; } fornext_error5772:; if(qbevent){evnt(25753,15393,"ide_methods.bas");if(r)goto S_52021;} do{ memcpy(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,15393,"ide_methods.bas");}while(r); fornext_continue_5771:; } fornext_exit_5771:; S_52024:; do{ if(qbevent){evnt(25753,15396,"ide_methods.bas");if(r)goto S_52024;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,15400,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15401,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,15401,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,15401,"ide_methods.bas");}while(r); S_52029:; fornext_value5775= 1 ; fornext_finalvalue5775= 100 ; fornext_step5775= 1 ; if (fornext_step5775<0) fornext_step_negative5775=1; else fornext_step_negative5775=0; if (new_error) goto fornext_error5775; goto fornext_entrylabel5775; while(1){ fornext_value5775=fornext_step5775+(*_FUNC_IDEMESSAGEBOX_LONG_I); fornext_entrylabel5775: *_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value5775; if (fornext_step_negative5775){ if (fornext_value5775fornext_finalvalue5775) break; } fornext_error5775:; if(qbevent){evnt(25753,15402,"ide_methods.bas");if(r)goto S_52029;} S_52030:; if ((*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,15403,"ide_methods.bas");if(r)goto S_52030;} do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS-*_FUNC_IDEMESSAGEBOX_LONG_F; if(!qbevent)break;evnt(25753,15406,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,15407,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,15407,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEMESSAGEBOX_LONG_F); if(!qbevent)break;evnt(25753,15408,"ide_methods.bas");}while(r); S_52035:; if ((*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,15409,"ide_methods.bas");if(r)goto S_52035;} do{ *_FUNC_IDEMESSAGEBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,15409,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,15409,"ide_methods.bas");}while(r); } } fornext_continue_5774:; } fornext_exit_5774:; do{ *_FUNC_IDEMESSAGEBOX_LONG_LASTFOCUS=*_FUNC_IDEMESSAGEBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,15412,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,15416,"ide_methods.bas");}while(r); S_52043:; fornext_value5777= 1 ; fornext_finalvalue5777=*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES; fornext_step5777= 1 ; if (fornext_step5777<0) fornext_step_negative5777=1; else fornext_step_negative5777=0; if (new_error) goto fornext_error5777; goto fornext_entrylabel5777; while(1){ fornext_value5777=fornext_step5777+(*_FUNC_IDEMESSAGEBOX_LONG_I); fornext_entrylabel5777: *_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value5777; if (fornext_step_negative5777){ if (fornext_value5777fornext_finalvalue5777) break; } fornext_error5777:; if(qbevent){evnt(25753,15417,"ide_methods.bas");if(r)goto S_52043;} S_52044:; if ((qbs_cleanup(qbs_tmp_base,-((((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len)>(*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+(8))- 2 ))))||new_error){ if(qbevent){evnt(25753,15418,"ide_methods.bas");if(r)goto S_52044;} do{ tmp_long=array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_add(qbs_left(((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])])),*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+(8))- 5 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15419,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+(0))+((*_FUNC_IDEMESSAGEBOX_LONG_W/ 2 )-(((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+(4))+ 1 +*_FUNC_IDEMESSAGEBOX_LONG_I,((qbs*)(((uint64*)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])])),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15421,"ide_methods.bas");}while(r); fornext_continue_5776:; } fornext_exit_5776:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,15426,"ide_methods.bas");}while(r); S_52050:; if ((*_FUNC_IDEMESSAGEBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,15427,"ide_methods.bas");if(r)goto S_52050;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15427,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEMESSAGEBOX_LONG_CY,*_FUNC_IDEMESSAGEBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,15427,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15427,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,15430,"ide_methods.bas");}while(r); S_52056:; do{ if(qbevent){evnt(25753,15431,"ide_methods.bas");if(r)goto S_52056;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,15432,"ide_methods.bas");}while(r); S_52058:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,15433,"ide_methods.bas");if(r)goto S_52058;} do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15433,"ide_methods.bas");}while(r); } S_52061:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,15434,"ide_methods.bas");if(r)goto S_52061;} do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15434,"ide_methods.bas");}while(r); } S_52064:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,15435,"ide_methods.bas");if(r)goto S_52064;} do{ *_FUNC_IDEMESSAGEBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,15435,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15435,"ide_methods.bas");}while(r); } S_52068:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,15436,"ide_methods.bas");if(r)goto S_52068;} do{ *_FUNC_IDEMESSAGEBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,15436,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15436,"ide_methods.bas");}while(r); } S_52072:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,15437,"ide_methods.bas");if(r)goto S_52072;} do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15437,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,15438,"ide_methods.bas");}while(r); S_52076:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_ALT!=*_FUNC_IDEMESSAGEBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,15438,"ide_methods.bas");if(r)goto S_52076;} do{ *_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15438,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_OLDALT=*_FUNC_IDEMESSAGEBOX_LONG_ALT; if(!qbevent)break;evnt(25753,15439,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,15440,"ide_methods.bas");}while(r); S_52081:; dl_continue_5780:; }while((!(*_FUNC_IDEMESSAGEBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5780:; if(qbevent){evnt(25753,15441,"ide_methods.bas");if(r)goto S_52081;} S_52082:; if ((*_FUNC_IDEMESSAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15442,"ide_methods.bas");if(r)goto S_52082;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,15442,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,15442,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15444,"ide_methods.bas");}while(r); S_52088:; if ((*_FUNC_IDEMESSAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15445,"ide_methods.bas");if(r)goto S_52088;} S_52089:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,15446,"ide_methods.bas");if(r)goto S_52089;} do{ *_FUNC_IDEMESSAGEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15447,"ide_methods.bas");}while(r); S_52091:; if (((-(*_FUNC_IDEMESSAGEBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEMESSAGEBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,15448,"ide_methods.bas");if(r)goto S_52091;} do{ qbs_set(_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEMESSAGEBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15448,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15451,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,15451,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15451,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,15455,"ide_methods.bas");}while(r); S_52100:; if ((qbs_cleanup(qbs_tmp_base,(qbs_greaterorequal(qbs_ucase(__STRING_K),qbs_new_txt_len("A",1)))&(qbs_lessorequal(qbs_ucase(__STRING_K),qbs_new_txt_len("Z",1)))))||new_error){ if(qbevent){evnt(25753,15457,"ide_methods.bas");if(r)goto S_52100;} do{ qbs_set(_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15457,"ide_methods.bas");}while(r); } S_52103:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15459,"ide_methods.bas");if(r)goto S_52103;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15459,"ide_methods.bas");}while(r); } S_52106:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,15460,"ide_methods.bas");if(r)goto S_52106;} do{ *_FUNC_IDEMESSAGEBOX_LONG_FOCUS=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,15460,"ide_methods.bas");}while(r); } S_52109:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,15461,"ide_methods.bas");if(r)goto S_52109;} do{ *_FUNC_IDEMESSAGEBOX_LONG_FOCUS=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,15461,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15461,"ide_methods.bas");}while(r); } S_52113:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,15462,"ide_methods.bas");if(r)goto S_52113;} do{ *_FUNC_IDEMESSAGEBOX_LONG_FOCUS=*_FUNC_IDEMESSAGEBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,15462,"ide_methods.bas");}while(r); } S_52116:; if ((-(*_FUNC_IDEMESSAGEBOX_LONG_FOCUS>*_FUNC_IDEMESSAGEBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,15463,"ide_methods.bas");if(r)goto S_52116;} do{ *_FUNC_IDEMESSAGEBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15463,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15464,"ide_methods.bas");}while(r); S_52120:; fornext_value5783= 1 ; fornext_finalvalue5783= 100 ; fornext_step5783= 1 ; if (fornext_step5783<0) fornext_step_negative5783=1; else fornext_step_negative5783=0; if (new_error) goto fornext_error5783; goto fornext_entrylabel5783; while(1){ fornext_value5783=fornext_step5783+(*_FUNC_IDEMESSAGEBOX_LONG_I); fornext_entrylabel5783: *_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value5783; if (fornext_step_negative5783){ if (fornext_value5783fornext_finalvalue5783) break; } fornext_error5783:; if(qbevent){evnt(25753,15465,"ide_methods.bas");if(r)goto S_52120;} do{ *_FUNC_IDEMESSAGEBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,15466,"ide_methods.bas");}while(r); S_52122:; if ((*_FUNC_IDEMESSAGEBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,15467,"ide_methods.bas");if(r)goto S_52122;} do{ *_FUNC_IDEMESSAGEBOX_LONG_FOCUSOFFSET=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS-*_FUNC_IDEMESSAGEBOX_LONG_F; if(!qbevent)break;evnt(25753,15468,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEMESSAGEBOX_LONG_FOCUS,_FUNC_IDEMESSAGEBOX_LONG_F,_FUNC_IDEMESSAGEBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEMESSAGEBOX_LONG_MOUSEDOWN,_FUNC_IDEMESSAGEBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEMESSAGEBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15469,"ide_methods.bas");}while(r); } fornext_continue_5782:; } fornext_exit_5782:; S_52127:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(25753,15475,"ide_methods.bas");if(r)goto S_52127;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15475,"ide_methods.bas");}while(r); } S_52130:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|((-(*_FUNC_IDEMESSAGEBOX_LONG_INFO!= 0 )))))||new_error){ if(qbevent){evnt(25753,15477,"ide_methods.bas");if(r)goto S_52130;} do{ *_FUNC_IDEMESSAGEBOX_LONG_IDEMESSAGEBOX=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,15478,"ide_methods.bas");}while(r); do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,15479,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,15480,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEMESSAGEBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,15484,"ide_methods.bas");}while(r); do{ *_FUNC_IDEMESSAGEBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,15485,"ide_methods.bas");}while(r); dl_continue_5773:; }while(1); dl_exit_5773:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free217.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_IDEMESSAGEBOX_LONG_IDEMESSAGEBOX; } 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 "data218.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_IDEYESNOBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(_FUNC_IDEYESNOBOX_STRING_TITLESTR,_FUNC_IDEYESNOBOX_STRING_MESSAGESTR,qbs_new_txt_len("#Yes;#No",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15492,"ide_methods.bas");}while(r); S_52139:; if ((-(*_FUNC_IDEYESNOBOX_LONG_RESULT== 1 ))||new_error){ if(qbevent){evnt(25753,15493,"ide_methods.bas");if(r)goto S_52139;} do{ qbs_set(_FUNC_IDEYESNOBOX_STRING_IDEYESNOBOX,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15493,"ide_methods.bas");}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(25753,15493,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free218.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; } qbs* FUNC_IDEACTIVITYBOX(qbs*_FUNC_IDEACTIVITYBOX_STRING_ACTION,qbs*_FUNC_IDEACTIVITYBOX_STRING_TITLESTR,qbs*_FUNC_IDEACTIVITYBOX_STRING_MESSAGESTR,qbs*_FUNC_IDEACTIVITYBOX_STRING_BUTTONS){ 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 "data219.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_52144:; qbs_set(sc_5790,qbs_lcase(_FUNC_IDEACTIVITYBOX_STRING_ACTION)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(25753,15647,"ide_methods.bas");if(r)goto S_52144;} S_52145:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5790,qbs_new_txt_len("setup",5))))||new_error){ if(qbevent){evnt(25753,15648,"ide_methods.bas");if(r)goto S_52145;} do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,15650,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,15651,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15652,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15653,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15654,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O)[8])->id=(++mem_lock_id); if (_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[2]&1){ if (_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[2]&4){ cmem_dynamic_free((uint8*)(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])); }else{ free((void*)(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])); } } _FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[2]|=1; } if(!qbevent)break;evnt(25753,15655,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15656,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15657,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_MESSAGESTR,FUNC_STRREPLACE(_FUNC_IDEACTIVITYBOX_STRING_MESSAGESTR,qbs_new_txt_len("\\n",2),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15661,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES= 1 ; if(!qbevent)break;evnt(25753,15662,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE)[8])->id=(++mem_lock_id); if (_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[2]&1){ tmp_long=_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]); free((void*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0])); } _FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4]= 1 ; _FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]=( 8 )-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4]+1; _FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[6]=1; _FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]=(ptrszint)malloc(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]*8); if (!_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]) error(257); _FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[2]|=1; tmp_long=_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]; if (_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,15663,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_PREVSCAN= 1 ; if(!qbevent)break;evnt(25753,15664,"ide_methods.bas");}while(r); S_52158:; do{ if(qbevent){evnt(25753,15665,"ide_methods.bas");if(r)goto S_52158;} do{ *_FUNC_IDEACTIVITYBOX_LONG_NEXTSCAN=func_instr(*_FUNC_IDEACTIVITYBOX_LONG_NEXTSCAN+ 1 ,_FUNC_IDEACTIVITYBOX_STRING_MESSAGESTR,func_chr( 10 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15666,"ide_methods.bas");}while(r); S_52160:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_NEXTSCAN> 0 ))||new_error){ if(qbevent){evnt(25753,15667,"ide_methods.bas");if(r)goto S_52160;} do{ tmp_long=array_check((*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),func_mid(_FUNC_IDEACTIVITYBOX_STRING_MESSAGESTR,*_FUNC_IDEACTIVITYBOX_LONG_PREVSCAN,*_FUNC_IDEACTIVITYBOX_LONG_NEXTSCAN-*_FUNC_IDEACTIVITYBOX_LONG_PREVSCAN,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15668,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_TW=((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15669,"ide_methods.bas");}while(r); S_52163:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_TW>*_FUNC_IDEACTIVITYBOX_LONG_W))||new_error){ if(qbevent){evnt(25753,15670,"ide_methods.bas");if(r)goto S_52163;} do{ *_FUNC_IDEACTIVITYBOX_LONG_W=*_FUNC_IDEACTIVITYBOX_LONG_TW; if(!qbevent)break;evnt(25753,15670,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_PREVSCAN=*_FUNC_IDEACTIVITYBOX_LONG_NEXTSCAN+ 1 ; if(!qbevent)break;evnt(25753,15671,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES=*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES+ 1 ; if(!qbevent)break;evnt(25753,15672,"ide_methods.bas");}while(r); S_52168:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES>func_ubound(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE,1,1))))||new_error){ if(qbevent){evnt(25753,15673,"ide_methods.bas");if(r)goto S_52168;} do{ goto dl_exit_5791; if(!qbevent)break;evnt(25753,15673,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),func_mid(_FUNC_IDEACTIVITYBOX_STRING_MESSAGESTR,*_FUNC_IDEACTIVITYBOX_LONG_PREVSCAN,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15675,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_TW=((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15676,"ide_methods.bas");}while(r); S_52174:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_TW>*_FUNC_IDEACTIVITYBOX_LONG_W))||new_error){ if(qbevent){evnt(25753,15677,"ide_methods.bas");if(r)goto S_52174;} do{ *_FUNC_IDEACTIVITYBOX_LONG_W=*_FUNC_IDEACTIVITYBOX_LONG_TW; if(!qbevent)break;evnt(25753,15677,"ide_methods.bas");}while(r); } do{ goto dl_exit_5791; if(!qbevent)break;evnt(25753,15678,"ide_methods.bas");}while(r); } dl_continue_5791:; }while(1); dl_exit_5791:; S_52180:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEACTIVITYBOX_STRING_BUTTONS,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15682,"ide_methods.bas");if(r)goto S_52180;} do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_BUTTONS,qbs_new_txt_len("#OK",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15682,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_TOTALBUTTONS= 1 ; if(!qbevent)break;evnt(25753,15683,"ide_methods.bas");}while(r); S_52184:; fornext_value5795= 1 ; fornext_finalvalue5795=_FUNC_IDEACTIVITYBOX_STRING_BUTTONS->len; fornext_step5795= 1 ; if (fornext_step5795<0) fornext_step_negative5795=1; else fornext_step_negative5795=0; if (new_error) goto fornext_error5795; goto fornext_entrylabel5795; while(1){ fornext_value5795=fornext_step5795+(*_FUNC_IDEACTIVITYBOX_LONG_I); fornext_entrylabel5795: *_FUNC_IDEACTIVITYBOX_LONG_I=fornext_value5795; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5795){ if (fornext_value5795fornext_finalvalue5795) break; } fornext_error5795:; if(qbevent){evnt(25753,15684,"ide_methods.bas");if(r)goto S_52184;} S_52185:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDEACTIVITYBOX_STRING_BUTTONS,*_FUNC_IDEACTIVITYBOX_LONG_I)== 59 )))||new_error){ if(qbevent){evnt(25753,15685,"ide_methods.bas");if(r)goto S_52185;} do{ *_FUNC_IDEACTIVITYBOX_LONG_TOTALBUTTONS=*_FUNC_IDEACTIVITYBOX_LONG_TOTALBUTTONS+ 1 ; if(!qbevent)break;evnt(25753,15685,"ide_methods.bas");}while(r); } fornext_continue_5794:; } fornext_exit_5794:; do{ *_FUNC_IDEACTIVITYBOX_LONG_BUTTONSLEN=(_FUNC_IDEACTIVITYBOX_STRING_BUTTONS->len)+(*_FUNC_IDEACTIVITYBOX_LONG_TOTALBUTTONS* 6 ); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15687,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,15689,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_W2=_FUNC_IDEACTIVITYBOX_STRING_TITLESTR->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15690,"ide_methods.bas");}while(r); S_52192:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_W<*_FUNC_IDEACTIVITYBOX_LONG_W2))||new_error){ if(qbevent){evnt(25753,15691,"ide_methods.bas");if(r)goto S_52192;} do{ *_FUNC_IDEACTIVITYBOX_LONG_W=*_FUNC_IDEACTIVITYBOX_LONG_W2; if(!qbevent)break;evnt(25753,15691,"ide_methods.bas");}while(r); } S_52195:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_W<*_FUNC_IDEACTIVITYBOX_LONG_BUTTONSLEN))||new_error){ if(qbevent){evnt(25753,15692,"ide_methods.bas");if(r)goto S_52195;} do{ *_FUNC_IDEACTIVITYBOX_LONG_W=*_FUNC_IDEACTIVITYBOX_LONG_BUTTONSLEN; if(!qbevent)break;evnt(25753,15692,"ide_methods.bas");}while(r); } S_52198:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_W>(*__LONG_IDEWX- 4 )))||new_error){ if(qbevent){evnt(25753,15693,"ide_methods.bas");if(r)goto S_52198;} do{ *_FUNC_IDEACTIVITYBOX_LONG_W=*__LONG_IDEWX- 4 ; if(!qbevent)break;evnt(25753,15693,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEACTIVITYBOX_UDT_P)) + (0) ),_FUNC_IDEACTIVITYBOX_LONG_W,&(pass5799= 3 +*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES),_FUNC_IDEACTIVITYBOX_STRING_TITLESTR); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15694,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_I=*_FUNC_IDEACTIVITYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15696,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,15697,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+24))= 3 +*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES; if(!qbevent)break;evnt(25753,15698,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(FUNC_STRREPLACE(_FUNC_IDEACTIVITYBOX_STRING_BUTTONS,qbs_new_txt_len(";",1),_FUNC_IDEACTIVITYBOX_STRING1_SEP)); if(!qbevent)break;evnt(25753,15699,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,15700,"ide_methods.bas");}while(r); S_52207:; fornext_value5801= 1 ; fornext_finalvalue5801= 100 ; fornext_step5801= 1 ; if (fornext_step5801<0) fornext_step_negative5801=1; else fornext_step_negative5801=0; if (new_error) goto fornext_error5801; goto fornext_entrylabel5801; while(1){ fornext_value5801=fornext_step5801+(*_FUNC_IDEACTIVITYBOX_LONG_I); fornext_entrylabel5801: *_FUNC_IDEACTIVITYBOX_LONG_I=fornext_value5801; if (fornext_step_negative5801){ if (fornext_value5801fornext_finalvalue5801) break; } fornext_error5801:; if(qbevent){evnt(25753,15704,"ide_methods.bas");if(r)goto S_52207;} do{ memcpy(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEACTIVITYBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,15704,"ide_methods.bas");}while(r); fornext_continue_5800:; } fornext_exit_5800:; sc_ec_349_end:; goto sc_5790_end; } S_52210:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_5790,qbs_new_txt_len("update",6))))||new_error){ if(qbevent){evnt(25753,15706,"ide_methods.bas");if(r)goto S_52210;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEACTIVITYBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,15708,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15709,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,15709,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,15709,"ide_methods.bas");}while(r); S_52215:; fornext_value5803= 1 ; fornext_finalvalue5803= 100 ; fornext_step5803= 1 ; if (fornext_step5803<0) fornext_step_negative5803=1; else fornext_step_negative5803=0; if (new_error) goto fornext_error5803; goto fornext_entrylabel5803; while(1){ fornext_value5803=fornext_step5803+(*_FUNC_IDEACTIVITYBOX_LONG_I); fornext_entrylabel5803: *_FUNC_IDEACTIVITYBOX_LONG_I=fornext_value5803; if (fornext_step_negative5803){ if (fornext_value5803fornext_finalvalue5803) break; } fornext_error5803:; if(qbevent){evnt(25753,15710,"ide_methods.bas");if(r)goto S_52215;} S_52216:; if ((*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,15711,"ide_methods.bas");if(r)goto S_52216;} do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEACTIVITYBOX_LONG_FOCUS-*_FUNC_IDEACTIVITYBOX_LONG_F; if(!qbevent)break;evnt(25753,15714,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,15715,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,15715,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEACTIVITYBOX_LONG_F); if(!qbevent)break;evnt(25753,15716,"ide_methods.bas");}while(r); S_52221:; if ((*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,15717,"ide_methods.bas");if(r)goto S_52221;} do{ *_FUNC_IDEACTIVITYBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,15717,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,15717,"ide_methods.bas");}while(r); } } fornext_continue_5802:; } fornext_exit_5802:; do{ *_FUNC_IDEACTIVITYBOX_LONG_LASTFOCUS=*_FUNC_IDEACTIVITYBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,15720,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,15724,"ide_methods.bas");}while(r); S_52229:; fornext_value5805= 1 ; fornext_finalvalue5805=*_FUNC_IDEACTIVITYBOX_LONG_MESSAGELINES; fornext_step5805= 1 ; if (fornext_step5805<0) fornext_step_negative5805=1; else fornext_step_negative5805=0; if (new_error) goto fornext_error5805; goto fornext_entrylabel5805; while(1){ fornext_value5805=fornext_step5805+(*_FUNC_IDEACTIVITYBOX_LONG_I); fornext_entrylabel5805: *_FUNC_IDEACTIVITYBOX_LONG_I=fornext_value5805; if (fornext_step_negative5805){ if (fornext_value5805fornext_finalvalue5805) break; } fornext_error5805:; if(qbevent){evnt(25753,15725,"ide_methods.bas");if(r)goto S_52229;} S_52230:; if ((qbs_cleanup(qbs_tmp_base,-((((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len)>(*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_UDT_P)+(8))- 2 ))))||new_error){ if(qbevent){evnt(25753,15726,"ide_methods.bas");if(r)goto S_52230;} do{ tmp_long=array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_add(qbs_left(((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5])])),*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_UDT_P)+(8))- 5 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15727,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_UDT_P)+(0))+((*_FUNC_IDEACTIVITYBOX_LONG_W/ 2 )-(((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_UDT_P)+(4))+ 1 +*_FUNC_IDEACTIVITYBOX_LONG_I,((qbs*)(((uint64*)(_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESSAGE[5])])),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15729,"ide_methods.bas");}while(r); fornext_continue_5804:; } fornext_exit_5804:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,15734,"ide_methods.bas");}while(r); S_52236:; if ((*_FUNC_IDEACTIVITYBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,15735,"ide_methods.bas");if(r)goto S_52236;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15735,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEACTIVITYBOX_LONG_CY,*_FUNC_IDEACTIVITYBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,15735,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15735,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,15738,"ide_methods.bas");}while(r); do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,15739,"ide_methods.bas");}while(r); S_52243:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,15740,"ide_methods.bas");if(r)goto S_52243;} do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15740,"ide_methods.bas");}while(r); } S_52246:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,15741,"ide_methods.bas");if(r)goto S_52246;} do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15741,"ide_methods.bas");}while(r); } S_52249:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,15742,"ide_methods.bas");if(r)goto S_52249;} do{ *_FUNC_IDEACTIVITYBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,15742,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15742,"ide_methods.bas");}while(r); } S_52253:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,15743,"ide_methods.bas");if(r)goto S_52253;} do{ *_FUNC_IDEACTIVITYBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,15743,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15743,"ide_methods.bas");}while(r); } S_52257:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,15744,"ide_methods.bas");if(r)goto S_52257;} do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15744,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,15745,"ide_methods.bas");}while(r); S_52261:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_ALT!=*_FUNC_IDEACTIVITYBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,15745,"ide_methods.bas");if(r)goto S_52261;} do{ *_FUNC_IDEACTIVITYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15745,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_OLDALT=*_FUNC_IDEACTIVITYBOX_LONG_ALT; if(!qbevent)break;evnt(25753,15746,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,15747,"ide_methods.bas");}while(r); S_52266:; if ((*_FUNC_IDEACTIVITYBOX_LONG_CHANGE)||new_error){ if(qbevent){evnt(25753,15749,"ide_methods.bas");if(r)goto S_52266;} S_52267:; if ((*_FUNC_IDEACTIVITYBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15750,"ide_methods.bas");if(r)goto S_52267;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,15750,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,15750,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15752,"ide_methods.bas");}while(r); S_52273:; if ((*_FUNC_IDEACTIVITYBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15753,"ide_methods.bas");if(r)goto S_52273;} S_52274:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,15754,"ide_methods.bas");if(r)goto S_52274;} do{ *_FUNC_IDEACTIVITYBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15755,"ide_methods.bas");}while(r); S_52276:; if (((-(*_FUNC_IDEACTIVITYBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEACTIVITYBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,15756,"ide_methods.bas");if(r)goto S_52276;} do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEACTIVITYBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15756,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15759,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,15759,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15759,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,15763,"ide_methods.bas");}while(r); S_52285:; if ((qbs_cleanup(qbs_tmp_base,(qbs_greaterorequal(qbs_ucase(__STRING_K),qbs_new_txt_len("A",1)))&(qbs_lessorequal(qbs_ucase(__STRING_K),qbs_new_txt_len("Z",1)))))||new_error){ if(qbevent){evnt(25753,15765,"ide_methods.bas");if(r)goto S_52285;} do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_ALTLETTER,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15765,"ide_methods.bas");}while(r); } S_52288:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15767,"ide_methods.bas");if(r)goto S_52288;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15767,"ide_methods.bas");}while(r); } S_52291:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,15768,"ide_methods.bas");if(r)goto S_52291;} do{ *_FUNC_IDEACTIVITYBOX_LONG_FOCUS=*_FUNC_IDEACTIVITYBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,15768,"ide_methods.bas");}while(r); } S_52294:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,15769,"ide_methods.bas");if(r)goto S_52294;} do{ *_FUNC_IDEACTIVITYBOX_LONG_FOCUS=*_FUNC_IDEACTIVITYBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,15769,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15769,"ide_methods.bas");}while(r); } S_52298:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,15770,"ide_methods.bas");if(r)goto S_52298;} do{ *_FUNC_IDEACTIVITYBOX_LONG_FOCUS=*_FUNC_IDEACTIVITYBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,15770,"ide_methods.bas");}while(r); } S_52301:; if ((-(*_FUNC_IDEACTIVITYBOX_LONG_FOCUS>*_FUNC_IDEACTIVITYBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,15771,"ide_methods.bas");if(r)goto S_52301;} do{ *_FUNC_IDEACTIVITYBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15771,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15772,"ide_methods.bas");}while(r); S_52305:; fornext_value5810= 1 ; fornext_finalvalue5810= 100 ; fornext_step5810= 1 ; if (fornext_step5810<0) fornext_step_negative5810=1; else fornext_step_negative5810=0; if (new_error) goto fornext_error5810; goto fornext_entrylabel5810; while(1){ fornext_value5810=fornext_step5810+(*_FUNC_IDEACTIVITYBOX_LONG_I); fornext_entrylabel5810: *_FUNC_IDEACTIVITYBOX_LONG_I=fornext_value5810; if (fornext_step_negative5810){ if (fornext_value5810fornext_finalvalue5810) break; } fornext_error5810:; if(qbevent){evnt(25753,15773,"ide_methods.bas");if(r)goto S_52305;} do{ *_FUNC_IDEACTIVITYBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,15774,"ide_methods.bas");}while(r); S_52307:; if ((*_FUNC_IDEACTIVITYBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,15775,"ide_methods.bas");if(r)goto S_52307;} do{ *_FUNC_IDEACTIVITYBOX_LONG_FOCUSOFFSET=*_FUNC_IDEACTIVITYBOX_LONG_FOCUS-*_FUNC_IDEACTIVITYBOX_LONG_F; if(!qbevent)break;evnt(25753,15776,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEACTIVITYBOX_LONG_I)-_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[4],_FUNC_IDEACTIVITYBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEACTIVITYBOX_LONG_FOCUS,_FUNC_IDEACTIVITYBOX_LONG_F,_FUNC_IDEACTIVITYBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEACTIVITYBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEACTIVITYBOX_LONG_MOUSEDOWN,_FUNC_IDEACTIVITYBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEACTIVITYBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15777,"ide_methods.bas");}while(r); } fornext_continue_5809:; } fornext_exit_5809:; S_52312:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(25753,15783,"ide_methods.bas");if(r)goto S_52312;} do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_IDEACTIVITYBOX,i2string( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15783,"ide_methods.bas");}while(r); } S_52315:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|((-(*_FUNC_IDEACTIVITYBOX_LONG_INFO!= 0 )))))||new_error){ if(qbevent){evnt(25753,15785,"ide_methods.bas");if(r)goto S_52315;} do{ qbs_set(_FUNC_IDEACTIVITYBOX_STRING_IDEACTIVITYBOX,qbs_add(i2string( 1 ),l2string(*_FUNC_IDEACTIVITYBOX_LONG_FOCUS))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15786,"ide_methods.bas");}while(r); do{ SUB_CLEARMOUSE(); if(!qbevent)break;evnt(25753,15787,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEACTIVITYBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,15791,"ide_methods.bas");}while(r); do{ *_FUNC_IDEACTIVITYBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,15792,"ide_methods.bas");}while(r); } sc_ec_350_end:; goto sc_5790_end; } sc_5790_end:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free219.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_IDEACTIVITYBOX_STRING_IDEACTIVITYBOX);return _FUNC_IDEACTIVITYBOX_STRING_IDEACTIVITYBOX; } 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 "data220.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,15801,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,15802,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15803,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15804,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15805,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,15806,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,15807,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15808,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,15812,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(8))= 60 ; if(!qbevent)break;evnt(25753,15815,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(12))= 18 ; if(!qbevent)break;evnt(25753,15816,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(0))=(( 80 / 2 ))-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(8))/ 2 ); if(!qbevent)break;evnt(25753,15817,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(4))=(( 25 / 2 ))-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(12))/ 2 ); if(!qbevent)break;evnt(25753,15818,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(16))=FUNC_IDENEWTXT(qbs_new_txt_len("Display",7)); if(!qbevent)break;evnt(25753,15819,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,FUNC_STR2(__LONG_IDEWX)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15821,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15822,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,15823,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15824,"ide_methods.bas");}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]))*89+20))= 3 ; if(!qbevent)break;evnt(25753,15825,"ide_methods.bas");}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]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,15826,"ide_methods.bas");}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]))*89+28))= 10 ; if(!qbevent)break;evnt(25753,15827,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Window #width",13)); if(!qbevent)break;evnt(25753,15828,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(25753,15829,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15830,"ide_methods.bas");}while(r); S_52347:; 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]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,15831,"ide_methods.bas");if(r)goto S_52347;} do{ *(int8*)(((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]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,15832,"ide_methods.bas");}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]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,15833,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,FUNC_STR2(&(pass5812=*__LONG_IDEWY+*__LONG_IDESUBWINDOW))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15836,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15837,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15838,"ide_methods.bas");}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]))*89+20))= 2 ; if(!qbevent)break;evnt(25753,15839,"ide_methods.bas");}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]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,15840,"ide_methods.bas");}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]))*89+28))= 10 ; if(!qbevent)break;evnt(25753,15841,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Window #height",14)); if(!qbevent)break;evnt(25753,15842,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(25753,15843,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15844,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15846,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15847,"ide_methods.bas");}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]))*89+24))= 7 ; if(!qbevent)break;evnt(25753,15848,"ide_methods.bas");}while(r); S_52363:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)> 0 ))|(-(func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,15849,"ide_methods.bas");if(r)goto S_52363;} 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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Remember position + size",25)); if(!qbevent)break;evnt(25753,15850,"ide_methods.bas");}while(r); }else{ 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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Remember size",14)); if(!qbevent)break;evnt(25753,15852,"ide_methods.bas");}while(r); } S_52368:; if ((*__BYTE_IDE_AUTOPOSITION)||new_error){ if(qbevent){evnt(25753,15854,"ide_methods.bas");if(r)goto S_52368;} 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]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,15854,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15856,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSORSTART=*__LONG_IDENORMALCURSORSTART; if(!qbevent)break;evnt(25753,15857,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15858,"ide_methods.bas");}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]))*89+20))= 33 ; if(!qbevent)break;evnt(25753,15859,"ide_methods.bas");}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]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,15860,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Cursor #start",13)); if(!qbevent)break;evnt(25753,15861,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(FUNC_STR2(__LONG_IDENORMALCURSORSTART)); if(!qbevent)break;evnt(25753,15862,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15863,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15865,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSOREND=*__LONG_IDENORMALCURSOREND; if(!qbevent)break;evnt(25753,15866,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15867,"ide_methods.bas");}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]))*89+20))= 35 ; if(!qbevent)break;evnt(25753,15868,"ide_methods.bas");}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]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,15869,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Cursor #end",11)); if(!qbevent)break;evnt(25753,15870,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(FUNC_STR2(__LONG_IDENORMALCURSOREND)); if(!qbevent)break;evnt(25753,15871,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15872,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15874,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15875,"ide_methods.bas");}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]))*89+24))= 9 ; if(!qbevent)break;evnt(25753,15876,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Use _FONT 8",12)); if(!qbevent)break;evnt(25753,15877,"ide_methods.bas");}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]))*89+64))=*__BYTE_IDE_USEFONT8; if(!qbevent)break;evnt(25753,15878,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFONT8SETTING=*(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]))*89+64)); if(!qbevent)break;evnt(25753,15879,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15881,"ide_methods.bas");}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]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,15882,"ide_methods.bas");}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]))*89+24))= 10 ; if(!qbevent)break;evnt(25753,15883,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Use monospace #TTF font:",24)); if(!qbevent)break;evnt(25753,15884,"ide_methods.bas");}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]))*89+64))=*__LONG_IDECUSTOMFONT; if(!qbevent)break;evnt(25753,15885,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVCUSTOMFONTSETTING=*(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]))*89+64)); if(!qbevent)break;evnt(25753,15886,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,__STRING_IDECUSTOMFONTFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15888,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_PREVFONTFILE,_FUNC_IDEDISPLAYBOX_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15889,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15890,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15891,"ide_methods.bas");}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]))*89+20))= 10 ; if(!qbevent)break;evnt(25753,15892,"ide_methods.bas");}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]))*89+24))= 12 ; if(!qbevent)break;evnt(25753,15893,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Font file",10)); if(!qbevent)break;evnt(25753,15894,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(25753,15895,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15896,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A2,FUNC_STR2(__LONG_IDECUSTOMFONTHEIGHT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15898,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_PREVFONTSIZE,_FUNC_IDEDISPLAYBOX_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15899,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15900,"ide_methods.bas");}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]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,15901,"ide_methods.bas");}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]))*89+20))= 10 ; if(!qbevent)break;evnt(25753,15902,"ide_methods.bas");}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]))*89+24))= 15 ; if(!qbevent)break;evnt(25753,15903,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Font size in #pixels",20)); if(!qbevent)break;evnt(25753,15904,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEDISPLAYBOX_STRING_A2); if(!qbevent)break;evnt(25753,15905,"ide_methods.bas");}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]))*89+81))=_FUNC_IDEDISPLAYBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,15906,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_I=*_FUNC_IDEDISPLAYBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,15908,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,15909,"ide_methods.bas");}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]))*89+24))=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(12)); if(!qbevent)break;evnt(25753,15910,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEDISPLAYBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,15911,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,15912,"ide_methods.bas");}while(r); S_52422:; fornext_value5819= 1 ; fornext_finalvalue5819= 100 ; fornext_step5819= 1 ; if (fornext_step5819<0) fornext_step_negative5819=1; else fornext_step_negative5819=0; if (new_error) goto fornext_error5819; goto fornext_entrylabel5819; while(1){ fornext_value5819=fornext_step5819+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5819: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5819; if (fornext_step_negative5819){ if (fornext_value5819fornext_finalvalue5819) break; } fornext_error5819:; if(qbevent){evnt(25753,15916,"ide_methods.bas");if(r)goto S_52422;} 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]))*89)+ 0,((char*)_FUNC_IDEDISPLAYBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,15916,"ide_methods.bas");}while(r); fornext_continue_5818:; } fornext_exit_5818:; S_52425:; do{ if(qbevent){evnt(25753,15919,"ide_methods.bas");if(r)goto S_52425;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEDISPLAYBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,15923,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15924,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,15924,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,15924,"ide_methods.bas");}while(r); S_52430:; fornext_value5822= 1 ; fornext_finalvalue5822= 100 ; fornext_step5822= 1 ; if (fornext_step5822<0) fornext_step_negative5822=1; else fornext_step_negative5822=0; if (new_error) goto fornext_error5822; goto fornext_entrylabel5822; while(1){ fornext_value5822=fornext_step5822+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5822: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5822; if (fornext_step_negative5822){ if (fornext_value5822fornext_finalvalue5822) break; } fornext_error5822:; if(qbevent){evnt(25753,15925,"ide_methods.bas");if(r)goto S_52430;} S_52431:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,15926,"ide_methods.bas");if(r)goto S_52431;} 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]))*89+60))=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS-*_FUNC_IDEDISPLAYBOX_LONG_F; if(!qbevent)break;evnt(25753,15929,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,15930,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,15930,"ide_methods.bas");}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]))*89) ),_FUNC_IDEDISPLAYBOX_LONG_F); if(!qbevent)break;evnt(25753,15931,"ide_methods.bas");}while(r); S_52436:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,15932,"ide_methods.bas");if(r)goto S_52436;} 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]))*89+52)); if(!qbevent)break;evnt(25753,15932,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,15932,"ide_methods.bas");}while(r); } } fornext_continue_5821:; } fornext_exit_5821:; do{ *_FUNC_IDEDISPLAYBOX_LONG_LASTFOCUS=*_FUNC_IDEDISPLAYBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,15935,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL,NULL,*_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSORSTART,*_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSOREND,24); if(!qbevent)break;evnt(25753,15939,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,15943,"ide_methods.bas");}while(r); S_52445:; if ((*_FUNC_IDEDISPLAYBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,15944,"ide_methods.bas");if(r)goto S_52445;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15944,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEDISPLAYBOX_LONG_CY,*_FUNC_IDEDISPLAYBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,15944,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15944,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,15947,"ide_methods.bas");}while(r); S_52451:; do{ if(qbevent){evnt(25753,15948,"ide_methods.bas");if(r)goto S_52451;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,15949,"ide_methods.bas");}while(r); S_52453:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,15950,"ide_methods.bas");if(r)goto S_52453;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15950,"ide_methods.bas");}while(r); } S_52456:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,15951,"ide_methods.bas");if(r)goto S_52456;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15951,"ide_methods.bas");}while(r); } S_52459:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,15952,"ide_methods.bas");if(r)goto S_52459;} do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,15952,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15952,"ide_methods.bas");}while(r); } S_52463:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,15953,"ide_methods.bas");if(r)goto S_52463;} do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,15953,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15953,"ide_methods.bas");}while(r); } S_52467:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,15954,"ide_methods.bas");if(r)goto S_52467;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15954,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,15955,"ide_methods.bas");}while(r); S_52471:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_ALT!=*_FUNC_IDEDISPLAYBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,15955,"ide_methods.bas");if(r)goto S_52471;} do{ *_FUNC_IDEDISPLAYBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,15955,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_OLDALT=*_FUNC_IDEDISPLAYBOX_LONG_ALT; if(!qbevent)break;evnt(25753,15956,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,15957,"ide_methods.bas");}while(r); S_52476:; dl_continue_5823:; }while((!(*_FUNC_IDEDISPLAYBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5823:; if(qbevent){evnt(25753,15958,"ide_methods.bas");if(r)goto S_52476;} S_52477:; if ((*_FUNC_IDEDISPLAYBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15959,"ide_methods.bas");if(r)goto S_52477;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,15959,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,15959,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15961,"ide_methods.bas");}while(r); S_52483:; if ((*_FUNC_IDEDISPLAYBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,15962,"ide_methods.bas");if(r)goto S_52483;} S_52484:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,15963,"ide_methods.bas");if(r)goto S_52484;} do{ *_FUNC_IDEDISPLAYBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15964,"ide_methods.bas");}while(r); S_52486:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,15965,"ide_methods.bas");if(r)goto S_52486;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEDISPLAYBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15965,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15968,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,15968,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,15968,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,15972,"ide_methods.bas");}while(r); S_52495:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,15973,"ide_methods.bas");if(r)goto S_52495;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15973,"ide_methods.bas");}while(r); } S_52498:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,15974,"ide_methods.bas");if(r)goto S_52498;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,15974,"ide_methods.bas");}while(r); } S_52501:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,15975,"ide_methods.bas");if(r)goto S_52501;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,15975,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15975,"ide_methods.bas");}while(r); } S_52505:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,15976,"ide_methods.bas");if(r)goto S_52505;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS=*_FUNC_IDEDISPLAYBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,15976,"ide_methods.bas");}while(r); } S_52508:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS>*_FUNC_IDEDISPLAYBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,15977,"ide_methods.bas");if(r)goto S_52508;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,15977,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,15978,"ide_methods.bas");}while(r); S_52512:; fornext_value5826= 1 ; fornext_finalvalue5826= 100 ; fornext_step5826= 1 ; if (fornext_step5826<0) fornext_step_negative5826=1; else fornext_step_negative5826=0; if (new_error) goto fornext_error5826; goto fornext_entrylabel5826; while(1){ fornext_value5826=fornext_step5826+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5826: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5826; if (fornext_step_negative5826){ if (fornext_value5826fornext_finalvalue5826) break; } fornext_error5826:; if(qbevent){evnt(25753,15979,"ide_methods.bas");if(r)goto S_52512;} 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]))*89+36)); if(!qbevent)break;evnt(25753,15980,"ide_methods.bas");}while(r); S_52514:; if ((*_FUNC_IDEDISPLAYBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,15981,"ide_methods.bas");if(r)goto S_52514;} do{ *_FUNC_IDEDISPLAYBOX_LONG_FOCUSOFFSET=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS-*_FUNC_IDEDISPLAYBOX_LONG_F; if(!qbevent)break;evnt(25753,15982,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,15983,"ide_methods.bas");}while(r); } fornext_continue_5825:; } fornext_exit_5825:; S_52519:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!=*_FUNC_IDEDISPLAYBOX_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,15990,"ide_methods.bas");if(r)goto S_52519;} do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFOCUS=*_FUNC_IDEDISPLAYBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,15992,"ide_methods.bas");}while(r); S_52521:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_FOCUS)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+36))== 1 ))||new_error){ if(qbevent){evnt(25753,15993,"ide_methods.bas");if(r)goto S_52521;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_FOCUS)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_FOCUS)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,15994,"ide_methods.bas");}while(r); S_52523:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_FOCUS)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,15995,"ide_methods.bas");if(r)goto S_52523;} do{ *(int8*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_FOCUS)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,15995,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEDISPLAYBOX_LONG_FOCUS)-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,15996,"ide_methods.bas");}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(( 1 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16001,"ide_methods.bas");}while(r); S_52530:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 3 )))||new_error){ if(qbevent){evnt(25753,16002,"ide_methods.bas");if(r)goto S_52530;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16002,"ide_methods.bas");}while(r); } S_52533:; fornext_value5830= 1 ; fornext_finalvalue5830=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step5830= 1 ; if (fornext_step5830<0) fornext_step_negative5830=1; else fornext_step_negative5830=0; if (new_error) goto fornext_error5830; goto fornext_entrylabel5830; while(1){ fornext_value5830=fornext_step5830+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5830: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5830; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5830){ if (fornext_value5830fornext_finalvalue5830) break; } fornext_error5830:; if(qbevent){evnt(25753,16003,"ide_methods.bas");if(r)goto S_52533;} 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(25753,16004,"ide_methods.bas");}while(r); S_52535:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,16005,"ide_methods.bas");if(r)goto S_52535;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16005,"ide_methods.bas");}while(r); do{ goto fornext_exit_5829; if(!qbevent)break;evnt(25753,16005,"ide_methods.bas");}while(r); } S_52539:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,16006,"ide_methods.bas");if(r)goto S_52539;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16006,"ide_methods.bas");}while(r); do{ goto fornext_exit_5829; if(!qbevent)break;evnt(25753,16006,"ide_methods.bas");}while(r); } fornext_continue_5829:; } fornext_exit_5829:; S_52544:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 1 ))||new_error){ if(qbevent){evnt(25753,16008,"ide_methods.bas");if(r)goto S_52544;} S_52545:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,16009,"ide_methods.bas");if(r)goto S_52545;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16009,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16009,"ide_methods.bas");}while(r); } S_52550:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 80 ))||new_error){ if(qbevent){evnt(25753,16010,"ide_methods.bas");if(r)goto S_52550;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("80",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16010,"ide_methods.bas");}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]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16012,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16015,"ide_methods.bas");}while(r); S_52556:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 3 )))||new_error){ if(qbevent){evnt(25753,16016,"ide_methods.bas");if(r)goto S_52556;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16016,"ide_methods.bas");}while(r); } S_52559:; fornext_value5835= 1 ; fornext_finalvalue5835=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step5835= 1 ; if (fornext_step5835<0) fornext_step_negative5835=1; else fornext_step_negative5835=0; if (new_error) goto fornext_error5835; goto fornext_entrylabel5835; while(1){ fornext_value5835=fornext_step5835+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5835: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5835; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5835){ if (fornext_value5835fornext_finalvalue5835) break; } fornext_error5835:; if(qbevent){evnt(25753,16017,"ide_methods.bas");if(r)goto S_52559;} 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(25753,16018,"ide_methods.bas");}while(r); S_52561:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,16019,"ide_methods.bas");if(r)goto S_52561;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16019,"ide_methods.bas");}while(r); do{ goto fornext_exit_5834; if(!qbevent)break;evnt(25753,16019,"ide_methods.bas");}while(r); } S_52565:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,16020,"ide_methods.bas");if(r)goto S_52565;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16020,"ide_methods.bas");}while(r); do{ goto fornext_exit_5834; if(!qbevent)break;evnt(25753,16020,"ide_methods.bas");}while(r); } fornext_continue_5834:; } fornext_exit_5834:; S_52570:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 2 ))||new_error){ if(qbevent){evnt(25753,16022,"ide_methods.bas");if(r)goto S_52570;} S_52571:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,16023,"ide_methods.bas");if(r)goto S_52571;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16023,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16023,"ide_methods.bas");}while(r); } S_52576:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 25 ))||new_error){ if(qbevent){evnt(25753,16024,"ide_methods.bas");if(r)goto S_52576;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("25",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16024,"ide_methods.bas");}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]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16026,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16029,"ide_methods.bas");}while(r); S_52582:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 2 )))||new_error){ if(qbevent){evnt(25753,16030,"ide_methods.bas");if(r)goto S_52582;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16030,"ide_methods.bas");}while(r); } S_52585:; fornext_value5840= 1 ; fornext_finalvalue5840=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step5840= 1 ; if (fornext_step5840<0) fornext_step_negative5840=1; else fornext_step_negative5840=0; if (new_error) goto fornext_error5840; goto fornext_entrylabel5840; while(1){ fornext_value5840=fornext_step5840+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5840: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5840; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5840){ if (fornext_value5840fornext_finalvalue5840) break; } fornext_error5840:; if(qbevent){evnt(25753,16031,"ide_methods.bas");if(r)goto S_52585;} 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(25753,16032,"ide_methods.bas");}while(r); S_52587:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,16033,"ide_methods.bas");if(r)goto S_52587;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16033,"ide_methods.bas");}while(r); do{ goto fornext_exit_5839; if(!qbevent)break;evnt(25753,16033,"ide_methods.bas");}while(r); } S_52591:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,16034,"ide_methods.bas");if(r)goto S_52591;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16034,"ide_methods.bas");}while(r); do{ goto fornext_exit_5839; if(!qbevent)break;evnt(25753,16034,"ide_methods.bas");}while(r); } fornext_continue_5839:; } fornext_exit_5839:; S_52596:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,16036,"ide_methods.bas");if(r)goto S_52596;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16036,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16036,"ide_methods.bas");}while(r); } S_52601:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 4 ))||new_error){ if(qbevent){evnt(25753,16037,"ide_methods.bas");if(r)goto S_52601;} S_52602:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 0 ))||new_error){ if(qbevent){evnt(25753,16038,"ide_methods.bas");if(r)goto S_52602;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16038,"ide_methods.bas");}while(r); } S_52605:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A> 31 ))||new_error){ if(qbevent){evnt(25753,16039,"ide_methods.bas");if(r)goto S_52605;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("31",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16039,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSORSTART=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16040,"ide_methods.bas");}while(r); }else{ S_52610:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 0 ))||new_error){ if(qbevent){evnt(25753,16042,"ide_methods.bas");if(r)goto S_52610;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16042,"ide_methods.bas");}while(r); } S_52613:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A> 31 ))||new_error){ if(qbevent){evnt(25753,16043,"ide_methods.bas");if(r)goto S_52613;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 31 ; if(!qbevent)break;evnt(25753,16043,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSORSTART=*_FUNC_IDEDISPLAYBOX_LONG_A; if(!qbevent)break;evnt(25753,16044,"ide_methods.bas");}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]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16046,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16049,"ide_methods.bas");}while(r); S_52620:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 2 )))||new_error){ if(qbevent){evnt(25753,16050,"ide_methods.bas");if(r)goto S_52620;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16050,"ide_methods.bas");}while(r); } S_52623:; fornext_value5845= 1 ; fornext_finalvalue5845=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step5845= 1 ; if (fornext_step5845<0) fornext_step_negative5845=1; else fornext_step_negative5845=0; if (new_error) goto fornext_error5845; goto fornext_entrylabel5845; while(1){ fornext_value5845=fornext_step5845+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5845: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5845; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5845){ if (fornext_value5845fornext_finalvalue5845) break; } fornext_error5845:; if(qbevent){evnt(25753,16051,"ide_methods.bas");if(r)goto S_52623;} 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(25753,16052,"ide_methods.bas");}while(r); S_52625:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,16053,"ide_methods.bas");if(r)goto S_52625;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16053,"ide_methods.bas");}while(r); do{ goto fornext_exit_5844; if(!qbevent)break;evnt(25753,16053,"ide_methods.bas");}while(r); } S_52629:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,16054,"ide_methods.bas");if(r)goto S_52629;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16054,"ide_methods.bas");}while(r); do{ goto fornext_exit_5844; if(!qbevent)break;evnt(25753,16054,"ide_methods.bas");}while(r); } fornext_continue_5844:; } fornext_exit_5844:; S_52634:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,16056,"ide_methods.bas");if(r)goto S_52634;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16056,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16056,"ide_methods.bas");}while(r); } S_52639:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 5 ))||new_error){ if(qbevent){evnt(25753,16057,"ide_methods.bas");if(r)goto S_52639;} S_52640:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 0 ))||new_error){ if(qbevent){evnt(25753,16058,"ide_methods.bas");if(r)goto S_52640;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16058,"ide_methods.bas");}while(r); } S_52643:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A> 31 ))||new_error){ if(qbevent){evnt(25753,16059,"ide_methods.bas");if(r)goto S_52643;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("31",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16059,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSOREND=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16060,"ide_methods.bas");}while(r); }else{ S_52648:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 0 ))||new_error){ if(qbevent){evnt(25753,16062,"ide_methods.bas");if(r)goto S_52648;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16062,"ide_methods.bas");}while(r); } S_52651:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A> 31 ))||new_error){ if(qbevent){evnt(25753,16063,"ide_methods.bas");if(r)goto S_52651;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 31 ; if(!qbevent)break;evnt(25753,16063,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSOREND=*_FUNC_IDEDISPLAYBOX_LONG_A; if(!qbevent)break;evnt(25753,16064,"ide_methods.bas");}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]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16066,"ide_methods.bas");}while(r); S_52657:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_PREVFONT8SETTING!=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))))||new_error){ if(qbevent){evnt(25753,16068,"ide_methods.bas");if(r)goto S_52657;} do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFONT8SETTING=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16069,"ide_methods.bas");}while(r); S_52659:; if ((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64)))||new_error){ if(qbevent){evnt(25753,16070,"ide_methods.bas");if(r)goto S_52659;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,16070,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVCUSTOMFONTSETTING= 0 ; if(!qbevent)break;evnt(25753,16070,"ide_methods.bas");}while(r); } } S_52664:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_PREVCUSTOMFONTSETTING!=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))))||new_error){ if(qbevent){evnt(25753,16073,"ide_methods.bas");if(r)goto S_52664;} do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVCUSTOMFONTSETTING=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16074,"ide_methods.bas");}while(r); S_52666:; if ((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64)))||new_error){ if(qbevent){evnt(25753,16075,"ide_methods.bas");if(r)goto S_52666;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,16075,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFONT8SETTING= 0 ; if(!qbevent)break;evnt(25753,16075,"ide_methods.bas");}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(( 8 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16078,"ide_methods.bas");}while(r); S_52672:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 1024 )))||new_error){ if(qbevent){evnt(25753,16079,"ide_methods.bas");if(r)goto S_52672;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 1024 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16079,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16080,"ide_methods.bas");}while(r); S_52676:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEDISPLAYBOX_STRING_A,_FUNC_IDEDISPLAYBOX_STRING_PREVFONTFILE)))||new_error){ if(qbevent){evnt(25753,16081,"ide_methods.bas");if(r)goto S_52676;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_PREVFONTFILE,_FUNC_IDEDISPLAYBOX_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16082,"ide_methods.bas");}while(r); S_52678:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))== 0 ))||new_error){ if(qbevent){evnt(25753,16083,"ide_methods.bas");if(r)goto S_52678;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,16084,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFONT8SETTING= 0 ; if(!qbevent)break;evnt(25753,16084,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,16085,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVCUSTOMFONTSETTING= 1 ; if(!qbevent)break;evnt(25753,16085,"ide_methods.bas");}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(( 9 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16089,"ide_methods.bas");}while(r); S_52686:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_A->len> 2 )))||new_error){ if(qbevent){evnt(25753,16090,"ide_methods.bas");if(r)goto S_52686;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_A, 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16090,"ide_methods.bas");}while(r); } S_52689:; fornext_value5851= 1 ; fornext_finalvalue5851=_FUNC_IDEDISPLAYBOX_STRING_A->len; fornext_step5851= 1 ; if (fornext_step5851<0) fornext_step_negative5851=1; else fornext_step_negative5851=0; if (new_error) goto fornext_error5851; goto fornext_entrylabel5851; while(1){ fornext_value5851=fornext_step5851+(*_FUNC_IDEDISPLAYBOX_LONG_I); fornext_entrylabel5851: *_FUNC_IDEDISPLAYBOX_LONG_I=fornext_value5851; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5851){ if (fornext_value5851fornext_finalvalue5851) break; } fornext_error5851:; if(qbevent){evnt(25753,16091,"ide_methods.bas");if(r)goto S_52689;} 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(25753,16092,"ide_methods.bas");}while(r); S_52691:; if (((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 48 ))|(-(*_FUNC_IDEDISPLAYBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,16093,"ide_methods.bas");if(r)goto S_52691;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16093,"ide_methods.bas");}while(r); do{ goto fornext_exit_5850; if(!qbevent)break;evnt(25753,16093,"ide_methods.bas");}while(r); } S_52695:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEDISPLAYBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDEDISPLAYBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,16094,"ide_methods.bas");if(r)goto S_52695;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16094,"ide_methods.bas");}while(r); do{ goto fornext_exit_5850; if(!qbevent)break;evnt(25753,16094,"ide_methods.bas");}while(r); } fornext_continue_5850:; } fornext_exit_5850:; S_52700:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS!= 9 ))||new_error){ if(qbevent){evnt(25753,16096,"ide_methods.bas");if(r)goto S_52700;} S_52701:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEDISPLAYBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,16097,"ide_methods.bas");if(r)goto S_52701;} do{ *_FUNC_IDEDISPLAYBOX_LONG_A=qbr(func_val(_FUNC_IDEDISPLAYBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16097,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,16097,"ide_methods.bas");}while(r); } S_52706:; if ((-(*_FUNC_IDEDISPLAYBOX_LONG_A< 8 ))||new_error){ if(qbevent){evnt(25753,16098,"ide_methods.bas");if(r)goto S_52706;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_A,qbs_new_txt_len("8",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16098,"ide_methods.bas");}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16100,"ide_methods.bas");}while(r); S_52711:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEDISPLAYBOX_STRING_A,_FUNC_IDEDISPLAYBOX_STRING_PREVFONTSIZE)))||new_error){ if(qbevent){evnt(25753,16101,"ide_methods.bas");if(r)goto S_52711;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_PREVFONTSIZE,_FUNC_IDEDISPLAYBOX_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16102,"ide_methods.bas");}while(r); S_52713:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))== 0 ))||new_error){ if(qbevent){evnt(25753,16103,"ide_methods.bas");if(r)goto S_52713;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,16104,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVFONT8SETTING= 0 ; if(!qbevent)break;evnt(25753,16104,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,16105,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_PREVCUSTOMFONTSETTING= 1 ; if(!qbevent)break;evnt(25753,16105,"ide_methods.bas");}while(r); } } S_52720:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS== 11 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,16110,"ide_methods.bas");if(r)goto S_52720;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,16110,"ide_methods.bas");}while(r); } S_52723:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEDISPLAYBOX_LONG_FOCUS== 10 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,16111,"ide_methods.bas");if(r)goto S_52723;} do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 0 ; if(!qbevent)break;evnt(25753,16113,"ide_methods.bas");}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(( 9 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16116,"ide_methods.bas");}while(r); S_52726:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,16116,"ide_methods.bas");if(r)goto S_52726;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16116,"ide_methods.bas");}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(25753,16117,"ide_methods.bas");}while(r); S_52730:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 8 ))||new_error){ if(qbevent){evnt(25753,16118,"ide_methods.bas");if(r)goto S_52730;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 8 ; if(!qbevent)break;evnt(25753,16118,"ide_methods.bas");}while(r); } S_52733:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 99 ))||new_error){ if(qbevent){evnt(25753,16119,"ide_methods.bas");if(r)goto S_52733;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 99 ; if(!qbevent)break;evnt(25753,16119,"ide_methods.bas");}while(r); } S_52736:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!=*__LONG_IDECUSTOMFONTHEIGHT))||new_error){ if(qbevent){evnt(25753,16120,"ide_methods.bas");if(r)goto S_52736;} do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 1 ; if(!qbevent)break;evnt(25753,16120,"ide_methods.bas");}while(r); } S_52739:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))!=*__BYTE_IDE_USEFONT8))||new_error){ if(qbevent){evnt(25753,16122,"ide_methods.bas");if(r)goto S_52739;} do{ *__BYTE_IDE_USEFONT8=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16123,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_IDEDISPLAYBOX= 1 ; if(!qbevent)break;evnt(25753,16124,"ide_methods.bas");}while(r); } S_52743:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))!=*__LONG_IDECUSTOMFONT))||new_error){ if(qbevent){evnt(25753,16127,"ide_methods.bas");if(r)goto S_52743;} S_52744:; if ((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))== 0 ))||new_error){ if(qbevent){evnt(25753,16128,"ide_methods.bas");if(r)goto S_52744;} S_52745:; if ((*__BYTE_IDE_USEFONT8)||new_error){ if(qbevent){evnt(25753,16129,"ide_methods.bas");if(r)goto S_52745;} do{ sub__font( 8 ,NULL,0); if(!qbevent)break;evnt(25753,16129,"ide_methods.bas");}while(r); }else{ do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(25753,16129,"ide_methods.bas");}while(r); } do{ sub__freefont(*__LONG_IDECUSTOMFONTHANDLE); if(!qbevent)break;evnt(25753,16130,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 1 ; if(!qbevent)break;evnt(25753,16132,"ide_methods.bas");}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(( 8 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16137,"ide_methods.bas");}while(r); S_52756:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEDISPLAYBOX_STRING_V,__STRING_IDECUSTOMFONTFILE)))||new_error){ if(qbevent){evnt(25753,16137,"ide_methods.bas");if(r)goto S_52756;} do{ *_FUNC_IDEDISPLAYBOX_LONG_X= 1 ; if(!qbevent)break;evnt(25753,16137,"ide_methods.bas");}while(r); } S_52759:; if (((-(*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))== 1 ))&(-(*_FUNC_IDEDISPLAYBOX_LONG_X== 1 )))||new_error){ if(qbevent){evnt(25753,16139,"ide_methods.bas");if(r)goto S_52759;} do{ *_FUNC_IDEDISPLAYBOX_LONG_OLDHANDLE=*__LONG_IDECUSTOMFONTHANDLE; if(!qbevent)break;evnt(25753,16140,"ide_methods.bas");}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(25753,16141,"ide_methods.bas");}while(r); S_52762:; if ((-(*__LONG_IDECUSTOMFONTHANDLE== -1 ))||new_error){ if(qbevent){evnt(25753,16142,"ide_methods.bas");if(r)goto S_52762;} do{ *(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64))= 0 ; if(!qbevent)break;evnt(25753,16144,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 8 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16144,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16144,"ide_methods.bas");}while(r); S_52766:; if ((*__BYTE_IDE_USEFONT8)||new_error){ if(qbevent){evnt(25753,16144,"ide_methods.bas");if(r)goto S_52766;} do{ sub__font( 8 ,NULL,0); if(!qbevent)break;evnt(25753,16144,"ide_methods.bas");}while(r); }else{ do{ sub__font( 16 ,NULL,0); if(!qbevent)break;evnt(25753,16144,"ide_methods.bas");}while(r); } }else{ do{ sub__font(*__LONG_IDECUSTOMFONTHANDLE,NULL,0); if(!qbevent)break;evnt(25753,16146,"ide_methods.bas");}while(r); } S_52774:; if ((-(*__LONG_IDECUSTOMFONT== 1 ))||new_error){ if(qbevent){evnt(25753,16148,"ide_methods.bas");if(r)goto S_52774;} do{ sub__freefont(*_FUNC_IDEDISPLAYBOX_LONG_OLDHANDLE); if(!qbevent)break;evnt(25753,16148,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16152,"ide_methods.bas");}while(r); S_52779:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,16152,"ide_methods.bas");if(r)goto S_52779;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16152,"ide_methods.bas");}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(25753,16153,"ide_methods.bas");}while(r); S_52783:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 80 ))||new_error){ if(qbevent){evnt(25753,16154,"ide_methods.bas");if(r)goto S_52783;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 80 ; if(!qbevent)break;evnt(25753,16154,"ide_methods.bas");}while(r); } S_52786:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 999 ))||new_error){ if(qbevent){evnt(25753,16155,"ide_methods.bas");if(r)goto S_52786;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 999 ; if(!qbevent)break;evnt(25753,16155,"ide_methods.bas");}while(r); } S_52789:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!=*__LONG_IDEWX))||new_error){ if(qbevent){evnt(25753,16156,"ide_methods.bas");if(r)goto S_52789;} do{ *_FUNC_IDEDISPLAYBOX_LONG_IDEDISPLAYBOX= 1 ; if(!qbevent)break;evnt(25753,16156,"ide_methods.bas");}while(r); } do{ *__LONG_IDEWX=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16157,"ide_methods.bas");}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]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16160,"ide_methods.bas");}while(r); S_52794:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,16160,"ide_methods.bas");if(r)goto S_52794;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16160,"ide_methods.bas");}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(25753,16161,"ide_methods.bas");}while(r); S_52798:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 25 ))||new_error){ if(qbevent){evnt(25753,16162,"ide_methods.bas");if(r)goto S_52798;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 25 ; if(!qbevent)break;evnt(25753,16162,"ide_methods.bas");}while(r); } S_52801:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 999 ))||new_error){ if(qbevent){evnt(25753,16163,"ide_methods.bas");if(r)goto S_52801;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 999 ; if(!qbevent)break;evnt(25753,16163,"ide_methods.bas");}while(r); } S_52804:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!=*__LONG_IDEWY))||new_error){ if(qbevent){evnt(25753,16164,"ide_methods.bas");if(r)goto S_52804;} do{ *_FUNC_IDEDISPLAYBOX_LONG_IDEDISPLAYBOX= 1 ; if(!qbevent)break;evnt(25753,16164,"ide_methods.bas");}while(r); } do{ *__LONG_IDEWY=*_FUNC_IDEDISPLAYBOX_INTEGER_V-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,16165,"ide_methods.bas");}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]))*89+64)); if(!qbevent)break;evnt(25753,16167,"ide_methods.bas");}while(r); S_52809:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,16168,"ide_methods.bas");if(r)goto S_52809;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,16168,"ide_methods.bas");}while(r); } do{ *__BYTE_IDE_AUTOPOSITION=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16169,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16171,"ide_methods.bas");}while(r); S_52814:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,16172,"ide_methods.bas");if(r)goto S_52814;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 1 ; if(!qbevent)break;evnt(25753,16172,"ide_methods.bas");}while(r); } do{ *__LONG_IDECUSTOMFONT=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16173,"ide_methods.bas");}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(( 8 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16175,"ide_methods.bas");}while(r); S_52819:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEDISPLAYBOX_STRING_V->len> 1024 )))||new_error){ if(qbevent){evnt(25753,16176,"ide_methods.bas");if(r)goto S_52819;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_left(_FUNC_IDEDISPLAYBOX_STRING_V, 1024 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16176,"ide_methods.bas");}while(r); } do{ qbs_set(__STRING_IDECUSTOMFONTFILE,_FUNC_IDEDISPLAYBOX_STRING_V); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16177,"ide_methods.bas");}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(25753,16178,"ide_methods.bas");}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(( 9 )-_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[4],_FUNC_IDEDISPLAYBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16180,"ide_methods.bas");}while(r); S_52825:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,16180,"ide_methods.bas");if(r)goto S_52825;} do{ qbs_set(_FUNC_IDEDISPLAYBOX_STRING_V,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16180,"ide_methods.bas");}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(25753,16181,"ide_methods.bas");}while(r); S_52829:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V< 8 ))||new_error){ if(qbevent){evnt(25753,16182,"ide_methods.bas");if(r)goto S_52829;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 8 ; if(!qbevent)break;evnt(25753,16182,"ide_methods.bas");}while(r); } S_52832:; if ((-(*_FUNC_IDEDISPLAYBOX_INTEGER_V> 99 ))||new_error){ if(qbevent){evnt(25753,16183,"ide_methods.bas");if(r)goto S_52832;} do{ *_FUNC_IDEDISPLAYBOX_INTEGER_V= 99 ; if(!qbevent)break;evnt(25753,16183,"ide_methods.bas");}while(r); } do{ *__LONG_IDECUSTOMFONTHEIGHT=*_FUNC_IDEDISPLAYBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16184,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Width",9),qbs_str((int32)(*__LONG_IDEWX))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16187,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_WINDOWSETTINGSSECTION,qbs_new_txt_len("IDE_Height",10),qbs_str((int32)(*__LONG_IDEWY))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16188,"ide_methods.bas");}while(r); S_52838:; if ((*__LONG_IDECUSTOMFONT)||new_error){ if(qbevent){evnt(25753,16189,"ide_methods.bas");if(r)goto S_52838;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16190,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16192,"ide_methods.bas");}while(r); } S_52843:; if ((*__BYTE_IDE_USEFONT8)||new_error){ if(qbevent){evnt(25753,16194,"ide_methods.bas");if(r)goto S_52843;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_UseFont8",12),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16195,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_UseFont8",12),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16197,"ide_methods.bas");}while(r); } S_52848:; if ((*__BYTE_IDE_AUTOPOSITION)||new_error){ if(qbevent){evnt(25753,16199,"ide_methods.bas");if(r)goto S_52848;} do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoPosition",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16200,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_AutoPosition",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16202,"ide_methods.bas");}while(r); } do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFont$",15),__STRING_IDECUSTOMFONTFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16204,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CustomFontSize",18),qbs_str((int32)(*__LONG_IDECUSTOMFONTHEIGHT))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16205,"ide_methods.bas");}while(r); do{ *__LONG_IDENORMALCURSORSTART=*_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSORSTART; if(!qbevent)break;evnt(25753,16207,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_NormalCursorStart",21),FUNC_STR2(__LONG_IDENORMALCURSORSTART)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16208,"ide_methods.bas");}while(r); do{ *__LONG_IDENORMALCURSOREND=*_FUNC_IDEDISPLAYBOX_LONG_TMPNORMALCURSOREND; if(!qbevent)break;evnt(25753,16210,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_NormalCursorEnd",19),FUNC_STR2(__LONG_IDENORMALCURSOREND)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16211,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,16212,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,16217,"ide_methods.bas");}while(r); do{ *_FUNC_IDEDISPLAYBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,16218,"ide_methods.bas");}while(r); dl_continue_5820:; }while(1); dl_exit_5820:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free220.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_IDECHOOSECOLORSBOX(){ 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 "data221.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,16223,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,16224,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,16225,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,16226,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,16227,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_TOTALITEMS= 10 ; if(!qbevent)break;evnt(25753,16229,"ide_methods.bas");}while(r); do{ if (_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[2]&2){ error(10); }else{ if (_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4]= 1 ; _FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5]=(*_FUNC_IDECHOOSECOLORSBOX_LONG_TOTALITEMS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4]+1; _FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[6]=1; _FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]=(ptrszint)malloc(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5]*8); if (!_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]) error(257); _FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[2]|=1; tmp_long=_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5]; if (_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(25753,16230,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDECOMMENTCOLOR=*__ULONG_IDECOMMENTCOLOR; if(!qbevent)break;evnt(25753,16231,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEMETACOMMANDCOLOR=*__ULONG_IDEMETACOMMANDCOLOR; if(!qbevent)break;evnt(25753,16232,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEQUOTECOLOR=*__ULONG_IDEQUOTECOLOR; if(!qbevent)break;evnt(25753,16233,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDETEXTCOLOR=*__ULONG_IDETEXTCOLOR; if(!qbevent)break;evnt(25753,16234,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEKEYWORDCOLOR=*__ULONG_IDEKEYWORDCOLOR; if(!qbevent)break;evnt(25753,16235,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDENUMBERSCOLOR=*__ULONG_IDENUMBERSCOLOR; if(!qbevent)break;evnt(25753,16236,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEBACKGROUNDCOLOR=*__ULONG_IDEBACKGROUNDCOLOR; if(!qbevent)break;evnt(25753,16237,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEBACKGROUNDCOLOR2=*__ULONG_IDEBACKGROUNDCOLOR2; if(!qbevent)break;evnt(25753,16238,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEBRACKETHIGHLIGHTCOLOR=*__ULONG_IDEBRACKETHIGHLIGHTCOLOR; if(!qbevent)break;evnt(25753,16239,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDECHROMACOLOR=*__ULONG_IDECHROMACOLOR; if(!qbevent)break;evnt(25753,16240,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,16243,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,16244,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,16245,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,16246,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,16247,"ide_methods.bas");}while(r); do{ if (_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4]+1; _FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0]),0,_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,16248,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,16249,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16250,"ide_methods.bas");}while(r); do{ SUB_LOADCOLORSCHEMES(); if(!qbevent)break;evnt(25753,16254,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 , -16734208 , 0 ,1); if(!qbevent)break;evnt(25753,16255,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,16257,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDECHOOSECOLORSBOX_UDT_P)) + (0) ),&(pass5856= 73 ),&(pass5857= 20 ),qbs_new_txt_len("IDE Colors",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16258,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(func_chr( 16 ),qbs_new_txt_len("Normal Text",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16260,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Keywords",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16261,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Numbers",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16262,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Strings",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16263,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Metacommand/custom keywords",28))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16264,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Comments",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16265,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Background",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16266,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Current line background",24))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16267,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Bracket/selection highlight",28))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16268,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len(" Menus and dialogs",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16269,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16270,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,16271,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 4 ; if(!qbevent)break;evnt(25753,16272,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+28))= 30 ; if(!qbevent)break;evnt(25753,16273,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+32))= 10 ; if(!qbevent)break;evnt(25753,16273,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDECHOOSECOLORSBOX_STRING_L); if(!qbevent)break;evnt(25753,16274,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,16275,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM= 1 ; if(!qbevent)break;evnt(25753,16276,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_PREVFOCUS= 1 ; if(!qbevent)break;evnt(25753,16277,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Item:",6)); if(!qbevent)break;evnt(25753,16278,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,FUNC_STR2(&(pass5858=func__red32(*__ULONG_IDETEXTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16280,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16281,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,16282,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+20))= 66 ; if(!qbevent)break;evnt(25753,16283,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,16284,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDECHOOSECOLORSBOX_STRING_A2); if(!qbevent)break;evnt(25753,16285,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECHOOSECOLORSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,16286,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16287,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16288,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,FUNC_STR2(&(pass5860=func__green32(*__ULONG_IDETEXTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16290,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16291,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,16292,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+20))= 66 ; if(!qbevent)break;evnt(25753,16293,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 8 ; if(!qbevent)break;evnt(25753,16294,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDECHOOSECOLORSBOX_STRING_A2); if(!qbevent)break;evnt(25753,16295,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECHOOSECOLORSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,16296,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16297,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16298,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,FUNC_STR2(&(pass5862=func__blue32(*__ULONG_IDETEXTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16300,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16301,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,16302,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+20))= 66 ; if(!qbevent)break;evnt(25753,16303,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 11 ; if(!qbevent)break;evnt(25753,16304,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDECHOOSECOLORSBOX_STRING_A2); if(!qbevent)break;evnt(25753,16305,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECHOOSECOLORSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,16306,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16307,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16308,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16310,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,16311,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 16 ; if(!qbevent)break;evnt(25753,16312,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Highlight brackets",19)); if(!qbevent)break;evnt(25753,16313,"ide_methods.bas");}while(r); S_52944:; if ((*__INTEGER_BRACKETHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,16314,"ide_methods.bas");if(r)goto S_52944;} do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,16314,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16316,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,16317,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 17 ; if(!qbevent)break;evnt(25753,16318,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Multi-highlight (selection)",28)); if(!qbevent)break;evnt(25753,16319,"ide_methods.bas");}while(r); S_52951:; if ((*__INTEGER_MULTIHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,16320,"ide_methods.bas");if(r)goto S_52951;} do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,16320,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16322,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 4 ; if(!qbevent)break;evnt(25753,16323,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 18 ; if(!qbevent)break;evnt(25753,16324,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Highlight #keywords and numbers",31)); if(!qbevent)break;evnt(25753,16325,"ide_methods.bas");}while(r); S_52958:; if ((*__INTEGER_KEYWORDHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,16326,"ide_methods.bas");if(r)goto S_52958;} do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,16326,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16328,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,16329,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 20 ; if(!qbevent)break;evnt(25753,16330,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len("Restore #Defaults",17)),_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,16331,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,16332,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("SchemeID",8),_FUNC_IDECHOOSECOLORSBOX_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16334,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_VALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16335,"ide_methods.bas");}while(r); S_52968:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID>*__INTEGER_TOTALCOLORSCHEMES))||new_error){ if(qbevent){evnt(25753,16336,"ide_methods.bas");if(r)goto S_52968;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 0 ; if(!qbevent)break;evnt(25753,16336,"ide_methods.bas");}while(r); } S_52971:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID== 0 ))||new_error){ if(qbevent){evnt(25753,16338,"ide_methods.bas");if(r)goto S_52971;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,qbs_new_txt_len("User-defined",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16339,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16342,"ide_methods.bas");}while(r); S_52975:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE> 0 ))||new_error){ if(qbevent){evnt(25753,16343,"ide_methods.bas");if(r)goto S_52975;} S_52976:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE+ 1 ,NULL,0))->len)== 90 )))||new_error){ if(qbevent){evnt(25753,16344,"ide_methods.bas");if(r)goto S_52976;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16345,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 0 ; if(!qbevent)break;evnt(25753,16347,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,qbs_new_txt_len("User-defined",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16348,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 0 ; if(!qbevent)break;evnt(25753,16351,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,qbs_new_txt_len("User-defined",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16352,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16355,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,16356,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+20))= 9 ; if(!qbevent)break;evnt(25753,16357,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,16358,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+28))= 38 ; if(!qbevent)break;evnt(25753,16359,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("#Scheme",7)); if(!qbevent)break;evnt(25753,16360,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDECHOOSECOLORSBOX_STRING_A2); if(!qbevent)break;evnt(25753,16361,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDECHOOSECOLORSBOX_STRING_A2->len; if(!qbevent)break;evnt(25753,16362,"ide_methods.bas");}while(r); S_52995:; fornext_value5866= 1 ; fornext_finalvalue5866= 100 ; fornext_step5866= 1 ; if (fornext_step5866<0) fornext_step_negative5866=1; else fornext_step_negative5866=0; if (new_error) goto fornext_error5866; goto fornext_entrylabel5866; while(1){ fornext_value5866=fornext_step5866+(*_FUNC_IDECHOOSECOLORSBOX_LONG_I); fornext_entrylabel5866: *_FUNC_IDECHOOSECOLORSBOX_LONG_I=fornext_value5866; if (fornext_step_negative5866){ if (fornext_value5866fornext_finalvalue5866) break; } fornext_error5866:; if(qbevent){evnt(25753,16367,"ide_methods.bas");if(r)goto S_52995;} do{ memcpy(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,16367,"ide_methods.bas");}while(r); fornext_continue_5865:; } fornext_exit_5865:; S_52998:; do{ if(qbevent){evnt(25753,16370,"ide_methods.bas");if(r)goto S_52998;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECHOOSECOLORSBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,16373,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,16374,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,16374,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,16374,"ide_methods.bas");}while(r); S_53003:; fornext_value5869= 1 ; fornext_finalvalue5869= 100 ; fornext_step5869= 1 ; if (fornext_step5869<0) fornext_step_negative5869=1; else fornext_step_negative5869=0; if (new_error) goto fornext_error5869; goto fornext_entrylabel5869; while(1){ fornext_value5869=fornext_step5869+(*_FUNC_IDECHOOSECOLORSBOX_LONG_I); fornext_entrylabel5869: *_FUNC_IDECHOOSECOLORSBOX_LONG_I=fornext_value5869; if (fornext_step_negative5869){ if (fornext_value5869fornext_finalvalue5869) break; } fornext_error5869:; if(qbevent){evnt(25753,16375,"ide_methods.bas");if(r)goto S_53003;} S_53004:; if ((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,16376,"ide_methods.bas");if(r)goto S_53004;} do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS-*_FUNC_IDECHOOSECOLORSBOX_LONG_F; if(!qbevent)break;evnt(25753,16379,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,16380,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,16380,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDECHOOSECOLORSBOX_LONG_F); if(!qbevent)break;evnt(25753,16381,"ide_methods.bas");}while(r); S_53009:; if ((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,16382,"ide_methods.bas");if(r)goto S_53009;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,16382,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,16382,"ide_methods.bas");}while(r); } } fornext_continue_5868:; } fornext_exit_5868:; do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_LASTFOCUS=*_FUNC_IDECHOOSECOLORSBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,16385,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16390,"ide_methods.bas");}while(r); S_53017:; if (((-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 2 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 4 ))))||new_error){ if(qbevent){evnt(25753,16391,"ide_methods.bas");if(r)goto S_53017;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,16391,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 15 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16391,"ide_methods.bas");}while(r); } S_53022:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID<= 1 ))||new_error){ if(qbevent){evnt(25753,16392,"ide_methods.bas");if(r)goto S_53022;} do{ qbg_sub_color( 7 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16392,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_chr( 17 )),qbs_new_txt_len(" ",1))); if (new_error) goto skip5870; makefit(tqbs); qbs_print(tqbs,0); skip5870: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16393,"ide_methods.bas");}while(r); S_53026:; if (((-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 5 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 7 ))))||new_error){ if(qbevent){evnt(25753,16394,"ide_methods.bas");if(r)goto S_53026;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,16394,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 15 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16394,"ide_methods.bas");}while(r); } S_53031:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID==*__INTEGER_LASTVALIDCOLORSCHEME))||new_error){ if(qbevent){evnt(25753,16395,"ide_methods.bas");if(r)goto S_53031;} do{ qbg_sub_color( 7 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16395,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_chr( 16 )),qbs_new_txt_len(" ",1))); if (new_error) goto skip5871; makefit(tqbs); qbs_print(tqbs,0); skip5871: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16396,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 60 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16399,"ide_methods.bas");}while(r); S_53036:; if (((-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 60 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 65 ))))||new_error){ if(qbevent){evnt(25753,16400,"ide_methods.bas");if(r)goto S_53036;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,16400,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 15 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16400,"ide_methods.bas");}while(r); } S_53041:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID> 0 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID<=*__INTEGER_PRESETCOLORSCHEMES)))||new_error){ if(qbevent){evnt(25753,16401,"ide_methods.bas");if(r)goto S_53041;} do{ qbg_sub_color( 7 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16401,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" Save ",6)); if (new_error) goto skip5872; makefit(tqbs); qbs_print(tqbs,0); skip5872: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16402,"ide_methods.bas");}while(r); S_53045:; if (((-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 66 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 72 ))))||new_error){ if(qbevent){evnt(25753,16403,"ide_methods.bas");if(r)goto S_53045;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,16403,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 15 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16403,"ide_methods.bas");}while(r); } S_53050:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID<=*__INTEGER_PRESETCOLORSCHEMES))||new_error){ if(qbevent){evnt(25753,16404,"ide_methods.bas");if(r)goto S_53050;} do{ qbg_sub_color( 7 , 2 ,NULL,3); if(!qbevent)break;evnt(25753,16404,"ide_methods.bas");}while(r); } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" Erase ",7)); if (new_error) goto skip5873; makefit(tqbs); qbs_print(tqbs,0); skip5873: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16405,"ide_methods.bas");}while(r); do{ qbg_sub_color(NULL, 7 ,NULL,2); if(!qbevent)break;evnt(25753,16407,"ide_methods.bas");}while(r); do{ sub__palettecolor( 1 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16409,"ide_methods.bas");}while(r); do{ sub__palettecolor( 2 ,func__rgb32( 84 , 84 , 84 ), 0 ,1); if(!qbevent)break;evnt(25753,16410,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1); if(!qbevent)break;evnt(25753,16411,"ide_methods.bas");}while(r); do{ sub__palettecolor( 7 ,*__ULONG_IDECHROMACOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16412,"ide_methods.bas");}while(r); do{ sub__palettecolor( 8 ,*__ULONG_IDENUMBERSCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16413,"ide_methods.bas");}while(r); do{ sub__palettecolor( 10 ,*__ULONG_IDEMETACOMMANDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16414,"ide_methods.bas");}while(r); do{ sub__palettecolor( 11 ,*__ULONG_IDECOMMENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16415,"ide_methods.bas");}while(r); do{ sub__palettecolor( 12 ,*__ULONG_IDEKEYWORDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16416,"ide_methods.bas");}while(r); do{ sub__palettecolor( 13 ,*__ULONG_IDETEXTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16417,"ide_methods.bas");}while(r); do{ sub__palettecolor( 14 ,*__ULONG_IDEQUOTECOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16418,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16420,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 5 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 36 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16420,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("R: ",3)); if (new_error) goto skip5874; makefit(tqbs); qbs_print(tqbs,0); skip5874: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16420,"ide_methods.bas");}while(r); do{ qbg_sub_color( 4 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16421,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string( 26 , 196 )); if (new_error) goto skip5875; makefit(tqbs); qbs_print(tqbs,0); skip5875: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16421,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16422,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_T=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16423,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_R=qbr(((*_FUNC_IDECHOOSECOLORSBOX_LONG_T/ ((long double)( 255 )))* 26 )); if(!qbevent)break;evnt(25753,16423,"ide_methods.bas");}while(r); S_53073:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25753,16424,"ide_methods.bas");if(r)goto S_53073;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16424,"ide_methods.bas");}while(r); } S_53076:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_T== 255 ))||new_error){ if(qbevent){evnt(25753,16425,"ide_methods.bas");if(r)goto S_53076;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16425,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 +*_FUNC_IDECHOOSECOLORSBOX_LONG_R,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 5 ,_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16426,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16428,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 8 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 36 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16428,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("G: ",3)); if (new_error) goto skip5876; makefit(tqbs); qbs_print(tqbs,0); skip5876: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16428,"ide_methods.bas");}while(r); do{ qbg_sub_color( 5 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16429,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string( 26 , 196 )); if (new_error) goto skip5877; makefit(tqbs); qbs_print(tqbs,0); skip5877: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16429,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16430,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_T=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16431,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_R=qbr(((*_FUNC_IDECHOOSECOLORSBOX_LONG_T/ ((long double)( 255 )))* 26 )); if(!qbevent)break;evnt(25753,16431,"ide_methods.bas");}while(r); S_53088:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25753,16432,"ide_methods.bas");if(r)goto S_53088;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16432,"ide_methods.bas");}while(r); } S_53091:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_T== 255 ))||new_error){ if(qbevent){evnt(25753,16433,"ide_methods.bas");if(r)goto S_53091;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16433,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 +*_FUNC_IDECHOOSECOLORSBOX_LONG_R,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 8 ,_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16434,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16436,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 11 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 36 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16436,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("B: ",3)); if (new_error) goto skip5878; makefit(tqbs); qbs_print(tqbs,0); skip5878: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16436,"ide_methods.bas");}while(r); do{ qbg_sub_color( 9 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16437,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string( 26 , 196 )); if (new_error) goto skip5879; makefit(tqbs); qbs_print(tqbs,0); skip5879: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16437,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16438,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_T=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16439,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_R=qbr(((*_FUNC_IDECHOOSECOLORSBOX_LONG_T/ ((long double)( 255 )))* 26 )); if(!qbevent)break;evnt(25753,16439,"ide_methods.bas");}while(r); S_53103:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25753,16440,"ide_methods.bas");if(r)goto S_53103;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16440,"ide_methods.bas");}while(r); } S_53106:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_T== 255 ))||new_error){ if(qbevent){evnt(25753,16441,"ide_methods.bas");if(r)goto S_53106;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16441,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 +*_FUNC_IDECHOOSECOLORSBOX_LONG_R,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 11 ,_FUNC_IDECHOOSECOLORSBOX_STRING_SLIDER,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16442,"ide_methods.bas");}while(r); S_53110:; sc_5880_var=0; if(qbevent){evnt(25753,16444,"ide_methods.bas");if(r)goto S_53110;} S_53111:; if ((((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM>=( 1 ))&&(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM<=( 9 ))))||new_error){ if(qbevent){evnt(25753,16445,"ide_methods.bas");if(r)goto S_53111;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16446,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 13 ,qbs_add(func_chr( 218 ),func_string( 25 , 196 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16447,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_add(func_chr( 179 ),func_space( 25 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16448,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 15 ,qbs_add(func_chr( 179 ),func_space( 25 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16449,"ide_methods.bas");}while(r); sc_ec_351_end:; sc_5880_var=-1; } S_53116:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 1 )))||new_error){ if(qbevent){evnt(25753,16450,"ide_methods.bas");if(r)goto S_53116;} do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16450,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("myVar% = ",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16450,"ide_methods.bas");}while(r); sc_ec_352_end:; sc_5880_var=-1; } S_53119:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 2 )))||new_error){ if(qbevent){evnt(25753,16451,"ide_methods.bas");if(r)goto S_53119;} do{ qbg_sub_color( 12 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16451,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("CLS: PRINT",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16451,"ide_methods.bas");}while(r); sc_ec_353_end:; sc_5880_var=-1; } S_53122:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 3 )))||new_error){ if(qbevent){evnt(25753,16452,"ide_methods.bas");if(r)goto S_53122;} do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16452,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("myVar% = ",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16452,"ide_methods.bas");}while(r); sc_ec_354_end:; sc_5880_var=-1; } S_53125:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 4 )))||new_error){ if(qbevent){evnt(25753,16453,"ide_methods.bas");if(r)goto S_53125;} do{ qbg_sub_color( 14 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16453,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_add(qbs_add(qbs_add(func_space( 6 ),func_chr( 34 )),qbs_new_txt_len("Hello, world!",13)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16453,"ide_methods.bas");}while(r); sc_ec_355_end:; sc_5880_var=-1; } S_53128:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 5 )))||new_error){ if(qbevent){evnt(25753,16454,"ide_methods.bas");if(r)goto S_53128;} do{ qbg_sub_color( 10 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16454,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("'$DYNAMIC",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16454,"ide_methods.bas");}while(r); sc_ec_356_end:; sc_5880_var=-1; } S_53131:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 6 )))||new_error){ if(qbevent){evnt(25753,16455,"ide_methods.bas");if(r)goto S_53131;} do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16455,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("'TODO: review this block",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16455,"ide_methods.bas");}while(r); sc_ec_357_end:; sc_5880_var=-1; } S_53134:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 7 )))||new_error){ if(qbevent){evnt(25753,16456,"ide_methods.bas");if(r)goto S_53134;} do{ qbg_sub_color( 1 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16456,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16456,"ide_methods.bas");}while(r); sc_ec_358_end:; sc_5880_var=-1; } S_53137:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 8 )))||new_error){ if(qbevent){evnt(25753,16457,"ide_methods.bas");if(r)goto S_53137;} do{ qbg_sub_color( 6 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,16457,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,func_space( 25 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16457,"ide_methods.bas");}while(r); sc_ec_359_end:; sc_5880_var=-1; } S_53140:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 9 )))||new_error){ if(qbevent){evnt(25753,16458,"ide_methods.bas");if(r)goto S_53140;} do{ qbg_sub_color( 6 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,16459,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16459,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,16460,"ide_methods.bas");}while(r); sc_ec_360_end:; sc_5880_var=-1; } S_53144:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 10 )))||new_error){ if(qbevent){evnt(25753,16461,"ide_methods.bas");if(r)goto S_53144;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,16462,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 13 ,qbs_add(qbs_add(func_chr( 218 ),func_string( 24 , 196 )),func_chr( 191 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16463,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_add(qbs_add(func_chr( 179 ),func_space( 24 )),func_chr( 179 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16464,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 15 ,qbs_add(qbs_add(func_chr( 192 ),func_string( 24 , 196 )),func_chr( 217 )),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16465,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,qbs_new_txt_len(" Open... Ctrl+O ",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16466,"ide_methods.bas");}while(r); sc_ec_361_end:; } sc_5880_end:; do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 40 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,_FUNC_IDECHOOSECOLORSBOX_STRING_SAMPLETEXT,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16469,"ide_methods.bas");}while(r); S_53152:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 1 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 3 )))||new_error){ if(qbevent){evnt(25753,16470,"ide_methods.bas");if(r)goto S_53152;} do{ qbg_sub_color( 8 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16471,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 49 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_new_txt_len("5",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16472,"ide_methods.bas");}while(r); S_53155:; }else{ if (-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 2 )){ if(qbevent){evnt(25753,16473,"ide_methods.bas");if(r)goto S_53155;} do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16474,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 51 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_new_txt_len("myVar%",6),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16475,"ide_methods.bas");}while(r); S_53158:; }else{ if (-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 4 )){ if(qbevent){evnt(25753,16476,"ide_methods.bas");if(r)goto S_53158;} do{ qbg_sub_color( 12 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16477,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 40 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_new_txt_len("PRINT",5),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16478,"ide_methods.bas");}while(r); S_53161:; }else{ if (-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 5 )){ if(qbevent){evnt(25753,16479,"ide_methods.bas");if(r)goto S_53161;} do{ qbg_sub_color( 11 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16480,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 40 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_new_txt_len("'",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16481,"ide_methods.bas");}while(r); S_53164:; }else{ if (-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 9 )){ if(qbevent){evnt(25753,16482,"ide_methods.bas");if(r)goto S_53164;} do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 40 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16483,"ide_methods.bas");}while(r); do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,16484,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("myVar% = ",9)); if (new_error) goto skip5881; makefit(tqbs); qbs_print(tqbs,0); skip5881: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16484,"ide_methods.bas");}while(r); do{ qbg_sub_color( 12 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,16485,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("INT RND",7)); if (new_error) goto skip5882; makefit(tqbs); qbs_print(tqbs,0); skip5882: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16485,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 52 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16486,"ide_methods.bas");}while(r); do{ qbg_sub_color( 13 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,16487,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("(",1)); if (new_error) goto skip5883; makefit(tqbs); qbs_print(tqbs,0); skip5883: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16487,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 56 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,16488,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(")",1)); if (new_error) goto skip5884; makefit(tqbs); qbs_print(tqbs,0); skip5884: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16489,"ide_methods.bas");}while(r); S_53175:; }else{ if (-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM== 10 )){ if(qbevent){evnt(25753,16490,"ide_methods.bas");if(r)goto S_53175;} do{ qbg_sub_color( 15 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,16491,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 41 ,*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 14 ,qbs_new_txt_len("O",1),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16492,"ide_methods.bas");}while(r); } } } } } } do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,16497,"ide_methods.bas");}while(r); S_53180:; if ((*_FUNC_IDECHOOSECOLORSBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,16498,"ide_methods.bas");if(r)goto S_53180;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,16498,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDECHOOSECOLORSBOX_LONG_CY,*_FUNC_IDECHOOSECOLORSBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,16498,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,16498,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,16501,"ide_methods.bas");}while(r); S_53186:; do{ if(qbevent){evnt(25753,16502,"ide_methods.bas");if(r)goto S_53186;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,16503,"ide_methods.bas");}while(r); S_53188:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,16504,"ide_methods.bas");if(r)goto S_53188;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16504,"ide_methods.bas");}while(r); } S_53191:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,16505,"ide_methods.bas");if(r)goto S_53191;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16505,"ide_methods.bas");}while(r); } S_53194:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,16506,"ide_methods.bas");if(r)goto S_53194;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,16506,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16506,"ide_methods.bas");}while(r); } S_53198:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,16507,"ide_methods.bas");if(r)goto S_53198;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,16507,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16507,"ide_methods.bas");}while(r); } S_53202:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,16508,"ide_methods.bas");if(r)goto S_53202;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16508,"ide_methods.bas");}while(r); } S_53205:; if (((-(*__LONG_MX!=*_FUNC_IDECHOOSECOLORSBOX_LONG_PREV__ASCII_CHR_046__MX))|(-(*__LONG_MY!=*_FUNC_IDECHOOSECOLORSBOX_LONG_PREV__ASCII_CHR_046__MY)))||new_error){ if(qbevent){evnt(25753,16509,"ide_methods.bas");if(r)goto S_53205;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16509,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_PREV__ASCII_CHR_046__MX=*__LONG_MX; if(!qbevent)break;evnt(25753,16509,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_PREV__ASCII_CHR_046__MY=*__LONG_MY; if(!qbevent)break;evnt(25753,16509,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,16510,"ide_methods.bas");}while(r); S_53211:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_ALT!=*_FUNC_IDECHOOSECOLORSBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,16510,"ide_methods.bas");if(r)goto S_53211;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,16510,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_OLDALT=*_FUNC_IDECHOOSECOLORSBOX_LONG_ALT; if(!qbevent)break;evnt(25753,16511,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,16512,"ide_methods.bas");}while(r); S_53216:; dl_continue_5885:; }while((!(*_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGE))&&(!new_error)); dl_exit_5885:; if(qbevent){evnt(25753,16513,"ide_methods.bas");if(r)goto S_53216;} S_53217:; if ((*_FUNC_IDECHOOSECOLORSBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,16514,"ide_methods.bas");if(r)goto S_53217;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,16514,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,16514,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16516,"ide_methods.bas");}while(r); S_53223:; if ((*_FUNC_IDECHOOSECOLORSBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,16517,"ide_methods.bas");if(r)goto S_53223;} S_53224:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,16518,"ide_methods.bas");if(r)goto S_53224;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16519,"ide_methods.bas");}while(r); S_53226:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_K>= 65 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,16520,"ide_methods.bas");if(r)goto S_53226;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDECHOOSECOLORSBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16520,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,16523,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,16523,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,16523,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,16527,"ide_methods.bas");}while(r); S_53235:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,16528,"ide_methods.bas");if(r)goto S_53235;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16528,"ide_methods.bas");}while(r); } S_53238:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,16529,"ide_methods.bas");if(r)goto S_53238;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,16529,"ide_methods.bas");}while(r); } S_53241:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,16530,"ide_methods.bas");if(r)goto S_53241;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,16530,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16530,"ide_methods.bas");}while(r); } S_53245:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,16531,"ide_methods.bas");if(r)goto S_53245;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS=*_FUNC_IDECHOOSECOLORSBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,16531,"ide_methods.bas");}while(r); } S_53248:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS>*_FUNC_IDECHOOSECOLORSBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,16532,"ide_methods.bas");if(r)goto S_53248;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,16532,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,16533,"ide_methods.bas");}while(r); S_53252:; fornext_value5888= 1 ; fornext_finalvalue5888= 100 ; fornext_step5888= 1 ; if (fornext_step5888<0) fornext_step_negative5888=1; else fornext_step_negative5888=0; if (new_error) goto fornext_error5888; goto fornext_entrylabel5888; while(1){ fornext_value5888=fornext_step5888+(*_FUNC_IDECHOOSECOLORSBOX_LONG_I); fornext_entrylabel5888: *_FUNC_IDECHOOSECOLORSBOX_LONG_I=fornext_value5888; if (fornext_step_negative5888){ if (fornext_value5888fornext_finalvalue5888) break; } fornext_error5888:; if(qbevent){evnt(25753,16534,"ide_methods.bas");if(r)goto S_53252;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_T=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,16535,"ide_methods.bas");}while(r); S_53254:; if ((*_FUNC_IDECHOOSECOLORSBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,16536,"ide_methods.bas");if(r)goto S_53254;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUSOFFSET=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS-*_FUNC_IDECHOOSECOLORSBOX_LONG_F; if(!qbevent)break;evnt(25753,16537,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS,_FUNC_IDECHOOSECOLORSBOX_LONG_F,_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDECHOOSECOLORSBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDECHOOSECOLORSBOX_LONG_MOUSEDOWN,_FUNC_IDECHOOSECOLORSBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDECHOOSECOLORSBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16538,"ide_methods.bas");}while(r); } fornext_continue_5887:; } fornext_exit_5887:; S_53259:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS!=*_FUNC_IDECHOOSECOLORSBOX_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,16544,"ide_methods.bas");if(r)goto S_53259;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_PREVFOCUS=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,16546,"ide_methods.bas");}while(r); S_53261:; if (((((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS>= 2 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS<= 4 ))))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 11 )))||new_error){ if(qbevent){evnt(25753,16547,"ide_methods.bas");if(r)goto S_53261;} S_53262:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 11 ))||new_error){ if(qbevent){evnt(25753,16548,"ide_methods.bas");if(r)goto S_53262;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS= 9 ; if(!qbevent)break;evnt(25753,16548,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS; if(!qbevent)break;evnt(25753,16548,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16549,"ide_methods.bas");}while(r); S_53268:; if ((-(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,16550,"ide_methods.bas");if(r)goto S_53268;} do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16550,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16551,"ide_methods.bas");}while(r); S_53272:; if ((((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS>= 2 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS<= 4 ))))||new_error){ if(qbevent){evnt(25753,16552,"ide_methods.bas");if(r)goto S_53272;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_PREVTB__ASCII_CHR_046__VALUE,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_TFOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16552,"ide_methods.bas");}while(r); } } S_53276:; }else{ if (-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS==*_FUNC_IDECHOOSECOLORSBOX_LONG_PREVFOCUS)){ if(qbevent){evnt(25753,16554,"ide_methods.bas");if(r)goto S_53276;} S_53277:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS>= 2 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS<= 4 )))||new_error){ if(qbevent){evnt(25753,16556,"ide_methods.bas");if(r)goto S_53277;} S_53278:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDECHOOSECOLORSBOX_STRING_PREVTB__ASCII_CHR_046__VALUE,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))))||new_error){ if(qbevent){evnt(25753,16557,"ide_methods.bas");if(r)goto S_53278;} do{ return_point[next_return_point++]=172; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWUSERSCHEME; RETURN_172:; if(!qbevent)break;evnt(25753,16558,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_PREVTB__ASCII_CHR_046__VALUE,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16559,"ide_methods.bas");}while(r); } } } } S_53284:; if ((((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID== 0 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID>*__INTEGER_PRESETCOLORSCHEMES)))&*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,16565,"ide_methods.bas");if(r)goto S_53284;} S_53285:; if (((-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 60 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 65 ))))||new_error){ if(qbevent){evnt(25753,16566,"ide_methods.bas");if(r)goto S_53285;} S_53286:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID== 0 ))||new_error){ if(qbevent){evnt(25753,16568,"ide_methods.bas");if(r)goto S_53286;} LABEL_SAVENEW:; if(qbevent){evnt(25753,16569,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16570,"ide_methods.bas");}while(r); S_53288:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING->len== 0 )))||new_error){ if(qbevent){evnt(25753,16571,"ide_methods.bas");if(r)goto S_53288;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_new_txt_len("User-defined",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16571,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,16573,"ide_methods.bas");}while(r); S_53292:; do{ if(qbevent){evnt(25753,16574,"ide_methods.bas");if(r)goto S_53292;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16575,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_I)),qbs_new_txt_len("$",1)),_FUNC_IDECHOOSECOLORSBOX_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16576,"ide_methods.bas");}while(r); S_53295:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_IDECHOOSECOLORSBOX_STRING_VALUE,qbs_new_txt_len("",0)))|(qbs_equal(_FUNC_IDECHOOSECOLORSBOX_STRING_VALUE,qbs_new_txt_len("0",1)))))||new_error){ if(qbevent){evnt(25753,16577,"ide_methods.bas");if(r)goto S_53295;} do{ goto dl_exit_5891; if(!qbevent)break;evnt(25753,16577,"ide_methods.bas");}while(r); } dl_continue_5891:; }while(1); dl_exit_5891:; do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_new_txt_len("|",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16581,"ide_methods.bas");}while(r); S_53300:; fornext_value5893= 1 ; fornext_finalvalue5893= 10 ; fornext_step5893= 1 ; if (fornext_step5893<0) fornext_step_negative5893=1; else fornext_step_negative5893=0; if (new_error) goto fornext_error5893; goto fornext_entrylabel5893; while(1){ fornext_value5893=fornext_step5893+(*_FUNC_IDECHOOSECOLORSBOX_LONG_J); fornext_entrylabel5893: *_FUNC_IDECHOOSECOLORSBOX_LONG_J=fornext_value5893; if (fornext_step_negative5893){ if (fornext_value5893fornext_finalvalue5893) break; } fornext_error5893:; if(qbevent){evnt(25753,16582,"ide_methods.bas");if(r)goto S_53300;} S_53301:; if(qbevent){evnt(25753,16583,"ide_methods.bas");if(r)goto S_53301;} S_53302:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 1 )))||new_error){ if(qbevent){evnt(25753,16584,"ide_methods.bas");if(r)goto S_53302;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDETEXTCOLOR; if(!qbevent)break;evnt(25753,16584,"ide_methods.bas");}while(r); sc_ec_362_end:; goto sc_5894_end; } S_53304:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 2 )))||new_error){ if(qbevent){evnt(25753,16585,"ide_methods.bas");if(r)goto S_53304;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEKEYWORDCOLOR; if(!qbevent)break;evnt(25753,16585,"ide_methods.bas");}while(r); sc_ec_363_end:; goto sc_5894_end; } S_53306:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 3 )))||new_error){ if(qbevent){evnt(25753,16586,"ide_methods.bas");if(r)goto S_53306;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDENUMBERSCOLOR; if(!qbevent)break;evnt(25753,16586,"ide_methods.bas");}while(r); sc_ec_364_end:; goto sc_5894_end; } S_53308:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 4 )))||new_error){ if(qbevent){evnt(25753,16587,"ide_methods.bas");if(r)goto S_53308;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEQUOTECOLOR; if(!qbevent)break;evnt(25753,16587,"ide_methods.bas");}while(r); sc_ec_365_end:; goto sc_5894_end; } S_53310:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 5 )))||new_error){ if(qbevent){evnt(25753,16588,"ide_methods.bas");if(r)goto S_53310;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEMETACOMMANDCOLOR; if(!qbevent)break;evnt(25753,16588,"ide_methods.bas");}while(r); sc_ec_366_end:; goto sc_5894_end; } S_53312:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 6 )))||new_error){ if(qbevent){evnt(25753,16589,"ide_methods.bas");if(r)goto S_53312;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECOMMENTCOLOR; if(!qbevent)break;evnt(25753,16589,"ide_methods.bas");}while(r); sc_ec_367_end:; goto sc_5894_end; } S_53314:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 7 )))||new_error){ if(qbevent){evnt(25753,16590,"ide_methods.bas");if(r)goto S_53314;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR; if(!qbevent)break;evnt(25753,16590,"ide_methods.bas");}while(r); sc_ec_368_end:; goto sc_5894_end; } S_53316:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 8 )))||new_error){ if(qbevent){evnt(25753,16591,"ide_methods.bas");if(r)goto S_53316;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR2; if(!qbevent)break;evnt(25753,16591,"ide_methods.bas");}while(r); sc_ec_369_end:; goto sc_5894_end; } S_53318:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 9 )))||new_error){ if(qbevent){evnt(25753,16592,"ide_methods.bas");if(r)goto S_53318;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBRACKETHIGHLIGHTCOLOR; if(!qbevent)break;evnt(25753,16592,"ide_methods.bas");}while(r); sc_ec_370_end:; goto sc_5894_end; } S_53320:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 10 )))||new_error){ if(qbevent){evnt(25753,16593,"ide_methods.bas");if(r)goto S_53320;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECHROMACOLOR; if(!qbevent)break;evnt(25753,16593,"ide_methods.bas");}while(r); sc_ec_371_end:; goto sc_5894_end; } sc_5894_end:; do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,FUNC_STR2(&(pass5895=func__red32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16596,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,qbs_add(func_string( 3 -_FUNC_IDECHOOSECOLORSBOX_STRING_R->len,(qbs_new_txt_len("0",1)->chr[0])),_FUNC_IDECHOOSECOLORSBOX_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16596,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,FUNC_STR2(&(pass5897=func__green32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16597,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,qbs_add(func_string( 3 -_FUNC_IDECHOOSECOLORSBOX_STRING_G->len,(qbs_new_txt_len("0",1)->chr[0])),_FUNC_IDECHOOSECOLORSBOX_STRING_G)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16597,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,FUNC_STR2(&(pass5899=func__blue32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16598,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,qbs_add(func_string( 3 -_FUNC_IDECHOOSECOLORSBOX_STRING_B->len,(qbs_new_txt_len("0",1)->chr[0])),_FUNC_IDECHOOSECOLORSBOX_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16598,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,_FUNC_IDECHOOSECOLORSBOX_STRING_R),_FUNC_IDECHOOSECOLORSBOX_STRING_G),_FUNC_IDECHOOSECOLORSBOX_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16599,"ide_methods.bas");}while(r); fornext_continue_5892:; } fornext_exit_5892:; do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_I)),qbs_new_txt_len("$",1)),_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16603,"ide_methods.bas");}while(r); do{ SUB_LOADCOLORSCHEMES(); if(!qbevent)break;evnt(25753,16604,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*__INTEGER_PRESETCOLORSCHEMES+*_FUNC_IDECHOOSECOLORSBOX_LONG_I; if(!qbevent)break;evnt(25753,16605,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16606,"ide_methods.bas");}while(r); do{ goto LABEL_APPLYSCHEME; if(!qbevent)break;evnt(25753,16607,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16609,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16610,"ide_methods.bas");}while(r); S_53339:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))))))||new_error){ if(qbevent){evnt(25753,16612,"ide_methods.bas");if(r)goto S_53339;} do{ goto LABEL_SAVENEW; if(!qbevent)break;evnt(25753,16614,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID-*__INTEGER_PRESETCOLORSCHEMES; if(!qbevent)break;evnt(25753,16617,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_new_txt_len("|",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16618,"ide_methods.bas");}while(r); S_53344:; fornext_value5902= 1 ; fornext_finalvalue5902= 10 ; fornext_step5902= 1 ; if (fornext_step5902<0) fornext_step_negative5902=1; else fornext_step_negative5902=0; if (new_error) goto fornext_error5902; goto fornext_entrylabel5902; while(1){ fornext_value5902=fornext_step5902+(*_FUNC_IDECHOOSECOLORSBOX_LONG_J); fornext_entrylabel5902: *_FUNC_IDECHOOSECOLORSBOX_LONG_J=fornext_value5902; if (fornext_step_negative5902){ if (fornext_value5902fornext_finalvalue5902) break; } fornext_error5902:; if(qbevent){evnt(25753,16621,"ide_methods.bas");if(r)goto S_53344;} S_53345:; if(qbevent){evnt(25753,16622,"ide_methods.bas");if(r)goto S_53345;} S_53346:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 1 )))||new_error){ if(qbevent){evnt(25753,16623,"ide_methods.bas");if(r)goto S_53346;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDETEXTCOLOR; if(!qbevent)break;evnt(25753,16623,"ide_methods.bas");}while(r); sc_ec_372_end:; goto sc_5903_end; } S_53348:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 2 )))||new_error){ if(qbevent){evnt(25753,16624,"ide_methods.bas");if(r)goto S_53348;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEKEYWORDCOLOR; if(!qbevent)break;evnt(25753,16624,"ide_methods.bas");}while(r); sc_ec_373_end:; goto sc_5903_end; } S_53350:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 3 )))||new_error){ if(qbevent){evnt(25753,16625,"ide_methods.bas");if(r)goto S_53350;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDENUMBERSCOLOR; if(!qbevent)break;evnt(25753,16625,"ide_methods.bas");}while(r); sc_ec_374_end:; goto sc_5903_end; } S_53352:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 4 )))||new_error){ if(qbevent){evnt(25753,16626,"ide_methods.bas");if(r)goto S_53352;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEQUOTECOLOR; if(!qbevent)break;evnt(25753,16626,"ide_methods.bas");}while(r); sc_ec_375_end:; goto sc_5903_end; } S_53354:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 5 )))||new_error){ if(qbevent){evnt(25753,16627,"ide_methods.bas");if(r)goto S_53354;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEMETACOMMANDCOLOR; if(!qbevent)break;evnt(25753,16627,"ide_methods.bas");}while(r); sc_ec_376_end:; goto sc_5903_end; } S_53356:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 6 )))||new_error){ if(qbevent){evnt(25753,16628,"ide_methods.bas");if(r)goto S_53356;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECOMMENTCOLOR; if(!qbevent)break;evnt(25753,16628,"ide_methods.bas");}while(r); sc_ec_377_end:; goto sc_5903_end; } S_53358:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 7 )))||new_error){ if(qbevent){evnt(25753,16629,"ide_methods.bas");if(r)goto S_53358;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR; if(!qbevent)break;evnt(25753,16629,"ide_methods.bas");}while(r); sc_ec_378_end:; goto sc_5903_end; } S_53360:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 8 )))||new_error){ if(qbevent){evnt(25753,16630,"ide_methods.bas");if(r)goto S_53360;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR2; if(!qbevent)break;evnt(25753,16630,"ide_methods.bas");}while(r); sc_ec_379_end:; goto sc_5903_end; } S_53362:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 9 )))||new_error){ if(qbevent){evnt(25753,16631,"ide_methods.bas");if(r)goto S_53362;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBRACKETHIGHLIGHTCOLOR; if(!qbevent)break;evnt(25753,16631,"ide_methods.bas");}while(r); sc_ec_380_end:; goto sc_5903_end; } S_53364:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_J==( 10 )))||new_error){ if(qbevent){evnt(25753,16632,"ide_methods.bas");if(r)goto S_53364;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECHROMACOLOR; if(!qbevent)break;evnt(25753,16632,"ide_methods.bas");}while(r); sc_ec_381_end:; goto sc_5903_end; } sc_5903_end:; do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,FUNC_STR2(&(pass5904=func__red32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16635,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,qbs_add(func_string( 3 -_FUNC_IDECHOOSECOLORSBOX_STRING_R->len,(qbs_new_txt_len("0",1)->chr[0])),_FUNC_IDECHOOSECOLORSBOX_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16635,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,FUNC_STR2(&(pass5906=func__green32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16636,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,qbs_add(func_string( 3 -_FUNC_IDECHOOSECOLORSBOX_STRING_G->len,(qbs_new_txt_len("0",1)->chr[0])),_FUNC_IDECHOOSECOLORSBOX_STRING_G)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16636,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,FUNC_STR2(&(pass5908=func__blue32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16637,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,qbs_add(func_string( 3 -_FUNC_IDECHOOSECOLORSBOX_STRING_B->len,(qbs_new_txt_len("0",1)->chr[0])),_FUNC_IDECHOOSECOLORSBOX_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16637,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING,_FUNC_IDECHOOSECOLORSBOX_STRING_R),_FUNC_IDECHOOSECOLORSBOX_STRING_G),_FUNC_IDECHOOSECOLORSBOX_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16638,"ide_methods.bas");}while(r); fornext_continue_5901:; } fornext_exit_5901:; do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_I)),qbs_new_txt_len("$",1)),_FUNC_IDECHOOSECOLORSBOX_STRING_SCHEMESTRING); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16642,"ide_methods.bas");}while(r); do{ SUB_LOADCOLORSCHEMES(); if(!qbevent)break;evnt(25753,16643,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*__INTEGER_PRESETCOLORSCHEMES+*_FUNC_IDECHOOSECOLORSBOX_LONG_I; if(!qbevent)break;evnt(25753,16644,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16645,"ide_methods.bas");}while(r); do{ goto LABEL_APPLYSCHEME; if(!qbevent)break;evnt(25753,16646,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16648,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16649,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16650,"ide_methods.bas");}while(r); S_53384:; }else{ if ((-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 66 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 72 )))){ if(qbevent){evnt(25753,16651,"ide_methods.bas");if(r)goto S_53384;} S_53385:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID>*__INTEGER_PRESETCOLORSCHEMES))||new_error){ if(qbevent){evnt(25753,16653,"ide_methods.bas");if(r)goto S_53385;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_WHAT,FUNC_IDEYESNOBOX(qbs_new_txt_len("Erase color scheme",18),qbs_new_txt_len("This cannot be undone. Erase scheme?",36))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16654,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16655,"ide_methods.bas");}while(r); S_53388:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDECHOOSECOLORSBOX_STRING_WHAT,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,16656,"ide_methods.bas");if(r)goto S_53388;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID-*__INTEGER_PRESETCOLORSCHEMES; if(!qbevent)break;evnt(25753,16657,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_I)),qbs_new_txt_len("$",1)),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16658,"ide_methods.bas");}while(r); do{ SUB_LOADCOLORSCHEMES(); if(!qbevent)break;evnt(25753,16659,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID- 1 ; if(!qbevent)break;evnt(25753,16660,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16661,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= -1 ; if(!qbevent)break;evnt(25753,16662,"ide_methods.bas");}while(r); do{ goto LABEL_VALIDATESCHEME; if(!qbevent)break;evnt(25753,16663,"ide_methods.bas");}while(r); } } } } } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= 0 ; if(!qbevent)break;evnt(25753,16670,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= 0 ; if(!qbevent)break;evnt(25753,16671,"ide_methods.bas");}while(r); S_53402:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_MCLICK&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 2 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 4 ))))|((qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 75 )))))&((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 1 ))))))||new_error){ if(qbevent){evnt(25753,16673,"ide_methods.bas");if(r)goto S_53402;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= -1 ; if(!qbevent)break;evnt(25753,16674,"ide_methods.bas");}while(r); S_53404:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID== 0 ))||new_error){ if(qbevent){evnt(25753,16675,"ide_methods.bas");if(r)goto S_53404;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16676,"ide_methods.bas");}while(r); do{ goto LABEL_LOADDEFAULTSCHEME; if(!qbevent)break;evnt(25753,16677,"ide_methods.bas");}while(r); }else{ S_53408:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID> 1 ))||new_error){ if(qbevent){evnt(25753,16679,"ide_methods.bas");if(r)goto S_53408;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID- 1 ; if(!qbevent)break;evnt(25753,16679,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16679,"ide_methods.bas");}while(r); } } S_53413:; }else{ if (qbs_cleanup(qbs_tmp_base,(*__LONG_MCLICK&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 5 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 7 ))))|((qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 77 )))))&((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 1 )))))){ if(qbevent){evnt(25753,16682,"ide_methods.bas");if(r)goto S_53413;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= 1 ; if(!qbevent)break;evnt(25753,16683,"ide_methods.bas");}while(r); S_53415:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID== 0 ))||new_error){ if(qbevent){evnt(25753,16684,"ide_methods.bas");if(r)goto S_53415;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16685,"ide_methods.bas");}while(r); do{ goto LABEL_LOADDEFAULTSCHEME; if(!qbevent)break;evnt(25753,16686,"ide_methods.bas");}while(r); }else{ S_53419:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID<*__INTEGER_TOTALCOLORSCHEMES))||new_error){ if(qbevent){evnt(25753,16688,"ide_methods.bas");if(r)goto S_53419;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID+ 1 ; if(!qbevent)break;evnt(25753,16688,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME= -1 ; if(!qbevent)break;evnt(25753,16688,"ide_methods.bas");}while(r); } } } } S_53425:; if ((*_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME)||new_error){ if(qbevent){evnt(25753,16692,"ide_methods.bas");if(r)goto S_53425;} S_53426:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW== 0 ))||new_error){ if(qbevent){evnt(25753,16694,"ide_methods.bas");if(r)goto S_53426;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= 1 ; if(!qbevent)break;evnt(25753,16694,"ide_methods.bas");}while(r); } LABEL_VALIDATESCHEME:; if(qbevent){evnt(25753,16695,"ide_methods.bas");r=0;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16696,"ide_methods.bas");}while(r); S_53430:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE> 0 ))||new_error){ if(qbevent){evnt(25753,16697,"ide_methods.bas");if(r)goto S_53430;} S_53431:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE+ 1 ,NULL,0))->len)== 90 )))||new_error){ if(qbevent){evnt(25753,16698,"ide_methods.bas");if(r)goto S_53431;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16699,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID+*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW; if(!qbevent)break;evnt(25753,16701,"ide_methods.bas");}while(r); S_53435:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID>*__INTEGER_TOTALCOLORSCHEMES))||new_error){ if(qbevent){evnt(25753,16702,"ide_methods.bas");if(r)goto S_53435;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*__INTEGER_TOTALCOLORSCHEMES; if(!qbevent)break;evnt(25753,16702,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= -1 ; if(!qbevent)break;evnt(25753,16702,"ide_methods.bas");}while(r); } S_53439:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID< 1 ))||new_error){ if(qbevent){evnt(25753,16703,"ide_methods.bas");if(r)goto S_53439;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 1 ; if(!qbevent)break;evnt(25753,16703,"ide_methods.bas");}while(r); } do{ goto LABEL_VALIDATESCHEME; if(!qbevent)break;evnt(25753,16704,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID+*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW; if(!qbevent)break;evnt(25753,16707,"ide_methods.bas");}while(r); S_53446:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID>*__INTEGER_TOTALCOLORSCHEMES))||new_error){ if(qbevent){evnt(25753,16708,"ide_methods.bas");if(r)goto S_53446;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID=*__INTEGER_TOTALCOLORSCHEMES; if(!qbevent)break;evnt(25753,16708,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEARROW= -1 ; if(!qbevent)break;evnt(25753,16708,"ide_methods.bas");}while(r); } S_53450:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID< 1 ))||new_error){ if(qbevent){evnt(25753,16709,"ide_methods.bas");if(r)goto S_53450;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 1 ; if(!qbevent)break;evnt(25753,16709,"ide_methods.bas");}while(r); } do{ goto LABEL_VALIDATESCHEME; if(!qbevent)break;evnt(25753,16710,"ide_methods.bas");}while(r); } LABEL_APPLYSCHEME:; if(qbevent){evnt(25753,16712,"ide_methods.bas");r=0;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16713,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16714,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16715,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16716,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16717,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,qbs_right(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])), 90 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16718,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I= 1 ; if(!qbevent)break;evnt(25753,16719,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16720,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16720,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16720,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16720,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16720,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16720,"ide_methods.bas");}while(r); do{ *__ULONG_IDETEXTCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16721,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16722,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16722,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16722,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16722,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16722,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16722,"ide_methods.bas");}while(r); do{ *__ULONG_IDEKEYWORDCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16723,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16724,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16724,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16724,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16724,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16724,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16724,"ide_methods.bas");}while(r); do{ *__ULONG_IDENUMBERSCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16725,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16726,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16726,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16726,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16726,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16726,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16726,"ide_methods.bas");}while(r); do{ *__ULONG_IDEQUOTECOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16727,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16728,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16728,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16728,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16728,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16728,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16728,"ide_methods.bas");}while(r); do{ *__ULONG_IDEMETACOMMANDCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16729,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16730,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16730,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16730,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16730,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16730,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16730,"ide_methods.bas");}while(r); do{ *__ULONG_IDECOMMENTCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16731,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16732,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16732,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16732,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16732,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16732,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16732,"ide_methods.bas");}while(r); do{ *__ULONG_IDEBACKGROUNDCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16733,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16734,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16734,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16734,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16734,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16734,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16734,"ide_methods.bas");}while(r); do{ *__ULONG_IDEBACKGROUNDCOLOR2=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16735,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16736,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16736,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16736,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16736,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16736,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16736,"ide_methods.bas");}while(r); do{ *__ULONG_IDEBRACKETHIGHLIGHTCOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16737,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_R,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16738,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16738,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_G,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16738,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16738,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_B,func_mid(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORDATA,*_FUNC_IDECHOOSECOLORSBOX_LONG_I, 3 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16738,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,16738,"ide_methods.bas");}while(r); do{ *__ULONG_IDECHROMACOLOR=func__rgb32(qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_R)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_G)),qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_B))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16739,"ide_methods.bas");}while(r); do{ goto LABEL_CHANGETEXTBOXES; if(!qbevent)break;evnt(25753,16740,"ide_methods.bas");}while(r); } S_53534:; if ((*__LONG_MB&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 5 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 + 26 ))))||new_error){ if(qbevent){evnt(25753,16743,"ide_methods.bas");if(r)goto S_53534;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE=qbr((*__LONG_MX-*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))- 39 )*( 255 / ((long double)( 26 )))); if(!qbevent)break;evnt(25753,16744,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16745,"ide_methods.bas");}while(r); S_53537:; if ((func__keydown( 100305 )|func__keydown( 100306 ))||new_error){ if(qbevent){evnt(25753,16746,"ide_methods.bas");if(r)goto S_53537;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16747,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16748,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS= 2 ; if(!qbevent)break;evnt(25753,16750,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16751,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16752,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16753,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=173; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWUSERSCHEME; RETURN_173:; if(!qbevent)break;evnt(25753,16754,"ide_methods.bas");}while(r); } S_53547:; if ((*__LONG_MB&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 8 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 + 26 ))))||new_error){ if(qbevent){evnt(25753,16757,"ide_methods.bas");if(r)goto S_53547;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE=qbr((*__LONG_MX-*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))- 39 )*( 255 / ((long double)( 26 )))); if(!qbevent)break;evnt(25753,16758,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16759,"ide_methods.bas");}while(r); S_53550:; if ((func__keydown( 100305 )|func__keydown( 100306 ))||new_error){ if(qbevent){evnt(25753,16760,"ide_methods.bas");if(r)goto S_53550;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16761,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16762,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS= 3 ; if(!qbevent)break;evnt(25753,16764,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16765,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16766,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16767,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=174; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWUSERSCHEME; RETURN_174:; if(!qbevent)break;evnt(25753,16768,"ide_methods.bas");}while(r); } S_53560:; if ((*__LONG_MB&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(4))+ 11 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))+ 39 + 26 ))))||new_error){ if(qbevent){evnt(25753,16771,"ide_methods.bas");if(r)goto S_53560;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE=qbr((*__LONG_MX-*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_UDT_P)+(0))- 39 )*( 255 / ((long double)( 26 )))); if(!qbevent)break;evnt(25753,16772,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16773,"ide_methods.bas");}while(r); S_53563:; if ((func__keydown( 100305 )|func__keydown( 100306 ))||new_error){ if(qbevent){evnt(25753,16774,"ide_methods.bas");if(r)goto S_53563;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16775,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16776,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS= 4 ; if(!qbevent)break;evnt(25753,16778,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16779,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16780,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16781,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=175; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWUSERSCHEME; RETURN_175:; if(!qbevent)break;evnt(25753,16782,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDWITHKEYS= 0 ; if(!qbevent)break;evnt(25753,16785,"ide_methods.bas");}while(r); S_53574:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 72 )))))&(((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 2 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 3 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 4 ))))))||new_error){ if(qbevent){evnt(25753,16786,"ide_methods.bas");if(r)goto S_53574;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5915=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))+ 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16787,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16788,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16788,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16788,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDWITHKEYS= -1 ; if(!qbevent)break;evnt(25753,16789,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=176; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWUSERSCHEME; RETURN_176:; if(!qbevent)break;evnt(25753,16790,"ide_methods.bas");}while(r); } S_53582:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 80 )))))&(((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 2 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 3 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 4 ))))))||new_error){ if(qbevent){evnt(25753,16793,"ide_methods.bas");if(r)goto S_53582;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5917=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16794,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,16795,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,16795,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,16795,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDWITHKEYS= -1 ; if(!qbevent)break;evnt(25753,16796,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=177; if (next_return_point>=return_points) more_return_points(); goto LABEL_NEWUSERSCHEME; RETURN_177:; if(!qbevent)break;evnt(25753,16797,"ide_methods.bas");}while(r); } S_53590:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM!=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64))))&(-(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64))> 0 )))||new_error){ if(qbevent){evnt(25753,16800,"ide_methods.bas");if(r)goto S_53590;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16801,"ide_methods.bas");}while(r); S_53592:; fornext_value5920= 1 ; fornext_finalvalue5920= 10 ; fornext_step5920= 1 ; if (fornext_step5920<0) fornext_step_negative5920=1; else fornext_step_negative5920=0; if (new_error) goto fornext_error5920; goto fornext_entrylabel5920; while(1){ fornext_value5920=fornext_step5920+(*_FUNC_IDECHOOSECOLORSBOX_LONG_I); fornext_entrylabel5920: *_FUNC_IDECHOOSECOLORSBOX_LONG_I=fornext_value5920; if (fornext_step_negative5920){ if (fornext_value5920fornext_finalvalue5920) break; } fornext_error5920:; if(qbevent){evnt(25753,16802,"ide_methods.bas");if(r)goto S_53592;} do{ tmp_long=array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[tmp_long])),qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16802,"ide_methods.bas");}while(r); fornext_continue_5919:; } fornext_exit_5919:; do{ tmp_long=array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[tmp_long])),func_chr( 16 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16803,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,16805,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16806,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])])),qbs_new_txt_len("Normal Text",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16806,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16807,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Keywords",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16807,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16808,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Numbers",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16808,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16809,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Strings",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16809,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16810,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Metacommand/custom keywords",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16810,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16811,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Comments",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16811,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16812,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Background",10))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16812,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16813,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Current line background",23))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16813,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16814,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Bracket/selection highlight",27))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16814,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_I=*_FUNC_IDECHOOSECOLORSBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,16815,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_L,qbs_add(qbs_add(qbs_add(_FUNC_IDECHOOSECOLORSBOX_STRING_L,_FUNC_IDECHOOSECOLORSBOX_STRING1_SEP),((qbs*)(((uint64*)(_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_I)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_STRING_SELECTIONINDICATOR[5])]))),qbs_new_txt_len("Menus and dialogs",17))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16815,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDECHOOSECOLORSBOX_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16816,"ide_methods.bas");}while(r); LABEL_CHANGETEXTBOXES:; if(qbevent){evnt(25753,16818,"ide_methods.bas");r=0;} S_53618:; if(qbevent){evnt(25753,16819,"ide_methods.bas");if(r)goto S_53618;} S_53619:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 1 )))||new_error){ if(qbevent){evnt(25753,16820,"ide_methods.bas");if(r)goto S_53619;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDETEXTCOLOR; if(!qbevent)break;evnt(25753,16820,"ide_methods.bas");}while(r); sc_ec_382_end:; goto sc_5921_end; } S_53621:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 2 )))||new_error){ if(qbevent){evnt(25753,16821,"ide_methods.bas");if(r)goto S_53621;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEKEYWORDCOLOR; if(!qbevent)break;evnt(25753,16821,"ide_methods.bas");}while(r); sc_ec_383_end:; goto sc_5921_end; } S_53623:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 3 )))||new_error){ if(qbevent){evnt(25753,16822,"ide_methods.bas");if(r)goto S_53623;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDENUMBERSCOLOR; if(!qbevent)break;evnt(25753,16822,"ide_methods.bas");}while(r); sc_ec_384_end:; goto sc_5921_end; } S_53625:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 4 )))||new_error){ if(qbevent){evnt(25753,16823,"ide_methods.bas");if(r)goto S_53625;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEQUOTECOLOR; if(!qbevent)break;evnt(25753,16823,"ide_methods.bas");}while(r); sc_ec_385_end:; goto sc_5921_end; } S_53627:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 5 )))||new_error){ if(qbevent){evnt(25753,16824,"ide_methods.bas");if(r)goto S_53627;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEMETACOMMANDCOLOR; if(!qbevent)break;evnt(25753,16824,"ide_methods.bas");}while(r); sc_ec_386_end:; goto sc_5921_end; } S_53629:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 6 )))||new_error){ if(qbevent){evnt(25753,16825,"ide_methods.bas");if(r)goto S_53629;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECOMMENTCOLOR; if(!qbevent)break;evnt(25753,16825,"ide_methods.bas");}while(r); sc_ec_387_end:; goto sc_5921_end; } S_53631:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 7 )))||new_error){ if(qbevent){evnt(25753,16826,"ide_methods.bas");if(r)goto S_53631;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR; if(!qbevent)break;evnt(25753,16826,"ide_methods.bas");}while(r); sc_ec_388_end:; goto sc_5921_end; } S_53633:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 8 )))||new_error){ if(qbevent){evnt(25753,16827,"ide_methods.bas");if(r)goto S_53633;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR2; if(!qbevent)break;evnt(25753,16827,"ide_methods.bas");}while(r); sc_ec_389_end:; goto sc_5921_end; } S_53635:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 9 )))||new_error){ if(qbevent){evnt(25753,16828,"ide_methods.bas");if(r)goto S_53635;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBRACKETHIGHLIGHTCOLOR; if(!qbevent)break;evnt(25753,16828,"ide_methods.bas");}while(r); sc_ec_390_end:; goto sc_5921_end; } S_53637:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 10 )))||new_error){ if(qbevent){evnt(25753,16829,"ide_methods.bas");if(r)goto S_53637;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECHROMACOLOR; if(!qbevent)break;evnt(25753,16829,"ide_methods.bas");}while(r); sc_ec_391_end:; goto sc_5921_end; } sc_5921_end:; do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5922=func__red32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16831,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5923=func__green32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16832,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5924=func__blue32(*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16833,"ide_methods.bas");}while(r); S_53643:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS>= 2 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS<= 4 ))&*_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDSCHEME)||new_error){ if(qbevent){evnt(25753,16834,"ide_methods.bas");if(r)goto S_53643;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_PREVTB__ASCII_CHR_046__VALUE,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16835,"ide_methods.bas");}while(r); } } S_53647:; fornext_value5926= 2 ; fornext_finalvalue5926= 4 ; fornext_step5926= 1 ; if (fornext_step5926<0) fornext_step_negative5926=1; else fornext_step_negative5926=0; if (new_error) goto fornext_error5926; goto fornext_entrylabel5926; while(1){ fornext_value5926=fornext_step5926+(*_FUNC_IDECHOOSECOLORSBOX_LONG_CHECKRGB); fornext_entrylabel5926: *_FUNC_IDECHOOSECOLORSBOX_LONG_CHECKRGB=fornext_value5926; if (fornext_step_negative5926){ if (fornext_value5926fornext_finalvalue5926) break; } fornext_error5926:; if(qbevent){evnt(25753,16840,"ide_methods.bas");if(r)goto S_53647;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_CHECKRGB)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16841,"ide_methods.bas");}while(r); S_53649:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDECHOOSECOLORSBOX_STRING_A->len> 3 )))||new_error){ if(qbevent){evnt(25753,16842,"ide_methods.bas");if(r)goto S_53649;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,qbs_left(_FUNC_IDECHOOSECOLORSBOX_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16842,"ide_methods.bas");}while(r); } S_53652:; fornext_value5929= 1 ; fornext_finalvalue5929=_FUNC_IDECHOOSECOLORSBOX_STRING_A->len; fornext_step5929= 1 ; if (fornext_step5929<0) fornext_step_negative5929=1; else fornext_step_negative5929=0; if (new_error) goto fornext_error5929; goto fornext_entrylabel5929; while(1){ fornext_value5929=fornext_step5929+(*_FUNC_IDECHOOSECOLORSBOX_LONG_I); fornext_entrylabel5929: *_FUNC_IDECHOOSECOLORSBOX_LONG_I=fornext_value5929; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5929){ if (fornext_value5929fornext_finalvalue5929) break; } fornext_error5929:; if(qbevent){evnt(25753,16843,"ide_methods.bas");if(r)goto S_53652;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_A=qbs_asc(_FUNC_IDECHOOSECOLORSBOX_STRING_A,*_FUNC_IDECHOOSECOLORSBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16844,"ide_methods.bas");}while(r); S_53654:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDECHOOSECOLORSBOX_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,16845,"ide_methods.bas");if(r)goto S_53654;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16845,"ide_methods.bas");}while(r); do{ goto fornext_exit_5928; if(!qbevent)break;evnt(25753,16845,"ide_methods.bas");}while(r); } S_53658:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_A< 48 ))|(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,16846,"ide_methods.bas");if(r)goto S_53658;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16846,"ide_methods.bas");}while(r); do{ goto fornext_exit_5928; if(!qbevent)break;evnt(25753,16846,"ide_methods.bas");}while(r); } fornext_continue_5928:; } fornext_exit_5928:; S_53663:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDECHOOSECOLORSBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,16848,"ide_methods.bas");if(r)goto S_53663;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_A=qbr(func_val(_FUNC_IDECHOOSECOLORSBOX_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16849,"ide_methods.bas");}while(r); S_53665:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_A> 255 ))||new_error){ if(qbevent){evnt(25753,16850,"ide_methods.bas");if(r)goto S_53665;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,qbs_new_txt_len("255",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16850,"ide_methods.bas");}while(r); } S_53668:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_A< 0 ))||new_error){ if(qbevent){evnt(25753,16851,"ide_methods.bas");if(r)goto S_53668;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16851,"ide_methods.bas");}while(r); } }else{ S_53672:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_CHANGEDWITHKEYS== -1 ))||new_error){ if(qbevent){evnt(25753,16853,"ide_methods.bas");if(r)goto S_53672;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16853,"ide_methods.bas");}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_CHECKRGB)-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDECHOOSECOLORSBOX_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16855,"ide_methods.bas");}while(r); fornext_continue_5925:; } fornext_exit_5925:; do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16859,"ide_methods.bas");}while(r); S_53679:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE> 0 ))||new_error){ if(qbevent){evnt(25753,16860,"ide_methods.bas");if(r)goto S_53679;} do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_A2,qbs_add(qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 ),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16861,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDECHOOSECOLORSBOX_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16862,"ide_methods.bas");}while(r); S_53682:; if ((-(*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))>=*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE))||new_error){ if(qbevent){evnt(25753,16863,"ide_methods.bas");if(r)goto S_53682;} do{ *(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+81))- 1 ; if(!qbevent)break;evnt(25753,16863,"ide_methods.bas");}while(r); } } S_53686:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID> 0 ))||new_error){ if(qbevent){evnt(25753,16866,"ide_methods.bas");if(r)goto S_53686;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16867,"ide_methods.bas");}while(r); S_53688:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_rtrim(qbs_ltrim(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 ))))||new_error){ if(qbevent){evnt(25753,16868,"ide_methods.bas");if(r)goto S_53688;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 0 ; if(!qbevent)break;evnt(25753,16870,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=func__rgb32(qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 4 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16874,"ide_methods.bas");}while(r); S_53693:; if(qbevent){evnt(25753,16875,"ide_methods.bas");if(r)goto S_53693;} S_53694:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 1 )))||new_error){ if(qbevent){evnt(25753,16876,"ide_methods.bas");if(r)goto S_53694;} do{ *__ULONG_IDETEXTCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16876,"ide_methods.bas");}while(r); sc_ec_392_end:; goto sc_5932_end; } S_53696:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 2 )))||new_error){ if(qbevent){evnt(25753,16877,"ide_methods.bas");if(r)goto S_53696;} do{ *__ULONG_IDEKEYWORDCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16877,"ide_methods.bas");}while(r); sc_ec_393_end:; goto sc_5932_end; } S_53698:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 3 )))||new_error){ if(qbevent){evnt(25753,16878,"ide_methods.bas");if(r)goto S_53698;} do{ *__ULONG_IDENUMBERSCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16878,"ide_methods.bas");}while(r); sc_ec_394_end:; goto sc_5932_end; } S_53700:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 4 )))||new_error){ if(qbevent){evnt(25753,16879,"ide_methods.bas");if(r)goto S_53700;} do{ *__ULONG_IDEQUOTECOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16879,"ide_methods.bas");}while(r); sc_ec_395_end:; goto sc_5932_end; } S_53702:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 5 )))||new_error){ if(qbevent){evnt(25753,16880,"ide_methods.bas");if(r)goto S_53702;} do{ *__ULONG_IDEMETACOMMANDCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16880,"ide_methods.bas");}while(r); sc_ec_396_end:; goto sc_5932_end; } S_53704:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 6 )))||new_error){ if(qbevent){evnt(25753,16881,"ide_methods.bas");if(r)goto S_53704;} do{ *__ULONG_IDECOMMENTCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16881,"ide_methods.bas");}while(r); sc_ec_397_end:; goto sc_5932_end; } S_53706:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 7 )))||new_error){ if(qbevent){evnt(25753,16882,"ide_methods.bas");if(r)goto S_53706;} do{ *__ULONG_IDEBACKGROUNDCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16882,"ide_methods.bas");}while(r); sc_ec_398_end:; goto sc_5932_end; } S_53708:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 8 )))||new_error){ if(qbevent){evnt(25753,16883,"ide_methods.bas");if(r)goto S_53708;} do{ *__ULONG_IDEBACKGROUNDCOLOR2=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16883,"ide_methods.bas");}while(r); sc_ec_399_end:; goto sc_5932_end; } S_53710:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 9 )))||new_error){ if(qbevent){evnt(25753,16884,"ide_methods.bas");if(r)goto S_53710;} do{ *__ULONG_IDEBRACKETHIGHLIGHTCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16884,"ide_methods.bas");}while(r); sc_ec_400_end:; goto sc_5932_end; } S_53712:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_SELECTEDITEM==( 10 )))||new_error){ if(qbevent){evnt(25753,16885,"ide_methods.bas");if(r)goto S_53712;} do{ *__ULONG_IDECHROMACOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR; if(!qbevent)break;evnt(25753,16885,"ide_methods.bas");}while(r); sc_ec_401_end:; goto sc_5932_end; } sc_5932_end:; S_53715:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 10 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,16888,"ide_methods.bas");if(r)goto S_53715;} do{ *__ULONG_IDECOMMENTCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDECOMMENTCOLOR; if(!qbevent)break;evnt(25753,16889,"ide_methods.bas");}while(r); do{ *__ULONG_IDEMETACOMMANDCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEMETACOMMANDCOLOR; if(!qbevent)break;evnt(25753,16890,"ide_methods.bas");}while(r); do{ *__ULONG_IDEQUOTECOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEQUOTECOLOR; if(!qbevent)break;evnt(25753,16891,"ide_methods.bas");}while(r); do{ *__ULONG_IDETEXTCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDETEXTCOLOR; if(!qbevent)break;evnt(25753,16892,"ide_methods.bas");}while(r); do{ *__ULONG_IDEKEYWORDCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEKEYWORDCOLOR; if(!qbevent)break;evnt(25753,16893,"ide_methods.bas");}while(r); do{ *__ULONG_IDENUMBERSCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDENUMBERSCOLOR; if(!qbevent)break;evnt(25753,16894,"ide_methods.bas");}while(r); do{ *__ULONG_IDEBACKGROUNDCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEBACKGROUNDCOLOR; if(!qbevent)break;evnt(25753,16895,"ide_methods.bas");}while(r); do{ *__ULONG_IDEBACKGROUNDCOLOR2=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEBACKGROUNDCOLOR2; if(!qbevent)break;evnt(25753,16896,"ide_methods.bas");}while(r); do{ *__ULONG_IDEBRACKETHIGHLIGHTCOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDEBRACKETHIGHLIGHTCOLOR; if(!qbevent)break;evnt(25753,16897,"ide_methods.bas");}while(r); do{ *__ULONG_IDECHROMACOLOR=*_FUNC_IDECHOOSECOLORSBOX_ULONG_BKPIDECHROMACOLOR; if(!qbevent)break;evnt(25753,16898,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,16899,"ide_methods.bas");}while(r); } S_53728:; if ((((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 9 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,16902,"ide_methods.bas");if(r)goto S_53728;} LABEL_LOADDEFAULTSCHEME:; if(qbevent){evnt(25753,16903,"ide_methods.bas");r=0;} do{ return_point[next_return_point++]=178; if (next_return_point>=return_points) more_return_points(); goto LABEL_ENABLEHIGHLIGHTER; RETURN_178:; if(!qbevent)break;evnt(25753,16904,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 1 ; if(!qbevent)break;evnt(25753,16905,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE=func_instr(NULL,((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),qbs_new_txt_len("|",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16906,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[array_check((*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5])])),*_FUNC_IDECHOOSECOLORSBOX_LONG_FOUNDPIPE- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16907,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,16908,"ide_methods.bas");}while(r); do{ goto LABEL_APPLYSCHEME; if(!qbevent)break;evnt(25753,16909,"ide_methods.bas");}while(r); } S_53736:; if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 8 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_INFO!= 0 )))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 1 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 2 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 3 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 4 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 5 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 6 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 7 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_FOCUS== 11 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))))||new_error){ if(qbevent){evnt(25753,16920,"ide_methods.bas");if(r)goto S_53736;} do{ return_point[next_return_point++]=179; if (next_return_point>=return_points) more_return_points(); goto LABEL_ENABLEHIGHLIGHTER; RETURN_179:; if(!qbevent)break;evnt(25753,16922,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,qbs_new_txt_len("SchemeID",8),FUNC_STR2(_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16924,"ide_methods.bas");}while(r); S_53739:; fornext_value5934= 1 ; fornext_finalvalue5934= 10 ; fornext_step5934= 1 ; if (fornext_step5934<0) fornext_step_negative5934=1; else fornext_step_negative5934=0; if (new_error) goto fornext_error5934; goto fornext_entrylabel5934; while(1){ fornext_value5934=fornext_step5934+(*_FUNC_IDECHOOSECOLORSBOX_LONG_I); fornext_entrylabel5934: *_FUNC_IDECHOOSECOLORSBOX_LONG_I=fornext_value5934; if (fornext_step_negative5934){ if (fornext_value5934fornext_finalvalue5934) break; } fornext_error5934:; if(qbevent){evnt(25753,16925,"ide_methods.bas");if(r)goto S_53739;} S_53740:; if(qbevent){evnt(25753,16926,"ide_methods.bas");if(r)goto S_53740;} S_53741:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 1 )))||new_error){ if(qbevent){evnt(25753,16927,"ide_methods.bas");if(r)goto S_53741;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDETEXTCOLOR; if(!qbevent)break;evnt(25753,16927,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("TextColor",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16927,"ide_methods.bas");}while(r); sc_ec_402_end:; goto sc_5935_end; } S_53744:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 2 )))||new_error){ if(qbevent){evnt(25753,16928,"ide_methods.bas");if(r)goto S_53744;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEKEYWORDCOLOR; if(!qbevent)break;evnt(25753,16928,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("KeywordColor",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16928,"ide_methods.bas");}while(r); sc_ec_403_end:; goto sc_5935_end; } S_53747:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 3 )))||new_error){ if(qbevent){evnt(25753,16929,"ide_methods.bas");if(r)goto S_53747;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDENUMBERSCOLOR; if(!qbevent)break;evnt(25753,16929,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("NumbersColor",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16929,"ide_methods.bas");}while(r); sc_ec_404_end:; goto sc_5935_end; } S_53750:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 4 )))||new_error){ if(qbevent){evnt(25753,16930,"ide_methods.bas");if(r)goto S_53750;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEQUOTECOLOR; if(!qbevent)break;evnt(25753,16930,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("QuoteColor",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16930,"ide_methods.bas");}while(r); sc_ec_405_end:; goto sc_5935_end; } S_53753:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 5 )))||new_error){ if(qbevent){evnt(25753,16931,"ide_methods.bas");if(r)goto S_53753;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEMETACOMMANDCOLOR; if(!qbevent)break;evnt(25753,16931,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("MetaCommandColor",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16931,"ide_methods.bas");}while(r); sc_ec_406_end:; goto sc_5935_end; } S_53756:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 6 )))||new_error){ if(qbevent){evnt(25753,16932,"ide_methods.bas");if(r)goto S_53756;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECOMMENTCOLOR; if(!qbevent)break;evnt(25753,16932,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("CommentColor",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16932,"ide_methods.bas");}while(r); sc_ec_407_end:; goto sc_5935_end; } S_53759:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 7 )))||new_error){ if(qbevent){evnt(25753,16933,"ide_methods.bas");if(r)goto S_53759;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR; if(!qbevent)break;evnt(25753,16933,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("BackgroundColor",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16933,"ide_methods.bas");}while(r); sc_ec_408_end:; goto sc_5935_end; } S_53762:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 8 )))||new_error){ if(qbevent){evnt(25753,16934,"ide_methods.bas");if(r)goto S_53762;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBACKGROUNDCOLOR2; if(!qbevent)break;evnt(25753,16934,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("BackgroundColor2",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16934,"ide_methods.bas");}while(r); sc_ec_409_end:; goto sc_5935_end; } S_53765:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 9 )))||new_error){ if(qbevent){evnt(25753,16935,"ide_methods.bas");if(r)goto S_53765;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDEBRACKETHIGHLIGHTCOLOR; if(!qbevent)break;evnt(25753,16935,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("HighlightColor",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16935,"ide_methods.bas");}while(r); sc_ec_410_end:; goto sc_5935_end; } S_53768:; if (((*_FUNC_IDECHOOSECOLORSBOX_LONG_I==( 10 )))||new_error){ if(qbevent){evnt(25753,16936,"ide_methods.bas");if(r)goto S_53768;} do{ *_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR=*__ULONG_IDECHROMACOLOR; if(!qbevent)break;evnt(25753,16936,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,qbs_new_txt_len("ChromaColor",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16936,"ide_methods.bas");}while(r); sc_ec_411_end:; goto sc_5935_end; } sc_5935_end:; do{ SUB_WRITECONFIGSETTING(__STRING_COLORSETTINGSSECTION,_FUNC_IDECHOOSECOLORSBOX_STRING_COLORID,FUNC_RGBS(_FUNC_IDECHOOSECOLORSBOX_ULONG_CURRENTCOLOR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16938,"ide_methods.bas");}while(r); fornext_continue_5933:; } fornext_exit_5933:; do{ *_FUNC_IDECHOOSECOLORSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 5 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16941,"ide_methods.bas");}while(r); S_53775:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,16942,"ide_methods.bas");if(r)goto S_53775;} do{ *_FUNC_IDECHOOSECOLORSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,16942,"ide_methods.bas");}while(r); } do{ *__INTEGER_BRACKETHIGHLIGHT=*_FUNC_IDECHOOSECOLORSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16943,"ide_methods.bas");}while(r); S_53779:; if ((*__INTEGER_BRACKETHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,16945,"ide_methods.bas");if(r)goto S_53779;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BracketHighlight",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16946,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("BracketHighlight",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16948,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 6 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16951,"ide_methods.bas");}while(r); S_53785:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,16952,"ide_methods.bas");if(r)goto S_53785;} do{ *_FUNC_IDECHOOSECOLORSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,16952,"ide_methods.bas");}while(r); } do{ *__INTEGER_MULTIHIGHLIGHT=*_FUNC_IDECHOOSECOLORSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16953,"ide_methods.bas");}while(r); S_53789:; if ((*__INTEGER_MULTIHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,16955,"ide_methods.bas");if(r)goto S_53789;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("MultiHighlight",14),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16956,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("MultiHighlight",14),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16958,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_INTEGER_V=*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 7 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+64)); if(!qbevent)break;evnt(25753,16961,"ide_methods.bas");}while(r); S_53795:; if ((-(*_FUNC_IDECHOOSECOLORSBOX_INTEGER_V!= 0 ))||new_error){ if(qbevent){evnt(25753,16962,"ide_methods.bas");if(r)goto S_53795;} do{ *_FUNC_IDECHOOSECOLORSBOX_INTEGER_V= -1 ; if(!qbevent)break;evnt(25753,16962,"ide_methods.bas");}while(r); } do{ *__INTEGER_KEYWORDHIGHLIGHT=*_FUNC_IDECHOOSECOLORSBOX_INTEGER_V; if(!qbevent)break;evnt(25753,16963,"ide_methods.bas");}while(r); S_53799:; if ((*__INTEGER_KEYWORDHIGHLIGHT)||new_error){ if(qbevent){evnt(25753,16965,"ide_methods.bas");if(r)goto S_53799;} do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("KeywordHighlight",16),qbs_new_txt_len("True",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16966,"ide_methods.bas");}while(r); }else{ do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("KeywordHighlight",16),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16968,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,16971,"ide_methods.bas");}while(r); } do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,16976,"ide_methods.bas");}while(r); do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,16977,"ide_methods.bas");}while(r); dl_continue_5867:; }while(1); dl_exit_5867:; do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_IDECHOOSECOLORSBOX= 0 ; if(!qbevent)break;evnt(25753,16980,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,16982,"ide_methods.bas");}while(r); LABEL_NEWUSERSCHEME:; if(qbevent){evnt(25753,16983,"ide_methods.bas");r=0;} S_53811:; if (((-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID> 0 ))&(-(*_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID<=*__INTEGER_PRESETCOLORSCHEMES)))||new_error){ if(qbevent){evnt(25753,16984,"ide_methods.bas");if(r)goto S_53811;} do{ *_FUNC_IDECHOOSECOLORSBOX_LONG_SCHEMEID= 0 ; if(!qbevent)break;evnt(25753,16988,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[0])+((array_check(( 9 )-_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[4],_FUNC_IDECHOOSECOLORSBOX_ARRAY_UDT_O[5]))*89+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("User-defined",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16989,"ide_methods.bas");}while(r); } do{ #include "ret221.txt" if(!qbevent)break;evnt(25753,16991,"ide_methods.bas");}while(r); LABEL_ENABLEHIGHLIGHTER:; if(qbevent){evnt(25753,16993,"ide_methods.bas");r=0;} S_53816:; if ((*__BYTE_DISABLESYNTAXHIGHLIGHTER)||new_error){ if(qbevent){evnt(25753,16994,"ide_methods.bas");if(r)goto S_53816;} do{ *__BYTE_DISABLESYNTAXHIGHLIGHTER= 0 ; if(!qbevent)break;evnt(25753,16995,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("False",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16996,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__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_add(func_chr( 7 ),qbs_new_txt_len("Syntax #Highlighter",19))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,16997,"ide_methods.bas");}while(r); } do{ #include "ret221.txt" if(!qbevent)break;evnt(25753,16999,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free221.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_IDECHOOSECOLORSBOX_LONG_IDECHOOSECOLORSBOX; } qbs* FUNC_IDERGBMIXER(int32*_FUNC_IDERGBMIXER_LONG_EDITING){ 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 "data222.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,17005,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,17006,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17007,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,17008,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,17009,"ide_methods.bas");}while(r); do{ if (_FUNC_IDERGBMIXER_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDERGBMIXER_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDERGBMIXER_ARRAY_UDT_O[4]= 1 ; _FUNC_IDERGBMIXER_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4]+1; _FUNC_IDERGBMIXER_ARRAY_UDT_O[6]=1; if (_FUNC_IDERGBMIXER_ARRAY_UDT_O[2]&4){ _FUNC_IDERGBMIXER_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDERGBMIXER_ARRAY_UDT_O[0]),0,_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDERGBMIXER_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDERGBMIXER_ARRAY_UDT_O[0]) error(257); } _FUNC_IDERGBMIXER_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,17010,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,17011,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17012,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_I= 0 ; if(!qbevent)break;evnt(25753,17016,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDERGBMIXER_UDT_P)) + (0) ),&(pass5936= 70 ),&(pass5937= 11 ),qbs_new_txt_len("RGB Color Mixer",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17018,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len("127",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17020,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_I=*_FUNC_IDERGBMIXER_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,17021,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,17022,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+20))= 63 ; if(!qbevent)break;evnt(25753,17023,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+24))= 2 ; if(!qbevent)break;evnt(25753,17024,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDERGBMIXER_STRING_A2); if(!qbevent)break;evnt(25753,17025,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDERGBMIXER_STRING_A2->len; if(!qbevent)break;evnt(25753,17026,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17027,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17028,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len("127",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17030,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_I=*_FUNC_IDERGBMIXER_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,17031,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,17032,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+20))= 63 ; if(!qbevent)break;evnt(25753,17033,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+24))= 5 ; if(!qbevent)break;evnt(25753,17034,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDERGBMIXER_STRING_A2); if(!qbevent)break;evnt(25753,17035,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDERGBMIXER_STRING_A2->len; if(!qbevent)break;evnt(25753,17036,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17037,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17038,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len("127",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17040,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_I=*_FUNC_IDERGBMIXER_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,17041,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,17042,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+20))= 63 ; if(!qbevent)break;evnt(25753,17043,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+24))= 8 ; if(!qbevent)break;evnt(25753,17044,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDERGBMIXER_STRING_A2); if(!qbevent)break;evnt(25753,17045,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=_FUNC_IDERGBMIXER_STRING_A2->len; if(!qbevent)break;evnt(25753,17046,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17047,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17048,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_I=*_FUNC_IDERGBMIXER_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,17050,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,17051,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+24))= 11 ; if(!qbevent)break;evnt(25753,17052,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Insert",7),_FUNC_IDERGBMIXER_STRING1_SEP),qbs_new_txt_len("C#opy",5)),_FUNC_IDERGBMIXER_STRING1_SEP),qbs_new_txt_len("#Cancel",7))); if(!qbevent)break;evnt(25753,17053,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,17054,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_PREV__ASCII_CHR_046__IDESELECT=*__LONG_IDESELECT; if(!qbevent)break;evnt(25753,17056,"ide_methods.bas");}while(r); S_53865:; if ((*_FUNC_IDERGBMIXER_LONG_EDITING)||new_error){ if(qbevent){evnt(25753,17058,"ide_methods.bas");if(r)goto S_53865;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17060,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17061,"ide_methods.bas");}while(r); S_53868:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,17062,"ide_methods.bas");if(r)goto S_53868;} S_53869:; if ((-(*__LONG_IDESELECTY1==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,17063,"ide_methods.bas");if(r)goto S_53869;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17064,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,17065,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,17065,"ide_methods.bas");}while(r); S_53873:; if ((-(*_FUNC_IDERGBMIXER_LONG_SX2<*_FUNC_IDERGBMIXER_LONG_SX1))||new_error){ if(qbevent){evnt(25753,17066,"ide_methods.bas");if(r)goto S_53873;} do{ swap_32(&*_FUNC_IDERGBMIXER_LONG_SX1,&*_FUNC_IDERGBMIXER_LONG_SX2); if(!qbevent)break;evnt(25753,17066,"ide_methods.bas");}while(r); } S_53876:; fornext_value5942=*_FUNC_IDERGBMIXER_LONG_SX1; fornext_finalvalue5942=*_FUNC_IDERGBMIXER_LONG_SX2- 1 ; fornext_step5942= 1 ; if (fornext_step5942<0) fornext_step_negative5942=1; else fornext_step_negative5942=0; if (new_error) goto fornext_error5942; goto fornext_entrylabel5942; while(1){ fornext_value5942=fornext_step5942+(*_FUNC_IDERGBMIXER_LONG_X); fornext_entrylabel5942: *_FUNC_IDERGBMIXER_LONG_X=fornext_value5942; if (fornext_step_negative5942){ if (fornext_value5942fornext_finalvalue5942) break; } fornext_error5942:; if(qbevent){evnt(25753,17067,"ide_methods.bas");if(r)goto S_53876;} S_53877:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDERGBMIXER_LONG_X<=_FUNC_IDERGBMIXER_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,17068,"ide_methods.bas");if(r)goto S_53877;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,qbs_add(_FUNC_IDERGBMIXER_STRING_A2,func_mid(_FUNC_IDERGBMIXER_STRING_A,*_FUNC_IDERGBMIXER_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17068,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_5941; if(!qbevent)break;evnt(25753,17068,"ide_methods.bas");}while(r); } fornext_continue_5941:; } fornext_exit_5941:; } } do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,qbs_ucase(qbs_ltrim(qbs_rtrim(_FUNC_IDERGBMIXER_STRING_A2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17072,"ide_methods.bas");}while(r); S_53886:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDERGBMIXER_STRING_A2->len== 0 )))||new_error){ if(qbevent){evnt(25753,17074,"ide_methods.bas");if(r)goto S_53886;} LABEL_RGB_LOOKUP:; if(qbevent){evnt(25753,17075,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_ALL_RGB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17077,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17078,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_ucase(_FUNC_IDERGBMIXER_STRING_CURRENTLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17079,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_FOUND_RGB= 0 ; if(!qbevent)break;evnt(25753,17083,"ide_methods.bas");}while(r); S_53891:; do{ if(qbevent){evnt(25753,17084,"ide_methods.bas");if(r)goto S_53891;} do{ *_FUNC_IDERGBMIXER_LONG_FOUND_RGB=func_instr(*_FUNC_IDERGBMIXER_LONG_FOUND_RGB+ 1 ,_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("RGB",3),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17085,"ide_methods.bas");}while(r); S_53893:; if ((-(*_FUNC_IDERGBMIXER_LONG_FOUND_RGB== 0 ))||new_error){ if(qbevent){evnt(25753,17086,"ide_methods.bas");if(r)goto S_53893;} do{ goto dl_exit_5945; if(!qbevent)break;evnt(25753,17086,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_FINDBRACKET1=func_instr(*_FUNC_IDERGBMIXER_LONG_FOUND_RGB,_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("(",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17087,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_FINDBRACKET2=func_instr(*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1,_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17088,"ide_methods.bas");}while(r); S_53898:; if (((-(*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1> 0 ))&(-(*_FUNC_IDERGBMIXER_LONG_FINDBRACKET2> 0 )))||new_error){ if(qbevent){evnt(25753,17089,"ide_methods.bas");if(r)goto S_53898;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_ALL_RGB,qbs_add(_FUNC_IDERGBMIXER_STRING_ALL_RGB,i2string(*_FUNC_IDERGBMIXER_LONG_FOUND_RGB))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17090,"ide_methods.bas");}while(r); } dl_continue_5945:; }while(1); dl_exit_5945:; S_53902:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDERGBMIXER_STRING_ALL_RGB->len== 0 )))||new_error){ if(qbevent){evnt(25753,17094,"ide_methods.bas");if(r)goto S_53902;} do{ goto LABEL_NORGBFOUND; if(!qbevent)break;evnt(25753,17094,"ide_methods.bas");}while(r); } S_53905:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDERGBMIXER_STRING_ALL_RGB->len== 2 )))||new_error){ if(qbevent){evnt(25753,17096,"ide_methods.bas");if(r)goto S_53905;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,func_mid(_FUNC_IDERGBMIXER_STRING_A,string2i(_FUNC_IDERGBMIXER_STRING_ALL_RGB),NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17098,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_INSERTRGBAT=string2i(_FUNC_IDERGBMIXER_STRING_ALL_RGB); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17099,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDERGBMIXER_LONG_CHECK_RGB= 1 ; if(!qbevent)break;evnt(25753,17101,"ide_methods.bas");}while(r); S_53910:; do{ if(qbevent){evnt(25753,17102,"ide_methods.bas");if(r)goto S_53910;} S_53911:; if ((qbs_cleanup(qbs_tmp_base,-(*__LONG_IDECX>=string2i(func_mid(_FUNC_IDERGBMIXER_STRING_ALL_RGB,((*_FUNC_IDERGBMIXER_LONG_CHECK_RGB+ 1 )* 2 )-( 1 ), 2 ,1)))))||new_error){ if(qbevent){evnt(25753,17103,"ide_methods.bas");if(r)goto S_53911;} do{ *_FUNC_IDERGBMIXER_LONG_CHECK_RGB=*_FUNC_IDERGBMIXER_LONG_CHECK_RGB+ 1 ; if(!qbevent)break;evnt(25753,17104,"ide_methods.bas");}while(r); S_53913:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDERGBMIXER_LONG_CHECK_RGB==(_FUNC_IDERGBMIXER_STRING_ALL_RGB->len/ 2 ))))||new_error){ if(qbevent){evnt(25753,17105,"ide_methods.bas");if(r)goto S_53913;} do{ goto dl_exit_5948; if(!qbevent)break;evnt(25753,17105,"ide_methods.bas");}while(r); } }else{ do{ goto dl_exit_5948; if(!qbevent)break;evnt(25753,17107,"ide_methods.bas");}while(r); } dl_continue_5948:; }while(1); dl_exit_5948:; do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A2,func_mid(_FUNC_IDERGBMIXER_STRING_A,string2i(func_mid(_FUNC_IDERGBMIXER_STRING_ALL_RGB,(*_FUNC_IDERGBMIXER_LONG_CHECK_RGB* 2 )-( 1 ), 2 ,1)),NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17110,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_INSERTRGBAT=string2i(func_mid(_FUNC_IDERGBMIXER_STRING_ALL_RGB,(*_FUNC_IDERGBMIXER_LONG_CHECK_RGB* 2 )-( 1 ), 2 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17111,"ide_methods.bas");}while(r); } } do{ if(!qbevent)break;evnt(25753,17116,"ide_methods.bas");}while(r); S_53925:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_IDERGBMIXER_STRING_A2, 4 ),qbs_new_txt_len("RGB(",4)))|(qbs_equal(qbs_left(_FUNC_IDERGBMIXER_STRING_A2, 6 ),qbs_new_txt_len("RGB32(",6)))|(qbs_equal(qbs_left(_FUNC_IDERGBMIXER_STRING_A2, 5 ),qbs_new_txt_len("RGBA(",5)))|(qbs_equal(qbs_left(_FUNC_IDERGBMIXER_STRING_A2, 7 ),qbs_new_txt_len("RGBA32(",7)))))||new_error){ if(qbevent){evnt(25753,17120,"ide_methods.bas");if(r)goto S_53925;} S_53926:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_IDERGBMIXER_STRING_A2, 6 ),qbs_new_txt_len("RGB32(",6))))||new_error){ if(qbevent){evnt(25753,17121,"ide_methods.bas");if(r)goto S_53926;} do{ *_FUNC_IDERGBMIXER_BYTE_NEWSYNTAX= -1 ; if(!qbevent)break;evnt(25753,17121,"ide_methods.bas");}while(r); } S_53929:; if ((-(*_FUNC_IDERGBMIXER_LONG_INSERTRGBAT== 0 ))||new_error){ if(qbevent){evnt(25753,17122,"ide_methods.bas");if(r)goto S_53929;} do{ *_FUNC_IDERGBMIXER_LONG_INSERTRGBAT=*_FUNC_IDERGBMIXER_LONG_SX1; if(!qbevent)break;evnt(25753,17122,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_FINDCOMMA1=func_instr(NULL,_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17123,"ide_methods.bas");}while(r); S_53933:; if ((-(*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1> 0 ))||new_error){ if(qbevent){evnt(25753,17124,"ide_methods.bas");if(r)goto S_53933;} do{ *_FUNC_IDERGBMIXER_LONG_FINDCOMMA2=func_instr(*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1+ 1 ,_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len(",",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17125,"ide_methods.bas");}while(r); S_53935:; if ((-(*_FUNC_IDERGBMIXER_LONG_FINDCOMMA2> 0 ))||new_error){ if(qbevent){evnt(25753,17126,"ide_methods.bas");if(r)goto S_53935;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17127,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_G,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17127,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17127,"ide_methods.bas");}while(r); S_53939:; fornext_value5951=*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1- 1 ; fornext_finalvalue5951= 1 ; fornext_step5951= -1 ; if (fornext_step5951<0) fornext_step_negative5951=1; else fornext_step_negative5951=0; if (new_error) goto fornext_error5951; goto fornext_entrylabel5951; while(1){ fornext_value5951=fornext_step5951+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5951: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5951; if (fornext_step_negative5951){ if (fornext_value5951fornext_finalvalue5951) break; } fornext_error5951:; if(qbevent){evnt(25753,17128,"ide_methods.bas");if(r)goto S_53939;} S_53940:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)>= 48 ))&(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)<= 57 ))))||new_error){ if(qbevent){evnt(25753,17129,"ide_methods.bas");if(r)goto S_53940;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_R,qbs_add(func_mid(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I, 1 ,1),_FUNC_IDERGBMIXER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17130,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_5950; if(!qbevent)break;evnt(25753,17132,"ide_methods.bas");}while(r); } fornext_continue_5950:; } fornext_exit_5950:; S_53946:; fornext_value5953=*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1+ 1 ; fornext_finalvalue5953=*_FUNC_IDERGBMIXER_LONG_FINDCOMMA2- 1 ; fornext_step5953= 1 ; if (fornext_step5953<0) fornext_step_negative5953=1; else fornext_step_negative5953=0; if (new_error) goto fornext_error5953; goto fornext_entrylabel5953; while(1){ fornext_value5953=fornext_step5953+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5953: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5953; if (fornext_step_negative5953){ if (fornext_value5953fornext_finalvalue5953) break; } fornext_error5953:; if(qbevent){evnt(25753,17136,"ide_methods.bas");if(r)goto S_53946;} S_53947:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)== 32 ))|(((-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)>= 48 ))&(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)<= 57 ))))))||new_error){ if(qbevent){evnt(25753,17137,"ide_methods.bas");if(r)goto S_53947;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_G,qbs_add(_FUNC_IDERGBMIXER_STRING_G,func_mid(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17138,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_5952; if(!qbevent)break;evnt(25753,17140,"ide_methods.bas");}while(r); } fornext_continue_5952:; } fornext_exit_5952:; S_53953:; fornext_value5955=*_FUNC_IDERGBMIXER_LONG_FINDCOMMA2+ 1 ; fornext_finalvalue5955=_FUNC_IDERGBMIXER_STRING_A2->len; fornext_step5955= 1 ; if (fornext_step5955<0) fornext_step_negative5955=1; else fornext_step_negative5955=0; if (new_error) goto fornext_error5955; goto fornext_entrylabel5955; while(1){ fornext_value5955=fornext_step5955+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5955: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5955; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5955){ if (fornext_value5955fornext_finalvalue5955) break; } fornext_error5955:; if(qbevent){evnt(25753,17144,"ide_methods.bas");if(r)goto S_53953;} S_53954:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)== 32 ))|(((-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)>= 48 ))&(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)<= 57 ))))))||new_error){ if(qbevent){evnt(25753,17145,"ide_methods.bas");if(r)goto S_53954;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_B,qbs_add(_FUNC_IDERGBMIXER_STRING_B,func_mid(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17146,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_5954; if(!qbevent)break;evnt(25753,17148,"ide_methods.bas");}while(r); } fornext_continue_5954:; } fornext_exit_5954:; do{ *_FUNC_IDERGBMIXER_LONG_R=qbr(func_val(_FUNC_IDERGBMIXER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17152,"ide_methods.bas");}while(r); S_53961:; if ((-(*_FUNC_IDERGBMIXER_LONG_R< 0 ))||new_error){ if(qbevent){evnt(25753,17152,"ide_methods.bas");if(r)goto S_53961;} do{ *_FUNC_IDERGBMIXER_LONG_R= 0 ; if(!qbevent)break;evnt(25753,17152,"ide_methods.bas");}while(r); } S_53964:; if ((-(*_FUNC_IDERGBMIXER_LONG_R> 255 ))||new_error){ if(qbevent){evnt(25753,17153,"ide_methods.bas");if(r)goto S_53964;} do{ *_FUNC_IDERGBMIXER_LONG_R= 255 ; if(!qbevent)break;evnt(25753,17153,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_G=qbr(func_val(_FUNC_IDERGBMIXER_STRING_G)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17154,"ide_methods.bas");}while(r); S_53968:; if ((-(*_FUNC_IDERGBMIXER_LONG_G< 0 ))||new_error){ if(qbevent){evnt(25753,17154,"ide_methods.bas");if(r)goto S_53968;} do{ *_FUNC_IDERGBMIXER_LONG_G= 0 ; if(!qbevent)break;evnt(25753,17154,"ide_methods.bas");}while(r); } S_53971:; if ((-(*_FUNC_IDERGBMIXER_LONG_G> 255 ))||new_error){ if(qbevent){evnt(25753,17155,"ide_methods.bas");if(r)goto S_53971;} do{ *_FUNC_IDERGBMIXER_LONG_G= 255 ; if(!qbevent)break;evnt(25753,17155,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_B=qbr(func_val(_FUNC_IDERGBMIXER_STRING_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17156,"ide_methods.bas");}while(r); S_53975:; if ((-(*_FUNC_IDERGBMIXER_LONG_B< 0 ))||new_error){ if(qbevent){evnt(25753,17156,"ide_methods.bas");if(r)goto S_53975;} do{ *_FUNC_IDERGBMIXER_LONG_B= 0 ; if(!qbevent)break;evnt(25753,17156,"ide_methods.bas");}while(r); } S_53978:; if ((-(*_FUNC_IDERGBMIXER_LONG_B> 255 ))||new_error){ if(qbevent){evnt(25753,17157,"ide_methods.bas");if(r)goto S_53978;} do{ *_FUNC_IDERGBMIXER_LONG_B= 255 ; if(!qbevent)break;evnt(25753,17157,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17159,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_G)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17160,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17161,"ide_methods.bas");}while(r); S_53984:; fornext_value5958= 1 ; fornext_finalvalue5958= 3 ; fornext_step5958= 1 ; if (fornext_step5958<0) fornext_step_negative5958=1; else fornext_step_negative5958=0; if (new_error) goto fornext_error5958; goto fornext_entrylabel5958; while(1){ fornext_value5958=fornext_step5958+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5958: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5958; if (fornext_step_negative5958){ if (fornext_value5958fornext_finalvalue5958) break; } fornext_error5958:; if(qbevent){evnt(25753,17163,"ide_methods.bas");if(r)goto S_53984;} do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17164,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17165,"ide_methods.bas");}while(r); S_53987:; if ((-(*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,17166,"ide_methods.bas");if(r)goto S_53987;} do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17166,"ide_methods.bas");}while(r); } fornext_continue_5957:; } fornext_exit_5957:; S_53991:; }else{ if (*_FUNC_IDERGBMIXER_BYTE_NEWSYNTAX){ if(qbevent){evnt(25753,17168,"ide_methods.bas");if(r)goto S_53991;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17169,"ide_methods.bas");}while(r); S_53993:; fornext_value5961=*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1- 1 ; fornext_finalvalue5961= 1 ; fornext_step5961= -1 ; if (fornext_step5961<0) fornext_step_negative5961=1; else fornext_step_negative5961=0; if (new_error) goto fornext_error5961; goto fornext_entrylabel5961; while(1){ fornext_value5961=fornext_step5961+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5961: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5961; if (fornext_step_negative5961){ if (fornext_value5961fornext_finalvalue5961) break; } fornext_error5961:; if(qbevent){evnt(25753,17170,"ide_methods.bas");if(r)goto S_53993;} S_53994:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)>= 48 ))&(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)<= 57 ))))||new_error){ if(qbevent){evnt(25753,17171,"ide_methods.bas");if(r)goto S_53994;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_R,qbs_add(func_mid(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I, 1 ,1),_FUNC_IDERGBMIXER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17172,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_5960; if(!qbevent)break;evnt(25753,17174,"ide_methods.bas");}while(r); } fornext_continue_5960:; } fornext_exit_5960:; do{ *_FUNC_IDERGBMIXER_LONG_R=qbr(func_val(_FUNC_IDERGBMIXER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17178,"ide_methods.bas");}while(r); S_54001:; if ((-(*_FUNC_IDERGBMIXER_LONG_R< 0 ))||new_error){ if(qbevent){evnt(25753,17178,"ide_methods.bas");if(r)goto S_54001;} do{ *_FUNC_IDERGBMIXER_LONG_R= 0 ; if(!qbevent)break;evnt(25753,17178,"ide_methods.bas");}while(r); } S_54004:; if ((-(*_FUNC_IDERGBMIXER_LONG_R> 255 ))||new_error){ if(qbevent){evnt(25753,17179,"ide_methods.bas");if(r)goto S_54004;} do{ *_FUNC_IDERGBMIXER_LONG_R= 255 ; if(!qbevent)break;evnt(25753,17179,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_G=*_FUNC_IDERGBMIXER_LONG_R; if(!qbevent)break;evnt(25753,17180,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_B=*_FUNC_IDERGBMIXER_LONG_R; if(!qbevent)break;evnt(25753,17181,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17183,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_G)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17184,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17185,"ide_methods.bas");}while(r); S_54012:; fornext_value5963= 1 ; fornext_finalvalue5963= 3 ; fornext_step5963= 1 ; if (fornext_step5963<0) fornext_step_negative5963=1; else fornext_step_negative5963=0; if (new_error) goto fornext_error5963; goto fornext_entrylabel5963; while(1){ fornext_value5963=fornext_step5963+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5963: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5963; if (fornext_step_negative5963){ if (fornext_value5963fornext_finalvalue5963) break; } fornext_error5963:; if(qbevent){evnt(25753,17187,"ide_methods.bas");if(r)goto S_54012;} do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17188,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17189,"ide_methods.bas");}while(r); S_54015:; if ((-(*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,17190,"ide_methods.bas");if(r)goto S_54015;} do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17190,"ide_methods.bas");}while(r); } fornext_continue_5962:; } fornext_exit_5962:; } } S_54020:; }else{ if (*_FUNC_IDERGBMIXER_BYTE_NEWSYNTAX){ if(qbevent){evnt(25753,17193,"ide_methods.bas");if(r)goto S_54020;} do{ *_FUNC_IDERGBMIXER_LONG_FINDCOMMA1=func_instr(NULL,_FUNC_IDERGBMIXER_STRING_A2,qbs_new_txt_len(")",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17195,"ide_methods.bas");}while(r); S_54022:; if ((*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1)||new_error){ if(qbevent){evnt(25753,17196,"ide_methods.bas");if(r)goto S_54022;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_R,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17197,"ide_methods.bas");}while(r); S_54024:; fornext_value5966=*_FUNC_IDERGBMIXER_LONG_FINDCOMMA1- 1 ; fornext_finalvalue5966= 1 ; fornext_step5966= -1 ; if (fornext_step5966<0) fornext_step_negative5966=1; else fornext_step_negative5966=0; if (new_error) goto fornext_error5966; goto fornext_entrylabel5966; while(1){ fornext_value5966=fornext_step5966+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5966: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5966; if (fornext_step_negative5966){ if (fornext_value5966fornext_finalvalue5966) break; } fornext_error5966:; if(qbevent){evnt(25753,17198,"ide_methods.bas");if(r)goto S_54024;} S_54025:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)>= 48 ))&(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I)<= 57 ))))||new_error){ if(qbevent){evnt(25753,17199,"ide_methods.bas");if(r)goto S_54025;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_R,qbs_add(func_mid(_FUNC_IDERGBMIXER_STRING_A2,*_FUNC_IDERGBMIXER_LONG_I, 1 ,1),_FUNC_IDERGBMIXER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17200,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_5965; if(!qbevent)break;evnt(25753,17202,"ide_methods.bas");}while(r); } fornext_continue_5965:; } fornext_exit_5965:; do{ *_FUNC_IDERGBMIXER_LONG_R=qbr(func_val(_FUNC_IDERGBMIXER_STRING_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17206,"ide_methods.bas");}while(r); S_54032:; if ((-(*_FUNC_IDERGBMIXER_LONG_R< 0 ))||new_error){ if(qbevent){evnt(25753,17206,"ide_methods.bas");if(r)goto S_54032;} do{ *_FUNC_IDERGBMIXER_LONG_R= 0 ; if(!qbevent)break;evnt(25753,17206,"ide_methods.bas");}while(r); } S_54035:; if ((-(*_FUNC_IDERGBMIXER_LONG_R> 255 ))||new_error){ if(qbevent){evnt(25753,17207,"ide_methods.bas");if(r)goto S_54035;} do{ *_FUNC_IDERGBMIXER_LONG_R= 255 ; if(!qbevent)break;evnt(25753,17207,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_G=*_FUNC_IDERGBMIXER_LONG_R; if(!qbevent)break;evnt(25753,17208,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_B=*_FUNC_IDERGBMIXER_LONG_R; if(!qbevent)break;evnt(25753,17209,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_R)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17211,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_G)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17212,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_B)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17213,"ide_methods.bas");}while(r); S_54043:; fornext_value5968= 1 ; fornext_finalvalue5968= 3 ; fornext_step5968= 1 ; if (fornext_step5968<0) fornext_step_negative5968=1; else fornext_step_negative5968=0; if (new_error) goto fornext_error5968; goto fornext_entrylabel5968; while(1){ fornext_value5968=fornext_step5968+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5968: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5968; if (fornext_step_negative5968){ if (fornext_value5968fornext_finalvalue5968) break; } fornext_error5968:; if(qbevent){evnt(25753,17215,"ide_methods.bas");if(r)goto S_54043;} do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17216,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17217,"ide_methods.bas");}while(r); S_54046:; if ((-(*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,17218,"ide_methods.bas");if(r)goto S_54046;} do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17218,"ide_methods.bas");}while(r); } fornext_continue_5967:; } fornext_exit_5967:; } } } }else{ S_54053:; if ((*__LONG_IDESELECT&(-(*__LONG_IDESELECTY1==*__LONG_IDECY)))||new_error){ if(qbevent){evnt(25753,17225,"ide_methods.bas");if(r)goto S_54053;} do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,17226,"ide_methods.bas");}while(r); do{ goto LABEL_RGB_LOOKUP; if(!qbevent)break;evnt(25753,17227,"ide_methods.bas");}while(r); } } } LABEL_NORGBFOUND:; if(qbevent){evnt(25753,17231,"ide_methods.bas");r=0;} do{ *_FUNC_IDERGBMIXER_ULONG_CURRENTCOLOR=func__rgb32(qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17232,"ide_methods.bas");}while(r); do{ sub__palettecolor( 12 ,*_FUNC_IDERGBMIXER_ULONG_CURRENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,17233,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 , -16734208 , 0 ,1); if(!qbevent)break;evnt(25753,17234,"ide_methods.bas");}while(r); S_54062:; fornext_value5971= 1 ; fornext_finalvalue5971= 100 ; fornext_step5971= 1 ; if (fornext_step5971<0) fornext_step_negative5971=1; else fornext_step_negative5971=0; if (new_error) goto fornext_error5971; goto fornext_entrylabel5971; while(1){ fornext_value5971=fornext_step5971+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5971: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5971; if (fornext_step_negative5971){ if (fornext_value5971fornext_finalvalue5971) break; } fornext_error5971:; if(qbevent){evnt(25753,17238,"ide_methods.bas");if(r)goto S_54062;} do{ memcpy(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDERGBMIXER_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,17238,"ide_methods.bas");}while(r); fornext_continue_5970:; } fornext_exit_5970:; S_54065:; do{ if(qbevent){evnt(25753,17241,"ide_methods.bas");if(r)goto S_54065;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDERGBMIXER_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,17244,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_F= 1 ; if(!qbevent)break;evnt(25753,17245,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,17245,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,17245,"ide_methods.bas");}while(r); S_54070:; fornext_value5974= 1 ; fornext_finalvalue5974= 100 ; fornext_step5974= 1 ; if (fornext_step5974<0) fornext_step_negative5974=1; else fornext_step_negative5974=0; if (new_error) goto fornext_error5974; goto fornext_entrylabel5974; while(1){ fornext_value5974=fornext_step5974+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5974: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5974; if (fornext_step_negative5974){ if (fornext_value5974fornext_finalvalue5974) break; } fornext_error5974:; if(qbevent){evnt(25753,17246,"ide_methods.bas");if(r)goto S_54070;} S_54071:; if ((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,17247,"ide_methods.bas");if(r)goto S_54071;} do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDERGBMIXER_LONG_FOCUS-*_FUNC_IDERGBMIXER_LONG_F; if(!qbevent)break;evnt(25753,17250,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,17251,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,17251,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89) ),_FUNC_IDERGBMIXER_LONG_F); if(!qbevent)break;evnt(25753,17252,"ide_methods.bas");}while(r); S_54076:; if ((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,17253,"ide_methods.bas");if(r)goto S_54076;} do{ *_FUNC_IDERGBMIXER_LONG_CX=*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,17253,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CY=*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,17253,"ide_methods.bas");}while(r); } } fornext_continue_5973:; } fornext_exit_5973:; do{ *_FUNC_IDERGBMIXER_LONG_LASTFOCUS=*_FUNC_IDERGBMIXER_LONG_F- 1 ; if(!qbevent)break;evnt(25753,17256,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 2 ,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 13 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,17260,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("R: ",3)); if (new_error) goto skip5975; makefit(tqbs); qbs_print(tqbs,0); skip5975: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17260,"ide_methods.bas");}while(r); do{ qbg_sub_color( 4 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17261,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string( 46 , 196 )); if (new_error) goto skip5976; makefit(tqbs); qbs_print(tqbs,0); skip5976: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17261,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17262,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_T=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17263,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_R=qbr(((*_FUNC_IDERGBMIXER_LONG_T/ ((long double)( 255 )))* 46 )); if(!qbevent)break;evnt(25753,17263,"ide_methods.bas");}while(r); S_54090:; if ((-(*_FUNC_IDERGBMIXER_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25753,17264,"ide_methods.bas");if(r)goto S_54090;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17264,"ide_methods.bas");}while(r); } S_54093:; if ((-(*_FUNC_IDERGBMIXER_LONG_T== 255 ))||new_error){ if(qbevent){evnt(25753,17265,"ide_methods.bas");if(r)goto S_54093;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17265,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 +*_FUNC_IDERGBMIXER_LONG_R,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 2 ,_FUNC_IDERGBMIXER_STRING_SLIDER,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17266,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17268,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 5 ,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 13 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,17268,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("G: ",3)); if (new_error) goto skip5977; makefit(tqbs); qbs_print(tqbs,0); skip5977: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17268,"ide_methods.bas");}while(r); do{ qbg_sub_color( 5 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17269,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string( 46 , 196 )); if (new_error) goto skip5978; makefit(tqbs); qbs_print(tqbs,0); skip5978: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17269,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17270,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_T=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17271,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_R=qbr(((*_FUNC_IDERGBMIXER_LONG_T/ ((long double)( 255 )))* 46 )); if(!qbevent)break;evnt(25753,17271,"ide_methods.bas");}while(r); S_54105:; if ((-(*_FUNC_IDERGBMIXER_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25753,17272,"ide_methods.bas");if(r)goto S_54105;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17272,"ide_methods.bas");}while(r); } S_54108:; if ((-(*_FUNC_IDERGBMIXER_LONG_T== 255 ))||new_error){ if(qbevent){evnt(25753,17273,"ide_methods.bas");if(r)goto S_54108;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17273,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 +*_FUNC_IDERGBMIXER_LONG_R,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 5 ,_FUNC_IDERGBMIXER_STRING_SLIDER,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17274,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17276,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 8 ,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 13 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,17276,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len("B: ",3)); if (new_error) goto skip5979; makefit(tqbs); qbs_print(tqbs,0); skip5979: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17276,"ide_methods.bas");}while(r); do{ qbg_sub_color( 9 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17277,"ide_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_string( 46 , 196 )); if (new_error) goto skip5980; makefit(tqbs); qbs_print(tqbs,0); skip5980: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17277,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 197 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17278,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_T=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17279,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_R=qbr(((*_FUNC_IDERGBMIXER_LONG_T/ ((long double)( 255 )))* 46 )); if(!qbevent)break;evnt(25753,17279,"ide_methods.bas");}while(r); S_54120:; if ((-(*_FUNC_IDERGBMIXER_LONG_T== 0 ))||new_error){ if(qbevent){evnt(25753,17280,"ide_methods.bas");if(r)goto S_54120;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 195 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17280,"ide_methods.bas");}while(r); } S_54123:; if ((-(*_FUNC_IDERGBMIXER_LONG_T== 255 ))||new_error){ if(qbevent){evnt(25753,17281,"ide_methods.bas");if(r)goto S_54123;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_SLIDER,func_chr( 180 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17281,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 +*_FUNC_IDERGBMIXER_LONG_R,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 8 ,_FUNC_IDERGBMIXER_STRING_SLIDER,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17282,"ide_methods.bas");}while(r); do{ qbg_sub_color( 0 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17284,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 19 ,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 9 ,qbs_new_txt_len("Hold CTRL to drag all sliders at once.",38),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17284,"ide_methods.bas");}while(r); do{ qbg_sub_color( 12 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,17286,"ide_methods.bas");}while(r); S_54130:; fornext_value5982= 2 ; fornext_finalvalue5982= 8 ; fornext_step5982= 1 ; if (fornext_step5982<0) fornext_step_negative5982=1; else fornext_step_negative5982=0; if (new_error) goto fornext_error5982; goto fornext_entrylabel5982; while(1){ fornext_value5982=fornext_step5982+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5982: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5982; if (fornext_step_negative5982){ if (fornext_value5982fornext_finalvalue5982) break; } fornext_error5982:; if(qbevent){evnt(25753,17287,"ide_methods.bas");if(r)goto S_54130;} do{ sub__printstring(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 2 ,*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+*_FUNC_IDERGBMIXER_LONG_I,func_string( 10 , 219 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17288,"ide_methods.bas");}while(r); fornext_continue_5981:; } fornext_exit_5981:; do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,17293,"ide_methods.bas");}while(r); S_54134:; if ((*_FUNC_IDERGBMIXER_LONG_CX)||new_error){ if(qbevent){evnt(25753,17294,"ide_methods.bas");if(r)goto S_54134;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17294,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDERGBMIXER_LONG_CY,*_FUNC_IDERGBMIXER_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,17294,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17294,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,17297,"ide_methods.bas");}while(r); S_54140:; do{ if(qbevent){evnt(25753,17298,"ide_methods.bas");if(r)goto S_54140;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,17299,"ide_methods.bas");}while(r); S_54142:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,17300,"ide_methods.bas");if(r)goto S_54142;} do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17300,"ide_methods.bas");}while(r); } S_54145:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,17301,"ide_methods.bas");if(r)goto S_54145;} do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17301,"ide_methods.bas");}while(r); } S_54148:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,17302,"ide_methods.bas");if(r)goto S_54148;} do{ *_FUNC_IDERGBMIXER_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,17302,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17302,"ide_methods.bas");}while(r); } S_54152:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,17303,"ide_methods.bas");if(r)goto S_54152;} do{ *_FUNC_IDERGBMIXER_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,17303,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17303,"ide_methods.bas");}while(r); } S_54156:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,17304,"ide_methods.bas");if(r)goto S_54156;} do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17304,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,17305,"ide_methods.bas");}while(r); S_54160:; if ((-(*_FUNC_IDERGBMIXER_LONG_ALT!=*_FUNC_IDERGBMIXER_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,17305,"ide_methods.bas");if(r)goto S_54160;} do{ *_FUNC_IDERGBMIXER_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17305,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_OLDALT=*_FUNC_IDERGBMIXER_LONG_ALT; if(!qbevent)break;evnt(25753,17306,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,17307,"ide_methods.bas");}while(r); S_54165:; dl_continue_5983:; }while((!(*_FUNC_IDERGBMIXER_LONG_CHANGE))&&(!new_error)); dl_exit_5983:; if(qbevent){evnt(25753,17308,"ide_methods.bas");if(r)goto S_54165;} S_54166:; if ((*_FUNC_IDERGBMIXER_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,17309,"ide_methods.bas");if(r)goto S_54166;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,17309,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,17309,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDERGBMIXER_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17311,"ide_methods.bas");}while(r); S_54172:; if ((*_FUNC_IDERGBMIXER_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,17312,"ide_methods.bas");if(r)goto S_54172;} S_54173:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,17313,"ide_methods.bas");if(r)goto S_54173;} do{ *_FUNC_IDERGBMIXER_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17314,"ide_methods.bas");}while(r); S_54175:; if (((-(*_FUNC_IDERGBMIXER_LONG_K>= 65 ))&(-(*_FUNC_IDERGBMIXER_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,17315,"ide_methods.bas");if(r)goto S_54175;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_ALTLETTER,func_chr(*_FUNC_IDERGBMIXER_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17315,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17318,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,17318,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17318,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,17322,"ide_methods.bas");}while(r); S_54184:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,17323,"ide_methods.bas");if(r)goto S_54184;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17323,"ide_methods.bas");}while(r); } S_54187:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,17324,"ide_methods.bas");if(r)goto S_54187;} do{ *_FUNC_IDERGBMIXER_LONG_FOCUS=*_FUNC_IDERGBMIXER_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,17324,"ide_methods.bas");}while(r); } S_54190:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,17325,"ide_methods.bas");if(r)goto S_54190;} do{ *_FUNC_IDERGBMIXER_LONG_FOCUS=*_FUNC_IDERGBMIXER_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,17325,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17325,"ide_methods.bas");}while(r); } S_54194:; if ((-(*_FUNC_IDERGBMIXER_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,17326,"ide_methods.bas");if(r)goto S_54194;} do{ *_FUNC_IDERGBMIXER_LONG_FOCUS=*_FUNC_IDERGBMIXER_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,17326,"ide_methods.bas");}while(r); } S_54197:; if ((-(*_FUNC_IDERGBMIXER_LONG_FOCUS>*_FUNC_IDERGBMIXER_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,17327,"ide_methods.bas");if(r)goto S_54197;} do{ *_FUNC_IDERGBMIXER_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,17327,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_F= 1 ; if(!qbevent)break;evnt(25753,17328,"ide_methods.bas");}while(r); S_54201:; fornext_value5986= 1 ; fornext_finalvalue5986= 100 ; fornext_step5986= 1 ; if (fornext_step5986<0) fornext_step_negative5986=1; else fornext_step_negative5986=0; if (new_error) goto fornext_error5986; goto fornext_entrylabel5986; while(1){ fornext_value5986=fornext_step5986+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5986: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5986; if (fornext_step_negative5986){ if (fornext_value5986fornext_finalvalue5986) break; } fornext_error5986:; if(qbevent){evnt(25753,17329,"ide_methods.bas");if(r)goto S_54201;} do{ *_FUNC_IDERGBMIXER_LONG_T=*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,17330,"ide_methods.bas");}while(r); S_54203:; if ((*_FUNC_IDERGBMIXER_LONG_T)||new_error){ if(qbevent){evnt(25753,17331,"ide_methods.bas");if(r)goto S_54203;} do{ *_FUNC_IDERGBMIXER_LONG_FOCUSOFFSET=*_FUNC_IDERGBMIXER_LONG_FOCUS-*_FUNC_IDERGBMIXER_LONG_F; if(!qbevent)break;evnt(25753,17332,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDERGBMIXER_LONG_I)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89) ),_FUNC_IDERGBMIXER_LONG_FOCUS,_FUNC_IDERGBMIXER_LONG_F,_FUNC_IDERGBMIXER_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDERGBMIXER_STRING_ALTLETTER,__LONG_MB,_FUNC_IDERGBMIXER_LONG_MOUSEDOWN,_FUNC_IDERGBMIXER_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDERGBMIXER_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17333,"ide_methods.bas");}while(r); } fornext_continue_5985:; } fornext_exit_5985:; S_54208:; if ((-(*_FUNC_IDERGBMIXER_LONG_FOCUS!=*_FUNC_IDERGBMIXER_LONG_PREVFOCUS))||new_error){ if(qbevent){evnt(25753,17339,"ide_methods.bas");if(r)goto S_54208;} do{ *_FUNC_IDERGBMIXER_LONG_PREVFOCUS=*_FUNC_IDERGBMIXER_LONG_FOCUS; if(!qbevent)break;evnt(25753,17341,"ide_methods.bas");}while(r); S_54210:; if (((-(*_FUNC_IDERGBMIXER_LONG_FOCUS>= 1 ))&(-(*_FUNC_IDERGBMIXER_LONG_FOCUS<= 3 )))||new_error){ if(qbevent){evnt(25753,17342,"ide_methods.bas");if(r)goto S_54210;} do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17343,"ide_methods.bas");}while(r); S_54212:; if ((-(*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))> 0 ))||new_error){ if(qbevent){evnt(25753,17344,"ide_methods.bas");if(r)goto S_54212;} do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17344,"ide_methods.bas");}while(r); } do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17345,"ide_methods.bas");}while(r); } } S_54218:; if ((*__LONG_MB&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 2 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 + 46 ))))||new_error){ if(qbevent){evnt(25753,17349,"ide_methods.bas");if(r)goto S_54218;} do{ *_FUNC_IDERGBMIXER_LONG_NEWVALUE=qbr((*__LONG_MX-*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))- 15 )*( 255 / ((long double)( 46 )))); if(!qbevent)break;evnt(25753,17350,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17351,"ide_methods.bas");}while(r); S_54221:; if ((func__keydown( 100305 )|func__keydown( 100306 ))||new_error){ if(qbevent){evnt(25753,17352,"ide_methods.bas");if(r)goto S_54221;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17353,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17354,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,17356,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17357,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17358,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17359,"ide_methods.bas");}while(r); } S_54230:; if ((*__LONG_MB&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 5 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 + 46 ))))||new_error){ if(qbevent){evnt(25753,17362,"ide_methods.bas");if(r)goto S_54230;} do{ *_FUNC_IDERGBMIXER_LONG_NEWVALUE=qbr((*__LONG_MX-*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))- 15 )*( 255 / ((long double)( 46 )))); if(!qbevent)break;evnt(25753,17363,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17364,"ide_methods.bas");}while(r); S_54233:; if ((func__keydown( 100305 )|func__keydown( 100306 ))||new_error){ if(qbevent){evnt(25753,17365,"ide_methods.bas");if(r)goto S_54233;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17366,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17367,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_FOCUS= 2 ; if(!qbevent)break;evnt(25753,17369,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17370,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17371,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17372,"ide_methods.bas");}while(r); } S_54242:; if ((*__LONG_MB&(-(*__LONG_MY==(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(4))+ 8 )))&(-(*__LONG_MX>=(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 )))&(-(*__LONG_MX<=(*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))+ 15 + 46 ))))||new_error){ if(qbevent){evnt(25753,17375,"ide_methods.bas");if(r)goto S_54242;} do{ *_FUNC_IDERGBMIXER_LONG_NEWVALUE=qbr((*__LONG_MX-*(int32*)(((char*)_FUNC_IDERGBMIXER_UDT_P)+(0))- 15 )*( 255 / ((long double)( 46 )))); if(!qbevent)break;evnt(25753,17376,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17377,"ide_methods.bas");}while(r); S_54245:; if ((func__keydown( 100305 )|func__keydown( 100306 ))||new_error){ if(qbevent){evnt(25753,17378,"ide_methods.bas");if(r)goto S_54245;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17379,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(_FUNC_IDERGBMIXER_LONG_NEWVALUE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17380,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_FOCUS= 3 ; if(!qbevent)break;evnt(25753,17382,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17383,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17384,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17385,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_CHANGEDWITHKEYS= 0 ; if(!qbevent)break;evnt(25753,17388,"ide_methods.bas");}while(r); S_54255:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 72 )))))&(((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 1 ))|(-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 2 ))|(-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 3 ))))))||new_error){ if(qbevent){evnt(25753,17389,"ide_methods.bas");if(r)goto S_54255;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5991=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))+ 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17390,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17391,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17391,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17391,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CHANGEDWITHKEYS= -1 ; if(!qbevent)break;evnt(25753,17392,"ide_methods.bas");}while(r); } S_54262:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,(qbs_add(func_chr( 0 ),func_chr( 80 )))))&(((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 1 ))|(-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 2 ))|(-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 3 ))))))||new_error){ if(qbevent){evnt(25753,17395,"ide_methods.bas");if(r)goto S_54262;} do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),FUNC_STR2(&(pass5993=qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))- 1 )))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17396,"ide_methods.bas");}while(r); do{ *(int8*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+76))= -1 ; if(!qbevent)break;evnt(25753,17397,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+77))= 0 ; if(!qbevent)break;evnt(25753,17397,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+81))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_FOCUS)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len; if(!qbevent)break;evnt(25753,17397,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_CHANGEDWITHKEYS= -1 ; if(!qbevent)break;evnt(25753,17398,"ide_methods.bas");}while(r); } S_54269:; fornext_value5996= 1 ; fornext_finalvalue5996= 3 ; fornext_step5996= 1 ; if (fornext_step5996<0) fornext_step_negative5996=1; else fornext_step_negative5996=0; if (new_error) goto fornext_error5996; goto fornext_entrylabel5996; while(1){ fornext_value5996=fornext_step5996+(*_FUNC_IDERGBMIXER_LONG_CHECKRGB); fornext_entrylabel5996: *_FUNC_IDERGBMIXER_LONG_CHECKRGB=fornext_value5996; if (fornext_step_negative5996){ if (fornext_value5996fornext_finalvalue5996) break; } fornext_error5996:; if(qbevent){evnt(25753,17402,"ide_methods.bas");if(r)goto S_54269;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_CHECKRGB)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17403,"ide_methods.bas");}while(r); S_54271:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDERGBMIXER_STRING_A->len> 3 )))||new_error){ if(qbevent){evnt(25753,17404,"ide_methods.bas");if(r)goto S_54271;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_left(_FUNC_IDERGBMIXER_STRING_A, 3 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17404,"ide_methods.bas");}while(r); } S_54274:; fornext_value5999= 1 ; fornext_finalvalue5999=_FUNC_IDERGBMIXER_STRING_A->len; fornext_step5999= 1 ; if (fornext_step5999<0) fornext_step_negative5999=1; else fornext_step_negative5999=0; if (new_error) goto fornext_error5999; goto fornext_entrylabel5999; while(1){ fornext_value5999=fornext_step5999+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel5999: *_FUNC_IDERGBMIXER_LONG_I=fornext_value5999; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative5999){ if (fornext_value5999fornext_finalvalue5999) break; } fornext_error5999:; if(qbevent){evnt(25753,17405,"ide_methods.bas");if(r)goto S_54274;} do{ *_FUNC_IDERGBMIXER_LONG_A=qbs_asc(_FUNC_IDERGBMIXER_STRING_A,*_FUNC_IDERGBMIXER_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17406,"ide_methods.bas");}while(r); S_54276:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDERGBMIXER_LONG_I== 2 ))&(-(qbs_asc(_FUNC_IDERGBMIXER_STRING_A, 1 )== 48 ))))||new_error){ if(qbevent){evnt(25753,17407,"ide_methods.bas");if(r)goto S_54276;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17407,"ide_methods.bas");}while(r); do{ goto fornext_exit_5998; if(!qbevent)break;evnt(25753,17407,"ide_methods.bas");}while(r); } S_54280:; if (((-(*_FUNC_IDERGBMIXER_LONG_A< 48 ))|(-(*_FUNC_IDERGBMIXER_LONG_A> 57 )))||new_error){ if(qbevent){evnt(25753,17408,"ide_methods.bas");if(r)goto S_54280;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17408,"ide_methods.bas");}while(r); do{ goto fornext_exit_5998; if(!qbevent)break;evnt(25753,17408,"ide_methods.bas");}while(r); } fornext_continue_5998:; } fornext_exit_5998:; S_54285:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDERGBMIXER_STRING_A->len))||new_error){ if(qbevent){evnt(25753,17410,"ide_methods.bas");if(r)goto S_54285;} do{ *_FUNC_IDERGBMIXER_LONG_A=qbr(func_val(_FUNC_IDERGBMIXER_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17411,"ide_methods.bas");}while(r); S_54287:; if ((-(*_FUNC_IDERGBMIXER_LONG_A> 255 ))||new_error){ if(qbevent){evnt(25753,17412,"ide_methods.bas");if(r)goto S_54287;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("255",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17412,"ide_methods.bas");}while(r); } S_54290:; if ((-(*_FUNC_IDERGBMIXER_LONG_A< 0 ))||new_error){ if(qbevent){evnt(25753,17413,"ide_methods.bas");if(r)goto S_54290;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17413,"ide_methods.bas");}while(r); } }else{ S_54294:; if ((-(*_FUNC_IDERGBMIXER_LONG_CHANGEDWITHKEYS== -1 ))||new_error){ if(qbevent){evnt(25753,17415,"ide_methods.bas");if(r)goto S_54294;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_A,qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17415,"ide_methods.bas");}while(r); } } do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDERGBMIXER_LONG_CHECKRGB)-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDERGBMIXER_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17417,"ide_methods.bas");}while(r); fornext_continue_5995:; } fornext_exit_5995:; do{ *_FUNC_IDERGBMIXER_ULONG_CURRENTCOLOR=func__rgb32(qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))),qbr(func_val(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17420,"ide_methods.bas");}while(r); S_54301:; if ((qbs_cleanup(qbs_tmp_base,*_FUNC_IDERGBMIXER_BYTE_NEWSYNTAX&((qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))&(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))))))||new_error){ if(qbevent){evnt(25753,17421,"ide_methods.bas");if(r)goto S_54301;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17422,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,qbs_add(qbs_add(qbs_add(qbs_add(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),qbs_new_txt_len(", ",2)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(", ",2)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17424,"ide_methods.bas");}while(r); } do{ sub__palettecolor( 12 ,*_FUNC_IDERGBMIXER_ULONG_CURRENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,17426,"ide_methods.bas");}while(r); S_54307:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 6 ))&(-(*_FUNC_IDERGBMIXER_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,17428,"ide_methods.bas");if(r)goto S_54307;} do{ *__LONG_IDESELECT=*_FUNC_IDERGBMIXER_LONG_PREV__ASCII_CHR_046__IDESELECT; if(!qbevent)break;evnt(25753,17429,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17430,"ide_methods.bas");}while(r); } S_54311:; if ((((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 5 ))&(-(*_FUNC_IDERGBMIXER_LONG_INFO!= 0 ))))||new_error){ if(qbevent){evnt(25753,17433,"ide_methods.bas");if(r)goto S_54311;} S_54312:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))&(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))))))||new_error){ if(qbevent){evnt(25753,17435,"ide_methods.bas");if(r)goto S_54312;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,qbs_add(qbs_add(qbs_new_txt_len("_RGB32(",7),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17436,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_RGB32(",7),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(", ",2)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(", ",2)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17438,"ide_methods.bas");}while(r); } do{ sub__clipboard(_FUNC_IDERGBMIXER_STRING_CURRENTRGB); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17441,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT=*_FUNC_IDERGBMIXER_LONG_PREV__ASCII_CHR_046__IDESELECT; if(!qbevent)break;evnt(25753,17442,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17443,"ide_methods.bas");}while(r); } S_54321:; if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 4 ))&(-(*_FUNC_IDERGBMIXER_LONG_INFO!= 0 )))|((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 1 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 2 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 3 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDERGBMIXER_LONG_FOCUS== 4 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))))||new_error){ if(qbevent){evnt(25753,17450,"ide_methods.bas");if(r)goto S_54321;} S_54322:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,17451,"ide_methods.bas");if(r)goto S_54322;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17451,"ide_methods.bas");}while(r); } S_54325:; if ((*_FUNC_IDERGBMIXER_LONG_EDITING)||new_error){ if(qbevent){evnt(25753,17452,"ide_methods.bas");if(r)goto S_54325;} S_54326:; if ((-(*_FUNC_IDERGBMIXER_LONG_INSERTRGBAT> 0 ))||new_error){ if(qbevent){evnt(25753,17454,"ide_methods.bas");if(r)goto S_54326;} do{ *_FUNC_IDERGBMIXER_LONG_FINDBRACKET1=func_instr(*_FUNC_IDERGBMIXER_LONG_INSERTRGBAT,_FUNC_IDERGBMIXER_STRING_CURRENTLINE,qbs_new_txt_len("(",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17455,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_FINDBRACKET2=func_instr(*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1,_FUNC_IDERGBMIXER_STRING_CURRENTLINE,qbs_new_txt_len(")",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17456,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_OLDRGB,func_mid(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1,*_FUNC_IDERGBMIXER_LONG_FINDBRACKET2-*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17457,"ide_methods.bas");}while(r); S_54330:; if ((qbs_cleanup(qbs_tmp_base,((*_FUNC_IDERGBMIXER_BYTE_NEWSYNTAX&(-(FUNC_COUNTITEMS(_FUNC_IDERGBMIXER_STRING_OLDRGB,qbs_new_txt_len(",",1))== 1 ))))|(-(FUNC_COUNTITEMS(_FUNC_IDERGBMIXER_STRING_OLDRGB,qbs_new_txt_len(",",1))== 3 ))))||new_error){ if(qbevent){evnt(25753,17458,"ide_methods.bas");if(r)goto S_54330;} S_54331:; fornext_value6003=*_FUNC_IDERGBMIXER_LONG_FINDBRACKET2; fornext_finalvalue6003=*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1; fornext_step6003= -1 ; if (fornext_step6003<0) fornext_step_negative6003=1; else fornext_step_negative6003=0; if (new_error) goto fornext_error6003; goto fornext_entrylabel6003; while(1){ fornext_value6003=fornext_step6003+(*_FUNC_IDERGBMIXER_LONG_I); fornext_entrylabel6003: *_FUNC_IDERGBMIXER_LONG_I=fornext_value6003; if (fornext_step_negative6003){ if (fornext_value6003fornext_finalvalue6003) break; } fornext_error6003:; if(qbevent){evnt(25753,17459,"ide_methods.bas");if(r)goto S_54331;} S_54332:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,*_FUNC_IDERGBMIXER_LONG_I)== 44 )))||new_error){ if(qbevent){evnt(25753,17460,"ide_methods.bas");if(r)goto S_54332;} do{ *_FUNC_IDERGBMIXER_LONG_FINDBRACKET2=*_FUNC_IDERGBMIXER_LONG_I; if(!qbevent)break;evnt(25753,17460,"ide_methods.bas");}while(r); do{ goto fornext_exit_6002; if(!qbevent)break;evnt(25753,17460,"ide_methods.bas");}while(r); } fornext_continue_6002:; } fornext_exit_6002:; } do{ qbs_set(_FUNC_IDERGBMIXER_STRING_NEWLINE,qbs_left(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17463,"ide_methods.bas");}while(r); S_54339:; if ((-(*_FUNC_IDERGBMIXER_LONG_FINDBRACKET2== 0 ))||new_error){ if(qbevent){evnt(25753,17464,"ide_methods.bas");if(r)goto S_54339;} do{ *_FUNC_IDERGBMIXER_LONG_FINDBRACKET2=*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1; if(!qbevent)break;evnt(25753,17464,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDERGBMIXER_STRING_NEWLINE,qbs_add(_FUNC_IDERGBMIXER_STRING_NEWLINE,_FUNC_IDERGBMIXER_STRING_CURRENTRGB)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17465,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_NEWLINE,qbs_add(_FUNC_IDERGBMIXER_STRING_NEWLINE,func_mid(_FUNC_IDERGBMIXER_STRING_CURRENTLINE,*_FUNC_IDERGBMIXER_LONG_FINDBRACKET2,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17466,"ide_methods.bas");}while(r); do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,17467,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,17468,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,_FUNC_IDERGBMIXER_STRING_NEWLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17469,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTX1=*_FUNC_IDERGBMIXER_LONG_FINDBRACKET1+ 1 ; if(!qbevent)break;evnt(25753,17472,"ide_methods.bas");}while(r); do{ *__LONG_IDECX=*__LONG_IDESELECTX1+_FUNC_IDERGBMIXER_STRING_CURRENTRGB->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17473,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECTY1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,17474,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_PREV__ASCII_CHR_046__IDESELECT= 1 ; if(!qbevent)break;evnt(25753,17475,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17476,"ide_methods.bas");}while(r); } } S_54354:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDERGBMIXER_STRING_CURRENTRGB->len))||new_error){ if(qbevent){evnt(25753,17480,"ide_methods.bas");if(r)goto S_54354;} S_54355:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))))&(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])))))))||new_error){ if(qbevent){evnt(25753,17482,"ide_methods.bas");if(r)goto S_54355;} do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,qbs_add(qbs_add(qbs_new_txt_len("_RGB32(",7),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17483,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDERGBMIXER_STRING_CURRENTRGB,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_RGB32(",7),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(", ",2)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 2 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(", ",2)),((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDERGBMIXER_ARRAY_UDT_O[0])+((array_check(( 3 )-_FUNC_IDERGBMIXER_ARRAY_UDT_O[4],_FUNC_IDERGBMIXER_ARRAY_UDT_O[5]))*89+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17485,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDERGBMIXER_STRING_IDERGBMIXER,_FUNC_IDERGBMIXER_STRING_CURRENTRGB); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17489,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT=*_FUNC_IDERGBMIXER_LONG_PREV__ASCII_CHR_046__IDESELECT; if(!qbevent)break;evnt(25753,17490,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17491,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERGBMIXER_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,17496,"ide_methods.bas");}while(r); do{ *_FUNC_IDERGBMIXER_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,17497,"ide_methods.bas");}while(r); dl_continue_5972:; }while(1); dl_exit_5972:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free222.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_IDERGBMIXER_STRING_IDERGBMIXER);return _FUNC_IDERGBMIXER_STRING_IDERGBMIXER; } int32 FUNC_COUNTITEMS(qbs*_FUNC_COUNTITEMS_STRING_SEARCHSTRING,qbs*_FUNC_COUNTITEMS_STRING_ITEM){ 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 "data223.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_54368:; do{ if(qbevent){evnt(25753,17502,"ide_methods.bas");if(r)goto S_54368;} do{ *_FUNC_COUNTITEMS_LONG_FOUND=func_instr(*_FUNC_COUNTITEMS_LONG_FOUND+ 1 ,_FUNC_COUNTITEMS_STRING_SEARCHSTRING,_FUNC_COUNTITEMS_STRING_ITEM,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17503,"ide_methods.bas");}while(r); S_54370:; if ((-(*_FUNC_COUNTITEMS_LONG_FOUND== 0 ))||new_error){ if(qbevent){evnt(25753,17504,"ide_methods.bas");if(r)goto S_54370;} do{ goto dl_exit_6008; if(!qbevent)break;evnt(25753,17504,"ide_methods.bas");}while(r); } do{ *_FUNC_COUNTITEMS_LONG_TOTAL=*_FUNC_COUNTITEMS_LONG_TOTAL+ 1 ; if(!qbevent)break;evnt(25753,17505,"ide_methods.bas");}while(r); dl_continue_6008:; }while(1); dl_exit_6008:; do{ *_FUNC_COUNTITEMS_LONG_COUNTITEMS=*_FUNC_COUNTITEMS_LONG_TOTAL; if(!qbevent)break;evnt(25753,17507,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free223.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_COUNTITEMS_LONG_COUNTITEMS; } 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 "data224.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_IDERESTRICT417_LONG_X= 0 ; if(!qbevent)break;evnt(25753,17512,"ide_methods.bas");}while(r); S_54377:; if ((*_SUB_IDERESTRICT417_LONG_P417& 4 )||new_error){ if(qbevent){evnt(25753,17513,"ide_methods.bas");if(r)goto S_54377;} do{ *_SUB_IDERESTRICT417_LONG_X=*_SUB_IDERESTRICT417_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,17513,"ide_methods.bas");}while(r); } S_54380:; if ((*_SUB_IDERESTRICT417_LONG_P417& 8 )||new_error){ if(qbevent){evnt(25753,17514,"ide_methods.bas");if(r)goto S_54380;} do{ *_SUB_IDERESTRICT417_LONG_X=*_SUB_IDERESTRICT417_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,17514,"ide_methods.bas");}while(r); } S_54383:; if ((-(*_SUB_IDERESTRICT417_LONG_X> 1 ))||new_error){ if(qbevent){evnt(25753,17515,"ide_methods.bas");if(r)goto S_54383;} do{ *_SUB_IDERESTRICT417_LONG_P417=*_SUB_IDERESTRICT417_LONG_P417& 243 ; if(!qbevent)break;evnt(25753,17515,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free224.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_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 "data225.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_54386:; if ((*__LONG_MACOSX)||new_error){ if(qbevent){evnt(25753,17528,"ide_methods.bas");if(r)goto S_54386;} S_54387:; if ((func__keydown( 100309 ))||new_error){ if(qbevent){evnt(25753,17529,"ide_methods.bas");if(r)goto S_54387;} do{ *_FUNC_CTRL2_LONG_CTRL2= 1 ; if(!qbevent)break;evnt(25753,17529,"ide_methods.bas");}while(r); } S_54390:; if ((func__keydown( 100310 ))||new_error){ if(qbevent){evnt(25753,17530,"ide_methods.bas");if(r)goto S_54390;} do{ *_FUNC_CTRL2_LONG_CTRL2= 1 ; if(!qbevent)break;evnt(25753,17530,"ide_methods.bas");}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free225.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; } 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 "data226.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,17537,"ide_methods.bas");}while(r); S_54395:; if ((*__LONG_ICHECKLATER)||new_error){ if(qbevent){evnt(25753,17539,"ide_methods.bas");if(r)goto S_54395;} do{ *__LONG_ICHECKLATER= 0 ; if(!qbevent)break;evnt(25753,17539,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17539,"ide_methods.bas");}while(r); } do{ *__LONG_ICHANGED= 0 ; if(!qbevent)break;evnt(25753,17541,"ide_methods.bas");}while(r); do{ *__LONG_KSTATECHANGED= 0 ; if(!qbevent)break;evnt(25753,17542,"ide_methods.bas");}while(r); do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(25753,17543,"ide_methods.bas");}while(r); do{ *__LONG_MCLICK2= 0 ; if(!qbevent)break;evnt(25753,17543,"ide_methods.bas");}while(r); do{ *__LONG_MRELEASE= 0 ; if(!qbevent)break;evnt(25753,17543,"ide_methods.bas");}while(r); do{ *__LONG_MRELEASE2= 0 ; if(!qbevent)break;evnt(25753,17543,"ide_methods.bas");}while(r); do{ *__LONG_MWHEEL= 0 ; if(!qbevent)break;evnt(25753,17544,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17545,"ide_methods.bas");}while(r); do{ *__LONG_KB= 0 ; if(!qbevent)break;evnt(25753,17545,"ide_methods.bas");}while(r); do{ *__LONG_MOB=*__LONG_MB; if(!qbevent)break;evnt(25753,17546,"ide_methods.bas");}while(r); do{ *__LONG_MOB2=*__LONG_MB2; if(!qbevent)break;evnt(25753,17546,"ide_methods.bas");}while(r); do{ *__LONG_KOALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,17547,"ide_methods.bas");}while(r); do{ *__LONG_KALTPRESS= 0 ; if(!qbevent)break;evnt(25753,17547,"ide_methods.bas");}while(r); do{ *__LONG_KALTRELEASE= 0 ; if(!qbevent)break;evnt(25753,17547,"ide_methods.bas");}while(r); S_54413:; do{ if(qbevent){evnt(25753,17549,"ide_methods.bas");if(r)goto S_54413;} S_54414:; dl_continue_6009:; }while((!(qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_inkey(),qbs_new_txt_len("",0)))))&&(!new_error)); dl_exit_6009:; if(qbevent){evnt(25753,17549,"ide_methods.bas");if(r)goto S_54414;} do{ *_SUB_GETINPUT_LONG_K=func__keyhit(); if(!qbevent)break;evnt(25753,17551,"ide_methods.bas");}while(r); S_54416:; if (((func__keydown( 100307 )|func__keydown( 100308 ))&((-(*_SUB_GETINPUT_LONG_K>= -57 ))&(-(*_SUB_GETINPUT_LONG_K<= -48 ))))||new_error){ if(qbevent){evnt(25753,17554,"ide_methods.bas");if(r)goto S_54416;} do{ qbs_set(_SUB_GETINPUT_STRING_ASCVALUE,qbs_add(_SUB_GETINPUT_STRING_ASCVALUE,func_chr(-(*_SUB_GETINPUT_LONG_K)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17555,"ide_methods.bas");}while(r); } S_54419:; if (((~(func__keydown( 100307 )))&(~(func__keydown( 100308 ))))||new_error){ if(qbevent){evnt(25753,17557,"ide_methods.bas");if(r)goto S_54419;} S_54420:; if ((qbs_cleanup(qbs_tmp_base,_SUB_GETINPUT_STRING_ASCVALUE->len))||new_error){ if(qbevent){evnt(25753,17558,"ide_methods.bas");if(r)goto S_54420;} do{ *__LONG_KB=qbr(func_val(qbs_right(_SUB_GETINPUT_STRING_ASCVALUE, 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17559,"ide_methods.bas");}while(r); S_54422:; if (((-(*__LONG_KB> 0 ))&(-(*__LONG_KB< 256 )))||new_error){ if(qbevent){evnt(25753,17560,"ide_methods.bas");if(r)goto S_54422;} do{ qbs_set(__STRING_K,func_chr(*__LONG_KB)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17561,"ide_methods.bas");}while(r); do{ *_SUB_GETINPUT_LONG_K=*__LONG_KB; if(!qbevent)break;evnt(25753,17562,"ide_methods.bas");}while(r); do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(25753,17563,"ide_methods.bas");}while(r); do{ *__BYTE_ALTSPECIAL= -1 ; if(!qbevent)break;evnt(25753,17564,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_GETINPUT_STRING_ASCVALUE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17566,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17567,"ide_methods.bas");}while(r); } } S_54432:; if ((*_SUB_GETINPUT_LONG_K)||new_error){ if(qbevent){evnt(25753,17572,"ide_methods.bas");if(r)goto S_54432;} S_54433:; if ((-(*_SUB_GETINPUT_LONG_K< 0 ))||new_error){ if(qbevent){evnt(25753,17573,"ide_methods.bas");if(r)goto S_54433;} do{ *_SUB_GETINPUT_LONG_K=-(*_SUB_GETINPUT_LONG_K); if(!qbevent)break;evnt(25753,17573,"ide_methods.bas");}while(r); do{ *_SUB_GETINPUT_LONG_RELEASE= 1 ; if(!qbevent)break;evnt(25753,17573,"ide_methods.bas");}while(r); } S_54437:; if (((-(*_SUB_GETINPUT_LONG_K== 100304 ))|(-(*_SUB_GETINPUT_LONG_K== 100303 )))||new_error){ if(qbevent){evnt(25753,17575,"ide_methods.bas");if(r)goto S_54437;} S_54438:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(25753,17576,"ide_methods.bas");if(r)goto S_54438;} do{ *__LONG_KSHIFT= 0 ; if(!qbevent)break;evnt(25753,17576,"ide_methods.bas");}while(r); }else{ do{ *__LONG_KSHIFT= -1 ; if(!qbevent)break;evnt(25753,17576,"ide_methods.bas");}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(25753,17577,"ide_methods.bas");}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(25753,17577,"ide_methods.bas");}while(r); } S_54446:; if (((-(*_SUB_GETINPUT_LONG_K== 100308 ))|(-(*_SUB_GETINPUT_LONG_K== 100307 )))||new_error){ if(qbevent){evnt(25753,17579,"ide_methods.bas");if(r)goto S_54446;} S_54447:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(25753,17580,"ide_methods.bas");if(r)goto S_54447;} do{ *__LONG_KALT= 0 ; if(!qbevent)break;evnt(25753,17581,"ide_methods.bas");}while(r); do{ *__LONG_KALTRELEASE= -1 ; if(!qbevent)break;evnt(25753,17581,"ide_methods.bas");}while(r); }else{ do{ *__LONG_KALT= -1 ; if(!qbevent)break;evnt(25753,17583,"ide_methods.bas");}while(r); do{ *__LONG_KALTPRESS= -1 ; if(!qbevent)break;evnt(25753,17583,"ide_methods.bas");}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(25753,17585,"ide_methods.bas");}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(25753,17585,"ide_methods.bas");}while(r); } S_54457:; if (((-(*_SUB_GETINPUT_LONG_K== 100306 ))|(-(*_SUB_GETINPUT_LONG_K== 100305 )))||new_error){ if(qbevent){evnt(25753,17587,"ide_methods.bas");if(r)goto S_54457;} S_54458:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(25753,17588,"ide_methods.bas");if(r)goto S_54458;} do{ *__LONG_KCTRL= 0 ; if(!qbevent)break;evnt(25753,17588,"ide_methods.bas");}while(r); do{ *__LONG_KCONTROL= 0 ; if(!qbevent)break;evnt(25753,17588,"ide_methods.bas");}while(r); }else{ do{ *__LONG_KCTRL= -1 ; if(!qbevent)break;evnt(25753,17588,"ide_methods.bas");}while(r); do{ *__LONG_KCONTROL= -1 ; if(!qbevent)break;evnt(25753,17588,"ide_methods.bas");}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(25753,17589,"ide_methods.bas");}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(25753,17589,"ide_methods.bas");}while(r); } S_54468:; if (((-(*_SUB_GETINPUT_LONG_K== 100310 ))|(-(*_SUB_GETINPUT_LONG_K== 100309 )))||new_error){ if(qbevent){evnt(25753,17591,"ide_methods.bas");if(r)goto S_54468;} S_54469:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 1 ))||new_error){ if(qbevent){evnt(25753,17592,"ide_methods.bas");if(r)goto S_54469;} do{ *__LONG_KCONTROL= 0 ; if(!qbevent)break;evnt(25753,17592,"ide_methods.bas");}while(r); }else{ do{ *__LONG_KCONTROL= -1 ; if(!qbevent)break;evnt(25753,17592,"ide_methods.bas");}while(r); } do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(25753,17593,"ide_methods.bas");}while(r); do{ *__LONG_KSTATECHANGED= -1 ; if(!qbevent)break;evnt(25753,17593,"ide_methods.bas");}while(r); } S_54477:; if ((-(*_SUB_GETINPUT_LONG_RELEASE== 0 ))||new_error){ if(qbevent){evnt(25753,17596,"ide_methods.bas");if(r)goto S_54477;} do{ *__LONG_ICHANGED= -1 ; if(!qbevent)break;evnt(25753,17597,"ide_methods.bas");}while(r); S_54479:; if ((-(*_SUB_GETINPUT_LONG_K<= 255 ))||new_error){ if(qbevent){evnt(25753,17598,"ide_methods.bas");if(r)goto S_54479;} do{ qbs_set(__STRING_K,func_chr(*_SUB_GETINPUT_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17598,"ide_methods.bas");}while(r); } S_54482:; if (((-(*_SUB_GETINPUT_LONG_K>= 256 ))&(-(*_SUB_GETINPUT_LONG_K<= 65535 ))&((-((*_SUB_GETINPUT_LONG_K& 255 )== 0 ))))||new_error){ if(qbevent){evnt(25753,17599,"ide_methods.bas");if(r)goto S_54482;} 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(25753,17599,"ide_methods.bas");}while(r); } do{ *__LONG_KB=*_SUB_GETINPUT_LONG_K; if(!qbevent)break;evnt(25753,17600,"ide_methods.bas");}while(r); } S_54487:; if ((*__LONG_ICHANGED)||new_error){ if(qbevent){evnt(25753,17602,"ide_methods.bas");if(r)goto S_54487;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17602,"ide_methods.bas");}while(r); } } S_54491:; while((func__mouseinput(NULL,0))||new_error){ if(qbevent){evnt(25753,17604,"ide_methods.bas");if(r)goto S_54491;} do{ *__LONG_ICHANGED= 1 ; if(!qbevent)break;evnt(25753,17605,"ide_methods.bas");}while(r); S_54493:; if ((*__BYTE_MOUSEBUTTONSWAPPED)||new_error){ if(qbevent){evnt(25753,17606,"ide_methods.bas");if(r)goto S_54493;} do{ *__LONG_MB=func__mousebutton( 2 ,NULL,0); if(!qbevent)break;evnt(25753,17607,"ide_methods.bas");}while(r); do{ *__LONG_MB2=func__mousebutton( 1 ,NULL,0); if(!qbevent)break;evnt(25753,17607,"ide_methods.bas");}while(r); }else{ do{ *__LONG_MB=func__mousebutton( 1 ,NULL,0); if(!qbevent)break;evnt(25753,17609,"ide_methods.bas");}while(r); do{ *__LONG_MB2=func__mousebutton( 2 ,NULL,0); if(!qbevent)break;evnt(25753,17609,"ide_methods.bas");}while(r); } do{ *__LONG_MWHEEL=*__LONG_MWHEEL+func__mousewheel(NULL,0); if(!qbevent)break;evnt(25753,17611,"ide_methods.bas");}while(r); do{ *__LONG_MX=qbr(func__mousex(NULL,0)); if(!qbevent)break;evnt(25753,17612,"ide_methods.bas");}while(r); do{ *__LONG_MY=qbr(func__mousey(NULL,0)); if(!qbevent)break;evnt(25753,17612,"ide_methods.bas");}while(r); S_54503:; if (((-(*__LONG_MB!= 0 ))&(-(*__LONG_MOB== 0 )))||new_error){ if(qbevent){evnt(25753,17613,"ide_methods.bas");if(r)goto S_54503;} do{ *__LONG_MCLICK= -1 ; if(!qbevent)break;evnt(25753,17613,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17613,"ide_methods.bas");}while(r); } S_54507:; if (((-(*__LONG_MB2!= 0 ))&(-(*__LONG_MOB2== 0 )))||new_error){ if(qbevent){evnt(25753,17614,"ide_methods.bas");if(r)goto S_54507;} do{ *__LONG_MCLICK2= -1 ; if(!qbevent)break;evnt(25753,17614,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17614,"ide_methods.bas");}while(r); } S_54511:; if (((-(*__LONG_MB== 0 ))&(-(*__LONG_MOB!= 0 )))||new_error){ if(qbevent){evnt(25753,17615,"ide_methods.bas");if(r)goto S_54511;} do{ *__LONG_MRELEASE= -1 ; if(!qbevent)break;evnt(25753,17615,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17615,"ide_methods.bas");}while(r); } S_54515:; if (((-(*__LONG_MB2== 0 ))&(-(*__LONG_MOB2!= 0 )))||new_error){ if(qbevent){evnt(25753,17616,"ide_methods.bas");if(r)goto S_54515;} do{ *__LONG_MRELEASE2= -1 ; if(!qbevent)break;evnt(25753,17616,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17616,"ide_methods.bas");}while(r); } dl_continue_6011:; } dl_exit_6011:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free226.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_CLEARMOUSE(){ 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 "data227.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_ICHANGED= 0 ; if(!qbevent)break;evnt(25753,17621,"ide_methods.bas");}while(r); do{ *__LONG_MB= 0 ; if(!qbevent)break;evnt(25753,17622,"ide_methods.bas");}while(r); do{ *__LONG_MB2= 0 ; if(!qbevent)break;evnt(25753,17623,"ide_methods.bas");}while(r); do{ *__LONG_MCLICK= 0 ; if(!qbevent)break;evnt(25753,17624,"ide_methods.bas");}while(r); do{ *__LONG_MRELEASE= 0 ; if(!qbevent)break;evnt(25753,17625,"ide_methods.bas");}while(r); S_54525:; while((func__mousebutton( 1 ,NULL,0)|func__mousebutton( 2 ,NULL,0))||new_error){ if(qbevent){evnt(25753,17626,"ide_methods.bas");if(r)goto S_54525;} do{ *_SUB_CLEARMOUSE_LONG_I=func__mouseinput(NULL,0); if(!qbevent)break;evnt(25753,17627,"ide_methods.bas");}while(r); dl_continue_6012:; } dl_exit_6012:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free227.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 "data228.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,17634,"ide_methods.bas");}while(r); S_54529:; 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(25753,17635,"ide_methods.bas");if(r)goto S_54529;} do{ *_SUB_HELP_SHOWTEXT_LONG_SETUP= 1 ; if(!qbevent)break;evnt(25753,17636,"ide_methods.bas");}while(r); S_54531:; if ((-(*__BYTE_IDECONTEXTHELPSF== 0 ))||new_error){ if(qbevent){evnt(25753,17637,"ide_methods.bas");if(r)goto S_54531;} 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(25753,17638,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_SUB_HELP_SHOWTEXT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17639,"ide_methods.bas");}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(25753,17643,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,17645,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_SY=*__LONG_HELP_WY1; if(!qbevent)break;evnt(25753,17654,"ide_methods.bas");}while(r); S_54539:; fornext_value6014=*__LONG_HELP_SY; fornext_finalvalue6014=*__LONG_HELP_SY+*__LONG_HELP_WH- 1 ; fornext_step6014= 1 ; if (fornext_step6014<0) fornext_step_negative6014=1; else fornext_step_negative6014=0; if (new_error) goto fornext_error6014; goto fornext_entrylabel6014; while(1){ fornext_value6014=fornext_step6014+(*_SUB_HELP_SHOWTEXT_LONG_Y); fornext_entrylabel6014: *_SUB_HELP_SHOWTEXT_LONG_Y=fornext_value6014; if (fornext_step_negative6014){ if (fornext_value6014fornext_finalvalue6014) break; } fornext_error6014:; if(qbevent){evnt(25753,17655,"ide_methods.bas");if(r)goto S_54539;} S_54540:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_H))||new_error){ if(qbevent){evnt(25753,17656,"ide_methods.bas");if(r)goto S_54540;} 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(25753,17658,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X=*_SUB_HELP_SHOWTEXT_LONG_L; if(!qbevent)break;evnt(25753,17659,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3= 1 ; if(!qbevent)break;evnt(25753,17660,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_SX=*__LONG_HELP_WX1; if(!qbevent)break;evnt(25753,17662,"ide_methods.bas");}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(25753,17663,"ide_methods.bas");}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(25753,17663,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_SUB_HELP_SHOWTEXT_LONG_SY,*_SUB_HELP_SHOWTEXT_LONG_SX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,17664,"ide_methods.bas");}while(r); S_54548:; while((!(-(*_SUB_HELP_SHOWTEXT_LONG_C== 13 )))||new_error){ if(qbevent){evnt(25753,17665,"ide_methods.bas");if(r)goto S_54548;} do{ qbg_sub_color(*_SUB_HELP_SHOWTEXT_LONG_COL& 15 ,*_SUB_HELP_SHOWTEXT_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(25753,17666,"ide_methods.bas");}while(r); S_54550:; if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(25753,17667,"ide_methods.bas");if(r)goto S_54550;} S_54551:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(25753,17668,"ide_methods.bas");if(r)goto S_54551;} S_54552:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(25753,17669,"ide_methods.bas");if(r)goto S_54552;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,17670,"ide_methods.bas");}while(r); } } } S_54557:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SX))||new_error){ if(qbevent){evnt(25753,17674,"ide_methods.bas");if(r)goto S_54557;} S_54558:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_SX<=*__LONG_HELP_WX2))||new_error){ if(qbevent){evnt(25753,17675,"ide_methods.bas");if(r)goto S_54558;} do{ tqbs=qbs_new(0,0); qbs_set(tqbs,func_chr(*_SUB_HELP_SHOWTEXT_LONG_C)); if (new_error) goto skip6016; makefit(tqbs); qbs_print(tqbs,0); skip6016: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17676,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_SX=*_SUB_HELP_SHOWTEXT_LONG_SX+ 1 ; if(!qbevent)break;evnt(25753,17677,"ide_methods.bas");}while(r); } } do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ; if(!qbevent)break;evnt(25753,17680,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X=*_SUB_HELP_SHOWTEXT_LONG_X+ 4 ; if(!qbevent)break;evnt(25753,17680,"ide_methods.bas");}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(25753,17680,"ide_methods.bas");}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(25753,17680,"ide_methods.bas");}while(r); dl_continue_6015:; } dl_exit_6015:; 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(25753,17683,"ide_methods.bas");}while(r); S_54569:; fornext_value6018= 1 ; fornext_finalvalue6018=*__LONG_HELP_WX2-func_pos( 0 )+ 1 ; fornext_step6018= 1 ; if (fornext_step6018<0) fornext_step_negative6018=1; else fornext_step_negative6018=0; if (new_error) goto fornext_error6018; goto fornext_entrylabel6018; while(1){ fornext_value6018=fornext_step6018+(*_SUB_HELP_SHOWTEXT_LONG_X4); fornext_entrylabel6018: *_SUB_HELP_SHOWTEXT_LONG_X4=fornext_value6018; if (fornext_step_negative6018){ if (fornext_value6018fornext_finalvalue6018) break; } fornext_error6018:; if(qbevent){evnt(25753,17685,"ide_methods.bas");if(r)goto S_54569;} S_54570:; if ((-(*_SUB_HELP_SHOWTEXT_LONG_COL== 0 ))||new_error){ if(qbevent){evnt(25753,17686,"ide_methods.bas");if(r)goto S_54570;} do{ *_SUB_HELP_SHOWTEXT_LONG_COL= 7 ; if(!qbevent)break;evnt(25753,17686,"ide_methods.bas");}while(r); } do{ qbg_sub_color(*_SUB_HELP_SHOWTEXT_LONG_COL& 15 ,*_SUB_HELP_SHOWTEXT_LONG_COL/ 16 ,NULL,3); if(!qbevent)break;evnt(25753,17687,"ide_methods.bas");}while(r); S_54574:; if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(25753,17688,"ide_methods.bas");if(r)goto S_54574;} S_54575:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(25753,17689,"ide_methods.bas");if(r)goto S_54575;} S_54576:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(25753,17690,"ide_methods.bas");if(r)goto S_54576;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,17691,"ide_methods.bas");}while(r); } } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" ",1)); if (new_error) goto skip6019; makefit(tqbs); qbs_print(tqbs,0); skip6019: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17695,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ; if(!qbevent)break;evnt(25753,17696,"ide_methods.bas");}while(r); fornext_continue_6017:; } fornext_exit_6017:; }else{ do{ *_SUB_HELP_SHOWTEXT_LONG_SX=*__LONG_HELP_WX1; if(!qbevent)break;evnt(25753,17701,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_SUB_HELP_SHOWTEXT_LONG_SY,*_SUB_HELP_SHOWTEXT_LONG_SX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,17702,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*__LONG_HELP_SX; if(!qbevent)break;evnt(25753,17703,"ide_methods.bas");}while(r); S_54588:; fornext_value6021= 1 ; fornext_finalvalue6021=*__LONG_HELP_WW; fornext_step6021= 1 ; if (fornext_step6021<0) fornext_step_negative6021=1; else fornext_step_negative6021=0; if (new_error) goto fornext_error6021; goto fornext_entrylabel6021; while(1){ fornext_value6021=fornext_step6021+(*_SUB_HELP_SHOWTEXT_LONG_X4); fornext_entrylabel6021: *_SUB_HELP_SHOWTEXT_LONG_X4=fornext_value6021; if (fornext_step_negative6021){ if (fornext_value6021fornext_finalvalue6021) break; } fornext_error6021:; if(qbevent){evnt(25753,17704,"ide_methods.bas");if(r)goto S_54588;} do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,17705,"ide_methods.bas");}while(r); S_54590:; if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(25753,17706,"ide_methods.bas");if(r)goto S_54590;} S_54591:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||new_error){ if(qbevent){evnt(25753,17707,"ide_methods.bas");if(r)goto S_54591;} S_54592:; if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||new_error){ if(qbevent){evnt(25753,17708,"ide_methods.bas");if(r)goto S_54592;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,17709,"ide_methods.bas");}while(r); } } } do{ tqbs=qbs_new(0,0); qbs_set(tqbs,qbs_new_txt_len(" ",1)); if (new_error) goto skip6022; makefit(tqbs); qbs_print(tqbs,0); skip6022: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17713,"ide_methods.bas");}while(r); do{ *_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ; if(!qbevent)break;evnt(25753,17714,"ide_methods.bas");}while(r); fornext_continue_6020:; } fornext_exit_6020:; 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(25753,17716,"ide_methods.bas");}while(r); } do{ *_SUB_HELP_SHOWTEXT_LONG_SY=*_SUB_HELP_SHOWTEXT_LONG_SY+ 1 ; if(!qbevent)break;evnt(25753,17719,"ide_methods.bas");}while(r); fornext_continue_6013:; } fornext_exit_6013:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free228.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 "data229.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,17744,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,17745,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17746,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,17747,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,17748,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]),0,_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDESEARCHEDBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,17749,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,17750,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17751,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_LN= 0 ; if(!qbevent)break;evnt(25753,17761,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17762,"ide_methods.bas");}while(r); do{ if (_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY)[8])->id=(++mem_lock_id); if (_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[2]&1){ tmp_long=_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]); free((void*)(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0])); } _FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[4]= 0 ; _FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[5]=( 0 )-_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[4]+1; _FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[6]=1; _FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0]=(ptrszint)malloc(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[5]*8); if (!_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0]) error(257); _FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[2]|=1; tmp_long=_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[5]; if (_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,17763,"ide_methods.bas");}while(r); do{ SUB_RETRIEVESEARCHHISTORY(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17764,"ide_methods.bas");}while(r); S_54616:; fornext_value6024= 1 ; fornext_finalvalue6024=func_ubound(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY,1,1); fornext_step6024= 1 ; if (fornext_step6024<0) fornext_step_negative6024=1; else fornext_step_negative6024=0; if (new_error) goto fornext_error6024; goto fornext_entrylabel6024; while(1){ fornext_value6024=fornext_step6024+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel6024: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value6024; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6024){ if (fornext_value6024fornext_finalvalue6024) break; } fornext_error6024:; if(qbevent){evnt(25753,17765,"ide_methods.bas");if(r)goto S_54616;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_L,qbs_add(qbs_add(((qbs*)(((uint64*)(_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[0]))[array_check((*_FUNC_IDESEARCHEDBOX_LONG_I)-_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[4],_FUNC_IDESEARCHEDBOX_ARRAY_STRING_SEARCHHISTORY[5])])),_FUNC_IDESEARCHEDBOX_STRING1_SEP),_FUNC_IDESEARCHEDBOX_STRING_L)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17766,"ide_methods.bas");}while(r); fornext_continue_6023:; } fornext_exit_6023:; do{ *_FUNC_IDESEARCHEDBOX_LONG_H=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 9 ; if(!qbevent)break;evnt(25753,17770,"ide_methods.bas");}while(r); S_54620:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_LN<*_FUNC_IDESEARCHEDBOX_LONG_H))||new_error){ if(qbevent){evnt(25753,17771,"ide_methods.bas");if(r)goto S_54620;} do{ *_FUNC_IDESEARCHEDBOX_LONG_H=*_FUNC_IDESEARCHEDBOX_LONG_LN; if(!qbevent)break;evnt(25753,17771,"ide_methods.bas");}while(r); } S_54623:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_H< 3 ))||new_error){ if(qbevent){evnt(25753,17772,"ide_methods.bas");if(r)goto S_54623;} do{ *_FUNC_IDESEARCHEDBOX_LONG_H= 3 ; if(!qbevent)break;evnt(25753,17772,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,17774,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDESEARCHEDBOX_UDT_P)) + (0) ),&(pass6025= 20 ),_FUNC_IDESEARCHEDBOX_LONG_H,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17775,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0))=*__LONG_IDEWX- 24 ; if(!qbevent)break;evnt(25753,17776,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))=*__LONG_IDEWY- 6 -*_FUNC_IDESEARCHEDBOX_LONG_H; if(!qbevent)break;evnt(25753,17777,"ide_methods.bas");}while(r); S_54630:; if ((-(*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))< 3 ))||new_error){ if(qbevent){evnt(25753,17778,"ide_methods.bas");if(r)goto S_54630;} do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(12))=*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(12))-func_abs((int64)( 3 -*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4)))); if(!qbevent)break;evnt(25753,17779,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_H=*(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(12)); if(!qbevent)break;evnt(25753,17780,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(4))= 3 ; if(!qbevent)break;evnt(25753,17781,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_I=*_FUNC_IDESEARCHEDBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,17784,"ide_methods.bas");}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]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,17785,"ide_methods.bas");}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]))*89+20))= -1 ; if(!qbevent)break;evnt(25753,17786,"ide_methods.bas");}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]))*89+24))= 0 ; if(!qbevent)break;evnt(25753,17786,"ide_methods.bas");}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]))*89+28))= 22 ; if(!qbevent)break;evnt(25753,17788,"ide_methods.bas");}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]))*89+32))=*_FUNC_IDESEARCHEDBOX_LONG_H; if(!qbevent)break;evnt(25753,17788,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDESEARCHEDBOX_STRING_L); if(!qbevent)break;evnt(25753,17789,"ide_methods.bas");}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]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,17790,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Find",4)); if(!qbevent)break;evnt(25753,17791,"ide_methods.bas");}while(r); S_54644:; fornext_value6027= 1 ; fornext_finalvalue6027= 100 ; fornext_step6027= 1 ; if (fornext_step6027<0) fornext_step_negative6027=1; else fornext_step_negative6027=0; if (new_error) goto fornext_error6027; goto fornext_entrylabel6027; while(1){ fornext_value6027=fornext_step6027+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel6027: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value6027; if (fornext_step_negative6027){ if (fornext_value6027fornext_finalvalue6027) break; } fornext_error6027:; if(qbevent){evnt(25753,17802,"ide_methods.bas");if(r)goto S_54644;} 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]))*89)+ 0,((char*)_FUNC_IDESEARCHEDBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,17802,"ide_methods.bas");}while(r); fornext_continue_6026:; } fornext_exit_6026:; S_54647:; do{ if(qbevent){evnt(25753,17805,"ide_methods.bas");if(r)goto S_54647;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDESEARCHEDBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,17808,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,17809,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,17809,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,17809,"ide_methods.bas");}while(r); S_54652:; fornext_value6030= 1 ; fornext_finalvalue6030= 100 ; fornext_step6030= 1 ; if (fornext_step6030<0) fornext_step_negative6030=1; else fornext_step_negative6030=0; if (new_error) goto fornext_error6030; goto fornext_entrylabel6030; while(1){ fornext_value6030=fornext_step6030+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel6030: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value6030; if (fornext_step_negative6030){ if (fornext_value6030fornext_finalvalue6030) break; } fornext_error6030:; if(qbevent){evnt(25753,17810,"ide_methods.bas");if(r)goto S_54652;} S_54653:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,17811,"ide_methods.bas");if(r)goto S_54653;} 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]))*89+60))=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS-*_FUNC_IDESEARCHEDBOX_LONG_F; if(!qbevent)break;evnt(25753,17814,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,17815,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,17815,"ide_methods.bas");}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]))*89) ),_FUNC_IDESEARCHEDBOX_LONG_F); if(!qbevent)break;evnt(25753,17816,"ide_methods.bas");}while(r); S_54658:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,17817,"ide_methods.bas");if(r)goto S_54658;} 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]))*89+52)); if(!qbevent)break;evnt(25753,17817,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,17817,"ide_methods.bas");}while(r); } } fornext_continue_6029:; } fornext_exit_6029:; do{ *_FUNC_IDESEARCHEDBOX_LONG_LASTFOCUS=*_FUNC_IDESEARCHEDBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,17820,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,17827,"ide_methods.bas");}while(r); S_54666:; if ((*_FUNC_IDESEARCHEDBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,17828,"ide_methods.bas");if(r)goto S_54666;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17828,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDESEARCHEDBOX_LONG_CY,*_FUNC_IDESEARCHEDBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,17828,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17828,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,17831,"ide_methods.bas");}while(r); S_54672:; do{ if(qbevent){evnt(25753,17832,"ide_methods.bas");if(r)goto S_54672;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,17833,"ide_methods.bas");}while(r); S_54674:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,17834,"ide_methods.bas");if(r)goto S_54674;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17834,"ide_methods.bas");}while(r); } S_54677:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,17835,"ide_methods.bas");if(r)goto S_54677;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17835,"ide_methods.bas");}while(r); } S_54680:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,17836,"ide_methods.bas");if(r)goto S_54680;} do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,17836,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17836,"ide_methods.bas");}while(r); } S_54684:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,17837,"ide_methods.bas");if(r)goto S_54684;} do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,17837,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17837,"ide_methods.bas");}while(r); } S_54688:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,17838,"ide_methods.bas");if(r)goto S_54688;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17838,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,17839,"ide_methods.bas");}while(r); S_54692:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_ALT!=*_FUNC_IDESEARCHEDBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,17839,"ide_methods.bas");if(r)goto S_54692;} do{ *_FUNC_IDESEARCHEDBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,17839,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_OLDALT=*_FUNC_IDESEARCHEDBOX_LONG_ALT; if(!qbevent)break;evnt(25753,17840,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,17841,"ide_methods.bas");}while(r); S_54697:; dl_continue_6031:; }while((!(*_FUNC_IDESEARCHEDBOX_LONG_CHANGE))&&(!new_error)); dl_exit_6031:; if(qbevent){evnt(25753,17842,"ide_methods.bas");if(r)goto S_54697;} S_54698:; if ((*_FUNC_IDESEARCHEDBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,17843,"ide_methods.bas");if(r)goto S_54698;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,17843,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,17843,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17845,"ide_methods.bas");}while(r); S_54704:; if ((*_FUNC_IDESEARCHEDBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,17846,"ide_methods.bas");if(r)goto S_54704;} S_54705:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,17847,"ide_methods.bas");if(r)goto S_54705;} do{ *_FUNC_IDESEARCHEDBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17848,"ide_methods.bas");}while(r); S_54707:; if (((-(*_FUNC_IDESEARCHEDBOX_LONG_K>= 65 ))&(-(*_FUNC_IDESEARCHEDBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,17849,"ide_methods.bas");if(r)goto S_54707;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDESEARCHEDBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17849,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17852,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,17852,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,17852,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,17856,"ide_methods.bas");}while(r); S_54716:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,17857,"ide_methods.bas");if(r)goto S_54716;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17857,"ide_methods.bas");}while(r); } S_54719:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,17858,"ide_methods.bas");if(r)goto S_54719;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,17858,"ide_methods.bas");}while(r); } S_54722:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,17859,"ide_methods.bas");if(r)goto S_54722;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,17859,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17859,"ide_methods.bas");}while(r); } S_54726:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,17860,"ide_methods.bas");if(r)goto S_54726;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS=*_FUNC_IDESEARCHEDBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,17860,"ide_methods.bas");}while(r); } S_54729:; if ((-(*_FUNC_IDESEARCHEDBOX_LONG_FOCUS>*_FUNC_IDESEARCHEDBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,17861,"ide_methods.bas");if(r)goto S_54729;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,17861,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,17862,"ide_methods.bas");}while(r); S_54733:; fornext_value6034= 1 ; fornext_finalvalue6034= 100 ; fornext_step6034= 1 ; if (fornext_step6034<0) fornext_step_negative6034=1; else fornext_step_negative6034=0; if (new_error) goto fornext_error6034; goto fornext_entrylabel6034; while(1){ fornext_value6034=fornext_step6034+(*_FUNC_IDESEARCHEDBOX_LONG_I); fornext_entrylabel6034: *_FUNC_IDESEARCHEDBOX_LONG_I=fornext_value6034; if (fornext_step_negative6034){ if (fornext_value6034fornext_finalvalue6034) break; } fornext_error6034:; if(qbevent){evnt(25753,17863,"ide_methods.bas");if(r)goto S_54733;} 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]))*89+36)); if(!qbevent)break;evnt(25753,17864,"ide_methods.bas");}while(r); S_54735:; if ((*_FUNC_IDESEARCHEDBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,17865,"ide_methods.bas");if(r)goto S_54735;} do{ *_FUNC_IDESEARCHEDBOX_LONG_FOCUSOFFSET=*_FUNC_IDESEARCHEDBOX_LONG_FOCUS-*_FUNC_IDESEARCHEDBOX_LONG_F; if(!qbevent)break;evnt(25753,17866,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,17867,"ide_methods.bas");}while(r); } fornext_continue_6033:; } fornext_exit_6033:; S_54740:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,17873,"ide_methods.bas");if(r)goto S_54740;} S_54741:; 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(25753,17874,"ide_methods.bas");if(r)goto S_54741;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17875,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17876,"ide_methods.bas");}while(r); } } S_54746:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(25753,17880,"ide_methods.bas");if(r)goto S_54746;} do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17881,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17882,"ide_methods.bas");}while(r); } S_54750:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,17885,"ide_methods.bas");if(r)goto S_54750;} S_54751:; 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(25753,17886,"ide_methods.bas");if(r)goto S_54751;} 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]))*89+72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17887,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,_FUNC_IDESEARCHEDBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17888,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17889,"ide_methods.bas");}while(r); } } S_54757:; 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(25753,17893,"ide_methods.bas");if(r)goto S_54757;} 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]))*89+72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17894,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDESEARCHEDBOX_STRING_IDESEARCHEDBOX,_FUNC_IDESEARCHEDBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17895,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,17896,"ide_methods.bas");}while(r); } do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,17900,"ide_methods.bas");}while(r); do{ *_FUNC_IDESEARCHEDBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,17901,"ide_methods.bas");}while(r); dl_continue_6028:; }while(1); dl_exit_6028:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free229.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 "data230.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_IDEBMKN= 0 ; if(!qbevent)break;evnt(25753,17910,"ide_methods.bas");}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(25753,17911,"ide_methods.bas");}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,17912,"ide_methods.bas");}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(25753,17912,"ide_methods.bas");}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(25753,17912,"ide_methods.bas");}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(25753,17912,"ide_methods.bas");}while(r); do{ sub_close(*_SUB_IDEIMPORTBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(25753,17912,"ide_methods.bas");}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(25753,17913,"ide_methods.bas");}while(r); S_54773:; if ((*_SUB_IDEIMPORTBOOKMARKS_LONG_X)||new_error){ if(qbevent){evnt(25753,17914,"ide_methods.bas");if(r)goto S_54773;} 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(25753,17915,"ide_methods.bas");}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(25753,17916,"ide_methods.bas");}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(25753,17917,"ide_methods.bas");}while(r); do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_N=*_SUB_IDEIMPORTBOOKMARKS_LONG_L/ 16 ; if(!qbevent)break;evnt(25753,17918,"ide_methods.bas");}while(r); S_54778:; fornext_value6039= 1 ; fornext_finalvalue6039=*_SUB_IDEIMPORTBOOKMARKS_LONG_N; fornext_step6039= 1 ; if (fornext_step6039<0) fornext_step_negative6039=1; else fornext_step_negative6039=0; if (new_error) goto fornext_error6039; goto fornext_entrylabel6039; while(1){ fornext_value6039=fornext_step6039+(*_SUB_IDEIMPORTBOOKMARKS_LONG_I); fornext_entrylabel6039: *_SUB_IDEIMPORTBOOKMARKS_LONG_I=fornext_value6039; if (fornext_step_negative6039){ if (fornext_value6039fornext_finalvalue6039) break; } fornext_error6039:; if(qbevent){evnt(25753,17919,"ide_methods.bas");if(r)goto S_54778;} 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(25753,17920,"ide_methods.bas");}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(25753,17921,"ide_methods.bas");}while(r); S_54781:; if ((-(*_SUB_IDEIMPORTBOOKMARKS_LONG_BY<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,17922,"ide_methods.bas");if(r)goto S_54781;} do{ *__LONG_IDEBMKN=*__LONG_IDEBMKN+ 1 ; if(!qbevent)break;evnt(25753,17923,"ide_methods.bas");}while(r); S_54783:; if ((-(*__LONG_IDEBMKN>func_ubound(__ARRAY_UDT_IDEBMK,1,1)))||new_error){ if(qbevent){evnt(25753,17924,"ide_methods.bas");if(r)goto S_54783;} do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_X=func_ubound(__ARRAY_UDT_IDEBMK,1,1)* 2 ; if(!qbevent)break;evnt(25753,17924,"ide_methods.bas");}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_elementsfornext_finalvalue6041) break; } fornext_error6041:; if(qbevent){evnt(25753,17935,"ide_methods.bas");if(r)goto S_54796;} do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_J=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDEIMPORTBOOKMARKS_STRING_F2,qbs_add(qbs_new_txt_len("breakpoint",10),qbs_str((int32)(*_SUB_IDEIMPORTBOOKMARKS_LONG_I)))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17936,"ide_methods.bas");}while(r); S_54798:; if ((-(*_SUB_IDEIMPORTBOOKMARKS_LONG_J>func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)))||new_error){ if(qbevent){evnt(25753,17937,"ide_methods.bas");if(r)goto S_54798;} do{ goto fornext_exit_6040; if(!qbevent)break;evnt(25753,17937,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEIMPORTBOOKMARKS_LONG_J)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(25753,17938,"ide_methods.bas");}while(r); fornext_continue_6040:; } fornext_exit_6040:; } do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_X=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDEIMPORTBOOKMARKS_STRING_F2,qbs_new_txt_len("total skips",11)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17942,"ide_methods.bas");}while(r); S_54805:; if ((*_SUB_IDEIMPORTBOOKMARKS_LONG_X)||new_error){ if(qbevent){evnt(25753,17943,"ide_methods.bas");if(r)goto S_54805;} S_54806:; fornext_value6043= 1 ; fornext_finalvalue6043=*_SUB_IDEIMPORTBOOKMARKS_LONG_X; fornext_step6043= 1 ; if (fornext_step6043<0) fornext_step_negative6043=1; else fornext_step_negative6043=0; if (new_error) goto fornext_error6043; goto fornext_entrylabel6043; while(1){ fornext_value6043=fornext_step6043+(*_SUB_IDEIMPORTBOOKMARKS_LONG_I); fornext_entrylabel6043: *_SUB_IDEIMPORTBOOKMARKS_LONG_I=fornext_value6043; if (fornext_step_negative6043){ if (fornext_value6043fornext_finalvalue6043) break; } fornext_error6043:; if(qbevent){evnt(25753,17944,"ide_methods.bas");if(r)goto S_54806;} do{ *_SUB_IDEIMPORTBOOKMARKS_LONG_J=qbr(func_val(FUNC_READSETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDEIMPORTBOOKMARKS_STRING_F2,qbs_add(qbs_new_txt_len("skip",4),qbs_str((int32)(*_SUB_IDEIMPORTBOOKMARKS_LONG_I)))))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17945,"ide_methods.bas");}while(r); S_54808:; if ((-(*_SUB_IDEIMPORTBOOKMARKS_LONG_J>func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1)))||new_error){ if(qbevent){evnt(25753,17946,"ide_methods.bas");if(r)goto S_54808;} do{ goto fornext_exit_6042; if(!qbevent)break;evnt(25753,17946,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEIMPORTBOOKMARKS_LONG_J)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5]); if (!new_error) ((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[tmp_long]= -1 ; if(!qbevent)break;evnt(25753,17947,"ide_methods.bas");}while(r); fornext_continue_6042:; } fornext_exit_6042:; } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free230.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_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 "data231.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; 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(25753,17953,"ide_methods.bas");}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,17954,"ide_methods.bas");}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(25753,17954,"ide_methods.bas");}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(25753,17954,"ide_methods.bas");}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(25753,17954,"ide_methods.bas");}while(r); do{ sub_close(*_SUB_IDESAVEBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(25753,17954,"ide_methods.bas");}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(25753,17955,"ide_methods.bas");}while(r); S_54821:; if ((*_SUB_IDESAVEBOOKMARKS_LONG_X)||new_error){ if(qbevent){evnt(25753,17956,"ide_methods.bas");if(r)goto S_54821;} 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(25753,17957,"ide_methods.bas");}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(25753,17958,"ide_methods.bas");}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(25753,17959,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDESAVEBOOKMARKS_STRING_D,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17963,"ide_methods.bas");}while(r); S_54827:; fornext_value6049= 1 ; fornext_finalvalue6049=*__LONG_IDEBMKN; fornext_step6049= 1 ; if (fornext_step6049<0) fornext_step_negative6049=1; else fornext_step_negative6049=0; if (new_error) goto fornext_error6049; goto fornext_entrylabel6049; while(1){ fornext_value6049=fornext_step6049+(*_SUB_IDESAVEBOOKMARKS_LONG_I); fornext_entrylabel6049: *_SUB_IDESAVEBOOKMARKS_LONG_I=fornext_value6049; if (fornext_step_negative6049){ if (fornext_value6049fornext_finalvalue6049) break; } fornext_error6049:; if(qbevent){evnt(25753,17964,"ide_methods.bas");if(r)goto S_54827;} 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(25753,17965,"ide_methods.bas");}while(r); fornext_continue_6048:; } fornext_exit_6048:; 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(25753,17967,"ide_methods.bas");}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,17968,"ide_methods.bas");}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(25753,17968,"ide_methods.bas");}while(r); do{ sub_close(*_SUB_IDESAVEBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(25753,17968,"ide_methods.bas");}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,17969,"ide_methods.bas");}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(25753,17969,"ide_methods.bas");}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_6051),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17969,"ide_methods.bas");}while(r); do{ sub_close(*_SUB_IDESAVEBOOKMARKS_LONG_FH,1); if(!qbevent)break;evnt(25753,17969,"ide_methods.bas");}while(r); S_54838:; if ((*__LONG_VWATCHON)||new_error){ if(qbevent){evnt(25753,17972,"ide_methods.bas");if(r)goto S_54838;} do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDESAVEBOOKMARKS_STRING_F2,qbs_new_txt_len("total breakpoints",17),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17973,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDESAVEBOOKMARKS_STRING_F2,qbs_new_txt_len("total skips",11),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17974,"ide_methods.bas");}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_X= 0 ; if(!qbevent)break;evnt(25753,17976,"ide_methods.bas");}while(r); S_54842:; fornext_value6053= 1 ; fornext_finalvalue6053=func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1); fornext_step6053= 1 ; if (fornext_step6053<0) fornext_step_negative6053=1; else fornext_step_negative6053=0; if (new_error) goto fornext_error6053; goto fornext_entrylabel6053; while(1){ fornext_value6053=fornext_step6053+(*_SUB_IDESAVEBOOKMARKS_LONG_I); fornext_entrylabel6053: *_SUB_IDESAVEBOOKMARKS_LONG_I=fornext_value6053; if (fornext_step_negative6053){ if (fornext_value6053fornext_finalvalue6053) break; } fornext_error6053:; if(qbevent){evnt(25753,17977,"ide_methods.bas");if(r)goto S_54842;} S_54843:; if ((((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESAVEBOOKMARKS_LONG_I)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])])||new_error){ if(qbevent){evnt(25753,17978,"ide_methods.bas");if(r)goto S_54843;} do{ *_SUB_IDESAVEBOOKMARKS_LONG_X=*_SUB_IDESAVEBOOKMARKS_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,17979,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDESAVEBOOKMARKS_STRING_F2,qbs_add(qbs_new_txt_len("breakpoint",10),qbs_str((int32)(*_SUB_IDESAVEBOOKMARKS_LONG_X))),FUNC_STR2(_SUB_IDESAVEBOOKMARKS_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17980,"ide_methods.bas");}while(r); } fornext_continue_6052:; } fornext_exit_6052:; do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDESAVEBOOKMARKS_STRING_F2,qbs_new_txt_len("total breakpoints",17),FUNC_STR2(_SUB_IDESAVEBOOKMARKS_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17983,"ide_methods.bas");}while(r); do{ *_SUB_IDESAVEBOOKMARKS_LONG_X= 0 ; if(!qbevent)break;evnt(25753,17985,"ide_methods.bas");}while(r); S_54850:; fornext_value6055= 1 ; fornext_finalvalue6055=func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1); fornext_step6055= 1 ; if (fornext_step6055<0) fornext_step_negative6055=1; else fornext_step_negative6055=0; if (new_error) goto fornext_error6055; goto fornext_entrylabel6055; while(1){ fornext_value6055=fornext_step6055+(*_SUB_IDESAVEBOOKMARKS_LONG_I); fornext_entrylabel6055: *_SUB_IDESAVEBOOKMARKS_LONG_I=fornext_value6055; if (fornext_step_negative6055){ if (fornext_value6055fornext_finalvalue6055) break; } fornext_error6055:; if(qbevent){evnt(25753,17986,"ide_methods.bas");if(r)goto S_54850;} S_54851:; if ((((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESAVEBOOKMARKS_LONG_I)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])])||new_error){ if(qbevent){evnt(25753,17987,"ide_methods.bas");if(r)goto S_54851;} do{ *_SUB_IDESAVEBOOKMARKS_LONG_X=*_SUB_IDESAVEBOOKMARKS_LONG_X+ 1 ; if(!qbevent)break;evnt(25753,17988,"ide_methods.bas");}while(r); do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDESAVEBOOKMARKS_STRING_F2,qbs_add(qbs_new_txt_len("skip",4),qbs_str((int32)(*_SUB_IDESAVEBOOKMARKS_LONG_X))),FUNC_STR2(_SUB_IDESAVEBOOKMARKS_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17989,"ide_methods.bas");}while(r); } fornext_continue_6054:; } fornext_exit_6054:; do{ SUB_WRITESETTING(qbs_new_txt_len(".\\internal\\temp\\debug.ini",25),_SUB_IDESAVEBOOKMARKS_STRING_F2,qbs_new_txt_len("total skips",11),FUNC_STR2(_SUB_IDESAVEBOOKMARKS_LONG_X)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,17992,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free231.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 "data232.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,17999,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,18000,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18001,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,18002,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18003,"ide_methods.bas");}while(r); do{ if (_FUNC_IDERECENTBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDERECENTBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDERECENTBOX_ARRAY_UDT_O[0]),0,_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDERECENTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDERECENTBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDERECENTBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,18004,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18005,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18006,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING_L,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18016,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH= 72 ; if(!qbevent)break;evnt(25753,18017,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_TOTALRECENT= 0 ; if(!qbevent)break;evnt(25753,18018,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,18019,"ide_methods.bas");}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(25753,18020,"ide_methods.bas");}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(25753,18020,"ide_methods.bas");}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(25753,18020,"ide_methods.bas");}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(25753,18021,"ide_methods.bas");}while(r); do{ if (_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST)[8])->id=(++mem_lock_id); if (_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[2]&1){ tmp_long=_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0]))[tmp_long]); free((void*)(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0])); } _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[4]= 0 ; _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]=( 100 )-_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[4]+1; _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[6]=1; _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0]=(ptrszint)malloc(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]*8); if (!_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0]) error(257); _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[2]|=1; tmp_long=_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]; if (_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,18022,"ide_methods.bas");}while(r); S_54875:; while((qbs_cleanup(qbs_tmp_base,_FUNC_IDERECENTBOX_STRING_A->len))||new_error){ if(qbevent){evnt(25753,18023,"ide_methods.bas");if(r)goto S_54875;} 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(25753,18024,"ide_methods.bas");}while(r); S_54877:; if ((*_FUNC_IDERECENTBOX_LONG_AI)||new_error){ if(qbevent){evnt(25753,18025,"ide_methods.bas");if(r)goto S_54877;} 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(25753,18026,"ide_methods.bas");}while(r); S_54879:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDERECENTBOX_LONG_AI==(_FUNC_IDERECENTBOX_STRING_A->len- 1 ))))||new_error){ if(qbevent){evnt(25753,18026,"ide_methods.bas");if(r)goto S_54879;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18026,"ide_methods.bas");}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(25753,18026,"ide_methods.bas");}while(r); } S_54884:; if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDERECENTBOX_STRING_F->len+ 6 )>*_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH)))||new_error){ if(qbevent){evnt(25753,18027,"ide_methods.bas");if(r)goto S_54884;} do{ *_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH=_FUNC_IDERECENTBOX_STRING_F->len+ 6 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18027,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_TOTALRECENT=*_FUNC_IDERECENTBOX_LONG_TOTALRECENT+ 1 ; if(!qbevent)break;evnt(25753,18028,"ide_methods.bas");}while(r); S_54888:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDERECENTBOX_LONG_TOTALRECENT>func_ubound(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST,1,1))))||new_error){ if(qbevent){evnt(25753,18029,"ide_methods.bas");if(r)goto S_54888;} do{ if (_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[2]&1){ preserved_elements=_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]; } else preserved_elements=0; _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[4]= 0 ; _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]=(func_ubound(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST,1,1)+ 100 )-_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[4]+1; _FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5]; if (tmp_long2len))||new_error){ if(qbevent){evnt(25753,18033,"ide_methods.bas");if(r)goto S_54892;} 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(25753,18033,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDERECENTBOX_STRING_L,_FUNC_IDERECENTBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18033,"ide_methods.bas");}while(r); } } dl_continue_6058:; } dl_exit_6058:; do{ sub_close(*_FUNC_IDERECENTBOX_LONG_FH,1); if(!qbevent)break;evnt(25753,18036,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,18039,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_DIALOGHEIGHT=*_FUNC_IDERECENTBOX_LONG_TOTALRECENT+ 3 ; if(!qbevent)break;evnt(25753,18040,"ide_methods.bas");}while(r); S_54902:; if ((-(*_FUNC_IDERECENTBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||new_error){ if(qbevent){evnt(25753,18041,"ide_methods.bas");if(r)goto S_54902;} do{ *_FUNC_IDERECENTBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ; if(!qbevent)break;evnt(25753,18042,"ide_methods.bas");}while(r); } S_54905:; if ((-(*_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||new_error){ if(qbevent){evnt(25753,18045,"ide_methods.bas");if(r)goto S_54905;} do{ *_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ; if(!qbevent)break;evnt(25753,18045,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDERECENTBOX_UDT_P)) + (0) ),_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH,_FUNC_IDERECENTBOX_LONG_DIALOGHEIGHT,qbs_new_txt_len("Open",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18046,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_I=*_FUNC_IDERECENTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18048,"ide_methods.bas");}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]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,18049,"ide_methods.bas");}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]))*89+24))= 1 ; if(!qbevent)break;evnt(25753,18050,"ide_methods.bas");}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]))*89+28))=*_FUNC_IDERECENTBOX_LONG_DIALOGWIDTH- 4 ; if(!qbevent)break;evnt(25753,18052,"ide_methods.bas");}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]))*89+32))=*_FUNC_IDERECENTBOX_LONG_DIALOGHEIGHT- 3 ; if(!qbevent)break;evnt(25753,18052,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDERECENTBOX_STRING_L); if(!qbevent)break;evnt(25753,18053,"ide_methods.bas");}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]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,18054,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Recent Programs",15)); if(!qbevent)break;evnt(25753,18055,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_I=*_FUNC_IDERECENTBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18057,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,18058,"ide_methods.bas");}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]))*89+24))=*_FUNC_IDERECENTBOX_LONG_DIALOGHEIGHT; if(!qbevent)break;evnt(25753,18059,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Open",5),_FUNC_IDERECENTBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7)),_FUNC_IDERECENTBOX_STRING1_SEP),qbs_new_txt_len("Clear #list",11)),_FUNC_IDERECENTBOX_STRING1_SEP),qbs_new_txt_len("#Remove broken links",20))); if(!qbevent)break;evnt(25753,18060,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,18061,"ide_methods.bas");}while(r); S_54922:; fornext_value6065= 1 ; fornext_finalvalue6065= 100 ; fornext_step6065= 1 ; if (fornext_step6065<0) fornext_step_negative6065=1; else fornext_step_negative6065=0; if (new_error) goto fornext_error6065; goto fornext_entrylabel6065; while(1){ fornext_value6065=fornext_step6065+(*_FUNC_IDERECENTBOX_LONG_I); fornext_entrylabel6065: *_FUNC_IDERECENTBOX_LONG_I=fornext_value6065; if (fornext_step_negative6065){ if (fornext_value6065fornext_finalvalue6065) break; } fornext_error6065:; if(qbevent){evnt(25753,18066,"ide_methods.bas");if(r)goto S_54922;} 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]))*89)+ 0,((char*)_FUNC_IDERECENTBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,18066,"ide_methods.bas");}while(r); fornext_continue_6064:; } fornext_exit_6064:; S_54925:; do{ if(qbevent){evnt(25753,18069,"ide_methods.bas");if(r)goto S_54925;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDERECENTBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,18072,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,18073,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,18073,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,18073,"ide_methods.bas");}while(r); S_54930:; fornext_value6068= 1 ; fornext_finalvalue6068= 100 ; fornext_step6068= 1 ; if (fornext_step6068<0) fornext_step_negative6068=1; else fornext_step_negative6068=0; if (new_error) goto fornext_error6068; goto fornext_entrylabel6068; while(1){ fornext_value6068=fornext_step6068+(*_FUNC_IDERECENTBOX_LONG_I); fornext_entrylabel6068: *_FUNC_IDERECENTBOX_LONG_I=fornext_value6068; if (fornext_step_negative6068){ if (fornext_value6068fornext_finalvalue6068) break; } fornext_error6068:; if(qbevent){evnt(25753,18074,"ide_methods.bas");if(r)goto S_54930;} S_54931:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,18075,"ide_methods.bas");if(r)goto S_54931;} 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]))*89+60))=*_FUNC_IDERECENTBOX_LONG_FOCUS-*_FUNC_IDERECENTBOX_LONG_F; if(!qbevent)break;evnt(25753,18078,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,18079,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,18079,"ide_methods.bas");}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]))*89) ),_FUNC_IDERECENTBOX_LONG_F); if(!qbevent)break;evnt(25753,18080,"ide_methods.bas");}while(r); S_54936:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,18081,"ide_methods.bas");if(r)goto S_54936;} 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]))*89+52)); if(!qbevent)break;evnt(25753,18081,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,18081,"ide_methods.bas");}while(r); } } fornext_continue_6067:; } fornext_exit_6067:; do{ *_FUNC_IDERECENTBOX_LONG_LASTFOCUS=*_FUNC_IDERECENTBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,18084,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,18091,"ide_methods.bas");}while(r); S_54944:; if ((*_FUNC_IDERECENTBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,18092,"ide_methods.bas");if(r)goto S_54944;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18092,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDERECENTBOX_LONG_CY,*_FUNC_IDERECENTBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,18092,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18092,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,18095,"ide_methods.bas");}while(r); S_54950:; do{ if(qbevent){evnt(25753,18096,"ide_methods.bas");if(r)goto S_54950;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,18097,"ide_methods.bas");}while(r); S_54952:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,18098,"ide_methods.bas");if(r)goto S_54952;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,18098,"ide_methods.bas");}while(r); } S_54955:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,18099,"ide_methods.bas");if(r)goto S_54955;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,18099,"ide_methods.bas");}while(r); } S_54958:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,18100,"ide_methods.bas");if(r)goto S_54958;} do{ *_FUNC_IDERECENTBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,18100,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,18100,"ide_methods.bas");}while(r); } S_54962:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,18101,"ide_methods.bas");if(r)goto S_54962;} do{ *_FUNC_IDERECENTBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,18101,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,18101,"ide_methods.bas");}while(r); } S_54966:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,18102,"ide_methods.bas");if(r)goto S_54966;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,18102,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,18103,"ide_methods.bas");}while(r); S_54970:; if ((-(*_FUNC_IDERECENTBOX_LONG_ALT!=*_FUNC_IDERECENTBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,18103,"ide_methods.bas");if(r)goto S_54970;} do{ *_FUNC_IDERECENTBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,18103,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_OLDALT=*_FUNC_IDERECENTBOX_LONG_ALT; if(!qbevent)break;evnt(25753,18104,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,18105,"ide_methods.bas");}while(r); S_54975:; dl_continue_6069:; }while((!(*_FUNC_IDERECENTBOX_LONG_CHANGE))&&(!new_error)); dl_exit_6069:; if(qbevent){evnt(25753,18106,"ide_methods.bas");if(r)goto S_54975;} S_54976:; if ((*_FUNC_IDERECENTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,18107,"ide_methods.bas");if(r)goto S_54976;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,18107,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,18107,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDERECENTBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18109,"ide_methods.bas");}while(r); S_54982:; if ((*_FUNC_IDERECENTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,18110,"ide_methods.bas");if(r)goto S_54982;} S_54983:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,18111,"ide_methods.bas");if(r)goto S_54983;} do{ *_FUNC_IDERECENTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18112,"ide_methods.bas");}while(r); S_54985:; if (((-(*_FUNC_IDERECENTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDERECENTBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,18113,"ide_methods.bas");if(r)goto S_54985;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDERECENTBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18113,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18116,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,18116,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18116,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,18120,"ide_methods.bas");}while(r); S_54994:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,18121,"ide_methods.bas");if(r)goto S_54994;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18121,"ide_methods.bas");}while(r); } S_54997:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,18122,"ide_methods.bas");if(r)goto S_54997;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS=*_FUNC_IDERECENTBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,18122,"ide_methods.bas");}while(r); } S_55000:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,18123,"ide_methods.bas");if(r)goto S_55000;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS=*_FUNC_IDERECENTBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,18123,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18123,"ide_methods.bas");}while(r); } S_55004:; if ((-(*_FUNC_IDERECENTBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,18124,"ide_methods.bas");if(r)goto S_55004;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS=*_FUNC_IDERECENTBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,18124,"ide_methods.bas");}while(r); } S_55007:; if ((-(*_FUNC_IDERECENTBOX_LONG_FOCUS>*_FUNC_IDERECENTBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,18125,"ide_methods.bas");if(r)goto S_55007;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,18125,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,18126,"ide_methods.bas");}while(r); S_55011:; fornext_value6072= 1 ; fornext_finalvalue6072= 100 ; fornext_step6072= 1 ; if (fornext_step6072<0) fornext_step_negative6072=1; else fornext_step_negative6072=0; if (new_error) goto fornext_error6072; goto fornext_entrylabel6072; while(1){ fornext_value6072=fornext_step6072+(*_FUNC_IDERECENTBOX_LONG_I); fornext_entrylabel6072: *_FUNC_IDERECENTBOX_LONG_I=fornext_value6072; if (fornext_step_negative6072){ if (fornext_value6072fornext_finalvalue6072) break; } fornext_error6072:; if(qbevent){evnt(25753,18127,"ide_methods.bas");if(r)goto S_55011;} 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]))*89+36)); if(!qbevent)break;evnt(25753,18128,"ide_methods.bas");}while(r); S_55013:; if ((*_FUNC_IDERECENTBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,18129,"ide_methods.bas");if(r)goto S_55013;} do{ *_FUNC_IDERECENTBOX_LONG_FOCUSOFFSET=*_FUNC_IDERECENTBOX_LONG_FOCUS-*_FUNC_IDERECENTBOX_LONG_F; if(!qbevent)break;evnt(25753,18130,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,18131,"ide_methods.bas");}while(r); } fornext_continue_6071:; } fornext_exit_6071:; S_55018:; 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(25753,18136,"ide_methods.bas");if(r)goto S_55018;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18137,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,18138,"ide_methods.bas");}while(r); } S_55022:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 1 )))|((-(*_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(25753,18141,"ide_methods.bas");if(r)goto S_55022;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_F,((qbs*)(((uint64*)(_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[0]))[array_check((func_abs((int32)(*(int32*)(((char*)_FUNC_IDERECENTBOX_ARRAY_UDT_O[0])+((array_check(( 1 )-_FUNC_IDERECENTBOX_ARRAY_UDT_O[4],_FUNC_IDERECENTBOX_ARRAY_UDT_O[5]))*89+64)))))-_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[4],_FUNC_IDERECENTBOX_ARRAY_STRING_TEMPLIST[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18142,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX,_FUNC_IDERECENTBOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18143,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,18144,"ide_methods.bas");}while(r); } S_55027:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 4 )))|((-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDERECENTBOX_LONG_INFO!= 0 )))|((-(*_FUNC_IDERECENTBOX_LONG_INFO== 1 ))&(-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 4 )))))||new_error){ if(qbevent){evnt(25753,18147,"ide_methods.bas");if(r)goto S_55027;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX,qbs_new_txt_len("",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18148,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,18149,"ide_methods.bas");}while(r); } S_55031:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 5 )))|((-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 5 ))&(-(*_FUNC_IDERECENTBOX_LONG_INFO!= 0 )))|((-(*_FUNC_IDERECENTBOX_LONG_INFO== 1 ))&(-(*_FUNC_IDERECENTBOX_LONG_FOCUS== 5 )))))||new_error){ if(qbevent){evnt(25753,18152,"ide_methods.bas");if(r)goto S_55031;} do{ qbs_set(_FUNC_IDERECENTBOX_STRING_IDERECENTBOX,qbs_new_txt_len("",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18153,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,18154,"ide_methods.bas");}while(r); } do{ *_FUNC_IDERECENTBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,18158,"ide_methods.bas");}while(r); do{ *_FUNC_IDERECENTBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,18159,"ide_methods.bas");}while(r); dl_continue_6066:; }while(1); dl_exit_6066:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free232.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 "data233.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_IDEMAKEFILEMENU_LONG_M= 1 ; if(!qbevent)break;evnt(25753,18169,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I= 0 ; if(!qbevent)break;evnt(25753,18169,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18170,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18170,"ide_methods.bas");}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 Ctrl+N",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18171,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18171,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Closes current program and starts a blank one",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18172,"ide_methods.bas");}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... Ctrl+O",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18173,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18173,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Loads a program into memory",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18174,"ide_methods.bas");}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 Ctrl+S",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18175,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18175,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Writes current program to a file on disk",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18176,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18177,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18177,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Saves current program with specified name",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18178,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,18179,"ide_methods.bas");}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(25753,18180,"ide_methods.bas");}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(25753,18180,"ide_methods.bas");}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(25753,18180,"ide_methods.bas");}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(25753,18181,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_MAXRECENTINFILEMENU=func_ubound(__ARRAY_STRING_IDERECENTLINK, 1 ,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18182,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_MAXLENGTHRECENTFILES= 35 ; if(!qbevent)break;evnt(25753,18183,"ide_methods.bas");}while(r); S_55061:; fornext_value6075= 1 ; fornext_finalvalue6075=*_SUB_IDEMAKEFILEMENU_LONG_MAXRECENTINFILEMENU+ 1 ; fornext_step6075= 1 ; if (fornext_step6075<0) fornext_step_negative6075=1; else fornext_step_negative6075=0; if (new_error) goto fornext_error6075; goto fornext_entrylabel6075; while(1){ fornext_value6075=fornext_step6075+(*_SUB_IDEMAKEFILEMENU_LONG_R); fornext_entrylabel6075: *_SUB_IDEMAKEFILEMENU_LONG_R=fornext_value6075; if (fornext_step_negative6075){ if (fornext_value6075fornext_finalvalue6075) break; } fornext_error6075:; if(qbevent){evnt(25753,18184,"ide_methods.bas");if(r)goto S_55061;} S_55062:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R<=*_SUB_IDEMAKEFILEMENU_LONG_MAXRECENTINFILEMENU))||new_error){ if(qbevent){evnt(25753,18185,"ide_methods.bas");if(r)goto S_55062;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18185,"ide_methods.bas");}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(25753,18186,"ide_methods.bas");}while(r); S_55066:; if ((*_SUB_IDEMAKEFILEMENU_LONG_AI)||new_error){ if(qbevent){evnt(25753,18187,"ide_methods.bas");if(r)goto S_55066;} S_55067:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R== 1 ))||new_error){ if(qbevent){evnt(25753,18188,"ide_methods.bas");if(r)goto S_55067;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18188,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18188,"ide_methods.bas");}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(25753,18189,"ide_methods.bas");}while(r); S_55072:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEMAKEFILEMENU_LONG_AI==(_SUB_IDEMAKEFILEMENU_STRING_A->len- 1 ))))||new_error){ if(qbevent){evnt(25753,18189,"ide_methods.bas");if(r)goto S_55072;} do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18189,"ide_methods.bas");}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(25753,18189,"ide_methods.bas");}while(r); } S_55077:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R<=*_SUB_IDEMAKEFILEMENU_LONG_MAXRECENTINFILEMENU))||new_error){ if(qbevent){evnt(25753,18190,"ide_methods.bas");if(r)goto S_55077;} 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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18190,"ide_methods.bas");}while(r); } S_55080:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKEFILEMENU_STRING_F->len>*_SUB_IDEMAKEFILEMENU_LONG_MAXLENGTHRECENTFILES)))||new_error){ if(qbevent){evnt(25753,18192,"ide_methods.bas");if(r)goto S_55080;} do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_add(func_string( 3 , 250 ),qbs_right(_SUB_IDEMAKEFILEMENU_STRING_F,*_SUB_IDEMAKEFILEMENU_LONG_MAXLENGTHRECENTFILES- 3 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18192,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#",1),FUNC_STR2(_SUB_IDEMAKEFILEMENU_LONG_R)),qbs_new_txt_len(" ",1)),_SUB_IDEMAKEFILEMENU_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18193,"ide_methods.bas");}while(r); S_55084:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R==(*_SUB_IDEMAKEFILEMENU_LONG_MAXRECENTINFILEMENU+ 1 )))||new_error){ if(qbevent){evnt(25753,18194,"ide_methods.bas");if(r)goto S_55084;} do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_new_txt_len("#Recent...",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18194,"ide_methods.bas");}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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18195,"ide_methods.bas");}while(r); S_55088:; if ((-(*_SUB_IDEMAKEFILEMENU_LONG_R<=*_SUB_IDEMAKEFILEMENU_LONG_MAXRECENTINFILEMENU))||new_error){ if(qbevent){evnt(25753,18196,"ide_methods.bas");if(r)goto S_55088;} 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); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18197,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_add(qbs_add(qbs_new_txt_len("Open '",6),((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[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]]))),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18198,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_AI= 3 ; if(!qbevent)break;evnt(25753,18199,"ide_methods.bas");}while(r); S_55092:; while((!(qbs_cleanup(qbs_tmp_base,-((_SUB_IDEMAKEFILEMENU_STRING_F->len)<=(*__LONG_IDEWX- 2 )))))||new_error){ if(qbevent){evnt(25753,18200,"ide_methods.bas");if(r)goto S_55092;} do{ *_SUB_IDEMAKEFILEMENU_LONG_AI=*_SUB_IDEMAKEFILEMENU_LONG_AI+ 1 ; if(!qbevent)break;evnt(25753,18201,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKEFILEMENU_STRING_F,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Open '",6),func_string( 3 , 250 )),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDERECENTLINK[0]))[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]])),*_SUB_IDEMAKEFILEMENU_LONG_AI,NULL,0)),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18202,"ide_methods.bas");}while(r); dl_continue_6080:; } dl_exit_6080:; do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),_SUB_IDEMAKEFILEMENU_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18204,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18206,"ide_methods.bas");}while(r); } fornext_continue_6074:; } fornext_exit_6074:; do{ sub_close(*_SUB_IDEMAKEFILEMENU_LONG_FH,1); if(!qbevent)break;evnt(25753,18209,"ide_methods.bas");}while(r); S_55102:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("#Recent...",10)))&(qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len("Save #As...",11)))))||new_error){ if(qbevent){evnt(25753,18210,"ide_methods.bas");if(r)goto S_55102;} 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("#Clear Recent...",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18211,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18211,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Clears list of recently loaded files",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18212,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays a complete list of recently loaded files",49)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18214,"ide_methods.bas");}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("-",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18216,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18216,"ide_methods.bas");}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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18217,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEFILEMENU_LONG_I=*_SUB_IDEMAKEFILEMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18217,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEFILEMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEFILEMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Exits QB64-PE",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18218,"ide_methods.bas");}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(25753,18219,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free233.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_IDEMAKECONTEXTUALMENU(){ 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 "data234.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if (__ARRAY_STRING_SUBFUNCLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SUBFUNCLIST)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_SUBFUNCLIST[2]&1){ tmp_long=__ARRAY_STRING_SUBFUNCLIST[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[tmp_long]); free((void*)(__ARRAY_STRING_SUBFUNCLIST[0])); } __ARRAY_STRING_SUBFUNCLIST[4]= 0 ; __ARRAY_STRING_SUBFUNCLIST[5]=( 0 )-__ARRAY_STRING_SUBFUNCLIST[4]+1; __ARRAY_STRING_SUBFUNCLIST[6]=1; __ARRAY_STRING_SUBFUNCLIST[0]=(ptrszint)malloc(__ARRAY_STRING_SUBFUNCLIST[5]*8); if (!__ARRAY_STRING_SUBFUNCLIST[0]) error(257); __ARRAY_STRING_SUBFUNCLIST[2]|=1; tmp_long=__ARRAY_STRING_SUBFUNCLIST[5]; if (__ARRAY_STRING_SUBFUNCLIST[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,18223,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18224,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_M=*__INTEGER_IDECONTEXTUALMENUID; if(!qbevent)break;evnt(25753,18226,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I= 0 ; if(!qbevent)break;evnt(25753,18226,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Contextual",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18227,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18227,"ide_methods.bas");}while(r); S_55121:; if ((-(*__LONG_IDEDEBUGMODE== 2 ))||new_error){ if(qbevent){evnt(25753,18229,"ide_methods.bas");if(r)goto S_55121;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Continue F5",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18230,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18230,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Runs until the end of the current procedure is reached",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18231,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Step O#ut F6",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18232,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18232,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Runs until the end of the current procedure is reached",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18233,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Ste#p Into F7",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18234,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18234,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Runs the next line of code and pauses execution",47)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18235,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Step #Over F8",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18236,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18236,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Runs the next line of code without entering subs/functions",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18237,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18238,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18238,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Set #Next Line Ctrl+G",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18239,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18239,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Jumps to the selected line before continuing execution",54)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18240,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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 To This Line Ctrl+Shift+G",31)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18241,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18241,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Runs until the selected line is reached",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18242,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18243,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18243,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Toggle #Breakpoint F9",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18244,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18244,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets/clears breakpoint at cursor location",41)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18245,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Clear All Breakpoints F10",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18246,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18246,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes all breakpoints",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18247,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Toggle #Skip Line Ctrl+P",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18248,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18248,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Sets/clears flag to skip line",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18249,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Unskip All Lines Ctrl+F10",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18250,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18250,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes all line skip flags",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18251,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18252,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18252,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18253,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18253,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays a list of SUB/FUNCTION procedures",42)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18254,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Watch List... F4",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18255,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18255,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Adds variables to watch list",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18256,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Call Stack... F12",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18257,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18257,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays the call stack of the current program's execution",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18258,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18259,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18259,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Exit $DEBUG mode ESC",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18260,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18260,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Disconnects from the running program and returns control to the IDE",67)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18261,"ide_methods.bas");}while(r); }else{ S_55173:; if (((-(*__LONG_IDESYSTEM== 1 ))|(-(*__LONG_IDESYSTEM== 2 )))||new_error){ if(qbevent){evnt(25753,18263,"ide_methods.bas");if(r)goto S_55173;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION,FUNC_GETSELECTEDTEXT(&(pass6081= 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18265,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELA2,_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18266,"ide_methods.bas");}while(r); S_55176:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION->len> 0 )))||new_error){ if(qbevent){evnt(25753,18267,"ide_methods.bas");if(r)goto S_55176;} do{ qbs_set(__STRING_IDECONTEXTUALSEARCH,_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18268,"ide_methods.bas");}while(r); S_55178:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELA2->len> 22 )))||new_error){ if(qbevent){evnt(25753,18269,"ide_methods.bas");if(r)goto S_55178;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELA2,qbs_add(qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELA2, 19 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18270,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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_add(qbs_add(qbs_new_txt_len("Find '",6),_SUB_IDEMAKECONTEXTUALMENU_STRING_SELA2),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18272,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18272,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Searches for the text currently selected",40)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18273,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_TOTALSF= 0 ; if(!qbevent)break;evnt(25753,18277,"ide_methods.bas");}while(r); S_55186:; fornext_value6085= 1 ; fornext_finalvalue6085=*__LONG_IDEN; fornext_step6085= 1 ; if (fornext_step6085<0) fornext_step_negative6085=1; else fornext_step_negative6085=0; if (new_error) goto fornext_error6085; goto fornext_entrylabel6085; while(1){ fornext_value6085=fornext_step6085+(*_SUB_IDEMAKECONTEXTUALMENU_LONG_Y); fornext_entrylabel6085: *_SUB_IDEMAKECONTEXTUALMENU_LONG_Y=fornext_value6085; if (fornext_step_negative6085){ if (fornext_value6085fornext_finalvalue6085) break; } fornext_error6085:; if(qbevent){evnt(25753,18278,"ide_methods.bas");if(r)goto S_55186;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,FUNC_IDEGETLINE(_SUB_IDEMAKECONTEXTUALMENU_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18279,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,qbs_ltrim(qbs_rtrim(_SUB_IDEMAKECONTEXTUALMENU_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18280,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_SF= 0 ; if(!qbevent)break;evnt(25753,18281,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_NCA,qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18282,"ide_methods.bas");}while(r); S_55191:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_NCA, 4 ),qbs_new_txt_len("SUB ",4))))||new_error){ if(qbevent){evnt(25753,18283,"ide_methods.bas");if(r)goto S_55191;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_SF= 1 ; if(!qbevent)break;evnt(25753,18283,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SF,qbs_new_txt_len("SUB ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18283,"ide_methods.bas");}while(r); } S_55195:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_NCA, 9 ),qbs_new_txt_len("FUNCTION ",9))))||new_error){ if(qbevent){evnt(25753,18284,"ide_methods.bas");if(r)goto S_55195;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_SF= 2 ; if(!qbevent)break;evnt(25753,18284,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SF,qbs_new_txt_len("FUNC ",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18284,"ide_methods.bas");}while(r); } S_55199:; if ((*_SUB_IDEMAKECONTEXTUALMENU_LONG_SF)||new_error){ if(qbevent){evnt(25753,18285,"ide_methods.bas");if(r)goto S_55199;} S_55200:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_NCA, 7 ),qbs_new_txt_len(" STATIC",7))))||new_error){ if(qbevent){evnt(25753,18286,"ide_methods.bas");if(r)goto S_55200;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,qbs_rtrim(qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,_SUB_IDEMAKECONTEXTUALMENU_STRING_A->len- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18287,"ide_methods.bas");}while(r); } S_55203:; if ((-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_SF== 1 ))||new_error){ if(qbevent){evnt(25753,18290,"ide_methods.bas");if(r)goto S_55203;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,_SUB_IDEMAKECONTEXTUALMENU_STRING_A->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18291,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,_SUB_IDEMAKECONTEXTUALMENU_STRING_A->len- 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18293,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,qbs_ltrim(qbs_rtrim(_SUB_IDEMAKECONTEXTUALMENU_STRING_A))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18296,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_X=func_instr(NULL,_SUB_IDEMAKECONTEXTUALMENU_STRING_A,qbs_new_txt_len("(",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18297,"ide_methods.bas");}while(r); S_55210:; if ((*_SUB_IDEMAKECONTEXTUALMENU_LONG_X)||new_error){ if(qbevent){evnt(25753,18298,"ide_methods.bas");if(r)goto S_55210;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_N,qbs_rtrim(qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,*_SUB_IDEMAKECONTEXTUALMENU_LONG_X- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18299,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_N,_SUB_IDEMAKECONTEXTUALMENU_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18301,"ide_methods.bas");}while(r); do{ SUB_CLEANSUBNAME(_SUB_IDEMAKECONTEXTUALMENU_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18302,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_N2,_SUB_IDEMAKECONTEXTUALMENU_STRING_N); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18305,"ide_methods.bas");}while(r); S_55217:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_N2->len> 1 )))||new_error){ if(qbevent){evnt(25753,18306,"ide_methods.bas");if(r)goto S_55217;} S_55218:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_N2, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,18307,"ide_methods.bas");if(r)goto S_55218;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_N2,qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_N,_SUB_IDEMAKECONTEXTUALMENU_STRING_N2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18308,"ide_methods.bas");}while(r); dl_continue_6090:; } dl_exit_6090:; } do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_TOTALSF=*_SUB_IDEMAKECONTEXTUALMENU_LONG_TOTALSF+ 1 ; if(!qbevent)break;evnt(25753,18313,"ide_methods.bas");}while(r); do{ if (__ARRAY_STRING_SUBFUNCLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SUBFUNCLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_SUBFUNCLIST[2]&1){ preserved_elements=__ARRAY_STRING_SUBFUNCLIST[5]; } else preserved_elements=0; __ARRAY_STRING_SUBFUNCLIST[4]= 1 ; __ARRAY_STRING_SUBFUNCLIST[5]=(*_SUB_IDEMAKECONTEXTUALMENU_LONG_TOTALSF)-__ARRAY_STRING_SUBFUNCLIST[4]+1; __ARRAY_STRING_SUBFUNCLIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_SUBFUNCLIST[5]; if (tmp_long2len)> 0 )))||new_error){ if(qbevent){evnt(25753,18323,"ide_methods.bas");if(r)goto S_55228;} S_55229:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,18324,"ide_methods.bas");if(r)goto S_55229;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION,qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION,_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18325,"ide_methods.bas");}while(r); S_55231:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION->len== 0 )))||new_error){ if(qbevent){evnt(25753,18326,"ide_methods.bas");if(r)goto S_55231;} do{ goto dl_exit_6092; if(!qbevent)break;evnt(25753,18326,"ide_methods.bas");}while(r); } dl_continue_6092:; } dl_exit_6092:; do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION,qbs_ltrim(qbs_rtrim(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18328,"ide_methods.bas");}while(r); } S_55237:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2, 1 ),qbs_new_txt_len("$",1))))||new_error){ if(qbevent){evnt(25753,18331,"ide_methods.bas");if(r)goto S_55237;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A3,qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,_SUB_IDEMAKECONTEXTUALMENU_STRING_A2->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18331,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A3,_SUB_IDEMAKECONTEXTUALMENU_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18331,"ide_methods.bas");}while(r); } S_55242:; if ((qbs_cleanup(qbs_tmp_base,(-(_SUB_IDEMAKECONTEXTUALMENU_STRING_A3->len> 0 ))|(-(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION->len> 0 ))))||new_error){ if(qbevent){evnt(25753,18333,"ide_methods.bas");if(r)goto S_55242;} S_55243:; fornext_value6099= 1 ; fornext_finalvalue6099=*_SUB_IDEMAKECONTEXTUALMENU_LONG_TOTALSF; fornext_step6099= 1 ; if (fornext_step6099<0) fornext_step_negative6099=1; else fornext_step_negative6099=0; if (new_error) goto fornext_error6099; goto fornext_entrylabel6099; while(1){ fornext_value6099=fornext_step6099+(*_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF); fornext_entrylabel6099: *_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF=fornext_value6099; if (fornext_step_negative6099){ if (fornext_value6099fornext_finalvalue6099) break; } fornext_error6099:; if(qbevent){evnt(25753,18335,"ide_methods.bas");if(r)goto S_55243;} S_55244:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDEMAKECONTEXTUALMENU_STRING_A3,qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF)-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])])), 6 ,NULL,0))))|(qbs_equal(qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_SELECTION),qbs_ucase(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF)-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])])), 6 ,NULL,0))))))||new_error){ if(qbevent){evnt(25753,18336,"ide_methods.bas");if(r)goto S_55244;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF,FUNC_FINDCURRENTSF(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18337,"ide_methods.bas");}while(r); S_55246:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF->len== 0 )))||new_error){ if(qbevent){evnt(25753,18338,"ide_methods.bas");if(r)goto S_55246;} do{ goto LABEL_SKIPCHECKCURRSF; if(!qbevent)break;evnt(25753,18338,"ide_methods.bas");}while(r); } S_55249:; while((!(qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(qbs_right(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF, 1 )))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])])))||new_error){ if(qbevent){evnt(25753,18340,"ide_methods.bas");if(r)goto S_55249;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF,qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF,_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18341,"ide_methods.bas");}while(r); S_55251:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF->len== 0 )))||new_error){ if(qbevent){evnt(25753,18342,"ide_methods.bas");if(r)goto S_55251;} do{ goto dl_exit_6101; if(!qbevent)break;evnt(25753,18342,"ide_methods.bas");}while(r); } dl_continue_6101:; } dl_exit_6101:; do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF,qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18344,"ide_methods.bas");}while(r); LABEL_SKIPCHECKCURRSF:; if(qbevent){evnt(25753,18346,"ide_methods.bas");r=0;} S_55256:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF)-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])])), 5 )== 1 )))||new_error){ if(qbevent){evnt(25753,18347,"ide_methods.bas");if(r)goto S_55256;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURSORSF,qbs_new_txt_len("SUB ",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18348,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURSORSF,qbs_new_txt_len("FUNCTION ",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18350,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURSORSF,qbs_add(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURSORSF,func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF)-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])])), 6 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18352,"ide_methods.bas");}while(r); S_55262:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURSORSF),_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF)))||new_error){ if(qbevent){evnt(25753,18354,"ide_methods.bas");if(r)goto S_55262;} do{ goto fornext_exit_6098; if(!qbevent)break;evnt(25753,18355,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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_add(qbs_new_txt_len("#Go To ",7),_SUB_IDEMAKECONTEXTUALMENU_STRING_CURSORSF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18357,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18357,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Jumps to procedure definition",29)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18358,"ide_methods.bas");}while(r); do{ tmp_long=array_check(( 1 )-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[tmp_long])),((qbs*)(((uint64*)(__ARRAY_STRING_SUBFUNCLIST[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_CHECKSF)-__ARRAY_STRING_SUBFUNCLIST[4],__ARRAY_STRING_SUBFUNCLIST[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18359,"ide_methods.bas");}while(r); do{ goto fornext_exit_6098; if(!qbevent)break;evnt(25753,18360,"ide_methods.bas");}while(r); } } fornext_continue_6098:; } fornext_exit_6098:; do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_V= 0 ; if(!qbevent)break;evnt(25753,18365,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF,FUNC_FINDCURRENTSF(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18366,"ide_methods.bas");}while(r); S_55275:; if ((qbs_cleanup(qbs_tmp_base,FUNC_VALIDNAME(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2)))||new_error){ if(qbevent){evnt(25753,18367,"ide_methods.bas");if(r)goto S_55275;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_V=FUNC_HASHFIND(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,&(pass6104= 2 ),_SUB_IDEMAKECONTEXTUALMENU_LONG_IGNORE,_SUB_IDEMAKECONTEXTUALMENU_LONG_R); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18367,"ide_methods.bas");}while(r); } LABEL_CHECKTHISLABEL:; if(qbevent){evnt(25753,18368,"ide_methods.bas");r=0;} S_55278:; if ((*_SUB_IDEMAKECONTEXTUALMENU_LONG_V)||new_error){ if(qbevent){evnt(25753,18369,"ide_methods.bas");if(r)goto S_55278;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_LABELLINENUMBER=*(int32*)(((char*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+278)); if(!qbevent)break;evnt(25753,18370,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_THISLABELSCOPE,FUNC_FINDCURRENTSF(_SUB_IDEMAKECONTEXTUALMENU_LONG_LABELLINENUMBER)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18371,"ide_methods.bas");}while(r); S_55281:; if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_SUB_IDEMAKECONTEXTUALMENU_STRING_THISLABELSCOPE,_SUB_IDEMAKECONTEXTUALMENU_STRING_CURRSF))&(-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_V== 2 ))))||new_error){ if(qbevent){evnt(25753,18372,"ide_methods.bas");if(r)goto S_55281;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_V=FUNC_HASHFINDCONT(_SUB_IDEMAKECONTEXTUALMENU_LONG_IGNORE,_SUB_IDEMAKECONTEXTUALMENU_LONG_R); if(!qbevent)break;evnt(25753,18373,"ide_methods.bas");}while(r); do{ goto LABEL_CHECKTHISLABEL; if(!qbevent)break;evnt(25753,18374,"ide_methods.bas");}while(r); } S_55285:; if (((-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_LABELLINENUMBER> 0 ))&(-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_LABELLINENUMBER!=*__LONG_IDECY)))||new_error){ if(qbevent){evnt(25753,18376,"ide_methods.bas");if(r)goto S_55285;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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_add(qbs_new_txt_len("Go To #Label ",13),qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_LABELS[0])+((array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_R)-__ARRAY_UDT_LABELS[4],__ARRAY_UDT_LABELS[5]))*282+1)),256,1)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18377,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18377,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Jumps to label",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18378,"ide_methods.bas");}while(r); do{ if (__ARRAY_STRING_SUBFUNCLIST[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_SUBFUNCLIST)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_SUBFUNCLIST[2]&1){ preserved_elements=__ARRAY_STRING_SUBFUNCLIST[5]; } else preserved_elements=0; __ARRAY_STRING_SUBFUNCLIST[4]= 1 ; __ARRAY_STRING_SUBFUNCLIST[5]=(func_ubound(__ARRAY_STRING_SUBFUNCLIST,1,1)+ 1 )-__ARRAY_STRING_SUBFUNCLIST[4]+1; __ARRAY_STRING_SUBFUNCLIST[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_SUBFUNCLIST[5]; if (tmp_long2len> 0 )))||new_error){ if(qbevent){evnt(25753,18385,"ide_methods.bas");if(r)goto S_55294;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_LNKS= 0 ; if(!qbevent)break;evnt(25753,18387,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_L2,FUNC_FINDHELPTOPIC(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,_SUB_IDEMAKECONTEXTUALMENU_LONG_LNKS,&(pass6106= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18388,"ide_methods.bas");}while(r); S_55297:; if ((*_SUB_IDEMAKECONTEXTUALMENU_LONG_LNKS)||new_error){ if(qbevent){evnt(25753,18390,"ide_methods.bas");if(r)goto S_55297;} S_55298:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEMAKECONTEXTUALMENU_STRING_L2->len> 15 )))||new_error){ if(qbevent){evnt(25753,18391,"ide_methods.bas");if(r)goto S_55298;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_L2,qbs_add(qbs_left(_SUB_IDEMAKECONTEXTUALMENU_STRING_L2, 12 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18392,"ide_methods.bas");}while(r); } S_55301:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDEMAKECONTEXTUALMENU_STRING_L2,qbs_new_txt_len("PARENTHESIS",11),0)== 0 )))||new_error){ if(qbevent){evnt(25753,18394,"ide_methods.bas");if(r)goto S_55301;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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_add(qbs_add(qbs_new_txt_len("#Help On '",10),_SUB_IDEMAKECONTEXTUALMENU_STRING_L2),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18395,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18395,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Opens help article on the selected term",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18396,"ide_methods.bas");}while(r); } } } S_55308:; if ((-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_I> 1 ))||new_error){ if(qbevent){evnt(25753,18401,"ide_methods.bas");if(r)goto S_55308;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18402,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18402,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18406,"ide_methods.bas");}while(r); S_55313:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,18407,"ide_methods.bas");if(r)goto S_55313;} S_55314:; if ((-(*__LONG_IDESELECTY1!=*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,18408,"ide_methods.bas");if(r)goto S_55314;} do{ goto LABEL_NORGBFOUND; if(!qbevent)break;evnt(25753,18408,"ide_methods.bas");}while(r); } } do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB= 0 ; if(!qbevent)break;evnt(25753,18411,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB=*_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_A),qbs_new_txt_len("RGB(",4),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18412,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB=*_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_A),qbs_new_txt_len("RGB32(",6),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18413,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB=*_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_A),qbs_new_txt_len("RGBA(",5),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18414,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB=*_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB+func_instr(NULL,qbs_ucase(_SUB_IDEMAKECONTEXTUALMENU_STRING_A),qbs_new_txt_len("RGBA32(",7),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18415,"ide_methods.bas");}while(r); S_55323:; if ((*_SUB_IDEMAKECONTEXTUALMENU_LONG_FOUND_RGB)||new_error){ if(qbevent){evnt(25753,18416,"ide_methods.bas");if(r)goto S_55323;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#RGB Color Mixer...",19)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18417,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18417,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Allows mixing colors to edit/insert _RGB statements",51)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18418,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18419,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18419,"ide_methods.bas");}while(r); } LABEL_NORGBFOUND:; if(qbevent){evnt(25753,18421,"ide_methods.bas");r=0;} S_55330:; if (((-(*__LONG_IDESELECT!= 0 )))||new_error){ if(qbevent){evnt(25753,18424,"ide_methods.bas");if(r)goto S_55330;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18425,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18425,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text and copies it to clipboard",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18426,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18427,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18427,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Copies selected text to clipboard",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18428,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18431,"ide_methods.bas");}while(r); S_55339:; if ((qbs_cleanup(qbs_tmp_base,_SUB_IDEMAKECONTEXTUALMENU_STRING_CLIP->len))||new_error){ if(qbevent){evnt(25753,18432,"ide_methods.bas");if(r)goto S_55339;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18433,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18433,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Inserts clipboard contents at current location",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18434,"ide_methods.bas");}while(r); } S_55344:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,18437,"ide_methods.bas");if(r)goto S_55344;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18438,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18438,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18439,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18441,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18441,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Selects all contents of current program",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18442,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18443,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18443,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("To#ggle Comment Ctrl+T",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18444,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18444,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles comment (') on the current selection",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18445,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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 Co#mment (') Ctrl+R",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18446,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18446,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Adds comment marker (') to the current selection",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18447,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Remove Comme#nt (') Ctrl+Shift+R",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18448,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18448,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes comment marker (') from the current selection",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18449,"ide_methods.bas");}while(r); S_55363:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,18450,"ide_methods.bas");if(r)goto S_55363;} do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,18451,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_Y2=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,18452,"ide_methods.bas");}while(r); S_55366:; if ((-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_Y1==*_SUB_IDEMAKECONTEXTUALMENU_LONG_Y2))||new_error){ if(qbevent){evnt(25753,18453,"ide_methods.bas");if(r)goto S_55366;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18454,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18455,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,18456,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,18456,"ide_methods.bas");}while(r); S_55371:; if ((-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_SX2<*_SUB_IDEMAKECONTEXTUALMENU_LONG_SX1))||new_error){ if(qbevent){evnt(25753,18457,"ide_methods.bas");if(r)goto S_55371;} do{ swap_32(&*_SUB_IDEMAKECONTEXTUALMENU_LONG_SX1,&*_SUB_IDEMAKECONTEXTUALMENU_LONG_SX2); if(!qbevent)break;evnt(25753,18457,"ide_methods.bas");}while(r); } S_55374:; fornext_value6110=*_SUB_IDEMAKECONTEXTUALMENU_LONG_SX1; fornext_finalvalue6110=*_SUB_IDEMAKECONTEXTUALMENU_LONG_SX2- 1 ; fornext_step6110= 1 ; if (fornext_step6110<0) fornext_step_negative6110=1; else fornext_step_negative6110=0; if (new_error) goto fornext_error6110; goto fornext_entrylabel6110; while(1){ fornext_value6110=fornext_step6110+(*_SUB_IDEMAKECONTEXTUALMENU_LONG_X); fornext_entrylabel6110: *_SUB_IDEMAKECONTEXTUALMENU_LONG_X=fornext_value6110; if (fornext_step_negative6110){ if (fornext_value6110fornext_finalvalue6110) break; } fornext_error6110:; if(qbevent){evnt(25753,18458,"ide_methods.bas");if(r)goto S_55374;} S_55375:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEMAKECONTEXTUALMENU_LONG_X<=_SUB_IDEMAKECONTEXTUALMENU_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,18459,"ide_methods.bas");if(r)goto S_55375;} do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,qbs_add(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,func_mid(_SUB_IDEMAKECONTEXTUALMENU_STRING_A,*_SUB_IDEMAKECONTEXTUALMENU_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18459,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,qbs_add(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18459,"ide_methods.bas");}while(r); } fornext_continue_6109:; } fornext_exit_6109:; S_55381:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDEMAKECONTEXTUALMENU_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,18461,"ide_methods.bas");if(r)goto S_55381;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Increase Indent TAB",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18462,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18462,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18463,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Decrease Indent",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18464,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18465,"ide_methods.bas");}while(r); S_55387:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18466,"ide_methods.bas");if(r)goto S_55387;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18466,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18467,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18468,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18468,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Increase Indent TAB",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18471,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18471,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18472,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("#Decrease Indent",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18473,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18474,"ide_methods.bas");}while(r); S_55400:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18475,"ide_methods.bas");if(r)goto S_55400;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18475,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18476,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18477,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18477,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18480,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18480,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18482,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18482,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Creates a new subprocedure at the end of the current program",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18483,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18484,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18484,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Creates a new function at the end of the current program",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18485,"ide_methods.bas");}while(r); S_55417:; }else{ if (-(*__LONG_IDESYSTEM== 3 )){ if(qbevent){evnt(25753,18486,"ide_methods.bas");if(r)goto S_55417;} S_55418:; if (((-(*__LONG_HELP_SELECT== 2 )))||new_error){ if(qbevent){evnt(25753,18487,"ide_methods.bas");if(r)goto S_55418;} do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18488,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18488,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Copies selected text to clipboard",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18489,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18491,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18491,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Selects all contents of current article",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18492,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18493,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18493,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18494,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18494,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays help contents page",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18495,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18496,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18496,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays keyword index page",27)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18497,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18498,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18498,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Displays keywords index by usage",32)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18499,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18500,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18500,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18501,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18501,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Downloads the latest version of this article from the wiki",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18502,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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...",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18503,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18503,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Downloads the latest version of all articles from the wiki",58)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18504,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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 Current Page On #Wiki",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18505,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18505,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Launches the default browser and navigates to the current article on the wiki",77)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18506,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18507,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18507,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_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("Clo#se Help ESC",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18508,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKECONTEXTUALMENU_LONG_I=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18508,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Closes help window",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18509,"ide_methods.bas");}while(r); } } } do{ tmp_long=array_check((*_SUB_IDEMAKECONTEXTUALMENU_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_SUB_IDEMAKECONTEXTUALMENU_LONG_I- 1 ; if(!qbevent)break;evnt(25753,18512,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free234.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_IDEMAKEEDITMENU(){ 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 "data235.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_IDEMAKEEDITMENU_LONG_M=*__INTEGER_IDEEDITMENUID; if(!qbevent)break;evnt(25753,18516,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I= 0 ; if(!qbevent)break;evnt(25753,18516,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18517,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18517,"ide_methods.bas");}while(r); S_55460:; if ((-(*__LONG_IDESYSTEM== 1 ))||new_error){ if(qbevent){evnt(25753,18519,"ide_methods.bas");if(r)goto S_55460;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18520,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18520,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Restores program state before last edit",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18521,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18522,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18522,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Redoes latest undo action",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18523,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18525,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18525,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Restores program state before last edit",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18526,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",14)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18527,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18527,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Redoes latest undo action",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18528,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18530,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18530,"ide_methods.bas");}while(r); S_55477:; if (((((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_IDESELECT== 1 ))))|(-(*__LONG_IDESYSTEM== 2 )))||new_error){ if(qbevent){evnt(25753,18532,"ide_methods.bas");if(r)goto S_55477;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18533,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18533,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text and copies it to clipboard",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18534,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18535,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18535,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Copies selected text to clipboard",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18536,"ide_methods.bas");}while(r); S_55484:; }else{ if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))){ if(qbevent){evnt(25753,18537,"ide_methods.bas");if(r)goto S_55484;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18538,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18538,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text and copies it to clipboard",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18539,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18540,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18540,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Copies selected text to clipboard",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18541,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18543,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18543,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text and copies it to clipboard",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18544,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18545,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18545,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Copies selected text to clipboard",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18546,"ide_methods.bas");}while(r); } } do{ qbs_set(_SUB_IDEMAKEEDITMENU_STRING_CLIP,func__clipboard()); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18549,"ide_methods.bas");}while(r); S_55500:; if ((qbs_cleanup(qbs_tmp_base,(((-(_SUB_IDEMAKEEDITMENU_STRING_CLIP->len> 0 ))&(-(*__LONG_IDESYSTEM== 1 ))))|(-(*__LONG_IDESYSTEM== 2 ))))||new_error){ if(qbevent){evnt(25753,18550,"ide_methods.bas");if(r)goto S_55500;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18551,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18551,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Inserts clipboard contents at current location",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18552,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18554,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18554,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Inserts clipboard contents at current location",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18555,"ide_methods.bas");}while(r); } S_55509:; if (((((-(*__LONG_IDESYSTEM== 1 ))&(-(*__LONG_IDESELECT== 1 ))))|(-(*__LONG_IDESYSTEM== 2 )))||new_error){ if(qbevent){evnt(25753,18558,"ide_methods.bas");if(r)goto S_55509;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18559,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18559,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18560,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18562,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18562,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Deletes selected text",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18563,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18566,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18566,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Selects all contents of current program",39)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18567,"ide_methods.bas");}while(r); S_55521:; if ((-(*__LONG_IDESYSTEM== 1 ))||new_error){ if(qbevent){evnt(25753,18569,"ide_methods.bas");if(r)goto S_55521;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18570,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18570,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("To#ggle Comment Ctrl+T",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18571,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18571,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles comment (') on the current selection",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18572,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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 Co#mment (') Ctrl+R",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18573,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18573,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Adds comment marker (') to the current selection",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18574,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("Remove Comme#nt (') Ctrl+Shift+R",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18575,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18575,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes comment marker (') from the current selection",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18576,"ide_methods.bas");}while(r); S_55533:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,18577,"ide_methods.bas");if(r)goto S_55533;} do{ *_SUB_IDEMAKEEDITMENU_LONG_Y1=*__LONG_IDECY; if(!qbevent)break;evnt(25753,18578,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_Y2=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,18579,"ide_methods.bas");}while(r); S_55536:; if ((-(*_SUB_IDEMAKEEDITMENU_LONG_Y1==*_SUB_IDEMAKEEDITMENU_LONG_Y2))||new_error){ if(qbevent){evnt(25753,18580,"ide_methods.bas");if(r)goto S_55536;} do{ qbs_set(_SUB_IDEMAKEEDITMENU_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18581,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEMAKEEDITMENU_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18582,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,18583,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,18583,"ide_methods.bas");}while(r); S_55541:; if ((-(*_SUB_IDEMAKEEDITMENU_LONG_SX2<*_SUB_IDEMAKEEDITMENU_LONG_SX1))||new_error){ if(qbevent){evnt(25753,18584,"ide_methods.bas");if(r)goto S_55541;} do{ swap_32(&*_SUB_IDEMAKEEDITMENU_LONG_SX1,&*_SUB_IDEMAKEEDITMENU_LONG_SX2); if(!qbevent)break;evnt(25753,18584,"ide_methods.bas");}while(r); } S_55544:; fornext_value6114=*_SUB_IDEMAKEEDITMENU_LONG_SX1; fornext_finalvalue6114=*_SUB_IDEMAKEEDITMENU_LONG_SX2- 1 ; fornext_step6114= 1 ; if (fornext_step6114<0) fornext_step_negative6114=1; else fornext_step_negative6114=0; if (new_error) goto fornext_error6114; goto fornext_entrylabel6114; while(1){ fornext_value6114=fornext_step6114+(*_SUB_IDEMAKEEDITMENU_LONG_X); fornext_entrylabel6114: *_SUB_IDEMAKEEDITMENU_LONG_X=fornext_value6114; if (fornext_step_negative6114){ if (fornext_value6114fornext_finalvalue6114) break; } fornext_error6114:; if(qbevent){evnt(25753,18585,"ide_methods.bas");if(r)goto S_55544;} S_55545:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEMAKEEDITMENU_LONG_X<=_SUB_IDEMAKEEDITMENU_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,18586,"ide_methods.bas");if(r)goto S_55545;} do{ qbs_set(_SUB_IDEMAKEEDITMENU_STRING_A2,qbs_add(_SUB_IDEMAKEEDITMENU_STRING_A2,func_mid(_SUB_IDEMAKEEDITMENU_STRING_A,*_SUB_IDEMAKEEDITMENU_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18586,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_IDEMAKEEDITMENU_STRING_A2,qbs_add(_SUB_IDEMAKEEDITMENU_STRING_A2,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18586,"ide_methods.bas");}while(r); } fornext_continue_6113:; } fornext_exit_6113:; S_55551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDEMAKEEDITMENU_STRING_A2,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,18588,"ide_methods.bas");if(r)goto S_55551;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~#Increase Indent TAB",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18589,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18589,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18590,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~#Decrease Indent",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18591,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18592,"ide_methods.bas");}while(r); S_55557:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18593,"ide_methods.bas");if(r)goto S_55557;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18593,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18594,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("#Increase Indent TAB",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18596,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18596,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18597,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("#Decrease Indent",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18598,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18599,"ide_methods.bas");}while(r); S_55567:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18600,"ide_methods.bas");if(r)goto S_55567;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18600,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18601,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("#Increase Indent TAB",21)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18604,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18604,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18605,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("#Decrease Indent",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18606,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18607,"ide_methods.bas");}while(r); S_55578:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18608,"ide_methods.bas");if(r)goto S_55578;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18608,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18609,"ide_methods.bas");}while(r); } }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~#Increase Indent TAB",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18612,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18612,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18613,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~#Decrease Indent",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18614,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18615,"ide_methods.bas");}while(r); S_55589:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18616,"ide_methods.bas");if(r)goto S_55589;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18616,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18617,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18619,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18619,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18620,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18620,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Creates a new subprocedure at the end of the current program",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18621,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18622,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18622,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Creates a new function at the end of the current program",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18623,"ide_methods.bas");}while(r); }else{ do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18625,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18625,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~To#ggle Comment Ctrl+T",24)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18626,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18626,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Toggles comment (') on the current selection",44)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18627,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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 Co#mment (') Ctrl+R",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18628,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18628,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Adds comment marker (') to the current selection",48)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18629,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~Remove Comme#nt (') Ctrl+Shift+R",34)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18630,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18630,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Removes comment marker (') from the current selection",53)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18631,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~#Increase Indent TAB",22)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18632,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18632,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Increases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18633,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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("~#Decrease Indent",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18634,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Decreases indentation of the current selection",46)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18635,"ide_methods.bas");}while(r); S_55619:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)|func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0)))||new_error){ if(qbevent){evnt(25753,18636,"ide_methods.bas");if(r)goto S_55619;} do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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_add(((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6]])),qbs_new_txt_len(" Shift+TAB",11))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18636,"ide_methods.bas");}while(r); } do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18637,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18638,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18638,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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...",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18639,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18639,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Creates a new subprocedure at the end of the current program",60)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18640,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*_SUB_IDEMAKEEDITMENU_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...",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18641,"ide_methods.bas");}while(r); do{ *_SUB_IDEMAKEEDITMENU_LONG_I=*_SUB_IDEMAKEEDITMENU_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18641,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_STRING_MENUDESC[8],__ARRAY_STRING_MENUDESC[9])+array_check((*_SUB_IDEMAKEEDITMENU_LONG_I- 1 )-__ARRAY_STRING_MENUDESC[4],__ARRAY_STRING_MENUDESC[5])*__ARRAY_STRING_MENUDESC[6]; if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENUDESC[0]))[tmp_long])),qbs_new_txt_len("Creates a new function at the end of the current program",56)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18642,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_IDEMAKEEDITMENU_LONG_M)-__ARRAY_LONG_MENUSIZE[4],__ARRAY_LONG_MENUSIZE[5]); if (!new_error) ((int32*)(__ARRAY_LONG_MENUSIZE[0]))[tmp_long]=*_SUB_IDEMAKEEDITMENU_LONG_I- 1 ; if(!qbevent)break;evnt(25753,18644,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free235.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 "data236.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_IDEADDRECENT_STRING_F,_SUB_IDEADDRECENT_STRING_F2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18648,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEADDRECENT_STRING_F,FUNC_REMOVEDOUBLESLASHES(_SUB_IDEADDRECENT_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18650,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_IDEADDRECENT_STRING_F,qbs_add(qbs_add(__STRING_CRLF,_SUB_IDEADDRECENT_STRING_F),__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18652,"ide_methods.bas");}while(r); do{ *_SUB_IDEADDRECENT_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,18653,"ide_methods.bas");}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(25753,18654,"ide_methods.bas");}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(25753,18654,"ide_methods.bas");}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(25753,18654,"ide_methods.bas");}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(25753,18655,"ide_methods.bas");}while(r); S_55641:; if ((*_SUB_IDEADDRECENT_LONG_X)||new_error){ if(qbevent){evnt(25753,18656,"ide_methods.bas");if(r)goto S_55641;} 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(25753,18657,"ide_methods.bas");}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(25753,18659,"ide_methods.bas");}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_6119),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18661,"ide_methods.bas");}while(r); do{ sub_close(*_SUB_IDEADDRECENT_LONG_FH,1); if(!qbevent)break;evnt(25753,18662,"ide_methods.bas");}while(r); do{ SUB_IDEMAKEFILEMENU(); if(!qbevent)break;evnt(25753,18663,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free236.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_REMOVEDOUBLESLASHES(qbs*_FUNC_REMOVEDOUBLESLASHES_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 "data237.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_REMOVEDOUBLESLASHES_LONG_X=func_instr(NULL,_FUNC_REMOVEDOUBLESLASHES_STRING_F,qbs_new_txt_len("//",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18667,"ide_methods.bas");}while(r); S_55650:; while((*_FUNC_REMOVEDOUBLESLASHES_LONG_X)||new_error){ if(qbevent){evnt(25753,18668,"ide_methods.bas");if(r)goto S_55650;} do{ qbs_set(_FUNC_REMOVEDOUBLESLASHES_STRING_F,qbs_add(qbs_left(_FUNC_REMOVEDOUBLESLASHES_STRING_F,*_FUNC_REMOVEDOUBLESLASHES_LONG_X- 1 ),func_mid(_FUNC_REMOVEDOUBLESLASHES_STRING_F,*_FUNC_REMOVEDOUBLESLASHES_LONG_X+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18669,"ide_methods.bas");}while(r); do{ *_FUNC_REMOVEDOUBLESLASHES_LONG_X=func_instr(NULL,_FUNC_REMOVEDOUBLESLASHES_STRING_F,qbs_new_txt_len("//",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18670,"ide_methods.bas");}while(r); dl_continue_6121:; } dl_exit_6121:; do{ *_FUNC_REMOVEDOUBLESLASHES_LONG_X=func_instr(NULL,_FUNC_REMOVEDOUBLESLASHES_STRING_F,qbs_new_txt_len("\\\\",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18673,"ide_methods.bas");}while(r); S_55655:; while((*_FUNC_REMOVEDOUBLESLASHES_LONG_X)||new_error){ if(qbevent){evnt(25753,18674,"ide_methods.bas");if(r)goto S_55655;} do{ qbs_set(_FUNC_REMOVEDOUBLESLASHES_STRING_F,qbs_add(qbs_left(_FUNC_REMOVEDOUBLESLASHES_STRING_F,*_FUNC_REMOVEDOUBLESLASHES_LONG_X- 1 ),func_mid(_FUNC_REMOVEDOUBLESLASHES_STRING_F,*_FUNC_REMOVEDOUBLESLASHES_LONG_X+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18675,"ide_methods.bas");}while(r); do{ *_FUNC_REMOVEDOUBLESLASHES_LONG_X=func_instr(NULL,_FUNC_REMOVEDOUBLESLASHES_STRING_F,qbs_new_txt_len("\\\\",2),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18676,"ide_methods.bas");}while(r); dl_continue_6122:; } dl_exit_6122:; do{ qbs_set(_FUNC_REMOVEDOUBLESLASHES_STRING_REMOVEDOUBLESLASHES,_FUNC_REMOVEDOUBLESLASHES_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18679,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free237.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_REMOVEDOUBLESLASHES_STRING_REMOVEDOUBLESLASHES);return _FUNC_REMOVEDOUBLESLASHES_STRING_REMOVEDOUBLESLASHES; } 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 "data238.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_IDEADDSEARCHED_STRING_S,qbs_add(_SUB_IDEADDSEARCHED_STRING_S2,__STRING_CRLF)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18683,"ide_methods.bas");}while(r); do{ *_SUB_IDEADDSEARCHED_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,18684,"ide_methods.bas");}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(25753,18685,"ide_methods.bas");}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(25753,18685,"ide_methods.bas");}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(25753,18685,"ide_methods.bas");}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(25753,18686,"ide_methods.bas");}while(r); S_55666:; if ((*_SUB_IDEADDSEARCHED_LONG_X)||new_error){ if(qbevent){evnt(25753,18687,"ide_methods.bas");if(r)goto S_55666;} 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(25753,18688,"ide_methods.bas");}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(25753,18690,"ide_methods.bas");}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_6126),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18692,"ide_methods.bas");}while(r); do{ sub_close(*_SUB_IDEADDSEARCHED_LONG_FH,1); if(!qbevent)break;evnt(25753,18693,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free238.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_IDEUPDATEHELPBOX(){ 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 "data239.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_IDEUPDATEHELPBOX_LONG_IDEUPDATEHELPBOX= 0 ; if(!qbevent)break;evnt(25753,18697,"ide_methods.bas");}while(r); S_55674:; if ((-(*__LONG_HELP_RECACHING== 2 ))||new_error){ if(qbevent){evnt(25753,18698,"ide_methods.bas");if(r)goto S_55674;} do{ if (_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]&2){ error(10); }else{ if (_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4]= 1 ; _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]=( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4]+1; _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[6]=1; _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]=(ptrszint)malloc(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]*8); if (!_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]) error(257); _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]|=1; tmp_long=_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]; if (_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(25753,18699,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP= 1 ; if(!qbevent)break;evnt(25753,18700,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WW= 78 ; if(!qbevent)break;evnt(25753,18701,"ide_methods.bas");}while(r); do{ goto LABEL_STARTMAINLOOP; if(!qbevent)break;evnt(25753,18702,"ide_methods.bas");}while(r); } do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,18706,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,18707,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18708,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,18709,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18710,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,18711,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18712,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18713,"ide_methods.bas");}while(r); S_55688:; if ((-(*__LONG_IDEHELP== 0 ))||new_error){ if(qbevent){evnt(25753,18717,"ide_methods.bas");if(r)goto S_55688;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_OLD_IDESUBWINDOW=*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,18718,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_OLD_IDEWY=*__LONG_IDEWY; if(!qbevent)break;evnt(25753,18718,"ide_methods.bas");}while(r); do{ *__LONG_IDESUBWINDOW=*__LONG_IDEWY/ 2 ; if(!qbevent)break;evnt(25753,18719,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*__LONG_IDEWY-*__LONG_IDESUBWINDOW; if(!qbevent)break;evnt(25753,18719,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX1= 2 ; if(!qbevent)break;evnt(25753,18720,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY1=*__LONG_IDEWY+ 1 ; if(!qbevent)break;evnt(25753,18720,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WX2=*__LONG_IDEWX- 1 ; if(!qbevent)break;evnt(25753,18720,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WY2=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 2 ; if(!qbevent)break;evnt(25753,18720,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WW=*__LONG_HELP_WX2-*__LONG_HELP_WX1+ 1 ; if(!qbevent)break;evnt(25753,18720,"ide_methods.bas");}while(r); do{ *__LONG_HELP_WH=*__LONG_HELP_WY2-*__LONG_HELP_WY1+ 1 ; if(!qbevent)break;evnt(25753,18720,"ide_methods.bas");}while(r); do{ *__LONG_IDESUBWINDOW=*_FUNC_IDEUPDATEHELPBOX_LONG_OLD_IDESUBWINDOW; if(!qbevent)break;evnt(25753,18721,"ide_methods.bas");}while(r); do{ *__LONG_IDEWY=*_FUNC_IDEUPDATEHELPBOX_LONG_OLD_IDEWY; if(!qbevent)break;evnt(25753,18721,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEUPDATEHELPBOX_LONG_MESSAGELINES= 2 ; if(!qbevent)break;evnt(25753,18724,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]&2){ error(10); }else{ if (_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4]= 1 ; _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]=( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4]+1; _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[6]=1; _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]=(ptrszint)malloc(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]*8); if (!_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]) error(257); _FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]|=1; tmp_long=_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]; if (_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[2]&4){ while(tmp_long--) ((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=(uint64)qbs_new(0,0); } } } if(!qbevent)break;evnt(25753,18725,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP= 1 ; if(!qbevent)break;evnt(25753,18726,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,18728,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_W2=_FUNC_IDEUPDATEHELPBOX_STRING_TITLESTR->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18729,"ide_methods.bas");}while(r); S_55707:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_W<*_FUNC_IDEUPDATEHELPBOX_LONG_W2))||new_error){ if(qbevent){evnt(25753,18730,"ide_methods.bas");if(r)goto S_55707;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_W=*_FUNC_IDEUPDATEHELPBOX_LONG_W2; if(!qbevent)break;evnt(25753,18730,"ide_methods.bas");}while(r); } S_55710:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_W>(*__LONG_IDEWX- 4 )))||new_error){ if(qbevent){evnt(25753,18731,"ide_methods.bas");if(r)goto S_55710;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_W=*__LONG_IDEWX- 4 ; if(!qbevent)break;evnt(25753,18731,"ide_methods.bas");}while(r); } do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEUPDATEHELPBOX_UDT_P)) + (0) ),&(pass6128= 60 ),&(pass6129= 6 ),qbs_new_txt_len("Update Help",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18732,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_I=*_FUNC_IDEUPDATEHELPBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18734,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_BUTTONID=*_FUNC_IDEUPDATEHELPBOX_LONG_I; if(!qbevent)break;evnt(25753,18735,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,18736,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+24))= 6 ; if(!qbevent)break;evnt(25753,18737,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_new_txt_len("#Cancel",7)); if(!qbevent)break;evnt(25753,18738,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,18739,"ide_methods.bas");}while(r); S_55720:; fornext_value6131= 1 ; fornext_finalvalue6131= 100 ; fornext_step6131= 1 ; if (fornext_step6131<0) fornext_step_negative6131=1; else fornext_step_negative6131=0; if (new_error) goto fornext_error6131; goto fornext_entrylabel6131; while(1){ fornext_value6131=fornext_step6131+(*_FUNC_IDEUPDATEHELPBOX_LONG_I); fornext_entrylabel6131: *_FUNC_IDEUPDATEHELPBOX_LONG_I=fornext_value6131; if (fornext_step_negative6131){ if (fornext_value6131fornext_finalvalue6131) break; } fornext_error6131:; if(qbevent){evnt(25753,18743,"ide_methods.bas");if(r)goto S_55720;} do{ memcpy(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,18743,"ide_methods.bas");}while(r); fornext_continue_6130:; } fornext_exit_6130:; LABEL_STARTMAINLOOP:; if(qbevent){evnt(25753,18746,"ide_methods.bas");r=0;} S_55723:; do{ if(qbevent){evnt(25753,18747,"ide_methods.bas");if(r)goto S_55723;} S_55724:; if ((-(*__LONG_HELP_RECACHING== 2 ))||new_error){ if(qbevent){evnt(25753,18748,"ide_methods.bas");if(r)goto S_55724;} do{ goto LABEL_UPDATEROUTINE; if(!qbevent)break;evnt(25753,18748,"ide_methods.bas");}while(r); } do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEUPDATEHELPBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,18751,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,18752,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,18752,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,18752,"ide_methods.bas");}while(r); S_55731:; fornext_value6134= 1 ; fornext_finalvalue6134= 100 ; fornext_step6134= 1 ; if (fornext_step6134<0) fornext_step_negative6134=1; else fornext_step_negative6134=0; if (new_error) goto fornext_error6134; goto fornext_entrylabel6134; while(1){ fornext_value6134=fornext_step6134+(*_FUNC_IDEUPDATEHELPBOX_LONG_I); fornext_entrylabel6134: *_FUNC_IDEUPDATEHELPBOX_LONG_I=fornext_value6134; if (fornext_step_negative6134){ if (fornext_value6134fornext_finalvalue6134) break; } fornext_error6134:; if(qbevent){evnt(25753,18753,"ide_methods.bas");if(r)goto S_55731;} S_55732:; if ((*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,18754,"ide_methods.bas");if(r)goto S_55732;} do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS-*_FUNC_IDEUPDATEHELPBOX_LONG_F; if(!qbevent)break;evnt(25753,18757,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,18758,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,18758,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEUPDATEHELPBOX_LONG_F); if(!qbevent)break;evnt(25753,18759,"ide_methods.bas");}while(r); S_55737:; if ((*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,18760,"ide_methods.bas");if(r)goto S_55737;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,18760,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,18760,"ide_methods.bas");}while(r); } } fornext_continue_6133:; } fornext_exit_6133:; do{ *_FUNC_IDEUPDATEHELPBOX_LONG_LASTFOCUS=*_FUNC_IDEUPDATEHELPBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,18763,"ide_methods.bas");}while(r); S_55744:; if(qbevent){evnt(25753,18768,"ide_methods.bas");if(r)goto S_55744;} S_55745:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 1 )))||new_error){ if(qbevent){evnt(25753,18769,"ide_methods.bas");if(r)goto S_55745;} do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("Generating list of cached content...",36)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18770,"ide_methods.bas");}while(r); sc_ec_412_end:; goto sc_6135_end; } S_55747:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 2 )))||new_error){ if(qbevent){evnt(25753,18771,"ide_methods.bas");if(r)goto S_55747;} do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("Adding core help pages to list...",33)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18772,"ide_methods.bas");}while(r); sc_ec_413_end:; goto sc_6135_end; } S_55749:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 3 )))||new_error){ if(qbevent){evnt(25753,18773,"ide_methods.bas");if(r)goto S_55749;} do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("Regenerating keyword list...",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18774,"ide_methods.bas");}while(r); sc_ec_414_end:; goto sc_6135_end; } S_55751:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 4 )))||new_error){ if(qbevent){evnt(25753,18775,"ide_methods.bas");if(r)goto S_55751;} do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("Building download queue...",26)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18776,"ide_methods.bas");}while(r); sc_ec_415_end:; goto sc_6135_end; } S_55753:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 5 )))||new_error){ if(qbevent){evnt(25753,18777,"ide_methods.bas");if(r)goto S_55753;} do{ tmp_long=array_check(( 1 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Updating help content file ",27),FUNC_STR2(_FUNC_IDEUPDATEHELPBOX_LONG_N)),qbs_new_txt_len("/",1)),FUNC_STR2(_FUNC_IDEUPDATEHELPBOX_LONG_C)),qbs_new_txt_len("...",3))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18778,"ide_methods.bas");}while(r); sc_ec_416_end:; goto sc_6135_end; } sc_6135_end:; S_55756:; fornext_value6137= 1 ; fornext_finalvalue6137=*_FUNC_IDEUPDATEHELPBOX_LONG_MESSAGELINES; fornext_step6137= 1 ; if (fornext_step6137<0) fornext_step_negative6137=1; else fornext_step_negative6137=0; if (new_error) goto fornext_error6137; goto fornext_entrylabel6137; while(1){ fornext_value6137=fornext_step6137+(*_FUNC_IDEUPDATEHELPBOX_LONG_I); fornext_entrylabel6137: *_FUNC_IDEUPDATEHELPBOX_LONG_I=fornext_value6137; if (fornext_step_negative6137){ if (fornext_value6137fornext_finalvalue6137) break; } fornext_error6137:; if(qbevent){evnt(25753,18781,"ide_methods.bas");if(r)goto S_55756;} S_55757:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_I== 1 ))||new_error){ if(qbevent){evnt(25753,18782,"ide_methods.bas");if(r)goto S_55757;} do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,18782,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,18782,"ide_methods.bas");}while(r); } S_55762:; if ((qbs_cleanup(qbs_tmp_base,-((((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len)>(*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(8))- 2 ))))||new_error){ if(qbevent){evnt(25753,18783,"ide_methods.bas");if(r)goto S_55762;} do{ tmp_long=array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_add(qbs_left(((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5])])),*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(8))- 5 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18784,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(0))+((*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(8))/ 2 )-(((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5])]))->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(4))+ 1 +*_FUNC_IDEUPDATEHELPBOX_LONG_I,((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5])])),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18786,"ide_methods.bas");}while(r); fornext_continue_6136:; } fornext_exit_6136:; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,18789,"ide_methods.bas");}while(r); S_55768:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP== 5 ))||new_error){ if(qbevent){evnt(25753,18790,"ide_methods.bas");if(r)goto S_55768;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_MAXPROGRESSWIDTH= 52 ; if(!qbevent)break;evnt(25753,18791,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_PERCENTAGE=qbr(floor(*_FUNC_IDEUPDATEHELPBOX_LONG_N/ ((long double)(*_FUNC_IDEUPDATEHELPBOX_LONG_C))* 100 )); if(!qbevent)break;evnt(25753,18792,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_PERCENTAGECHARS=qbr(floor(*_FUNC_IDEUPDATEHELPBOX_LONG_MAXPROGRESSWIDTH**_FUNC_IDEUPDATEHELPBOX_LONG_N/ ((long double)(*_FUNC_IDEUPDATEHELPBOX_LONG_C)))); if(!qbevent)break;evnt(25753,18793,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PERCENTAGEMSG,qbs_add(qbs_add(qbs_add(func_string(*_FUNC_IDEUPDATEHELPBOX_LONG_PERCENTAGECHARS, 219 ),func_string(*_FUNC_IDEUPDATEHELPBOX_LONG_MAXPROGRESSWIDTH-*_FUNC_IDEUPDATEHELPBOX_LONG_PERCENTAGECHARS, 176 )),qbs_str((int32)(*_FUNC_IDEUPDATEHELPBOX_LONG_PERCENTAGE))),qbs_new_txt_len("%",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18795,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(0))+((*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(8))/ 2 )-(_FUNC_IDEUPDATEHELPBOX_STRING_PERCENTAGEMSG->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(4))+ 4 ,_FUNC_IDEUPDATEHELPBOX_STRING_PERCENTAGEMSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18796,"ide_methods.bas");}while(r); S_55774:; }else{ if (-(*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP== 6 )){ if(qbevent){evnt(25753,18797,"ide_methods.bas");if(r)goto S_55774;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PERCENTAGEMSG,qbs_add(func_string(*_FUNC_IDEUPDATEHELPBOX_LONG_MAXPROGRESSWIDTH, 219 ),qbs_new_txt_len(" 100%",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18798,"ide_methods.bas");}while(r); do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(0))+((*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(8))/ 2 )-(_FUNC_IDEUPDATEHELPBOX_STRING_PERCENTAGEMSG->len/ 2 ))+ 1 ,*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_UDT_P)+(4))+ 4 ,_FUNC_IDEUPDATEHELPBOX_STRING_PERCENTAGEMSG,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18799,"ide_methods.bas");}while(r); } } do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,18804,"ide_methods.bas");}while(r); S_55779:; if ((*_FUNC_IDEUPDATEHELPBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,18805,"ide_methods.bas");if(r)goto S_55779;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18805,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEUPDATEHELPBOX_LONG_CY,*_FUNC_IDEUPDATEHELPBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,18805,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18805,"ide_methods.bas");}while(r); } do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,18808,"ide_methods.bas");}while(r); S_55785:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,18809,"ide_methods.bas");if(r)goto S_55785;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,18809,"ide_methods.bas");}while(r); } S_55788:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,18810,"ide_methods.bas");if(r)goto S_55788;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,18810,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEUPDATEHELPBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,18811,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_OLDALT=*_FUNC_IDEUPDATEHELPBOX_LONG_ALT; if(!qbevent)break;evnt(25753,18812,"ide_methods.bas");}while(r); S_55793:; if ((*_FUNC_IDEUPDATEHELPBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,18814,"ide_methods.bas");if(r)goto S_55793;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,18814,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,18814,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18816,"ide_methods.bas");}while(r); S_55799:; if ((*_FUNC_IDEUPDATEHELPBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,18817,"ide_methods.bas");if(r)goto S_55799;} S_55800:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,18818,"ide_methods.bas");if(r)goto S_55800;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18819,"ide_methods.bas");}while(r); S_55802:; if (((-(*_FUNC_IDEUPDATEHELPBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEUPDATEHELPBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,18820,"ide_methods.bas");if(r)goto S_55802;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEUPDATEHELPBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18820,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18823,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,18823,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18823,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,18827,"ide_methods.bas");}while(r); S_55811:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1))))||new_error){ if(qbevent){evnt(25753,18829,"ide_methods.bas");if(r)goto S_55811;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_ALTLETTER,qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18829,"ide_methods.bas");}while(r); } S_55814:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,18831,"ide_methods.bas");if(r)goto S_55814;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18831,"ide_methods.bas");}while(r); } S_55817:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,18832,"ide_methods.bas");if(r)goto S_55817;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS=*_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,18832,"ide_methods.bas");}while(r); } S_55820:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,18833,"ide_methods.bas");if(r)goto S_55820;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS=*_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,18833,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18833,"ide_methods.bas");}while(r); } S_55824:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,18834,"ide_methods.bas");if(r)goto S_55824;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS=*_FUNC_IDEUPDATEHELPBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,18834,"ide_methods.bas");}while(r); } S_55827:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS>*_FUNC_IDEUPDATEHELPBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,18835,"ide_methods.bas");if(r)goto S_55827;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,18835,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEUPDATEHELPBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,18836,"ide_methods.bas");}while(r); S_55831:; fornext_value6144= 1 ; fornext_finalvalue6144= 100 ; fornext_step6144= 1 ; if (fornext_step6144<0) fornext_step_negative6144=1; else fornext_step_negative6144=0; if (new_error) goto fornext_error6144; goto fornext_entrylabel6144; while(1){ fornext_value6144=fornext_step6144+(*_FUNC_IDEUPDATEHELPBOX_LONG_I); fornext_entrylabel6144: *_FUNC_IDEUPDATEHELPBOX_LONG_I=fornext_value6144; if (fornext_step_negative6144){ if (fornext_value6144fornext_finalvalue6144) break; } fornext_error6144:; if(qbevent){evnt(25753,18837,"ide_methods.bas");if(r)goto S_55831;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,18838,"ide_methods.bas");}while(r); S_55833:; if ((*_FUNC_IDEUPDATEHELPBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,18839,"ide_methods.bas");if(r)goto S_55833;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FOCUSOFFSET=*_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS-*_FUNC_IDEUPDATEHELPBOX_LONG_F; if(!qbevent)break;evnt(25753,18840,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_I)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEUPDATEHELPBOX_LONG_FOCUS,_FUNC_IDEUPDATEHELPBOX_LONG_F,_FUNC_IDEUPDATEHELPBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEUPDATEHELPBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEUPDATEHELPBOX_LONG_MOUSEDOWN,_FUNC_IDEUPDATEHELPBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEUPDATEHELPBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18841,"ide_methods.bas");}while(r); } fornext_continue_6143:; } fornext_exit_6143:; S_55838:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(qbs_equal(__STRING_K,func_chr( 13 )))|((-(*_FUNC_IDEUPDATEHELPBOX_LONG_INFO!= 0 )))))||new_error){ if(qbevent){evnt(25753,18847,"ide_methods.bas");if(r)goto S_55838;} S_55839:; if ((-(*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP< 6 ))||new_error){ if(qbevent){evnt(25753,18848,"ide_methods.bas");if(r)goto S_55839;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_Q,FUNC_IDEYESNOBOX(qbs_new_txt_len("",0),qbs_new_txt_len("Cancel download?",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18848,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_Q,qbs_new_txt_len("Y",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18848,"ide_methods.bas");}while(r); } S_55844:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEUPDATEHELPBOX_STRING_Q,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,18849,"ide_methods.bas");if(r)goto S_55844;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,18849,"ide_methods.bas");}while(r); } } LABEL_UPDATEROUTINE:; if(qbevent){evnt(25753,18853,"ide_methods.bas");r=0;} S_55848:; if(qbevent){evnt(25753,18855,"ide_methods.bas");if(r)goto S_55848;} S_55849:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 1 )))||new_error){ if(qbevent){evnt(25753,18856,"ide_methods.bas");if(r)goto S_55849;} S_55850:; if ((-(*__LONG_HELP_RECACHING< 2 ))||new_error){ if(qbevent){evnt(25753,18858,"ide_methods.bas");if(r)goto S_55850;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_add(qbs_add(func_chr( 0 ),FUNC_IDEZFILELIST(qbs_new_txt_len("internal/help",13),&(pass6146= 2 ),qbs_new_txt_len("*.txt",5))),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18859,"ide_methods.bas");}while(r); S_55852:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEUPDATEHELPBOX_STRING_F->len== 2 )))||new_error){ if(qbevent){evnt(25753,18860,"ide_methods.bas");if(r)goto S_55852;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18860,"ide_methods.bas");}while(r); } }else{ do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18862,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_add(qbs_add(func_chr( 0 ),qbs_new_txt_len("Keyword_Reference_-_By_usage.txt",32)),_FUNC_IDEUPDATEHELPBOX_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18866,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_add(qbs_add(func_chr( 0 ),qbs_new_txt_len("QB64_Help_Menu.txt",18)),_FUNC_IDEUPDATEHELPBOX_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18867,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_add(qbs_add(func_chr( 0 ),qbs_new_txt_len("QB64_FAQ.txt",12)),_FUNC_IDEUPDATEHELPBOX_STRING_F)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18868,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP=*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP+ 1 ; if(!qbevent)break;evnt(25753,18869,"ide_methods.bas");}while(r); sc_ec_417_end:; goto sc_6145_end; } S_55862:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 2 )))||new_error){ if(qbevent){evnt(25753,18870,"ide_methods.bas");if(r)goto S_55862;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP=*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP+ 1 ; if(!qbevent)break;evnt(25753,18871,"ide_methods.bas");}while(r); sc_ec_418_end:; goto sc_6145_end; } S_55864:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 3 )))||new_error){ if(qbevent){evnt(25753,18872,"ide_methods.bas");if(r)goto S_55864;} do{ tmp_long=array_check(( 1 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("Regenerating keyword list...",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18874,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_A,FUNC_WIKI(qbs_new_txt_len("Keyword Reference - Alphabetical",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18875,"ide_methods.bas");}while(r); S_55867:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDEUPDATEHELPBOX_STRING_A,qbs_new_txt_len("{{PageInternalError}}",21),0)> 0 )))||new_error){ if(qbevent){evnt(25753,18876,"ide_methods.bas");if(r)goto S_55867;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_IDEUPDATEHELPBOX= 1 ; if(!qbevent)break;evnt(25753,18876,"ide_methods.bas");}while(r); do{ goto dl_exit_6132; if(!qbevent)break;evnt(25753,18876,"ide_methods.bas");}while(r); } do{ SUB_WIKIPARSE(_FUNC_IDEUPDATEHELPBOX_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18877,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP=*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP+ 1 ; if(!qbevent)break;evnt(25753,18878,"ide_methods.bas");}while(r); sc_ec_419_end:; goto sc_6145_end; } S_55873:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 4 )))||new_error){ if(qbevent){evnt(25753,18879,"ide_methods.bas");if(r)goto S_55873;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,18881,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len("internal\\help\\links.bin",23), 3 ,NULL,NULL,*_FUNC_IDEUPDATEHELPBOX_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18882,"ide_methods.bas");}while(r); S_55876:; while((!(func_eof(*_FUNC_IDEUPDATEHELPBOX_LONG_FH)))||new_error){ if(qbevent){evnt(25753,18883,"ide_methods.bas");if(r)goto S_55876;} do{ tmp_fileno=*_FUNC_IDEUPDATEHELPBOX_LONG_FH; if (new_error) goto skip6149; sub_file_line_input_string(tmp_fileno,_FUNC_IDEUPDATEHELPBOX_STRING_L); if (new_error) goto skip6149; skip6149: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18884,"ide_methods.bas");}while(r); S_55878:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEUPDATEHELPBOX_STRING_L->len))||new_error){ if(qbevent){evnt(25753,18885,"ide_methods.bas");if(r)goto S_55878;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_C=func_instr(NULL,_FUNC_IDEUPDATEHELPBOX_STRING_L,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18886,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_L,qbs_right(_FUNC_IDEUPDATEHELPBOX_STRING_L,_FUNC_IDEUPDATEHELPBOX_STRING_L->len-*_FUNC_IDEUPDATEHELPBOX_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18886,"ide_methods.bas");}while(r); S_55881:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_HELP_RECACHING< 2 ))|(qbs_notequal(qbs_left(_FUNC_IDEUPDATEHELPBOX_STRING_L, 3 ),qbs_new_txt_len("_gl",3)))))||new_error){ if(qbevent){evnt(25753,18887,"ide_methods.bas");if(r)goto S_55881;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18889,"ide_methods.bas");}while(r); S_55883:; fornext_value6153= 1 ; fornext_finalvalue6153=_FUNC_IDEUPDATEHELPBOX_STRING_L->len; fornext_step6153= 1 ; if (fornext_step6153<0) fornext_step_negative6153=1; else fornext_step_negative6153=0; if (new_error) goto fornext_error6153; goto fornext_entrylabel6153; while(1){ fornext_value6153=fornext_step6153+(*_FUNC_IDEUPDATEHELPBOX_LONG_I); fornext_entrylabel6153: *_FUNC_IDEUPDATEHELPBOX_LONG_I=fornext_value6153; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6153){ if (fornext_value6153fornext_finalvalue6153) break; } fornext_error6153:; if(qbevent){evnt(25753,18890,"ide_methods.bas");if(r)goto S_55883;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_C=qbs_asc(_FUNC_IDEUPDATEHELPBOX_STRING_L,*_FUNC_IDEUPDATEHELPBOX_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18891,"ide_methods.bas");}while(r); S_55885:; if(qbevent){evnt(25753,18892,"ide_methods.bas");if(r)goto S_55885;} S_55886:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 32 )))||new_error){ if(qbevent){evnt(25753,18893,"ide_methods.bas");if(r)goto S_55886;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_add(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_new_txt_len("_",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18894,"ide_methods.bas");}while(r); sc_ec_420_end:; goto sc_6155_end; } S_55888:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 34 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 36 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 38 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 42 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 43 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 47 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 58 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 60 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 62 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 63 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 92 ))||(*_FUNC_IDEUPDATEHELPBOX_LONG_C==( 124 )))||new_error){ if(qbevent){evnt(25753,18895,"ide_methods.bas");if(r)goto S_55888;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_add(qbs_add(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_new_txt_len("%",1)),func_hex(*_FUNC_IDEUPDATEHELPBOX_LONG_C,8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18896,"ide_methods.bas");}while(r); sc_ec_421_end:; goto sc_6155_end; } do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_add(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,func_chr(*_FUNC_IDEUPDATEHELPBOX_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18898,"ide_methods.bas");}while(r); sc_6155_end:; fornext_continue_6152:; } fornext_exit_6152:; do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_add(_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2,qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18901,"ide_methods.bas");}while(r); S_55895:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_add(qbs_add(func_chr( 0 ),_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2),func_chr( 0 )),0)== 0 )))||new_error){ if(qbevent){evnt(25753,18902,"ide_methods.bas");if(r)goto S_55895;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_add(qbs_add(_FUNC_IDEUPDATEHELPBOX_STRING_F,_FUNC_IDEUPDATEHELPBOX_STRING_PAGENAME2),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18903,"ide_methods.bas");}while(r); } } } dl_continue_6148:; } dl_exit_6148:; do{ sub_close(*_FUNC_IDEUPDATEHELPBOX_LONG_FH,1); if(!qbevent)break;evnt(25753,18908,"ide_methods.bas");}while(r); S_55902:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_IDEUPDATEHELPBOX_STRING_F,func_chr( 0 ))))||new_error){ if(qbevent){evnt(25753,18911,"ide_methods.bas");if(r)goto S_55902;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_C= 0 ; if(!qbevent)break;evnt(25753,18912,"ide_methods.bas");}while(r); S_55904:; fornext_value6157= 2 ; fornext_finalvalue6157=_FUNC_IDEUPDATEHELPBOX_STRING_F->len; fornext_step6157= 1 ; if (fornext_step6157<0) fornext_step_negative6157=1; else fornext_step_negative6157=0; if (new_error) goto fornext_error6157; goto fornext_entrylabel6157; while(1){ fornext_value6157=fornext_step6157+(*_FUNC_IDEUPDATEHELPBOX_LONG_X); fornext_entrylabel6157: *_FUNC_IDEUPDATEHELPBOX_LONG_X=fornext_value6157; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6157){ if (fornext_value6157fornext_finalvalue6157) break; } fornext_error6157:; if(qbevent){evnt(25753,18913,"ide_methods.bas");if(r)goto S_55904;} S_55905:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDEUPDATEHELPBOX_STRING_F,*_FUNC_IDEUPDATEHELPBOX_LONG_X)== 0 )))||new_error){ if(qbevent){evnt(25753,18914,"ide_methods.bas");if(r)goto S_55905;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_C=*_FUNC_IDEUPDATEHELPBOX_LONG_C+ 1 ; if(!qbevent)break;evnt(25753,18914,"ide_methods.bas");}while(r); } fornext_continue_6156:; } fornext_exit_6156:; do{ *_FUNC_IDEUPDATEHELPBOX_LONG_C=*_FUNC_IDEUPDATEHELPBOX_LONG_C- 1 ; if(!qbevent)break;evnt(25753,18916,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_right(_FUNC_IDEUPDATEHELPBOX_STRING_F,_FUNC_IDEUPDATEHELPBOX_STRING_F->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18918,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_Z,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18919,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_N= 0 ; if(!qbevent)break;evnt(25753,18920,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_STOPRECACHE; if(!qbevent)break;evnt(25753,18922,"ide_methods.bas");}while(r); } do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18924,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP=*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP+ 1 ; if(!qbevent)break;evnt(25753,18925,"ide_methods.bas");}while(r); sc_ec_422_end:; goto sc_6145_end; } S_55918:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 5 )))||new_error){ if(qbevent){evnt(25753,18926,"ide_methods.bas");if(r)goto S_55918;} S_55919:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEUPDATEHELPBOX_STRING_F->len> 0 )))||new_error){ if(qbevent){evnt(25753,18927,"ide_methods.bas");if(r)goto S_55919;} do{ *_FUNC_IDEUPDATEHELPBOX_LONG_X2=func_instr(NULL,_FUNC_IDEUPDATEHELPBOX_STRING_F,_FUNC_IDEUPDATEHELPBOX_STRING_Z,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18928,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F2,qbs_left(_FUNC_IDEUPDATEHELPBOX_STRING_F,*_FUNC_IDEUPDATEHELPBOX_LONG_X2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18929,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F,qbs_right(_FUNC_IDEUPDATEHELPBOX_STRING_F,_FUNC_IDEUPDATEHELPBOX_STRING_F->len-*_FUNC_IDEUPDATEHELPBOX_LONG_X2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18929,"ide_methods.bas");}while(r); S_55923:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_IDEUPDATEHELPBOX_STRING_F2, 4 ),qbs_new_txt_len(".txt",4))))||new_error){ if(qbevent){evnt(25753,18931,"ide_methods.bas");if(r)goto S_55923;} do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_F2,qbs_left(_FUNC_IDEUPDATEHELPBOX_STRING_F2,_FUNC_IDEUPDATEHELPBOX_STRING_F2->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18932,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_N=*_FUNC_IDEUPDATEHELPBOX_LONG_N+ 1 ; if(!qbevent)break;evnt(25753,18933,"ide_methods.bas");}while(r); do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_add(qbs_new_txt_len("Page title: ",12),_FUNC_IDEUPDATEHELPBOX_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18934,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEUPDATEHELPBOX_STRING_IGNORE,FUNC_WIKI(_FUNC_IDEUPDATEHELPBOX_STRING_F2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18935,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_IDEUPDATEHELPBOX_STRING_IGNORE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18936,"ide_methods.bas");}while(r); } }else{ do{ *_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP=*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP+ 1 ; if(!qbevent)break;evnt(25753,18939,"ide_methods.bas");}while(r); } sc_ec_423_end:; goto sc_6145_end; } S_55933:; if (((*_FUNC_IDEUPDATEHELPBOX_LONG_UPDATESTEP==( 6 )))||new_error){ if(qbevent){evnt(25753,18941,"ide_methods.bas");if(r)goto S_55933;} LABEL_STOPRECACHE:; if(qbevent){evnt(25753,18942,"ide_methods.bas");r=0;} S_55934:; if ((-(*__LONG_HELP_RECACHING== 2 ))||new_error){ if(qbevent){evnt(25753,18943,"ide_methods.bas");if(r)goto S_55934;} do{ goto dl_exit_6132; if(!qbevent)break;evnt(25753,18943,"ide_methods.bas");}while(r); } do{ tmp_long=array_check(( 1 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("All pages updated.",18)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18944,"ide_methods.bas");}while(r); do{ tmp_long=array_check(( 2 )-_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_FUNC_IDEUPDATEHELPBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18945,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEUPDATEHELPBOX_LONG_BUTTONID)-_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[4],_FUNC_IDEUPDATEHELPBOX_ARRAY_UDT_O[5]))*89+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("#Close",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18946,"ide_methods.bas");}while(r); do{ sub__limit( 20 ); if(!qbevent)break;evnt(25753,18947,"ide_methods.bas");}while(r); sc_ec_424_end:; goto sc_6145_end; } sc_6145_end:; do{ *_FUNC_IDEUPDATEHELPBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,18951,"ide_methods.bas");}while(r); do{ *_FUNC_IDEUPDATEHELPBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,18952,"ide_methods.bas");}while(r); dl_continue_6132:; }while(1); dl_exit_6132:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free239.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_IDEUPDATEHELPBOX_LONG_IDEUPDATEHELPBOX; } qbs* FUNC_IDEASCIIBOX(int32*_FUNC_IDEASCIIBOX_LONG_RELAUNCH){ 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 "data240.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,18959,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,18960,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,18961,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,18962,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18963,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEASCIIBOX_ARRAY_UDT_O[4]= 1 ; _FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4]+1; _FUNC_IDEASCIIBOX_ARRAY_UDT_O[6]=1; if (_FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]&4){ _FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]*712/8+1); memset((void*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,18964,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18965,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEASCIIBOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18966,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,18970,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_RELAUNCH= 0 ; if(!qbevent)break;evnt(25753,18971,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,18973,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEASCIIBOX_UDT_P)) + (0) ),&(pass6163= 56 ),&(pass6164= 21 ),qbs_new_txt_len("ASCII Chart",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18974,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_I=*_FUNC_IDEASCIIBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,18976,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+36))= 1 ; if(!qbevent)break;evnt(25753,18977,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+24))= 3 ; if(!qbevent)break;evnt(25753,18978,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+20))= 5 ; if(!qbevent)break;evnt(25753,18979,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+28))= 5 ; if(!qbevent)break;evnt(25753,18980,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[2]&2){ error(10); }else{ if (_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[2]&1){ if (!error_occurred) error(10); }else{ _FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4]= 1 ; _FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]=( 255 )-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4]+1; _FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[6]=1; _FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]=(ptrszint)malloc(_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]*96/8+1); if (!_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]) error(257); _FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[2]|=1; tmp_long=_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]; while(tmp_long--){ *(qbs**)(_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]+(96/8+1-1)*tmp_long+ 4)=qbs_new(0,0);} } } if(!qbevent)break;evnt(25753,18987,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_A= 0 ; if(!qbevent)break;evnt(25753,18989,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_X= 5 ; if(!qbevent)break;evnt(25753,18990,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_Y= 2 ; if(!qbevent)break;evnt(25753,18991,"ide_methods.bas");}while(r); S_55966:; fornext_value6166= 0 ; fornext_finalvalue6166= 15 ; fornext_step6166= 1 ; if (fornext_step6166<0) fornext_step_negative6166=1; else fornext_step_negative6166=0; if (new_error) goto fornext_error6166; goto fornext_entrylabel6166; while(1){ fornext_value6166=fornext_step6166+(*_FUNC_IDEASCIIBOX_LONG_I); fornext_entrylabel6166: *_FUNC_IDEASCIIBOX_LONG_I=fornext_value6166; if (fornext_step_negative6166){ if (fornext_value6166fornext_finalvalue6166) break; } fornext_error6166:; if(qbevent){evnt(25753,18992,"ide_methods.bas");if(r)goto S_55966;} S_55967:; fornext_value6168= 0 ; fornext_finalvalue6168= 15 ; fornext_step6168= 1 ; if (fornext_step6168<0) fornext_step_negative6168=1; else fornext_step_negative6168=0; if (new_error) goto fornext_error6168; goto fornext_entrylabel6168; while(1){ fornext_value6168=fornext_step6168+(*_FUNC_IDEASCIIBOX_LONG_J); fornext_entrylabel6168: *_FUNC_IDEASCIIBOX_LONG_J=fornext_value6168; if (fornext_step_negative6168){ if (fornext_value6168fornext_finalvalue6168) break; } fornext_error6168:; if(qbevent){evnt(25753,18993,"ide_methods.bas");if(r)goto S_55967;} do{ *_FUNC_IDEASCIIBOX_LONG_A=*_FUNC_IDEASCIIBOX_LONG_A+ 1 ; if(!qbevent)break;evnt(25753,18994,"ide_methods.bas");}while(r); S_55969:; if ((-(*_FUNC_IDEASCIIBOX_LONG_A> 255 ))||new_error){ if(qbevent){evnt(25753,18995,"ide_methods.bas");if(r)goto S_55969;} do{ goto fornext_exit_6167; if(!qbevent)break;evnt(25753,18995,"ide_methods.bas");}while(r); } do{ *(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_A)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12))=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0))+*_FUNC_IDEASCIIBOX_LONG_X; if(!qbevent)break;evnt(25753,18996,"ide_methods.bas");}while(r); do{ *(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_A)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2))=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(4))+*_FUNC_IDEASCIIBOX_LONG_Y; if(!qbevent)break;evnt(25753,18997,"ide_methods.bas");}while(r); do{ qbs_set(*((qbs**)((char*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_A)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+4))),qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_chr(*_FUNC_IDEASCIIBOX_LONG_A)),qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18998,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_X=*_FUNC_IDEASCIIBOX_LONG_X+ 3 ; if(!qbevent)break;evnt(25753,18999,"ide_methods.bas");}while(r); fornext_continue_6167:; } fornext_exit_6167:; S_55977:; if ((-(*_FUNC_IDEASCIIBOX_LONG_A> 255 ))||new_error){ if(qbevent){evnt(25753,19001,"ide_methods.bas");if(r)goto S_55977;} do{ goto fornext_exit_6165; if(!qbevent)break;evnt(25753,19001,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_LONG_X= 5 ; if(!qbevent)break;evnt(25753,19002,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_Y=*_FUNC_IDEASCIIBOX_LONG_Y+ 1 ; if(!qbevent)break;evnt(25753,19003,"ide_methods.bas");}while(r); fornext_continue_6165:; } fornext_exit_6165:; do{ *_FUNC_IDEASCIIBOX_LONG_I=*_FUNC_IDEASCIIBOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19006,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,19007,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+24))= 21 ; if(!qbevent)break;evnt(25753,19008,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Insert character",17),_FUNC_IDEASCIIBOX_STRING1_SEP),qbs_new_txt_len("Insert C#HR$",12)),_FUNC_IDEASCIIBOX_STRING1_SEP),qbs_new_txt_len("#Close",6))); if(!qbevent)break;evnt(25753,19009,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,19010,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ; if(!qbevent)break;evnt(25753,19012,"ide_methods.bas");}while(r); S_55989:; fornext_value6170= 1 ; fornext_finalvalue6170= 100 ; fornext_step6170= 1 ; if (fornext_step6170<0) fornext_step_negative6170=1; else fornext_step_negative6170=0; if (new_error) goto fornext_error6170; goto fornext_entrylabel6170; while(1){ fornext_value6170=fornext_step6170+(*_FUNC_IDEASCIIBOX_LONG_I); fornext_entrylabel6170: *_FUNC_IDEASCIIBOX_LONG_I=fornext_value6170; if (fornext_step_negative6170){ if (fornext_value6170fornext_finalvalue6170) break; } fornext_error6170:; if(qbevent){evnt(25753,19017,"ide_methods.bas");if(r)goto S_55989;} do{ memcpy(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89)+ 0,((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,19017,"ide_methods.bas");}while(r); fornext_continue_6169:; } fornext_exit_6169:; S_55992:; do{ if(qbevent){evnt(25753,19020,"ide_methods.bas");if(r)goto S_55992;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEASCIIBOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,19022,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,19023,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,19023,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,19023,"ide_methods.bas");}while(r); S_55997:; fornext_value6173= 1 ; fornext_finalvalue6173= 100 ; fornext_step6173= 1 ; if (fornext_step6173<0) fornext_step_negative6173=1; else fornext_step_negative6173=0; if (new_error) goto fornext_error6173; goto fornext_entrylabel6173; while(1){ fornext_value6173=fornext_step6173+(*_FUNC_IDEASCIIBOX_LONG_I); fornext_entrylabel6173: *_FUNC_IDEASCIIBOX_LONG_I=fornext_value6173; if (fornext_step_negative6173){ if (fornext_value6173fornext_finalvalue6173) break; } fornext_error6173:; if(qbevent){evnt(25753,19024,"ide_methods.bas");if(r)goto S_55997;} S_55998:; if ((*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+36)))||new_error){ if(qbevent){evnt(25753,19025,"ide_methods.bas");if(r)goto S_55998;} do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+60))=*_FUNC_IDEASCIIBOX_LONG_FOCUS-*_FUNC_IDEASCIIBOX_LONG_F; if(!qbevent)break;evnt(25753,19027,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,19028,"ide_methods.bas");}while(r); do{ *(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,19028,"ide_methods.bas");}while(r); do{ SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEASCIIBOX_LONG_F); if(!qbevent)break;evnt(25753,19029,"ide_methods.bas");}while(r); S_56003:; if ((*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+52)))||new_error){ if(qbevent){evnt(25753,19030,"ide_methods.bas");if(r)goto S_56003;} do{ *_FUNC_IDEASCIIBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+52)); if(!qbevent)break;evnt(25753,19030,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+56)); if(!qbevent)break;evnt(25753,19030,"ide_methods.bas");}while(r); } } fornext_continue_6172:; } fornext_exit_6172:; do{ *_FUNC_IDEASCIIBOX_LONG_LASTFOCUS=*_FUNC_IDEASCIIBOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,19033,"ide_methods.bas");}while(r); S_56010:; if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 ))||new_error){ if(qbevent){evnt(25753,19037,"ide_methods.bas");if(r)goto S_56010;} do{ SUB_IDEBOX(&(pass6174=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0))+ 4 ),&(pass6175=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(4))+ 1 ),&(pass6176= 50 ),&(pass6177= 18 )); if(!qbevent)break;evnt(25753,19038,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_LONG_HOVER= 0 ; if(!qbevent)break;evnt(25753,19041,"ide_methods.bas");}while(r); S_56014:; fornext_value6179= 1 ; fornext_finalvalue6179= 255 ; fornext_step6179= 1 ; if (fornext_step6179<0) fornext_step_negative6179=1; else fornext_step_negative6179=0; if (new_error) goto fornext_error6179; goto fornext_entrylabel6179; while(1){ fornext_value6179=fornext_step6179+(*_FUNC_IDEASCIIBOX_LONG_I); fornext_entrylabel6179: *_FUNC_IDEASCIIBOX_LONG_I=fornext_value6179; if (fornext_step_negative6179){ if (fornext_value6179fornext_finalvalue6179) break; } fornext_error6179:; if(qbevent){evnt(25753,19042,"ide_methods.bas");if(r)goto S_56014;} S_56015:; if (((-(*__LONG_MX>=*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12))))&(-(*__LONG_MX<=(*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12))+ 2 )))&(-(*__LONG_MY==*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2)))))||new_error){ if(qbevent){evnt(25753,19043,"ide_methods.bas");if(r)goto S_56015;} S_56016:; if ((*_FUNC_IDEASCIIBOX_LONG_MOUSEMOVED)||new_error){ if(qbevent){evnt(25753,19044,"ide_methods.bas");if(r)goto S_56016;} do{ *_FUNC_IDEASCIIBOX_LONG_HOVER=*_FUNC_IDEASCIIBOX_LONG_I; if(!qbevent)break;evnt(25753,19044,"ide_methods.bas");}while(r); do{ qbg_sub_color( 7 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,19044,"ide_methods.bas");}while(r); } S_56020:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,19045,"ide_methods.bas");if(r)goto S_56020;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_I; if(!qbevent)break;evnt(25753,19046,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,19047,"ide_methods.bas");}while(r); S_56023:; if (((-(((float)(FUNC_TIMEELAPSEDSINCE(_FUNC_IDEASCIIBOX_SINGLE_LASTCLICK)))<=((float)( 0.3E+0 ))))&(-(*_FUNC_IDEASCIIBOX_LONG_LASTCLICKON==*_FUNC_IDEASCIIBOX_LONG_I)))||new_error){ if(qbevent){evnt(25753,19048,"ide_methods.bas");if(r)goto S_56023;} do{ *_FUNC_IDEASCIIBOX_LONG_RELAUNCH= -1 ; if(!qbevent)break;evnt(25753,19050,"ide_methods.bas");}while(r); do{ goto LABEL_INSERTCHAR; if(!qbevent)break;evnt(25753,19051,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_SINGLE_LASTCLICK=func_timer(NULL,0); if(!qbevent)break;evnt(25753,19053,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_LASTCLICKON=*_FUNC_IDEASCIIBOX_LONG_I; if(!qbevent)break;evnt(25753,19054,"ide_methods.bas");}while(r); } }else{ do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,19057,"ide_methods.bas");}while(r); } S_56033:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED==*_FUNC_IDEASCIIBOX_LONG_I))||new_error){ if(qbevent){evnt(25753,19059,"ide_methods.bas");if(r)goto S_56033;} do{ qbg_sub_color( 15 , 0 ,NULL,3); if(!qbevent)break;evnt(25753,19059,"ide_methods.bas");}while(r); } do{ sub__printstring(*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12)),*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2)),*((qbs**)((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+4))),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19060,"ide_methods.bas");}while(r); fornext_continue_6178:; } fornext_exit_6178:; do{ qbg_sub_color( 0 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,19063,"ide_methods.bas");}while(r); S_56039:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 ))||new_error){ if(qbevent){evnt(25753,19064,"ide_methods.bas");if(r)goto S_56039;} do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0))+ 5 ,*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(4))+ 19 ,qbs_add(qbs_new_txt_len("Selected:",9),qbs_str((int32)(*_FUNC_IDEASCIIBOX_LONG_SELECTED))),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19065,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 2 , 7 ,NULL,3); if(!qbevent)break;evnt(25753,19068,"ide_methods.bas");}while(r); S_56043:; if (((-(*_FUNC_IDEASCIIBOX_LONG_HOVER> 0 ))&(-(*_FUNC_IDEASCIIBOX_LONG_HOVER!=*_FUNC_IDEASCIIBOX_LONG_SELECTED)))||new_error){ if(qbevent){evnt(25753,19069,"ide_methods.bas");if(r)goto S_56043;} do{ sub__printstring(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0))+ 5 ,*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(4))+ 20 ,qbs_add(qbs_new_txt_len("Hovered: ",9),qbs_str((int32)(*_FUNC_IDEASCIIBOX_LONG_HOVER))),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19070,"ide_methods.bas");}while(r); } do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,19076,"ide_methods.bas");}while(r); S_56047:; if ((*_FUNC_IDEASCIIBOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,19077,"ide_methods.bas");if(r)goto S_56047;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19078,"ide_methods.bas");}while(r); S_56049:; if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 ))||new_error){ if(qbevent){evnt(25753,19079,"ide_methods.bas");if(r)goto S_56049;} S_56050:; if ((*_FUNC_IDEASCIIBOX_LONG_SELECTED)||new_error){ if(qbevent){evnt(25753,19080,"ide_methods.bas");if(r)goto S_56050;} do{ qbg_sub_locate(*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_SELECTED)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2)),*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_SELECTED)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12))+ 1 , 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,19081,"ide_methods.bas");}while(r); } }else{ do{ qbg_sub_locate(*_FUNC_IDEASCIIBOX_LONG_CY,*_FUNC_IDEASCIIBOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,19084,"ide_methods.bas");}while(r); } do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19086,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,19090,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_MOUSEMOVED= 0 ; if(!qbevent)break;evnt(25753,19091,"ide_methods.bas");}while(r); S_56060:; do{ if(qbevent){evnt(25753,19092,"ide_methods.bas");if(r)goto S_56060;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,19093,"ide_methods.bas");}while(r); S_56062:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,19094,"ide_methods.bas");if(r)goto S_56062;} do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19094,"ide_methods.bas");}while(r); } S_56065:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,19095,"ide_methods.bas");if(r)goto S_56065;} do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19095,"ide_methods.bas");}while(r); } S_56068:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,19096,"ide_methods.bas");if(r)goto S_56068;} do{ *_FUNC_IDEASCIIBOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,19096,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19096,"ide_methods.bas");}while(r); } S_56072:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,19097,"ide_methods.bas");if(r)goto S_56072;} do{ *_FUNC_IDEASCIIBOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,19097,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19097,"ide_methods.bas");}while(r); } S_56076:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,19098,"ide_methods.bas");if(r)goto S_56076;} do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19098,"ide_methods.bas");}while(r); } S_56079:; if (((-(*__LONG_MX!=*_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MX))|(-(*__LONG_MY!=*_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MY)))||new_error){ if(qbevent){evnt(25753,19099,"ide_methods.bas");if(r)goto S_56079;} do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19099,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MX=*__LONG_MX; if(!qbevent)break;evnt(25753,19099,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MY=*__LONG_MY; if(!qbevent)break;evnt(25753,19099,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_MOUSEMOVED= -1 ; if(!qbevent)break;evnt(25753,19099,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,19100,"ide_methods.bas");}while(r); S_56086:; if ((-(*_FUNC_IDEASCIIBOX_LONG_ALT!=*_FUNC_IDEASCIIBOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,19100,"ide_methods.bas");if(r)goto S_56086;} do{ *_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19100,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_LONG_OLDALT=*_FUNC_IDEASCIIBOX_LONG_ALT; if(!qbevent)break;evnt(25753,19101,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,19102,"ide_methods.bas");}while(r); S_56091:; dl_continue_6180:; }while((!(*_FUNC_IDEASCIIBOX_LONG_CHANGE))&&(!new_error)); dl_exit_6180:; if(qbevent){evnt(25753,19103,"ide_methods.bas");if(r)goto S_56091;} S_56092:; if ((*_FUNC_IDEASCIIBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,19104,"ide_methods.bas");if(r)goto S_56092;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,19104,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,19104,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEASCIIBOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19106,"ide_methods.bas");}while(r); S_56098:; if ((*_FUNC_IDEASCIIBOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,19107,"ide_methods.bas");if(r)goto S_56098;} S_56099:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,19108,"ide_methods.bas");if(r)goto S_56099;} do{ *_FUNC_IDEASCIIBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19109,"ide_methods.bas");}while(r); S_56101:; if (((-(*_FUNC_IDEASCIIBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEASCIIBOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,19110,"ide_methods.bas");if(r)goto S_56101;} do{ qbs_set(_FUNC_IDEASCIIBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEASCIIBOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19110,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19113,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,19113,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19113,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,19117,"ide_methods.bas");}while(r); S_56110:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,19118,"ide_methods.bas");if(r)goto S_56110;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19118,"ide_methods.bas");}while(r); } S_56113:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,19119,"ide_methods.bas");if(r)goto S_56113;} do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS=*_FUNC_IDEASCIIBOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,19119,"ide_methods.bas");}while(r); } S_56116:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,19120,"ide_methods.bas");if(r)goto S_56116;} do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS=*_FUNC_IDEASCIIBOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,19120,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19120,"ide_methods.bas");}while(r); } S_56120:; if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,19121,"ide_methods.bas");if(r)goto S_56120;} do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS=*_FUNC_IDEASCIIBOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,19121,"ide_methods.bas");}while(r); } S_56123:; if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS>*_FUNC_IDEASCIIBOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,19122,"ide_methods.bas");if(r)goto S_56123;} do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,19122,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEASCIIBOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,19123,"ide_methods.bas");}while(r); S_56127:; fornext_value6183= 1 ; fornext_finalvalue6183= 100 ; fornext_step6183= 1 ; if (fornext_step6183<0) fornext_step_negative6183=1; else fornext_step_negative6183=0; if (new_error) goto fornext_error6183; goto fornext_entrylabel6183; while(1){ fornext_value6183=fornext_step6183+(*_FUNC_IDEASCIIBOX_LONG_I); fornext_entrylabel6183: *_FUNC_IDEASCIIBOX_LONG_I=fornext_value6183; if (fornext_step_negative6183){ if (fornext_value6183fornext_finalvalue6183) break; } fornext_error6183:; if(qbevent){evnt(25753,19124,"ide_methods.bas");if(r)goto S_56127;} do{ *_FUNC_IDEASCIIBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89+36)); if(!qbevent)break;evnt(25753,19125,"ide_methods.bas");}while(r); S_56129:; if ((*_FUNC_IDEASCIIBOX_LONG_T)||new_error){ if(qbevent){evnt(25753,19126,"ide_methods.bas");if(r)goto S_56129;} do{ *_FUNC_IDEASCIIBOX_LONG_FOCUSOFFSET=*_FUNC_IDEASCIIBOX_LONG_FOCUS-*_FUNC_IDEASCIIBOX_LONG_F; if(!qbevent)break;evnt(25753,19127,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*89) ),_FUNC_IDEASCIIBOX_LONG_FOCUS,_FUNC_IDEASCIIBOX_LONG_F,_FUNC_IDEASCIIBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEASCIIBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEASCIIBOX_LONG_MOUSEDOWN,_FUNC_IDEASCIIBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEASCIIBOX_LONG_INFO,__LONG_MWHEEL); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19128,"ide_methods.bas");}while(r); } fornext_continue_6182:; } fornext_exit_6182:; S_56134:; if (((-(*__LONG_MY>*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(4))))&(-(*__LONG_MY<(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(4))+*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(12)))))&(-(*__LONG_MX>*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0))))&(-(*__LONG_MX<(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(0))+*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+(8))))))||new_error){ if(qbevent){evnt(25753,19133,"ide_methods.bas");if(r)goto S_56134;} S_56135:; if (((-(*_FUNC_IDEASCIIBOX_LONG_HOVER== 0 ))&*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,19134,"ide_methods.bas");if(r)goto S_56135;} do{ *_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,19134,"ide_methods.bas");}while(r); } } S_56139:; if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 )))))||new_error){ if(qbevent){evnt(25753,19137,"ide_methods.bas");if(r)goto S_56139;} do{ goto LABEL_INSERTCHAR; if(!qbevent)break;evnt(25753,19138,"ide_methods.bas");}while(r); } S_56142:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 2 ))&(((qbs_equal(__STRING_K,func_chr( 13 )))|(-(*_FUNC_IDEASCIIBOX_LONG_INFO!= 0 ))))))||new_error){ if(qbevent){evnt(25753,19141,"ide_methods.bas");if(r)goto S_56142;} LABEL_INSERTCHAR:; if(qbevent){evnt(25753,19142,"ide_methods.bas");r=0;} S_56143:; if (((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED< 32 ))&(-(*_FUNC_IDEASCIIBOX_LONG_ASCIIWARNINGSHOWN== 0 )))||new_error){ if(qbevent){evnt(25753,19143,"ide_methods.bas");if(r)goto S_56143;} do{ *_FUNC_IDEASCIIBOX_LONG_ASCIIWARNINGSHOWN= -1 ; if(!qbevent)break;evnt(25753,19144,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Control Characters",18),qbs_new_txt_len("Inserting ASCII control characters (1-32) may cause\\nunexpected IDE behavior. Consider inserting CHR$ instead.\\nProceed anyway?",127),qbs_new_txt_len("#Yes;#No;#Cancel",16)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19145,"ide_methods.bas");}while(r); S_56146:; if ((-(*_FUNC_IDEASCIIBOX_LONG_RESULT== 2 ))||new_error){ if(qbevent){evnt(25753,19146,"ide_methods.bas");if(r)goto S_56146;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19146,"ide_methods.bas");}while(r); } S_56149:; if ((-(*_FUNC_IDEASCIIBOX_LONG_RESULT== 3 ))||new_error){ if(qbevent){evnt(25753,19147,"ide_methods.bas");if(r)goto S_56149;} do{ goto LABEL_DLGLOOP; if(!qbevent)break;evnt(25753,19147,"ide_methods.bas");}while(r); } } do{ qbs_set(_FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX,func_chr(*_FUNC_IDEASCIIBOX_LONG_SELECTED)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19149,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19150,"ide_methods.bas");}while(r); } S_56156:; if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 3 ))&(((-(*_FUNC_IDEASCIIBOX_LONG_INFO!= 0 ))|(qbs_equal(__STRING_K,func_chr( 13 ))))))))||new_error){ if(qbevent){evnt(25753,19153,"ide_methods.bas");if(r)goto S_56156;} do{ qbs_set(_FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX,qbs_add(qbs_add(qbs_new_txt_len("CHR$(",5),FUNC_STR2(_FUNC_IDEASCIIBOX_LONG_SELECTED)),qbs_new_txt_len(")",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19154,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19155,"ide_methods.bas");}while(r); } S_56160:; if ((qbs_cleanup(qbs_tmp_base,(((-(*_FUNC_IDEASCIIBOX_LONG_INFO!= 0 ))|(qbs_equal(__STRING_K,func_chr( 13 )))))&(-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 4 ))))||new_error){ if(qbevent){evnt(25753,19159,"ide_methods.bas");if(r)goto S_56160;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19159,"ide_methods.bas");}while(r); } S_56163:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||new_error){ if(qbevent){evnt(25753,19161,"ide_methods.bas");if(r)goto S_56163;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19161,"ide_methods.bas");}while(r); } S_56166:; if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 ))||new_error){ if(qbevent){evnt(25753,19163,"ide_methods.bas");if(r)goto S_56166;} do{ *__LONG_KCTRL=func__keydown( 100305 )|func__keydown( 100306 ); if(!qbevent)break;evnt(25753,19164,"ide_methods.bas");}while(r); S_56168:; if(qbevent){evnt(25753,19165,"ide_methods.bas");if(r)goto S_56168;} S_56169:; if (((*__LONG_KB==( 18176 )))||new_error){ if(qbevent){evnt(25753,19166,"ide_methods.bas");if(r)goto S_56169;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ; if(!qbevent)break;evnt(25753,19166,"ide_methods.bas");}while(r); sc_ec_425_end:; goto sc_6184_end; } S_56171:; if (((*__LONG_KB==( 20224 )))||new_error){ if(qbevent){evnt(25753,19167,"ide_methods.bas");if(r)goto S_56171;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ; if(!qbevent)break;evnt(25753,19167,"ide_methods.bas");}while(r); sc_ec_426_end:; goto sc_6184_end; } S_56173:; if (((*__LONG_KB==( 19712 )))||new_error){ if(qbevent){evnt(25753,19168,"ide_methods.bas");if(r)goto S_56173;} S_56174:; if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||new_error){ if(qbevent){evnt(25753,19169,"ide_methods.bas");if(r)goto S_56174;} S_56175:; while((!((-((*_FUNC_IDEASCIIBOX_LONG_SELECTED% 16 )==( 0 )))|(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 255 ))))||new_error){ if(qbevent){evnt(25753,19170,"ide_methods.bas");if(r)goto S_56175;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 1 ; if(!qbevent)break;evnt(25753,19171,"ide_methods.bas");}while(r); dl_continue_6185:; } dl_exit_6185:; }else{ do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 1 ; if(!qbevent)break;evnt(25753,19174,"ide_methods.bas");}while(r); } S_56181:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 255 ))||new_error){ if(qbevent){evnt(25753,19176,"ide_methods.bas");if(r)goto S_56181;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ; if(!qbevent)break;evnt(25753,19176,"ide_methods.bas");}while(r); } sc_ec_427_end:; goto sc_6184_end; } S_56184:; if (((*__LONG_KB==( 19200 )))||new_error){ if(qbevent){evnt(25753,19177,"ide_methods.bas");if(r)goto S_56184;} S_56185:; if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||new_error){ if(qbevent){evnt(25753,19178,"ide_methods.bas");if(r)goto S_56185;} S_56186:; while((!(-((*_FUNC_IDEASCIIBOX_LONG_SELECTED% 16 )==( 1 ))))||new_error){ if(qbevent){evnt(25753,19179,"ide_methods.bas");if(r)goto S_56186;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 1 ; if(!qbevent)break;evnt(25753,19180,"ide_methods.bas");}while(r); dl_continue_6186:; } dl_exit_6186:; }else{ do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 1 ; if(!qbevent)break;evnt(25753,19183,"ide_methods.bas");}while(r); } S_56192:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED< 1 ))||new_error){ if(qbevent){evnt(25753,19185,"ide_methods.bas");if(r)goto S_56192;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ; if(!qbevent)break;evnt(25753,19185,"ide_methods.bas");}while(r); } sc_ec_428_end:; goto sc_6184_end; } S_56195:; if (((*__LONG_KB==( 20480 )))||new_error){ if(qbevent){evnt(25753,19186,"ide_methods.bas");if(r)goto S_56195;} S_56196:; if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||new_error){ if(qbevent){evnt(25753,19187,"ide_methods.bas");if(r)goto S_56196;} S_56197:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 240 ))||new_error){ if(qbevent){evnt(25753,19188,"ide_methods.bas");if(r)goto S_56197;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ; if(!qbevent)break;evnt(25753,19189,"ide_methods.bas");}while(r); }else{ S_56200:; while((!(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED>= 240 )))||new_error){ if(qbevent){evnt(25753,19191,"ide_methods.bas");if(r)goto S_56200;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 ; if(!qbevent)break;evnt(25753,19192,"ide_methods.bas");}while(r); dl_continue_6187:; } dl_exit_6187:; } S_56204:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 255 ))||new_error){ if(qbevent){evnt(25753,19195,"ide_methods.bas");if(r)goto S_56204;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ; if(!qbevent)break;evnt(25753,19195,"ide_methods.bas");}while(r); } }else{ S_56208:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 240 ))||new_error){ if(qbevent){evnt(25753,19197,"ide_methods.bas");if(r)goto S_56208;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ; if(!qbevent)break;evnt(25753,19199,"ide_methods.bas");}while(r); S_56210:; }else{ if (-((*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 )<=( 255 ))){ if(qbevent){evnt(25753,19200,"ide_methods.bas");if(r)goto S_56210;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 ; if(!qbevent)break;evnt(25753,19201,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 - 256 ; if(!qbevent)break;evnt(25753,19203,"ide_methods.bas");}while(r); } } } sc_ec_429_end:; goto sc_6184_end; } S_56216:; if (((*__LONG_KB==( 18432 )))||new_error){ if(qbevent){evnt(25753,19206,"ide_methods.bas");if(r)goto S_56216;} S_56217:; if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||new_error){ if(qbevent){evnt(25753,19207,"ide_methods.bas");if(r)goto S_56217;} S_56218:; while((!(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED<= 16 )))||new_error){ if(qbevent){evnt(25753,19208,"ide_methods.bas");if(r)goto S_56218;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 ; if(!qbevent)break;evnt(25753,19209,"ide_methods.bas");}while(r); dl_continue_6188:; } dl_exit_6188:; S_56221:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED< 1 ))||new_error){ if(qbevent){evnt(25753,19211,"ide_methods.bas");if(r)goto S_56221;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ; if(!qbevent)break;evnt(25753,19211,"ide_methods.bas");}while(r); } }else{ S_56225:; if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 16 ))||new_error){ if(qbevent){evnt(25753,19213,"ide_methods.bas");if(r)goto S_56225;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED= 240 ; if(!qbevent)break;evnt(25753,19215,"ide_methods.bas");}while(r); S_56227:; }else{ if (-((*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 )>=( 1 ))){ if(qbevent){evnt(25753,19216,"ide_methods.bas");if(r)goto S_56227;} do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 ; if(!qbevent)break;evnt(25753,19217,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 + 256 ; if(!qbevent)break;evnt(25753,19219,"ide_methods.bas");}while(r); } } } sc_ec_430_end:; goto sc_6184_end; } sc_6184_end:; } do{ *_FUNC_IDEASCIIBOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,19226,"ide_methods.bas");}while(r); do{ *_FUNC_IDEASCIIBOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,19227,"ide_methods.bas");}while(r); LABEL_DLGLOOP:; if(qbevent){evnt(25753,19229,"ide_methods.bas");r=0;} dl_continue_6171:; }while(1); dl_exit_6171:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free240.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_IDEASCIIBOX_STRING_IDEASCIIBOX);return _FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX; } 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 "data241.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ sub_pcopy( 0 , 2 ); if(!qbevent)break;evnt(25753,19238,"ide_methods.bas");}while(r); do{ sub_pcopy( 0 , 1 ); if(!qbevent)break;evnt(25753,19239,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19240,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,19241,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,19242,"ide_methods.bas");}while(r); do{ if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&2){ error(10); }else{ if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&1){ if (!error_occurred) 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]*712/8+1); memset((void*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0]),0,_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*712/8+1); }else{ _FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*712/8+1,1); if (!_FUNC_IDEF1BOX_ARRAY_UDT_O[0]) error(257); } _FUNC_IDEF1BOX_ARRAY_UDT_O[2]|=1; } } if(!qbevent)break;evnt(25753,19243,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,19244,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEF1BOX_STRING1_SEP,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19245,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_I= 0 ; if(!qbevent)break;evnt(25753,19252,"ide_methods.bas");}while(r); do{ SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + (0) ),&(pass6190= 40 ),&(pass6191=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ),qbs_new_txt_len("Contextual help",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19253,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19255,"ide_methods.bas");}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]))*89+36))= 2 ; if(!qbevent)break;evnt(25753,19256,"ide_methods.bas");}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]))*89+24))= 1 ; if(!qbevent)break;evnt(25753,19257,"ide_methods.bas");}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]))*89+28))= 36 ; if(!qbevent)break;evnt(25753,19259,"ide_methods.bas");}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]))*89+32))=*_FUNC_IDEF1BOX_LONG_LNKS; if(!qbevent)break;evnt(25753,19259,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(_FUNC_IDEF1BOX_STRING_LNKS); if(!qbevent)break;evnt(25753,19260,"ide_methods.bas");}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]))*89+64))= 1 ; if(!qbevent)break;evnt(25753,19261,"ide_methods.bas");}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]))*89+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Which?",6)); if(!qbevent)break;evnt(25753,19262,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19264,"ide_methods.bas");}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]))*89+36))= 3 ; if(!qbevent)break;evnt(25753,19265,"ide_methods.bas");}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]))*89+24))=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ; if(!qbevent)break;evnt(25753,19266,"ide_methods.bas");}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]))*89+44))=FUNC_IDENEWTXT(qbs_new_txt_len("#OK",3)); if(!qbevent)break;evnt(25753,19267,"ide_methods.bas");}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]))*89+48))= 1 ; if(!qbevent)break;evnt(25753,19268,"ide_methods.bas");}while(r); S_56261:; fornext_value6193= 1 ; fornext_finalvalue6193= 100 ; fornext_step6193= 1 ; if (fornext_step6193<0) fornext_step_negative6193=1; else fornext_step_negative6193=0; if (new_error) goto fornext_error6193; goto fornext_entrylabel6193; while(1){ fornext_value6193=fornext_step6193+(*_FUNC_IDEF1BOX_LONG_I); fornext_entrylabel6193: *_FUNC_IDEF1BOX_LONG_I=fornext_value6193; if (fornext_step_negative6193){ if (fornext_value6193fornext_finalvalue6193) break; } fornext_error6193:; if(qbevent){evnt(25753,19273,"ide_methods.bas");if(r)goto S_56261;} 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]))*89)+ 0,((char*)_FUNC_IDEF1BOX_UDT_P)+(0)+ 0, 20); if(!qbevent)break;evnt(25753,19273,"ide_methods.bas");}while(r); fornext_continue_6192:; } fornext_exit_6192:; S_56264:; do{ if(qbevent){evnt(25753,19276,"ide_methods.bas");if(r)goto S_56264;} do{ SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + (0) )); if(!qbevent)break;evnt(25753,19279,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,19280,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_CX= 0 ; if(!qbevent)break;evnt(25753,19280,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_CY= 0 ; if(!qbevent)break;evnt(25753,19280,"ide_methods.bas");}while(r); S_56269:; fornext_value6196= 1 ; fornext_finalvalue6196= 100 ; fornext_step6196= 1 ; if (fornext_step6196<0) fornext_step_negative6196=1; else fornext_step_negative6196=0; if (new_error) goto fornext_error6196; goto fornext_entrylabel6196; while(1){ fornext_value6196=fornext_step6196+(*_FUNC_IDEF1BOX_LONG_I); fornext_entrylabel6196: *_FUNC_IDEF1BOX_LONG_I=fornext_value6196; if (fornext_step_negative6196){ if (fornext_value6196fornext_finalvalue6196) break; } fornext_error6196:; if(qbevent){evnt(25753,19281,"ide_methods.bas");if(r)goto S_56269;} S_56270:; 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]))*89+36)))||new_error){ if(qbevent){evnt(25753,19282,"ide_methods.bas");if(r)goto S_56270;} 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]))*89+60))=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F; if(!qbevent)break;evnt(25753,19285,"ide_methods.bas");}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]))*89+52))= 0 ; if(!qbevent)break;evnt(25753,19286,"ide_methods.bas");}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]))*89+56))= 0 ; if(!qbevent)break;evnt(25753,19286,"ide_methods.bas");}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]))*89) ),_FUNC_IDEF1BOX_LONG_F); if(!qbevent)break;evnt(25753,19287,"ide_methods.bas");}while(r); S_56275:; 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]))*89+52)))||new_error){ if(qbevent){evnt(25753,19288,"ide_methods.bas");if(r)goto S_56275;} 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]))*89+52)); if(!qbevent)break;evnt(25753,19288,"ide_methods.bas");}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]))*89+56)); if(!qbevent)break;evnt(25753,19288,"ide_methods.bas");}while(r); } } fornext_continue_6195:; } fornext_exit_6195:; do{ *_FUNC_IDEF1BOX_LONG_LASTFOCUS=*_FUNC_IDEF1BOX_LONG_F- 1 ; if(!qbevent)break;evnt(25753,19291,"ide_methods.bas");}while(r); do{ sub_pcopy( 1 , 0 ); if(!qbevent)break;evnt(25753,19298,"ide_methods.bas");}while(r); S_56283:; if ((*_FUNC_IDEF1BOX_LONG_CX)||new_error){ if(qbevent){evnt(25753,19299,"ide_methods.bas");if(r)goto S_56283;} do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19299,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_FUNC_IDEF1BOX_LONG_CY,*_FUNC_IDEF1BOX_LONG_CX, 1 ,NULL,NULL,7); if(!qbevent)break;evnt(25753,19299,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19299,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 0 ; if(!qbevent)break;evnt(25753,19302,"ide_methods.bas");}while(r); S_56289:; do{ if(qbevent){evnt(25753,19303,"ide_methods.bas");if(r)goto S_56289;} do{ SUB_GETINPUT(); if(!qbevent)break;evnt(25753,19304,"ide_methods.bas");}while(r); S_56291:; if ((*__LONG_MWHEEL)||new_error){ if(qbevent){evnt(25753,19305,"ide_methods.bas");if(r)goto S_56291;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19305,"ide_methods.bas");}while(r); } S_56294:; if ((*__LONG_KB)||new_error){ if(qbevent){evnt(25753,19306,"ide_methods.bas");if(r)goto S_56294;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19306,"ide_methods.bas");}while(r); } S_56297:; if ((*__LONG_MCLICK)||new_error){ if(qbevent){evnt(25753,19307,"ide_methods.bas");if(r)goto S_56297;} do{ *_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 1 ; if(!qbevent)break;evnt(25753,19307,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19307,"ide_methods.bas");}while(r); } S_56301:; if ((*__LONG_MRELEASE)||new_error){ if(qbevent){evnt(25753,19308,"ide_methods.bas");if(r)goto S_56301;} do{ *_FUNC_IDEF1BOX_LONG_MOUSEUP= 1 ; if(!qbevent)break;evnt(25753,19308,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19308,"ide_methods.bas");}while(r); } S_56305:; if ((*__LONG_MB)||new_error){ if(qbevent){evnt(25753,19309,"ide_methods.bas");if(r)goto S_56305;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19309,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEF1BOX_LONG_ALT=*__LONG_KALT; if(!qbevent)break;evnt(25753,19310,"ide_methods.bas");}while(r); S_56309:; if ((-(*_FUNC_IDEF1BOX_LONG_ALT!=*_FUNC_IDEF1BOX_LONG_OLDALT))||new_error){ if(qbevent){evnt(25753,19310,"ide_methods.bas");if(r)goto S_56309;} do{ *_FUNC_IDEF1BOX_LONG_CHANGE= 1 ; if(!qbevent)break;evnt(25753,19310,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEF1BOX_LONG_OLDALT=*_FUNC_IDEF1BOX_LONG_ALT; if(!qbevent)break;evnt(25753,19311,"ide_methods.bas");}while(r); do{ sub__limit( 100 ); if(!qbevent)break;evnt(25753,19312,"ide_methods.bas");}while(r); S_56314:; dl_continue_6197:; }while((!(*_FUNC_IDEF1BOX_LONG_CHANGE))&&(!new_error)); dl_exit_6197:; if(qbevent){evnt(25753,19313,"ide_methods.bas");if(r)goto S_56314;} S_56315:; if ((*_FUNC_IDEF1BOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,19314,"ide_methods.bas");if(r)goto S_56315;} do{ *__LONG_IDEHL= 1 ; if(!qbevent)break;evnt(25753,19314,"ide_methods.bas");}while(r); }else{ do{ *__LONG_IDEHL= 0 ; if(!qbevent)break;evnt(25753,19314,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19316,"ide_methods.bas");}while(r); S_56321:; if ((*_FUNC_IDEF1BOX_LONG_ALT&(~(*__LONG_KCTRL)))||new_error){ if(qbevent){evnt(25753,19317,"ide_methods.bas");if(r)goto S_56321;} S_56322:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||new_error){ if(qbevent){evnt(25753,19318,"ide_methods.bas");if(r)goto S_56322;} do{ *_FUNC_IDEF1BOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19319,"ide_methods.bas");}while(r); S_56324:; if (((-(*_FUNC_IDEF1BOX_LONG_K>= 65 ))&(-(*_FUNC_IDEF1BOX_LONG_K<= 90 )))||new_error){ if(qbevent){evnt(25753,19320,"ide_methods.bas");if(r)goto S_56324;} do{ qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEF1BOX_LONG_K)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19320,"ide_methods.bas");}while(r); } } } do{ qbg_screen(NULL,NULL, 0 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19323,"ide_methods.bas");}while(r); do{ qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,19323,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 1 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19323,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_INFO= 0 ; if(!qbevent)break;evnt(25753,19327,"ide_methods.bas");}while(r); S_56333:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,19328,"ide_methods.bas");if(r)goto S_56333;} do{ qbs_set(__STRING_K,func_chr( 255 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19328,"ide_methods.bas");}while(r); } S_56336:; if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||new_error){ if(qbevent){evnt(25753,19329,"ide_methods.bas");if(r)goto S_56336;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS+ 1 ; if(!qbevent)break;evnt(25753,19329,"ide_methods.bas");}while(r); } S_56339:; if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||new_error){ if(qbevent){evnt(25753,19330,"ide_methods.bas");if(r)goto S_56339;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS- 1 ; if(!qbevent)break;evnt(25753,19330,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_K,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19330,"ide_methods.bas");}while(r); } S_56343:; if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS< 1 ))||new_error){ if(qbevent){evnt(25753,19331,"ide_methods.bas");if(r)goto S_56343;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_LASTFOCUS; if(!qbevent)break;evnt(25753,19331,"ide_methods.bas");}while(r); } S_56346:; if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS>*_FUNC_IDEF1BOX_LONG_LASTFOCUS))||new_error){ if(qbevent){evnt(25753,19332,"ide_methods.bas");if(r)goto S_56346;} do{ *_FUNC_IDEF1BOX_LONG_FOCUS= 1 ; if(!qbevent)break;evnt(25753,19332,"ide_methods.bas");}while(r); } do{ *_FUNC_IDEF1BOX_LONG_F= 1 ; if(!qbevent)break;evnt(25753,19333,"ide_methods.bas");}while(r); S_56350:; fornext_value6200= 1 ; fornext_finalvalue6200= 100 ; fornext_step6200= 1 ; if (fornext_step6200<0) fornext_step_negative6200=1; else fornext_step_negative6200=0; if (new_error) goto fornext_error6200; goto fornext_entrylabel6200; while(1){ fornext_value6200=fornext_step6200+(*_FUNC_IDEF1BOX_LONG_I); fornext_entrylabel6200: *_FUNC_IDEF1BOX_LONG_I=fornext_value6200; if (fornext_step_negative6200){ if (fornext_value6200fornext_finalvalue6200) break; } fornext_error6200:; if(qbevent){evnt(25753,19334,"ide_methods.bas");if(r)goto S_56350;} 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]))*89+36)); if(!qbevent)break;evnt(25753,19335,"ide_methods.bas");}while(r); S_56352:; if ((*_FUNC_IDEF1BOX_LONG_T)||new_error){ if(qbevent){evnt(25753,19336,"ide_methods.bas");if(r)goto S_56352;} do{ *_FUNC_IDEF1BOX_LONG_FOCUSOFFSET=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F; if(!qbevent)break;evnt(25753,19337,"ide_methods.bas");}while(r); do{ SUB_IDEOBJUPDATE((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]))*89) ),_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(25753,19338,"ide_methods.bas");}while(r); } fornext_continue_6199:; } fornext_exit_6199:; S_56357:; 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(25753,19343,"ide_methods.bas");if(r)goto S_56357;} 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]))*89+72)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19344,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,_FUNC_IDEF1BOX_STRING_F); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19345,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19346,"ide_methods.bas");}while(r); S_56361:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 )))){ if(qbevent){evnt(25753,19347,"ide_methods.bas");if(r)goto S_56361;} do{ qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19348,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19349,"ide_methods.bas");}while(r); } } do{ *_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 0 ; if(!qbevent)break;evnt(25753,19353,"ide_methods.bas");}while(r); do{ *_FUNC_IDEF1BOX_LONG_MOUSEUP= 0 ; if(!qbevent)break;evnt(25753,19354,"ide_methods.bas");}while(r); dl_continue_6194:; }while(1); dl_exit_6194:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free241.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; } void SUB_SORT(ptrszint*_SUB_SORT_ARRAY_STRING998_ARR){ 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 "data242.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56368:; fornext_value6202=func_lbound(_SUB_SORT_ARRAY_STRING998_ARR,1,1)+ 1 ; fornext_finalvalue6202=func_ubound(_SUB_SORT_ARRAY_STRING998_ARR,1,1); fornext_step6202= 1 ; if (fornext_step6202<0) fornext_step_negative6202=1; else fornext_step_negative6202=0; if (new_error) goto fornext_error6202; goto fornext_entrylabel6202; while(1){ fornext_value6202=fornext_step6202+(*_SUB_SORT_LONG_I); fornext_entrylabel6202: *_SUB_SORT_LONG_I=fornext_value6202; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6202){ if (fornext_value6202fornext_finalvalue6202) break; } fornext_error6202:; if(qbevent){evnt(25753,19363,"ide_methods.bas");if(r)goto S_56368;} do{ qbs_set(_SUB_SORT_STRING_X,qbs_new_fixed(&((uint8*)(_SUB_SORT_ARRAY_STRING998_ARR[0]))[(array_check((*_SUB_SORT_LONG_I)-_SUB_SORT_ARRAY_STRING998_ARR[4],_SUB_SORT_ARRAY_STRING998_ARR[5]))*998],998,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19364,"ide_methods.bas");}while(r); do{ *_SUB_SORT_LONG_J=*_SUB_SORT_LONG_I- 1 ; if(!qbevent)break;evnt(25753,19365,"ide_methods.bas");}while(r); S_56371:; while((qbs_cleanup(qbs_tmp_base,-(*_SUB_SORT_LONG_J>=func_lbound(_SUB_SORT_ARRAY_STRING998_ARR,1,1))))||new_error){ if(qbevent){evnt(25753,19366,"ide_methods.bas");if(r)goto S_56371;} S_56372:; if ((qbs_cleanup(qbs_tmp_base,qbs_lessorequal(qbs_new_fixed(&((uint8*)(_SUB_SORT_ARRAY_STRING998_ARR[0]))[(array_check((*_SUB_SORT_LONG_J)-_SUB_SORT_ARRAY_STRING998_ARR[4],_SUB_SORT_ARRAY_STRING998_ARR[5]))*998],998,1),_SUB_SORT_STRING_X)))||new_error){ if(qbevent){evnt(25753,19367,"ide_methods.bas");if(r)goto S_56372;} do{ goto ww_exit_6203; if(!qbevent)break;evnt(25753,19367,"ide_methods.bas");}while(r); } do{ tmp_long=array_check((*_SUB_SORT_LONG_J+ 1 )-_SUB_SORT_ARRAY_STRING998_ARR[4],_SUB_SORT_ARRAY_STRING998_ARR[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(_SUB_SORT_ARRAY_STRING998_ARR[0]))[tmp_long*998],998,1),qbs_new_fixed(&((uint8*)(_SUB_SORT_ARRAY_STRING998_ARR[0]))[(array_check((*_SUB_SORT_LONG_J)-_SUB_SORT_ARRAY_STRING998_ARR[4],_SUB_SORT_ARRAY_STRING998_ARR[5]))*998],998,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19368,"ide_methods.bas");}while(r); do{ *_SUB_SORT_LONG_J=*_SUB_SORT_LONG_J- 1 ; if(!qbevent)break;evnt(25753,19369,"ide_methods.bas");}while(r); ww_continue_6203:; } ww_exit_6203:; do{ tmp_long=array_check((*_SUB_SORT_LONG_J+ 1 )-_SUB_SORT_ARRAY_STRING998_ARR[4],_SUB_SORT_ARRAY_STRING998_ARR[5]); if (!new_error) qbs_set(qbs_new_fixed(&((uint8*)(_SUB_SORT_ARRAY_STRING998_ARR[0]))[tmp_long*998],998,1),_SUB_SORT_STRING_X); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19371,"ide_methods.bas");}while(r); fornext_continue_6201:; } fornext_exit_6201:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free242.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_FINDPROPOSEDTITLE(){ 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 "data243.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,19379,"ide_methods.bas");}while(r); S_56381:; fornext_value6205= 1 ; fornext_finalvalue6205=*__LONG_IDEN; fornext_step6205= 1 ; if (fornext_step6205<0) fornext_step_negative6205=1; else fornext_step_negative6205=0; if (new_error) goto fornext_error6205; goto fornext_entrylabel6205; while(1){ fornext_value6205=fornext_step6205+(*_FUNC_FINDPROPOSEDTITLE_LONG_I); fornext_entrylabel6205: *_FUNC_FINDPROPOSEDTITLE_LONG_I=fornext_value6205; if (fornext_step_negative6205){ if (fornext_value6205fornext_finalvalue6205) break; } fornext_error6205:; if(qbevent){evnt(25753,19380,"ide_methods.bas");if(r)goto S_56381;} do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,FUNC_IDEGETLINE(_FUNC_FINDPROPOSEDTITLE_LONG_I)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19381,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,qbs_ltrim(qbs_rtrim(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19382,"ide_methods.bas");}while(r); do{ *_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE=func_instr(NULL,qbs_ucase(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE),qbs_add(qbs_new_txt_len("_TITLE ",7),func_chr( 34 )),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19383,"ide_methods.bas");}while(r); S_56385:; if ((-(*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE> 0 ))||new_error){ if(qbevent){evnt(25753,19384,"ide_methods.bas");if(r)goto S_56385;} do{ SUB_FINDQUOTECOMMENT(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE,_FUNC_FINDPROPOSEDTITLE_BYTE_C,_FUNC_FINDPROPOSEDTITLE_BYTE_Q); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19385,"ide_methods.bas");}while(r); S_56387:; if ((~(*_FUNC_FINDPROPOSEDTITLE_BYTE_Q))||new_error){ if(qbevent){evnt(25753,19386,"ide_methods.bas");if(r)goto S_56387;} do{ *_FUNC_FINDPROPOSEDTITLE_LONG_FIND_CLOSINGQUOTE=func_instr(*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE+ 8 ,_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,func_chr( 34 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19387,"ide_methods.bas");}while(r); S_56389:; if ((-(*_FUNC_FINDPROPOSEDTITLE_LONG_FIND_CLOSINGQUOTE> 0 ))||new_error){ if(qbevent){evnt(25753,19388,"ide_methods.bas");if(r)goto S_56389;} do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_TEMPFOUND_TITLE,func_mid(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE+ 8 ,(*_FUNC_FINDPROPOSEDTITLE_LONG_FIND_CLOSINGQUOTE-*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE)- 8 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19389,"ide_methods.bas");}while(r); } do{ goto fornext_exit_6204; if(!qbevent)break;evnt(25753,19391,"ide_methods.bas");}while(r); } } fornext_continue_6204:; } fornext_exit_6204:; do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_INVALIDCHARS,qbs_add(qbs_new_txt_len(":/\\?*><|",8),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19396,"ide_methods.bas");}while(r); S_56397:; fornext_value6207= 1 ; fornext_finalvalue6207=_FUNC_FINDPROPOSEDTITLE_STRING_TEMPFOUND_TITLE->len; fornext_step6207= 1 ; if (fornext_step6207<0) fornext_step_negative6207=1; else fornext_step_negative6207=0; if (new_error) goto fornext_error6207; goto fornext_entrylabel6207; while(1){ fornext_value6207=fornext_step6207+(*_FUNC_FINDPROPOSEDTITLE_LONG_I); fornext_entrylabel6207: *_FUNC_FINDPROPOSEDTITLE_LONG_I=fornext_value6207; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6207){ if (fornext_value6207fornext_finalvalue6207) break; } fornext_error6207:; if(qbevent){evnt(25753,19397,"ide_methods.bas");if(r)goto S_56397;} do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_THISCHAR,func_mid(_FUNC_FINDPROPOSEDTITLE_STRING_TEMPFOUND_TITLE,*_FUNC_FINDPROPOSEDTITLE_LONG_I, 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19398,"ide_methods.bas");}while(r); S_56399:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDPROPOSEDTITLE_STRING_INVALIDCHARS,_FUNC_FINDPROPOSEDTITLE_STRING_THISCHAR,0)== 0 )))||new_error){ if(qbevent){evnt(25753,19399,"ide_methods.bas");if(r)goto S_56399;} do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_FOUND_TITLE,qbs_add(_FUNC_FINDPROPOSEDTITLE_STRING_FOUND_TITLE,_FUNC_FINDPROPOSEDTITLE_STRING_THISCHAR)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19400,"ide_methods.bas");}while(r); } fornext_continue_6206:; } fornext_exit_6206:; do{ qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_FINDPROPOSEDTITLE,qbs_ltrim(qbs_rtrim(_FUNC_FINDPROPOSEDTITLE_STRING_FOUND_TITLE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19404,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free243.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_FINDPROPOSEDTITLE_STRING_FINDPROPOSEDTITLE);return _FUNC_FINDPROPOSEDTITLE_STRING_FINDPROPOSEDTITLE; } qbs* FUNC_FINDCURRENTSF(int32*_FUNC_FINDCURRENTSF_LONG_WHICHLINE){ 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 "data244.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_SFNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19412,"ide_methods.bas");}while(r); S_56405:; if ((-(*_FUNC_FINDCURRENTSF_LONG_WHICHLINE> 0 ))||new_error){ if(qbevent){evnt(25753,19413,"ide_methods.bas");if(r)goto S_56405;} S_56406:; fornext_value6210=*_FUNC_FINDCURRENTSF_LONG_WHICHLINE; fornext_finalvalue6210= 1 ; fornext_step6210= -1 ; if (fornext_step6210<0) fornext_step_negative6210=1; else fornext_step_negative6210=0; if (new_error) goto fornext_error6210; goto fornext_entrylabel6210; while(1){ fornext_value6210=fornext_step6210+(*_FUNC_FINDCURRENTSF_LONG_CURRSF_CHECK); fornext_entrylabel6210: *_FUNC_FINDCURRENTSF_LONG_CURRSF_CHECK=fornext_value6210; if (fornext_step_negative6210){ if (fornext_value6210fornext_finalvalue6210) break; } fornext_error6210:; if(qbevent){evnt(25753,19414,"ide_methods.bas");if(r)goto S_56406;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,FUNC_IDEGETLINE(_FUNC_FINDCURRENTSF_LONG_CURRSF_CHECK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19415,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_ltrim(qbs_rtrim(_FUNC_FINDCURRENTSF_STRING_THISLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19416,"ide_methods.bas");}while(r); do{ *_FUNC_FINDCURRENTSF_LONG_ISSF= 0 ; if(!qbevent)break;evnt(25753,19417,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE,qbs_ucase(_FUNC_FINDCURRENTSF_STRING_THISLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19418,"ide_methods.bas");}while(r); S_56411:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 4 ),qbs_new_txt_len("SUB ",4))))||new_error){ if(qbevent){evnt(25753,19419,"ide_methods.bas");if(r)goto S_56411;} do{ *_FUNC_FINDCURRENTSF_LONG_ISSF= 1 ; if(!qbevent)break;evnt(25753,19419,"ide_methods.bas");}while(r); } S_56414:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 9 ),qbs_new_txt_len("FUNCTION ",9))))||new_error){ if(qbevent){evnt(25753,19420,"ide_methods.bas");if(r)goto S_56414;} do{ *_FUNC_FINDCURRENTSF_LONG_ISSF= 2 ; if(!qbevent)break;evnt(25753,19420,"ide_methods.bas");}while(r); } S_56417:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 7 ),qbs_new_txt_len("END SUB",7)))&(-(*_FUNC_FINDCURRENTSF_LONG_CURRSF_CHECK<*_FUNC_FINDCURRENTSF_LONG_WHICHLINE))))||new_error){ if(qbevent){evnt(25753,19421,"ide_methods.bas");if(r)goto S_56417;} do{ goto fornext_exit_6209; if(!qbevent)break;evnt(25753,19421,"ide_methods.bas");}while(r); } S_56420:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 12 ),qbs_new_txt_len("END FUNCTION",12)))&(-(*_FUNC_FINDCURRENTSF_LONG_CURRSF_CHECK<*_FUNC_FINDCURRENTSF_LONG_WHICHLINE))))||new_error){ if(qbevent){evnt(25753,19422,"ide_methods.bas");if(r)goto S_56420;} do{ goto fornext_exit_6209; if(!qbevent)break;evnt(25753,19422,"ide_methods.bas");}while(r); } S_56423:; if ((*_FUNC_FINDCURRENTSF_LONG_ISSF)||new_error){ if(qbevent){evnt(25753,19423,"ide_methods.bas");if(r)goto S_56423;} S_56424:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 7 ),qbs_new_txt_len(" STATIC",7))))||new_error){ if(qbevent){evnt(25753,19424,"ide_methods.bas");if(r)goto S_56424;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_rtrim(qbs_left(_FUNC_FINDCURRENTSF_STRING_THISLINE,_FUNC_FINDCURRENTSF_STRING_THISLINE->len- 7 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19425,"ide_methods.bas");}while(r); } S_56427:; if ((-(*_FUNC_FINDCURRENTSF_LONG_ISSF== 1 ))||new_error){ if(qbevent){evnt(25753,19428,"ide_methods.bas");if(r)goto S_56427;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_right(_FUNC_FINDCURRENTSF_STRING_THISLINE,_FUNC_FINDCURRENTSF_STRING_THISLINE->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19429,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_right(_FUNC_FINDCURRENTSF_STRING_THISLINE,_FUNC_FINDCURRENTSF_STRING_THISLINE->len- 9 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19431,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_ltrim(qbs_rtrim(_FUNC_FINDCURRENTSF_STRING_THISLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19433,"ide_methods.bas");}while(r); do{ *_FUNC_FINDCURRENTSF_LONG_CHECKARGS=func_instr(NULL,_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_new_txt_len("(",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19434,"ide_methods.bas");}while(r); S_56434:; if ((*_FUNC_FINDCURRENTSF_LONG_CHECKARGS)||new_error){ if(qbevent){evnt(25753,19435,"ide_methods.bas");if(r)goto S_56434;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_SFNAME,qbs_rtrim(qbs_left(_FUNC_FINDCURRENTSF_STRING_THISLINE,*_FUNC_FINDCURRENTSF_LONG_CHECKARGS- 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19436,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_SFNAME,_FUNC_FINDCURRENTSF_STRING_THISLINE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19438,"ide_methods.bas");}while(r); } do{ *_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE= 0 ; if(!qbevent)break;evnt(25753,19443,"ide_methods.bas");}while(r); S_56440:; fornext_value6215=*_FUNC_FINDCURRENTSF_LONG_CURRSF_CHECK; fornext_finalvalue6215= 1 ; fornext_step6215= -1 ; if (fornext_step6215<0) fornext_step_negative6215=1; else fornext_step_negative6215=0; if (new_error) goto fornext_error6215; goto fornext_entrylabel6215; while(1){ fornext_value6215=fornext_step6215+(*_FUNC_FINDCURRENTSF_LONG_DECLIB_CHECK); fornext_entrylabel6215: *_FUNC_FINDCURRENTSF_LONG_DECLIB_CHECK=fornext_value6215; if (fornext_step_negative6215){ if (fornext_value6215fornext_finalvalue6215) break; } fornext_error6215:; if(qbevent){evnt(25753,19444,"ide_methods.bas");if(r)goto S_56440;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,FUNC_IDEGETLINE(_FUNC_FINDCURRENTSF_LONG_DECLIB_CHECK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19445,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_ltrim(qbs_rtrim(_FUNC_FINDCURRENTSF_STRING_THISLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19446,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE,qbs_ucase(_FUNC_FINDCURRENTSF_STRING_THISLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19447,"ide_methods.bas");}while(r); S_56444:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 8 ),qbs_new_txt_len("DECLARE ",8)))&(-(func_instr(NULL,_FUNC_FINDCURRENTSF_STRING_NCTHISLINE,qbs_new_txt_len(" LIBRARY",8),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,19448,"ide_methods.bas");if(r)goto S_56444;} do{ *_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE= -1 ; if(!qbevent)break;evnt(25753,19448,"ide_methods.bas");}while(r); do{ goto fornext_exit_6214; if(!qbevent)break;evnt(25753,19448,"ide_methods.bas");}while(r); } S_56448:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 11 ),qbs_new_txt_len("END DECLARE",11))))||new_error){ if(qbevent){evnt(25753,19449,"ide_methods.bas");if(r)goto S_56448;} do{ goto fornext_exit_6214; if(!qbevent)break;evnt(25753,19449,"ide_methods.bas");}while(r); } fornext_continue_6214:; } fornext_exit_6214:; S_56452:; if ((-(*_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE== -1 ))||new_error){ if(qbevent){evnt(25753,19452,"ide_methods.bas");if(r)goto S_56452;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_SFNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19453,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_FINDCURRENTSF_LONG_ENDEDSF= 0 ; if(!qbevent)break;evnt(25753,19459,"ide_methods.bas");}while(r); S_56456:; fornext_value6217=*_FUNC_FINDCURRENTSF_LONG_WHICHLINE; fornext_finalvalue6217=*__LONG_IDEN; fornext_step6217= 1 ; if (fornext_step6217<0) fornext_step_negative6217=1; else fornext_step_negative6217=0; if (new_error) goto fornext_error6217; goto fornext_entrylabel6217; while(1){ fornext_value6217=fornext_step6217+(*_FUNC_FINDCURRENTSF_LONG_ENDSF_CHECK); fornext_entrylabel6217: *_FUNC_FINDCURRENTSF_LONG_ENDSF_CHECK=fornext_value6217; if (fornext_step_negative6217){ if (fornext_value6217fornext_finalvalue6217) break; } fornext_error6217:; if(qbevent){evnt(25753,19460,"ide_methods.bas");if(r)goto S_56456;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,FUNC_IDEGETLINE(_FUNC_FINDCURRENTSF_LONG_ENDSF_CHECK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19461,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_THISLINE,qbs_ltrim(qbs_rtrim(_FUNC_FINDCURRENTSF_STRING_THISLINE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19462,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE,qbs_ucase(_FUNC_FINDCURRENTSF_STRING_THISLINE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19463,"ide_methods.bas");}while(r); S_56460:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 7 ),qbs_new_txt_len("END SUB",7))))||new_error){ if(qbevent){evnt(25753,19464,"ide_methods.bas");if(r)goto S_56460;} do{ *_FUNC_FINDCURRENTSF_LONG_ENDEDSF= 1 ; if(!qbevent)break;evnt(25753,19464,"ide_methods.bas");}while(r); do{ goto fornext_exit_6216; if(!qbevent)break;evnt(25753,19464,"ide_methods.bas");}while(r); } S_56464:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 12 ),qbs_new_txt_len("END FUNCTION",12))))||new_error){ if(qbevent){evnt(25753,19465,"ide_methods.bas");if(r)goto S_56464;} do{ *_FUNC_FINDCURRENTSF_LONG_ENDEDSF= 2 ; if(!qbevent)break;evnt(25753,19465,"ide_methods.bas");}while(r); do{ goto fornext_exit_6216; if(!qbevent)break;evnt(25753,19465,"ide_methods.bas");}while(r); } S_56468:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 4 ),qbs_new_txt_len("SUB ",4)))&(-(*_FUNC_FINDCURRENTSF_LONG_ENDSF_CHECK==*_FUNC_FINDCURRENTSF_LONG_WHICHLINE))))||new_error){ if(qbevent){evnt(25753,19466,"ide_methods.bas");if(r)goto S_56468;} do{ *_FUNC_FINDCURRENTSF_LONG_ENDEDSF= 1 ; if(!qbevent)break;evnt(25753,19466,"ide_methods.bas");}while(r); do{ goto fornext_exit_6216; if(!qbevent)break;evnt(25753,19466,"ide_methods.bas");}while(r); } S_56472:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 9 ),qbs_new_txt_len("FUNCTION ",9)))&(-(*_FUNC_FINDCURRENTSF_LONG_ENDSF_CHECK==*_FUNC_FINDCURRENTSF_LONG_WHICHLINE))))||new_error){ if(qbevent){evnt(25753,19467,"ide_methods.bas");if(r)goto S_56472;} do{ *_FUNC_FINDCURRENTSF_LONG_ENDEDSF= 2 ; if(!qbevent)break;evnt(25753,19467,"ide_methods.bas");}while(r); do{ goto fornext_exit_6216; if(!qbevent)break;evnt(25753,19467,"ide_methods.bas");}while(r); } S_56476:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 4 ),qbs_new_txt_len("SUB ",4)))&(-(*_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE== 0 ))))||new_error){ if(qbevent){evnt(25753,19468,"ide_methods.bas");if(r)goto S_56476;} do{ goto fornext_exit_6216; if(!qbevent)break;evnt(25753,19468,"ide_methods.bas");}while(r); } S_56479:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 9 ),qbs_new_txt_len("FUNCTION ",9)))&(-(*_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE== 0 ))))||new_error){ if(qbevent){evnt(25753,19469,"ide_methods.bas");if(r)goto S_56479;} do{ goto fornext_exit_6216; if(!qbevent)break;evnt(25753,19469,"ide_methods.bas");}while(r); } S_56482:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 8 ),qbs_new_txt_len("DECLARE ",8)))&(-(func_instr(NULL,_FUNC_FINDCURRENTSF_STRING_NCTHISLINE,qbs_new_txt_len(" LIBRARY",8),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,19470,"ide_methods.bas");if(r)goto S_56482;} do{ *_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE= -1 ; if(!qbevent)break;evnt(25753,19470,"ide_methods.bas");}while(r); } S_56485:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_FINDCURRENTSF_STRING_NCTHISLINE, 11 ),qbs_new_txt_len("END DECLARE",11))))||new_error){ if(qbevent){evnt(25753,19471,"ide_methods.bas");if(r)goto S_56485;} do{ *_FUNC_FINDCURRENTSF_LONG_INSIDEDECLARE= 0 ; if(!qbevent)break;evnt(25753,19471,"ide_methods.bas");}while(r); } fornext_continue_6216:; } fornext_exit_6216:; S_56489:; if ((-(*_FUNC_FINDCURRENTSF_LONG_ENDEDSF== 0 ))||new_error){ if(qbevent){evnt(25753,19473,"ide_methods.bas");if(r)goto S_56489;} do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_SFNAME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19473,"ide_methods.bas");}while(r); }else{ do{ goto fornext_exit_6209; if(!qbevent)break;evnt(25753,19473,"ide_methods.bas");}while(r); } } } fornext_continue_6209:; } fornext_exit_6209:; } do{ qbs_set(_FUNC_FINDCURRENTSF_STRING_FINDCURRENTSF,_FUNC_FINDCURRENTSF_STRING_SFNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19479,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free244.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_FINDCURRENTSF_STRING_FINDCURRENTSF);return _FUNC_FINDCURRENTSF_STRING_FINDCURRENTSF; } void SUB_ADDQUICKNAVHISTORY(){ 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 "data245.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56499:; if ((-(*__LONG_QUICKNAVTOTAL> 0 ))||new_error){ if(qbevent){evnt(25753,19484,"ide_methods.bas");if(r)goto S_56499;} S_56500:; if ((-(*(int32*)(((char*)__ARRAY_UDT_QUICKNAVHISTORY[0])+((array_check((*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4],__ARRAY_UDT_QUICKNAVHISTORY[5]))*16+12))==*__LONG_IDECY))||new_error){ if(qbevent){evnt(25753,19485,"ide_methods.bas");if(r)goto S_56500;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19485,"ide_methods.bas");}while(r); } } do{ *__LONG_QUICKNAVTOTAL=*__LONG_QUICKNAVTOTAL+ 1 ; if(!qbevent)break;evnt(25753,19488,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_QUICKNAVHISTORY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_UDT_QUICKNAVHISTORY)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_UDT_QUICKNAVHISTORY[2]&1){ preserved_elements=__ARRAY_UDT_QUICKNAVHISTORY[5]; } else preserved_elements=0; __ARRAY_UDT_QUICKNAVHISTORY[4]= 1 ; __ARRAY_UDT_QUICKNAVHISTORY[5]=(*__LONG_QUICKNAVTOTAL)-__ARRAY_UDT_QUICKNAVHISTORY[4]+1; __ARRAY_UDT_QUICKNAVHISTORY[6]=1; if (__ARRAY_UDT_QUICKNAVHISTORY[2]&4){ if (preserved_elements){ memcpy(redim_preserve_cmem_buffer,(void*)(__ARRAY_UDT_QUICKNAVHISTORY[0]),preserved_elements*128/8+1); cmem_dynamic_free((uint8*)(__ARRAY_UDT_QUICKNAVHISTORY[0])); tmp_long=__ARRAY_UDT_QUICKNAVHISTORY[5]; __ARRAY_UDT_QUICKNAVHISTORY[0]=(ptrszint)cmem_dynamic_malloc(tmp_long*128/8+1); memcpy((void*)(__ARRAY_UDT_QUICKNAVHISTORY[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_UPDATEIDEINFO(){ 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 "data246.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56510:; if ((qbs_cleanup(qbs_tmp_base,__STRING_IDEINFO->len))||new_error){ if(qbevent){evnt(25753,19499,"ide_methods.bas");if(r)goto S_56510;} S_56511:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_IDEINFO, 1 )== 0 )))||new_error){ if(qbevent){evnt(25753,19500,"ide_methods.bas");if(r)goto S_56511;} do{ qbs_set(__STRING_IDEINFO,func_mid(__STRING_IDEINFO, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19502,"ide_methods.bas");}while(r); do{ *_SUB_UPDATEIDEINFO_INTEGER_PERCENTAGE=qbr_float_to_long(func_val(func_mid(__STRING_IDEINFO, 1 , 3 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19503,"ide_methods.bas");}while(r); do{ qbg_sub_color( 13 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,19504,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 1 ,func_string(qbr(((*__LONG_IDEWX- 2 )**_SUB_UPDATEIDEINFO_INTEGER_PERCENTAGE)/ ((long double)( 100 ))),(qbs_new_txt_len("_",1)->chr[0])),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19505,"ide_methods.bas");}while(r); } } do{ qbs_set(_SUB_UPDATEIDEINFO_STRING_A,__STRING_IDEINFO); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19508,"ide_methods.bas");}while(r); S_56519:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_UPDATEIDEINFO_STRING_A->len>(*__LONG_IDEWX- 20 ))))||new_error){ if(qbevent){evnt(25753,19509,"ide_methods.bas");if(r)goto S_56519;} do{ qbs_set(_SUB_UPDATEIDEINFO_STRING_A,qbs_add(qbs_left(_SUB_UPDATEIDEINFO_STRING_A,(*__LONG_IDEWX- 23 )),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19509,"ide_methods.bas");}while(r); } S_56522:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_UPDATEIDEINFO_STRING_A->len<(*__LONG_IDEWX- 20 ))))||new_error){ if(qbevent){evnt(25753,19510,"ide_methods.bas");if(r)goto S_56522;} do{ qbs_set(_SUB_UPDATEIDEINFO_STRING_A,qbs_add(_SUB_UPDATEIDEINFO_STRING_A,func_space((*__LONG_IDEWX- 20 )-_SUB_UPDATEIDEINFO_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19510,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,19511,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,_SUB_UPDATEIDEINFO_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19512,"ide_methods.bas");}while(r); S_56527:; if ((qbs_cleanup(qbs_tmp_base,-(__STRING_VERSIONSTRINGSTATUS->len== 0 )))||new_error){ if(qbevent){evnt(25753,19514,"ide_methods.bas");if(r)goto S_56527;} do{ qbs_set(__STRING_VERSIONSTRINGSTATUS,qbs_add(qbs_new_txt_len(" v",2),__STRING_VERSION)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19515,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VERSIONSTRINGSTATUS,qbs_add(__STRING_VERSIONSTRINGSTATUS,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19516,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 2 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,19519,"ide_methods.bas");}while(r); do{ sub__printstring(*__LONG_IDEWX- 21 -__STRING_VERSIONSTRINGSTATUS->len,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_VERSIONSTRINGSTATUS,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19520,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19522,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free246.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_UPDATEMENUHELPLINE(qbs*_SUB_UPDATEMENUHELPLINE_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 "data247.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56534:; if ((qbs_cleanup(qbs_tmp_base,-(_SUB_UPDATEMENUHELPLINE_STRING_A->len>(*__LONG_IDEWX- 2 ))))||new_error){ if(qbevent){evnt(25753,19526,"ide_methods.bas");if(r)goto S_56534;} do{ qbs_set(_SUB_UPDATEMENUHELPLINE_STRING_A,qbs_add(qbs_left(_SUB_UPDATEMENUHELPLINE_STRING_A,(*__LONG_IDEWX- 4 )),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19526,"ide_methods.bas");}while(r); } do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,19527,"ide_methods.bas");}while(r); do{ sub__printstring( 1 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,func_space(*__LONG_IDEWX),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19528,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,_SUB_UPDATEMENUHELPLINE_STRING_A,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19529,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free247.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_DARKENFGBG(int8*_FUNC_DARKENFGBG_BYTE_ACTION){ 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 "data248.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56540:; if ((-(*_FUNC_DARKENFGBG_BYTE_ACTION== 1 ))||new_error){ if(qbevent){evnt(25753,19535,"ide_methods.bas");if(r)goto S_56540;} do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19536,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19537,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19538,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERKWCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEKEYWORDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEKEYWORDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEKEYWORDCOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19539,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERNUMCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDENUMBERSCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDENUMBERSCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDENUMBERSCOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19540,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19541,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERIDECHROMACOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDECHROMACOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDECHROMACOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDECHROMACOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19542,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19543,"ide_methods.bas");}while(r); do{ *_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 )); if(!qbevent)break;evnt(25753,19544,"ide_methods.bas");}while(r); do{ sub__palettecolor( 1 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19545,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19546,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR, 0 ,1); if(!qbevent)break;evnt(25753,19547,"ide_methods.bas");}while(r); do{ sub__palettecolor( 7 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERIDECHROMACOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19548,"ide_methods.bas");}while(r); do{ sub__palettecolor( 8 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERNUMCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19549,"ide_methods.bas");}while(r); do{ sub__palettecolor( 10 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19550,"ide_methods.bas");}while(r); do{ sub__palettecolor( 11 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19551,"ide_methods.bas");}while(r); do{ sub__palettecolor( 12 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERKWCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19552,"ide_methods.bas");}while(r); do{ sub__palettecolor( 13 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19553,"ide_methods.bas");}while(r); do{ sub__palettecolor( 14 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19554,"ide_methods.bas");}while(r); }else{ do{ sub__palettecolor( 1 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19556,"ide_methods.bas");}while(r); do{ sub__palettecolor( 5 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19557,"ide_methods.bas");}while(r); do{ sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1); if(!qbevent)break;evnt(25753,19558,"ide_methods.bas");}while(r); do{ sub__palettecolor( 7 ,*__ULONG_IDECHROMACOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19559,"ide_methods.bas");}while(r); do{ sub__palettecolor( 8 ,*__ULONG_IDENUMBERSCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19560,"ide_methods.bas");}while(r); do{ sub__palettecolor( 10 ,*__ULONG_IDEMETACOMMANDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19561,"ide_methods.bas");}while(r); do{ sub__palettecolor( 11 ,*__ULONG_IDECOMMENTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19562,"ide_methods.bas");}while(r); do{ sub__palettecolor( 12 ,*__ULONG_IDEKEYWORDCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19563,"ide_methods.bas");}while(r); do{ sub__palettecolor( 13 ,*__ULONG_IDETEXTCOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19564,"ide_methods.bas");}while(r); do{ sub__palettecolor( 14 ,*__ULONG_IDEQUOTECOLOR, 0 ,1); if(!qbevent)break;evnt(25753,19565,"ide_methods.bas");}while(r); } do{ *_FUNC_DARKENFGBG_LONG_DARKENFGBG= 0 ; if(!qbevent)break;evnt(25753,19568,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free248.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_DARKENFGBG_LONG_DARKENFGBG; } void SUB_HIDEBRACKETHIGHLIGHT(){ 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 "data249.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_HIDEBRACKETHIGHLIGHT_LONG_OLDBRACKETHIGHLIGHTSETTING=*__INTEGER_BRACKETHIGHLIGHT; if(!qbevent)break;evnt(25753,19575,"ide_methods.bas");}while(r); do{ *_SUB_HIDEBRACKETHIGHLIGHT_LONG_OLDMULTIHIGHLIGHTSETTING=*__INTEGER_MULTIHIGHLIGHT; if(!qbevent)break;evnt(25753,19576,"ide_methods.bas");}while(r); do{ *_SUB_HIDEBRACKETHIGHLIGHT_LONG_OLDSHOWLINENUMBERSUSEBG=*__BYTE_SHOWLINENUMBERSUSEBG; if(!qbevent)break;evnt(25753,19577,"ide_methods.bas");}while(r); do{ *__INTEGER_BRACKETHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,19578,"ide_methods.bas");}while(r); do{ *__INTEGER_MULTIHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,19579,"ide_methods.bas");}while(r); do{ *__BYTE_SHOWLINENUMBERSUSEBG= 0 ; if(!qbevent)break;evnt(25753,19580,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 0 ,NULL,NULL,4); if(!qbevent)break;evnt(25753,19581,"ide_methods.bas");}while(r); do{ *__BYTE_HIDECURRENTLINEHIGHLIGHT= -1 ; if(!qbevent)break;evnt(25753,19582,"ide_methods.bas");}while(r); do{ SUB_IDESHOWTEXT(); if(!qbevent)break;evnt(25753,19583,"ide_methods.bas");}while(r); do{ *__BYTE_HIDECURRENTLINEHIGHLIGHT= 0 ; if(!qbevent)break;evnt(25753,19584,"ide_methods.bas");}while(r); do{ *__INTEGER_BRACKETHIGHLIGHT=*_SUB_HIDEBRACKETHIGHLIGHT_LONG_OLDBRACKETHIGHLIGHTSETTING; if(!qbevent)break;evnt(25753,19585,"ide_methods.bas");}while(r); do{ *__INTEGER_MULTIHIGHLIGHT=*_SUB_HIDEBRACKETHIGHLIGHT_LONG_OLDMULTIHIGHLIGHTSETTING; if(!qbevent)break;evnt(25753,19586,"ide_methods.bas");}while(r); do{ *__BYTE_SHOWLINENUMBERSUSEBG=*_SUB_HIDEBRACKETHIGHLIGHT_LONG_OLDSHOWLINENUMBERSUSEBG; if(!qbevent)break;evnt(25753,19587,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free249.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_LOADCOLORSCHEMES(){ 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 "data250.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,19591,"ide_methods.bas");}while(r); do{ *__INTEGER_PRESETCOLORSCHEMES= 10 ; if(!qbevent)break;evnt(25753,19593,"ide_methods.bas");}while(r); do{ if (__ARRAY_STRING_COLORSCHEMES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_COLORSCHEMES)[8])->id=(++mem_lock_id); if (__ARRAY_STRING_COLORSCHEMES[2]&1){ tmp_long=__ARRAY_STRING_COLORSCHEMES[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long]); free((void*)(__ARRAY_STRING_COLORSCHEMES[0])); } __ARRAY_STRING_COLORSCHEMES[4]= 1 ; __ARRAY_STRING_COLORSCHEMES[5]=(*__INTEGER_PRESETCOLORSCHEMES)-__ARRAY_STRING_COLORSCHEMES[4]+1; __ARRAY_STRING_COLORSCHEMES[6]=1; __ARRAY_STRING_COLORSCHEMES[0]=(ptrszint)malloc(__ARRAY_STRING_COLORSCHEMES[5]*8); if (!__ARRAY_STRING_COLORSCHEMES[0]) error(257); __ARRAY_STRING_COLORSCHEMES[2]|=1; tmp_long=__ARRAY_STRING_COLORSCHEMES[5]; if (__ARRAY_STRING_COLORSCHEMES[2]&4){ while(tmp_long--) ((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,19594,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I= 0 ; if(!qbevent)break;evnt(25753,19594,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19595,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Super dark blue|216216216069118147216098078255167000085206085098098098000000039000049078000088108170170170",106)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19595,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19596,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Dark blue|226226226069147216245128177255177000085255085049196196000000069000068108000147177170170170",100)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19596,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19597,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("QB64 Original|226226226147196235245128177255255085085255085085255255000000170000108177000147177170170170",104)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19597,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19598,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Classic QB4.5|177177177177177177177177177177177177177177177177177177000000170000000170000147177170170170",104)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19598,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19599,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("CF Dark|226226226115222227255043138255178034185237049157118137043045037010000020088088088170170170",98)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19599,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19600,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Dark side|255255255206206000245010098000177000085255085049186245011022029100100100000147177170170170",100)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19600,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19601,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Camouflage|196196196255255255245128177255177000137177147147137020000039029098069020000147177170170170",101)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19601,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19602,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Plum|186186186255255255245128177255108000085186078085186255059000059088088128000147177170170170",95)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19602,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19603,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("Light green|051051051000000216245128177255157255147177093206206206234255234206255206000147177170170170",102)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19603,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19604,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*_SUB_LOADCOLORSCHEMES_LONG_I)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("All white|051051051000000216245128177206147000059177000206206206255255255245245245000147177170170170",100)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19604,"ide_methods.bas");}while(r); do{ *__INTEGER_TOTALCOLORSCHEMES=*__INTEGER_PRESETCOLORSCHEMES; if(!qbevent)break;evnt(25753,19605,"ide_methods.bas");}while(r); do{ *__INTEGER_LASTVALIDCOLORSCHEME=*__INTEGER_TOTALCOLORSCHEMES; if(!qbevent)break;evnt(25753,19606,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_I= 0 ; if(!qbevent)break;evnt(25753,19609,"ide_methods.bas");}while(r); S_56613:; do{ if(qbevent){evnt(25753,19610,"ide_methods.bas");if(r)goto S_56613;} do{ *_SUB_LOADCOLORSCHEMES_LONG_I=*_SUB_LOADCOLORSCHEMES_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,19611,"ide_methods.bas");}while(r); do{ *_SUB_LOADCOLORSCHEMES_LONG_RESULT=FUNC_READCONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_SUB_LOADCOLORSCHEMES_LONG_I)),qbs_new_txt_len("$",1)),_SUB_LOADCOLORSCHEMES_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19612,"ide_methods.bas");}while(r); S_56616:; if ((*_SUB_LOADCOLORSCHEMES_LONG_RESULT)||new_error){ if(qbevent){evnt(25753,19613,"ide_methods.bas");if(r)goto S_56616;} do{ *__INTEGER_TOTALCOLORSCHEMES=*__INTEGER_TOTALCOLORSCHEMES+ 1 ; if(!qbevent)break;evnt(25753,19614,"ide_methods.bas");}while(r); S_56618:; if ((qbs_cleanup(qbs_tmp_base,-(*__INTEGER_TOTALCOLORSCHEMES>func_ubound(__ARRAY_STRING_COLORSCHEMES,1,1))))||new_error){ if(qbevent){evnt(25753,19615,"ide_methods.bas");if(r)goto S_56618;} do{ if (__ARRAY_STRING_COLORSCHEMES[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)__ARRAY_STRING_COLORSCHEMES)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (__ARRAY_STRING_COLORSCHEMES[2]&1){ preserved_elements=__ARRAY_STRING_COLORSCHEMES[5]; } else preserved_elements=0; __ARRAY_STRING_COLORSCHEMES[4]= 1 ; __ARRAY_STRING_COLORSCHEMES[5]=(func_ubound(__ARRAY_STRING_COLORSCHEMES,1,1)+ 10 )-__ARRAY_STRING_COLORSCHEMES[4]+1; __ARRAY_STRING_COLORSCHEMES[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=__ARRAY_STRING_COLORSCHEMES[5]; if (tmp_long2 0 ))||new_error){ if(qbevent){evnt(25753,19620,"ide_methods.bas");if(r)goto S_56623;} S_56624:; if ((qbs_cleanup(qbs_tmp_base,-(((int32)(func_mid(_SUB_LOADCOLORSCHEMES_STRING_VALUE,*_SUB_LOADCOLORSCHEMES_LONG_FOUNDPIPE+ 1 ,NULL,0))->len)== 81 )))||new_error){ if(qbevent){evnt(25753,19621,"ide_methods.bas");if(r)goto S_56624;} do{ *__INTEGER_LASTVALIDCOLORSCHEME=*__INTEGER_TOTALCOLORSCHEMES; if(!qbevent)break;evnt(25753,19623,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_LOADCOLORSCHEMES_STRING_VALUE,qbs_add(_SUB_LOADCOLORSCHEMES_STRING_VALUE,qbs_new_txt_len("170170170",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19624,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_SUB_LOADCOLORSCHEMES_LONG_I)),qbs_new_txt_len("$",1)),_SUB_LOADCOLORSCHEMES_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19625,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_TOTALCOLORSCHEMES)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),_SUB_LOADCOLORSCHEMES_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19626,"ide_methods.bas");}while(r); S_56629:; }else{ if (qbs_cleanup(qbs_tmp_base,-(((int32)(func_mid(_SUB_LOADCOLORSCHEMES_STRING_VALUE,*_SUB_LOADCOLORSCHEMES_LONG_FOUNDPIPE+ 1 ,NULL,0))->len)== 90 ))){ if(qbevent){evnt(25753,19627,"ide_methods.bas");if(r)goto S_56629;} do{ *__INTEGER_LASTVALIDCOLORSCHEME=*__INTEGER_TOTALCOLORSCHEMES; if(!qbevent)break;evnt(25753,19629,"ide_methods.bas");}while(r); S_56631:; }else{ if (qbs_cleanup(qbs_tmp_base,-(((int32)(func_mid(_SUB_LOADCOLORSCHEMES_STRING_VALUE,*_SUB_LOADCOLORSCHEMES_LONG_FOUNDPIPE+ 1 ,NULL,0))->len)== 54 ))){ if(qbevent){evnt(25753,19630,"ide_methods.bas");if(r)goto S_56631;} do{ qbs_set(_SUB_LOADCOLORSCHEMES_STRING_TEMP,qbs_left(_SUB_LOADCOLORSCHEMES_STRING_VALUE,*_SUB_LOADCOLORSCHEMES_LONG_FOUNDPIPE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19633,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_LOADCOLORSCHEMES_STRING_TEMP,qbs_add(qbs_add(_SUB_LOADCOLORSCHEMES_STRING_TEMP,func_mid(_SUB_LOADCOLORSCHEMES_STRING_VALUE,*_SUB_LOADCOLORSCHEMES_LONG_FOUNDPIPE+ 1 , 9 ,1)),qbs_new_txt_len("069147216245128177",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19634,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_LOADCOLORSCHEMES_STRING_TEMP,qbs_add(qbs_add(_SUB_LOADCOLORSCHEMES_STRING_TEMP,func_mid(_SUB_LOADCOLORSCHEMES_STRING_VALUE,*_SUB_LOADCOLORSCHEMES_LONG_FOUNDPIPE+ 10 ,NULL,0)),qbs_new_txt_len("000147177170170170",18))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19635,"ide_methods.bas");}while(r); do{ tmp_long=array_check((*__INTEGER_TOTALCOLORSCHEMES)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),_SUB_LOADCOLORSCHEMES_STRING_TEMP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19636,"ide_methods.bas");}while(r); do{ SUB_WRITECONFIGSETTING(__STRING_COLORSCHEMESSECTION,qbs_add(qbs_add(qbs_new_txt_len("Scheme",6),FUNC_STR2(_SUB_LOADCOLORSCHEMES_LONG_I)),qbs_new_txt_len("$",1)),_SUB_LOADCOLORSCHEMES_STRING_TEMP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19637,"ide_methods.bas");}while(r); do{ *__INTEGER_LASTVALIDCOLORSCHEME=*__INTEGER_TOTALCOLORSCHEMES; if(!qbevent)break;evnt(25753,19638,"ide_methods.bas");}while(r); }else{ do{ goto LABEL_DISCARDINVALID; if(!qbevent)break;evnt(25753,19640,"ide_methods.bas");}while(r); } } } }else{ LABEL_DISCARDINVALID:; if(qbevent){evnt(25753,19643,"ide_methods.bas");r=0;} do{ tmp_long=array_check((*__INTEGER_TOTALCOLORSCHEMES)-__ARRAY_STRING_COLORSCHEMES[4],__ARRAY_STRING_COLORSCHEMES[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_COLORSCHEMES[0]))[tmp_long])),qbs_new_txt_len("0",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19644,"ide_methods.bas");}while(r); } }else{ do{ goto dl_exit_6226; if(!qbevent)break;evnt(25753,19648,"ide_methods.bas");}while(r); } dl_continue_6226:; }while(1); dl_exit_6226:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free250.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; } int16 FUNC_BINARYFORMATCHECK(qbs*_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK,qbs*_FUNC_BINARYFORMATCHECK_STRING_PATHSEPTOCHECK,qbs*_FUNC_BINARYFORMATCHECK_STRING_FILETOCHECK){ 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 "data251.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(__STRING_FILE,qbs_add(qbs_add(_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK,_FUNC_BINARYFORMATCHECK_STRING_PATHSEPTOCHECK),_FUNC_BINARYFORMATCHECK_STRING_FILETOCHECK)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19656,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,19658,"ide_methods.bas");}while(r); do{ sub_open(__STRING_FILE, 2 ,NULL,NULL,*_FUNC_BINARYFORMATCHECK_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19659,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_A,func_space(func_lof(*_FUNC_BINARYFORMATCHECK_LONG_FH))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19660,"ide_methods.bas");}while(r); do{ sub_get2(*_FUNC_BINARYFORMATCHECK_LONG_FH, 1 ,_FUNC_BINARYFORMATCHECK_STRING_A,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19661,"ide_methods.bas");}while(r); S_56653:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_BINARYFORMATCHECK_STRING_A,func_chr( 0 ),0)== 0 )))||new_error){ if(qbevent){evnt(25753,19662,"ide_methods.bas");if(r)goto S_56653;} do{ sub_close(*_FUNC_BINARYFORMATCHECK_LONG_FH,1); if(!qbevent)break;evnt(25753,19662,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19662,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_A,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19663,"ide_methods.bas");}while(r); do{ sub_get(*_FUNC_BINARYFORMATCHECK_LONG_FH, 1 ,byte_element((uint64)_FUNC_BINARYFORMATCHECK_INTEGER_FORMAT,2,byte_element_6230),1); if(!qbevent)break;evnt(25753,19664,"ide_methods.bas");}while(r); do{ sub_get(*_FUNC_BINARYFORMATCHECK_LONG_FH,NULL,byte_element((uint64)_FUNC_BINARYFORMATCHECK_INTEGER_VERSION,2,byte_element_6231),0); if(!qbevent)break;evnt(25753,19665,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_BINARYFORMATCHECK_LONG_FH,1); if(!qbevent)break;evnt(25753,19666,"ide_methods.bas");}while(r); S_56661:; if(qbevent){evnt(25753,19668,"ide_methods.bas");if(r)goto S_56661;} S_56662:; if (((*_FUNC_BINARYFORMATCHECK_INTEGER_FORMAT==( 2300 )))||new_error){ if(qbevent){evnt(25753,19669,"ide_methods.bas");if(r)goto S_56662;} do{ *_FUNC_BINARYFORMATCHECK_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Invalid format",14),qbs_new_txt_len("VBDOS binary format not supported.",34),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19670,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK= 1 ; if(!qbevent)break;evnt(25753,19671,"ide_methods.bas");}while(r); sc_ec_431_end:; goto sc_6232_end; } S_56665:; if (((*_FUNC_BINARYFORMATCHECK_INTEGER_FORMAT==( 764 )))||new_error){ if(qbevent){evnt(25753,19672,"ide_methods.bas");if(r)goto S_56665;} do{ *_FUNC_BINARYFORMATCHECK_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Invalid format",14),qbs_new_txt_len("QBX 7.1 binary format not supported.",36),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19673,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK= 1 ; if(!qbevent)break;evnt(25753,19674,"ide_methods.bas");}while(r); sc_ec_432_end:; goto sc_6232_end; } S_56668:; if (((*_FUNC_BINARYFORMATCHECK_INTEGER_FORMAT==( 252 )))||new_error){ if(qbevent){evnt(25753,19675,"ide_methods.bas");if(r)goto S_56668;} S_56669:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,19676,"ide_methods.bas");if(r)goto S_56669;} do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_CONVERTUTILITY,qbs_new_txt_len("internal\\utilities\\QB45BIN.exe",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19677,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_CONVERTUTILITY,qbs_new_txt_len("./internal/utilities/QB45BIN",28)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19679,"ide_methods.bas");}while(r); } S_56674:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_FUNC_BINARYFORMATCHECK_STRING_CONVERTUTILITY)))||new_error){ if(qbevent){evnt(25753,19681,"ide_methods.bas");if(r)goto S_56674;} do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_WHAT,FUNC_IDEYESNOBOX(qbs_new_txt_len("Binary format",13),qbs_new_txt_len("QuickBASIC 4.5 binary format detected. Convert to plain text?",61))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19682,"ide_methods.bas");}while(r); S_56676:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BINARYFORMATCHECK_STRING_WHAT,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,19683,"ide_methods.bas");if(r)goto S_56676;} LABEL_CONVERTIT:; if(qbevent){evnt(25753,19684,"ide_methods.bas");r=0;} S_56677:; if ((qbs_cleanup(qbs_tmp_base,FUNC_FILEHASEXTENSION(__STRING_FILE)))||new_error){ if(qbevent){evnt(25753,19685,"ide_methods.bas");if(r)goto S_56677;} S_56678:; fornext_value6234=__STRING_FILE->len; fornext_finalvalue6234= 1 ; fornext_step6234= -1 ; if (fornext_step6234<0) fornext_step_negative6234=1; else fornext_step_negative6234=0; if (new_error) goto fornext_error6234; goto fornext_entrylabel6234; while(1){ fornext_value6234=fornext_step6234+(*_FUNC_BINARYFORMATCHECK_LONG_I); fornext_entrylabel6234: *_FUNC_BINARYFORMATCHECK_LONG_I=fornext_value6234; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6234){ if (fornext_value6234fornext_finalvalue6234) break; } fornext_error6234:; if(qbevent){evnt(25753,19686,"ide_methods.bas");if(r)goto S_56678;} S_56679:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_FILE,*_FUNC_BINARYFORMATCHECK_LONG_I)== 46 )))||new_error){ if(qbevent){evnt(25753,19687,"ide_methods.bas");if(r)goto S_56679;} do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_OFILE,qbs_add(qbs_add(qbs_left(__STRING_FILE,*_FUNC_BINARYFORMATCHECK_LONG_I- 1 ),qbs_new_txt_len(" (converted)",12)),func_mid(__STRING_FILE,*_FUNC_BINARYFORMATCHECK_LONG_I,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19689,"ide_methods.bas");}while(r); do{ goto fornext_exit_6233; if(!qbevent)break;evnt(25753,19690,"ide_methods.bas");}while(r); } fornext_continue_6233:; } fornext_exit_6233:; }else{ do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_OFILE,qbs_add(__STRING_FILE,qbs_new_txt_len(" (converted).bas",16))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19694,"ide_methods.bas");}while(r); } do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19697,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_LONG_DUMMY=FUNC_DARKENFGBG(&(pass6236= 1 )); if(!qbevent)break;evnt(25753,19698,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass6237= 0 )); if(!qbevent)break;evnt(25753,19699,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,19700,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Converting... ",23),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19701,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19702,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_CONVERTLINE,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_BINARYFORMATCHECK_STRING_CONVERTUTILITY,qbs_new_txt_len(" ",1)),FUNC_QUOTEDFILENAME(__STRING_FILE)),qbs_new_txt_len(" -o ",4)),FUNC_QUOTEDFILENAME(_FUNC_BINARYFORMATCHECK_STRING_OFILE))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19704,"ide_methods.bas");}while(r); do{ sub_shell2(_FUNC_BINARYFORMATCHECK_STRING_CONVERTLINE,2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19705,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass6238= 0 )); if(!qbevent)break;evnt(25753,19707,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_LONG_DUMMY=FUNC_DARKENFGBG(&(pass6239= 0 )); if(!qbevent)break;evnt(25753,19708,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19709,"ide_methods.bas");}while(r); S_56698:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(_FUNC_BINARYFORMATCHECK_STRING_OFILE)== 0 )))||new_error){ if(qbevent){evnt(25753,19711,"ide_methods.bas");if(r)goto S_56698;} do{ *_FUNC_BINARYFORMATCHECK_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Binary format",13),qbs_new_txt_len("Conversion failed.",18),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19712,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK= 2 ; if(!qbevent)break;evnt(25753,19713,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK,FUNC_GETFILEPATH(_FUNC_BINARYFORMATCHECK_STRING_OFILE)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19715,"ide_methods.bas");}while(r); S_56703:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK->len))||new_error){ if(qbevent){evnt(25753,19716,"ide_methods.bas");if(r)goto S_56703;} do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_FILETOCHECK,func_mid(_FUNC_BINARYFORMATCHECK_STRING_OFILE,_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK->len+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19717,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK,qbs_left(_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK,_FUNC_BINARYFORMATCHECK_STRING_PATHTOCHECK->len- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19718,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_FILETOCHECK,_FUNC_BINARYFORMATCHECK_STRING_OFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19720,"ide_methods.bas");}while(r); } } }else{ do{ *_FUNC_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK= 1 ; if(!qbevent)break;evnt(25753,19724,"ide_methods.bas");}while(r); } }else{ S_56714:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_new_txt_len("internal/support/converter/QB45BIN.bas",38))== 0 )))||new_error){ if(qbevent){evnt(25753,19727,"ide_methods.bas");if(r)goto S_56714;} do{ *_FUNC_BINARYFORMATCHECK_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Binary format",13),qbs_new_txt_len("Conversion utility not found. Cannot open QuickBASIC 4.5 binary format.",71),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19728,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK= 1 ; if(!qbevent)break;evnt(25753,19729,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19730,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_BINARYFORMATCHECK_STRING_WHAT,FUNC_IDEYESNOBOX(qbs_new_txt_len("Binary format",13),qbs_new_txt_len("QuickBASIC 4.5 binary format detected. Convert to plain text?",61))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19732,"ide_methods.bas");}while(r); S_56720:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BINARYFORMATCHECK_STRING_WHAT,qbs_new_txt_len("Y",1))))||new_error){ if(qbevent){evnt(25753,19733,"ide_methods.bas");if(r)goto S_56720;} S_56721:; if ((qbs_cleanup(qbs_tmp_base,-(func__direxists(qbs_new_txt_len("./internal/utilities",20))== 0 )))||new_error){ if(qbevent){evnt(25753,19735,"ide_methods.bas");if(r)goto S_56721;} do{ sub_mkdir(qbs_new_txt_len("./internal/utilities",20)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19735,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19736,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19737,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_LONG_DUMMY=FUNC_DARKENFGBG(&(pass6243= 1 )); if(!qbevent)break;evnt(25753,19738,"ide_methods.bas");}while(r); do{ SUB_CLEARSTATUSWINDOW(&(pass6244= 0 )); if(!qbevent)break;evnt(25753,19739,"ide_methods.bas");}while(r); do{ qbg_sub_color( 15 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,19740,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,*__LONG_IDEWY- 3 ,qbs_new_txt_len("Preparing to convert...",23),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19741,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19742,"ide_methods.bas");}while(r); S_56731:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,func__os(),qbs_new_txt_len("WIN",3),0)))||new_error){ if(qbevent){evnt(25753,19743,"ide_methods.bas");if(r)goto S_56731;} do{ sub_shell2(qbs_new_txt_len("qb64pe -x internal/support/converter/QB45BIN.bas -o internal/utilities/QB45BIN",78),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19744,"ide_methods.bas");}while(r); }else{ do{ sub_shell2(qbs_new_txt_len("./qb64pe -x ./internal/support/converter/QB45BIN.bas -o ./internal/utilities/QB45BIN",84),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19746,"ide_methods.bas");}while(r); } S_56736:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_FUNC_BINARYFORMATCHECK_STRING_CONVERTUTILITY)))||new_error){ if(qbevent){evnt(25753,19748,"ide_methods.bas");if(r)goto S_56736;} do{ goto LABEL_CONVERTIT; if(!qbevent)break;evnt(25753,19748,"ide_methods.bas");}while(r); } do{ SUB_CLEARSTATUSWINDOW(&(pass6245= 0 )); if(!qbevent)break;evnt(25753,19749,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_LONG_DUMMY=FUNC_DARKENFGBG(&(pass6246= 0 )); if(!qbevent)break;evnt(25753,19750,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19751,"ide_methods.bas");}while(r); do{ *_FUNC_BINARYFORMATCHECK_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Binary format",13),qbs_new_txt_len("Error launching conversion utility.",35),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19752,"ide_methods.bas");}while(r); } do{ *_FUNC_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK= 1 ; if(!qbevent)break;evnt(25753,19754,"ide_methods.bas");}while(r); } sc_ec_433_end:; goto sc_6232_end; } sc_6232_end:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free251.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_BINARYFORMATCHECK_INTEGER_BINARYFORMATCHECK; } qbs* FUNC_REMOVESYMBOL2(qbs*_FUNC_REMOVESYMBOL2_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 "data252.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("~",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19760,"ide_methods.bas");}while(r); S_56748:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19760,"ide_methods.bas");if(r)goto S_56748;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19760,"ide_methods.bas");}while(r); } do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19761,"ide_methods.bas");}while(r); S_56752:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19761,"ide_methods.bas");if(r)goto S_56752;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19761,"ide_methods.bas");}while(r); } do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("%",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19762,"ide_methods.bas");}while(r); S_56756:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19762,"ide_methods.bas");if(r)goto S_56756;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19762,"ide_methods.bas");}while(r); } do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19763,"ide_methods.bas");}while(r); S_56760:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19763,"ide_methods.bas");if(r)goto S_56760;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19763,"ide_methods.bas");}while(r); } do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("!",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19764,"ide_methods.bas");}while(r); S_56764:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19764,"ide_methods.bas");if(r)goto S_56764;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19764,"ide_methods.bas");}while(r); } do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19765,"ide_methods.bas");}while(r); S_56768:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19765,"ide_methods.bas");if(r)goto S_56768;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19765,"ide_methods.bas");}while(r); } do{ *_FUNC_REMOVESYMBOL2_LONG_I=func_instr(NULL,_FUNC_REMOVESYMBOL2_STRING_VARNAME,qbs_new_txt_len("$",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19766,"ide_methods.bas");}while(r); S_56772:; if ((*_FUNC_REMOVESYMBOL2_LONG_I)||new_error){ if(qbevent){evnt(25753,19766,"ide_methods.bas");if(r)goto S_56772;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19766,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_REMOVESYMBOL2_STRING_REMOVESYMBOL2,_FUNC_REMOVESYMBOL2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19767,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19768,"ide_methods.bas");}while(r); LABEL_FOUNDSYMBOL:; if(qbevent){evnt(25753,19769,"ide_methods.bas");r=0;} S_56777:; if ((-(*_FUNC_REMOVESYMBOL2_LONG_I== 1 ))||new_error){ if(qbevent){evnt(25753,19770,"ide_methods.bas");if(r)goto S_56777;} do{ qbs_set(_FUNC_REMOVESYMBOL2_STRING_REMOVESYMBOL2,_FUNC_REMOVESYMBOL2_STRING_VARNAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19770,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19770,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_REMOVESYMBOL2_STRING_REMOVESYMBOL2,qbs_left(_FUNC_REMOVESYMBOL2_STRING_VARNAME,*_FUNC_REMOVESYMBOL2_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19771,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free252.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_REMOVESYMBOL2_STRING_REMOVESYMBOL2);return _FUNC_REMOVESYMBOL2_STRING_REMOVESYMBOL2; } void SUB_CLEANSUBNAME(qbs*_SUB_CLEANSUBNAME_STRING_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 "data253.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_CLEANSUBNAME_LONG_X=func_instr(NULL,_SUB_CLEANSUBNAME_STRING_N,qbs_new_txt_len("'",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19775,"ide_methods.bas");}while(r); S_56783:; if ((*_SUB_CLEANSUBNAME_LONG_X)||new_error){ if(qbevent){evnt(25753,19775,"ide_methods.bas");if(r)goto S_56783;} do{ qbs_set(_SUB_CLEANSUBNAME_STRING_N,qbs_left(_SUB_CLEANSUBNAME_STRING_N,*_SUB_CLEANSUBNAME_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19775,"ide_methods.bas");}while(r); } do{ *_SUB_CLEANSUBNAME_LONG_X=func_instr(NULL,_SUB_CLEANSUBNAME_STRING_N,qbs_new_txt_len(":",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19776,"ide_methods.bas");}while(r); S_56787:; if ((*_SUB_CLEANSUBNAME_LONG_X)||new_error){ if(qbevent){evnt(25753,19776,"ide_methods.bas");if(r)goto S_56787;} do{ qbs_set(_SUB_CLEANSUBNAME_STRING_N,qbs_left(_SUB_CLEANSUBNAME_STRING_N,*_SUB_CLEANSUBNAME_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19776,"ide_methods.bas");}while(r); } do{ *_SUB_CLEANSUBNAME_LONG_X=func_instr(NULL,_SUB_CLEANSUBNAME_STRING_N,qbs_new_txt_len(" ",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19777,"ide_methods.bas");}while(r); S_56791:; if ((*_SUB_CLEANSUBNAME_LONG_X)||new_error){ if(qbevent){evnt(25753,19777,"ide_methods.bas");if(r)goto S_56791;} do{ qbs_set(_SUB_CLEANSUBNAME_STRING_N,qbs_left(_SUB_CLEANSUBNAME_STRING_N,*_SUB_CLEANSUBNAME_LONG_X- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19777,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free253.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_CLEARSTATUSWINDOW(int32*_SUB_CLEARSTATUSWINDOW_LONG_WHICHLINE){ 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 "data254.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,19781,"ide_methods.bas");}while(r); S_56795:; if ((-(*_SUB_CLEARSTATUSWINDOW_LONG_WHICHLINE== 0 ))||new_error){ if(qbevent){evnt(25753,19782,"ide_methods.bas");if(r)goto S_56795;} S_56796:; fornext_value6250= 1 ; fornext_finalvalue6250= 3 ; fornext_step6250= 1 ; if (fornext_step6250<0) fornext_step_negative6250=1; else fornext_step_negative6250=0; if (new_error) goto fornext_error6250; goto fornext_entrylabel6250; while(1){ fornext_value6250=fornext_step6250+(*_SUB_CLEARSTATUSWINDOW_LONG_WHICHLINE); fornext_entrylabel6250: *_SUB_CLEARSTATUSWINDOW_LONG_WHICHLINE=fornext_value6250; if (fornext_step_negative6250){ if (fornext_value6250fornext_finalvalue6250) break; } fornext_error6250:; if(qbevent){evnt(25753,19783,"ide_methods.bas");if(r)goto S_56796;} do{ sub__printstring( 2 ,(*__LONG_IDEWY- 4 )+*_SUB_CLEARSTATUSWINDOW_LONG_WHICHLINE,func_space(*__LONG_IDEWX- 2 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19784,"ide_methods.bas");}while(r); fornext_continue_6249:; } fornext_exit_6249:; }else{ do{ sub__printstring( 2 ,(*__LONG_IDEWY- 4 )+*_SUB_CLEARSTATUSWINDOW_LONG_WHICHLINE,func_space(*__LONG_IDEWX- 2 ),NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19787,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free254.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_SETSTATUSMESSAGE(int32*_SUB_SETSTATUSMESSAGE_LONG_ROW,qbs*_SUB_SETSTATUSMESSAGE_STRING_TEXT,int32*_SUB_SETSTATUSMESSAGE_LONG_FG){ 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 "data255.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbg_sub_color(*_SUB_SETSTATUSMESSAGE_LONG_FG,NULL,NULL,1); if(!qbevent)break;evnt(25753,19792,"ide_methods.bas");}while(r); do{ sub__printstring( 2 ,(*__LONG_IDEWY- 4 )+*_SUB_SETSTATUSMESSAGE_LONG_ROW,_SUB_SETSTATUSMESSAGE_STRING_TEXT,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19793,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19794,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free255.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_GETWORDATCURSOR(){ 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 "data256.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19798,"ide_methods.bas");}while(r); do{ *_FUNC_GETWORDATCURSOR_LONG_X=*__LONG_IDECX; if(!qbevent)break;evnt(25753,19799,"ide_methods.bas");}while(r); S_56807:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETWORDATCURSOR_LONG_X<=_FUNC_GETWORDATCURSOR_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,19800,"ide_methods.bas");if(r)goto S_56807;} S_56808:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X)== 32 ))&(-(*_FUNC_GETWORDATCURSOR_LONG_X> 1 ))))||new_error){ if(qbevent){evnt(25753,19801,"ide_methods.bas");if(r)goto S_56808;} S_56809:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X- 1 )!= 32 )))||new_error){ if(qbevent){evnt(25753,19802,"ide_methods.bas");if(r)goto S_56809;} do{ *_FUNC_GETWORDATCURSOR_LONG_X=*_FUNC_GETWORDATCURSOR_LONG_X- 1 ; if(!qbevent)break;evnt(25753,19802,"ide_methods.bas");}while(r); } } LABEL_TRY:; if(qbevent){evnt(25753,19804,"ide_methods.bas");r=0;} S_56813:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]))||new_error){ if(qbevent){evnt(25753,19805,"ide_methods.bas");if(r)goto S_56813;} do{ *_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X; if(!qbevent)break;evnt(25753,19806,"ide_methods.bas");}while(r); S_56815:; while((-(*_FUNC_GETWORDATCURSOR_LONG_X1> 1 ))||new_error){ if(qbevent){evnt(25753,19807,"ide_methods.bas");if(r)goto S_56815;} S_56816:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1- 1 ))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1- 1 )== 36 ))))||new_error){ if(qbevent){evnt(25753,19808,"ide_methods.bas");if(r)goto S_56816;} do{ *_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X1- 1 ; if(!qbevent)break;evnt(25753,19808,"ide_methods.bas");}while(r); }else{ do{ goto dl_exit_6253; if(!qbevent)break;evnt(25753,19808,"ide_methods.bas");}while(r); } dl_continue_6253:; } dl_exit_6253:; do{ *_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X; if(!qbevent)break;evnt(25753,19810,"ide_methods.bas");}while(r); S_56823:; while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETWORDATCURSOR_LONG_X2<_FUNC_GETWORDATCURSOR_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,19811,"ide_methods.bas");if(r)goto S_56823;} S_56824:; if ((qbs_cleanup(qbs_tmp_base,((int32*)(__ARRAY_LONG_ALPHANUMERIC[0]))[array_check((qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 ))-__ARRAY_LONG_ALPHANUMERIC[4],__ARRAY_LONG_ALPHANUMERIC[5])]|(-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 )== 36 ))))||new_error){ if(qbevent){evnt(25753,19812,"ide_methods.bas");if(r)goto S_56824;} do{ *_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,19812,"ide_methods.bas");}while(r); }else{ do{ goto dl_exit_6255; if(!qbevent)break;evnt(25753,19812,"ide_methods.bas");}while(r); } dl_continue_6255:; } dl_exit_6255:; do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_A2,func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1,*_FUNC_GETWORDATCURSOR_LONG_X2-*_FUNC_GETWORDATCURSOR_LONG_X1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19814,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,func_chr(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19816,"ide_methods.bas");}while(r); S_56833:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,func_chr( 32 ))))||new_error){ if(qbevent){evnt(25753,19817,"ide_methods.bas");if(r)goto S_56833;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19817,"ide_methods.bas");}while(r); } S_56836:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("~",1))))||new_error){ if(qbevent){evnt(25753,19818,"ide_methods.bas");if(r)goto S_56836;} do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("~",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19818,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19818,"ide_methods.bas");}while(r); } S_56840:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("`",1))))||new_error){ if(qbevent){evnt(25753,19819,"ide_methods.bas");if(r)goto S_56840;} do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("`",1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19819,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19819,"ide_methods.bas");}while(r); } S_56844:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("%",1)))&(qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X+ 1 ,NULL,0),qbs_new_txt_len("&",1)))))||new_error){ if(qbevent){evnt(25753,19820,"ide_methods.bas");if(r)goto S_56844;} do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19820,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19820,"ide_methods.bas");}while(r); } S_56848:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_GETWORDATCURSOR_STRING_SYMBOL,qbs_new_txt_len("&",1)))&(qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X- 1 ,NULL,0),qbs_new_txt_len("%",1)))))||new_error){ if(qbevent){evnt(25753,19821,"ide_methods.bas");if(r)goto S_56848;} do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,qbs_new_txt_len("%&",2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19821,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19821,"ide_methods.bas");}while(r); } do{ *_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X; if(!qbevent)break;evnt(25753,19822,"ide_methods.bas");}while(r); S_56853:; while((-(*_FUNC_GETWORDATCURSOR_LONG_X1> 1 ))||new_error){ if(qbevent){evnt(25753,19823,"ide_methods.bas");if(r)goto S_56853;} S_56854:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1- 1 , 1 ,1),_FUNC_GETWORDATCURSOR_STRING_SYMBOL)))||new_error){ if(qbevent){evnt(25753,19824,"ide_methods.bas");if(r)goto S_56854;} do{ *_FUNC_GETWORDATCURSOR_LONG_X1=*_FUNC_GETWORDATCURSOR_LONG_X1- 1 ; if(!qbevent)break;evnt(25753,19824,"ide_methods.bas");}while(r); }else{ do{ goto dl_exit_6256; if(!qbevent)break;evnt(25753,19824,"ide_methods.bas");}while(r); } dl_continue_6256:; } dl_exit_6256:; do{ *_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X; if(!qbevent)break;evnt(25753,19826,"ide_methods.bas");}while(r); S_56861:; while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETWORDATCURSOR_LONG_X2<_FUNC_GETWORDATCURSOR_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,19827,"ide_methods.bas");if(r)goto S_56861;} S_56862:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 , 1 ,1),_FUNC_GETWORDATCURSOR_STRING_SYMBOL)))||new_error){ if(qbevent){evnt(25753,19828,"ide_methods.bas");if(r)goto S_56862;} do{ *_FUNC_GETWORDATCURSOR_LONG_X2=*_FUNC_GETWORDATCURSOR_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,19828,"ide_methods.bas");}while(r); }else{ do{ goto dl_exit_6258; if(!qbevent)break;evnt(25753,19828,"ide_methods.bas");}while(r); } dl_continue_6258:; } dl_exit_6258:; do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_A2,func_mid(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X1,*_FUNC_GETWORDATCURSOR_LONG_X2-*_FUNC_GETWORDATCURSOR_LONG_X1+ 1 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19830,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR,_FUNC_GETWORDATCURSOR_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19832,"ide_methods.bas");}while(r); S_56871:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(*_FUNC_GETWORDATCURSOR_LONG_X==(_FUNC_GETWORDATCURSOR_STRING_A->len+ 1 )))&(-(*_FUNC_GETWORDATCURSOR_LONG_X> 1 )))){ if(qbevent){evnt(25753,19833,"ide_methods.bas");if(r)goto S_56871;} S_56872:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_GETWORDATCURSOR_STRING_A,*_FUNC_GETWORDATCURSOR_LONG_X- 1 )!= 32 )))||new_error){ if(qbevent){evnt(25753,19834,"ide_methods.bas");if(r)goto S_56872;} do{ *_FUNC_GETWORDATCURSOR_LONG_X=*_FUNC_GETWORDATCURSOR_LONG_X- 1 ; if(!qbevent)break;evnt(25753,19834,"ide_methods.bas");}while(r); do{ goto LABEL_TRY; if(!qbevent)break;evnt(25753,19834,"ide_methods.bas");}while(r); } } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free256.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_GETWORDATCURSOR_STRING_GETWORDATCURSOR);return _FUNC_GETWORDATCURSOR_STRING_GETWORDATCURSOR; } qbs* FUNC_GETSELECTEDTEXT(int8*_FUNC_GETSELECTEDTEXT_BYTE_MULTILINE){ 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 "data257.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56877:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,19839,"ide_methods.bas");if(r)goto S_56877;} do{ *_FUNC_GETSELECTEDTEXT_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,19840,"ide_methods.bas");}while(r); do{ *_FUNC_GETSELECTEDTEXT_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(25753,19841,"ide_methods.bas");}while(r); S_56880:; if ((-(*_FUNC_GETSELECTEDTEXT_LONG_SY1>*_FUNC_GETSELECTEDTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(25753,19842,"ide_methods.bas");if(r)goto S_56880;} do{ swap_32(&*_FUNC_GETSELECTEDTEXT_LONG_SY1,&*_FUNC_GETSELECTEDTEXT_LONG_SY2); if(!qbevent)break;evnt(25753,19842,"ide_methods.bas");}while(r); } do{ *_FUNC_GETSELECTEDTEXT_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,19843,"ide_methods.bas");}while(r); do{ *_FUNC_GETSELECTEDTEXT_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,19844,"ide_methods.bas");}while(r); S_56885:; if ((-(*_FUNC_GETSELECTEDTEXT_LONG_SX1>*_FUNC_GETSELECTEDTEXT_LONG_SX2))||new_error){ if(qbevent){evnt(25753,19845,"ide_methods.bas");if(r)goto S_56885;} do{ swap_32(&*_FUNC_GETSELECTEDTEXT_LONG_SX1,&*_FUNC_GETSELECTEDTEXT_LONG_SX2); if(!qbevent)break;evnt(25753,19845,"ide_methods.bas");}while(r); } S_56888:; fornext_value6261=*_FUNC_GETSELECTEDTEXT_LONG_SY1; fornext_finalvalue6261=*_FUNC_GETSELECTEDTEXT_LONG_SY2; fornext_step6261= 1 ; if (fornext_step6261<0) fornext_step_negative6261=1; else fornext_step_negative6261=0; if (new_error) goto fornext_error6261; goto fornext_entrylabel6261; while(1){ fornext_value6261=fornext_step6261+(*_FUNC_GETSELECTEDTEXT_LONG_Y); fornext_entrylabel6261: *_FUNC_GETSELECTEDTEXT_LONG_Y=fornext_value6261; if (fornext_step_negative6261){ if (fornext_value6261fornext_finalvalue6261) break; } fornext_error6261:; if(qbevent){evnt(25753,19846,"ide_methods.bas");if(r)goto S_56888;} S_56889:; if ((-(*_FUNC_GETSELECTEDTEXT_LONG_Y<=*__LONG_IDEN))||new_error){ if(qbevent){evnt(25753,19847,"ide_methods.bas");if(r)goto S_56889;} do{ qbs_set(_FUNC_GETSELECTEDTEXT_STRING_A,FUNC_IDEGETLINE(_FUNC_GETSELECTEDTEXT_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19848,"ide_methods.bas");}while(r); S_56891:; if ((-(*_FUNC_GETSELECTEDTEXT_LONG_SY1==*_FUNC_GETSELECTEDTEXT_LONG_SY2))||new_error){ if(qbevent){evnt(25753,19849,"ide_methods.bas");if(r)goto S_56891;} S_56892:; fornext_value6263=*_FUNC_GETSELECTEDTEXT_LONG_SX1; fornext_finalvalue6263=*_FUNC_GETSELECTEDTEXT_LONG_SX2- 1 ; fornext_step6263= 1 ; if (fornext_step6263<0) fornext_step_negative6263=1; else fornext_step_negative6263=0; if (new_error) goto fornext_error6263; goto fornext_entrylabel6263; while(1){ fornext_value6263=fornext_step6263+(*_FUNC_GETSELECTEDTEXT_LONG_X); fornext_entrylabel6263: *_FUNC_GETSELECTEDTEXT_LONG_X=fornext_value6263; if (fornext_step_negative6263){ if (fornext_value6263fornext_finalvalue6263) break; } fornext_error6263:; if(qbevent){evnt(25753,19850,"ide_methods.bas");if(r)goto S_56892;} S_56893:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETSELECTEDTEXT_LONG_X<=_FUNC_GETSELECTEDTEXT_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,19851,"ide_methods.bas");if(r)goto S_56893;} do{ qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_add(_FUNC_GETSELECTEDTEXT_STRING_CLIP,func_mid(_FUNC_GETSELECTEDTEXT_STRING_A,*_FUNC_GETSELECTEDTEXT_LONG_X, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19851,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_add(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19851,"ide_methods.bas");}while(r); } fornext_continue_6262:; } fornext_exit_6262:; }else{ S_56900:; if ((~(*_FUNC_GETSELECTEDTEXT_BYTE_MULTILINE))||new_error){ if(qbevent){evnt(25753,19854,"ide_methods.bas");if(r)goto S_56900;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19854,"ide_methods.bas");}while(r); } S_56903:; if (((-(*__LONG_IDECX== 1 ))&(-(*_FUNC_GETSELECTEDTEXT_LONG_Y==*_FUNC_GETSELECTEDTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_FUNC_GETSELECTEDTEXT_LONG_SY1)))||new_error){ if(qbevent){evnt(25753,19855,"ide_methods.bas");if(r)goto S_56903;} do{ goto LABEL_NOFINALCOPY; if(!qbevent)break;evnt(25753,19855,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_add(qbs_add(qbs_add(_FUNC_GETSELECTEDTEXT_STRING_CLIP,_FUNC_GETSELECTEDTEXT_STRING_A),func_chr( 13 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19856,"ide_methods.bas");}while(r); LABEL_NOFINALCOPY:; if(qbevent){evnt(25753,19857,"ide_methods.bas");r=0;} S_56907:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_GETSELECTEDTEXT_LONG_Y==*_FUNC_GETSELECTEDTEXT_LONG_SY2))&(-(*__LONG_IDECX> 1 ))&(-(_FUNC_GETSELECTEDTEXT_STRING_A->len> 0 ))))||new_error){ if(qbevent){evnt(25753,19858,"ide_methods.bas");if(r)goto S_56907;} do{ qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_left(_FUNC_GETSELECTEDTEXT_STRING_CLIP,_FUNC_GETSELECTEDTEXT_STRING_CLIP->len- 2 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19858,"ide_methods.bas");}while(r); } } } fornext_continue_6260:; } fornext_exit_6260:; do{ qbs_set(_FUNC_GETSELECTEDTEXT_STRING_GETSELECTEDTEXT,_FUNC_GETSELECTEDTEXT_STRING_CLIP); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19862,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free257.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_GETSELECTEDTEXT_STRING_GETSELECTEDTEXT);return _FUNC_GETSELECTEDTEXT_STRING_GETSELECTEDTEXT; } void SUB_DELSELECT(){ 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 "data258.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_DELSELECT_LONG_SY1=*__LONG_IDESELECTY1; if(!qbevent)break;evnt(25753,19867,"ide_methods.bas");}while(r); do{ *_SUB_DELSELECT_LONG_SY2=*__LONG_IDECY; if(!qbevent)break;evnt(25753,19868,"ide_methods.bas");}while(r); S_56917:; if ((-(*_SUB_DELSELECT_LONG_SY1>*_SUB_DELSELECT_LONG_SY2))||new_error){ if(qbevent){evnt(25753,19869,"ide_methods.bas");if(r)goto S_56917;} do{ swap_32(&*_SUB_DELSELECT_LONG_SY1,&*_SUB_DELSELECT_LONG_SY2); if(!qbevent)break;evnt(25753,19869,"ide_methods.bas");}while(r); } do{ *_SUB_DELSELECT_LONG_SX1=*__LONG_IDESELECTX1; if(!qbevent)break;evnt(25753,19870,"ide_methods.bas");}while(r); do{ *_SUB_DELSELECT_LONG_SX2=*__LONG_IDECX; if(!qbevent)break;evnt(25753,19871,"ide_methods.bas");}while(r); S_56922:; if ((-(*_SUB_DELSELECT_LONG_SX1>*_SUB_DELSELECT_LONG_SX2))||new_error){ if(qbevent){evnt(25753,19872,"ide_methods.bas");if(r)goto S_56922;} do{ swap_32(&*_SUB_DELSELECT_LONG_SX1,&*_SUB_DELSELECT_LONG_SX2); if(!qbevent)break;evnt(25753,19872,"ide_methods.bas");}while(r); } do{ *_SUB_DELSELECT_LONG_NOLASTLINEDEL= 0 ; if(!qbevent)break;evnt(25753,19873,"ide_methods.bas");}while(r); S_56926:; if (((-(*_SUB_DELSELECT_LONG_SY1!=*_SUB_DELSELECT_LONG_SY2))&(-(*__LONG_IDECX== 1 ))&(-(*__LONG_IDECY>*_SUB_DELSELECT_LONG_SY1)))||new_error){ if(qbevent){evnt(25753,19874,"ide_methods.bas");if(r)goto S_56926;} do{ *_SUB_DELSELECT_LONG_SY2=*_SUB_DELSELECT_LONG_SY2- 1 ; if(!qbevent)break;evnt(25753,19874,"ide_methods.bas");}while(r); do{ *_SUB_DELSELECT_LONG_NOLASTLINEDEL= 1 ; if(!qbevent)break;evnt(25753,19874,"ide_methods.bas");}while(r); } S_56930:; fornext_value6268=*_SUB_DELSELECT_LONG_SY2; fornext_finalvalue6268=*_SUB_DELSELECT_LONG_SY1; fornext_step6268= -1 ; if (fornext_step6268<0) fornext_step_negative6268=1; else fornext_step_negative6268=0; if (new_error) goto fornext_error6268; goto fornext_entrylabel6268; while(1){ fornext_value6268=fornext_step6268+(*_SUB_DELSELECT_LONG_Y); fornext_entrylabel6268: *_SUB_DELSELECT_LONG_Y=fornext_value6268; if (fornext_step_negative6268){ if (fornext_value6268fornext_finalvalue6268) break; } fornext_error6268:; if(qbevent){evnt(25753,19877,"ide_methods.bas");if(r)goto S_56930;} S_56931:; if (((-(*_SUB_DELSELECT_LONG_SY1==*_SUB_DELSELECT_LONG_SY2))&(-(*_SUB_DELSELECT_LONG_NOLASTLINEDEL== 0 )))||new_error){ if(qbevent){evnt(25753,19878,"ide_methods.bas");if(r)goto S_56931;} do{ qbs_set(_SUB_DELSELECT_STRING_A,FUNC_IDEGETLINE(_SUB_DELSELECT_LONG_Y)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19879,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_DELSELECT_STRING_A2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19880,"ide_methods.bas");}while(r); S_56934:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_DELSELECT_LONG_SX1<=_SUB_DELSELECT_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,19881,"ide_methods.bas");if(r)goto S_56934;} do{ qbs_set(_SUB_DELSELECT_STRING_A2,qbs_left(_SUB_DELSELECT_STRING_A,*_SUB_DELSELECT_LONG_SX1- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19881,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_DELSELECT_STRING_A2,_SUB_DELSELECT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19881,"ide_methods.bas");}while(r); } S_56939:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_DELSELECT_LONG_SX2<=_SUB_DELSELECT_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,19882,"ide_methods.bas");if(r)goto S_56939;} do{ qbs_set(_SUB_DELSELECT_STRING_A2,qbs_add(_SUB_DELSELECT_STRING_A2,qbs_right(_SUB_DELSELECT_STRING_A,_SUB_DELSELECT_STRING_A->len-*_SUB_DELSELECT_LONG_SX2+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19882,"ide_methods.bas");}while(r); } do{ SUB_IDESETLINE(_SUB_DELSELECT_LONG_Y,_SUB_DELSELECT_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19883,"ide_methods.bas");}while(r); }else{ S_56944:; if (((-(*__LONG_IDEN== 1 ))&(-(*_SUB_DELSELECT_LONG_Y== 1 )))||new_error){ if(qbevent){evnt(25753,19885,"ide_methods.bas");if(r)goto S_56944;} do{ SUB_IDESETLINE(_SUB_DELSELECT_LONG_Y,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19885,"ide_methods.bas");}while(r); }else{ do{ SUB_IDEDELLINE(_SUB_DELSELECT_LONG_Y); if(!qbevent)break;evnt(25753,19885,"ide_methods.bas");}while(r); } } fornext_continue_6267:; } fornext_exit_6267:; do{ *__LONG_IDECX=*_SUB_DELSELECT_LONG_SX1; if(!qbevent)break;evnt(25753,19889,"ide_methods.bas");}while(r); S_56952:; if (((-(*_SUB_DELSELECT_LONG_SY1!=*_SUB_DELSELECT_LONG_SY2))|(-(*_SUB_DELSELECT_LONG_NOLASTLINEDEL== 1 )))||new_error){ if(qbevent){evnt(25753,19889,"ide_methods.bas");if(r)goto S_56952;} do{ *__LONG_IDECX= 1 ; if(!qbevent)break;evnt(25753,19889,"ide_methods.bas");}while(r); } do{ *__LONG_IDECY=*_SUB_DELSELECT_LONG_SY1; if(!qbevent)break;evnt(25753,19890,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; if(!qbevent)break;evnt(25753,19891,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free258.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_INSERTATCURSOR(qbs*_SUB_INSERTATCURSOR_STRING_TEMPK){ 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 "data259.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_56957:; if ((*__LONG_IDESELECT)||new_error){ if(qbevent){evnt(25753,19896,"ide_methods.bas");if(r)goto S_56957;} do{ SUB_DELSELECT(); if(!qbevent)break;evnt(25753,19896,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_INSERTATCURSOR_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19897,"ide_methods.bas");}while(r); S_56961:; if ((qbs_cleanup(qbs_tmp_base,-((_SUB_INSERTATCURSOR_STRING_A->len)<(*__LONG_IDECX- 1 ))))||new_error){ if(qbevent){evnt(25753,19898,"ide_methods.bas");if(r)goto S_56961;} do{ qbs_set(_SUB_INSERTATCURSOR_STRING_A,qbs_add(_SUB_INSERTATCURSOR_STRING_A,func_space(*__LONG_IDECX- 1 -_SUB_INSERTATCURSOR_STRING_A->len))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19898,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_INSERTATCURSOR_STRING_A,qbs_add(qbs_add(qbs_left(_SUB_INSERTATCURSOR_STRING_A,*__LONG_IDECX- 1 ),_SUB_INSERTATCURSOR_STRING_TEMPK),qbs_right(_SUB_INSERTATCURSOR_STRING_A,_SUB_INSERTATCURSOR_STRING_A->len-*__LONG_IDECX+ 1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19899,"ide_methods.bas");}while(r); do{ SUB_IDESETLINE(__LONG_IDECY,FUNC_CONVERTTABS(_SUB_INSERTATCURSOR_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19900,"ide_methods.bas");}while(r); S_56966:; if ((*__BYTE_PASTECURSORATEND)||new_error){ if(qbevent){evnt(25753,19902,"ide_methods.bas");if(r)goto S_56966;} do{ *__LONG_IDECX=*__LONG_IDECX+_SUB_INSERTATCURSOR_STRING_TEMPK->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19904,"ide_methods.bas");}while(r); } do{ *__INTEGER_IDECHANGEMADE= 1 ; if(!qbevent)break;evnt(25753,19907,"ide_methods.bas");}while(r); do{ *__BYTE_STARTPAUSEDPENDING= 0 ; if(!qbevent)break;evnt(25753,19908,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free259.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_FINDHELPTOPIC(qbs*_FUNC_FINDHELPTOPIC_STRING_TOPIC,int32*_FUNC_FINDHELPTOPIC_LONG_LNKS,int8*_FUNC_FINDHELPTOPIC_BYTE_FIRSTONLY){ 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 "data260.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_FINDHELPTOPIC_LONG_LNKS= 0 ; if(!qbevent)break;evnt(25753,19915,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_LNKS,func_chr( 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19915,"ide_methods.bas");}while(r); do{ *_FUNC_FINDHELPTOPIC_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,19916,"ide_methods.bas");}while(r); do{ *_FUNC_FINDHELPTOPIC_LONG_LINKSFILEEXIST=func__fileexists(qbs_new_txt_len("internal\\help\\links.bin",23)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19918,"ide_methods.bas");}while(r); S_56975:; if ((*_FUNC_FINDHELPTOPIC_LONG_LINKSFILEEXIST)||new_error){ if(qbevent){evnt(25753,19919,"ide_methods.bas");if(r)goto S_56975;} do{ sub_open(qbs_new_txt_len("internal\\help\\links.bin",23), 3 ,NULL,NULL,*_FUNC_FINDHELPTOPIC_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19920,"ide_methods.bas");}while(r); do{ *_FUNC_FINDHELPTOPIC_LONG_LINKSFILEEMPTY=(-(func_lof(*_FUNC_FINDHELPTOPIC_LONG_FH)== 0 )); if(!qbevent)break;evnt(25753,19921,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_FINDHELPTOPIC_LONG_FH,1); if(!qbevent)break;evnt(25753,19921,"ide_methods.bas");}while(r); } S_56980:; if (((~(*_FUNC_FINDHELPTOPIC_LONG_LINKSFILEEXIST))|*_FUNC_FINDHELPTOPIC_LONG_LINKSFILEEMPTY)||new_error){ if(qbevent){evnt(25753,19923,"ide_methods.bas");if(r)goto S_56980;} do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_Q,FUNC_IDEYESNOBOX(qbs_new_txt_len("Help problem",12),qbs_new_txt_len("The help system is not yet initialized,\\ndo it now? (Make sure you're online.)",78))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19924,"ide_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,19925,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(25753,19925,"ide_methods.bas");}while(r); S_56984:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FINDHELPTOPIC_STRING_Q,qbs_new_txt_len("N",1))))||new_error){ if(qbevent){evnt(25753,19926,"ide_methods.bas");if(r)goto S_56984;} do{ goto LABEL_NOLINKSFILE; if(!qbevent)break;evnt(25753,19926,"ide_methods.bas");}while(r); } do{ *__LONG_HELP_IGNORECACHE= 1 ; if(!qbevent)break;evnt(25753,19927,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_A,FUNC_WIKI(qbs_new_txt_len("Keyword Reference - Alphabetical",32))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19928,"ide_methods.bas");}while(r); do{ *__LONG_HELP_IGNORECACHE= 0 ; if(!qbevent)break;evnt(25753,19929,"ide_methods.bas");}while(r); S_56990:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_FINDHELPTOPIC_STRING_A,qbs_new_txt_len("{{PageInternalError}}",21),0)))||new_error){ if(qbevent){evnt(25753,19930,"ide_methods.bas");if(r)goto S_56990;} do{ *_FUNC_FINDHELPTOPIC_LONG_LNKS= 1 ; if(!qbevent)break;evnt(25753,19931,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_LNKS,qbs_add(qbs_add(_FUNC_FINDHELPTOPIC_STRING_LNKS,qbs_new_txt_len("Initialize",10)),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19931,"ide_methods.bas");}while(r); do{ goto LABEL_NOLINKSFILE; if(!qbevent)break;evnt(25753,19932,"ide_methods.bas");}while(r); } do{ *__LONG_HELP_WW= 78 ; if(!qbevent)break;evnt(25753,19934,"ide_methods.bas");}while(r); do{ SUB_WIKIPARSE(_FUNC_FINDHELPTOPIC_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19934,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_A2,qbs_ucase(_FUNC_FINDHELPTOPIC_STRING_TOPIC)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19937,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len("internal\\help\\links.bin",23), 3 ,NULL,NULL,*_FUNC_FINDHELPTOPIC_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19938,"ide_methods.bas");}while(r); S_57000:; while((!(func_eof(*_FUNC_FINDHELPTOPIC_LONG_FH)))||new_error){ if(qbevent){evnt(25753,19939,"ide_methods.bas");if(r)goto S_57000;} do{ tmp_fileno=*_FUNC_FINDHELPTOPIC_LONG_FH; if (new_error) goto skip6279; sub_file_line_input_string(tmp_fileno,_FUNC_FINDHELPTOPIC_STRING_L); if (new_error) goto skip6279; skip6279: qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19940,"ide_methods.bas");}while(r); do{ *_FUNC_FINDHELPTOPIC_LONG_C=func_instr(NULL,_FUNC_FINDHELPTOPIC_STRING_L,qbs_new_txt_len(",",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19941,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_L1,qbs_left(_FUNC_FINDHELPTOPIC_STRING_L,*_FUNC_FINDHELPTOPIC_LONG_C- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19941,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_L2,qbs_right(_FUNC_FINDHELPTOPIC_STRING_L,_FUNC_FINDHELPTOPIC_STRING_L->len-*_FUNC_FINDHELPTOPIC_LONG_C)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19941,"ide_methods.bas");}while(r); S_57005:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_FINDHELPTOPIC_STRING_A2,qbs_ucase(_FUNC_FINDHELPTOPIC_STRING_L1)))|(((-(*__LONG_QB64PREFIX_SET== 1 ))&(qbs_equal(qbs_left(_FUNC_FINDHELPTOPIC_STRING_L1, 1 ),qbs_new_txt_len("_",1)))&(qbs_equal(_FUNC_FINDHELPTOPIC_STRING_A2,func_mid(_FUNC_FINDHELPTOPIC_STRING_L1, 2 ,NULL,0)))))))||new_error){ if(qbevent){evnt(25753,19942,"ide_methods.bas");if(r)goto S_57005;} S_57006:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDHELPTOPIC_STRING_LNKS,qbs_add(qbs_add(func_chr( 0 ),_FUNC_FINDHELPTOPIC_STRING_L2),func_chr( 0 )),0)== 0 )))||new_error){ if(qbevent){evnt(25753,19943,"ide_methods.bas");if(r)goto S_57006;} do{ *_FUNC_FINDHELPTOPIC_LONG_LNKS=*_FUNC_FINDHELPTOPIC_LONG_LNKS+ 1 ; if(!qbevent)break;evnt(25753,19944,"ide_methods.bas");}while(r); S_57008:; if ((*_FUNC_FINDHELPTOPIC_BYTE_FIRSTONLY)||new_error){ if(qbevent){evnt(25753,19945,"ide_methods.bas");if(r)goto S_57008;} do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_FINDHELPTOPIC,_FUNC_FINDHELPTOPIC_STRING_L2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19945,"ide_methods.bas");}while(r); do{ sub_close(*_FUNC_FINDHELPTOPIC_LONG_FH,1); if(!qbevent)break;evnt(25753,19945,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19945,"ide_methods.bas");}while(r); } S_57013:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_FINDHELPTOPIC_STRING_L2,_FUNC_FINDHELPTOPIC_STRING_L1)))||new_error){ if(qbevent){evnt(25753,19946,"ide_methods.bas");if(r)goto S_57013;} do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_LNKS,qbs_add(qbs_add(func_chr( 0 ),_FUNC_FINDHELPTOPIC_STRING_L2),_FUNC_FINDHELPTOPIC_STRING_LNKS)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19947,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_LNKS,qbs_add(qbs_add(_FUNC_FINDHELPTOPIC_STRING_LNKS,_FUNC_FINDHELPTOPIC_STRING_L2),func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19949,"ide_methods.bas");}while(r); } } } dl_continue_6278:; } dl_exit_6278:; do{ sub_close(*_FUNC_FINDHELPTOPIC_LONG_FH,1); if(!qbevent)break;evnt(25753,19954,"ide_methods.bas");}while(r); LABEL_NOLINKSFILE:; if(qbevent){evnt(25753,19955,"ide_methods.bas");r=0;} do{ qbs_set(_FUNC_FINDHELPTOPIC_STRING_FINDHELPTOPIC,_FUNC_FINDHELPTOPIC_STRING_LNKS); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19956,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free260.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_FINDHELPTOPIC_STRING_FINDHELPTOPIC);return _FUNC_FINDHELPTOPIC_STRING_FINDHELPTOPIC; } 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 "data261.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_ISNUMBER_STRING_A,qbs_ucase(_FUNC_ISNUMBER_STRING___A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19960,"ide_methods.bas");}while(r); S_57024:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ISNUMBER_STRING_A->len== 0 )))||new_error){ if(qbevent){evnt(25753,19961,"ide_methods.bas");if(r)goto S_57024;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19961,"ide_methods.bas");}while(r); } S_57027:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,qbs_new_txt_len("@&H@&O@&B@",10),qbs_add(qbs_add(qbs_new_txt_len("@",1),qbs_left(_FUNC_ISNUMBER_STRING_A, 2 )),qbs_new_txt_len("@",1)),0)))||new_error){ if(qbevent){evnt(25753,19963,"ide_methods.bas");if(r)goto S_57027;} do{ *_FUNC_ISNUMBER_LONG_ISNUMBER= 1 ; if(!qbevent)break;evnt(25753,19963,"ide_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19963,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("~",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19965,"ide_methods.bas");}while(r); S_57032:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19965,"ide_methods.bas");if(r)goto S_57032;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19965,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("`",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19966,"ide_methods.bas");}while(r); S_57036:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19966,"ide_methods.bas");if(r)goto S_57036;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19966,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("%",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19967,"ide_methods.bas");}while(r); S_57040:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19967,"ide_methods.bas");if(r)goto S_57040;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19967,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("&",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19968,"ide_methods.bas");}while(r); S_57044:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19968,"ide_methods.bas");if(r)goto S_57044;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19968,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("!",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19969,"ide_methods.bas");}while(r); S_57048:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19969,"ide_methods.bas");if(r)goto S_57048;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19969,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("#",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19970,"ide_methods.bas");}while(r); S_57052:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19970,"ide_methods.bas");if(r)goto S_57052;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19970,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_I=func_instr(NULL,_FUNC_ISNUMBER_STRING_A,qbs_new_txt_len("$",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19971,"ide_methods.bas");}while(r); S_57056:; if ((*_FUNC_ISNUMBER_LONG_I)||new_error){ if(qbevent){evnt(25753,19971,"ide_methods.bas");if(r)goto S_57056;} do{ goto LABEL_FOUNDSYMBOL; if(!qbevent)break;evnt(25753,19971,"ide_methods.bas");}while(r); } do{ goto LABEL_PROCEEDWITHOUTSYMBOL; if(!qbevent)break;evnt(25753,19972,"ide_methods.bas");}while(r); LABEL_FOUNDSYMBOL:; if(qbevent){evnt(25753,19973,"ide_methods.bas");r=0;} S_57060:; if ((-(*_FUNC_ISNUMBER_LONG_I== 1 ))||new_error){ if(qbevent){evnt(25753,19974,"ide_methods.bas");if(r)goto S_57060;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19974,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_ISNUMBER_STRING_SYMBOL,qbs_right(_FUNC_ISNUMBER_STRING_A,_FUNC_ISNUMBER_STRING_A->len-*_FUNC_ISNUMBER_LONG_I+ 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19975,"ide_methods.bas");}while(r); S_57064:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_SYMBOLTYPE(_FUNC_ISNUMBER_STRING_SYMBOL)== 0 )))||new_error){ if(qbevent){evnt(25753,19976,"ide_methods.bas");if(r)goto S_57064;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19976,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_ISNUMBER_STRING_A,qbs_left(_FUNC_ISNUMBER_STRING_A,*_FUNC_ISNUMBER_LONG_I- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19977,"ide_methods.bas");}while(r); LABEL_PROCEEDWITHOUTSYMBOL:; if(qbevent){evnt(25753,19979,"ide_methods.bas");r=0;} do{ *_FUNC_ISNUMBER_LONG_FF= 0 ; if(!qbevent)break;evnt(25753,19980,"ide_methods.bas");}while(r); do{ *_FUNC_ISNUMBER_LONG_EE= 0 ; if(!qbevent)break;evnt(25753,19981,"ide_methods.bas");}while(r); do{ *_FUNC_ISNUMBER_LONG_DD= 0 ; if(!qbevent)break;evnt(25753,19982,"ide_methods.bas");}while(r); do{ *_FUNC_ISNUMBER_LONG_NEG= 0 ; if(!qbevent)break;evnt(25753,19983,"ide_methods.bas");}while(r); S_57072:; fornext_value6285= 1 ; fornext_finalvalue6285=_FUNC_ISNUMBER_STRING_A->len; fornext_step6285= 1 ; if (fornext_step6285<0) fornext_step_negative6285=1; else fornext_step_negative6285=0; if (new_error) goto fornext_error6285; goto fornext_entrylabel6285; while(1){ fornext_value6285=fornext_step6285+(*_FUNC_ISNUMBER_LONG_I); fornext_entrylabel6285: *_FUNC_ISNUMBER_LONG_I=fornext_value6285; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6285){ if (fornext_value6285fornext_finalvalue6285) break; } fornext_error6285:; if(qbevent){evnt(25753,19984,"ide_methods.bas");if(r)goto S_57072;} do{ *_FUNC_ISNUMBER_LONG_A=qbs_asc(_FUNC_ISNUMBER_STRING_A,*_FUNC_ISNUMBER_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,19985,"ide_methods.bas");}while(r); S_57074:; if ((-(*_FUNC_ISNUMBER_LONG_A== 45 ))||new_error){ if(qbevent){evnt(25753,19986,"ide_methods.bas");if(r)goto S_57074;} S_57075:; if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_ISNUMBER_LONG_I== 1 ))&(-(_FUNC_ISNUMBER_STRING_A->len> 1 )))|((-(*_FUNC_ISNUMBER_LONG_I> 1 ))&((((-(*_FUNC_ISNUMBER_LONG_DD> 0 ))&(-(*_FUNC_ISNUMBER_LONG_DD==(*_FUNC_ISNUMBER_LONG_I- 1 ))))|((-(*_FUNC_ISNUMBER_LONG_EE> 0 ))&(-(*_FUNC_ISNUMBER_LONG_EE==(*_FUNC_ISNUMBER_LONG_I- 1 ))))|((-(*_FUNC_ISNUMBER_LONG_FF> 0 ))&(-(*_FUNC_ISNUMBER_LONG_FF==(*_FUNC_ISNUMBER_LONG_I- 1 )))))))))||new_error){ if(qbevent){evnt(25753,19987,"ide_methods.bas");if(r)goto S_57075;} do{ *_FUNC_ISNUMBER_LONG_NEG=(-(*_FUNC_ISNUMBER_LONG_I== 1 )); if(!qbevent)break;evnt(25753,19987,"ide_methods.bas");}while(r); do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,19987,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19988,"ide_methods.bas");}while(r); } S_57081:; if ((-(*_FUNC_ISNUMBER_LONG_A== 46 ))||new_error){ if(qbevent){evnt(25753,19990,"ide_methods.bas");if(r)goto S_57081;} S_57082:; if ((-(*_FUNC_ISNUMBER_LONG_DP== 1 ))||new_error){ if(qbevent){evnt(25753,19991,"ide_methods.bas");if(r)goto S_57082;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19991,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_DP= 1 ; if(!qbevent)break;evnt(25753,19992,"ide_methods.bas");}while(r); do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,19993,"ide_methods.bas");}while(r); } S_57088:; if ((-(*_FUNC_ISNUMBER_LONG_A== 68 ))||new_error){ if(qbevent){evnt(25753,19995,"ide_methods.bas");if(r)goto S_57088;} S_57089:; if (((-(*_FUNC_ISNUMBER_LONG_DD> 0 ))|(-(*_FUNC_ISNUMBER_LONG_EE> 0 ))|(-(*_FUNC_ISNUMBER_LONG_FF> 0 )))||new_error){ if(qbevent){evnt(25753,19996,"ide_methods.bas");if(r)goto S_57089;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19996,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_DD=*_FUNC_ISNUMBER_LONG_I; if(!qbevent)break;evnt(25753,19997,"ide_methods.bas");}while(r); S_57093:; if (((-(*_FUNC_ISNUMBER_LONG_NEG!= 0 ))&(-(*_FUNC_ISNUMBER_LONG_DD== 2 )))||new_error){ if(qbevent){evnt(25753,19998,"ide_methods.bas");if(r)goto S_57093;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,19998,"ide_methods.bas");}while(r); } do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,19999,"ide_methods.bas");}while(r); } S_57098:; if ((-(*_FUNC_ISNUMBER_LONG_A== 69 ))||new_error){ if(qbevent){evnt(25753,20001,"ide_methods.bas");if(r)goto S_57098;} S_57099:; if (((-(*_FUNC_ISNUMBER_LONG_DD> 0 ))|(-(*_FUNC_ISNUMBER_LONG_EE> 0 ))|(-(*_FUNC_ISNUMBER_LONG_FF> 0 )))||new_error){ if(qbevent){evnt(25753,20002,"ide_methods.bas");if(r)goto S_57099;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20002,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_EE=*_FUNC_ISNUMBER_LONG_I; if(!qbevent)break;evnt(25753,20003,"ide_methods.bas");}while(r); S_57103:; if (((-(*_FUNC_ISNUMBER_LONG_NEG!= 0 ))&(-(*_FUNC_ISNUMBER_LONG_EE== 2 )))||new_error){ if(qbevent){evnt(25753,20004,"ide_methods.bas");if(r)goto S_57103;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20004,"ide_methods.bas");}while(r); } do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,20005,"ide_methods.bas");}while(r); } S_57108:; if ((-(*_FUNC_ISNUMBER_LONG_A== 70 ))||new_error){ if(qbevent){evnt(25753,20007,"ide_methods.bas");if(r)goto S_57108;} S_57109:; if (((-(*_FUNC_ISNUMBER_LONG_DD> 0 ))|(-(*_FUNC_ISNUMBER_LONG_EE> 0 ))|(-(*_FUNC_ISNUMBER_LONG_FF> 0 )))||new_error){ if(qbevent){evnt(25753,20008,"ide_methods.bas");if(r)goto S_57109;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20008,"ide_methods.bas");}while(r); } do{ *_FUNC_ISNUMBER_LONG_FF=*_FUNC_ISNUMBER_LONG_I; if(!qbevent)break;evnt(25753,20009,"ide_methods.bas");}while(r); S_57113:; if (((-(*_FUNC_ISNUMBER_LONG_NEG!= 0 ))&(-(*_FUNC_ISNUMBER_LONG_FF== 2 )))||new_error){ if(qbevent){evnt(25753,20010,"ide_methods.bas");if(r)goto S_57113;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20010,"ide_methods.bas");}while(r); } do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,20011,"ide_methods.bas");}while(r); } S_57118:; if ((-(*_FUNC_ISNUMBER_LONG_A== 43 ))||new_error){ if(qbevent){evnt(25753,20013,"ide_methods.bas");if(r)goto S_57118;} S_57119:; if ((((-(*_FUNC_ISNUMBER_LONG_DD> 0 ))&(-(*_FUNC_ISNUMBER_LONG_DD==(*_FUNC_ISNUMBER_LONG_I- 1 ))))|((-(*_FUNC_ISNUMBER_LONG_EE> 0 ))&(-(*_FUNC_ISNUMBER_LONG_EE==(*_FUNC_ISNUMBER_LONG_I- 1 ))))|((-(*_FUNC_ISNUMBER_LONG_FF> 0 ))&(-(*_FUNC_ISNUMBER_LONG_FF==(*_FUNC_ISNUMBER_LONG_I- 1 )))))||new_error){ if(qbevent){evnt(25753,20014,"ide_methods.bas");if(r)goto S_57119;} do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,20014,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20015,"ide_methods.bas");}while(r); } S_57124:; if (((-(*_FUNC_ISNUMBER_LONG_A>= 48 ))&(-(*_FUNC_ISNUMBER_LONG_A<= 57 )))||new_error){ if(qbevent){evnt(25753,20018,"ide_methods.bas");if(r)goto S_57124;} do{ goto fornext_continue_6284; if(!qbevent)break;evnt(25753,20018,"ide_methods.bas");}while(r); } do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20019,"ide_methods.bas");}while(r); fornext_continue_6284:; } fornext_exit_6284:; do{ *_FUNC_ISNUMBER_LONG_ISNUMBER= 1 ; if(!qbevent)break;evnt(25753,20021,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free261.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; } 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 "data262.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57130:; 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(25753,2,"wiki_methods.bas");if(r)goto S_57130;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("Alphabetical",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,2,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,2,"wiki_methods.bas");}while(r); } S_57134:; 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(25753,3,"wiki_methods.bas");if(r)goto S_57134;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("By Usage",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,3,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,3,"wiki_methods.bas");}while(r); } S_57138:; 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(25753,4,"wiki_methods.bas");if(r)goto S_57138;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("Help",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,4,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,4,"wiki_methods.bas");}while(r); } S_57142:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_BACK2BACKNAME_STRING_A,qbs_new_txt_len("QB64 FAQ",8))))||new_error){ if(qbevent){evnt(25753,5,"wiki_methods.bas");if(r)goto S_57142;} do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,qbs_new_txt_len("FAQ",3)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,5,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,5,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_BACK2BACKNAME_STRING_BACK2BACKNAME,_FUNC_BACK2BACKNAME_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,6,"wiki_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free262.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 "data263.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57147:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_WIKI_STRING_PAGENAME, 9 ),qbs_new_txt_len("Template:",9))))||new_error){ if(qbevent){evnt(25753,10,"wiki_methods.bas");if(r)goto S_57147;} do{ qbs_set(__STRING_HELP_PAGELOADED,_FUNC_WIKI_STRING_PAGENAME); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,10,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,13,"wiki_methods.bas");}while(r); S_57151:; fornext_value6291= 1 ; fornext_finalvalue6291=_FUNC_WIKI_STRING_PAGENAME->len; fornext_step6291= 1 ; if (fornext_step6291<0) fornext_step_negative6291=1; else fornext_step_negative6291=0; if (new_error) goto fornext_error6291; goto fornext_entrylabel6291; while(1){ fornext_value6291=fornext_step6291+(*_FUNC_WIKI_LONG_I); fornext_entrylabel6291: *_FUNC_WIKI_LONG_I=fornext_value6291; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6291){ if (fornext_value6291fornext_finalvalue6291) break; } fornext_error6291:; if(qbevent){evnt(25753,14,"wiki_methods.bas");if(r)goto S_57151;} do{ *_FUNC_WIKI_LONG_C=qbs_asc(_FUNC_WIKI_STRING_PAGENAME,*_FUNC_WIKI_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,15,"wiki_methods.bas");}while(r); S_57153:; if(qbevent){evnt(25753,16,"wiki_methods.bas");if(r)goto S_57153;} S_57154:; if (((*_FUNC_WIKI_LONG_C==( 32 )))||new_error){ if(qbevent){evnt(25753,17,"wiki_methods.bas");if(r)goto S_57154;} do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("_",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,18,"wiki_methods.bas");}while(r); sc_ec_434_end:; goto sc_6293_end; } S_57156:; if (((*_FUNC_WIKI_LONG_C==( 34 ))||(*_FUNC_WIKI_LONG_C==( 36 ))||(*_FUNC_WIKI_LONG_C==( 38 ))||(*_FUNC_WIKI_LONG_C==( 42 ))||(*_FUNC_WIKI_LONG_C==( 43 ))||(*_FUNC_WIKI_LONG_C==( 47 ))||(*_FUNC_WIKI_LONG_C==( 58 ))||(*_FUNC_WIKI_LONG_C==( 60 ))||(*_FUNC_WIKI_LONG_C==( 62 ))||(*_FUNC_WIKI_LONG_C==( 63 ))||(*_FUNC_WIKI_LONG_C==( 92 ))||(*_FUNC_WIKI_LONG_C==( 124 )))||new_error){ if(qbevent){evnt(25753,19,"wiki_methods.bas");if(r)goto S_57156;} do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(qbs_add(_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("%",1)),func_hex(*_FUNC_WIKI_LONG_C,8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20,"wiki_methods.bas");}while(r); sc_ec_435_end:; goto sc_6293_end; } do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(_FUNC_WIKI_STRING_PAGENAME2,func_chr(*_FUNC_WIKI_LONG_C))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,22,"wiki_methods.bas");}while(r); sc_6293_end:; fornext_continue_6290:; } fornext_exit_6290:; do{ qbs_set(_FUNC_WIKI_STRING_PAGENAME3,FUNC_WIKISAFENAME(_FUNC_WIKI_STRING_PAGENAME2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,25,"wiki_methods.bas");}while(r); S_57163:; if ((-(*__LONG_HELP_IGNORECACHE== 0 ))||new_error){ if(qbevent){evnt(25753,28,"wiki_methods.bas");if(r)goto S_57163;} S_57164:; 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_PAGENAME3),qbs_new_txt_len(".txt",4)))))||new_error){ if(qbevent){evnt(25753,29,"wiki_methods.bas");if(r)goto S_57164;} do{ *_FUNC_WIKI_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,30,"wiki_methods.bas");}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME3),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(25753,31,"wiki_methods.bas");}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(25753,32,"wiki_methods.bas");}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(25753,33,"wiki_methods.bas");}while(r); do{ sub_close(*_FUNC_WIKI_LONG_FH,1); if(!qbevent)break;evnt(25753,34,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_WIKI,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(func_chr( 13 ),func_chr( 10 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,35,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,36,"wiki_methods.bas");}while(r); } } S_57174:; if ((qbs_cleanup(qbs_tmp_base,-(func__shellhide(qbs_new_txt_len("curl --version >NUL",19))!= 0 )))||new_error){ if(qbevent){evnt(25753,41,"wiki_methods.bas");if(r)goto S_57174;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(func_chr( 10 ),qbs_new_txt_len("{{PageInternalError}}",21)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,42,"wiki_methods.bas");}while(r); S_57176:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_WIKI_STRING_PAGENAME,qbs_new_txt_len("Initialize",10))))||new_error){ if(qbevent){evnt(25753,43,"wiki_methods.bas");if(r)goto S_57176;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("To be able to initialize the help system, ",42))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,44,"wiki_methods.bas");}while(r); S_57178:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_WIKI_STRING_PAGENAME,qbs_new_txt_len("Update All",10)))){ if(qbevent){evnt(25753,45,"wiki_methods.bas");if(r)goto S_57178;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("To be able to update the help pages from the online Wiki, ",58))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,46,"wiki_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("The requested help page is not yet cached locally. To download the help page from the online Wiki, ",99))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,48,"wiki_methods.bas");}while(r); } } do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("a tool called ''curl'' is required, but it wasn't found on your system.",71)),func_chr( 10 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,50,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("* To get ''curl'', visit the official [https://curl.se/download.html download page].",84)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,51,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("** Grab the latest ''binary'' archive available for your system.",64)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,52,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("** Unpack and drop the ''curl'' executable into the '''qb64pe''' folder.",72)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,53,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(_FUNC_WIKI_STRING_A,qbs_new_txt_len("** If there's a file named ''curl-ca-bundle.crt'' or similar, drop it into the '''qb64pe''' folder too.",103)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,54,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_WIKI,_FUNC_WIKI_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,55,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,55,"wiki_methods.bas");}while(r); } S_57191:; if ((-(*__LONG_HELP_RECACHING== 0 ))||new_error){ if(qbevent){evnt(25753,59,"wiki_methods.bas");if(r)goto S_57191;} 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(25753,60,"wiki_methods.bas");}while(r); S_57193:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_WIKI_STRING_A->len> 60 )))||new_error){ if(qbevent){evnt(25753,61,"wiki_methods.bas");if(r)goto S_57193;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_left(_FUNC_WIKI_STRING_A, 57 ),func_string( 3 , 250 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,61,"wiki_methods.bas");}while(r); } S_57196:; if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_WIKI_STRING_A->len< 60 )))||new_error){ if(qbevent){evnt(25753,62,"wiki_methods.bas");if(r)goto S_57196;} 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(25753,62,"wiki_methods.bas");}while(r); } do{ qbg_sub_color( 0 , 3 ,NULL,3); if(!qbevent)break;evnt(25753,64,"wiki_methods.bas");}while(r); do{ qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW, 2 ,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,64,"wiki_methods.bas");}while(r); do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_FUNC_WIKI_STRING_A); if (new_error) goto skip6297; makefit(tqbs); qbs_print(tqbs,0); skip6297: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,65,"wiki_methods.bas");}while(r); do{ sub_pcopy( 3 , 0 ); if(!qbevent)break;evnt(25753,67,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKI_STRING_URL,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 34 ),__STRING_WIKIBASEADDRESS),qbs_new_txt_len("/index.php?title=",17)),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len("&action=edit",12)),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,71,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_OUTPUTFILE,qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME3),qbs_new_txt_len(".txt",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,72,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_S1,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("name=",5),func_chr( 34 )),qbs_new_txt_len("wpTextbox1",10)),func_chr( 34 )),qbs_new_txt_len(">",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,74,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_S2,qbs_new_txt_len("",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,75,"wiki_methods.bas");}while(r); do{ sub_shell2(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("curl --silent -o ",17),func_chr( 34 )),_FUNC_WIKI_STRING_OUTPUTFILE),func_chr( 34 )),qbs_new_txt_len(" ",1)),_FUNC_WIKI_STRING_URL),2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,78,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKI_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,79,"wiki_methods.bas");}while(r); do{ sub_open(_FUNC_WIKI_STRING_OUTPUTFILE, 2 ,NULL,NULL,*_FUNC_WIKI_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,80,"wiki_methods.bas");}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(25753,81,"wiki_methods.bas");}while(r); do{ sub_get2(*_FUNC_WIKI_LONG_FH, 1 ,_FUNC_WIKI_STRING_A,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,82,"wiki_methods.bas");}while(r); do{ sub_close(*_FUNC_WIKI_LONG_FH,1); if(!qbevent)break;evnt(25753,83,"wiki_methods.bas");}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(25753,86,"wiki_methods.bas");}while(r); S_57215:; if ((-(*_FUNC_WIKI_LONG_S1> 0 ))||new_error){ if(qbevent){evnt(25753,87,"wiki_methods.bas");if(r)goto S_57215;} do{ qbs_set(_FUNC_WIKI_STRING_A,func_mid(_FUNC_WIKI_STRING_A,*_FUNC_WIKI_LONG_S1+_FUNC_WIKI_STRING_S1->len,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,87,"wiki_methods.bas");}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(25753,87,"wiki_methods.bas");}while(r); }else{ do{ *_FUNC_WIKI_LONG_S2= 0 ; if(!qbevent)break;evnt(25753,87,"wiki_methods.bas");}while(r); } S_57221:; if ((-(*_FUNC_WIKI_LONG_S2> 0 ))||new_error){ if(qbevent){evnt(25753,88,"wiki_methods.bas");if(r)goto S_57221;} do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_left(_FUNC_WIKI_STRING_A,*_FUNC_WIKI_LONG_S2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,88,"wiki_methods.bas");}while(r); } S_57224:; if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_WIKI_LONG_S1> 0 ))&(-(*_FUNC_WIKI_LONG_S2> 0 ))&(qbs_notequal(_FUNC_WIKI_STRING_A,qbs_new_txt_len("",0)))))||new_error){ if(qbevent){evnt(25753,89,"wiki_methods.bas");if(r)goto S_57224;} S_57225:; while((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_WIKI_STRING_A,qbs_new_txt_len("&",5),0)> 0 )))||new_error){ if(qbevent){evnt(25753,92,"wiki_methods.bas");if(r)goto S_57225;} do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("&",5),qbs_new_txt_len("&",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,93,"wiki_methods.bas");}while(r); ww_continue_6299:; } ww_exit_6299:; do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("<",4),qbs_new_txt_len("<",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,95,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len(">",4),qbs_new_txt_len(">",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,96,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len(""",6),func_chr( 34 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,97,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("'",6),qbs_new_txt_len("'",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,98,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("|",8),qbs_new_txt_len("|",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,100,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("π",4),func_chr( 227 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,101,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("θ",7),func_chr( 233 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,102,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("¹",6),func_chr( 252 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,103,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("²",6),func_chr( 253 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,104,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len(" ",6),func_chr( 255 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,105,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("Start}}'' ''",12),qbs_new_txt_len("Start}}",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,107,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("Start}} '' ''",13),qbs_new_txt_len("Start}}",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,108,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Start}}",7),func_chr( 10 )),qbs_new_txt_len("'' ''",5)),qbs_new_txt_len("Start}}",7))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,109,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("'' ''",5),func_chr( 10 )),qbs_new_txt_len("{{",2)),qbs_add(func_chr( 10 ),qbs_new_txt_len("{{",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,110,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("'' '' ",6),func_chr( 10 )),qbs_new_txt_len("{{",2)),qbs_add(func_chr( 10 ),qbs_new_txt_len("{{",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,111,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("'' ''",5),func_chr( 10 )),func_chr( 10 )),qbs_new_txt_len("{{",2)),qbs_add(func_chr( 10 ),qbs_new_txt_len("{{",2)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,112,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("#REDIRECT",9),qbs_new_txt_len("See page",8))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,114,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(func_chr( 13 ),func_chr( 10 )),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,115,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("{{QBDLDATE:",11),func_date()),qbs_new_txt_len("}}",2)),func_chr( 10 )),qbs_new_txt_len("{{QBDLTIME:",11)),func_time()),qbs_new_txt_len("}}",2)),func_chr( 10 )),_FUNC_WIKI_STRING_A)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,117,"wiki_methods.bas");}while(r); do{ sub_open(_FUNC_WIKI_STRING_OUTPUTFILE, 4 ,NULL,NULL,*_FUNC_WIKI_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,119,"wiki_methods.bas");}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_FUNC_WIKI_LONG_FH; if (new_error) goto skip6300; sub_file_print(tmp_fileno,_FUNC_WIKI_STRING_A, 0, 0, 0); if (new_error) goto skip6300; skip6300: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25753,120,"wiki_methods.bas");}while(r); do{ sub_close(*_FUNC_WIKI_LONG_FH,1); if(!qbevent)break;evnt(25753,121,"wiki_methods.bas");}while(r); }else{ do{ sub_kill(_FUNC_WIKI_STRING_OUTPUTFILE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,124,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 10 ),qbs_new_txt_len("{{PageInternalError}}",21)),func_chr( 10 )),qbs_new_txt_len("* Either the requested page is not yet available in the Wiki,",61)),func_chr( 10 )),qbs_new_txt_len("* or the download from Wiki failed and corrupted the page data.",63)),func_chr( 10 )),qbs_new_txt_len("** You may try ''Update Current Page'' from the ''Help'' menu.",62)),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,128,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKI_STRING_WIKI,_FUNC_WIKI_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,131,"wiki_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free263.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 "data264.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57255:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_HELP_ADDTXT_STRING_T,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,135,"wiki_methods.bas");if(r)goto S_57255;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,135,"wiki_methods.bas");}while(r); } S_57258:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_HELP_ADDTXT_STRING_T,func_chr( 13 ))))||new_error){ if(qbevent){evnt(25753,136,"wiki_methods.bas");if(r)goto S_57258;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,136,"wiki_methods.bas");}while(r); do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,136,"wiki_methods.bas");}while(r); } S_57262:; if ((-(*__LONG_HELP_CHKBLANK!= 0 ))||new_error){ if(qbevent){evnt(25753,137,"wiki_methods.bas");if(r)goto S_57262;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,137,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CHKBLANK= 0 ; if(!qbevent)break;evnt(25753,137,"wiki_methods.bas");}while(r); } S_57266:; fornext_value6303= 1 ; fornext_finalvalue6303=_SUB_HELP_ADDTXT_STRING_T->len; fornext_step6303= 1 ; if (fornext_step6303<0) fornext_step_negative6303=1; else fornext_step_negative6303=0; if (new_error) goto fornext_error6303; goto fornext_entrylabel6303; while(1){ fornext_value6303=fornext_step6303+(*_SUB_HELP_ADDTXT_LONG_I); fornext_entrylabel6303: *_SUB_HELP_ADDTXT_LONG_I=fornext_value6303; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6303){ if (fornext_value6303fornext_finalvalue6303) break; } fornext_error6303:; if(qbevent){evnt(25753,139,"wiki_methods.bas");if(r)goto S_57266;} 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(25753,140,"wiki_methods.bas");}while(r); S_57268:; if (((-(*__LONG_HELP_LOCKPARSE== 0 ))&(-(*__LONG_HELP_LOCKWRAP== 0 )))||new_error){ if(qbevent){evnt(25753,142,"wiki_methods.bas");if(r)goto S_57268;} S_57269:; if ((-(*_SUB_HELP_ADDTXT_LONG_C== 32 ))||new_error){ if(qbevent){evnt(25753,144,"wiki_methods.bas");if(r)goto S_57269;} S_57270:; if ((-(*__LONG_HELP_POS==*__LONG_HELP_WW))||new_error){ if(qbevent){evnt(25753,145,"wiki_methods.bas");if(r)goto S_57270;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,145,"wiki_methods.bas");}while(r); do{ goto fornext_continue_6302; if(!qbevent)break;evnt(25753,145,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,147,"wiki_methods.bas");}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(25753,147,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,148,"wiki_methods.bas");}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(25753,148,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,149,"wiki_methods.bas");}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(25753,149,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,150,"wiki_methods.bas");}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(25753,150,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_WRAP_POS=*__LONG_HELP_TXT_LEN; if(!qbevent)break;evnt(25753,152,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_POS=*__LONG_HELP_POS+ 1 ; if(!qbevent)break;evnt(25753,153,"wiki_methods.bas");}while(r); do{ goto fornext_continue_6302; if(!qbevent)break;evnt(25753,153,"wiki_methods.bas");}while(r); } S_57286:; if ((-(*__LONG_HELP_POS>*__LONG_HELP_WW))||new_error){ if(qbevent){evnt(25753,156,"wiki_methods.bas");if(r)goto S_57286;} S_57287:; if ((*__LONG_HELP_WRAP_POS)||new_error){ if(qbevent){evnt(25753,157,"wiki_methods.bas");if(r)goto S_57287;} 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(25753,160,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_WRAP_POS; if(!qbevent)break;evnt(25753,162,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,164,"wiki_methods.bas");}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(25753,166,"wiki_methods.bas");}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(25753,166,"wiki_methods.bas");}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(25753,168,"wiki_methods.bas");}while(r); } } } do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,174,"wiki_methods.bas");}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(25753,174,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,175,"wiki_methods.bas");}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(25753,175,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,176,"wiki_methods.bas");}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(25753,176,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,177,"wiki_methods.bas");}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(25753,177,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_POS=*__LONG_HELP_POS+ 1 ; if(!qbevent)break;evnt(25753,179,"wiki_methods.bas");}while(r); fornext_continue_6302:; } fornext_exit_6302:; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free264.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 "data265.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57307:; if ((-(*__LONG_HELP_POS>*__LONG_HELP_W))||new_error){ if(qbevent){evnt(25753,184,"wiki_methods.bas");if(r)goto S_57307;} do{ *__LONG_HELP_W=*__LONG_HELP_POS; if(!qbevent)break;evnt(25753,184,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,186,"wiki_methods.bas");}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(25753,186,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,187,"wiki_methods.bas");}while(r); do{ tqbs=__STRING_HELP_TXT; if (!new_error){ tmp_fileno=*__LONG_HELP_TXT_LEN; if (!new_error){ tmp_long=*__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(25753,187,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,188,"wiki_methods.bas");}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(25753,188,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN+ 1 ; if(!qbevent)break;evnt(25753,189,"wiki_methods.bas");}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(25753,189,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_H=*__LONG_HELP_H+ 1 ; if(!qbevent)break;evnt(25753,191,"wiki_methods.bas");}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(25753,192,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_WRAP_POS= 0 ; if(!qbevent)break;evnt(25753,193,"wiki_methods.bas");}while(r); S_57321:; if ((-(*__LONG_HELP_UNDERLINE> 0 ))||new_error){ if(qbevent){evnt(25753,195,"wiki_methods.bas");if(r)goto S_57321;} do{ *_SUB_HELP_NEWLINE_LONG_W=*__LONG_HELP_POS; if(!qbevent)break;evnt(25753,196,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_POS= 1 ; if(!qbevent)break;evnt(25753,197,"wiki_methods.bas");}while(r); S_57324:; if ((-(*__LONG_HELP_UNDERLINE== 2 ))||new_error){ if(qbevent){evnt(25753,198,"wiki_methods.bas");if(r)goto S_57324;} do{ SUB_HELP_ADDTXT(func_string(*_SUB_HELP_NEWLINE_LONG_W- 1 , 205 ),__LONG_HELP_COL_SECTION,&(pass6308= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,199,"wiki_methods.bas");}while(r); }else{ do{ SUB_HELP_ADDTXT(func_string(*_SUB_HELP_NEWLINE_LONG_W- 1 , 196 ),__LONG_HELP_COL_SECTION,&(pass6309= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,201,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_UNDERLINE= 0 ; if(!qbevent)break;evnt(25753,203,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,204,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_POS= 1 ; if(!qbevent)break;evnt(25753,206,"wiki_methods.bas");}while(r); S_57333:; if ((-(*__LONG_HELP_CHKBLANK== 0 ))||new_error){ if(qbevent){evnt(25753,208,"wiki_methods.bas");if(r)goto S_57333;} S_57334:; if ((-(*__LONG_HELP_CENTER> 0 ))||new_error){ if(qbevent){evnt(25753,209,"wiki_methods.bas");if(r)goto S_57334;} do{ qbs_set(__STRING_HELP_LINDENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,210,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_space(qbs_asc(__STRING_HELP_CINDENT, 1 )),&(pass6310=FUNC_HELP_COL()),&(pass6311= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,211,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,func_mid(__STRING_HELP_CINDENT, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,212,"wiki_methods.bas");}while(r); S_57338:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_HELP_LINDENT,qbs_new_txt_len("",0)))){ if(qbevent){evnt(25753,213,"wiki_methods.bas");if(r)goto S_57338;} do{ SUB_HELP_ADDTXT(__STRING_HELP_LINDENT,&(pass6312= 11 ),&(pass6313= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,214,"wiki_methods.bas");}while(r); } } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free265.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_CHECKFINISHLINE(){ 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 "data266.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57342:; if ((-(*__LONG_HELP_TXT_LEN>= 4 ))||new_error){ if(qbevent){evnt(25753,220,"wiki_methods.bas");if(r)goto S_57342;} S_57343:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 3 )!= 13 )))||new_error){ if(qbevent){evnt(25753,221,"wiki_methods.bas");if(r)goto S_57343;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,221,"wiki_methods.bas");}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free266.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_CHECKBLANKLINE(){ 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 "data267.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57347:; if ((-(*__LONG_HELP_TXT_LEN>= 8 ))||new_error){ if(qbevent){evnt(25753,226,"wiki_methods.bas");if(r)goto S_57347;} S_57348:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 3 )!= 13 )))||new_error){ if(qbevent){evnt(25753,227,"wiki_methods.bas");if(r)goto S_57348;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,227,"wiki_methods.bas");}while(r); } S_57351:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 7 )!= 13 )))||new_error){ if(qbevent){evnt(25753,228,"wiki_methods.bas");if(r)goto S_57351;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,228,"wiki_methods.bas");}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free267.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_CHECKREMOVEBLANKLINE(){ 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 "data268.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; S_57355:; if ((-(*__LONG_HELP_TXT_LEN>= 8 ))||new_error){ if(qbevent){evnt(25753,233,"wiki_methods.bas");if(r)goto S_57355;} S_57356:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 3 )== 13 )))||new_error){ if(qbevent){evnt(25753,234,"wiki_methods.bas");if(r)goto S_57356;} do{ *__LONG_HELP_TXT_LEN=*__LONG_HELP_TXT_LEN- 4 ; if(!qbevent)break;evnt(25753,235,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_H=*__LONG_HELP_H- 1 ; if(!qbevent)break;evnt(25753,236,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINE,qbs_left(__STRING_HELP_LINE,__STRING_HELP_LINE->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,237,"wiki_methods.bas");}while(r); } S_57361:; fornext_value6316=*__LONG_HELP_TXT_LEN- 3 ; fornext_finalvalue6316= 1 ; fornext_step6316= -4 ; if (fornext_step6316<0) fornext_step_negative6316=1; else fornext_step_negative6316=0; if (new_error) goto fornext_error6316; goto fornext_entrylabel6316; while(1){ fornext_value6316=fornext_step6316+(*_SUB_HELP_CHECKREMOVEBLANKLINE_LONG_I); fornext_entrylabel6316: *_SUB_HELP_CHECKREMOVEBLANKLINE_LONG_I=fornext_value6316; if (fornext_step_negative6316){ if (fornext_value6316fornext_finalvalue6316) break; } fornext_error6316:; if(qbevent){evnt(25753,239,"wiki_methods.bas");if(r)goto S_57361;} S_57362:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_CHECKREMOVEBLANKLINE_LONG_I)!= 32 )))||new_error){ if(qbevent){evnt(25753,240,"wiki_methods.bas");if(r)goto S_57362;} do{ *__LONG_HELP_TXT_LEN=*_SUB_HELP_CHECKREMOVEBLANKLINE_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,241,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6315; if(!qbevent)break;evnt(25753,241,"wiki_methods.bas");}while(r); } fornext_continue_6315:; } fornext_exit_6315:; S_57367:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_HELP_TXT,*__LONG_HELP_TXT_LEN- 3 )!= 13 )))||new_error){ if(qbevent){evnt(25753,244,"wiki_methods.bas");if(r)goto S_57367;} do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,244,"wiki_methods.bas");}while(r); } } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free268.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 "data269.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_NORMAL; if(!qbevent)break;evnt(25753,249,"wiki_methods.bas");}while(r); S_57372:; if ((*__LONG_HELP_ITALIC)||new_error){ if(qbevent){evnt(25753,250,"wiki_methods.bas");if(r)goto S_57372;} do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_ITALIC; if(!qbevent)break;evnt(25753,250,"wiki_methods.bas");}while(r); } S_57375:; if ((*__LONG_HELP_BOLD)||new_error){ if(qbevent){evnt(25753,251,"wiki_methods.bas");if(r)goto S_57375;} do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_BOLD; if(!qbevent)break;evnt(25753,251,"wiki_methods.bas");}while(r); } S_57378:; if ((*__LONG_HELP_HEADING)||new_error){ if(qbevent){evnt(25753,252,"wiki_methods.bas");if(r)goto S_57378;} do{ *_FUNC_HELP_COL_LONG_COL=*__LONG_HELP_COL_SECTION; if(!qbevent)break;evnt(25753,252,"wiki_methods.bas");}while(r); } do{ *_FUNC_HELP_COL_LONG_HELP_COL=*_FUNC_HELP_COL_LONG_COL; if(!qbevent)break;evnt(25753,253,"wiki_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free269.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 "data270.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *__LONG_HELP_H= 0 ; if(!qbevent)break;evnt(25753,259,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_W= 0 ; if(!qbevent)break;evnt(25753,259,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINE,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,259,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,259,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LINKN= 0 ; if(!qbevent)break;evnt(25753,259,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_TXT,func_space( 1000000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,260,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_TXT_LEN= 0 ; if(!qbevent)break;evnt(25753,261,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_POS= 1 ; if(!qbevent)break;evnt(25753,263,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_WRAP_POS= 0 ; if(!qbevent)break;evnt(25753,263,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINE,l2string( 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,264,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKWRAP= 0 ; if(!qbevent)break;evnt(25753,266,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 0 ; if(!qbevent)break;evnt(25753,275,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,276,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,276,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 0 ; if(!qbevent)break;evnt(25753,276,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_UNDERLINE= 0 ; if(!qbevent)break;evnt(25753,277,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,278,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CENTER= 0 ; if(!qbevent)break;evnt(25753,279,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,279,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_DLIST= 0 ; if(!qbevent)break;evnt(25753,280,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CHKBLANK= 0 ; if(!qbevent)break;evnt(25753,280,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 0 ; if(!qbevent)break;evnt(25753,282,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_ELINK= 0 ; if(!qbevent)break;evnt(25753,282,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_CB= 0 ; if(!qbevent)break;evnt(25753,282,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_NL= 1 ; if(!qbevent)break;evnt(25753,282,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_AH= 0 ; if(!qbevent)break;evnt(25753,282,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_DL= 0 ; if(!qbevent)break;evnt(25753,282,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,284,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_D,qbs_new_txt_len("Page not yet updated, expect visual glitches.",45)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,309,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=func_instr(NULL,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("{{QBDLDATE:",11),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,309,"wiki_methods.bas");}while(r); S_57412:; if ((-(*_SUB_WIKIPARSE_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,310,"wiki_methods.bas");if(r)goto S_57412;} do{ qbs_set(_SUB_WIKIPARSE_STRING_D,qbs_add(qbs_new_txt_len("Last updated: ",14),func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I+ 11 ,func_instr(*_SUB_WIKIPARSE_LONG_I+ 11 ,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("}}",2),1)-*_SUB_WIKIPARSE_LONG_I- 11 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,311,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=func_instr(NULL,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("{{QBDLTIME:",11),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,312,"wiki_methods.bas");}while(r); S_57415:; if ((-(*_SUB_WIKIPARSE_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,313,"wiki_methods.bas");if(r)goto S_57415;} do{ qbs_set(_SUB_WIKIPARSE_STRING_D,qbs_add(qbs_add(_SUB_WIKIPARSE_STRING_D,qbs_new_txt_len(", at ",5)),func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I+ 11 ,func_instr(*_SUB_WIKIPARSE_LONG_I+ 11 ,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("}}",2),1)-*_SUB_WIKIPARSE_LONG_I- 11 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,313,"wiki_methods.bas");}while(r); } S_57418:; }else{ if (qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("{{PageInternalError}}",21),0)> 0 ))){ if(qbevent){evnt(25753,314,"wiki_methods.bas");if(r)goto S_57418;} do{ qbs_set(_SUB_WIKIPARSE_STRING_D,qbs_new_txt_len("Page not found.",15)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,315,"wiki_methods.bas");}while(r); } } do{ qbs_set(_SUB_WIKIPARSE_STRING_T,__STRING_HELP_PAGELOADED); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,317,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=func_instr(NULL,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("{{DISPLAYTITLE:",15),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,317,"wiki_methods.bas");}while(r); S_57423:; if ((-(*_SUB_WIKIPARSE_LONG_I> 0 ))||new_error){ if(qbevent){evnt(25753,318,"wiki_methods.bas");if(r)goto S_57423;} do{ qbs_set(_SUB_WIKIPARSE_STRING_T,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I+ 15 ,func_instr(*_SUB_WIKIPARSE_LONG_I+ 15 ,_SUB_WIKIPARSE_STRING_A,qbs_new_txt_len("}}",2),1)-*_SUB_WIKIPARSE_LONG_I- 15 ,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,318,"wiki_methods.bas");}while(r); } S_57426:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_WIKIPARSE_STRING_T, 4 ),qbs_new_txt_len("agp@",4))))||new_error){ if(qbevent){evnt(25753,319,"wiki_methods.bas");if(r)goto S_57426;} do{ qbs_set(_SUB_WIKIPARSE_STRING_D,qbs_new_txt_len("Auto-generated temporary page.",30)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,320,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_T,func_mid(_SUB_WIKIPARSE_STRING_T, 5 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,321,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_I=_SUB_WIKIPARSE_STRING_D->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,323,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_II=_SUB_WIKIPARSE_STRING_T->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,323,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(qbs_new_txt_len(" \332",3),func_string(*_SUB_WIKIPARSE_LONG_II+ 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\277",1)),&(pass6320= 14 ),&(pass6321= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,324,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,324,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" \263 ",4),&(pass6322= 14 ),&(pass6323= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,325,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_T,&(pass6324= 12 ),&(pass6325= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,325,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" \263",2),&(pass6326= 14 ),&(pass6327= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,325,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=*__LONG_HELP_WW-*_SUB_WIKIPARSE_LONG_I- 2 -*__LONG_HELP_POS; if(!qbevent)break;evnt(25753,326,"wiki_methods.bas");}while(r); S_57438:; if ((-(*_SUB_WIKIPARSE_LONG_I< 2 ))||new_error){ if(qbevent){evnt(25753,326,"wiki_methods.bas");if(r)goto S_57438;} do{ *_SUB_WIKIPARSE_LONG_I= 2 ; if(!qbevent)break;evnt(25753,326,"wiki_methods.bas");}while(r); } do{ SUB_HELP_ADDTXT(qbs_add(func_space(*_SUB_WIKIPARSE_LONG_I),func_chr( 4 )),&(pass6328= 14 ),&(pass6329= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,327,"wiki_methods.bas");}while(r); S_57442:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_WIKIPARSE_STRING_D, 4 ),qbs_new_txt_len("Page",4))))||new_error){ if(qbevent){evnt(25753,328,"wiki_methods.bas");if(r)goto S_57442;} do{ *_SUB_WIKIPARSE_LONG_I= 8 ; if(!qbevent)break;evnt(25753,328,"wiki_methods.bas");}while(r); }else{ do{ *_SUB_WIKIPARSE_LONG_I= 7 ; if(!qbevent)break;evnt(25753,328,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_LOCKWRAP= 1 ; if(!qbevent)break;evnt(25753,329,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_new_txt_len(" ",1),_SUB_WIKIPARSE_STRING_D),_SUB_WIKIPARSE_LONG_I,&(pass6330= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,329,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,329,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKWRAP= 0 ; if(!qbevent)break;evnt(25753,329,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\304\304\301",3),func_string(*_SUB_WIKIPARSE_LONG_II+ 2 ,(qbs_new_txt_len("\304",1)->chr[0]))),qbs_new_txt_len("\301",1)),func_string(*__LONG_HELP_WW-*_SUB_WIKIPARSE_LONG_II- 6 ,(qbs_new_txt_len("\304",1)->chr[0]))),&(pass6331= 14 ),&(pass6332= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,330,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,330,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_PREFETCH= 20 ; if(!qbevent)break;evnt(25753,333,"wiki_methods.bas");}while(r); do{ if (_SUB_WIKIPARSE_ARRAY_STRING_C[2]&2){ error(10); }else{ if (_SUB_WIKIPARSE_ARRAY_STRING_C[2]&1){ if (!error_occurred) error(10); }else{ _SUB_WIKIPARSE_ARRAY_STRING_C[4]= 0 ; _SUB_WIKIPARSE_ARRAY_STRING_C[5]=(*_SUB_WIKIPARSE_LONG_PREFETCH)-_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(25753,334,"wiki_methods.bas");}while(r); S_57455:; fornext_value6334= 1 ; fornext_finalvalue6334=*_SUB_WIKIPARSE_LONG_PREFETCH; fornext_step6334= 1 ; if (fornext_step6334<0) fornext_step_negative6334=1; else fornext_step_negative6334=0; if (new_error) goto fornext_error6334; goto fornext_entrylabel6334; while(1){ fornext_value6334=fornext_step6334+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6334: *_SUB_WIKIPARSE_LONG_II=fornext_value6334; if (fornext_step_negative6334){ if (fornext_value6334fornext_finalvalue6334) break; } fornext_error6334:; if(qbevent){evnt(25753,335,"wiki_methods.bas");if(r)goto S_57455;} 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)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,336,"wiki_methods.bas");}while(r); fornext_continue_6333:; } fornext_exit_6333:; do{ *_SUB_WIKIPARSE_LONG_N=_SUB_WIKIPARSE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,340,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I= 1 ; if(!qbevent)break;evnt(25753,341,"wiki_methods.bas");}while(r); S_57460:; while((-(*_SUB_WIKIPARSE_LONG_I<=*_SUB_WIKIPARSE_LONG_N))||new_error){ if(qbevent){evnt(25753,342,"wiki_methods.bas");if(r)goto S_57460;} 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(25753,345,"wiki_methods.bas");}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(25753,345,"wiki_methods.bas");}while(r); S_57463:; fornext_value6338= 1 ; fornext_finalvalue6338=*_SUB_WIKIPARSE_LONG_PREFETCH; fornext_step6338= 1 ; if (fornext_step6338<0) fornext_step_negative6338=1; else fornext_step_negative6338=0; if (new_error) goto fornext_error6338; goto fornext_entrylabel6338; while(1){ fornext_value6338=fornext_step6338+(*_SUB_WIKIPARSE_LONG_I1); fornext_entrylabel6338: *_SUB_WIKIPARSE_LONG_I1=fornext_value6338; if (fornext_step_negative6338){ if (fornext_value6338fornext_finalvalue6338) break; } fornext_error6338:; if(qbevent){evnt(25753,346,"wiki_methods.bas");if(r)goto S_57463;} do{ *_SUB_WIKIPARSE_LONG_II=*_SUB_WIKIPARSE_LONG_I; if(!qbevent)break;evnt(25753,347,"wiki_methods.bas");}while(r); S_57465:; fornext_value6340= 1 ; fornext_finalvalue6340=*_SUB_WIKIPARSE_LONG_I1; fornext_step6340= 1 ; if (fornext_step6340<0) fornext_step_negative6340=1; else fornext_step_negative6340=0; if (new_error) goto fornext_error6340; goto fornext_entrylabel6340; while(1){ fornext_value6340=fornext_step6340+(*_SUB_WIKIPARSE_LONG_I2); fornext_entrylabel6340: *_SUB_WIKIPARSE_LONG_I2=fornext_value6340; if (fornext_step_negative6340){ if (fornext_value6340fornext_finalvalue6340) break; } fornext_error6340:; if(qbevent){evnt(25753,348,"wiki_methods.bas");if(r)goto S_57465;} S_57466:; if ((-(*_SUB_WIKIPARSE_LONG_II<=*_SUB_WIKIPARSE_LONG_N))||new_error){ if(qbevent){evnt(25753,349,"wiki_methods.bas");if(r)goto S_57466;} 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(25753,350,"wiki_methods.bas");}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(25753,352,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_II=*_SUB_WIKIPARSE_LONG_II+ 1 ; if(!qbevent)break;evnt(25753,354,"wiki_methods.bas");}while(r); fornext_continue_6339:; } fornext_exit_6339:; fornext_continue_6337:; } fornext_exit_6337:; do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_add(qbs_new_txt_len("__NOEDITSECTION__",17),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,359,"wiki_methods.bas");}while(r); S_57475:; 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(25753,359,"wiki_methods.bas");if(r)goto S_57475;} 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(25753,359,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,359,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("__NOEDITSECTION__",17)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,360,"wiki_methods.bas");}while(r); S_57480:; 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(25753,360,"wiki_methods.bas");if(r)goto S_57480;} 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(25753,360,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,360,"wiki_methods.bas");}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(25753,361,"wiki_methods.bas");}while(r); S_57485:; 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(25753,361,"wiki_methods.bas");if(r)goto S_57485;} 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(25753,361,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,361,"wiki_methods.bas");}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(25753,362,"wiki_methods.bas");}while(r); S_57490:; 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(25753,362,"wiki_methods.bas");if(r)goto S_57490;} 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(25753,362,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,362,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,363,"wiki_methods.bas");}while(r); S_57495:; 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(25753,363,"wiki_methods.bas");if(r)goto S_57495;} 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(25753,363,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,363,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,364,"wiki_methods.bas");}while(r); S_57500:; 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(25753,364,"wiki_methods.bas");if(r)goto S_57500;} 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(25753,364,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,364,"wiki_methods.bas");}while(r); } S_57504:; if ((-(*__LONG_HELP_LOCKPARSE<= 0 ))||new_error){ if(qbevent){evnt(25753,368,"wiki_methods.bas");if(r)goto S_57504;} do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,369,"wiki_methods.bas");}while(r); S_57506:; 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(25753,369,"wiki_methods.bas");if(r)goto S_57506;} do{ SUB_HELP_ADDTXT(qbs_new_txt_len("^",1),_SUB_WIKIPARSE_LONG_COL,&(pass6354= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,369,"wiki_methods.bas");}while(r); 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(25753,369,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,369,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,370,"wiki_methods.bas");}while(r); S_57512:; 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(25753,370,"wiki_methods.bas");if(r)goto S_57512;} 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(25753,370,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,370,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("
",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,372,"wiki_methods.bas");}while(r); S_57517:; 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(25753,373,"wiki_methods.bas");if(r)goto S_57517;} 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(25753,374,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_WLA,FUNC_WIKILOOKAHEAD(_SUB_WIKIPARSE_STRING_A,&(pass6360=*_SUB_WIKIPARSE_LONG_I+ 1 ),qbs_new_txt_len("
",9))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,375,"wiki_methods.bas");}while(r); S_57520:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("#toc",4),0)> 0 ))|(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("#top",4),0)> 0 ))|(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("to Top",6),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,376,"wiki_methods.bas");if(r)goto S_57520;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_WLA->len+ 9 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,377,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_CENTER= 1 ; if(!qbevent)break;evnt(25753,379,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,FUNC_WIKIBUILDCINDENT(_SUB_WIKIPARSE_STRING_WLA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,379,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_space(qbs_asc(__STRING_HELP_CINDENT, 1 )),_SUB_WIKIPARSE_LONG_COL,&(pass6362= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,380,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,func_mid(__STRING_HELP_CINDENT, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,381,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,383,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,385,"wiki_methods.bas");}while(r); S_57531:; 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(25753,386,"wiki_methods.bas");if(r)goto S_57531;} 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(25753,387,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CENTER= 0 ; if(!qbevent)break;evnt(25753,388,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,389,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,390,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("

len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(25753,393,"wiki_methods.bas");if(r)goto S_57538;} 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(25753,394,"wiki_methods.bas");}while(r); S_57540:; fornext_value6368=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue6368=_SUB_WIKIPARSE_STRING_A->len- 1 ; fornext_step6368= 1 ; if (fornext_step6368<0) fornext_step_negative6368=1; else fornext_step_negative6368=0; if (new_error) goto fornext_error6368; goto fornext_entrylabel6368; while(1){ fornext_value6368=fornext_step6368+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6368: *_SUB_WIKIPARSE_LONG_II=fornext_value6368; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6368){ if (fornext_value6368fornext_finalvalue6368) break; } fornext_error6368:; if(qbevent){evnt(25753,395,"wiki_methods.bas");if(r)goto S_57540;} S_57541:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 1 ,1),qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(25753,396,"wiki_methods.bas");if(r)goto S_57541;} do{ qbs_set(_SUB_WIKIPARSE_STRING_WLA,FUNC_WIKILOOKAHEAD(_SUB_WIKIPARSE_STRING_A,&(pass6370=*_SUB_WIKIPARSE_LONG_II+ 1 ),qbs_new_txt_len("

",4))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,397,"wiki_methods.bas");}while(r); S_57543:; if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("#toc",4),0)> 0 ))|(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("#top",4),0)> 0 ))|(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("to Top",6),0)> 0 ))))||new_error){ if(qbevent){evnt(25753,398,"wiki_methods.bas");if(r)goto S_57543;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+_SUB_WIKIPARSE_STRING_WLA->len+ 4 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,399,"wiki_methods.bas");}while(r); S_57545:; }else{ if (qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I,*_SUB_WIKIPARSE_LONG_II-*_SUB_WIKIPARSE_LONG_I,1),qbs_new_txt_len("center",6),0)> 0 ))){ if(qbevent){evnt(25753,400,"wiki_methods.bas");if(r)goto S_57545;} do{ *__LONG_HELP_CENTER= 1 ; if(!qbevent)break;evnt(25753,401,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,FUNC_WIKIBUILDCINDENT(_SUB_WIKIPARSE_STRING_WLA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,401,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_space(qbs_asc(__STRING_HELP_CINDENT, 1 )),_SUB_WIKIPARSE_LONG_COL,&(pass6372= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,402,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,func_mid(__STRING_HELP_CINDENT, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,403,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II; if(!qbevent)break;evnt(25753,404,"wiki_methods.bas");}while(r); } } do{ goto fornext_exit_6367; if(!qbevent)break;evnt(25753,406,"wiki_methods.bas");}while(r); } fornext_continue_6367:; } fornext_exit_6367:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,409,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("

",4)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,411,"wiki_methods.bas");}while(r); S_57558:; 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(25753,412,"wiki_methods.bas");if(r)goto S_57558;} 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(25753,413,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CENTER= 0 ; if(!qbevent)break;evnt(25753,414,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,415,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,416,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(25753,419,"wiki_methods.bas");if(r)goto S_57565;} 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(25753,420,"wiki_methods.bas");}while(r); S_57567:; fornext_value6378=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue6378=_SUB_WIKIPARSE_STRING_A->len- 1 ; fornext_step6378= 1 ; if (fornext_step6378<0) fornext_step_negative6378=1; else fornext_step_negative6378=0; if (new_error) goto fornext_error6378; goto fornext_entrylabel6378; while(1){ fornext_value6378=fornext_step6378+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6378: *_SUB_WIKIPARSE_LONG_II=fornext_value6378; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6378){ if (fornext_value6378fornext_finalvalue6378) break; } fornext_error6378:; if(qbevent){evnt(25753,421,"wiki_methods.bas");if(r)goto S_57567;} S_57568:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 1 ,1),qbs_new_txt_len(">",1))))||new_error){ if(qbevent){evnt(25753,422,"wiki_methods.bas");if(r)goto S_57568;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II; if(!qbevent)break;evnt(25753,422,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6377; if(!qbevent)break;evnt(25753,422,"wiki_methods.bas");}while(r); } fornext_continue_6377:; } fornext_exit_6377:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,424,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,426,"wiki_methods.bas");}while(r); S_57576:; 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(25753,427,"wiki_methods.bas");if(r)goto S_57576;} 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(25753,428,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,429,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("len)-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),_SUB_WIKIPARSE_STRING_S)))||new_error){ if(qbevent){evnt(25753,433,"wiki_methods.bas");if(r)goto S_57581;} 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(25753,434,"wiki_methods.bas");}while(r); S_57583:; fornext_value6385=*_SUB_WIKIPARSE_LONG_I; fornext_finalvalue6385=_SUB_WIKIPARSE_STRING_A->len- 1 ; fornext_step6385= 1 ; if (fornext_step6385<0) fornext_step_negative6385=1; else fornext_step_negative6385=0; if (new_error) goto fornext_error6385; goto fornext_entrylabel6385; while(1){ fornext_value6385=fornext_step6385+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6385: *_SUB_WIKIPARSE_LONG_II=fornext_value6385; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6385){ if (fornext_value6385fornext_finalvalue6385) break; } fornext_error6385:; if(qbevent){evnt(25753,435,"wiki_methods.bas");if(r)goto S_57583;} S_57584:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_II, 6 ,1),qbs_new_txt_len("",6))))||new_error){ if(qbevent){evnt(25753,436,"wiki_methods.bas");if(r)goto S_57584;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+ 5 ; if(!qbevent)break;evnt(25753,436,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6384; if(!qbevent)break;evnt(25753,436,"wiki_methods.bas");}while(r); } fornext_continue_6384:; } fornext_exit_6384:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,438,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_S,qbs_new_txt_len("",3))))||new_error){ if(qbevent){evnt(25753,444,"wiki_methods.bas");if(r)goto S_57595;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_II+ 2 ; if(!qbevent)break;evnt(25753,444,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6389; if(!qbevent)break;evnt(25753,444,"wiki_methods.bas");}while(r); } fornext_continue_6389:; } fornext_exit_6389:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,446,"wiki_methods.bas");}while(r); } } S_57603:; if ((-(*__LONG_HELP_LOCKPARSE<= 0 ))||new_error){ if(qbevent){evnt(25753,452,"wiki_methods.bas");if(r)goto S_57603;} S_57604:; 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(25753,454,"wiki_methods.bas");if(r)goto S_57604;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,455,"wiki_methods.bas");}while(r); S_57606:; if ((-(*__LONG_HELP_BOLD== 0 ))||new_error){ if(qbevent){evnt(25753,456,"wiki_methods.bas");if(r)goto S_57606;} do{ *__LONG_HELP_BOLD= 1 ; if(!qbevent)break;evnt(25753,456,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,456,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,457,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,458,"wiki_methods.bas");}while(r); } S_57614:; 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(25753,461,"wiki_methods.bas");if(r)goto S_57614;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,462,"wiki_methods.bas");}while(r); S_57616:; if ((-(*__LONG_HELP_ITALIC== 0 ))||new_error){ if(qbevent){evnt(25753,463,"wiki_methods.bas");if(r)goto S_57616;} do{ *__LONG_HELP_ITALIC= 1 ; if(!qbevent)break;evnt(25753,463,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,463,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,464,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,465,"wiki_methods.bas");}while(r); } } S_57625:; if ((-(*__LONG_HELP_LOCKPARSE<= 0 ))||new_error){ if(qbevent){evnt(25753,471,"wiki_methods.bas");if(r)goto S_57625;} S_57626:; 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("[http",5)))&(-(*_SUB_WIKIPARSE_LONG_ELINK== 0 ))))||new_error){ if(qbevent){evnt(25753,473,"wiki_methods.bas");if(r)goto S_57626;} do{ *_SUB_WIKIPARSE_LONG_ELINK= 1 ; if(!qbevent)break;evnt(25753,474,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_ELINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,475,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,476,"wiki_methods.bas");}while(r); } S_57631:; if ((-(*_SUB_WIKIPARSE_LONG_ELINK== 1 ))||new_error){ if(qbevent){evnt(25753,478,"wiki_methods.bas");if(r)goto S_57631;} S_57632:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(25753,479,"wiki_methods.bas");if(r)goto S_57632;} do{ *_SUB_WIKIPARSE_LONG_ELINK= 0 ; if(!qbevent)break;evnt(25753,480,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_ETEXT,_SUB_WIKIPARSE_STRING_ELINK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,481,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I2=func_instr(NULL,_SUB_WIKIPARSE_STRING_ELINK,qbs_new_txt_len(" ",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,482,"wiki_methods.bas");}while(r); S_57636:; if ((-(*_SUB_WIKIPARSE_LONG_I2> 0 ))||new_error){ if(qbevent){evnt(25753,483,"wiki_methods.bas");if(r)goto S_57636;} do{ qbs_set(_SUB_WIKIPARSE_STRING_ETEXT,qbs_right(_SUB_WIKIPARSE_STRING_ELINK,_SUB_WIKIPARSE_STRING_ELINK->len-*_SUB_WIKIPARSE_LONG_I2)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,484,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_ELINK,qbs_left(_SUB_WIKIPARSE_STRING_ELINK,*_SUB_WIKIPARSE_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,485,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_LINKN=*__LONG_HELP_LINKN+ 1 ; if(!qbevent)break;evnt(25753,488,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINK,qbs_add(qbs_add(qbs_add(__STRING_HELP_LINK,qbs_new_txt_len("EXTL:",5)),_SUB_WIKIPARSE_STRING_ELINK),__STRING_HELP_LINK_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,489,"wiki_methods.bas");}while(r); S_57642:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,491,"wiki_methods.bas");if(r)goto S_57642;} do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_ETEXT,__LONG_HELP_COL_LINK,__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,492,"wiki_methods.bas");}while(r); }else{ do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_ETEXT,__LONG_HELP_COL_ITALIC,__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,494,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,496,"wiki_methods.bas");}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(25753,498,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,499,"wiki_methods.bas");}while(r); } S_57652:; 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(25753,502,"wiki_methods.bas");if(r)goto S_57652;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,503,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 1 ; if(!qbevent)break;evnt(25753,504,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,505,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,506,"wiki_methods.bas");}while(r); } } S_57659:; if ((-(*_SUB_WIKIPARSE_LONG_LINK== 1 ))||new_error){ if(qbevent){evnt(25753,511,"wiki_methods.bas");if(r)goto S_57659;} S_57660:; 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(25753,512,"wiki_methods.bas");if(r)goto S_57660;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,513,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 0 ; if(!qbevent)break;evnt(25753,514,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_TEXT,_SUB_WIKIPARSE_STRING_LINK); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,515,"wiki_methods.bas");}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(25753,516,"wiki_methods.bas");}while(r); S_57665:; if ((-(*_SUB_WIKIPARSE_LONG_I2> 0 ))||new_error){ if(qbevent){evnt(25753,517,"wiki_methods.bas");if(r)goto S_57665;} 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(25753,518,"wiki_methods.bas");}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(25753,519,"wiki_methods.bas");}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(25753,521,"wiki_methods.bas");}while(r); S_57670:; if ((-(*_SUB_WIKIPARSE_LONG_I2> 0 ))||new_error){ if(qbevent){evnt(25753,522,"wiki_methods.bas");if(r)goto S_57670;} 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(25753,523,"wiki_methods.bas");}while(r); S_57672:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,524,"wiki_methods.bas");if(r)goto S_57672;} S_57673:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_WIKIPARSE_STRING_TEXT, 1 ),qbs_new_txt_len("#",1))))||new_error){ if(qbevent){evnt(25753,525,"wiki_methods.bas");if(r)goto S_57673;} do{ qbs_set(_SUB_WIKIPARSE_STRING_TEXT,func_mid(_SUB_WIKIPARSE_STRING_TEXT, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,525,"wiki_methods.bas");}while(r); } do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_TEXT,&(pass6394= 8 ),&(pass6395= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,526,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,527,"wiki_methods.bas");}while(r); } } S_57680:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_WIKIPARSE_STRING_LINK, 9 ),qbs_new_txt_len("Category:",9))))||new_error){ if(qbevent){evnt(25753,530,"wiki_methods.bas");if(r)goto S_57680;} do{ SUB_HELP_CHECKREMOVEBLANKLINE(); if(!qbevent)break;evnt(25753,531,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,532,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_LINKN=*__LONG_HELP_LINKN+ 1 ; if(!qbevent)break;evnt(25753,535,"wiki_methods.bas");}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(25753,536,"wiki_methods.bas");}while(r); S_57686:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,538,"wiki_methods.bas");if(r)goto S_57686;} 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(25753,539,"wiki_methods.bas");}while(r); }else{ do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_TEXT,__LONG_HELP_COL_ITALIC,__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,541,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,543,"wiki_methods.bas");}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(25753,545,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,546,"wiki_methods.bas");}while(r); } S_57696:; if ((-(*__LONG_HELP_LOCKPARSE<= 0 ))||new_error){ if(qbevent){evnt(25753,551,"wiki_methods.bas");if(r)goto S_57696;} S_57697:; 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(25753,553,"wiki_methods.bas");if(r)goto S_57697;} do{ qbs_set(_SUB_WIKIPARSE_STRING_WLA,FUNC_WIKILOOKAHEAD(_SUB_WIKIPARSE_STRING_A,&(pass6396=*_SUB_WIKIPARSE_LONG_I+ 2 ),qbs_new_txt_len("|}",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,554,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_III= 0 ; if(!qbevent)break;evnt(25753,554,"wiki_methods.bas");}while(r); S_57700:; fornext_value6398= 1 ; fornext_finalvalue6398=_SUB_WIKIPARSE_STRING_WLA->len; fornext_step6398= 1 ; if (fornext_step6398<0) fornext_step_negative6398=1; else fornext_step_negative6398=0; if (new_error) goto fornext_error6398; goto fornext_entrylabel6398; while(1){ fornext_value6398=fornext_step6398+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6398: *_SUB_WIKIPARSE_LONG_II=fornext_value6398; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6398){ if (fornext_value6398fornext_finalvalue6398) break; } fornext_error6398:; if(qbevent){evnt(25753,555,"wiki_methods.bas");if(r)goto S_57700;} S_57701:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_WIKIPARSE_STRING_WLA,*_SUB_WIKIPARSE_LONG_II, 1 ,1),qbs_new_txt_len("|",1)))&(qbs_notequal(func_mid(_SUB_WIKIPARSE_STRING_WLA,*_SUB_WIKIPARSE_LONG_II, 2 ,1),qbs_new_txt_len("|-",2)))))||new_error){ if(qbevent){evnt(25753,556,"wiki_methods.bas");if(r)goto S_57701;} do{ *_SUB_WIKIPARSE_LONG_III=*_SUB_WIKIPARSE_LONG_III+ 1 ; if(!qbevent)break;evnt(25753,556,"wiki_methods.bas");}while(r); } fornext_continue_6397:; } fornext_exit_6397:; do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 +_SUB_WIKIPARSE_STRING_WLA->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,558,"wiki_methods.bas");}while(r); S_57706:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_WIKIPARSE_LONG_III> 1 ))|(-(func_instr(NULL,_SUB_WIKIPARSE_STRING_WLA,qbs_new_txt_len("__TOC__",7),0)== 0 ))))||new_error){ if(qbevent){evnt(25753,559,"wiki_methods.bas");if(r)goto S_57706;} S_57707:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,560,"wiki_methods.bas");if(r)goto S_57707;} do{ *__LONG_HELP_LINKN=*__LONG_HELP_LINKN+ 1 ; if(!qbevent)break;evnt(25753,561,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINK,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_HELP_LINK,qbs_new_txt_len("EXTL:",5)),__STRING_WIKIBASEADDRESS),qbs_new_txt_len("/index.php?title=",17)),__STRING_HELP_PAGELOADED),__STRING_HELP_LINK_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,562,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\311\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\273",40)),&(pass6401= 8 ),&(pass6402= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,563,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,563,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\272",1)),&(pass6403= 8 ),&(pass6404= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,564,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" The original page has a table here, ",38),&(pass6405= 15 ),__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,564,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\272",1),&(pass6406= 8 ),&(pass6407= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,564,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,564,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\272",1)),&(pass6408= 8 ),&(pass6409= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,565,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" please click inside this box to load ",38),&(pass6410= 15 ),__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,565,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\272",1),&(pass6411= 8 ),&(pass6412= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,565,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,565,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\272",1)),&(pass6413= 8 ),&(pass6414= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,566,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" the page into your standard browser. ",38),&(pass6415= 15 ),__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,566,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\272",1),&(pass6416= 8 ),&(pass6417= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,566,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,566,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\310\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\274",40)),&(pass6418= 8 ),&(pass6419= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,567,"wiki_methods.bas");}while(r); } } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,570,"wiki_methods.bas");}while(r); } } S_57730:; 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("{{Cb|",5)))|(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)))|(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(25753,576,"wiki_methods.bas");if(r)goto S_57730;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 4 ; if(!qbevent)break;evnt(25753,577,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LINK= 1 ; if(!qbevent)break;evnt(25753,578,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_LINK,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,579,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,580,"wiki_methods.bas");}while(r); } S_57736:; 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(25753,582,"wiki_methods.bas");if(r)goto S_57736;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,583,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_CB= 1 ; if(!qbevent)break;evnt(25753,584,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,585,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,586,"wiki_methods.bas");}while(r); } S_57742:; if ((-(*_SUB_WIKIPARSE_LONG_CB> 0 ))||new_error){ if(qbevent){evnt(25753,588,"wiki_methods.bas");if(r)goto S_57742;} S_57743:; 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(25753,589,"wiki_methods.bas");if(r)goto S_57743;} S_57744:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("|",1)))&(-(*_SUB_WIKIPARSE_LONG_CB== 2 ))))||new_error){ if(qbevent){evnt(25753,590,"wiki_methods.bas");if(r)goto S_57744;} do{ qbs_set(_SUB_WIKIPARSE_STRING_WLA,FUNC_WIKILOOKAHEAD(_SUB_WIKIPARSE_STRING_A,&(pass6420=*_SUB_WIKIPARSE_LONG_I+ 1 ),qbs_new_txt_len("}}",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,591,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_CB= 0 ; if(!qbevent)break;evnt(25753,592,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+_SUB_WIKIPARSE_STRING_WLA->len+ 2 ; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,592,"wiki_methods.bas");}while(r); S_57748:; }else{ 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)))){ if(qbevent){evnt(25753,593,"wiki_methods.bas");if(r)goto S_57748;} S_57749:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("Parameter",9))))||new_error){ if(qbevent){evnt(25753,594,"wiki_methods.bas");if(r)goto S_57749;} do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,595,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,595,"wiki_methods.bas");}while(r); S_57752:; }else{ if (qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(qbs_left(_SUB_WIKIPARSE_STRING_CB, 5 )),qbs_new_txt_len("small",5)))){ if(qbevent){evnt(25753,596,"wiki_methods.bas");if(r)goto S_57752;} S_57753:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_WIKIPARSE_STRING_CB, 6 )== 196 )))||new_error){ if(qbevent){evnt(25753,597,"wiki_methods.bas");if(r)goto S_57753;} do{ SUB_HELP_ADDTXT(qbs_add(qbs_new_txt_len(" ",1),func_string(*__LONG_HELP_WW-*__LONG_HELP_POS, 196 )),&(pass6422= 15 ),&(pass6423= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,598,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,599,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,599,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_CENTER= 0 ; if(!qbevent)break;evnt(25753,601,"wiki_methods.bas");}while(r); } do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,603,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,603,"wiki_methods.bas");}while(r); } } do{ *_SUB_WIKIPARSE_LONG_CB= 0 ; if(!qbevent)break;evnt(25753,605,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,605,"wiki_methods.bas");}while(r); } } S_57766:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("|",1)))&(-(*_SUB_WIKIPARSE_LONG_CB== 1 ))))||new_error){ if(qbevent){evnt(25753,607,"wiki_methods.bas");if(r)goto S_57766;} do{ *_SUB_WIKIPARSE_LONG_CB= 2 ; if(!qbevent)break;evnt(25753,607,"wiki_methods.bas");}while(r); } S_57769:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,609,"wiki_methods.bas");if(r)goto S_57769;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,610,"wiki_methods.bas");}while(r); S_57771:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageSyntax",10))))||new_error){ if(qbevent){evnt(25753,613,"wiki_methods.bas");if(r)goto S_57771;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Syntax:",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,613,"wiki_methods.bas");}while(r); } S_57774:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageParameters",14)))|(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("Parameters",10)))))||new_error){ if(qbevent){evnt(25753,614,"wiki_methods.bas");if(r)goto S_57774;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Parameters:",11)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,614,"wiki_methods.bas");}while(r); } S_57777:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageDescription",15))))||new_error){ if(qbevent){evnt(25753,615,"wiki_methods.bas");if(r)goto S_57777;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Description:",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,615,"wiki_methods.bas");}while(r); } S_57780:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageNotes",9))))||new_error){ if(qbevent){evnt(25753,616,"wiki_methods.bas");if(r)goto S_57780;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Notes",5)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,616,"wiki_methods.bas");}while(r); } S_57783:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageErrors",10))))||new_error){ if(qbevent){evnt(25753,617,"wiki_methods.bas");if(r)goto S_57783;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Errors",6)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,617,"wiki_methods.bas");}while(r); } S_57786:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageAvailability",16))))||new_error){ if(qbevent){evnt(25753,618,"wiki_methods.bas");if(r)goto S_57786;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Availability:",13)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,618,"wiki_methods.bas");}while(r); } S_57789:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageExamples",12))))||new_error){ if(qbevent){evnt(25753,619,"wiki_methods.bas");if(r)goto S_57789;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Examples:",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,619,"wiki_methods.bas");}while(r); } S_57792:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageSeeAlso",11))))||new_error){ if(qbevent){evnt(25753,620,"wiki_methods.bas");if(r)goto S_57792;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("See also:",9)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,620,"wiki_methods.bas");}while(r); } S_57795:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("PageInternalError",17))))||new_error){ if(qbevent){evnt(25753,622,"wiki_methods.bas");if(r)goto S_57795;} do{ qbs_set(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("Sorry, an error occurred:",25)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,622,"wiki_methods.bas");}while(r); } S_57798:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_WIKIPARSE_STRING_CBO,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,624,"wiki_methods.bas");if(r)goto S_57798;} S_57799:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_WIKIPARSE_STRING_CBO, 1 ),qbs_new_txt_len(":",1))))||new_error){ if(qbevent){evnt(25753,625,"wiki_methods.bas");if(r)goto S_57799;} do{ *__LONG_HELP_UNDERLINE= 2 ; if(!qbevent)break;evnt(25753,625,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_UNDERLINE= 1 ; if(!qbevent)break;evnt(25753,625,"wiki_methods.bas");}while(r); } do{ SUB_HELP_ADDTXT(_SUB_WIKIPARSE_STRING_CBO,__LONG_HELP_COL_SECTION,&(pass6424= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,626,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_AH= 2 ; if(!qbevent)break;evnt(25753,626,"wiki_methods.bas");}while(r); } } S_57808:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("InlineCode",10)))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,631,"wiki_methods.bas");if(r)goto S_57808;} do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,632,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,632,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,632,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 1 ; if(!qbevent)break;evnt(25753,633,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 2 ; if(!qbevent)break;evnt(25753,633,"wiki_methods.bas");}while(r); } S_57815:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("InlineCodeEnd",13)))&(-(*__LONG_HELP_LOCKPARSE!= 0 ))))||new_error){ if(qbevent){evnt(25753,635,"wiki_methods.bas");if(r)goto S_57815;} do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,636,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 0 ; if(!qbevent)break;evnt(25753,636,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,637,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,637,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,637,"wiki_methods.bas");}while(r); } S_57822:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("CodeStart",9)))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,639,"wiki_methods.bas");if(r)goto S_57822;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,640,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,641,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,641,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,641,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 1 ; if(!qbevent)break;evnt(25753,642,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 2 ; if(!qbevent)break;evnt(25753,642,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(func_string(*__LONG_HELP_WW- 15 , 196 ),qbs_new_txt_len(" Code Block ",12)),func_string( 3 , 196 )),&(pass6425= 15 ),&(pass6426= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,643,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,643,"wiki_methods.bas");}while(r); S_57831:; 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_new_txt_len("}}",2),func_chr( 10 ))))))||new_error){ if(qbevent){evnt(25753,644,"wiki_methods.bas");if(r)goto S_57831;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,644,"wiki_methods.bas");}while(r); } } S_57835:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("CodeEnd",7)))&(-(*__LONG_HELP_LOCKPARSE!= 0 ))))||new_error){ if(qbevent){evnt(25753,646,"wiki_methods.bas");if(r)goto S_57835;} do{ SUB_HELP_CHECKFINISHLINE(); if(!qbevent)break;evnt(25753,647,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKREMOVEBLANKLINE(); if(!qbevent)break;evnt(25753,647,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string(*__LONG_HELP_WW, 196 ),&(pass6427= 15 ),&(pass6428= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,648,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,648,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,649,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 0 ; if(!qbevent)break;evnt(25753,649,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,650,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,650,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,650,"wiki_methods.bas");}while(r); } S_57846:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_SUB_WIKIPARSE_STRING_CB, 11 ),qbs_new_txt_len("OutputStart",11)))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,653,"wiki_methods.bas");if(r)goto S_57846;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,654,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,655,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,655,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,655,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 2 ; if(!qbevent)break;evnt(25753,656,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 1 ; if(!qbevent)break;evnt(25753,656,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(func_string(*__LONG_HELP_WW- 17 , 196 ),qbs_new_txt_len(" Output Block ",14)),func_string( 3 , 196 )),&(pass6429= 15 ),&(pass6430= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,657,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,657,"wiki_methods.bas");}while(r); S_57855:; 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_new_txt_len("}}",2),func_chr( 10 ))))))||new_error){ if(qbevent){evnt(25753,658,"wiki_methods.bas");if(r)goto S_57855;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,658,"wiki_methods.bas");}while(r); } } S_57859:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("OutputEnd",9)))&(-(*__LONG_HELP_LOCKPARSE!= 0 ))))||new_error){ if(qbevent){evnt(25753,660,"wiki_methods.bas");if(r)goto S_57859;} do{ SUB_HELP_CHECKFINISHLINE(); if(!qbevent)break;evnt(25753,661,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKREMOVEBLANKLINE(); if(!qbevent)break;evnt(25753,661,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string((*__LONG_HELP_WW- 54 )/ 2 , 196 ),&(pass6431= 15 ),&(pass6432= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,662,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" This block does not reflect the actual output colors ",54),&(pass6433= 15 ),&(pass6434= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,663,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string(*__LONG_HELP_WW-*__LONG_HELP_POS+ 1 , 196 ),&(pass6435= 15 ),&(pass6436= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,664,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,664,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,665,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 0 ; if(!qbevent)break;evnt(25753,665,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,666,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,666,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,666,"wiki_methods.bas");}while(r); } S_57872:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("TextStart",9)))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,669,"wiki_methods.bas");if(r)goto S_57872;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,670,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,671,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,671,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,671,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 6 ; if(!qbevent)break;evnt(25753,672,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= -1 ; if(!qbevent)break;evnt(25753,672,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(func_string(*__LONG_HELP_WW- 15 , 196 ),qbs_new_txt_len(" Text Block ",12)),func_string( 3 , 196 )),&(pass6437= 15 ),&(pass6438= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,673,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,673,"wiki_methods.bas");}while(r); S_57881:; 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_new_txt_len("}}",2),func_chr( 10 ))))))||new_error){ if(qbevent){evnt(25753,674,"wiki_methods.bas");if(r)goto S_57881;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,674,"wiki_methods.bas");}while(r); } } S_57885:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("TextEnd",7)))&(-(*__LONG_HELP_LOCKPARSE!= 0 ))))||new_error){ if(qbevent){evnt(25753,676,"wiki_methods.bas");if(r)goto S_57885;} do{ SUB_HELP_CHECKFINISHLINE(); if(!qbevent)break;evnt(25753,677,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKREMOVEBLANKLINE(); if(!qbevent)break;evnt(25753,677,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string(*__LONG_HELP_WW, 196 ),&(pass6439= 15 ),&(pass6440= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,678,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,678,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,679,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 0 ; if(!qbevent)break;evnt(25753,679,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,680,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,680,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,680,"wiki_methods.bas");}while(r); } S_57896:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("FixedStart",10)))|(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("WhiteStart",10)))))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,683,"wiki_methods.bas");if(r)goto S_57896;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,684,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,685,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,685,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,685,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 6 ; if(!qbevent)break;evnt(25753,686,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= -2 ; if(!qbevent)break;evnt(25753,686,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(func_string(*__LONG_HELP_WW- 16 , 196 ),qbs_new_txt_len(" Fixed Block ",13)),func_string( 3 , 196 )),&(pass6441= 15 ),&(pass6442= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,687,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,687,"wiki_methods.bas");}while(r); S_57905:; 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_new_txt_len("}}",2),func_chr( 10 ))))))||new_error){ if(qbevent){evnt(25753,688,"wiki_methods.bas");if(r)goto S_57905;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,688,"wiki_methods.bas");}while(r); } } S_57909:; if ((qbs_cleanup(qbs_tmp_base,(((qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("FixedEnd",8)))|(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("WhiteEnd",8)))))&(-(*__LONG_HELP_LOCKPARSE!= 0 ))))||new_error){ if(qbevent){evnt(25753,690,"wiki_methods.bas");if(r)goto S_57909;} do{ SUB_HELP_CHECKFINISHLINE(); if(!qbevent)break;evnt(25753,691,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKREMOVEBLANKLINE(); if(!qbevent)break;evnt(25753,691,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string(*__LONG_HELP_WW, 196 ),&(pass6443= 15 ),&(pass6444= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,692,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,692,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BG_COL= 0 ; if(!qbevent)break;evnt(25753,693,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_LOCKPARSE= 0 ; if(!qbevent)break;evnt(25753,693,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,694,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,694,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,694,"wiki_methods.bas");}while(r); } S_57920:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_SUB_WIKIPARSE_STRING_CB, 6 ),qbs_new_txt_len("Plugin",6)))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,698,"wiki_methods.bas");if(r)goto S_57920;} do{ qbs_set(_SUB_WIKIPARSE_STRING_PIT,FUNC_WIKI(qbs_add(qbs_new_txt_len("Template:",9),_SUB_WIKIPARSE_STRING_CB))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,699,"wiki_methods.bas");}while(r); S_57922:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_WIKIPARSE_STRING_PIT,qbs_new_txt_len("{{PageInternalError}}",21),0)== 0 )))||new_error){ if(qbevent){evnt(25753,700,"wiki_methods.bas");if(r)goto S_57922;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A,qbs_add(qbs_add(qbs_left(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I),_SUB_WIKIPARSE_STRING_PIT),qbs_right(_SUB_WIKIPARSE_STRING_A,_SUB_WIKIPARSE_STRING_A->len-*_SUB_WIKIPARSE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,701,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_N=*_SUB_WIKIPARSE_LONG_N+_SUB_WIKIPARSE_STRING_PIT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,702,"wiki_methods.bas");}while(r); } } S_57927:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_SUB_WIKIPARSE_STRING_CB, 5 ),qbs_new_txt_len("Table",5)))&(-(*__LONG_HELP_LOCKPARSE== 0 ))))||new_error){ if(qbevent){evnt(25753,707,"wiki_methods.bas");if(r)goto S_57927;} do{ qbs_set(_SUB_WIKIPARSE_STRING_PIT,FUNC_WIKI(qbs_add(qbs_add(qbs_new_txt_len("Template:",9),qbs_left(_SUB_WIKIPARSE_STRING_CB,_SUB_WIKIPARSE_STRING_CB->len- 5 )),qbs_new_txt_len("Plugin",6)))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,708,"wiki_methods.bas");}while(r); S_57929:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_WIKIPARSE_STRING_PIT,qbs_new_txt_len("{{PageInternalError}}",21),0)== 0 )))||new_error){ if(qbevent){evnt(25753,709,"wiki_methods.bas");if(r)goto S_57929;} do{ qbs_set(_SUB_WIKIPARSE_STRING_A,qbs_add(qbs_add(qbs_left(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I),_SUB_WIKIPARSE_STRING_PIT),qbs_right(_SUB_WIKIPARSE_STRING_A,_SUB_WIKIPARSE_STRING_A->len-*_SUB_WIKIPARSE_LONG_I))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,710,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_N=*_SUB_WIKIPARSE_LONG_N+_SUB_WIKIPARSE_STRING_PIT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,711,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_LINKN=*__LONG_HELP_LINKN+ 1 ; if(!qbevent)break;evnt(25753,713,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINK,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(__STRING_HELP_LINK,qbs_new_txt_len("EXTL:",5)),__STRING_WIKIBASEADDRESS),qbs_new_txt_len("/index.php?title=Template:",26)),_SUB_WIKIPARSE_STRING_CB),__STRING_HELP_LINK_SEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,714,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\311\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\273",40)),&(pass6450= 8 ),&(pass6451= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,715,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,715,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\272",1)),&(pass6452= 8 ),&(pass6453= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,716,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" The original page has a table here, ",38),&(pass6454= 15 ),__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,716,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\272",1),&(pass6455= 8 ),&(pass6456= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,716,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,716,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\272",1)),&(pass6457= 8 ),&(pass6458= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,717,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" please click inside this box to load ",38),&(pass6459= 15 ),__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,717,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\272",1),&(pass6460= 8 ),&(pass6461= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,717,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,717,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\272",1)),&(pass6462= 8 ),&(pass6463= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,718,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" the table into your standard browser.",38),&(pass6464= 15 ),__LONG_HELP_LINKN); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,718,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\272",1),&(pass6465= 8 ),&(pass6466= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,718,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,718,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_space((*__LONG_HELP_WW- 40 )/ 2 ),qbs_new_txt_len("\310\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\315\274",40)),&(pass6467= 8 ),&(pass6468= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,719,"wiki_methods.bas");}while(r); } } S_57952:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("|",1)))&(qbs_equal(_SUB_WIKIPARSE_STRING_CB,qbs_new_txt_len("Parameter",9)))&(-(*__LONG_HELP_LOCKPARSE<= 0 ))))||new_error){ if(qbevent){evnt(25753,724,"wiki_methods.bas");if(r)goto S_57952;} do{ *__LONG_HELP_ITALIC= 1 ; if(!qbevent)break;evnt(25753,725,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,725,"wiki_methods.bas");}while(r); } S_57956:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_lcase(_SUB_WIKIPARSE_STRING_CB),qbs_new_txt_len("small",5)))&(-(*__LONG_HELP_LOCKPARSE<= 0 ))))||new_error){ if(qbevent){evnt(25753,729,"wiki_methods.bas");if(r)goto S_57956;} do{ qbs_set(_SUB_WIKIPARSE_STRING_WLA,FUNC_WIKILOOKAHEAD(_SUB_WIKIPARSE_STRING_A,&(pass6469=*_SUB_WIKIPARSE_LONG_I+ 1 ),qbs_new_txt_len("}}",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,730,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_CINDENT,FUNC_WIKIBUILDCINDENT(_SUB_WIKIPARSE_STRING_WLA)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,731,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_III= 0 ; if(!qbevent)break;evnt(25753,731,"wiki_methods.bas");}while(r); S_57960:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_WIKIPARSE_LONG_I> 31 ))&(-((qbs_asc(__STRING_HELP_CINDENT, 1 ))>=(*__LONG_HELP_WW/ ((long double)( 4 )))))))||new_error){ if(qbevent){evnt(25753,732,"wiki_methods.bas");if(r)goto S_57960;} S_57961:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I- 30 , 30 ,1),qbs_new_txt_len("{{CodeEnd}}",11),0)> 0 )))||new_error){ if(qbevent){evnt(25753,733,"wiki_methods.bas");if(r)goto S_57961;} do{ *_SUB_WIKIPARSE_LONG_III= -1 ; if(!qbevent)break;evnt(25753,733,"wiki_methods.bas");}while(r); } S_57964:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I- 30 , 30 ,1),qbs_new_txt_len("{{TextEnd}}",11),0)> 0 )))||new_error){ if(qbevent){evnt(25753,734,"wiki_methods.bas");if(r)goto S_57964;} do{ *_SUB_WIKIPARSE_LONG_III= -6 ; if(!qbevent)break;evnt(25753,734,"wiki_methods.bas");}while(r); } S_57967:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I- 31 , 31 ,1),qbs_new_txt_len("{{FixedEnd}}",12),0)> 0 )))||new_error){ if(qbevent){evnt(25753,735,"wiki_methods.bas");if(r)goto S_57967;} do{ *_SUB_WIKIPARSE_LONG_III= -6 ; if(!qbevent)break;evnt(25753,735,"wiki_methods.bas");}while(r); } S_57970:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func_mid(_SUB_WIKIPARSE_STRING_A,*_SUB_WIKIPARSE_LONG_I- 31 , 31 ,1),qbs_new_txt_len("{{WhiteEnd}}",12),0)> 0 )))||new_error){ if(qbevent){evnt(25753,736,"wiki_methods.bas");if(r)goto S_57970;} do{ *_SUB_WIKIPARSE_LONG_III= -6 ; if(!qbevent)break;evnt(25753,736,"wiki_methods.bas");}while(r); } } S_57974:; if ((-(*_SUB_WIKIPARSE_LONG_III!= 0 ))||new_error){ if(qbevent){evnt(25753,738,"wiki_methods.bas");if(r)goto S_57974;} S_57975:; fornext_value6471=*__LONG_HELP_TXT_LEN- 3 ; fornext_finalvalue6471= 1 ; fornext_step6471= -4 ; if (fornext_step6471<0) fornext_step_negative6471=1; else fornext_step_negative6471=0; if (new_error) goto fornext_error6471; goto fornext_entrylabel6471; while(1){ fornext_value6471=fornext_step6471+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6471: *_SUB_WIKIPARSE_LONG_II=fornext_value6471; if (fornext_step_negative6471){ if (fornext_value6471fornext_finalvalue6471) break; } fornext_error6471:; if(qbevent){evnt(25753,739,"wiki_methods.bas");if(r)goto S_57975;} S_57976:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_II)== 32 ))&(-(*_SUB_WIKIPARSE_LONG_III< 0 ))))||new_error){ if(qbevent){evnt(25753,740,"wiki_methods.bas");if(r)goto S_57976;} do{ *__LONG_HELP_POS=*__LONG_HELP_POS- 1 ; if(!qbevent)break;evnt(25753,741,"wiki_methods.bas");}while(r); S_57978:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_II)== 13 ))&(-(*_SUB_WIKIPARSE_LONG_III< 0 )))){ if(qbevent){evnt(25753,742,"wiki_methods.bas");if(r)goto S_57978;} do{ *__LONG_HELP_H=*__LONG_HELP_H- 1 ; if(!qbevent)break;evnt(25753,743,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINE,qbs_left(__STRING_HELP_LINE,__STRING_HELP_LINE->len- 4 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,743,"wiki_methods.bas");}while(r); S_57981:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_II)== 196 ))&(-(*_SUB_WIKIPARSE_LONG_III< 0 )))){ if(qbevent){evnt(25753,744,"wiki_methods.bas");if(r)goto S_57981;} do{ *_SUB_WIKIPARSE_LONG_III=-(*_SUB_WIKIPARSE_LONG_III); if(!qbevent)break;evnt(25753,745,"wiki_methods.bas");}while(r); S_57983:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_HELP_TXT,*_SUB_WIKIPARSE_LONG_II)== 13 ))&(-(*_SUB_WIKIPARSE_LONG_III> 0 )))){ if(qbevent){evnt(25753,746,"wiki_methods.bas");if(r)goto S_57983;} do{ *__LONG_HELP_TXT_LEN=*_SUB_WIKIPARSE_LONG_II+ 3 ; if(!qbevent)break;evnt(25753,747,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6470; if(!qbevent)break;evnt(25753,747,"wiki_methods.bas");}while(r); } } } } fornext_continue_6470:; } fornext_exit_6470:; do{ *__LONG_HELP_BG_COL=*_SUB_WIKIPARSE_LONG_III; if(!qbevent)break;evnt(25753,750,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_CB,qbs_add(_SUB_WIKIPARSE_STRING_CB,func_chr( 196 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,750,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_add(func_string(qbs_asc(__STRING_HELP_CINDENT, 1 )- 1 , 196 ),qbs_new_txt_len(" ",1)),&(pass6473= 15 ),&(pass6474= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,751,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL= 15 ; if(!qbevent)break;evnt(25753,752,"wiki_methods.bas");}while(r); }else{ do{ *__LONG_HELP_CENTER= 1 ; if(!qbevent)break;evnt(25753,754,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_CB,qbs_add(_SUB_WIKIPARSE_STRING_CB,func_chr( 0 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,754,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_space(qbs_asc(__STRING_HELP_CINDENT, 1 )),_SUB_WIKIPARSE_LONG_COL,&(pass6475= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,755,"wiki_methods.bas");}while(r); } do{ qbs_set(__STRING_HELP_CINDENT,func_mid(__STRING_HELP_CINDENT, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,757,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,760,"wiki_methods.bas");}while(r); } S_58001:; if ((-(*_SUB_WIKIPARSE_LONG_CB== 1 ))||new_error){ if(qbevent){evnt(25753,763,"wiki_methods.bas");if(r)goto S_58001;} 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(25753,763,"wiki_methods.bas");}while(r); } S_58004:; if ((-(*_SUB_WIKIPARSE_LONG_CB== 2 ))||new_error){ if(qbevent){evnt(25753,764,"wiki_methods.bas");if(r)goto S_58004;} do{ SUB_HELP_ADDTXT(func_chr(*_SUB_WIKIPARSE_LONG_C),_SUB_WIKIPARSE_LONG_COL,&(pass6476= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,764,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,765,"wiki_methods.bas");}while(r); } S_58009:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,770,"wiki_methods.bas");if(r)goto S_58009;} do{ *_SUB_WIKIPARSE_LONG_II= 0 ; if(!qbevent)break;evnt(25753,772,"wiki_methods.bas");}while(r); S_58011:; 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)))&(-(*__LONG_HELP_HEADING== 3 ))))||new_error){ if(qbevent){evnt(25753,773,"wiki_methods.bas");if(r)goto S_58011;} do{ *_SUB_WIKIPARSE_LONG_II= 3 ; if(!qbevent)break;evnt(25753,773,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 0 ; if(!qbevent)break;evnt(25753,773,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_AH= 2 ; if(!qbevent)break;evnt(25753,773,"wiki_methods.bas");}while(r); } S_58016:; 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)))&(-(*__LONG_HELP_HEADING== 3 ))))||new_error){ if(qbevent){evnt(25753,774,"wiki_methods.bas");if(r)goto S_58016;} do{ *_SUB_WIKIPARSE_LONG_II= 2 ; if(!qbevent)break;evnt(25753,774,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 0 ; if(!qbevent)break;evnt(25753,774,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_AH= 2 ; if(!qbevent)break;evnt(25753,774,"wiki_methods.bas");}while(r); } S_58021:; 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)))&(-(*_SUB_WIKIPARSE_LONG_NL== 1 ))))||new_error){ if(qbevent){evnt(25753,775,"wiki_methods.bas");if(r)goto S_58021;} do{ *_SUB_WIKIPARSE_LONG_II= 2 ; if(!qbevent)break;evnt(25753,775,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,775,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 3 ; if(!qbevent)break;evnt(25753,775,"wiki_methods.bas");}while(r); } S_58026:; 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)))&(-(*_SUB_WIKIPARSE_LONG_NL== 1 ))))||new_error){ if(qbevent){evnt(25753,776,"wiki_methods.bas");if(r)goto S_58026;} do{ *_SUB_WIKIPARSE_LONG_II= 3 ; if(!qbevent)break;evnt(25753,776,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,776,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 3 ; if(!qbevent)break;evnt(25753,776,"wiki_methods.bas");}while(r); } S_58031:; if ((-(*_SUB_WIKIPARSE_LONG_II> 0 ))||new_error){ if(qbevent){evnt(25753,777,"wiki_methods.bas");if(r)goto S_58031;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+*_SUB_WIKIPARSE_LONG_II; if(!qbevent)break;evnt(25753,777,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,777,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_UNDERLINE= 1 ; if(!qbevent)break;evnt(25753,777,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,777,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_II= 0 ; if(!qbevent)break;evnt(25753,778,"wiki_methods.bas");}while(r); S_58038:; 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)))&(-(*__LONG_HELP_HEADING== 2 ))))||new_error){ if(qbevent){evnt(25753,779,"wiki_methods.bas");if(r)goto S_58038;} do{ *_SUB_WIKIPARSE_LONG_II= 2 ; if(!qbevent)break;evnt(25753,779,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 0 ; if(!qbevent)break;evnt(25753,779,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_AH= 2 ; if(!qbevent)break;evnt(25753,779,"wiki_methods.bas");}while(r); } S_58043:; 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)))&(-(*__LONG_HELP_HEADING== 2 ))))||new_error){ if(qbevent){evnt(25753,780,"wiki_methods.bas");if(r)goto S_58043;} do{ *_SUB_WIKIPARSE_LONG_II= 1 ; if(!qbevent)break;evnt(25753,780,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 0 ; if(!qbevent)break;evnt(25753,780,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_AH= 2 ; if(!qbevent)break;evnt(25753,780,"wiki_methods.bas");}while(r); } S_58048:; 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_NL== 1 ))))||new_error){ if(qbevent){evnt(25753,781,"wiki_methods.bas");if(r)goto S_58048;} do{ *_SUB_WIKIPARSE_LONG_II= 1 ; if(!qbevent)break;evnt(25753,781,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,781,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 2 ; if(!qbevent)break;evnt(25753,781,"wiki_methods.bas");}while(r); } S_58053:; 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)))&(-(*_SUB_WIKIPARSE_LONG_NL== 1 ))))||new_error){ if(qbevent){evnt(25753,782,"wiki_methods.bas");if(r)goto S_58053;} do{ *_SUB_WIKIPARSE_LONG_II= 2 ; if(!qbevent)break;evnt(25753,782,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,782,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_HEADING= 2 ; if(!qbevent)break;evnt(25753,782,"wiki_methods.bas");}while(r); } S_58058:; if ((-(*_SUB_WIKIPARSE_LONG_II> 0 ))||new_error){ if(qbevent){evnt(25753,783,"wiki_methods.bas");if(r)goto S_58058;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+*_SUB_WIKIPARSE_LONG_II; if(!qbevent)break;evnt(25753,783,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,783,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_UNDERLINE= 2 ; if(!qbevent)break;evnt(25753,783,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,783,"wiki_methods.bas");}while(r); } } S_58065:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,788,"wiki_methods.bas");if(r)goto S_58065;} S_58066:; 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)))&(-(*_SUB_WIKIPARSE_LONG_NL== 1 ))))||new_error){ if(qbevent){evnt(25753,790,"wiki_methods.bas");if(r)goto S_58066;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,791,"wiki_methods.bas");}while(r); do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,792,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string(*__LONG_HELP_WW, 196 ),&(pass6477= 8 ),&(pass6478= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,793,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CHKBLANK= 1 ; if(!qbevent)break;evnt(25753,794,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,795,"wiki_methods.bas");}while(r); } S_58073:; 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)))|(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("
",6)))))||new_error){ if(qbevent){evnt(25753,797,"wiki_methods.bas");if(r)goto S_58073;} S_58074:; 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(25753,798,"wiki_methods.bas");if(r)goto S_58074;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,798,"wiki_methods.bas");}while(r); } S_58077:; 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("
",6))))||new_error){ if(qbevent){evnt(25753,799,"wiki_methods.bas");if(r)goto S_58077;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 5 ; if(!qbevent)break;evnt(25753,799,"wiki_methods.bas");}while(r); } do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,800,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(func_string(*__LONG_HELP_WW, 196 ),&(pass6479= 8 ),&(pass6480= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,801,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CHKBLANK= 1 ; if(!qbevent)break;evnt(25753,802,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,803,"wiki_methods.bas");}while(r); } } S_58086:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,809,"wiki_methods.bas");if(r)goto S_58086;} S_58087:; 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(25753,811,"wiki_methods.bas");if(r)goto S_58087;} S_58088:; 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(25753,812,"wiki_methods.bas");if(r)goto S_58088;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,812,"wiki_methods.bas");}while(r); } S_58091:; if (((-(*_SUB_WIKIPARSE_LONG_AH== 0 ))&(-(*_SUB_WIKIPARSE_LONG_DL== 0 )))||new_error){ if(qbevent){evnt(25753,813,"wiki_methods.bas");if(r)goto S_58091;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,813,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_BOLD= 1 ; if(!qbevent)break;evnt(25753,814,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,814,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_DLIST= 1 ; if(!qbevent)break;evnt(25753,814,"wiki_methods.bas");}while(r); S_58097:; 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)))|(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(25753,815,"wiki_methods.bas");if(r)goto S_58097;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,815,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_DLIST= 3 ; if(!qbevent)break;evnt(25753,815,"wiki_methods.bas");}while(r); } S_58101:; 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(25753,816,"wiki_methods.bas");if(r)goto S_58101;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,816,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_DLIST= 2 ; if(!qbevent)break;evnt(25753,816,"wiki_methods.bas");}while(r); } S_58105:; if ((-(*_SUB_WIKIPARSE_LONG_DL< 3 ))||new_error){ if(qbevent){evnt(25753,817,"wiki_methods.bas");if(r)goto S_58105;} do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\336 ",2),&(pass6481= 11 ),&(pass6482= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,818,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_DL= 1 ; if(!qbevent)break;evnt(25753,818,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len("\336 ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,819,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,821,"wiki_methods.bas");}while(r); } S_58112:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len(":",1)))&(-(*__LONG_HELP_DLIST> 0 ))))||new_error){ if(qbevent){evnt(25753,823,"wiki_methods.bas");if(r)goto S_58112;} S_58113:; 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(25753,824,"wiki_methods.bas");if(r)goto S_58113;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,824,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,825,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,825,"wiki_methods.bas");}while(r); do{ SUB_HELP_NEWLINE(); if(!qbevent)break;evnt(25753,825,"wiki_methods.bas");}while(r); do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" ",1),&(pass6483= 11 ),&(pass6484= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,826,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_DL= 3 ; if(!qbevent)break;evnt(25753,826,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,827,"wiki_methods.bas");}while(r); S_58122:; if ((-(*__LONG_HELP_DLIST> 1 ))||new_error){ if(qbevent){evnt(25753,828,"wiki_methods.bas");if(r)goto S_58122;} do{ SUB_HELP_ADDTXT(qbs_add(func_chr( 4 ),qbs_new_txt_len(" ",1)),&(pass6485= 14 ),&(pass6486= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,829,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len(" ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,830,"wiki_methods.bas");}while(r); } do{ *__LONG_HELP_DLIST= 0 ; if(!qbevent)break;evnt(25753,832,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,833,"wiki_methods.bas");}while(r); } S_58129:; 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(25753,835,"wiki_methods.bas");if(r)goto S_58129;} S_58130:; 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(25753,836,"wiki_methods.bas");if(r)goto S_58130;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,836,"wiki_methods.bas");}while(r); } S_58133:; if (((-(*_SUB_WIKIPARSE_LONG_AH== 0 ))&(-(*_SUB_WIKIPARSE_LONG_DL== 0 )))||new_error){ if(qbevent){evnt(25753,837,"wiki_methods.bas");if(r)goto S_58133;} do{ SUB_HELP_CHECKBLANKLINE(); if(!qbevent)break;evnt(25753,837,"wiki_methods.bas");}while(r); } S_58136:; if ((-(*_SUB_WIKIPARSE_LONG_DL< 3 ))||new_error){ if(qbevent){evnt(25753,838,"wiki_methods.bas");if(r)goto S_58136;} do{ SUB_HELP_ADDTXT(qbs_new_txt_len("\336 ",2),&(pass6487= 11 ),&(pass6488= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,839,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_DL= 2 ; if(!qbevent)break;evnt(25753,839,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len("\336 ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,840,"wiki_methods.bas");}while(r); } S_58141:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )!= 58 ))&(-(qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )!= 59 ))))||new_error){ if(qbevent){evnt(25753,842,"wiki_methods.bas");if(r)goto S_58141;} do{ SUB_HELP_ADDTXT(qbs_new_txt_len(" ",1),&(pass6489= 11 ),&(pass6490= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,843,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_DL= 3 ; if(!qbevent)break;evnt(25753,843,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len(" ",1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,844,"wiki_methods.bas");}while(r); } do{ goto LABEL_CHARDONEKNL; if(!qbevent)break;evnt(25753,846,"wiki_methods.bas");}while(r); } } S_58149:; if ((-(*__LONG_HELP_LOCKPARSE== 0 ))||new_error){ if(qbevent){evnt(25753,852,"wiki_methods.bas");if(r)goto S_58149;} S_58150:; if ((-(*_SUB_WIKIPARSE_LONG_NL== 1 ))||new_error){ if(qbevent){evnt(25753,854,"wiki_methods.bas");if(r)goto S_58150;} S_58151:; 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(25753,855,"wiki_methods.bas");if(r)goto S_58151;} S_58152:; 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)))|(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(25753,856,"wiki_methods.bas");if(r)goto S_58152;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,856,"wiki_methods.bas");}while(r); }else{ do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,856,"wiki_methods.bas");}while(r); } do{ SUB_HELP_ADDTXT(qbs_add(qbs_add(qbs_new_txt_len(" ",3),func_chr( 4 )),qbs_new_txt_len(" ",1)),&(pass6491= 14 ),&(pass6492= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,857,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len(" ",5))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,858,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,859,"wiki_methods.bas");}while(r); } S_58161:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("*",1)))|(qbs_equal(_SUB_WIKIPARSE_STRING_C,qbs_new_txt_len("#",1)))))||new_error){ if(qbevent){evnt(25753,861,"wiki_methods.bas");if(r)goto S_58161;} S_58162:; 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(25753,862,"wiki_methods.bas");if(r)goto S_58162;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,862,"wiki_methods.bas");}while(r); } do{ SUB_HELP_ADDTXT(qbs_add(func_chr( 4 ),qbs_new_txt_len(" ",1)),&(pass6493= 14 ),&(pass6494= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,863,"wiki_methods.bas");}while(r); do{ qbs_set(__STRING_HELP_LINDENT,qbs_add(__STRING_HELP_LINDENT,qbs_new_txt_len(" ",2))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,864,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,865,"wiki_methods.bas");}while(r); } } } S_58171:; if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_WIKIPARSE_LONG_C& 224 )== 192 ))&(-((qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )& 192 )== 128 ))))||new_error){ if(qbevent){evnt(25753,871,"wiki_methods.bas");if(r)goto S_58171;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,872,"wiki_methods.bas");}while(r); S_58173:; fornext_value6496= 0 ; fornext_finalvalue6496=*__LONG_WPUTFREPLCNT; fornext_step6496= 1 ; if (fornext_step6496<0) fornext_step_negative6496=1; else fornext_step_negative6496=0; if (new_error) goto fornext_error6496; goto fornext_entrylabel6496; while(1){ fornext_value6496=fornext_step6496+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6496: *_SUB_WIKIPARSE_LONG_II=fornext_value6496; if (fornext_step_negative6496){ if (fornext_value6496fornext_finalvalue6496) break; } fornext_error6496:; if(qbevent){evnt(25753,873,"wiki_methods.bas");if(r)goto S_58173;} S_58174:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*_SUB_WIKIPARSE_LONG_II)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),(qbs_add(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),i2string( 8224 ))))))||new_error){ if(qbevent){evnt(25753,874,"wiki_methods.bas");if(r)goto S_58174;} do{ SUB_HELP_ADDTXT(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*_SUB_WIKIPARSE_LONG_II)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1)),_SUB_WIKIPARSE_LONG_COL,&(pass6497= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,875,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6495; if(!qbevent)break;evnt(25753,875,"wiki_methods.bas");}while(r); } fornext_continue_6495:; } fornext_exit_6495:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,878,"wiki_methods.bas");}while(r); } S_58181:; if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_WIKIPARSE_LONG_C& 240 )== 224 ))&(-((qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )& 192 )== 128 ))&(-((qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 3 )& 192 )== 128 ))))||new_error){ if(qbevent){evnt(25753,880,"wiki_methods.bas");if(r)goto S_58181;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,881,"wiki_methods.bas");}while(r); S_58183:; fornext_value6499= 0 ; fornext_finalvalue6499=*__LONG_WPUTFREPLCNT; fornext_step6499= 1 ; if (fornext_step6499<0) fornext_step_negative6499=1; else fornext_step_negative6499=0; if (new_error) goto fornext_error6499; goto fornext_entrylabel6499; while(1){ fornext_value6499=fornext_step6499+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6499: *_SUB_WIKIPARSE_LONG_II=fornext_value6499; if (fornext_step_negative6499){ if (fornext_value6499fornext_finalvalue6499) break; } fornext_error6499:; if(qbevent){evnt(25753,882,"wiki_methods.bas");if(r)goto S_58183;} S_58184:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*_SUB_WIKIPARSE_LONG_II)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),(qbs_add(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])),func_chr( 0 ))))))||new_error){ if(qbevent){evnt(25753,883,"wiki_methods.bas");if(r)goto S_58184;} do{ SUB_HELP_ADDTXT(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*_SUB_WIKIPARSE_LONG_II)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1)),_SUB_WIKIPARSE_LONG_COL,&(pass6500= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,884,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6498; if(!qbevent)break;evnt(25753,884,"wiki_methods.bas");}while(r); } fornext_continue_6498:; } fornext_exit_6498:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,887,"wiki_methods.bas");}while(r); } S_58191:; if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_WIKIPARSE_LONG_C& 248 )== 240 ))&(-((qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )& 192 )== 128 ))&(-((qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 3 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 3 )& 192 )== 128 ))&(-((qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 4 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 4 )& 192 )== 128 ))))||new_error){ if(qbevent){evnt(25753,889,"wiki_methods.bas");if(r)goto S_58191;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,890,"wiki_methods.bas");}while(r); S_58193:; fornext_value6502= 0 ; fornext_finalvalue6502=*__LONG_WPUTFREPLCNT; fornext_step6502= 1 ; if (fornext_step6502<0) fornext_step_negative6502=1; else fornext_step_negative6502=0; if (new_error) goto fornext_error6502; goto fornext_entrylabel6502; while(1){ fornext_value6502=fornext_step6502+(*_SUB_WIKIPARSE_LONG_II); fornext_entrylabel6502: *_SUB_WIKIPARSE_LONG_II=fornext_value6502; if (fornext_step_negative6502){ if (fornext_value6502fornext_finalvalue6502) break; } fornext_error6502:; if(qbevent){evnt(25753,891,"wiki_methods.bas");if(r)goto S_58193;} S_58194:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*_SUB_WIKIPARSE_LONG_II)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12)),4,1),((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 4 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])))))||new_error){ if(qbevent){evnt(25753,892,"wiki_methods.bas");if(r)goto S_58194;} do{ SUB_HELP_ADDTXT(qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_WPUTFREPL[0])+((array_check((*_SUB_WIKIPARSE_LONG_II)-__ARRAY_UDT_WPUTFREPL[4],__ARRAY_UDT_WPUTFREPL[5]))*12+4)),8,1)),_SUB_WIKIPARSE_LONG_COL,&(pass6503= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,893,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6501; if(!qbevent)break;evnt(25753,893,"wiki_methods.bas");}while(r); } fornext_continue_6501:; } fornext_exit_6501:; do{ goto LABEL_CHARDONE; if(!qbevent)break;evnt(25753,896,"wiki_methods.bas");}while(r); } S_58201:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_WIKIPARSE_LONG_C== 10 ))|(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)))|(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("
",6)))))||new_error){ if(qbevent){evnt(25753,900,"wiki_methods.bas");if(r)goto S_58201;} S_58202:; 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(25753,901,"wiki_methods.bas");if(r)goto S_58202;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,901,"wiki_methods.bas");}while(r); } S_58205:; 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("
",6))))||new_error){ if(qbevent){evnt(25753,902,"wiki_methods.bas");if(r)goto S_58205;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 5 ; if(!qbevent)break;evnt(25753,902,"wiki_methods.bas");}while(r); } S_58208:; if ((-(*_SUB_WIKIPARSE_LONG_C== 10 ))||new_error){ if(qbevent){evnt(25753,903,"wiki_methods.bas");if(r)goto S_58208;} S_58209:; if ((-(*_SUB_WIKIPARSE_LONG_DL> 1 ))||new_error){ if(qbevent){evnt(25753,904,"wiki_methods.bas");if(r)goto S_58209;} do{ *_SUB_WIKIPARSE_LONG_DL=*_SUB_WIKIPARSE_LONG_DL- 1 ; if(!qbevent)break;evnt(25753,904,"wiki_methods.bas");}while(r); } do{ qbs_set(__STRING_HELP_LINDENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,905,"wiki_methods.bas");}while(r); } S_58214:; if ((-(*__LONG_HELP_LOCKPARSE> -2 ))||new_error){ if(qbevent){evnt(25753,908,"wiki_methods.bas");if(r)goto S_58214;} S_58215:; if ((-(*__LONG_HELP_TXT_LEN>= 8 ))||new_error){ if(qbevent){evnt(25753,909,"wiki_methods.bas");if(r)goto S_58215;} S_58216:; 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(25753,910,"wiki_methods.bas");if(r)goto S_58216;} S_58217:; if ((-(*__LONG_HELP_CENTER> 0 ))||new_error){ if(qbevent){evnt(25753,911,"wiki_methods.bas");if(r)goto S_58217;} do{ qbs_set(__STRING_HELP_CINDENT,func_mid(__STRING_HELP_CINDENT, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,911,"wiki_methods.bas");}while(r); } do{ goto LABEL_SKIPMULTIBLANKS; if(!qbevent)break;evnt(25753,912,"wiki_methods.bas");}while(r); } } } do{ SUB_HELP_ADDTXT(func_chr( 13 ),_SUB_WIKIPARSE_LONG_COL,&(pass6504= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,916,"wiki_methods.bas");}while(r); LABEL_SKIPMULTIBLANKS:; if(qbevent){evnt(25753,918,"wiki_methods.bas");r=0;} S_58225:; if ((-(*__LONG_HELP_LOCKPARSE!= 0 ))||new_error){ if(qbevent){evnt(25753,919,"wiki_methods.bas");if(r)goto S_58225;} do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,920,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_ITALIC= 0 ; if(!qbevent)break;evnt(25753,920,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,920,"wiki_methods.bas");}while(r); }else{ S_58230:; if ((-(*_SUB_WIKIPARSE_LONG_C== 10 ))||new_error){ if(qbevent){evnt(25753,922,"wiki_methods.bas");if(r)goto S_58230;} do{ *__LONG_HELP_DLIST= 0 ; if(!qbevent)break;evnt(25753,923,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_BOLD= 0 ; if(!qbevent)break;evnt(25753,923,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_COL=FUNC_HELP_COL(); if(!qbevent)break;evnt(25753,923,"wiki_methods.bas");}while(r); S_58234:; if ((-(*_SUB_WIKIPARSE_LONG_AH> 0 ))||new_error){ if(qbevent){evnt(25753,924,"wiki_methods.bas");if(r)goto S_58234;} do{ *_SUB_WIKIPARSE_LONG_AH=*_SUB_WIKIPARSE_LONG_AH- 1 ; if(!qbevent)break;evnt(25753,924,"wiki_methods.bas");}while(r); } S_58237:; if ((-(*_SUB_WIKIPARSE_LONG_DL> 0 ))||new_error){ if(qbevent){evnt(25753,925,"wiki_methods.bas");if(r)goto S_58237;} S_58238:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )!= 59 ))&(-(qbs_asc(((qbs*)(((uint64*)(_SUB_WIKIPARSE_ARRAY_STRING_C[0]))[array_check(( 2 )-_SUB_WIKIPARSE_ARRAY_STRING_C[4],_SUB_WIKIPARSE_ARRAY_STRING_C[5])])), 2 )!= 58 ))))||new_error){ if(qbevent){evnt(25753,926,"wiki_methods.bas");if(r)goto S_58238;} do{ *_SUB_WIKIPARSE_LONG_DL= 0 ; if(!qbevent)break;evnt(25753,927,"wiki_methods.bas");}while(r); do{ *__LONG_HELP_CHKBLANK= 1 ; if(!qbevent)break;evnt(25753,928,"wiki_methods.bas");}while(r); } } } } do{ *_SUB_WIKIPARSE_LONG_NL= 1 ; if(!qbevent)break;evnt(25753,933,"wiki_methods.bas");}while(r); do{ goto LABEL_CHARDONEKNL; if(!qbevent)break;evnt(25753,934,"wiki_methods.bas");}while(r); } do{ SUB_HELP_ADDTXT(func_chr(*_SUB_WIKIPARSE_LONG_C),_SUB_WIKIPARSE_LONG_COL,&(pass6505= 0 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,936,"wiki_methods.bas");}while(r); LABEL_CHARDONE:; if(qbevent){evnt(25753,938,"wiki_methods.bas");r=0;} do{ *_SUB_WIKIPARSE_LONG_NL= 0 ; if(!qbevent)break;evnt(25753,939,"wiki_methods.bas");}while(r); LABEL_CHARDONEKNL:; if(qbevent){evnt(25753,940,"wiki_methods.bas");r=0;} do{ *_SUB_WIKIPARSE_LONG_I=*_SUB_WIKIPARSE_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,941,"wiki_methods.bas");}while(r); dl_continue_6336:; } dl_exit_6336:; 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(25753,946,"wiki_methods.bas");}while(r); S_58253:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_HELP_PAGELOADED,qbs_new_txt_len("Keyword Reference - Alphabetical",32))))||new_error){ if(qbevent){evnt(25753,948,"wiki_methods.bas");if(r)goto S_58253;} do{ *_SUB_WIKIPARSE_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,950,"wiki_methods.bas");}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(25753,951,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_A,func_space( 1000 )); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,952,"wiki_methods.bas");}while(r); S_58257:; fornext_value6507= 1 ; fornext_finalvalue6507=*__LONG_HELP_H; fornext_step6507= 1 ; if (fornext_step6507<0) fornext_step_negative6507=1; else fornext_step_negative6507=0; if (new_error) goto fornext_error6507; goto fornext_entrylabel6507; while(1){ fornext_value6507=fornext_step6507+(*_SUB_WIKIPARSE_LONG_CY); fornext_entrylabel6507: *_SUB_WIKIPARSE_LONG_CY=fornext_value6507; if (fornext_step_negative6507){ if (fornext_value6507fornext_finalvalue6507) break; } fornext_error6507:; if(qbevent){evnt(25753,953,"wiki_methods.bas");if(r)goto S_58257;} 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(25753,955,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_X=*_SUB_WIKIPARSE_LONG_L; if(!qbevent)break;evnt(25753,956,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_X2= 1 ; if(!qbevent)break;evnt(25753,957,"wiki_methods.bas");}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(25753,958,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_OLDLNK= 0 ; if(!qbevent)break;evnt(25753,959,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LNKX1= 0 ; if(!qbevent)break;evnt(25753,960,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LNKX2= 0 ; if(!qbevent)break;evnt(25753,960,"wiki_methods.bas");}while(r); S_58265:; while((!(-(*_SUB_WIKIPARSE_LONG_C== 13 )))||new_error){ if(qbevent){evnt(25753,961,"wiki_methods.bas");if(r)goto S_58265;} 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(25753,962,"wiki_methods.bas");}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(25753,963,"wiki_methods.bas");}while(r); S_58268:; if (((-(*_SUB_WIKIPARSE_LONG_OLDLNK== 0 ))&(-(*_SUB_WIKIPARSE_LONG_LNK!= 0 )))||new_error){ if(qbevent){evnt(25753,964,"wiki_methods.bas");if(r)goto S_58268;} do{ *_SUB_WIKIPARSE_LONG_LNKX1=*_SUB_WIKIPARSE_LONG_X2; if(!qbevent)break;evnt(25753,964,"wiki_methods.bas");}while(r); } S_58271:; 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(25753,965,"wiki_methods.bas");if(r)goto S_58271;} do{ *_SUB_WIKIPARSE_LONG_LNKX2=*_SUB_WIKIPARSE_LONG_X2; if(!qbevent)break;evnt(25753,966,"wiki_methods.bas");}while(r); S_58273:; if ((-(*_SUB_WIKIPARSE_LONG_LNK== 0 ))||new_error){ if(qbevent){evnt(25753,966,"wiki_methods.bas");if(r)goto S_58273;} do{ *_SUB_WIKIPARSE_LONG_LNKX2=*_SUB_WIKIPARSE_LONG_LNKX2- 1 ; if(!qbevent)break;evnt(25753,966,"wiki_methods.bas");}while(r); } S_58276:; if ((-(*_SUB_WIKIPARSE_LONG_LNKX1!= 3 ))||new_error){ if(qbevent){evnt(25753,968,"wiki_methods.bas");if(r)goto S_58276;} do{ goto LABEL_IGNORELINK; if(!qbevent)break;evnt(25753,968,"wiki_methods.bas");}while(r); } S_58279:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_WIKIPARSE_STRING_A, 1 )!= 4 )))||new_error){ if(qbevent){evnt(25753,969,"wiki_methods.bas");if(r)goto S_58279;} do{ goto LABEL_IGNORELINK; if(!qbevent)break;evnt(25753,969,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_LNK2=*_SUB_WIKIPARSE_LONG_LNK; if(!qbevent)break;evnt(25753,972,"wiki_methods.bas");}while(r); S_58283:; if ((-(*_SUB_WIKIPARSE_LONG_LNK2== 0 ))||new_error){ if(qbevent){evnt(25753,972,"wiki_methods.bas");if(r)goto S_58283;} do{ *_SUB_WIKIPARSE_LONG_LNK2=*_SUB_WIKIPARSE_LONG_OLDLNK; if(!qbevent)break;evnt(25753,972,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_L1= 1 ; if(!qbevent)break;evnt(25753,973,"wiki_methods.bas");}while(r); S_58287:; fornext_value6510= 1 ; fornext_finalvalue6510=*_SUB_WIKIPARSE_LONG_LNK2- 1 ; fornext_step6510= 1 ; if (fornext_step6510<0) fornext_step_negative6510=1; else fornext_step_negative6510=0; if (new_error) goto fornext_error6510; goto fornext_entrylabel6510; while(1){ fornext_value6510=fornext_step6510+(*_SUB_WIKIPARSE_LONG_LX); fornext_entrylabel6510: *_SUB_WIKIPARSE_LONG_LX=fornext_value6510; if (fornext_step_negative6510){ if (fornext_value6510fornext_finalvalue6510) break; } fornext_error6510:; if(qbevent){evnt(25753,974,"wiki_methods.bas");if(r)goto S_58287;} 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(25753,975,"wiki_methods.bas");}while(r); fornext_continue_6509:; } fornext_exit_6509:; 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(25753,977,"wiki_methods.bas");}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(25753,978,"wiki_methods.bas");}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(25753,980,"wiki_methods.bas");}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(25753,982,"wiki_methods.bas");}while(r); S_58294:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("(",1),0)))||new_error){ if(qbevent){evnt(25753,984,"wiki_methods.bas");if(r)goto S_58294;} 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(25753,984,"wiki_methods.bas");}while(r); } S_58297:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(25753,985,"wiki_methods.bas");if(r)goto S_58297;} 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(25753,985,"wiki_methods.bas");}while(r); } S_58300:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)))||new_error){ if(qbevent){evnt(25753,986,"wiki_methods.bas");if(r)goto S_58300;} 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(25753,987,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(25753,989,"wiki_methods.bas");}while(r); S_58303:; 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(25753,991,"wiki_methods.bas");if(r)goto S_58303;} S_58304:; fornext_value6514= 1 ; fornext_finalvalue6514=_SUB_WIKIPARSE_STRING_A3->len; fornext_step6514= 1 ; if (fornext_step6514<0) fornext_step_negative6514=1; else fornext_step_negative6514=0; if (new_error) goto fornext_error6514; goto fornext_entrylabel6514; while(1){ fornext_value6514=fornext_step6514+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel6514: *_SUB_WIKIPARSE_LONG_CI=fornext_value6514; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6514){ if (fornext_value6514fornext_finalvalue6514) break; } fornext_error6514:; if(qbevent){evnt(25753,992,"wiki_methods.bas");if(r)goto S_58304;} 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(25753,993,"wiki_methods.bas");}while(r); S_58306:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(25753,994,"wiki_methods.bas");if(r)goto S_58306;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,994,"wiki_methods.bas");}while(r); } S_58309:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(25753,995,"wiki_methods.bas");if(r)goto S_58309;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,995,"wiki_methods.bas");}while(r); } fornext_continue_6513:; } fornext_exit_6513:; } S_58314:; if ((-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(25753,999,"wiki_methods.bas");if(r)goto S_58314;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip6516; 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 skip6516; skip6516: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25753,999,"wiki_methods.bas");}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(25753,1001,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(25753,1004,"wiki_methods.bas");}while(r); S_58320:; 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(25753,1005,"wiki_methods.bas");if(r)goto S_58320;} S_58321:; fornext_value6518= 1 ; fornext_finalvalue6518=_SUB_WIKIPARSE_STRING_A2->len; fornext_step6518= 1 ; if (fornext_step6518<0) fornext_step_negative6518=1; else fornext_step_negative6518=0; if (new_error) goto fornext_error6518; goto fornext_entrylabel6518; while(1){ fornext_value6518=fornext_step6518+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel6518: *_SUB_WIKIPARSE_LONG_CI=fornext_value6518; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6518){ if (fornext_value6518fornext_finalvalue6518) break; } fornext_error6518:; if(qbevent){evnt(25753,1006,"wiki_methods.bas");if(r)goto S_58321;} 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(25753,1007,"wiki_methods.bas");}while(r); S_58323:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(25753,1008,"wiki_methods.bas");if(r)goto S_58323;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,1008,"wiki_methods.bas");}while(r); } S_58326:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(25753,1009,"wiki_methods.bas");if(r)goto S_58326;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,1009,"wiki_methods.bas");}while(r); } fornext_continue_6517:; } fornext_exit_6517:; } S_58331:; if ((-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(25753,1012,"wiki_methods.bas");if(r)goto S_58331;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip6520; 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 skip6520; skip6520: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25753,1012,"wiki_methods.bas");}while(r); } do{ qbs_set(_SUB_WIKIPARSE_STRING_OA2,_SUB_WIKIPARSE_STRING_A2); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1013,"wiki_methods.bas");}while(r); do{ qbs_set(_SUB_WIKIPARSE_STRING_A2,_SUB_WIKIPARSE_STRING_L); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1015,"wiki_methods.bas");}while(r); S_58336:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("(",1),0)))||new_error){ if(qbevent){evnt(25753,1016,"wiki_methods.bas");if(r)goto S_58336;} 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(25753,1016,"wiki_methods.bas");}while(r); } S_58339:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len(" ",1),0)))||new_error){ if(qbevent){evnt(25753,1017,"wiki_methods.bas");if(r)goto S_58339;} 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(25753,1017,"wiki_methods.bas");}while(r); } S_58342:; if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_WIKIPARSE_STRING_A2,qbs_new_txt_len("...",3),0)))||new_error){ if(qbevent){evnt(25753,1018,"wiki_methods.bas");if(r)goto S_58342;} 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(25753,1019,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(25753,1021,"wiki_methods.bas");}while(r); S_58345:; 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(25753,1022,"wiki_methods.bas");if(r)goto S_58345;} S_58346:; fornext_value6523= 1 ; fornext_finalvalue6523=_SUB_WIKIPARSE_STRING_A3->len; fornext_step6523= 1 ; if (fornext_step6523<0) fornext_step_negative6523=1; else fornext_step_negative6523=0; if (new_error) goto fornext_error6523; goto fornext_entrylabel6523; while(1){ fornext_value6523=fornext_step6523+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel6523: *_SUB_WIKIPARSE_LONG_CI=fornext_value6523; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6523){ if (fornext_value6523fornext_finalvalue6523) break; } fornext_error6523:; if(qbevent){evnt(25753,1023,"wiki_methods.bas");if(r)goto S_58346;} 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(25753,1024,"wiki_methods.bas");}while(r); S_58348:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(25753,1025,"wiki_methods.bas");if(r)goto S_58348;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,1025,"wiki_methods.bas");}while(r); } S_58351:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(25753,1026,"wiki_methods.bas");if(r)goto S_58351;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,1026,"wiki_methods.bas");}while(r); } fornext_continue_6522:; } fornext_exit_6522:; } S_58356:; if ((-(*_SUB_WIKIPARSE_LONG_SKIP== 0 ))||new_error){ if(qbevent){evnt(25753,1029,"wiki_methods.bas");if(r)goto S_58356;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip6525; 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 skip6525; skip6525: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25753,1029,"wiki_methods.bas");}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(25753,1031,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_SKIP= 0 ; if(!qbevent)break;evnt(25753,1034,"wiki_methods.bas");}while(r); S_58362:; 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(25753,1035,"wiki_methods.bas");if(r)goto S_58362;} S_58363:; fornext_value6527= 1 ; fornext_finalvalue6527=_SUB_WIKIPARSE_STRING_A2->len; fornext_step6527= 1 ; if (fornext_step6527<0) fornext_step_negative6527=1; else fornext_step_negative6527=0; if (new_error) goto fornext_error6527; goto fornext_entrylabel6527; while(1){ fornext_value6527=fornext_step6527+(*_SUB_WIKIPARSE_LONG_CI); fornext_entrylabel6527: *_SUB_WIKIPARSE_LONG_CI=fornext_value6527; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6527){ if (fornext_value6527fornext_finalvalue6527) break; } fornext_error6527:; if(qbevent){evnt(25753,1036,"wiki_methods.bas");if(r)goto S_58363;} 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(25753,1037,"wiki_methods.bas");}while(r); S_58365:; if (((-(*_SUB_WIKIPARSE_LONG_CA>= 97 ))&(-(*_SUB_WIKIPARSE_LONG_CA<= 122 )))||new_error){ if(qbevent){evnt(25753,1038,"wiki_methods.bas");if(r)goto S_58365;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,1038,"wiki_methods.bas");}while(r); } S_58368:; if ((-(*_SUB_WIKIPARSE_LONG_CA== 44 ))||new_error){ if(qbevent){evnt(25753,1039,"wiki_methods.bas");if(r)goto S_58368;} do{ *_SUB_WIKIPARSE_LONG_SKIP= 1 ; if(!qbevent)break;evnt(25753,1039,"wiki_methods.bas");}while(r); } fornext_continue_6526:; } fornext_exit_6526:; } S_58373:; 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(25753,1042,"wiki_methods.bas");if(r)goto S_58373;} do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno=*_SUB_WIKIPARSE_LONG_FH; if (new_error) goto skip6529; 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 skip6529; skip6529: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; if(!qbevent)break;evnt(25753,1042,"wiki_methods.bas");}while(r); } LABEL_IGNORELINK:; if(qbevent){evnt(25753,1044,"wiki_methods.bas");r=0;} do{ *_SUB_WIKIPARSE_LONG_LNKX1= 0 ; if(!qbevent)break;evnt(25753,1046,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_LNKX2= 0 ; if(!qbevent)break;evnt(25753,1046,"wiki_methods.bas");}while(r); } do{ *_SUB_WIKIPARSE_LONG_X=*_SUB_WIKIPARSE_LONG_X+ 4 ; if(!qbevent)break;evnt(25753,1048,"wiki_methods.bas");}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(25753,1048,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_X2=*_SUB_WIKIPARSE_LONG_X2+ 1 ; if(!qbevent)break;evnt(25753,1049,"wiki_methods.bas");}while(r); do{ *_SUB_WIKIPARSE_LONG_OLDLNK=*_SUB_WIKIPARSE_LONG_LNK; if(!qbevent)break;evnt(25753,1050,"wiki_methods.bas");}while(r); dl_continue_6508:; } dl_exit_6508:; fornext_continue_6506:; } fornext_exit_6506:; do{ sub_close(*_SUB_WIKIPARSE_LONG_FH,1); if(!qbevent)break;evnt(25753,1053,"wiki_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free270.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_WIKISAFENAME(qbs*_FUNC_WIKISAFENAME_STRING_PAGE){ 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 "data271.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_WIKISAFENAME_STRING_EXT,func_space(_FUNC_WIKISAFENAME_STRING_PAGE->len)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1059,"wiki_methods.bas");}while(r); S_58388:; fornext_value6533= 1 ; fornext_finalvalue6533=_FUNC_WIKISAFENAME_STRING_PAGE->len; fornext_step6533= 1 ; if (fornext_step6533<0) fornext_step_negative6533=1; else fornext_step_negative6533=0; if (new_error) goto fornext_error6533; goto fornext_entrylabel6533; while(1){ fornext_value6533=fornext_step6533+(*_FUNC_WIKISAFENAME_LONG_I); fornext_entrylabel6533: *_FUNC_WIKISAFENAME_LONG_I=fornext_value6533; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6533){ if (fornext_value6533fornext_finalvalue6533) break; } fornext_error6533:; if(qbevent){evnt(25753,1060,"wiki_methods.bas");if(r)goto S_58388;} do{ *_FUNC_WIKISAFENAME_LONG_C=qbs_asc(_FUNC_WIKISAFENAME_STRING_PAGE,*_FUNC_WIKISAFENAME_LONG_I); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1061,"wiki_methods.bas");}while(r); S_58390:; if(qbevent){evnt(25753,1062,"wiki_methods.bas");if(r)goto S_58390;} S_58391:; if ((((*_FUNC_WIKISAFENAME_LONG_C>=( 65 ))&&(*_FUNC_WIKISAFENAME_LONG_C<=( 90 ))))||new_error){ if(qbevent){evnt(25753,1063,"wiki_methods.bas");if(r)goto S_58391;} do{ tqbs=_FUNC_WIKISAFENAME_STRING_EXT; if (!new_error){ tmp_fileno=*_FUNC_WIKISAFENAME_LONG_I; if (!new_error){ tmp_long= 49 ; 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(25753,1063,"wiki_methods.bas");}while(r); sc_ec_436_end:; goto sc_6535_end; } S_58393:; if ((((*_FUNC_WIKISAFENAME_LONG_C>=( 97 ))&&(*_FUNC_WIKISAFENAME_LONG_C<=( 122 ))))||new_error){ if(qbevent){evnt(25753,1064,"wiki_methods.bas");if(r)goto S_58393;} do{ tqbs=_FUNC_WIKISAFENAME_STRING_EXT; if (!new_error){ tmp_fileno=*_FUNC_WIKISAFENAME_LONG_I; if (!new_error){ tmp_long= 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(25753,1064,"wiki_methods.bas");}while(r); sc_ec_437_end:; goto sc_6535_end; } do{ tqbs=_FUNC_WIKISAFENAME_STRING_EXT; if (!new_error){ tmp_fileno=*_FUNC_WIKISAFENAME_LONG_I; if (!new_error){ tmp_long=*_FUNC_WIKISAFENAME_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(25753,1065,"wiki_methods.bas");}while(r); sc_6535_end:; fornext_continue_6532:; } fornext_exit_6532:; do{ qbs_set(_FUNC_WIKISAFENAME_STRING_WIKISAFENAME,qbs_add(qbs_add(_FUNC_WIKISAFENAME_STRING_PAGE,qbs_new_txt_len("_",1)),_FUNC_WIKISAFENAME_STRING_EXT)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1068,"wiki_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free271.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_WIKISAFENAME_STRING_WIKISAFENAME);return _FUNC_WIKISAFENAME_STRING_WIKISAFENAME; } qbs* FUNC_WIKILOOKAHEAD(qbs*_FUNC_WIKILOOKAHEAD_STRING_A,int32*_FUNC_WIKILOOKAHEAD_LONG_I,qbs*_FUNC_WIKILOOKAHEAD_STRING_TOKEN){ 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 "data272.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_WIKILOOKAHEAD_STRING_WIKILOOKAHEAD,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1072,"wiki_methods.bas");}while(r); S_58401:; if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_WIKILOOKAHEAD_LONG_I>=_FUNC_WIKILOOKAHEAD_STRING_A->len)))||new_error){ if(qbevent){evnt(25753,1072,"wiki_methods.bas");if(r)goto S_58401;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,1072,"wiki_methods.bas");}while(r); } do{ *_FUNC_WIKILOOKAHEAD_LONG_J=func_instr(*_FUNC_WIKILOOKAHEAD_LONG_I,_FUNC_WIKILOOKAHEAD_STRING_A,_FUNC_WIKILOOKAHEAD_STRING_TOKEN,1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1073,"wiki_methods.bas");}while(r); S_58405:; if ((-(*_FUNC_WIKILOOKAHEAD_LONG_J== 0 ))||new_error){ if(qbevent){evnt(25753,1074,"wiki_methods.bas");if(r)goto S_58405;} do{ qbs_set(_FUNC_WIKILOOKAHEAD_STRING_WIKILOOKAHEAD,func_mid(_FUNC_WIKILOOKAHEAD_STRING_A,*_FUNC_WIKILOOKAHEAD_LONG_I,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1075,"wiki_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_WIKILOOKAHEAD_STRING_WIKILOOKAHEAD,func_mid(_FUNC_WIKILOOKAHEAD_STRING_A,*_FUNC_WIKILOOKAHEAD_LONG_I,*_FUNC_WIKILOOKAHEAD_LONG_J-*_FUNC_WIKILOOKAHEAD_LONG_I,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1077,"wiki_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free272.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_WIKILOOKAHEAD_STRING_WIKILOOKAHEAD);return _FUNC_WIKILOOKAHEAD_STRING_WIKILOOKAHEAD; } qbs* FUNC_WIKIBUILDCINDENT(qbs*_FUNC_WIKIBUILDCINDENT_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 "data273.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_WIKIBUILDCINDENT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1082,"wiki_methods.bas");}while(r); S_58411:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_WIKIBUILDCINDENT_STRING_A,qbs_new_txt_len("",0))))||new_error){ if(qbevent){evnt(25753,1082,"wiki_methods.bas");if(r)goto S_58411;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,1082,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_ORG,_FUNC_WIKIBUILDCINDENT_STRING_A); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1084,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1084,"wiki_methods.bas");}while(r); S_58416:; fornext_value6541= 1 ; fornext_finalvalue6541=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6541= 1 ; if (fornext_step6541<0) fornext_step_negative6541=1; else fornext_step_negative6541=0; if (new_error) goto fornext_error6541; goto fornext_entrylabel6541; while(1){ fornext_value6541=fornext_step6541+(*_FUNC_WIKIBUILDCINDENT_LONG_I); fornext_entrylabel6541: *_FUNC_WIKIBUILDCINDENT_LONG_I=fornext_value6541; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6541){ if (fornext_value6541fornext_finalvalue6541) break; } fornext_error6541:; if(qbevent){evnt(25753,1085,"wiki_methods.bas");if(r)goto S_58416;} S_58417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 2 ,1),qbs_new_txt_len("[[",2))))||new_error){ if(qbevent){evnt(25753,1086,"wiki_methods.bas");if(r)goto S_58417;} S_58418:; fornext_value6544=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; fornext_finalvalue6544=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6544= 1 ; if (fornext_step6544<0) fornext_step_negative6544=1; else fornext_step_negative6544=0; if (new_error) goto fornext_error6544; goto fornext_entrylabel6544; while(1){ fornext_value6544=fornext_step6544+(*_FUNC_WIKIBUILDCINDENT_LONG_II); fornext_entrylabel6544: *_FUNC_WIKIBUILDCINDENT_LONG_II=fornext_value6544; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6544){ if (fornext_value6544fornext_finalvalue6544) break; } fornext_error6544:; if(qbevent){evnt(25753,1087,"wiki_methods.bas");if(r)goto S_58418;} S_58419:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 1 ,1),qbs_new_txt_len("|",1))))||new_error){ if(qbevent){evnt(25753,1088,"wiki_methods.bas");if(r)goto S_58419;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_II+ 1 ; if(!qbevent)break;evnt(25753,1088,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6543; if(!qbevent)break;evnt(25753,1088,"wiki_methods.bas");}while(r); } S_58423:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 2 ,1),qbs_new_txt_len("]]",2))))||new_error){ if(qbevent){evnt(25753,1089,"wiki_methods.bas");if(r)goto S_58423;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,1089,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6543; if(!qbevent)break;evnt(25753,1089,"wiki_methods.bas");}while(r); } fornext_continue_6543:; } fornext_exit_6543:; } S_58429:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 2 ,1),qbs_new_txt_len("]]",2))))||new_error){ if(qbevent){evnt(25753,1092,"wiki_methods.bas");if(r)goto S_58429;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,1092,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_add(_FUNC_WIKIBUILDCINDENT_STRING_B,func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1093,"wiki_methods.bas");}while(r); fornext_continue_6540:; } fornext_exit_6540:; do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_ORG,_FUNC_WIKIBUILDCINDENT_STRING_B); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1095,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1095,"wiki_methods.bas");}while(r); S_58436:; fornext_value6547= 1 ; fornext_finalvalue6547=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6547= 1 ; if (fornext_step6547<0) fornext_step_negative6547=1; else fornext_step_negative6547=0; if (new_error) goto fornext_error6547; goto fornext_entrylabel6547; while(1){ fornext_value6547=fornext_step6547+(*_FUNC_WIKIBUILDCINDENT_LONG_I); fornext_entrylabel6547: *_FUNC_WIKIBUILDCINDENT_LONG_I=fornext_value6547; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6547){ if (fornext_value6547fornext_finalvalue6547) break; } fornext_error6547:; if(qbevent){evnt(25753,1096,"wiki_methods.bas");if(r)goto S_58436;} S_58437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 5 ,1),qbs_new_txt_len("[http",5))))||new_error){ if(qbevent){evnt(25753,1097,"wiki_methods.bas");if(r)goto S_58437;} S_58438:; fornext_value6550=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 5 ; fornext_finalvalue6550=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6550= 1 ; if (fornext_step6550<0) fornext_step_negative6550=1; else fornext_step_negative6550=0; if (new_error) goto fornext_error6550; goto fornext_entrylabel6550; while(1){ fornext_value6550=fornext_step6550+(*_FUNC_WIKIBUILDCINDENT_LONG_II); fornext_entrylabel6550: *_FUNC_WIKIBUILDCINDENT_LONG_II=fornext_value6550; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6550){ if (fornext_value6550fornext_finalvalue6550) break; } fornext_error6550:; if(qbevent){evnt(25753,1098,"wiki_methods.bas");if(r)goto S_58438;} S_58439:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 1 ,1),qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(25753,1099,"wiki_methods.bas");if(r)goto S_58439;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_II+ 1 ; if(!qbevent)break;evnt(25753,1099,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6549; if(!qbevent)break;evnt(25753,1099,"wiki_methods.bas");}while(r); } S_58443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 1 ,1),qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(25753,1100,"wiki_methods.bas");if(r)goto S_58443;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,1100,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6549; if(!qbevent)break;evnt(25753,1100,"wiki_methods.bas");}while(r); } fornext_continue_6549:; } fornext_exit_6549:; } S_58449:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 1 ,1),qbs_new_txt_len("]",1))))||new_error){ if(qbevent){evnt(25753,1103,"wiki_methods.bas");if(r)goto S_58449;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 1 ; if(!qbevent)break;evnt(25753,1103,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_add(_FUNC_WIKIBUILDCINDENT_STRING_B,func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1104,"wiki_methods.bas");}while(r); fornext_continue_6546:; } fornext_exit_6546:; do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_ORG,_FUNC_WIKIBUILDCINDENT_STRING_B); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1106,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1106,"wiki_methods.bas");}while(r); S_58456:; fornext_value6553= 1 ; fornext_finalvalue6553=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6553= 1 ; if (fornext_step6553<0) fornext_step_negative6553=1; else fornext_step_negative6553=0; if (new_error) goto fornext_error6553; goto fornext_entrylabel6553; while(1){ fornext_value6553=fornext_step6553+(*_FUNC_WIKIBUILDCINDENT_LONG_I); fornext_entrylabel6553: *_FUNC_WIKIBUILDCINDENT_LONG_I=fornext_value6553; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6553){ if (fornext_value6553fornext_finalvalue6553) break; } fornext_error6553:; if(qbevent){evnt(25753,1107,"wiki_methods.bas");if(r)goto S_58456;} S_58457:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 2 ,1),qbs_new_txt_len("{{",2))))||new_error){ if(qbevent){evnt(25753,1108,"wiki_methods.bas");if(r)goto S_58457;} S_58458:; fornext_value6556=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; fornext_finalvalue6556=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6556= 1 ; if (fornext_step6556<0) fornext_step_negative6556=1; else fornext_step_negative6556=0; if (new_error) goto fornext_error6556; goto fornext_entrylabel6556; while(1){ fornext_value6556=fornext_step6556+(*_FUNC_WIKIBUILDCINDENT_LONG_II); fornext_entrylabel6556: *_FUNC_WIKIBUILDCINDENT_LONG_II=fornext_value6556; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6556){ if (fornext_value6556fornext_finalvalue6556) break; } fornext_error6556:; if(qbevent){evnt(25753,1109,"wiki_methods.bas");if(r)goto S_58458;} S_58459:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 1 ,1),qbs_new_txt_len("|",1))))||new_error){ if(qbevent){evnt(25753,1110,"wiki_methods.bas");if(r)goto S_58459;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_II+ 1 ; if(!qbevent)break;evnt(25753,1110,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6555; if(!qbevent)break;evnt(25753,1110,"wiki_methods.bas");}while(r); } S_58463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 2 ,1),qbs_new_txt_len("}}",2))))||new_error){ if(qbevent){evnt(25753,1111,"wiki_methods.bas");if(r)goto S_58463;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,1111,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6555; if(!qbevent)break;evnt(25753,1111,"wiki_methods.bas");}while(r); } fornext_continue_6555:; } fornext_exit_6555:; } S_58469:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 1 ,1),qbs_new_txt_len("|",1))))||new_error){ if(qbevent){evnt(25753,1114,"wiki_methods.bas");if(r)goto S_58469;} S_58470:; fornext_value6559=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 1 ; fornext_finalvalue6559=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6559= 1 ; if (fornext_step6559<0) fornext_step_negative6559=1; else fornext_step_negative6559=0; if (new_error) goto fornext_error6559; goto fornext_entrylabel6559; while(1){ fornext_value6559=fornext_step6559+(*_FUNC_WIKIBUILDCINDENT_LONG_II); fornext_entrylabel6559: *_FUNC_WIKIBUILDCINDENT_LONG_II=fornext_value6559; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6559){ if (fornext_value6559fornext_finalvalue6559) break; } fornext_error6559:; if(qbevent){evnt(25753,1115,"wiki_methods.bas");if(r)goto S_58470;} S_58471:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_II, 2 ,1),qbs_new_txt_len("}}",2))))||new_error){ if(qbevent){evnt(25753,1116,"wiki_methods.bas");if(r)goto S_58471;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_II; if(!qbevent)break;evnt(25753,1116,"wiki_methods.bas");}while(r); do{ goto fornext_exit_6558; if(!qbevent)break;evnt(25753,1116,"wiki_methods.bas");}while(r); } fornext_continue_6558:; } fornext_exit_6558:; } S_58477:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 2 ,1),qbs_new_txt_len("}}",2))))||new_error){ if(qbevent){evnt(25753,1119,"wiki_methods.bas");if(r)goto S_58477;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,1119,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_add(_FUNC_WIKIBUILDCINDENT_STRING_B,func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1120,"wiki_methods.bas");}while(r); fornext_continue_6552:; } fornext_exit_6552:; do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_ORG,_FUNC_WIKIBUILDCINDENT_STRING_B); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1122,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1122,"wiki_methods.bas");}while(r); S_58484:; fornext_value6562= 1 ; fornext_finalvalue6562=_FUNC_WIKIBUILDCINDENT_STRING_ORG->len; fornext_step6562= 1 ; if (fornext_step6562<0) fornext_step_negative6562=1; else fornext_step_negative6562=0; if (new_error) goto fornext_error6562; goto fornext_entrylabel6562; while(1){ fornext_value6562=fornext_step6562+(*_FUNC_WIKIBUILDCINDENT_LONG_I); fornext_entrylabel6562: *_FUNC_WIKIBUILDCINDENT_LONG_I=fornext_value6562; qbs_cleanup(qbs_tmp_base,0); if (fornext_step_negative6562){ if (fornext_value6562fornext_finalvalue6562) break; } fornext_error6562:; if(qbevent){evnt(25753,1123,"wiki_methods.bas");if(r)goto S_58484;} S_58485:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 3 ,1),qbs_new_txt_len("'''",3))))||new_error){ if(qbevent){evnt(25753,1124,"wiki_methods.bas");if(r)goto S_58485;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 3 ; if(!qbevent)break;evnt(25753,1124,"wiki_methods.bas");}while(r); } S_58488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 2 ,1),qbs_new_txt_len("''",2))))||new_error){ if(qbevent){evnt(25753,1125,"wiki_methods.bas");if(r)goto S_58488;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_I+ 2 ; if(!qbevent)break;evnt(25753,1125,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_add(_FUNC_WIKIBUILDCINDENT_STRING_B,func_mid(_FUNC_WIKIBUILDCINDENT_STRING_ORG,*_FUNC_WIKIBUILDCINDENT_LONG_I, 1 ,1))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1126,"wiki_methods.bas");}while(r); fornext_continue_6561:; } fornext_exit_6561:; do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,FUNC_STRREPLACE(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len("
",4),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1128,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,FUNC_STRREPLACE(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len("
",6),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1129,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_add(qbs__trim(_FUNC_WIKIBUILDCINDENT_STRING_B),func_chr( 10 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1130,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_I= 1 ; if(!qbevent)break;evnt(25753,1132,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_ST= 1 ; if(!qbevent)break;evnt(25753,1132,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_BR= 0 ; if(!qbevent)break;evnt(25753,1132,"wiki_methods.bas");}while(r); do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_RES,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1132,"wiki_methods.bas");}while(r); S_58500:; while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_WIKIBUILDCINDENT_LONG_I<=_FUNC_WIKIBUILDCINDENT_STRING_B->len)))||new_error){ if(qbevent){evnt(25753,1133,"wiki_methods.bas");if(r)goto S_58500;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_WS=func_instr(*_FUNC_WIKIBUILDCINDENT_LONG_I,_FUNC_WIKIBUILDCINDENT_STRING_B,qbs_new_txt_len(" ",1),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1134,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_LB=func_instr(*_FUNC_WIKIBUILDCINDENT_LONG_I,_FUNC_WIKIBUILDCINDENT_STRING_B,func_chr( 10 ),1); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1134,"wiki_methods.bas");}while(r); S_58503:; if (((-(*_FUNC_WIKIBUILDCINDENT_LONG_LB> 0 ))&(((-(*_FUNC_WIKIBUILDCINDENT_LONG_WS>*_FUNC_WIKIBUILDCINDENT_LONG_LB))|(-((*_FUNC_WIKIBUILDCINDENT_LONG_LB-*_FUNC_WIKIBUILDCINDENT_LONG_ST)<=*__LONG_HELP_WW)))))||new_error){ if(qbevent){evnt(25753,1135,"wiki_methods.bas");if(r)goto S_58503;} do{ swap_32(&*_FUNC_WIKIBUILDCINDENT_LONG_WS,&*_FUNC_WIKIBUILDCINDENT_LONG_LB); if(!qbevent)break;evnt(25753,1135,"wiki_methods.bas");}while(r); } S_58506:; if (((-(*_FUNC_WIKIBUILDCINDENT_LONG_WS> 0 ))&(-((*_FUNC_WIKIBUILDCINDENT_LONG_WS-*_FUNC_WIKIBUILDCINDENT_LONG_ST)<=*__LONG_HELP_WW)))||new_error){ if(qbevent){evnt(25753,1136,"wiki_methods.bas");if(r)goto S_58506;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_BR=*_FUNC_WIKIBUILDCINDENT_LONG_WS; if(!qbevent)break;evnt(25753,1137,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_WS+ 1 ; if(!qbevent)break;evnt(25753,1137,"wiki_methods.bas");}while(r); S_58509:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_WIKIBUILDCINDENT_STRING_B,*_FUNC_WIKIBUILDCINDENT_LONG_WS)!= 10 ))&(-(*_FUNC_WIKIBUILDCINDENT_LONG_I<=_FUNC_WIKIBUILDCINDENT_STRING_B->len))))||new_error){ if(qbevent){evnt(25753,1138,"wiki_methods.bas");if(r)goto S_58509;} do{ goto ww_continue_6564; if(!qbevent)break;evnt(25753,1138,"wiki_methods.bas");}while(r); } } S_58513:; if ((-(*_FUNC_WIKIBUILDCINDENT_LONG_BR== 0 ))||new_error){ if(qbevent){evnt(25753,1140,"wiki_methods.bas");if(r)goto S_58513;} S_58514:; if ((-(*_FUNC_WIKIBUILDCINDENT_LONG_LB<*_FUNC_WIKIBUILDCINDENT_LONG_WS))||new_error){ if(qbevent){evnt(25753,1141,"wiki_methods.bas");if(r)goto S_58514;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_BR=*_FUNC_WIKIBUILDCINDENT_LONG_LB; if(!qbevent)break;evnt(25753,1142,"wiki_methods.bas");}while(r); }else{ S_58517:; if ((-(*_FUNC_WIKIBUILDCINDENT_LONG_WS> 0 ))||new_error){ if(qbevent){evnt(25753,1144,"wiki_methods.bas");if(r)goto S_58517;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_BR=*_FUNC_WIKIBUILDCINDENT_LONG_WS; if(!qbevent)break;evnt(25753,1144,"wiki_methods.bas");}while(r); }else{ do{ *_FUNC_WIKIBUILDCINDENT_LONG_BR=*_FUNC_WIKIBUILDCINDENT_LONG_LB; if(!qbevent)break;evnt(25753,1144,"wiki_methods.bas");}while(r); } } } do{ *_FUNC_WIKIBUILDCINDENT_LONG_CI=(*__LONG_HELP_WW-(*_FUNC_WIKIBUILDCINDENT_LONG_BR-*_FUNC_WIKIBUILDCINDENT_LONG_ST))/ 2 ; if(!qbevent)break;evnt(25753,1147,"wiki_methods.bas");}while(r); S_58525:; if ((-(*_FUNC_WIKIBUILDCINDENT_LONG_CI< 0 ))||new_error){ if(qbevent){evnt(25753,1147,"wiki_methods.bas");if(r)goto S_58525;} do{ *_FUNC_WIKIBUILDCINDENT_LONG_CI= 0 ; if(!qbevent)break;evnt(25753,1147,"wiki_methods.bas");}while(r); } do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_RES,qbs_add(_FUNC_WIKIBUILDCINDENT_STRING_RES,func_chr(*_FUNC_WIKIBUILDCINDENT_LONG_CI))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1148,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_I=*_FUNC_WIKIBUILDCINDENT_LONG_BR+ 1 ; if(!qbevent)break;evnt(25753,1149,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_ST=*_FUNC_WIKIBUILDCINDENT_LONG_BR+ 1 ; if(!qbevent)break;evnt(25753,1149,"wiki_methods.bas");}while(r); do{ *_FUNC_WIKIBUILDCINDENT_LONG_BR= 0 ; if(!qbevent)break;evnt(25753,1149,"wiki_methods.bas");}while(r); ww_continue_6564:; } ww_exit_6564:; do{ qbs_set(_FUNC_WIKIBUILDCINDENT_STRING_WIKIBUILDCINDENT,_FUNC_WIKIBUILDCINDENT_STRING_RES); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,1151,"wiki_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free273.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_WIKIBUILDCINDENT_STRING_WIKIBUILDCINDENT);return _FUNC_WIKIBUILDCINDENT_STRING_WIKIBUILDCINDENT; } void SUB_PRINTWRAPSTATUS(int16*_SUB_PRINTWRAPSTATUS_INTEGER_X,int16*_SUB_PRINTWRAPSTATUS_INTEGER_Y,int16*_SUB_PRINTWRAPSTATUS_INTEGER_INITIALX,qbs*_SUB_PRINTWRAPSTATUS_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 "data274.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,20027,"ide_methods.bas");}while(r); do{ if(!qbevent)break;evnt(25753,20028,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_TEXT,_SUB_PRINTWRAPSTATUS_STRING___TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20029,"ide_methods.bas");}while(r); do{ qbg_sub_locate(*_SUB_PRINTWRAPSTATUS_INTEGER_Y,*_SUB_PRINTWRAPSTATUS_INTEGER_X,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,20031,"ide_methods.bas");}while(r); S_58538:; while((qbs_cleanup(qbs_tmp_base,((int32)(qbs__trim(_SUB_PRINTWRAPSTATUS_STRING_TEXT))->len)))||new_error){ if(qbevent){evnt(25753,20032,"ide_methods.bas");if(r)goto S_58538;} do{ *_SUB_PRINTWRAPSTATUS_INTEGER_FINDSEP=func_instr(NULL,_SUB_PRINTWRAPSTATUS_STRING_TEXT,qbs_new_txt_len(" ",1),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20033,"ide_methods.bas");}while(r); S_58540:; if ((*_SUB_PRINTWRAPSTATUS_INTEGER_FINDSEP)||new_error){ if(qbevent){evnt(25753,20034,"ide_methods.bas");if(r)goto S_58540;} do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,qbs_left(_SUB_PRINTWRAPSTATUS_STRING_TEXT,*_SUB_PRINTWRAPSTATUS_INTEGER_FINDSEP)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20035,"ide_methods.bas");}while(r); }else{ do{ *_SUB_PRINTWRAPSTATUS_INTEGER_FINDSEP=_SUB_PRINTWRAPSTATUS_STRING_TEXT->len; qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20037,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,_SUB_PRINTWRAPSTATUS_STRING_TEXT); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20038,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_TEXT,func_mid(_SUB_PRINTWRAPSTATUS_STRING_TEXT,*_SUB_PRINTWRAPSTATUS_INTEGER_FINDSEP+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20040,"ide_methods.bas");}while(r); S_58547:; if ((qbs_cleanup(qbs_tmp_base,-((func_pos( 0 )+_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD->len)>(func__width(NULL,0)))))||new_error){ if(qbevent){evnt(25753,20041,"ide_methods.bas");if(r)goto S_58547;} S_58548:; if ((-((func_csrlin()+ 1 )<=((*__LONG_IDEWY- 4 )+ 3 )))||new_error){ if(qbevent){evnt(25753,20042,"ide_methods.bas");if(r)goto S_58548;} do{ qbg_sub_locate(func_csrlin()+ 1 ,*_SUB_PRINTWRAPSTATUS_INTEGER_INITIALX,NULL,NULL,NULL,3); if(!qbevent)break;evnt(25753,20043,"ide_methods.bas");}while(r); }else{ do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20046,"ide_methods.bas");}while(r); } } do{ *_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLOR= 0 ; if(!qbevent)break;evnt(25753,20050,"ide_methods.bas");}while(r); do{ *_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLORAFTER= 0 ; if(!qbevent)break;evnt(25753,20051,"ide_methods.bas");}while(r); do{ *_SUB_PRINTWRAPSTATUS_LONG_SKIPSPACE= 0 ; if(!qbevent)break;evnt(25753,20052,"ide_methods.bas");}while(r); S_58557:; fornext_value6572= 0 ; fornext_finalvalue6572= 2 ; fornext_step6572= 1 ; if (fornext_step6572<0) fornext_step_negative6572=1; else fornext_step_negative6572=0; if (new_error) goto fornext_error6572; goto fornext_entrylabel6572; while(1){ fornext_value6572=fornext_step6572+(*_SUB_PRINTWRAPSTATUS_INTEGER_I); fornext_entrylabel6572: *_SUB_PRINTWRAPSTATUS_INTEGER_I=fornext_value6572; if (fornext_step_negative6572){ if (fornext_value6572fornext_finalvalue6572) break; } fornext_error6572:; if(qbevent){evnt(25753,20053,"ide_methods.bas");if(r)goto S_58557;} do{ *_SUB_PRINTWRAPSTATUS_INTEGER_FINDCOLORMARKER=func_instr(NULL,_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,func_chr(*_SUB_PRINTWRAPSTATUS_INTEGER_I),0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20054,"ide_methods.bas");}while(r); S_58559:; if ((-(*_SUB_PRINTWRAPSTATUS_INTEGER_FINDCOLORMARKER== 1 ))||new_error){ if(qbevent){evnt(25753,20055,"ide_methods.bas");if(r)goto S_58559;} do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,func_mid(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD, 2 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20056,"ide_methods.bas");}while(r); do{ *_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLOR=*_SUB_PRINTWRAPSTATUS_INTEGER_I+ 1 ; if(!qbevent)break;evnt(25753,20057,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=180; if (next_return_point>=return_points) more_return_points(); goto LABEL_APPLYCOLORCHANGE; RETURN_180:; if(!qbevent)break;evnt(25753,20058,"ide_methods.bas");}while(r); S_58563:; }else{ if (-(*_SUB_PRINTWRAPSTATUS_INTEGER_FINDCOLORMARKER> 0 )){ if(qbevent){evnt(25753,20059,"ide_methods.bas");if(r)goto S_58563;} do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,qbs_add(qbs_left(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,*_SUB_PRINTWRAPSTATUS_INTEGER_FINDCOLORMARKER- 1 ),func_mid(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,*_SUB_PRINTWRAPSTATUS_INTEGER_FINDCOLORMARKER+ 1 ,NULL,0))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20060,"ide_methods.bas");}while(r); S_58565:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD, 1 ),qbs_new_txt_len(" ",1))))||new_error){ if(qbevent){evnt(25753,20061,"ide_methods.bas");if(r)goto S_58565;} do{ qbs_set(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD,qbs_rtrim(_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20062,"ide_methods.bas");}while(r); do{ *_SUB_PRINTWRAPSTATUS_LONG_SKIPSPACE= -1 ; if(!qbevent)break;evnt(25753,20063,"ide_methods.bas");}while(r); } do{ *_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLORAFTER=*_SUB_PRINTWRAPSTATUS_INTEGER_I+ 1 ; if(!qbevent)break;evnt(25753,20065,"ide_methods.bas");}while(r); } } fornext_continue_6571:; } fornext_exit_6571:; do{ tqbs=qbs_new(0,0); qbs_set(tqbs,_SUB_PRINTWRAPSTATUS_STRING_NEXTWORD); if (new_error) goto skip6573; makefit(tqbs); qbs_print(tqbs,0); skip6573: qbs_free(tqbs); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20069,"ide_methods.bas");}while(r); S_58573:; if ((*_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLORAFTER)||new_error){ if(qbevent){evnt(25753,20071,"ide_methods.bas");if(r)goto S_58573;} do{ *_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLOR=*_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLORAFTER; if(!qbevent)break;evnt(25753,20072,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=181; if (next_return_point>=return_points) more_return_points(); goto LABEL_APPLYCOLORCHANGE; RETURN_181:; if(!qbevent)break;evnt(25753,20073,"ide_methods.bas");}while(r); S_58576:; if ((*_SUB_PRINTWRAPSTATUS_LONG_SKIPSPACE)||new_error){ if(qbevent){evnt(25753,20074,"ide_methods.bas");if(r)goto S_58576;} do{ qbg_sub_locate(NULL,func_pos( 0 )+ 1 ,NULL,NULL,NULL,2); if(!qbevent)break;evnt(25753,20074,"ide_methods.bas");}while(r); } } dl_continue_6568:; } dl_exit_6568:; do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20077,"ide_methods.bas");}while(r); LABEL_APPLYCOLORCHANGE:; if(qbevent){evnt(25753,20079,"ide_methods.bas");r=0;} S_58582:; sc_6574_var=0; if(qbevent){evnt(25753,20080,"ide_methods.bas");if(r)goto S_58582;} S_58583:; if (((*_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLOR==( 1 )))||new_error){ if(qbevent){evnt(25753,20081,"ide_methods.bas");if(r)goto S_58583;} S_58584:; if ((-(func__defaultcolor(NULL,0)!= 11 ))||new_error){ if(qbevent){evnt(25753,20082,"ide_methods.bas");if(r)goto S_58584;} do{ qbg_sub_color( 11 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,20082,"ide_methods.bas");}while(r); }else{ do{ qbg_sub_color( 7 ,NULL,NULL,1); if(!qbevent)break;evnt(25753,20082,"ide_methods.bas");}while(r); } sc_ec_438_end:; sc_6574_var=-1; } S_58589:; if (((*_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLOR==( 2 )))||new_error){ if(qbevent){evnt(25753,20083,"ide_methods.bas");if(r)goto S_58589;} do{ qbg_sub_color( 7 , 1 ,NULL,3); if(!qbevent)break;evnt(25753,20084,"ide_methods.bas");}while(r); sc_ec_439_end:; sc_6574_var=-1; } S_58591:; if (((*_SUB_PRINTWRAPSTATUS_INTEGER_CHANGECOLOR==( 3 )))||new_error){ if(qbevent){evnt(25753,20085,"ide_methods.bas");if(r)goto S_58591;} do{ qbg_sub_color( 12 , 6 ,NULL,3); if(!qbevent)break;evnt(25753,20086,"ide_methods.bas");}while(r); sc_ec_440_end:; } sc_6574_end:; do{ #include "ret274.txt" if(!qbevent)break;evnt(25753,20088,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free274.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_GETBYTES(qbs*_FUNC_GETBYTES_STRING___VALUE,int32*_FUNC_GETBYTES_LONG_NUMBEROFBYTES){ 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 "data275.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ if(!qbevent)break;evnt(25753,20092,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_GETBYTES_STRING_VALUE,_FUNC_GETBYTES_STRING___VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20094,"ide_methods.bas");}while(r); S_58597:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_GETBYTES_STRING_VALUE,_FUNC_GETBYTES_STRING_PREVIOUSVALUE)))||new_error){ if(qbevent){evnt(25753,20095,"ide_methods.bas");if(r)goto S_58597;} do{ qbs_set(_FUNC_GETBYTES_STRING_PREVIOUSVALUE,_FUNC_GETBYTES_STRING_VALUE); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20096,"ide_methods.bas");}while(r); do{ *_FUNC_GETBYTES_LONG_GETBYTESPOSITION= 1 ; if(!qbevent)break;evnt(25753,20097,"ide_methods.bas");}while(r); } S_58601:; if ((-(*_FUNC_GETBYTES_LONG_NUMBEROFBYTES== 0 ))||new_error){ if(qbevent){evnt(25753,20100,"ide_methods.bas");if(r)goto S_58601;} do{ goto exit_subfunc; if(!qbevent)break;evnt(25753,20100,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_GETBYTES_STRING_GETBYTES,func_mid(_FUNC_GETBYTES_STRING_VALUE,*_FUNC_GETBYTES_LONG_GETBYTESPOSITION,*_FUNC_GETBYTES_LONG_NUMBEROFBYTES,1)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20102,"ide_methods.bas");}while(r); do{ *_FUNC_GETBYTES_LONG_GETBYTESPOSITION=*_FUNC_GETBYTES_LONG_GETBYTESPOSITION+*_FUNC_GETBYTES_LONG_NUMBEROFBYTES; if(!qbevent)break;evnt(25753,20103,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free275.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_GETBYTES_STRING_GETBYTES);return _FUNC_GETBYTES_STRING_GETBYTES; } void SUB_RETRIEVESEARCHHISTORY(ptrszint*_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY){ 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 "data276.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ *_SUB_RETRIEVESEARCHHISTORY_LONG_FH=func_freefile(); if(!qbevent)break;evnt(25753,20107,"ide_methods.bas");}while(r); do{ sub_open(qbs_new_txt_len(".\\internal\\temp\\searched.bin",28), 2 ,NULL,NULL,*_SUB_RETRIEVESEARCHHISTORY_LONG_FH,NULL,0); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20108,"ide_methods.bas");}while(r); do{ if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&1){ preserved_elements=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; } else preserved_elements=0; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]= 1 ; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]=( 10000 )-_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]+1; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; if (tmp_long2func_ubound(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY,1,1))))||new_error){ if(qbevent){evnt(25753,20113,"ide_methods.bas");if(r)goto S_58612;} do{ if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&2){ error(10); }else{ ((mem_lock*)((ptrszint*)_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY)[8])->id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&1){ preserved_elements=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; } else preserved_elements=0; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]= 1 ; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]=(*_SUB_RETRIEVESEARCHHISTORY_LONG_LN+ 10000 )-_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]+1; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; if (tmp_long2id=(++mem_lock_id); static int32 preserved_elements; if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&1){ preserved_elements=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; } else preserved_elements=0; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]= 1 ; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]=(*_SUB_RETRIEVESEARCHHISTORY_LONG_LN)-_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]+1; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[6]=1; if (preserved_elements){ static ptrszint tmp_long2; tmp_long2=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; if (tmp_long2id=(++mem_lock_id); if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&1){ tmp_long=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; while(tmp_long--) qbs_free((qbs*)((uint64*)(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]); free((void*)(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0])); } _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]= 0 ; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]=( 1 )-_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4]+1; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[6]=1; _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0]=(ptrszint)malloc(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]*8); if (!_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0]) error(257); _SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]|=1; tmp_long=_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]; if (_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[2]&4){ while(tmp_long--) ((uint64*)(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0); }else{ while(tmp_long--) ((uint64*)(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long]=(uint64)qbs_new(0,0); } } if(!qbevent)break;evnt(25753,20118,"ide_methods.bas");}while(r); do{ tmp_long=array_check(( 1 )-_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[4],_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[5]); if (!new_error) qbs_set( ((qbs*)(((uint64*)(_SUB_RETRIEVESEARCHHISTORY_ARRAY_STRING_SEARCHHISTORY[0]))[tmp_long])),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(25753,20119,"ide_methods.bas");}while(r); } do{ sub_close(*_SUB_RETRIEVESEARCHHISTORY_LONG_FH,1); if(!qbevent)break;evnt(25753,20121,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free276.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_VWATCH(){ 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 "data277.txt" mem_lock *sf_mem_lock; new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free277.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; }