#line 11986 "ide/ide_methods.bas"
void SUB_IDEFINDAGAIN(int8*_SUB_IDEFINDAGAIN_BYTE_SHOWFLAGS){
#line 11986 "ide/ide_methods.bas"
qbs *tqbs;
#line 11986 "ide/ide_methods.bas"
ptrszint tmp_long;
#line 11986 "ide/ide_methods.bas"
int32 tmp_fileno;
#line 11986 "ide/ide_methods.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 11986 "ide/ide_methods.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 11986 "ide/ide_methods.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 11986 "ide/ide_methods.bas"
#include "data400.txt"
#line 11986 "ide/ide_methods.bas"
mem_lock *sf_mem_lock;
#line 11986 "ide/ide_methods.bas"
new_mem_lock();
#line 11986 "ide/ide_methods.bas"
sf_mem_lock=mem_lock_tmp;
#line 11986 "ide/ide_methods.bas"
sf_mem_lock->type=3;
#line 11986 "ide/ide_methods.bas"
libqb_check_stack();
#line 11986 "ide/ide_methods.bas"
if (is_error_pending()) goto exit_subfunc;
#line 11987 "ide/ide_methods.bas"
do{
#line 11987 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11987,"ide_methods.bas");}while(r);
#line 11989 "ide/ide_methods.bas"
S_58173:;
#line 11989 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDINVERT)||is_error_pending()){
#line 11989 "ide/ide_methods.bas"
if(qbevent){evnt(28819,11989,"ide_methods.bas");if(r)goto S_58173;}
#line 11990 "ide/ide_methods.bas"
S_58174:;
#line 11990 "ide/ide_methods.bas"
if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||is_error_pending()){
#line 11990 "ide/ide_methods.bas"
if(qbevent){evnt(28819,11990,"ide_methods.bas");if(r)goto S_58174;}
#line 11990 "ide/ide_methods.bas"
do{
#line 11990 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 1 ;
#line 11990 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11990,"ide_methods.bas");}while(r);
#line 11990 "ide/ide_methods.bas"
}else{
#line 11990 "ide/ide_methods.bas"
do{
#line 11990 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 0 ;
#line 11990 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11990,"ide_methods.bas");}while(r);
#line 11990 "ide/ide_methods.bas"
}
#line 11991 "ide/ide_methods.bas"
}
#line 11993 "ide/ide_methods.bas"
do{
#line 11993 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_S,__STRING_IDEFINDTEXT);
#line 11993 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 11993 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11993,"ide_methods.bas");}while(r);
#line 11994 "ide/ide_methods.bas"
S_58181:;
#line 11994 "ide/ide_methods.bas"
if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||is_error_pending()){
#line 11994 "ide/ide_methods.bas"
if(qbevent){evnt(28819,11994,"ide_methods.bas");if(r)goto S_58181;}
#line 11994 "ide/ide_methods.bas"
do{
#line 11994 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_S,qbs_ucase(_SUB_IDEFINDAGAIN_STRING_S));
#line 11994 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 11994 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11994,"ide_methods.bas");}while(r);
#line 11994 "ide/ide_methods.bas"
}
#line 11995 "ide/ide_methods.bas"
do{
#line 11995 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_START=*__LONG_IDECY;
#line 11995 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11995,"ide_methods.bas");}while(r);
#line 11996 "ide/ide_methods.bas"
do{
#line 11996 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_START;
#line 11996 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11996,"ide_methods.bas");}while(r);
#line 11998 "ide/ide_methods.bas"
LABEL_IDEFINDNEXT2:;
#line 11998 "ide/ide_methods.bas"
if(qbevent){evnt(28819,11998,"ide_methods.bas");r=0;}
#line 11999 "ide/ide_methods.bas"
do{
#line 11999 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_L,FUNC_IDEGETLINE(_SUB_IDEFINDAGAIN_LONG_Y));
#line 11999 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 11999 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,11999,"ide_methods.bas");}while(r);
#line 12000 "ide/ide_methods.bas"
S_58187:;
#line 12000 "ide/ide_methods.bas"
if ((-(*__INTEGER_IDEFINDCASESENS== 0 ))||is_error_pending()){
#line 12000 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12000,"ide_methods.bas");if(r)goto S_58187;}
#line 12000 "ide/ide_methods.bas"
do{
#line 12000 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_ucase(_SUB_IDEFINDAGAIN_STRING_L));
#line 12000 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12000 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12000,"ide_methods.bas");}while(r);
#line 12000 "ide/ide_methods.bas"
}
#line 12002 "ide/ide_methods.bas"
S_58190:;
#line 12002 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_Y==*_SUB_IDEFINDAGAIN_LONG_START))||is_error_pending()){
#line 12002 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12002,"ide_methods.bas");if(r)goto S_58190;}
#line 12004 "ide/ide_methods.bas"
S_58191:;
#line 12004 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 ))||is_error_pending()){
#line 12004 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12004,"ide_methods.bas");if(r)goto S_58191;}
#line 12005 "ide/ide_methods.bas"
S_58192:;
#line 12005 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDBACKWARDS)||is_error_pending()){
#line 12005 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12005,"ide_methods.bas");if(r)goto S_58192;}
#line 12006 "ide/ide_methods.bas"
S_58193:;
#line 12006 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||is_error_pending()){
#line 12006 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12006,"ide_methods.bas");if(r)goto S_58193;}
#line 12006 "ide/ide_methods.bas"
do{
#line 12006 "ide/ide_methods.bas"
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)));
#line 12006 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12006 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12006,"ide_methods.bas");}while(r);
#line 12006 "ide/ide_methods.bas"
}else{
#line 12006 "ide/ide_methods.bas"
do{
#line 12006 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_new_txt_len("",0));
#line 12006 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12006 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12006,"ide_methods.bas");}while(r);
#line 12006 "ide/ide_methods.bas"
}
#line 12007 "ide/ide_methods.bas"
}else{
#line 12008 "ide/ide_methods.bas"
S_58199:;
#line 12008 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||is_error_pending()){
#line 12008 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12008,"ide_methods.bas");if(r)goto S_58199;}
#line 12008 "ide/ide_methods.bas"
do{
#line 12008 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_left(_SUB_IDEFINDAGAIN_STRING_L,*__LONG_IDECX));
#line 12008 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12008 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12008,"ide_methods.bas");}while(r);
#line 12008 "ide/ide_methods.bas"
}
#line 12009 "ide/ide_methods.bas"
}
#line 12010 "ide/ide_methods.bas"
}else{
#line 12011 "ide/ide_methods.bas"
S_58204:;
#line 12011 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDBACKWARDS)||is_error_pending()){
#line 12011 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12011,"ide_methods.bas");if(r)goto S_58204;}
#line 12012 "ide/ide_methods.bas"
S_58205:;
#line 12012 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||is_error_pending()){
#line 12012 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12012,"ide_methods.bas");if(r)goto S_58205;}
#line 12012 "ide/ide_methods.bas"
do{
#line 12012 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_left(_SUB_IDEFINDAGAIN_STRING_L,*__LONG_IDECX- 1 +(_SUB_IDEFINDAGAIN_STRING_S->len- 1 )));
#line 12012 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12012 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12012,"ide_methods.bas");}while(r);
#line 12012 "ide/ide_methods.bas"
}
#line 12013 "ide/ide_methods.bas"
}else{
#line 12014 "ide/ide_methods.bas"
S_58209:;
#line 12014 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(_SUB_IDEFINDAGAIN_STRING_L->len>*__LONG_IDECX)))||is_error_pending()){
#line 12014 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12014,"ide_methods.bas");if(r)goto S_58209;}
#line 12014 "ide/ide_methods.bas"
do{
#line 12014 "ide/ide_methods.bas"
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)));
#line 12014 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12014 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12014,"ide_methods.bas");}while(r);
#line 12014 "ide/ide_methods.bas"
}else{
#line 12014 "ide/ide_methods.bas"
do{
#line 12014 "ide/ide_methods.bas"
qbs_set(_SUB_IDEFINDAGAIN_STRING_L,qbs_new_txt_len("",0));
#line 12014 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12014 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12014,"ide_methods.bas");}while(r);
#line 12014 "ide/ide_methods.bas"
}
#line 12015 "ide/ide_methods.bas"
}
#line 12016 "ide/ide_methods.bas"
}
#line 12017 "ide/ide_methods.bas"
}
#line 12019 "ide/ide_methods.bas"
do{
#line 12019 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X1= 1 ;
#line 12019 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12019,"ide_methods.bas");}while(r);
#line 12020 "ide/ide_methods.bas"
S_58218:;
#line 12020 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDBACKWARDS)||is_error_pending()){
#line 12020 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12020,"ide_methods.bas");if(r)goto S_58218;}
#line 12021 "ide/ide_methods.bas"
do{
#line 12021 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X1=_SUB_IDEFINDAGAIN_STRING_L->len-_SUB_IDEFINDAGAIN_STRING_S->len+ 1 ;
#line 12021 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12021 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12021,"ide_methods.bas");}while(r);
#line 12022 "ide/ide_methods.bas"
S_58220:;
#line 12022 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_X1< 0 ))||is_error_pending()){
#line 12022 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12022,"ide_methods.bas");if(r)goto S_58220;}
#line 12022 "ide/ide_methods.bas"
do{
#line 12022 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X1= 0 ;
#line 12022 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12022,"ide_methods.bas");}while(r);
#line 12022 "ide/ide_methods.bas"
}
#line 12023 "ide/ide_methods.bas"
}
#line 12025 "ide/ide_methods.bas"
LABEL_IDEFINDAGAIN2:;
#line 12025 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12025,"ide_methods.bas");r=0;}
#line 12027 "ide/ide_methods.bas"
S_58224:;
#line 12027 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDBACKWARDS)||is_error_pending()){
#line 12027 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12027,"ide_methods.bas");if(r)goto S_58224;}
#line 12028 "ide/ide_methods.bas"
do{
#line 12028 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X= 0 ;
#line 12028 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12028,"ide_methods.bas");}while(r);
#line 12029 "ide/ide_methods.bas"
S_58226:;
#line 12029 "ide/ide_methods.bas"
fornext_value6042=*_SUB_IDEFINDAGAIN_LONG_X1;
#line 12029 "ide/ide_methods.bas"
fornext_finalvalue6042= 1 ;
#line 12029 "ide/ide_methods.bas"
fornext_step6042= -1 ;
#line 12029 "ide/ide_methods.bas"
if (fornext_step6042<0) fornext_step_negative6042=1; else fornext_step_negative6042=0;
#line 12029 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6042;
#line 12029 "ide/ide_methods.bas"
goto fornext_entrylabel6042;
#line 12029 "ide/ide_methods.bas"
while(1){
#line 12029 "ide/ide_methods.bas"
fornext_value6042=fornext_step6042+(*_SUB_IDEFINDAGAIN_LONG_XX);
#line 12029 "ide/ide_methods.bas"
fornext_entrylabel6042:
#line 12029 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_XX=fornext_value6042;
#line 12029 "ide/ide_methods.bas"
if (fornext_step_negative6042){
#line 12029 "ide/ide_methods.bas"
if (fornext_value6042<fornext_finalvalue6042) break;
#line 12029 "ide/ide_methods.bas"
}else{
#line 12029 "ide/ide_methods.bas"
if (fornext_value6042>fornext_finalvalue6042) break;
#line 12029 "ide/ide_methods.bas"
}
#line 12029 "ide/ide_methods.bas"
fornext_error6042:;
#line 12029 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12029,"ide_methods.bas");if(r)goto S_58226;}
#line 12030 "ide/ide_methods.bas"
S_58227:;
#line 12030 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_XX)==qbs_asc(_SUB_IDEFINDAGAIN_STRING_S))))||is_error_pending()){
#line 12030 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12030,"ide_methods.bas");if(r)goto S_58227;}
#line 12031 "ide/ide_methods.bas"
do{
#line 12031 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_XXO=*_SUB_IDEFINDAGAIN_LONG_XX- 1 ;
#line 12031 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12031,"ide_methods.bas");}while(r);
#line 12032 "ide/ide_methods.bas"
S_58229:;
#line 12032 "ide/ide_methods.bas"
fornext_value6044=*_SUB_IDEFINDAGAIN_LONG_XX;
#line 12032 "ide/ide_methods.bas"
fornext_finalvalue6044=*_SUB_IDEFINDAGAIN_LONG_XX+_SUB_IDEFINDAGAIN_STRING_S->len- 1 ;
#line 12032 "ide/ide_methods.bas"
fornext_step6044= 1 ;
#line 12032 "ide/ide_methods.bas"
if (fornext_step6044<0) fornext_step_negative6044=1; else fornext_step_negative6044=0;
#line 12032 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6044;
#line 12032 "ide/ide_methods.bas"
goto fornext_entrylabel6044;
#line 12032 "ide/ide_methods.bas"
while(1){
#line 12032 "ide/ide_methods.bas"
fornext_value6044=fornext_step6044+(*_SUB_IDEFINDAGAIN_LONG_XX2);
#line 12032 "ide/ide_methods.bas"
fornext_entrylabel6044:
#line 12032 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_XX2=fornext_value6044;
#line 12032 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12032 "ide/ide_methods.bas"
if (fornext_step_negative6044){
#line 12032 "ide/ide_methods.bas"
if (fornext_value6044<fornext_finalvalue6044) break;
#line 12032 "ide/ide_methods.bas"
}else{
#line 12032 "ide/ide_methods.bas"
if (fornext_value6044>fornext_finalvalue6044) break;
#line 12032 "ide/ide_methods.bas"
}
#line 12032 "ide/ide_methods.bas"
fornext_error6044:;
#line 12032 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12032,"ide_methods.bas");if(r)goto S_58229;}
#line 12033 "ide/ide_methods.bas"
S_58230:;
#line 12033 "ide/ide_methods.bas"
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))))||is_error_pending()){
#line 12033 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12033,"ide_methods.bas");if(r)goto S_58230;}
#line 12033 "ide/ide_methods.bas"
do{
#line 12033 "ide/ide_methods.bas"
goto fornext_exit_6043;
#line 12033 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12033,"ide_methods.bas");}while(r);
#line 12033 "ide/ide_methods.bas"
}
#line 12034 "ide/ide_methods.bas"
fornext_continue_6043:;
#line 12034 "ide/ide_methods.bas"
}
#line 12034 "ide/ide_methods.bas"
fornext_exit_6043:;
#line 12035 "ide/ide_methods.bas"
S_58234:;
#line 12035 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_IDEFINDAGAIN_LONG_XX2==(*_SUB_IDEFINDAGAIN_LONG_XX+_SUB_IDEFINDAGAIN_STRING_S->len))))||is_error_pending()){
#line 12035 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12035,"ide_methods.bas");if(r)goto S_58234;}
#line 12037 "ide/ide_methods.bas"
do{
#line 12037 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X=*_SUB_IDEFINDAGAIN_LONG_XX;
#line 12037 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12037,"ide_methods.bas");}while(r);
#line 12038 "ide/ide_methods.bas"
do{
#line 12038 "ide/ide_methods.bas"
goto fornext_exit_6041;
#line 12038 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12038,"ide_methods.bas");}while(r);
#line 12039 "ide/ide_methods.bas"
}
#line 12040 "ide/ide_methods.bas"
}
#line 12041 "ide/ide_methods.bas"
fornext_continue_6041:;
#line 12041 "ide/ide_methods.bas"
}
#line 12041 "ide/ide_methods.bas"
fornext_exit_6041:;
#line 12042 "ide/ide_methods.bas"
}else{
#line 12043 "ide/ide_methods.bas"
do{
#line 12043 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X=func_instr(*_SUB_IDEFINDAGAIN_LONG_X1,_SUB_IDEFINDAGAIN_STRING_L,_SUB_IDEFINDAGAIN_STRING_S,0|1);
#line 12043 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12043 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12043,"ide_methods.bas");}while(r);
#line 12044 "ide/ide_methods.bas"
}
#line 12047 "ide/ide_methods.bas"
S_58243:;
#line 12047 "ide/ide_methods.bas"
if ((*_SUB_IDEFINDAGAIN_LONG_X)||is_error_pending()){
#line 12047 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12047,"ide_methods.bas");if(r)goto S_58243;}
#line 12048 "ide/ide_methods.bas"
S_58244:;
#line 12048 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDWHOLEWORD)||is_error_pending()){
#line 12048 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12048,"ide_methods.bas");if(r)goto S_58244;}
#line 12049 "ide/ide_methods.bas"
do{
#line 12049 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_WHOLE= 1 ;
#line 12049 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12049,"ide_methods.bas");}while(r);
#line 12050 "ide/ide_methods.bas"
S_58246:;
#line 12050 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_X> 1 ))||is_error_pending()){
#line 12050 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12050,"ide_methods.bas");if(r)goto S_58246;}
#line 12051 "ide/ide_methods.bas"
do{
#line 12051 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_C=qbs_asc(qbs_ucase(func_mid(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_X- 1 , 1 ,0|1)));
#line 12051 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12051 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12051,"ide_methods.bas");}while(r);
#line 12052 "ide/ide_methods.bas"
S_58248:;
#line 12052 "ide/ide_methods.bas"
if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 65 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 90 )))||is_error_pending()){
#line 12052 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12052,"ide_methods.bas");if(r)goto S_58248;}
#line 12052 "ide/ide_methods.bas"
do{
#line 12052 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ;
#line 12052 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12052,"ide_methods.bas");}while(r);
#line 12052 "ide/ide_methods.bas"
}
#line 12053 "ide/ide_methods.bas"
S_58251:;
#line 12053 "ide/ide_methods.bas"
if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 48 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 57 )))||is_error_pending()){
#line 12053 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12053,"ide_methods.bas");if(r)goto S_58251;}
#line 12053 "ide/ide_methods.bas"
do{
#line 12053 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ;
#line 12053 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12053,"ide_methods.bas");}while(r);
#line 12053 "ide/ide_methods.bas"
}
#line 12054 "ide/ide_methods.bas"
}
#line 12055 "ide/ide_methods.bas"
S_58255:;
#line 12055 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-((*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len)<=(_SUB_IDEFINDAGAIN_STRING_L->len))))||is_error_pending()){
#line 12055 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12055,"ide_methods.bas");if(r)goto S_58255;}
#line 12056 "ide/ide_methods.bas"
do{
#line 12056 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_C=qbs_asc(qbs_ucase(func_mid(_SUB_IDEFINDAGAIN_STRING_L,*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len, 1 ,0|1)));
#line 12056 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12056 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12056,"ide_methods.bas");}while(r);
#line 12057 "ide/ide_methods.bas"
S_58257:;
#line 12057 "ide/ide_methods.bas"
if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 65 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 90 )))||is_error_pending()){
#line 12057 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12057,"ide_methods.bas");if(r)goto S_58257;}
#line 12057 "ide/ide_methods.bas"
do{
#line 12057 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ;
#line 12057 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12057,"ide_methods.bas");}while(r);
#line 12057 "ide/ide_methods.bas"
}
#line 12058 "ide/ide_methods.bas"
S_58260:;
#line 12058 "ide/ide_methods.bas"
if (((-(*_SUB_IDEFINDAGAIN_LONG_C>= 48 ))&(-(*_SUB_IDEFINDAGAIN_LONG_C<= 57 )))||is_error_pending()){
#line 12058 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12058,"ide_methods.bas");if(r)goto S_58260;}
#line 12058 "ide/ide_methods.bas"
do{
#line 12058 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_WHOLE= 0 ;
#line 12058 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12058,"ide_methods.bas");}while(r);
#line 12058 "ide/ide_methods.bas"
}
#line 12059 "ide/ide_methods.bas"
}
#line 12060 "ide/ide_methods.bas"
S_58264:;
#line 12060 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_WHOLE== 0 ))||is_error_pending()){
#line 12060 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12060,"ide_methods.bas");if(r)goto S_58264;}
#line 12061 "ide/ide_methods.bas"
do{
#line 12061 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X1=*_SUB_IDEFINDAGAIN_LONG_X+ 1 ;
#line 12061 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12061,"ide_methods.bas");}while(r);
#line 12061 "ide/ide_methods.bas"
S_58266:;
#line 12061 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDBACKWARDS)||is_error_pending()){
#line 12061 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12061,"ide_methods.bas");if(r)goto S_58266;}
#line 12061 "ide/ide_methods.bas"
do{
#line 12061 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X1=*_SUB_IDEFINDAGAIN_LONG_X- 1 ;
#line 12061 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12061,"ide_methods.bas");}while(r);
#line 12061 "ide/ide_methods.bas"
}
#line 12062 "ide/ide_methods.bas"
do{
#line 12062 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X= 0 ;
#line 12062 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12062,"ide_methods.bas");}while(r);
#line 12063 "ide/ide_methods.bas"
S_58270:;
#line 12063 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDEFINDAGAIN_LONG_X1> 0 ))&(-(*_SUB_IDEFINDAGAIN_LONG_X1<=_SUB_IDEFINDAGAIN_STRING_L->len))))||is_error_pending()){
#line 12063 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12063,"ide_methods.bas");if(r)goto S_58270;}
#line 12063 "ide/ide_methods.bas"
do{
#line 12063 "ide/ide_methods.bas"
goto LABEL_IDEFINDAGAIN2;
#line 12063 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12063,"ide_methods.bas");}while(r);
#line 12063 "ide/ide_methods.bas"
}
#line 12064 "ide/ide_methods.bas"
}
#line 12065 "ide/ide_methods.bas"
}
#line 12066 "ide/ide_methods.bas"
}
#line 12068 "ide/ide_methods.bas"
S_58276:;
#line 12068 "ide/ide_methods.bas"
if ((*_SUB_IDEFINDAGAIN_LONG_X)||is_error_pending()){
#line 12068 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12068,"ide_methods.bas");if(r)goto S_58276;}
#line 12069 "ide/ide_methods.bas"
do{
#line 12069 "ide/ide_methods.bas"
SUB_FINDQUOTECOMMENT(_SUB_IDEFINDAGAIN_STRING_L,_SUB_IDEFINDAGAIN_LONG_X,_SUB_IDEFINDAGAIN_BYTE_COMMENT,_SUB_IDEFINDAGAIN_BYTE_QUOTE);
#line 12069 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12069 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12069,"ide_methods.bas");}while(r);
#line 12070 "ide/ide_methods.bas"
S_58278:;
#line 12070 "ide/ide_methods.bas"
if (((-(*__INTEGER_IDEFINDNOCOMMENTS!= 0 ))&*_SUB_IDEFINDAGAIN_BYTE_COMMENT)||is_error_pending()){
#line 12070 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12070,"ide_methods.bas");if(r)goto S_58278;}
#line 12070 "ide/ide_methods.bas"
do{
#line 12070 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X= 0 ;
#line 12070 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12070,"ide_methods.bas");}while(r);
#line 12070 "ide/ide_methods.bas"
}
#line 12071 "ide/ide_methods.bas"
S_58281:;
#line 12071 "ide/ide_methods.bas"
if (((-(*__INTEGER_IDEFINDNOSTRINGS!= 0 ))&*_SUB_IDEFINDAGAIN_BYTE_QUOTE)||is_error_pending()){
#line 12071 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12071,"ide_methods.bas");if(r)goto S_58281;}
#line 12071 "ide/ide_methods.bas"
do{
#line 12071 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X= 0 ;
#line 12071 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12071,"ide_methods.bas");}while(r);
#line 12071 "ide/ide_methods.bas"
}
#line 12072 "ide/ide_methods.bas"
S_58284:;
#line 12072 "ide/ide_methods.bas"
if (((-(*__INTEGER_IDEFINDONLYCOMMENTS!= 0 ))&(-(*_SUB_IDEFINDAGAIN_BYTE_COMMENT== 0 )))||is_error_pending()){
#line 12072 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12072,"ide_methods.bas");if(r)goto S_58284;}
#line 12072 "ide/ide_methods.bas"
do{
#line 12072 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X= 0 ;
#line 12072 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12072,"ide_methods.bas");}while(r);
#line 12072 "ide/ide_methods.bas"
}
#line 12073 "ide/ide_methods.bas"
S_58287:;
#line 12073 "ide/ide_methods.bas"
if (((-(*__INTEGER_IDEFINDONLYSTRINGS!= 0 ))&(-(*_SUB_IDEFINDAGAIN_BYTE_QUOTE== 0 )))||is_error_pending()){
#line 12073 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12073,"ide_methods.bas");if(r)goto S_58287;}
#line 12073 "ide/ide_methods.bas"
do{
#line 12073 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_X= 0 ;
#line 12073 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12073,"ide_methods.bas");}while(r);
#line 12073 "ide/ide_methods.bas"
}
#line 12074 "ide/ide_methods.bas"
}
#line 12076 "ide/ide_methods.bas"
S_58291:;
#line 12076 "ide/ide_methods.bas"
if ((*_SUB_IDEFINDAGAIN_LONG_X)||is_error_pending()){
#line 12076 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12076,"ide_methods.bas");if(r)goto S_58291;}
#line 12077 "ide/ide_methods.bas"
do{
#line 12077 "ide/ide_methods.bas"
*__LONG_IDESELECT= 1 ;
#line 12077 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12077,"ide_methods.bas");}while(r);
#line 12078 "ide/ide_methods.bas"
do{
#line 12078 "ide/ide_methods.bas"
*__LONG_IDECX=*_SUB_IDEFINDAGAIN_LONG_X;
#line 12078 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12078,"ide_methods.bas");}while(r);
#line 12078 "ide/ide_methods.bas"
do{
#line 12078 "ide/ide_methods.bas"
*__LONG_IDECY=*_SUB_IDEFINDAGAIN_LONG_Y;
#line 12078 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12078,"ide_methods.bas");}while(r);
#line 12079 "ide/ide_methods.bas"
do{
#line 12079 "ide/ide_methods.bas"
*__LONG_SEARCHSTRINGFOUNDON=*__LONG_IDECY;
#line 12079 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12079,"ide_methods.bas");}while(r);
#line 12080 "ide/ide_methods.bas"
do{
#line 12080 "ide/ide_methods.bas"
*__LONG_IDESELECTX1=*_SUB_IDEFINDAGAIN_LONG_X+_SUB_IDEFINDAGAIN_STRING_S->len;
#line 12080 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12080 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12080,"ide_methods.bas");}while(r);
#line 12080 "ide/ide_methods.bas"
do{
#line 12080 "ide/ide_methods.bas"
*__LONG_IDESELECTY1=*_SUB_IDEFINDAGAIN_LONG_Y;
#line 12080 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12080,"ide_methods.bas");}while(r);
#line 12082 "ide/ide_methods.bas"
S_58298:;
#line 12082 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDINVERT)||is_error_pending()){
#line 12082 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12082,"ide_methods.bas");if(r)goto S_58298;}
#line 12083 "ide/ide_methods.bas"
S_58299:;
#line 12083 "ide/ide_methods.bas"
if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||is_error_pending()){
#line 12083 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12083,"ide_methods.bas");if(r)goto S_58299;}
#line 12083 "ide/ide_methods.bas"
do{
#line 12083 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 1 ;
#line 12083 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12083,"ide_methods.bas");}while(r);
#line 12083 "ide/ide_methods.bas"
}else{
#line 12083 "ide/ide_methods.bas"
do{
#line 12083 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 0 ;
#line 12083 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12083,"ide_methods.bas");}while(r);
#line 12083 "ide/ide_methods.bas"
}
#line 12084 "ide/ide_methods.bas"
do{
#line 12084 "ide/ide_methods.bas"
*__INTEGER_IDEFINDINVERT= 0 ;
#line 12084 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12084,"ide_methods.bas");}while(r);
#line 12085 "ide/ide_methods.bas"
}
#line 12086 "ide/ide_methods.bas"
do{
#line 12086 "ide/ide_methods.bas"
SUB_IDECENTERCURRENTLINE();
#line 12086 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12086,"ide_methods.bas");}while(r);
#line 12087 "ide/ide_methods.bas"
do{
#line 12087 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12087 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12087,"ide_methods.bas");}while(r);
#line 12088 "ide/ide_methods.bas"
}
#line 12090 "ide/ide_methods.bas"
S_58309:;
#line 12090 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDBACKWARDS)||is_error_pending()){
#line 12090 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12090,"ide_methods.bas");if(r)goto S_58309;}
#line 12091 "ide/ide_methods.bas"
do{
#line 12091 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_Y- 1 ;
#line 12091 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12091,"ide_methods.bas");}while(r);
#line 12092 "ide/ide_methods.bas"
S_58311:;
#line 12092 "ide/ide_methods.bas"
if (((-(*_SUB_IDEFINDAGAIN_LONG_Y==(*_SUB_IDEFINDAGAIN_LONG_START- 1 )))&(-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 )))||is_error_pending()){
#line 12092 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12092,"ide_methods.bas");if(r)goto S_58311;}
#line 12093 "ide/ide_methods.bas"
do{
#line 12093 "ide/ide_methods.bas"
SUB_IDENOMATCH(_SUB_IDEFINDAGAIN_BYTE_SHOWFLAGS);
#line 12093 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12093,"ide_methods.bas");}while(r);
#line 12094 "ide/ide_methods.bas"
S_58313:;
#line 12094 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDINVERT)||is_error_pending()){
#line 12094 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12094,"ide_methods.bas");if(r)goto S_58313;}
#line 12095 "ide/ide_methods.bas"
S_58314:;
#line 12095 "ide/ide_methods.bas"
if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||is_error_pending()){
#line 12095 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12095,"ide_methods.bas");if(r)goto S_58314;}
#line 12095 "ide/ide_methods.bas"
do{
#line 12095 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 1 ;
#line 12095 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12095,"ide_methods.bas");}while(r);
#line 12095 "ide/ide_methods.bas"
}else{
#line 12095 "ide/ide_methods.bas"
do{
#line 12095 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 0 ;
#line 12095 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12095,"ide_methods.bas");}while(r);
#line 12095 "ide/ide_methods.bas"
}
#line 12096 "ide/ide_methods.bas"
do{
#line 12096 "ide/ide_methods.bas"
*__INTEGER_IDEFINDINVERT= 0 ;
#line 12096 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12096,"ide_methods.bas");}while(r);
#line 12097 "ide/ide_methods.bas"
}
#line 12098 "ide/ide_methods.bas"
do{
#line 12098 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12098 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12098,"ide_methods.bas");}while(r);
#line 12099 "ide/ide_methods.bas"
}
#line 12100 "ide/ide_methods.bas"
S_58323:;
#line 12100 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_Y< 1 ))||is_error_pending()){
#line 12100 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12100,"ide_methods.bas");if(r)goto S_58323;}
#line 12100 "ide/ide_methods.bas"
do{
#line 12100 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_Y=*__LONG_IDEN;
#line 12100 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12100,"ide_methods.bas");}while(r);
#line 12100 "ide/ide_methods.bas"
do{
#line 12100 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_LOOPED= 1 ;
#line 12100 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12100,"ide_methods.bas");}while(r);
#line 12100 "ide/ide_methods.bas"
}
#line 12101 "ide/ide_methods.bas"
do{
#line 12101 "ide/ide_methods.bas"
goto LABEL_IDEFINDNEXT2;
#line 12101 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12101,"ide_methods.bas");}while(r);
#line 12102 "ide/ide_methods.bas"
}else{
#line 12103 "ide/ide_methods.bas"
do{
#line 12103 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_Y=*_SUB_IDEFINDAGAIN_LONG_Y+ 1 ;
#line 12103 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12103,"ide_methods.bas");}while(r);
#line 12104 "ide/ide_methods.bas"
S_58330:;
#line 12104 "ide/ide_methods.bas"
if (((-(*_SUB_IDEFINDAGAIN_LONG_Y==(*_SUB_IDEFINDAGAIN_LONG_START+ 1 )))&(-(*_SUB_IDEFINDAGAIN_LONG_LOOPED== 1 )))||is_error_pending()){
#line 12104 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12104,"ide_methods.bas");if(r)goto S_58330;}
#line 12105 "ide/ide_methods.bas"
do{
#line 12105 "ide/ide_methods.bas"
SUB_IDENOMATCH(_SUB_IDEFINDAGAIN_BYTE_SHOWFLAGS);
#line 12105 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12105,"ide_methods.bas");}while(r);
#line 12106 "ide/ide_methods.bas"
S_58332:;
#line 12106 "ide/ide_methods.bas"
if ((*__INTEGER_IDEFINDINVERT)||is_error_pending()){
#line 12106 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12106,"ide_methods.bas");if(r)goto S_58332;}
#line 12107 "ide/ide_methods.bas"
S_58333:;
#line 12107 "ide/ide_methods.bas"
if ((-(*__INTEGER_IDEFINDBACKWARDS== 0 ))||is_error_pending()){
#line 12107 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12107,"ide_methods.bas");if(r)goto S_58333;}
#line 12107 "ide/ide_methods.bas"
do{
#line 12107 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 1 ;
#line 12107 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12107,"ide_methods.bas");}while(r);
#line 12107 "ide/ide_methods.bas"
}else{
#line 12107 "ide/ide_methods.bas"
do{
#line 12107 "ide/ide_methods.bas"
*__INTEGER_IDEFINDBACKWARDS= 0 ;
#line 12107 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12107,"ide_methods.bas");}while(r);
#line 12107 "ide/ide_methods.bas"
}
#line 12108 "ide/ide_methods.bas"
do{
#line 12108 "ide/ide_methods.bas"
*__INTEGER_IDEFINDINVERT= 0 ;
#line 12108 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12108,"ide_methods.bas");}while(r);
#line 12109 "ide/ide_methods.bas"
}
#line 12110 "ide/ide_methods.bas"
do{
#line 12110 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12110 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12110,"ide_methods.bas");}while(r);
#line 12111 "ide/ide_methods.bas"
}
#line 12112 "ide/ide_methods.bas"
S_58342:;
#line 12112 "ide/ide_methods.bas"
if ((-(*_SUB_IDEFINDAGAIN_LONG_Y>*__LONG_IDEN))||is_error_pending()){
#line 12112 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12112,"ide_methods.bas");if(r)goto S_58342;}
#line 12112 "ide/ide_methods.bas"
do{
#line 12112 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_Y= 1 ;
#line 12112 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12112,"ide_methods.bas");}while(r);
#line 12112 "ide/ide_methods.bas"
do{
#line 12112 "ide/ide_methods.bas"
*_SUB_IDEFINDAGAIN_LONG_LOOPED= 1 ;
#line 12112 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12112,"ide_methods.bas");}while(r);
#line 12112 "ide/ide_methods.bas"
}
#line 12113 "ide/ide_methods.bas"
do{
#line 12113 "ide/ide_methods.bas"
goto LABEL_IDEFINDNEXT2;
#line 12113 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12113,"ide_methods.bas");}while(r);
#line 12114 "ide/ide_methods.bas"
}
#line 12115 "ide/ide_methods.bas"
exit_subfunc:;
#line 12115 "ide/ide_methods.bas"
free_mem_lock(sf_mem_lock);
#line 12115 "ide/ide_methods.bas"
#include "free400.txt"
#line 12115 "ide/ide_methods.bas"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
#line 12115 "ide/ide_methods.bas"
cmem_sp=tmp_cmem_sp;
#line 12115 "ide/ide_methods.bas"
}
