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 "data136.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(25754,260,"ini.bm");}while(r);
do{
if(!qbevent)break;evnt(25754,262,"ini.bm");}while(r);
do{
if(!qbevent)break;evnt(25754,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(25754,265,"ini.bm");}while(r);
LABEL_CHECKSECTION:;
if(qbevent){evnt(25754,267,"ini.bm");r=0;}
S_35259:;
fornext_value4141=*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION- 1 ;
fornext_finalvalue4141= 1 ;
fornext_step4141= -1 ;
if (fornext_step4141<0) fornext_step_negative4141=1; else fornext_step_negative4141=0;
if (is_error_pending()) goto fornext_error4141;
goto fornext_entrylabel4141;
while(1){
fornext_value4141=fornext_step4141+(*_FUNC_INICURRENTSECTION_ULONG_I);
fornext_entrylabel4141:
*_FUNC_INICURRENTSECTION_ULONG_I=fornext_value4141;
if (fornext_step_negative4141){
if (fornext_value4141<fornext_finalvalue4141) break;
}else{
if (fornext_value4141>fornext_finalvalue4141) break;
}
fornext_error4141:;
if(qbevent){evnt(25754,268,"ini.bm");if(r)goto S_35259;}
S_35260:;
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(25754,269,"ini.bm");if(r)goto S_35260;}
do{
*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION=*_FUNC_INICURRENTSECTION_ULONG_I;
if(!qbevent)break;evnt(25754,270,"ini.bm");}while(r);
do{
goto fornext_exit_4140;
if(!qbevent)break;evnt(25754,270,"ini.bm");}while(r);
}
fornext_continue_4140:;
}
fornext_exit_4140:;
S_35265:;
if ((-(*_FUNC_INICURRENTSECTION_ULONG_I== 0 ))||is_error_pending()){
if(qbevent){evnt(25754,274,"ini.bm");if(r)goto S_35265;}
do{
qbs_set(_FUNC_INICURRENTSECTION_STRING_INICURRENTSECTION,qbs_new_txt_len("[]",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25754,274,"ini.bm");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25754,274,"ini.bm");}while(r);
}
S_35269:;
fornext_value4143=*_FUNC_INICURRENTSECTION_ULONG_GLOBALPOSITION- 1 ;
fornext_finalvalue4143= 1 ;
fornext_step4143= -1 ;
if (fornext_step4143<0) fornext_step_negative4143=1; else fornext_step_negative4143=0;
if (is_error_pending()) goto fornext_error4143;
goto fornext_entrylabel4143;
while(1){
fornext_value4143=fornext_step4143+(*_FUNC_INICURRENTSECTION_ULONG_I);
fornext_entrylabel4143:
*_FUNC_INICURRENTSECTION_ULONG_I=fornext_value4143;
if (fornext_step_negative4143){
if (fornext_value4143<fornext_finalvalue4143) break;
}else{
if (fornext_value4143>fornext_finalvalue4143) break;
}
fornext_error4143:;
if(qbevent){evnt(25754,277,"ini.bm");if(r)goto S_35269;}
S_35270:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(__STRING_INIWHOLEFILE,*_FUNC_INICURRENTSECTION_ULONG_I)== 10 )))||is_error_pending()){
if(qbevent){evnt(25754,278,"ini.bm");if(r)goto S_35270;}
do{
goto fornext_exit_4142;
if(!qbevent)break;evnt(25754,278,"ini.bm");}while(r);
}
S_35273:;
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(25754,279,"ini.bm");if(r)goto S_35273;}
do{
goto LABEL_CHECKSECTION;
if(!qbevent)break;evnt(25754,281,"ini.bm");}while(r);
}
fornext_continue_4142:;
}
fornext_exit_4142:;
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(25754,285,"ini.bm");}while(r);
S_35278:;
if ((-(*_FUNC_INICURRENTSECTION_ULONG_CLOSINGBRACKET> 0 ))||is_error_pending()){
if(qbevent){evnt(25754,286,"ini.bm");if(r)goto S_35278;}
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(25754,287,"ini.bm");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free136.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;
}
