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 "data128.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(24220,260,"ini.bm");}while(r);
do{
if(!qbevent)break;evnt(24220,262,"ini.bm");}while(r);
do{
if(!qbevent)break;evnt(24220,263,"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(24220,265,"ini.bm");}while(r);
LABEL_CHECKSECTION:;
if(qbevent){evnt(24220,267,"ini.bm");r=0;}
S_33749:;
fornext_value3910=*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION- 1 ;
fornext_finalvalue3910= 1 ;
fornext_step3910= -1 ;
if (fornext_step3910<0) fornext_step_negative3910=1; else fornext_step_negative3910=0;
if (is_error_pending()) goto fornext_error3910;
goto fornext_entrylabel3910;
while(1){
fornext_value3910=fornext_step3910+(*_FUNC_INICURRENTSECTION_ULONG_I);
fornext_entrylabel3910:
*_FUNC_INICURRENTSECTION_ULONG_I=fornext_value3910;
if (fornext_step_negative3910){
if (fornext_value3910<fornext_finalvalue3910) break;
}else{
if (fornext_value3910>fornext_finalvalue3910) break;
}
fornext_error3910:;
if(qbevent){evnt(24220,268,"ini.bm");if(r)goto S_33749;}
S_33750:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)==qbs_asc(qbs_new_txt_len("[",1)))))||is_error_pending()){
if(qbevent){evnt(24220,269,"ini.bm");if(r)goto S_33750;}
do{
*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION=*_FUNC_INICURRENTSECTION_ULONG_I;
if(!qbevent)break;evnt(24220,270,"ini.bm");}while(r);
do{
goto fornext_exit_3909;
if(!qbevent)break;evnt(24220,270,"ini.bm");}while(r);
}
fornext_continue_3909:;
}
fornext_exit_3909:;
S_33755:;
if ((-(*_FUNC_INICURRENTSECTION_ULONG_I== 0 ))||is_error_pending()){
if(qbevent){evnt(24220,274,"ini.bm");if(r)goto S_33755;}
do{
qbs_set(_FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION,qbs_new_txt_len("[]",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24220,274,"ini.bm");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24220,274,"ini.bm");}while(r);
}
S_33759:;
fornext_value3912=*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION- 1 ;
fornext_finalvalue3912= 1 ;
fornext_step3912= -1 ;
if (fornext_step3912<0) fornext_step_negative3912=1; else fornext_step_negative3912=0;
if (is_error_pending()) goto fornext_error3912;
goto fornext_entrylabel3912;
while(1){
fornext_value3912=fornext_step3912+(*_FUNC_INICURRENTSECTION_ULONG_I);
fornext_entrylabel3912:
*_FUNC_INICURRENTSECTION_ULONG_I=fornext_value3912;
if (fornext_step_negative3912){
if (fornext_value3912<fornext_finalvalue3912) break;
}else{
if (fornext_value3912>fornext_finalvalue3912) break;
}
fornext_error3912:;
if(qbevent){evnt(24220,277,"ini.bm");if(r)goto S_33759;}
S_33760:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)== 10 )))||is_error_pending()){
if(qbevent){evnt(24220,278,"ini.bm");if(r)goto S_33760;}
do{
goto fornext_exit_3911;
if(!qbevent)break;evnt(24220,278,"ini.bm");}while(r);
}
S_33763:;
if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)!= 10 ))&(-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)!= 32 ))))||is_error_pending()){
if(qbevent){evnt(24220,279,"ini.bm");if(r)goto S_33763;}
do{
goto LABEL_CHECKSECTION;
if(!qbevent)break;evnt(24220,281,"ini.bm");}while(r);
}
fornext_continue_3911:;
}
fornext_exit_3911:;
do{
*_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET=func_instr(*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION,__STRING_INIWHOLEFILE,qbs_new_txt_len("]",1),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24220,285,"ini.bm");}while(r);
S_33768:;
if ((-(*_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET> 0 ))||is_error_pending()){
if(qbevent){evnt(24220,286,"ini.bm");if(r)goto S_33768;}
do{
qbs_set(_FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION,func_mid(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION,*_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET-*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION+ 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24220,287,"ini.bm");}while(r);
}
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_INICURRENTSECTION_STRING_INICURRENTSECTION);return _FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION;
}
