int32 FUNC_EVALPREIF(qbs*_FUNC_EVALPREIF_STRING_TEXT,qbs*_FUNC_EVALPREIF_STRING_ERR){
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 "data99.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
do{
qbs_set(_FUNC_EVALPREIF_STRING_TEMP,_FUNC_EVALPREIF_STRING_TEXT);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27731);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27732);}while(r);
do{
if (_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
if (_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]&1){
if (!error_occurred) error(10);
}else{
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=( 3 )-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(8);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]) error(257);
_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
if (_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[2]&4){
while(tmp_long--) ((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long]=(uint64)qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long]=(uint64)qbs_new(0,0);
}
_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4]=alloc_new_desc[4];
_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]=alloc_new_desc[5];
_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[6]=alloc_new_desc[6];
_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[7]=alloc_new_desc[7];
}
}
if(!qbevent)break;evnt(27734);}while(r);
do{
tmp_long=array_check(( 1 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len("=",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27735);}while(r);
do{
tmp_long=array_check(( 2 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len("<",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27736);}while(r);
do{
tmp_long=array_check(( 3 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len(">",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27737);}while(r);
S_36119:;
do{
if(qbevent){evnt(27738);if(r)goto S_36119;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27740);}while(r);
do{
*_FUNC_EVALPREIF_LONG_FIRST= 0 ;
if(!qbevent)break;evnt(27740);}while(r);
S_36122:;
fornext_value4264= 1 ;
fornext_finalvalue4264=func_ubound(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP,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+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4264:
*_FUNC_EVALPREIF_LONG_I=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(27741);if(r)goto S_36122;}
do{
*_FUNC_EVALPREIF_LONG_TEMP=func_instr(NULL,_FUNC_EVALPREIF_STRING_TEMP,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])),0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27742);}while(r);
S_36124:;
if ((-(*_FUNC_EVALPREIF_LONG_FIRST== 0 ))||is_error_pending()){
if(qbevent){evnt(27743);if(r)goto S_36124;}
do{
*_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_TEMP;
if(!qbevent)break;evnt(27743);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27743);}while(r);
}
S_36128:;
if (((-(*_FUNC_EVALPREIF_LONG_TEMP!= 0 ))&(-(*_FUNC_EVALPREIF_LONG_TEMP<*_FUNC_EVALPREIF_LONG_FIRST)))||is_error_pending()){
if(qbevent){evnt(27744);if(r)goto S_36128;}
do{
*_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_TEMP;
if(!qbevent)break;evnt(27744);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27744);}while(r);
}
fornext_continue_4263:;
}
fornext_exit_4263:;
S_36133:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_EVALPREIF_STRING_FIRSTSYMBOL,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(27746);if(r)goto S_36133;}
do{
*_FUNC_EVALPREIF_LONG_SECONDSYMBOL= 0 ;
if(!qbevent)break;evnt(27747);}while(r);
do{
*_FUNC_EVALPREIF_LONG_SECOND= 0 ;
if(!qbevent)break;evnt(27747);}while(r);
S_36136:;
fornext_value4266=*_FUNC_EVALPREIF_LONG_FIRST+ 1 ;
fornext_finalvalue4266=_FUNC_EVALPREIF_STRING_TEMP->len;
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+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4266:
*_FUNC_EVALPREIF_LONG_I=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(27748);if(r)goto S_36136;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_A,func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_I, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27749);}while(r);
S_36138:;
if(qbevent){evnt(27750);if(r)goto S_36138;}
S_36139:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len(" ",1))))||is_error_pending()){
if(qbevent){evnt(27751);if(r)goto S_36139;}
sc_ec_103_end:;
goto sc_4268_end;
}
S_36140:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len("=",1))||qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len("<",1))||qbs_equal(_FUNC_EVALPREIF_STRING_A,qbs_new_txt_len(">",1))))||is_error_pending()){
if(qbevent){evnt(27752);if(r)goto S_36140;}
S_36141:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_A,_FUNC_EVALPREIF_STRING_FIRSTSYMBOL)))||is_error_pending()){
if(qbevent){evnt(27753);if(r)goto S_36141;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_add(qbs_add(qbs_new_txt_len("Duplicate operator (",20),_FUNC_EVALPREIF_STRING_A),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27753);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(27753);}while(r);
}
do{
*_FUNC_EVALPREIF_LONG_SECOND=*_FUNC_EVALPREIF_LONG_I;
if(!qbevent)break;evnt(27754);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_SECONDSYMBOL,_FUNC_EVALPREIF_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27754);}while(r);
sc_ec_104_end:;
goto sc_4268_end;
}
do{
goto fornext_exit_4265;
if(!qbevent)break;evnt(27756);}while(r);
sc_4268_end:;
fornext_continue_4265:;
}
fornext_exit_4265:;
}
S_36152:;
if ((*_FUNC_EVALPREIF_LONG_FIRST)||is_error_pending()){
if(qbevent){evnt(27760);if(r)goto S_36152;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_L,qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27761);}while(r);
S_36154:;
if ((*_FUNC_EVALPREIF_LONG_SECOND)||is_error_pending()){
if(qbevent){evnt(27762);if(r)goto S_36154;}
do{
*_FUNC_EVALPREIF_LONG_RIGHTSTART=*_FUNC_EVALPREIF_LONG_SECOND+ 1 ;
if(!qbevent)break;evnt(27762);}while(r);
}else{
do{
*_FUNC_EVALPREIF_LONG_RIGHTSTART=*_FUNC_EVALPREIF_LONG_FIRST+ 1 ;
if(!qbevent)break;evnt(27762);}while(r);
}
do{
qbs_set(_FUNC_EVALPREIF_STRING_R,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_RIGHTSTART,NULL,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27764);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_add(func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST, 1 ,0|1),func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_SECOND, 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27765);}while(r);
S_36161:;
fornext_value4270=_FUNC_EVALPREIF_STRING_L->len;
fornext_finalvalue4270= 1 ;
fornext_step4270= -1 ;
if (fornext_step4270<0) fornext_step_negative4270=1; else fornext_step_negative4270=0;
if (is_error_pending()) goto fornext_error4270;
goto fornext_entrylabel4270;
while(1){
fornext_value4270=fornext_step4270+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4270:
*_FUNC_EVALPREIF_LONG_I=fornext_value4270;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4270){
if (fornext_value4270<fornext_finalvalue4270) break;
}else{
if (fornext_value4270>fornext_finalvalue4270) break;
}
fornext_error4270:;
if(qbevent){evnt(27767);if(r)goto S_36161;}
S_36162:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_EVALPREIF_STRING_L,*_FUNC_EVALPREIF_LONG_I)== 32 )))||is_error_pending()){
if(qbevent){evnt(27768);if(r)goto S_36162;}
do{
goto fornext_exit_4269;
if(!qbevent)break;evnt(27768);}while(r);
}
fornext_continue_4269:;
}
fornext_exit_4269:;
do{
qbs_set(_FUNC_EVALPREIF_STRING_LEFTSIDE,qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_I)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27770);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_L,qbs_ltrim(qbs_rtrim(func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_I+ 1 ,_FUNC_EVALPREIF_STRING_L->len-*_FUNC_EVALPREIF_LONG_I,0|1))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27771);}while(r);
do{
*_FUNC_EVALPREIF_LONG_RIGHTSTOP=_FUNC_EVALPREIF_STRING_R->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27772);}while(r);
S_36169:;
fornext_value4275= 1 ;
fornext_finalvalue4275=_FUNC_EVALPREIF_STRING_R->len;
fornext_step4275= 1 ;
if (fornext_step4275<0) fornext_step_negative4275=1; else fornext_step_negative4275=0;
if (is_error_pending()) goto fornext_error4275;
goto fornext_entrylabel4275;
while(1){
fornext_value4275=fornext_step4275+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4275:
*_FUNC_EVALPREIF_LONG_I=fornext_value4275;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4275){
if (fornext_value4275<fornext_finalvalue4275) break;
}else{
if (fornext_value4275>fornext_finalvalue4275) break;
}
fornext_error4275:;
if(qbevent){evnt(27773);if(r)goto S_36169;}
S_36170:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_EVALPREIF_STRING_R,*_FUNC_EVALPREIF_LONG_I)== 32 )))||is_error_pending()){
if(qbevent){evnt(27774);if(r)goto S_36170;}
do{
goto fornext_exit_4274;
if(!qbevent)break;evnt(27774);}while(r);
}
fornext_continue_4274:;
}
fornext_exit_4274:;
do{
qbs_set(_FUNC_EVALPREIF_STRING_RIGHTSIDE,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_R,*_FUNC_EVALPREIF_LONG_I+ 1 ,NULL,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27776);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_R,qbs_ltrim(qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_R,*_FUNC_EVALPREIF_LONG_I- 1 ))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27777);}while(r);
S_36176:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("=<",2))))||is_error_pending()){
if(qbevent){evnt(27778);if(r)goto S_36176;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<=",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27778);}while(r);
}
S_36179:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("=>",2))))||is_error_pending()){
if(qbevent){evnt(27779);if(r)goto S_36179;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len(">=",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27779);}while(r);
}
S_36182:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("><",2))))||is_error_pending()){
if(qbevent){evnt(27780);if(r)goto S_36182;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<>",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27780);}while(r);
}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27781);}while(r);
S_36186:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<>",2))))||is_error_pending()){
if(qbevent){evnt(27782);if(r)goto S_36186;}
S_36187:;
fornext_value4278= 0 ;
fornext_finalvalue4278=*__INTEGER_USERDEFINECOUNT;
fornext_step4278= 1 ;
if (fornext_step4278<0) fornext_step_negative4278=1; else fornext_step_negative4278=0;
if (is_error_pending()) goto fornext_error4278;
goto fornext_entrylabel4278;
while(1){
fornext_value4278=fornext_step4278+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4278:
*_FUNC_EVALPREIF_LONG_I=fornext_value4278;
if (fornext_step_negative4278){
if (fornext_value4278<fornext_finalvalue4278) break;
}else{
if (fornext_value4278>fornext_finalvalue4278) break;
}
fornext_error4278:;
if(qbevent){evnt(27783);if(r)goto S_36187;}
S_36188:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(qbs_notequal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R))))||is_error_pending()){
if(qbevent){evnt(27784);if(r)goto S_36188;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27784);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27784);}while(r);
}
fornext_continue_4277:;
}
fornext_exit_4277:;
}
S_36194:;
if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("=",1),0)))||is_error_pending()){
if(qbevent){evnt(27787);if(r)goto S_36194;}
do{
*_FUNC_EVALPREIF_LONG_USERFOUND= 0 ;
if(!qbevent)break;evnt(27788);}while(r);
S_36196:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_L,((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 7 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||is_error_pending()){
if(qbevent){evnt(27789);if(r)goto S_36196;}
do{
*_FUNC_EVALPREIF_LONG_RESULT=FUNC_COMPAREVERSIONS(__STRING_VERSION,_FUNC_EVALPREIF_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27790);}while(r);
S_36198:;
if ((-(*_FUNC_EVALPREIF_LONG_RESULT== 0 ))||is_error_pending()){
if(qbevent){evnt(27791);if(r)goto S_36198;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27791);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27791);}while(r);
}
}
S_36203:;
fornext_value4280= 0 ;
fornext_finalvalue4280=*__INTEGER_USERDEFINECOUNT;
fornext_step4280= 1 ;
if (fornext_step4280<0) fornext_step_negative4280=1; else fornext_step_negative4280=0;
if (is_error_pending()) goto fornext_error4280;
goto fornext_entrylabel4280;
while(1){
fornext_value4280=fornext_step4280+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4280:
*_FUNC_EVALPREIF_LONG_I=fornext_value4280;
if (fornext_step_negative4280){
if (fornext_value4280<fornext_finalvalue4280) break;
}else{
if (fornext_value4280>fornext_finalvalue4280) break;
}
fornext_error4280:;
if(qbevent){evnt(27793);if(r)goto S_36203;}
S_36204:;
if ((-(*_FUNC_EVALPREIF_LONG_I== 7 ))||is_error_pending()){
if(qbevent){evnt(27794);if(r)goto S_36204;}
do{
goto fornext_continue_4279;
if(!qbevent)break;evnt(27794);}while(r);
}
S_36207:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L)))||is_error_pending()){
if(qbevent){evnt(27795);if(r)goto S_36207;}
do{
*_FUNC_EVALPREIF_LONG_USERFOUND= -1 ;
if(!qbevent)break;evnt(27796);}while(r);
S_36209:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R)))||is_error_pending()){
if(qbevent){evnt(27797);if(r)goto S_36209;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27797);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27797);}while(r);
}
}
fornext_continue_4279:;
}
fornext_exit_4279:;
S_36215:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_EVALPREIF_LONG_USERFOUND== 0 ))&(qbs_equal(qbs_ltrim(qbs_rtrim(_FUNC_EVALPREIF_STRING_R)),qbs_new_txt_len("UNDEFINED",9)))))||is_error_pending()){
if(qbevent){evnt(27800);if(r)goto S_36215;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27800);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27800);}while(r);
}
S_36219:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_EVALPREIF_LONG_USERFOUND== -1 ))&(qbs_equal(qbs_ltrim(qbs_rtrim(_FUNC_EVALPREIF_STRING_R)),qbs_new_txt_len("DEFINED",7)))))||is_error_pending()){
if(qbevent){evnt(27801);if(r)goto S_36219;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27801);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27801);}while(r);
}
}
S_36224:;
if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len(">",1),0)))||is_error_pending()){
if(qbevent){evnt(27804);if(r)goto S_36224;}
S_36225:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_L,((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 7 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||is_error_pending()){
if(qbevent){evnt(27805);if(r)goto S_36225;}
do{
*_FUNC_EVALPREIF_LONG_RESULT=FUNC_COMPAREVERSIONS(__STRING_VERSION,_FUNC_EVALPREIF_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27806);}while(r);
S_36227:;
if ((-(*_FUNC_EVALPREIF_LONG_RESULT== 1 ))||is_error_pending()){
if(qbevent){evnt(27807);if(r)goto S_36227;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27807);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27807);}while(r);
}
}
S_36232:;
fornext_value4282= 0 ;
fornext_finalvalue4282=*__INTEGER_USERDEFINECOUNT;
fornext_step4282= 1 ;
if (fornext_step4282<0) fornext_step_negative4282=1; else fornext_step_negative4282=0;
if (is_error_pending()) goto fornext_error4282;
goto fornext_entrylabel4282;
while(1){
fornext_value4282=fornext_step4282+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4282:
*_FUNC_EVALPREIF_LONG_I=fornext_value4282;
if (fornext_step_negative4282){
if (fornext_value4282<fornext_finalvalue4282) break;
}else{
if (fornext_value4282>fornext_finalvalue4282) break;
}
fornext_error4282:;
if(qbevent){evnt(27809);if(r)goto S_36232;}
S_36233:;
if ((-(*_FUNC_EVALPREIF_LONG_I== 7 ))||is_error_pending()){
if(qbevent){evnt(27810);if(r)goto S_36233;}
do{
goto fornext_continue_4281;
if(!qbevent)break;evnt(27810);}while(r);
}
S_36236:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_R)&FUNC_VERIFYNUMBER(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||is_error_pending()){
if(qbevent){evnt(27811);if(r)goto S_36236;}
S_36237:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(-(qbs_val<long double>(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))>qbs_val<long double>(_FUNC_EVALPREIF_STRING_R)))))||is_error_pending()){
if(qbevent){evnt(27812);if(r)goto S_36237;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27812);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27812);}while(r);
}
}else{
S_36242:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(qbs_greaterthan(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R))))||is_error_pending()){
if(qbevent){evnt(27814);if(r)goto S_36242;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27814);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27814);}while(r);
}
}
fornext_continue_4281:;
}
fornext_exit_4281:;
}
S_36249:;
if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_SYMBOL,qbs_new_txt_len("<",1),0)))||is_error_pending()){
if(qbevent){evnt(27819);if(r)goto S_36249;}
S_36250:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_EVALPREIF_STRING_L,((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check(( 7 )-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||is_error_pending()){
if(qbevent){evnt(27820);if(r)goto S_36250;}
do{
*_FUNC_EVALPREIF_LONG_RESULT=FUNC_COMPAREVERSIONS(__STRING_VERSION,_FUNC_EVALPREIF_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27821);}while(r);
S_36252:;
if ((-(*_FUNC_EVALPREIF_LONG_RESULT== -1 ))||is_error_pending()){
if(qbevent){evnt(27822);if(r)goto S_36252;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27822);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27822);}while(r);
}
}
S_36257:;
fornext_value4284= 0 ;
fornext_finalvalue4284=*__INTEGER_USERDEFINECOUNT;
fornext_step4284= 1 ;
if (fornext_step4284<0) fornext_step_negative4284=1; else fornext_step_negative4284=0;
if (is_error_pending()) goto fornext_error4284;
goto fornext_entrylabel4284;
while(1){
fornext_value4284=fornext_step4284+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4284:
*_FUNC_EVALPREIF_LONG_I=fornext_value4284;
if (fornext_step_negative4284){
if (fornext_value4284<fornext_finalvalue4284) break;
}else{
if (fornext_value4284>fornext_finalvalue4284) break;
}
fornext_error4284:;
if(qbevent){evnt(27824);if(r)goto S_36257;}
S_36258:;
if ((-(*_FUNC_EVALPREIF_LONG_I== 7 ))||is_error_pending()){
if(qbevent){evnt(27825);if(r)goto S_36258;}
do{
goto fornext_continue_4283;
if(!qbevent)break;evnt(27825);}while(r);
}
S_36261:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_R)&FUNC_VERIFYNUMBER(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))))||is_error_pending()){
if(qbevent){evnt(27826);if(r)goto S_36261;}
S_36262:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(-(qbs_val<long double>(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))<qbs_val<long double>(_FUNC_EVALPREIF_STRING_R)))))||is_error_pending()){
if(qbevent){evnt(27827);if(r)goto S_36262;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27827);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27827);}while(r);
}
}else{
S_36267:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_L))&(qbs_lessthan(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_R))))||is_error_pending()){
if(qbevent){evnt(27829);if(r)goto S_36267;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27829);}while(r);
do{
goto LABEL_FINISHEDCHECK;
if(!qbevent)break;evnt(27829);}while(r);
}
}
fornext_continue_4283:;
}
fornext_exit_4283:;
}
LABEL_FINISHEDCHECK:;
if(qbevent){evnt(27834);r=0;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_TEMP,qbs_add(qbs_add(_FUNC_EVALPREIF_STRING_LEFTSIDE,_FUNC_EVALPREIF_STRING_RESULT),_FUNC_EVALPREIF_STRING_RIGHTSIDE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27835);}while(r);
}
S_36276:;
dl_continue_4262:;
}while((!(-(*_FUNC_EVALPREIF_LONG_FIRST== 0 )))&&(!is_error_pending()));
dl_exit_4262:;
if(qbevent){evnt(27837);if(r)goto S_36276;}
do{
tmp_long=array_check(( 1 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len(" AND ",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27841);}while(r);
do{
tmp_long=array_check(( 2 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len(" OR ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27842);}while(r);
do{
tmp_long=array_check(( 3 )-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[tmp_long])),qbs_new_txt_len(" XOR ",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27843);}while(r);
S_36280:;
do{
if(qbevent){evnt(27845);if(r)goto S_36280;}
do{
*_FUNC_EVALPREIF_LONG_FIRST= 0 ;
if(!qbevent)break;evnt(27846);}while(r);
S_36282:;
fornext_value4287= 1 ;
fornext_finalvalue4287=func_ubound(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP,1,1);
fornext_step4287= 1 ;
if (fornext_step4287<0) fornext_step_negative4287=1; else fornext_step_negative4287=0;
if (is_error_pending()) goto fornext_error4287;
goto fornext_entrylabel4287;
while(1){
fornext_value4287=fornext_step4287+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4287:
*_FUNC_EVALPREIF_LONG_I=fornext_value4287;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4287){
if (fornext_value4287<fornext_finalvalue4287) break;
}else{
if (fornext_value4287>fornext_finalvalue4287) break;
}
fornext_error4287:;
if(qbevent){evnt(27847);if(r)goto S_36282;}
S_36283:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])),qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(27848);if(r)goto S_36283;}
do{
*_FUNC_EVALPREIF_LONG_T=func_instr(NULL,_FUNC_EVALPREIF_STRING_TEMP,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_I)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])])),0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27849);}while(r);
S_36285:;
if ((-(*_FUNC_EVALPREIF_LONG_FIRST!= 0 ))||is_error_pending()){
if(qbevent){evnt(27850);if(r)goto S_36285;}
S_36286:;
if (((-(*_FUNC_EVALPREIF_LONG_T<*_FUNC_EVALPREIF_LONG_FIRST))&(-(*_FUNC_EVALPREIF_LONG_T!= 0 )))||is_error_pending()){
if(qbevent){evnt(27851);if(r)goto S_36286;}
do{
*_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_T;
if(!qbevent)break;evnt(27851);}while(r);
do{
*_FUNC_EVALPREIF_LONG_FIRSTSYMBOL=*_FUNC_EVALPREIF_LONG_I;
if(!qbevent)break;evnt(27851);}while(r);
}
}else{
do{
*_FUNC_EVALPREIF_LONG_FIRST=*_FUNC_EVALPREIF_LONG_T;
if(!qbevent)break;evnt(27853);}while(r);
do{
*_FUNC_EVALPREIF_LONG_FIRSTSYMBOL=*_FUNC_EVALPREIF_LONG_I;
if(!qbevent)break;evnt(27853);}while(r);
}
}
fornext_continue_4286:;
}
fornext_exit_4286:;
S_36296:;
if ((-(*_FUNC_EVALPREIF_LONG_FIRST== 0 ))||is_error_pending()){
if(qbevent){evnt(27857);if(r)goto S_36296;}
do{
goto dl_exit_4285;
if(!qbevent)break;evnt(27857);}while(r);
}
do{
qbs_set(_FUNC_EVALPREIF_STRING_LEFTSIDE,qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27858);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_SYMBOL,func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST,((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_FIRSTSYMBOL)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])]))->len,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27859);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_T,func_mid(_FUNC_EVALPREIF_STRING_TEMP,*_FUNC_EVALPREIF_LONG_FIRST+((qbs*)(((uint64*)(_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[0]))[array_check((*_FUNC_EVALPREIF_LONG_FIRSTSYMBOL)-_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[4],_FUNC_EVALPREIF_ARRAY_STRING_PC_OP[5])]))->len,NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27860);}while(r);
do{
*_FUNC_EVALPREIF_LONG_T=func_instr(NULL,_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len(" ",1),0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27861);}while(r);
S_36303:;
if ((*_FUNC_EVALPREIF_LONG_T)||is_error_pending()){
if(qbevent){evnt(27862);if(r)goto S_36303;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_M,qbs_ltrim(qbs_rtrim(qbs_left(_FUNC_EVALPREIF_STRING_T,*_FUNC_EVALPREIF_LONG_T- 1 ))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27863);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_RIGHTSIDE,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_T,*_FUNC_EVALPREIF_LONG_T,NULL,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27864);}while(r);
}else{
do{
qbs_set(_FUNC_EVALPREIF_STRING_M,qbs_ltrim(func_mid(_FUNC_EVALPREIF_STRING_T,*_FUNC_EVALPREIF_LONG_T,NULL,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27866);}while(r);
do{
qbs_set(_FUNC_EVALPREIF_STRING_RIGHTSIDE,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27867);}while(r);
}
do{
*_FUNC_EVALPREIF_LONG_LEFTRESULT= 0 ;
if(!qbevent)break;evnt(27869);}while(r);
S_36311:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_LEFTSIDE)))||is_error_pending()){
if(qbevent){evnt(27870);if(r)goto S_36311;}
S_36312:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_val<long double>(_FUNC_EVALPREIF_STRING_LEFTSIDE)!= 0 )))||is_error_pending()){
if(qbevent){evnt(27871);if(r)goto S_36312;}
do{
*_FUNC_EVALPREIF_LONG_LEFTRESULT= -1 ;
if(!qbevent)break;evnt(27871);}while(r);
}
}else{
S_36316:;
fornext_value4291= 0 ;
fornext_finalvalue4291=*__INTEGER_USERDEFINECOUNT;
fornext_step4291= 1 ;
if (fornext_step4291<0) fornext_step_negative4291=1; else fornext_step_negative4291=0;
if (is_error_pending()) goto fornext_error4291;
goto fornext_entrylabel4291;
while(1){
fornext_value4291=fornext_step4291+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4291:
*_FUNC_EVALPREIF_LONG_I=fornext_value4291;
if (fornext_step_negative4291){
if (fornext_value4291<fornext_finalvalue4291) break;
}else{
if (fornext_value4291>fornext_finalvalue4291) break;
}
fornext_error4291:;
if(qbevent){evnt(27873);if(r)goto S_36316;}
S_36317:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_LEFTSIDE)))||is_error_pending()){
if(qbevent){evnt(27874);if(r)goto S_36317;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_T,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27875);}while(r);
S_36319:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("0",1)))&(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("",0)))))||is_error_pending()){
if(qbevent){evnt(27876);if(r)goto S_36319;}
do{
*_FUNC_EVALPREIF_LONG_LEFTRESULT= -1 ;
if(!qbevent)break;evnt(27876);}while(r);
do{
goto fornext_exit_4290;
if(!qbevent)break;evnt(27876);}while(r);
}
}
fornext_continue_4290:;
}
fornext_exit_4290:;
}
do{
*_FUNC_EVALPREIF_LONG_RIGHTRESULT= 0 ;
if(!qbevent)break;evnt(27880);}while(r);
S_36327:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_M)))||is_error_pending()){
if(qbevent){evnt(27881);if(r)goto S_36327;}
S_36328:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_val<long double>(_FUNC_EVALPREIF_STRING_M)!= 0 )))||is_error_pending()){
if(qbevent){evnt(27882);if(r)goto S_36328;}
do{
*_FUNC_EVALPREIF_LONG_RIGHTRESULT= -1 ;
if(!qbevent)break;evnt(27882);}while(r);
}
}else{
S_36332:;
fornext_value4293= 0 ;
fornext_finalvalue4293=*__INTEGER_USERDEFINECOUNT;
fornext_step4293= 1 ;
if (fornext_step4293<0) fornext_step_negative4293=1; else fornext_step_negative4293=0;
if (is_error_pending()) goto fornext_error4293;
goto fornext_entrylabel4293;
while(1){
fornext_value4293=fornext_step4293+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4293:
*_FUNC_EVALPREIF_LONG_I=fornext_value4293;
if (fornext_step_negative4293){
if (fornext_value4293<fornext_finalvalue4293) break;
}else{
if (fornext_value4293>fornext_finalvalue4293) break;
}
fornext_error4293:;
if(qbevent){evnt(27884);if(r)goto S_36332;}
S_36333:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_M)))||is_error_pending()){
if(qbevent){evnt(27885);if(r)goto S_36333;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_T,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27886);}while(r);
S_36335:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("0",1)))&(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("",0)))))||is_error_pending()){
if(qbevent){evnt(27887);if(r)goto S_36335;}
do{
*_FUNC_EVALPREIF_LONG_RIGHTRESULT= -1 ;
if(!qbevent)break;evnt(27887);}while(r);
do{
goto fornext_exit_4292;
if(!qbevent)break;evnt(27887);}while(r);
}
}
fornext_continue_4292:;
}
fornext_exit_4292:;
}
S_36342:;
qbs_set(sc_4294,qbs_ltrim(qbs_rtrim(_FUNC_EVALPREIF_STRING_SYMBOL)));
qbs_cleanup(qbs_tmp_base,0);
if(qbevent){evnt(27891);if(r)goto S_36342;}
S_36343:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_4294,qbs_new_txt_len("AND",3))))||is_error_pending()){
if(qbevent){evnt(27892);if(r)goto S_36343;}
S_36344:;
if (((-(*_FUNC_EVALPREIF_LONG_LEFTRESULT!= 0 ))&(-(*_FUNC_EVALPREIF_LONG_RIGHTRESULT!= 0 )))||is_error_pending()){
if(qbevent){evnt(27893);if(r)goto S_36344;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27893);}while(r);
}else{
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27893);}while(r);
}
sc_ec_105_end:;
goto sc_4294_end;
}
S_36349:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_4294,qbs_new_txt_len("OR",2))))||is_error_pending()){
if(qbevent){evnt(27894);if(r)goto S_36349;}
S_36350:;
if (((-(*_FUNC_EVALPREIF_LONG_LEFTRESULT!= 0 ))|(-(*_FUNC_EVALPREIF_LONG_RIGHTRESULT!= 0 )))||is_error_pending()){
if(qbevent){evnt(27895);if(r)goto S_36350;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27895);}while(r);
}else{
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27895);}while(r);
}
sc_ec_106_end:;
goto sc_4294_end;
}
S_36355:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_4294,qbs_new_txt_len("XOR",3))))||is_error_pending()){
if(qbevent){evnt(27896);if(r)goto S_36355;}
S_36356:;
if ((-(*_FUNC_EVALPREIF_LONG_LEFTRESULT!=*_FUNC_EVALPREIF_LONG_RIGHTRESULT))||is_error_pending()){
if(qbevent){evnt(27897);if(r)goto S_36356;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" -1 ",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27897);}while(r);
}else{
do{
qbs_set(_FUNC_EVALPREIF_STRING_RESULT,qbs_new_txt_len(" 0 ",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27897);}while(r);
}
sc_ec_107_end:;
goto sc_4294_end;
}
sc_4294_end:;
do{
qbs_set(_FUNC_EVALPREIF_STRING_TEMP,qbs_add(_FUNC_EVALPREIF_STRING_RESULT,_FUNC_EVALPREIF_STRING_RIGHTSIDE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27899);}while(r);
dl_continue_4285:;
}while(1);
dl_exit_4285:;
S_36364:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_VERIFYNUMBER(_FUNC_EVALPREIF_STRING_TEMP)))||is_error_pending()){
if(qbevent){evnt(27902);if(r)goto S_36364;}
do{
*_FUNC_EVALPREIF_LONG_EVALPREIF=qbr(qbs_val<long double>(_FUNC_EVALPREIF_STRING_TEMP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27903);}while(r);
}else{
S_36367:;
if ((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_FUNC_EVALPREIF_STRING_TEMP,qbs_new_txt_len(" ",1),0)))||is_error_pending()){
if(qbevent){evnt(27905);if(r)goto S_36367;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_ERR,qbs_new_txt_len("Invalid Resolution of $IF; check statements",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27905);}while(r);
}
S_36370:;
fornext_value4296= 0 ;
fornext_finalvalue4296=*__INTEGER_USERDEFINECOUNT;
fornext_step4296= 1 ;
if (fornext_step4296<0) fornext_step_negative4296=1; else fornext_step_negative4296=0;
if (is_error_pending()) goto fornext_error4296;
goto fornext_entrylabel4296;
while(1){
fornext_value4296=fornext_step4296+(*_FUNC_EVALPREIF_LONG_I);
fornext_entrylabel4296:
*_FUNC_EVALPREIF_LONG_I=fornext_value4296;
if (fornext_step_negative4296){
if (fornext_value4296<fornext_finalvalue4296) break;
}else{
if (fornext_value4296>fornext_finalvalue4296) break;
}
fornext_error4296:;
if(qbevent){evnt(27906);if(r)goto S_36370;}
S_36371:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),_FUNC_EVALPREIF_STRING_TEMP)))||is_error_pending()){
if(qbevent){evnt(27907);if(r)goto S_36371;}
do{
qbs_set(_FUNC_EVALPREIF_STRING_T,qbs_ltrim(qbs_rtrim(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*_FUNC_EVALPREIF_LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(27908);}while(r);
S_36373:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("0",1)))&(qbs_notequal(_FUNC_EVALPREIF_STRING_T,qbs_new_txt_len("",0)))))||is_error_pending()){
if(qbevent){evnt(27909);if(r)goto S_36373;}
do{
*_FUNC_EVALPREIF_LONG_EVALPREIF= -1 ;
if(!qbevent)break;evnt(27909);}while(r);
do{
goto fornext_exit_4295;
if(!qbevent)break;evnt(27909);}while(r);
}
}
fornext_continue_4295:;
}
fornext_exit_4295:;
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free99.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_EVALPREIF_LONG_EVALPREIF;
}
