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 "data206.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;
S_36134:;
if ((*__LONG_HASHFIND_REVERSE)||is_error_pending()){
if(qbevent){evnt(24223,158,"hash.bas");if(r)goto S_36134;}
do{
*_FUNC_HASHFINDCONT_LONG_I=*__LONG_HASHFIND_NEXTLISTITEM;
if(!qbevent)break;evnt(24223,160,"hash.bas");}while(r);
LABEL_HASHFINDREVC_NEXT:;
if(qbevent){evnt(24223,161,"hash.bas");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(24223,162,"hash.bas");}while(r);
S_36137:;
if ((*__LONG_HASHFIND_SEARCHFLAGS&*_FUNC_HASHFINDCONT_LONG_F)||is_error_pending()){
if(qbevent){evnt(24223,163,"hash.bas");if(r)goto S_36137;}
S_36138:;
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)))||is_error_pending()){
if(qbevent){evnt(24223,164,"hash.bas");if(r)goto S_36138;}
do{
*_FUNC_HASHFINDCONT_LONG_RESULTFLAGS=*_FUNC_HASHFINDCONT_LONG_F;
if(!qbevent)break;evnt(24223,165,"hash.bas");}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(24223,166,"hash.bas");}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(24223,167,"hash.bas");}while(r);
S_36142:;
if ((*_FUNC_HASHFINDCONT_LONG_I2)||is_error_pending()){
if(qbevent){evnt(24223,168,"hash.bas");if(r)goto S_36142;}
do{
*_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 2 ;
if(!qbevent)break;evnt(24223,169,"hash.bas");}while(r);
do{
*__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDCONT_LONG_I2;
if(!qbevent)break;evnt(24223,170,"hash.bas");}while(r);
do{
*__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I;
if(!qbevent)break;evnt(24223,171,"hash.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24223,172,"hash.bas");}while(r);
}else{
do{
*_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 1 ;
if(!qbevent)break;evnt(24223,174,"hash.bas");}while(r);
do{
*__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I;
if(!qbevent)break;evnt(24223,175,"hash.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24223,176,"hash.bas");}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(24223,180,"hash.bas");}while(r);
S_36155:;
if ((*_FUNC_HASHFINDCONT_LONG_I)||is_error_pending()){
if(qbevent){evnt(24223,181,"hash.bas");if(r)goto S_36155;}
do{
goto LABEL_HASHFINDREVC_NEXT;
if(!qbevent)break;evnt(24223,181,"hash.bas");}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24223,182,"hash.bas");}while(r);
}else{
do{
*_FUNC_HASHFINDCONT_LONG_I=*__LONG_HASHFIND_NEXTLISTITEM;
if(!qbevent)break;evnt(24223,186,"hash.bas");}while(r);
LABEL_HASHFINDC_NEXT:;
if(qbevent){evnt(24223,187,"hash.bas");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(24223,188,"hash.bas");}while(r);
S_36162:;
if ((*__LONG_HASHFIND_SEARCHFLAGS&*_FUNC_HASHFINDCONT_LONG_F)||is_error_pending()){
if(qbevent){evnt(24223,189,"hash.bas");if(r)goto S_36162;}
S_36163:;
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)))||is_error_pending()){
if(qbevent){evnt(24223,190,"hash.bas");if(r)goto S_36163;}
do{
*_FUNC_HASHFINDCONT_LONG_RESULTFLAGS=*_FUNC_HASHFINDCONT_LONG_F;
if(!qbevent)break;evnt(24223,191,"hash.bas");}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(24223,192,"hash.bas");}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(24223,193,"hash.bas");}while(r);
S_36167:;
if ((*_FUNC_HASHFINDCONT_LONG_I2)||is_error_pending()){
if(qbevent){evnt(24223,194,"hash.bas");if(r)goto S_36167;}
do{
*_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 2 ;
if(!qbevent)break;evnt(24223,195,"hash.bas");}while(r);
do{
*__LONG_HASHFIND_NEXTLISTITEM=*_FUNC_HASHFINDCONT_LONG_I2;
if(!qbevent)break;evnt(24223,196,"hash.bas");}while(r);
do{
*__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I;
if(!qbevent)break;evnt(24223,197,"hash.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24223,198,"hash.bas");}while(r);
}else{
do{
*_FUNC_HASHFINDCONT_LONG_HASHFINDCONT= 1 ;
if(!qbevent)break;evnt(24223,200,"hash.bas");}while(r);
do{
*__LONG_HASHREMOVE_LASTFOUND=*_FUNC_HASHFINDCONT_LONG_I;
if(!qbevent)break;evnt(24223,201,"hash.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24223,202,"hash.bas");}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(24223,206,"hash.bas");}while(r);
S_36180:;
if ((*_FUNC_HASHFINDCONT_LONG_I)||is_error_pending()){
if(qbevent){evnt(24223,207,"hash.bas");if(r)goto S_36180;}
do{
goto LABEL_HASHFINDC_NEXT;
if(!qbevent)break;evnt(24223,207,"hash.bas");}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24223,208,"hash.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;
return *_FUNC_HASHFINDCONT_LONG_HASHFINDCONT;
}
