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 "data177.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,62,"sb_qb64pe_extension.bm");}while(r);
S_36304:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_CLEARBUFFERS_STRING_SBNAME,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25755,64,"sb_qb64pe_extension.bm");if(r)goto S_36304;}
S_36305:;
fornext_value4264= 0 ;
fornext_finalvalue4264=func_ubound(__ARRAY_STRING_SBUFN,1,1);
fornext_step4264= 1 ;
if (fornext_step4264<0) fornext_step_negative4264=1; else fornext_step_negative4264=0;
if (is_error_pending()) goto fornext_error4264;
goto fornext_entrylabel4264;
while(1){
fornext_value4264=fornext_step4264+(*_SUB_CLEARBUFFERS_INTEGER_BUF);
fornext_entrylabel4264:
*_SUB_CLEARBUFFERS_INTEGER_BUF=fornext_value4264;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4264){
if (fornext_value4264<fornext_finalvalue4264) break;
}else{
if (fornext_value4264>fornext_finalvalue4264) break;
}
fornext_error4264:;
if(qbevent){evnt(25755,65,"sb_qb64pe_extension.bm");if(r)goto S_36305;}
S_36306:;
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)))||is_error_pending()){
if(qbevent){evnt(25755,66,"sb_qb64pe_extension.bm");if(r)goto S_36306;}
do{
goto fornext_exit_4263;
if(!qbevent)break;evnt(25755,66,"sb_qb64pe_extension.bm");}while(r);
}
fornext_continue_4263:;
}
fornext_exit_4263:;
S_36310:;
if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_CLEARBUFFERS_INTEGER_BUF>func_ubound(__ARRAY_STRING_SBUFN,1,1))))||is_error_pending()){
if(qbevent){evnt(25755,68,"sb_qb64pe_extension.bm");if(r)goto S_36310;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25755,68,"sb_qb64pe_extension.bm");}while(r);
}
do{
SUB_DISPOSEBUF(_SUB_CLEARBUFFERS_INTEGER_BUF);
if(!qbevent)break;evnt(25755,69,"sb_qb64pe_extension.bm");}while(r);
do{
tmp_long=array_check((*_SUB_CLEARBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5]);
if (!is_error_pending()) 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(25755,69,"sb_qb64pe_extension.bm");}while(r);
}else{
S_36316:;
fornext_value4266= 0 ;
fornext_finalvalue4266=func_ubound(__ARRAY_STRING_SBUFN,1,1);
fornext_step4266= 1 ;
if (fornext_step4266<0) fornext_step_negative4266=1; else fornext_step_negative4266=0;
if (is_error_pending()) goto fornext_error4266;
goto fornext_entrylabel4266;
while(1){
fornext_value4266=fornext_step4266+(*_SUB_CLEARBUFFERS_INTEGER_BUF);
fornext_entrylabel4266:
*_SUB_CLEARBUFFERS_INTEGER_BUF=fornext_value4266;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4266){
if (fornext_value4266<fornext_finalvalue4266) break;
}else{
if (fornext_value4266>fornext_finalvalue4266) break;
}
fornext_error4266:;
if(qbevent){evnt(25755,71,"sb_qb64pe_extension.bm");if(r)goto S_36316;}
S_36317:;
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))))||is_error_pending()){
if(qbevent){evnt(25755,72,"sb_qb64pe_extension.bm");if(r)goto S_36317;}
do{
SUB_DISPOSEBUF(_SUB_CLEARBUFFERS_INTEGER_BUF);
if(!qbevent)break;evnt(25755,72,"sb_qb64pe_extension.bm");}while(r);
do{
tmp_long=array_check((*_SUB_CLEARBUFFERS_INTEGER_BUF)-__ARRAY_STRING_SBUFN[4],__ARRAY_STRING_SBUFN[5]);
if (!is_error_pending()) 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(25755,72,"sb_qb64pe_extension.bm");}while(r);
}
fornext_continue_4265:;
}
fornext_exit_4265:;
}
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;
}
