qbs* FUNC_ARRAYREFERENCE(qbs*_FUNC_ARRAYREFERENCE_STRING_INDEXES,int32*_FUNC_ARRAYREFERENCE_LONG_TYP){
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 "data10.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{
*__INTEGER_ARRAYPROCESSINGHAPPENED= 1 ;
if(!qbevent)break;evnt(14780);}while(r);
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_IDNUMBER,qbs__tostr((int32)(*__LONG_CURRENTID),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14790);}while(r);
do{
if(!qbevent)break;evnt(14792);}while(r);
do{
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 0),(((char*)__UDT_ID)+((0+0))+ 0), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 256),(((char*)__UDT_ID)+((0+0))+ 256), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 512),(((char*)__UDT_ID)+((0+0))+ 512), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 516),(((char*)__UDT_ID)+((0+0))+ 516), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 518),(((char*)__UDT_ID)+((0+0))+ 518), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 520),(((char*)__UDT_ID)+((0+0))+ 520), 8);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 528),(((char*)__UDT_ID)+((0+0))+ 528), 8);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 536),(((char*)__UDT_ID)+((0+0))+ 536), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 540),(((char*)__UDT_ID)+((0+0))+ 540), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 544),(((char*)__UDT_ID)+((0+0))+ 544), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 546),(((char*)__UDT_ID)+((0+0))+ 546), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 548),(((char*)__UDT_ID)+((0+0))+ 548), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 550),(((char*)__UDT_ID)+((0+0))+ 550), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 806),(((char*)__UDT_ID)+((0+0))+ 806), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 808),(((char*)__UDT_ID)+((0+0))+ 808), 1);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 809),(((char*)__UDT_ID)+((0+0))+ 809), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 811),(((char*)__UDT_ID)+((0+0))+ 811), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 813),(((char*)__UDT_ID)+((0+0))+ 813), 400);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 1213),(((char*)__UDT_ID)+((0+0))+ 1213), 400);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 1613),(((char*)__UDT_ID)+((0+0))+ 1613), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 1869),(((char*)__UDT_ID)+((0+0))+ 1869), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2125),(((char*)__UDT_ID)+((0+0))+ 2125), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2381),(((char*)__UDT_ID)+((0+0))+ 2381), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2385),(((char*)__UDT_ID)+((0+0))+ 2385), 256);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2641),(((char*)__UDT_ID)+((0+0))+ 2641), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2645),(((char*)__UDT_ID)+((0+0))+ 2645), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2647),(((char*)__UDT_ID)+((0+0))+ 2647), 100);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2747),(((char*)__UDT_ID)+((0+0))+ 2747), 100);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2847),(((char*)__UDT_ID)+((0+0))+ 2847), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2851),(((char*)__UDT_ID)+((0+0))+ 2851), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2853),(((char*)__UDT_ID)+((0+0))+ 2853), 2);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2855),(((char*)__UDT_ID)+((0+0))+ 2855), 4);
memcpy((((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2859),(((char*)__UDT_ID)+((0+0))+ 2859), 2);
qbs_set(*(qbs**)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+0))+ 2861), *(qbs**)(((char*)__UDT_ID)+((0+0))+ 2861));
if(!qbevent)break;evnt(14794);}while(r);
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_STRING_INDEXES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14796);}while(r);
do{
*_FUNC_ARRAYREFERENCE_LONG_TYP=*(int32*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+512)))+*__LONG_ISARRAY+*__LONG_ISREFERENCE;
if(!qbevent)break;evnt(14797);}while(r);
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+550))),256,1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14798);}while(r);
S_17264:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_A,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(14800);if(r)goto S_17264;}
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("0",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14801);}while(r);
do{
goto LABEL_GOTARRAYINDEX;
if(!qbevent)break;evnt(14802);}while(r);
}
do{
*_FUNC_ARRAYREFERENCE_LONG_N=FUNC_NUMELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14805);}while(r);
do{
*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS= 1 ;
if(!qbevent)break;evnt(14808);}while(r);
do{
*_FUNC_ARRAYREFERENCE_LONG_B= 0 ;
if(!qbevent)break;evnt(14809);}while(r);
S_17271:;
fornext_value2533= 1 ;
fornext_finalvalue2533=*_FUNC_ARRAYREFERENCE_LONG_N;
fornext_step2533= 1 ;
if (fornext_step2533<0) fornext_step_negative2533=1; else fornext_step_negative2533=0;
if (is_error_pending()) goto fornext_error2533;
goto fornext_entrylabel2533;
while(1){
fornext_value2533=fornext_step2533+(*_FUNC_ARRAYREFERENCE_LONG_I);
fornext_entrylabel2533:
*_FUNC_ARRAYREFERENCE_LONG_I=fornext_value2533;
if (fornext_step_negative2533){
if (fornext_value2533<fornext_finalvalue2533) break;
}else{
if (fornext_value2533>fornext_finalvalue2533) break;
}
fornext_error2533:;
if(qbevent){evnt(14810);if(r)goto S_17271;}
do{
*_FUNC_ARRAYREFERENCE_LONG_A=qbs_asc(FUNC_GETELEMENT(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14811);}while(r);
S_17273:;
if ((-(*_FUNC_ARRAYREFERENCE_LONG_A== 40 ))||is_error_pending()){
if(qbevent){evnt(14812);if(r)goto S_17273;}
do{
*_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B+ 1 ;
if(!qbevent)break;evnt(14812);}while(r);
}
S_17276:;
if ((-(*_FUNC_ARRAYREFERENCE_LONG_A== 41 ))||is_error_pending()){
if(qbevent){evnt(14813);if(r)goto S_17276;}
do{
*_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B- 1 ;
if(!qbevent)break;evnt(14813);}while(r);
}
S_17279:;
if (((-(*_FUNC_ARRAYREFERENCE_LONG_A== 44 ))&(-(*_FUNC_ARRAYREFERENCE_LONG_B== 0 )))||is_error_pending()){
if(qbevent){evnt(14814);if(r)goto S_17279;}
do{
*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS=*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS+ 1 ;
if(!qbevent)break;evnt(14814);}while(r);
}
fornext_continue_2532:;
}
fornext_exit_2532:;
S_17283:;
if ((-(*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+516)))== -1 ))||is_error_pending()){
if(qbevent){evnt(14817);if(r)goto S_17283;}
S_17284:;
if (((-(((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])]!= 0 ))&(-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS!=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])])))||is_error_pending()){
if(qbevent){evnt(14818);if(r)goto S_17284;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot change the number of elements an array has!",50));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14818);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(14818);}while(r);
}
S_17288:;
if ((-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS== 1 ))||is_error_pending()){
if(qbevent){evnt(14819);if(r)goto S_17288;}
do{
*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+516)))= 1 ;
if(!qbevent)break;evnt(14819);}while(r);
do{
*(int16*)(((char*)__ARRAY_UDT_IDS[0])+(((array_check((*__LONG_CURRENTID)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+516)))= 1 ;
if(!qbevent)break;evnt(14819);}while(r);
}
do{
tmp_long=array_check((*__LONG_CURRENTID)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5]);
if (!is_error_pending()) ((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[tmp_long]=*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS;
if(!qbevent)break;evnt(14820);}while(r);
}else{
S_17294:;
if ((-(*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS!=*(int16*)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+((0+516)))))||is_error_pending()){
if(qbevent){evnt(14822);if(r)goto S_17294;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot change the number of elements an array has!",50));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14822);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(14822);}while(r);
}
}
do{
*_FUNC_ARRAYREFERENCE_LONG_CURARG= 1 ;
if(!qbevent)break;evnt(14825);}while(r);
do{
*_FUNC_ARRAYREFERENCE_LONG_FIRSTI= 1 ;
if(!qbevent)break;evnt(14826);}while(r);
S_17301:;
fornext_value2535= 1 ;
fornext_finalvalue2535=*_FUNC_ARRAYREFERENCE_LONG_N;
fornext_step2535= 1 ;
if (fornext_step2535<0) fornext_step_negative2535=1; else fornext_step_negative2535=0;
if (is_error_pending()) goto fornext_error2535;
goto fornext_entrylabel2535;
while(1){
fornext_value2535=fornext_step2535+(*_FUNC_ARRAYREFERENCE_LONG_I);
fornext_entrylabel2535:
*_FUNC_ARRAYREFERENCE_LONG_I=fornext_value2535;
if (fornext_step_negative2535){
if (fornext_value2535<fornext_finalvalue2535) break;
}else{
if (fornext_value2535>fornext_finalvalue2535) break;
}
fornext_error2535:;
if(qbevent){evnt(14827);if(r)goto S_17301;}
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_L,FUNC_GETELEMENT(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14828);}while(r);
S_17303:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(14829);if(r)goto S_17303;}
do{
*_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B+ 1 ;
if(!qbevent)break;evnt(14829);}while(r);
}
S_17306:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(14830);if(r)goto S_17306;}
do{
*_FUNC_ARRAYREFERENCE_LONG_B=*_FUNC_ARRAYREFERENCE_LONG_B- 1 ;
if(!qbevent)break;evnt(14830);}while(r);
}
S_17309:;
if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(",",1)))&(-(*_FUNC_ARRAYREFERENCE_LONG_B== 0 )))|(-(*_FUNC_ARRAYREFERENCE_LONG_I==*_FUNC_ARRAYREFERENCE_LONG_N))))||is_error_pending()){
if(qbevent){evnt(14831);if(r)goto S_17309;}
S_17310:;
if ((-(*_FUNC_ARRAYREFERENCE_LONG_I==*_FUNC_ARRAYREFERENCE_LONG_N))||is_error_pending()){
if(qbevent){evnt(14832);if(r)goto S_17310;}
S_17311:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_L,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(14833);if(r)goto S_17311;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Array index missing",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14833);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(14833);}while(r);
}
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_E,FUNC_EVALUATETOTYP(FUNC_GETELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_FIRSTI,_FUNC_ARRAYREFERENCE_LONG_I),&(pass2536= 64 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14834);}while(r);
S_17316:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(14835);if(r)goto S_17316;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(14835);}while(r);
}
}else{
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_E,FUNC_EVALUATETOTYP(FUNC_GETELEMENTS(_FUNC_ARRAYREFERENCE_STRING_A,_FUNC_ARRAYREFERENCE_LONG_FIRSTI,&(pass2537=*_FUNC_ARRAYREFERENCE_LONG_I- 1 )),&(pass2538= 64 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14837);}while(r);
S_17321:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(14838);if(r)goto S_17321;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(14838);}while(r);
}
}
S_17325:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ARRAYREFERENCE_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(14840);if(r)goto S_17325;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Array index missing",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14840);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(14840);}while(r);
}
do{
*_FUNC_ARRAYREFERENCE_LONG_ARGI=((*_FUNC_ARRAYREFERENCE_LONG_ELEMENTS-*_FUNC_ARRAYREFERENCE_LONG_CURARG)* 4 )+( 4 );
if(!qbevent)break;evnt(14841);}while(r);
S_17330:;
if ((-(*_FUNC_ARRAYREFERENCE_LONG_CURARG== 1 ))||is_error_pending()){
if(qbevent){evnt(14842);if(r)goto S_17330;}
S_17331:;
if ((*__LONG_CHECKINGON)||is_error_pending()){
if(qbevent){evnt(14843);if(r)goto S_17331;}
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("array_check((",13)),_FUNC_ARRAYREFERENCE_STRING_E),qbs_new_txt_len(")-",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_FUNC_ARRAYREFERENCE_LONG_ARGI),NULL,0)),qbs_new_txt_len("],",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 1 ),NULL,0)),qbs_new_txt_len("])+",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14844);}while(r);
}else{
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("(",1)),_FUNC_ARRAYREFERENCE_STRING_E),qbs_new_txt_len(")-",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_FUNC_ARRAYREFERENCE_LONG_ARGI),NULL,0)),qbs_new_txt_len("]+",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14846);}while(r);
}
}else{
S_17337:;
if ((*__LONG_CHECKINGON)||is_error_pending()){
if(qbevent){evnt(14850);if(r)goto S_17337;}
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("array_check((",13)),_FUNC_ARRAYREFERENCE_STRING_E),qbs_new_txt_len(")-",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_FUNC_ARRAYREFERENCE_LONG_ARGI),NULL,0)),qbs_new_txt_len("],",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 1 ),NULL,0)),qbs_new_txt_len("])*",3)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 2 ),NULL,0)),qbs_new_txt_len("]+",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14851);}while(r);
}else{
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_R,qbs_new_txt_len("((",2)),_FUNC_ARRAYREFERENCE_STRING_E),qbs_new_txt_len(")-",2)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_FUNC_ARRAYREFERENCE_LONG_ARGI),NULL,0)),qbs_new_txt_len("])*",3)),_FUNC_ARRAYREFERENCE_STRING_N),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_FUNC_ARRAYREFERENCE_LONG_ARGI+ 2 ),NULL,0)),qbs_new_txt_len("]+",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14853);}while(r);
}
}
do{
*_FUNC_ARRAYREFERENCE_LONG_FIRSTI=*_FUNC_ARRAYREFERENCE_LONG_I+ 1 ;
if(!qbevent)break;evnt(14856);}while(r);
do{
*_FUNC_ARRAYREFERENCE_LONG_CURARG=*_FUNC_ARRAYREFERENCE_LONG_CURARG+ 1 ;
if(!qbevent)break;evnt(14857);}while(r);
}
fornext_continue_2534:;
}
fornext_exit_2534:;
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_left(_FUNC_ARRAYREFERENCE_STRING_R,_FUNC_ARRAYREFERENCE_STRING_R->len- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14860);}while(r);
LABEL_GOTARRAYINDEX:;
if(qbevent){evnt(14861);r=0;}
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_R,qbs_add(qbs_add(_FUNC_ARRAYREFERENCE_STRING_IDNUMBER,__STRING1_SP3),_FUNC_ARRAYREFERENCE_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14863);}while(r);
do{
qbs_set(_FUNC_ARRAYREFERENCE_STRING_ARRAYREFERENCE,_FUNC_ARRAYREFERENCE_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(14864);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free10.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_ARRAYREFERENCE_STRING_ARRAYREFERENCE);return _FUNC_ARRAYREFERENCE_STRING_ARRAYREFERENCE;
}
