qbs* FUNC_GETELEMENTSPECIAL(qbs*_FUNC_GETELEMENTSPECIAL_STRING_SAVEA,int32*_FUNC_GETELEMENTSPECIAL_LONG_ELENUM){
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 "data28.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{
qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_A,_FUNC_GETELEMENTSPECIAL_STRING_SAVEA);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20103);}while(r);
S_23420:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_GETELEMENTSPECIAL_STRING_A,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(20104);if(r)goto S_23420;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(20104);}while(r);
}
do{
*_FUNC_GETELEMENTSPECIAL_LONG_N= 1 ;
if(!qbevent)break;evnt(20106);}while(r);
do{
*_FUNC_GETELEMENTSPECIAL_LONG_P= 1 ;
if(!qbevent)break;evnt(20107);}while(r);
LABEL_GETELEMENTSPECIALNEXT:;
if(qbevent){evnt(20108);r=0;}
do{
*_FUNC_GETELEMENTSPECIAL_LONG_I=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_P,_FUNC_GETELEMENTSPECIAL_STRING_A,__STRING1_SP,0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20109);}while(r);
do{
*_FUNC_GETELEMENTSPECIAL_LONG_I2=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_P,_FUNC_GETELEMENTSPECIAL_STRING_A,func_chr( 34 ),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20112);}while(r);
S_23427:;
if (((-(*_FUNC_GETELEMENTSPECIAL_LONG_I2<*_FUNC_GETELEMENTSPECIAL_LONG_I))&(-(*_FUNC_GETELEMENTSPECIAL_LONG_I2!= 0 )))||is_error_pending()){
if(qbevent){evnt(20113);if(r)goto S_23427;}
do{
*_FUNC_GETELEMENTSPECIAL_LONG_I3=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_I2+ 1 ,_FUNC_GETELEMENTSPECIAL_STRING_A,func_chr( 34 ),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20114);}while(r);
S_23429:;
if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_I3== 0 ))||is_error_pending()){
if(qbevent){evnt(20114);if(r)goto S_23429;}
do{
SUB_GIVE_ERROR(qbs_add(qbs_new_txt_len("Expected ",9),func_chr( 34 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20114);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(20114);}while(r);
}
do{
*_FUNC_GETELEMENTSPECIAL_LONG_I=func_instr(*_FUNC_GETELEMENTSPECIAL_LONG_I3,_FUNC_GETELEMENTSPECIAL_STRING_A,__STRING1_SP,0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20115);}while(r);
}
S_23435:;
if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_ELENUM==*_FUNC_GETELEMENTSPECIAL_LONG_N))||is_error_pending()){
if(qbevent){evnt(20118);if(r)goto S_23435;}
S_23436:;
if ((*_FUNC_GETELEMENTSPECIAL_LONG_I)||is_error_pending()){
if(qbevent){evnt(20119);if(r)goto S_23436;}
do{
qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL,func_mid(_FUNC_GETELEMENTSPECIAL_STRING_A,*_FUNC_GETELEMENTSPECIAL_LONG_P,*_FUNC_GETELEMENTSPECIAL_LONG_I-*_FUNC_GETELEMENTSPECIAL_LONG_P,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20120);}while(r);
}else{
do{
qbs_set(_FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL,qbs_right(_FUNC_GETELEMENTSPECIAL_STRING_A,_FUNC_GETELEMENTSPECIAL_STRING_A->len-*_FUNC_GETELEMENTSPECIAL_LONG_P+ 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(20122);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(20124);}while(r);
}
S_23443:;
if ((-(*_FUNC_GETELEMENTSPECIAL_LONG_I== 0 ))||is_error_pending()){
if(qbevent){evnt(20127);if(r)goto S_23443;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(20127);}while(r);
}
do{
*_FUNC_GETELEMENTSPECIAL_LONG_N=*_FUNC_GETELEMENTSPECIAL_LONG_N+ 1 ;
if(!qbevent)break;evnt(20128);}while(r);
do{
*_FUNC_GETELEMENTSPECIAL_LONG_P=*_FUNC_GETELEMENTSPECIAL_LONG_I+ 1 ;
if(!qbevent)break;evnt(20129);}while(r);
do{
goto LABEL_GETELEMENTSPECIALNEXT;
if(!qbevent)break;evnt(20130);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free28.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_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL);return _FUNC_GETELEMENTSPECIAL_STRING_GETELEMENTSPECIAL;
}
