int32 FUNC_FINDBUFFWD(int16*_FUNC_FINDBUFFWD_INTEGER_HANDLE,int16*_FUNC_FINDBUFFWD_INTEGER_SBFINDID,int16*_FUNC_FINDBUFFWD_INTEGER_METHOD,int16*_FUNC_FINDBUFFWD_INTEGER_TREAT){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_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 (is_error_pending()) goto exit_subfunc;
do{
if(!qbevent)break;evnt(25755,514,"simplebuffer.bm");}while(r);
S_35819:;
if ((~(FUNC_CHECKHANDLE(_FUNC_FINDBUFFWD_INTEGER_HANDLE)))||is_error_pending()){
if(qbevent){evnt(25755,516,"simplebuffer.bm");if(r)goto S_35819;}
do{
error( 258 );
if(!qbevent)break;evnt(25755,516,"simplebuffer.bm");}while(r);
do{
close_program=1;
end();
if(!qbevent)break;evnt(25755,516,"simplebuffer.bm");}while(r);
}
do{
*_FUNC_FINDBUFFWD_LONG_BUF=*_FUNC_FINDBUFFWD_INTEGER_HANDLE* 106 ;
if(!qbevent)break;evnt(25755,517,"simplebuffer.bm");}while(r);
do{
*_FUNC_FINDBUFFWD_LONG_FINDBUFFWD= -13ll ;
if(!qbevent)break;evnt(25755,519,"simplebuffer.bm");}while(r);
S_35825:;
if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_FINDBUFFWD_INTEGER_SBFINDID< 1 ))|(-(*_FUNC_FINDBUFFWD_INTEGER_SBFINDID> 100 )))&(-(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])]))->len== 16 ))))||is_error_pending()){
if(qbevent){evnt(25755,520,"simplebuffer.bm");if(r)goto S_35825;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25755,520,"simplebuffer.bm");}while(r);
}
do{
*_FUNC_FINDBUFFWD_LONG_CPOS=FUNC_GETBUFPOS(_FUNC_FINDBUFFWD_INTEGER_HANDLE);
if(!qbevent)break;evnt(25755,522,"simplebuffer.bm");}while(r);
do{
*_FUNC_FINDBUFFWD_LONG_EOB=FUNC_GETBUFLEN(_FUNC_FINDBUFFWD_INTEGER_HANDLE)+ 1 ;
if(!qbevent)break;evnt(25755,522,"simplebuffer.bm");}while(r);
do{
*_FUNC_FINDBUFFWD_LONG_FPOS=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 3 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_INTEGER_SBFINDID* 4 , 4 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25755,523,"simplebuffer.bm");}while(r);
do{
*_FUNC_FINDBUFFWD_LONG_FLEN=string2l(func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 4 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_INTEGER_SBFINDID* 4 , 4 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25755,524,"simplebuffer.bm");}while(r);
S_35832:;
if (((-(*_FUNC_FINDBUFFWD_LONG_FPOS> 0 ))&(-(*_FUNC_FINDBUFFWD_LONG_FPOS<*_FUNC_FINDBUFFWD_LONG_EOB))&(-(*_FUNC_FINDBUFFWD_LONG_CPOS==*_FUNC_FINDBUFFWD_LONG_FPOS)))||is_error_pending()){
if(qbevent){evnt(25755,525,"simplebuffer.bm");if(r)goto S_35832;}
do{
*_FUNC_FINDBUFFWD_LONG_CPOS=*_FUNC_FINDBUFFWD_LONG_CPOS+ 1 ;
if(!qbevent)break;evnt(25755,525,"simplebuffer.bm");}while(r);
}
do{
*_FUNC_FINDBUFFWD_LONG_FINDBUFFWD= -14ll ;
if(!qbevent)break;evnt(25755,526,"simplebuffer.bm");}while(r);
S_35836:;
if ((-(*_FUNC_FINDBUFFWD_LONG_FLEN== -889275714 ))||is_error_pending()){
if(qbevent){evnt(25755,526,"simplebuffer.bm");if(r)goto S_35836;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25755,526,"simplebuffer.bm");}while(r);
}
S_35839:;
if ((-(*_FUNC_FINDBUFFWD_INTEGER_TREAT== 0 ))||is_error_pending()){
if(qbevent){evnt(25755,528,"simplebuffer.bm");if(r)goto S_35839;}
do{
qbs_set(_FUNC_FINDBUFFWD_STRING_FIND,((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+*_FUNC_FINDBUFFWD_INTEGER_SBFINDID+ 4 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25755,529,"simplebuffer.bm");}while(r);
S_35841:;
while((-(*_FUNC_FINDBUFFWD_LONG_CPOS<*_FUNC_FINDBUFFWD_LONG_EOB))||is_error_pending()){
if(qbevent){evnt(25755,530,"simplebuffer.bm");if(r)goto S_35841;}
S_35842:;
if(qbevent){evnt(25755,531,"simplebuffer.bm");if(r)goto S_35842;}
S_35843:;
if (((*_FUNC_FINDBUFFWD_INTEGER_METHOD<( 0 )))||is_error_pending()){
if(qbevent){evnt(25755,532,"simplebuffer.bm");if(r)goto S_35843;}
S_35844:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDBUFFWD_STRING_FIND,func_chr(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_LONG_CPOS)),0)== 0 )))||is_error_pending()){
if(qbevent){evnt(25755,532,"simplebuffer.bm");if(r)goto S_35844;}
do{
goto ww_exit_4197;
if(!qbevent)break;evnt(25755,532,"simplebuffer.bm");}while(r);
}
sc_ec_120_end:;
goto sc_4198_end;
}
S_35847:;
if (((*_FUNC_FINDBUFFWD_INTEGER_METHOD>( 0 )))||is_error_pending()){
if(qbevent){evnt(25755,533,"simplebuffer.bm");if(r)goto S_35847;}
S_35848:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDBUFFWD_STRING_FIND,func_chr(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_LONG_CPOS)),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25755,533,"simplebuffer.bm");if(r)goto S_35848;}
do{
goto ww_exit_4197;
if(!qbevent)break;evnt(25755,533,"simplebuffer.bm");}while(r);
}
sc_ec_121_end:;
goto sc_4198_end;
}
S_35852:;
fornext_value4200= 1 ;
fornext_finalvalue4200=*_FUNC_FINDBUFFWD_LONG_FLEN;
fornext_step4200= 1 ;
if (fornext_step4200<0) fornext_step_negative4200=1; else fornext_step_negative4200=0;
if (is_error_pending()) goto fornext_error4200;
goto fornext_entrylabel4200;
while(1){
fornext_value4200=fornext_step4200+(*_FUNC_FINDBUFFWD_LONG_CH);
fornext_entrylabel4200:
*_FUNC_FINDBUFFWD_LONG_CH=fornext_value4200;
if (fornext_step_negative4200){
if (fornext_value4200<fornext_finalvalue4200) break;
}else{
if (fornext_value4200>fornext_finalvalue4200) break;
}
fornext_error4200:;
if(qbevent){evnt(25755,535,"simplebuffer.bm");if(r)goto S_35852;}
do{
*_FUNC_FINDBUFFWD_LONG_BPOS=*_FUNC_FINDBUFFWD_LONG_CPOS+*_FUNC_FINDBUFFWD_LONG_CH- 1 ;
if(!qbevent)break;evnt(25755,536,"simplebuffer.bm");}while(r);
S_35854:;
if ((-(*_FUNC_FINDBUFFWD_LONG_BPOS>=*_FUNC_FINDBUFFWD_LONG_EOB))||is_error_pending()){
if(qbevent){evnt(25755,536,"simplebuffer.bm");if(r)goto S_35854;}
do{
goto fornext_exit_4199;
if(!qbevent)break;evnt(25755,536,"simplebuffer.bm");}while(r);
}
S_35857:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_LONG_BPOS)!=qbs_asc(_FUNC_FINDBUFFWD_STRING_FIND,*_FUNC_FINDBUFFWD_LONG_CH))))||is_error_pending()){
if(qbevent){evnt(25755,537,"simplebuffer.bm");if(r)goto S_35857;}
do{
goto fornext_exit_4199;
if(!qbevent)break;evnt(25755,537,"simplebuffer.bm");}while(r);
}
fornext_continue_4199:;
}
fornext_exit_4199:;
S_35861:;
if ((-(*_FUNC_FINDBUFFWD_LONG_CH>*_FUNC_FINDBUFFWD_LONG_FLEN))||is_error_pending()){
if(qbevent){evnt(25755,539,"simplebuffer.bm");if(r)goto S_35861;}
do{
goto ww_exit_4197;
if(!qbevent)break;evnt(25755,539,"simplebuffer.bm");}while(r);
}
sc_4198_end:;
do{
*_FUNC_FINDBUFFWD_LONG_CPOS=*_FUNC_FINDBUFFWD_LONG_CPOS+ 1 ;
if(!qbevent)break;evnt(25755,541,"simplebuffer.bm");}while(r);
ww_continue_4197:;
}
ww_exit_4197:;
}else{
do{
qbs_set(_FUNC_FINDBUFFWD_STRING_FIND,qbs_ucase(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+*_FUNC_FINDBUFFWD_INTEGER_SBFINDID+ 4 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])]))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25755,544,"simplebuffer.bm");}while(r);
S_35869:;
while((-(*_FUNC_FINDBUFFWD_LONG_CPOS<*_FUNC_FINDBUFFWD_LONG_EOB))||is_error_pending()){
if(qbevent){evnt(25755,545,"simplebuffer.bm");if(r)goto S_35869;}
S_35870:;
if(qbevent){evnt(25755,546,"simplebuffer.bm");if(r)goto S_35870;}
S_35871:;
if (((*_FUNC_FINDBUFFWD_INTEGER_METHOD<( 0 )))||is_error_pending()){
if(qbevent){evnt(25755,547,"simplebuffer.bm");if(r)goto S_35871;}
S_35872:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDBUFFWD_STRING_FIND,qbs_ucase(func_chr(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_LONG_CPOS))),0)== 0 )))||is_error_pending()){
if(qbevent){evnt(25755,547,"simplebuffer.bm");if(r)goto S_35872;}
do{
goto ww_exit_4201;
if(!qbevent)break;evnt(25755,547,"simplebuffer.bm");}while(r);
}
sc_ec_122_end:;
goto sc_4202_end;
}
S_35875:;
if (((*_FUNC_FINDBUFFWD_INTEGER_METHOD>( 0 )))||is_error_pending()){
if(qbevent){evnt(25755,548,"simplebuffer.bm");if(r)goto S_35875;}
S_35876:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDBUFFWD_STRING_FIND,qbs_ucase(func_chr(qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_LONG_CPOS))),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25755,548,"simplebuffer.bm");if(r)goto S_35876;}
do{
goto ww_exit_4201;
if(!qbevent)break;evnt(25755,548,"simplebuffer.bm");}while(r);
}
sc_ec_123_end:;
goto sc_4202_end;
}
S_35880:;
fornext_value4204= 1 ;
fornext_finalvalue4204=*_FUNC_FINDBUFFWD_LONG_FLEN;
fornext_step4204= 1 ;
if (fornext_step4204<0) fornext_step_negative4204=1; else fornext_step_negative4204=0;
if (is_error_pending()) goto fornext_error4204;
goto fornext_entrylabel4204;
while(1){
fornext_value4204=fornext_step4204+(*_FUNC_FINDBUFFWD_LONG_CH);
fornext_entrylabel4204:
*_FUNC_FINDBUFFWD_LONG_CH=fornext_value4204;
if (fornext_step_negative4204){
if (fornext_value4204<fornext_finalvalue4204) break;
}else{
if (fornext_value4204>fornext_finalvalue4204) break;
}
fornext_error4204:;
if(qbevent){evnt(25755,550,"simplebuffer.bm");if(r)goto S_35880;}
do{
*_FUNC_FINDBUFFWD_LONG_BPOS=*_FUNC_FINDBUFFWD_LONG_CPOS+*_FUNC_FINDBUFFWD_LONG_CH- 1 ;
if(!qbevent)break;evnt(25755,551,"simplebuffer.bm");}while(r);
S_35882:;
if ((-(*_FUNC_FINDBUFFWD_LONG_BPOS>=*_FUNC_FINDBUFFWD_LONG_EOB))||is_error_pending()){
if(qbevent){evnt(25755,551,"simplebuffer.bm");if(r)goto S_35882;}
do{
goto fornext_exit_4203;
if(!qbevent)break;evnt(25755,551,"simplebuffer.bm");}while(r);
}
do{
*_FUNC_FINDBUFFWD_INTEGER_CHV=qbs_asc(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 0 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_LONG_BPOS);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25755,552,"simplebuffer.bm");}while(r);
S_35886:;
if (((-(*_FUNC_FINDBUFFWD_INTEGER_CHV>= 97 ))&(-(*_FUNC_FINDBUFFWD_INTEGER_CHV<= 122 )))||is_error_pending()){
if(qbevent){evnt(25755,553,"simplebuffer.bm");if(r)goto S_35886;}
do{
*_FUNC_FINDBUFFWD_INTEGER_CHV=*_FUNC_FINDBUFFWD_INTEGER_CHV- 32 ;
if(!qbevent)break;evnt(25755,553,"simplebuffer.bm");}while(r);
}
S_35889:;
if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_FINDBUFFWD_INTEGER_CHV!=qbs_asc(_FUNC_FINDBUFFWD_STRING_FIND,*_FUNC_FINDBUFFWD_LONG_CH))))||is_error_pending()){
if(qbevent){evnt(25755,554,"simplebuffer.bm");if(r)goto S_35889;}
do{
goto fornext_exit_4203;
if(!qbevent)break;evnt(25755,554,"simplebuffer.bm");}while(r);
}
fornext_continue_4203:;
}
fornext_exit_4203:;
S_35893:;
if ((-(*_FUNC_FINDBUFFWD_LONG_CH>*_FUNC_FINDBUFFWD_LONG_FLEN))||is_error_pending()){
if(qbevent){evnt(25755,556,"simplebuffer.bm");if(r)goto S_35893;}
do{
goto ww_exit_4201;
if(!qbevent)break;evnt(25755,556,"simplebuffer.bm");}while(r);
}
sc_4202_end:;
do{
*_FUNC_FINDBUFFWD_LONG_CPOS=*_FUNC_FINDBUFFWD_LONG_CPOS+ 1 ;
if(!qbevent)break;evnt(25755,558,"simplebuffer.bm");}while(r);
ww_continue_4201:;
}
ww_exit_4201:;
}
S_35900:;
if ((-(*_FUNC_FINDBUFFWD_LONG_CPOS<*_FUNC_FINDBUFFWD_LONG_EOB))||is_error_pending()){
if(qbevent){evnt(25755,562,"simplebuffer.bm");if(r)goto S_35900;}
do{
sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 1 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])), 1 , 4 ,l2string(*_FUNC_FINDBUFFWD_LONG_CPOS),1);
if(!qbevent)break;evnt(25755,562,"simplebuffer.bm");}while(r);
}else{
do{
*_FUNC_FINDBUFFWD_LONG_CPOS= 0 ;
if(!qbevent)break;evnt(25755,562,"simplebuffer.bm");}while(r);
}
do{
sub_mid(((qbs*)(((uint64*)(__ARRAY_STRING_SIMPLEBUFFER_ARRAY[0]))[array_check((*_FUNC_FINDBUFFWD_LONG_BUF+ 3 )-__ARRAY_STRING_SIMPLEBUFFER_ARRAY[4],__ARRAY_STRING_SIMPLEBUFFER_ARRAY[5])])),*_FUNC_FINDBUFFWD_INTEGER_SBFINDID* 4 , 4 ,l2string(*_FUNC_FINDBUFFWD_LONG_CPOS),1);
if(!qbevent)break;evnt(25755,563,"simplebuffer.bm");}while(r);
do{
*_FUNC_FINDBUFFWD_LONG_FINDBUFFWD=*_FUNC_FINDBUFFWD_LONG_CPOS;
if(!qbevent)break;evnt(25755,564,"simplebuffer.bm");}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;
return *_FUNC_FINDBUFFWD_LONG_FINDBUFFWD;
}
