qbs* FUNC_SCASE2(qbs*_FUNC_SCASE2_STRING_T){
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 "data69.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;
S_32326:;
if(qbevent){evnt(24154);if(r)goto S_32326;}
S_32327:;
if (((*__LONG_IDEAUTOLAYOUTKWSTYLE<( 0 )))||is_error_pending()){
if(qbevent){evnt(24155);if(r)goto S_32327;}
do{
qbs_set(_FUNC_SCASE2_STRING_SCASE2,qbs_lcase(_FUNC_SCASE2_STRING_T));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24155);}while(r);
sc_ec_105_end:;
goto sc_3666_end;
}
S_32329:;
if (((*__LONG_IDEAUTOLAYOUTKWSTYLE>( 0 )))||is_error_pending()){
if(qbevent){evnt(24156);if(r)goto S_32329;}
do{
qbs_set(_FUNC_SCASE2_STRING_SCASE2,qbs_ucase(_FUNC_SCASE2_STRING_T));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24156);}while(r);
sc_ec_106_end:;
goto sc_3666_end;
}
S_32332:;
qbs_set(sc_3667,qbs_ucase(_FUNC_SCASE2_STRING_T));
qbs_cleanup(qbs_tmp_base,0);
if(qbevent){evnt(24158);if(r)goto S_32332;}
S_32333:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3667,qbs_new_txt_len("_ANDALSO",8))))||is_error_pending()){
if(qbevent){evnt(24159);if(r)goto S_32333;}
do{
qbs_set(_FUNC_SCASE2_STRING_SCASE2,qbs_new_txt_len("_AndAlso",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24159);}while(r);
sc_ec_107_end:;
goto sc_3667_end;
}
S_32335:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_3667,qbs_new_txt_len("_ORELSE",7))))||is_error_pending()){
if(qbevent){evnt(24160);if(r)goto S_32335;}
do{
qbs_set(_FUNC_SCASE2_STRING_SCASE2,qbs_new_txt_len("_OrElse",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24160);}while(r);
sc_ec_108_end:;
goto sc_3667_end;
}
do{
*_FUNC_SCASE2_LONG_NEWWORD= -1 ;
if(!qbevent)break;evnt(24162);}while(r);
do{
qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24163);}while(r);
S_32340:;
fornext_value3669= 1 ;
fornext_finalvalue3669=_FUNC_SCASE2_STRING_T->len;
fornext_step3669= 1 ;
if (fornext_step3669<0) fornext_step_negative3669=1; else fornext_step_negative3669=0;
if (is_error_pending()) goto fornext_error3669;
goto fornext_entrylabel3669;
while(1){
fornext_value3669=fornext_step3669+(*_FUNC_SCASE2_LONG_I);
fornext_entrylabel3669:
*_FUNC_SCASE2_LONG_I=fornext_value3669;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative3669){
if (fornext_value3669<fornext_finalvalue3669) break;
}else{
if (fornext_value3669>fornext_finalvalue3669) break;
}
fornext_error3669:;
if(qbevent){evnt(24164);if(r)goto S_32340;}
do{
qbs_set(_FUNC_SCASE2_STRING_S,func_mid(_FUNC_SCASE2_STRING_T,*_FUNC_SCASE2_LONG_I, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24165);}while(r);
S_32342:;
if ((*_FUNC_SCASE2_LONG_NEWWORD)||is_error_pending()){
if(qbevent){evnt(24166);if(r)goto S_32342;}
S_32343:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_SCASE2_STRING_S,qbs_new_txt_len("_",1)))|(qbs_equal(_FUNC_SCASE2_STRING_S,__STRING1_SP))))||is_error_pending()){
if(qbevent){evnt(24167);if(r)goto S_32343;}
do{
qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,_FUNC_SCASE2_STRING_S));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24168);}while(r);
}else{
do{
qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,qbs_ucase(_FUNC_SCASE2_STRING_S)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24170);}while(r);
do{
*_FUNC_SCASE2_LONG_NEWWORD= 0 ;
if(!qbevent)break;evnt(24171);}while(r);
}
}else{
S_32350:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SCASE2_STRING_S,__STRING1_SP)))||is_error_pending()){
if(qbevent){evnt(24174);if(r)goto S_32350;}
do{
qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,__STRING1_SP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24175);}while(r);
do{
*_FUNC_SCASE2_LONG_NEWWORD= -1 ;
if(!qbevent)break;evnt(24176);}while(r);
}else{
do{
qbs_set(_FUNC_SCASE2_STRING_TEMP,qbs_add(_FUNC_SCASE2_STRING_TEMP,qbs_lcase(_FUNC_SCASE2_STRING_S)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24178);}while(r);
}
}
fornext_continue_3668:;
}
fornext_exit_3668:;
do{
qbs_set(_FUNC_SCASE2_STRING_SCASE2,_FUNC_SCASE2_STRING_TEMP);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24182);}while(r);
sc_3667_end:;
sc_3666_end:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free69.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_SCASE2_STRING_SCASE2);return _FUNC_SCASE2_STRING_SCASE2;
}
