void SUB_XPRINT(qbs*_SUB_XPRINT_STRING_A,qbs*_SUB_XPRINT_STRING_CA,int32*_SUB_XPRINT_LONG_N){
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 "data48.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(_SUB_XPRINT_STRING_U,qbs__tostr((int32)(FUNC_UNIQUENUMBER()),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23153);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_L,FUNC_SCASE(qbs_new_txt_len("Print",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23155);}while(r);
S_31127:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_XPRINT_STRING_A)== 76 )))||is_error_pending()){
if(qbevent){evnt(23156);if(r)goto S_31127;}
do{
*_SUB_XPRINT_LONG_LP= 1 ;
if(!qbevent)break;evnt(23156);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_LP,qbs_new_txt_len("l",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23156);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_L,FUNC_SCASE(qbs_new_txt_len("LPrint",6)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23156);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3444=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_LPRINT=1;",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23156);}while(r);
do{
SUB_SETDEPENDENCY(&(pass3445= 7ll ));
if(!qbevent)break;evnt(23156);}while(r);
}
S_31134:;
if ((-(*_SUB_XPRINT_LONG_N>= 2 ))||is_error_pending()){
if(qbevent){evnt(23159);if(r)goto S_31134;}
S_31135:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_SUB_XPRINT_STRING_A,&(pass3446= 2 )),qbs_new_txt_len("USING",5))))||is_error_pending()){
if(qbevent){evnt(23160);if(r)goto S_31135;}
do{
*_SUB_XPRINT_LONG_I= 3 ;
if(!qbevent)break;evnt(23162);}while(r);
LABEL_PUJUMP:;
if(qbevent){evnt(23163);r=0;}
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Using",5))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23164);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23165);}while(r);
do{
*_SUB_XPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(23165);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23165);}while(r);
S_31141:;
fornext_value3448=*_SUB_XPRINT_LONG_I;
fornext_finalvalue3448=*_SUB_XPRINT_LONG_N;
fornext_step3448= 1 ;
if (fornext_step3448<0) fornext_step_negative3448=1; else fornext_step_negative3448=0;
if (is_error_pending()) goto fornext_error3448;
goto fornext_entrylabel3448;
while(1){
fornext_value3448=fornext_step3448+(*_SUB_XPRINT_LONG_I);
fornext_entrylabel3448:
*_SUB_XPRINT_LONG_I=fornext_value3448;
if (fornext_step_negative3448){
if (fornext_value3448<fornext_finalvalue3448) break;
}else{
if (fornext_value3448>fornext_finalvalue3448) break;
}
fornext_error3448:;
if(qbevent){evnt(23166);if(r)goto S_31141;}
do{
qbs_set(_SUB_XPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XPRINT_STRING_CA,_SUB_XPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23167);}while(r);
S_31143:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(23168);if(r)goto S_31143;}
do{
*_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(23168);}while(r);
}
S_31146:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(23169);if(r)goto S_31146;}
do{
*_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(23169);}while(r);
}
S_31149:;
if ((-(*_SUB_XPRINT_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(23170);if(r)goto S_31149;}
S_31150:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(23171);if(r)goto S_31150;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23171);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23171);}while(r);
}
S_31154:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(23172);if(r)goto S_31154;}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23173);}while(r);
S_31156:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23174);if(r)goto S_31156;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23174);}while(r);
}
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23175);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_EVALUATE(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23176);}while(r);
S_31161:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23177);if(r)goto S_31161;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23177);}while(r);
}
S_31164:;
if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(23178);if(r)goto S_31164;}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3449= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23178);}while(r);
}
S_31167:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23179);if(r)goto S_31167;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23179);}while(r);
}
S_31170:;
if ((-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||is_error_pending()){
if(qbevent){evnt(23180);if(r)goto S_31170;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23180);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23180);}while(r);
}
do{
qbs_set(_SUB_XPRINT_STRING_PUFORMAT,_SUB_XPRINT_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23181);}while(r);
do{
goto fornext_exit_3447;
if(!qbevent)break;evnt(23182);}while(r);
}
}
S_31178:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(23185);if(r)goto S_31178;}
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(_SUB_XPRINT_STRING_E,__STRING1_SP),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23185);}while(r);
}else{
do{
qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23185);}while(r);
}
fornext_continue_3447:;
}
fornext_exit_3447:;
S_31184:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(23187);if(r)goto S_31184;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23187);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23187);}while(r);
}
S_31188:;
if ((-(*_SUB_XPRINT_LONG_I==*_SUB_XPRINT_LONG_N))||is_error_pending()){
if(qbevent){evnt(23188);if(r)goto S_31188;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING formatstring ; ...",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23188);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23188);}while(r);
}
S_31192:;
if ((-(*_SUB_XPRINT_LONG_TQBSSET== 0 ))||is_error_pending()){
if(qbevent){evnt(23190);if(r)goto S_31192;}
do{
SUB_WRITEBUFLINE(&(pass3451=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(0,0);",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23191);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3452=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,qbs_new_txt_len(",29),func_chr( 34 )),func_chr( 34 )),qbs_new_txt_len(",0));",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23193);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3453=*__LONG_MAINTXTBUF),qbs_new_txt_len("tmp_long=0;",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23196);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_PUF,qbs_add(qbs_new_txt_len("print_using_format",18),_SUB_XPRINT_STRING_U));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23200);}while(r);
S_31199:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(23201);if(r)goto S_31199;}
do{
SUB_WRITEBUFLINE(&(pass3454=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static qbs *",12),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23202);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3455=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23204);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3456=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_PUF,qbs_new_txt_len("=qbs_new(0,0); qbs_set(",23)),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_PUFORMAT),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3457=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip_pu",36),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23207);}while(r);
do{
*_SUB_XPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(23210);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23211);}while(r);
do{
*_SUB_XPRINT_LONG_LAST= 0 ;
if(!qbevent)break;evnt(23212);}while(r);
S_31209:;
fornext_value3459=*_SUB_XPRINT_LONG_I+ 1 ;
fornext_finalvalue3459=*_SUB_XPRINT_LONG_N;
fornext_step3459= 1 ;
if (fornext_step3459<0) fornext_step_negative3459=1; else fornext_step_negative3459=0;
if (is_error_pending()) goto fornext_error3459;
goto fornext_entrylabel3459;
while(1){
fornext_value3459=fornext_step3459+(*_SUB_XPRINT_LONG_I);
fornext_entrylabel3459:
*_SUB_XPRINT_LONG_I=fornext_value3459;
if (fornext_step_negative3459){
if (fornext_value3459<fornext_finalvalue3459) break;
}else{
if (fornext_value3459>fornext_finalvalue3459) break;
}
fornext_error3459:;
if(qbevent){evnt(23213);if(r)goto S_31209;}
do{
qbs_set(_SUB_XPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XPRINT_STRING_CA,_SUB_XPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23214);}while(r);
S_31211:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(23215);if(r)goto S_31211;}
do{
*_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(23215);}while(r);
}
S_31214:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(23216);if(r)goto S_31214;}
do{
*_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(23216);}while(r);
}
S_31217:;
if ((-(*_SUB_XPRINT_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(23217);if(r)goto S_31217;}
S_31218:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1)))))||is_error_pending()){
if(qbevent){evnt(23218);if(r)goto S_31218;}
LABEL_PRINTULAST:;
if(qbevent){evnt(23219);r=0;}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23220);}while(r);
S_31220:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23221);if(r)goto S_31220;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23221);}while(r);
}
S_31223:;
if ((*_SUB_XPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(23222);if(r)goto S_31223;}
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23222);}while(r);
}else{
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23222);}while(r);
}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_EVALUATE(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23223);}while(r);
S_31229:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23224);if(r)goto S_31229;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23224);}while(r);
}
S_31232:;
if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(23225);if(r)goto S_31232;}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3460= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23225);}while(r);
}
S_31235:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23226);if(r)goto S_31235;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23226);}while(r);
}
S_31238:;
if ((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(23227);if(r)goto S_31238;}
S_31239:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_SUB_XPRINT_STRING_E, 9 ),qbs_new_txt_len("func_tab(",9)))|(qbs_equal(qbs_left(_SUB_XPRINT_STRING_E, 9 ),qbs_new_txt_len("func_spc(",9)))))||is_error_pending()){
if(qbevent){evnt(23229);if(r)goto S_31239;}
do{
SUB_WRITEBUFLINE(&(pass3461=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23234);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3462=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23236);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3463=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip_pu",36),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23237);}while(r);
S_31243:;
if ((*_SUB_XPRINT_LONG_LP)||is_error_pending()){
if(qbevent){evnt(23238);if(r)goto S_31243;}
do{
SUB_WRITEBUFLINE(&(pass3464=*__LONG_MAINTXTBUF),qbs_new_txt_len("lprint_makefit(tqbs);",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23238);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3465=*__LONG_MAINTXTBUF),qbs_new_txt_len("makefit(tqbs);",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23238);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3466=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23239);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3467=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs->len=0;",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23241);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3468=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using(",21),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",tmp_long,tqbs,",15)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23246);}while(r);
}
}else{
S_31254:;
if ((*_SUB_XPRINT_LONG_TYP&*__LONG_ISFLOAT)||is_error_pending()){
if(qbevent){evnt(23253);if(r)goto S_31254;}
S_31255:;
if ((-((*_SUB_XPRINT_LONG_TYP& 511 )== 32 ))||is_error_pending()){
if(qbevent){evnt(23254);if(r)goto S_31255;}
do{
SUB_WRITEBUFLINE(&(pass3469=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_single(",28),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23254);}while(r);
}
S_31258:;
if ((-((*_SUB_XPRINT_LONG_TYP& 511 )== 64 ))||is_error_pending()){
if(qbevent){evnt(23255);if(r)goto S_31258;}
do{
SUB_WRITEBUFLINE(&(pass3470=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_double(",28),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23255);}while(r);
}
S_31261:;
if ((-((*_SUB_XPRINT_LONG_TYP& 511 )> 64 ))||is_error_pending()){
if(qbevent){evnt(23256);if(r)goto S_31261;}
do{
SUB_WRITEBUFLINE(&(pass3471=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_float(",27),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23256);}while(r);
}
}else{
S_31265:;
if ((((-((*_SUB_XPRINT_LONG_TYP& 511 )== 64 )))&(-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISUNSIGNED)!= 0 )))||is_error_pending()){
if(qbevent){evnt(23258);if(r)goto S_31265;}
do{
SUB_WRITEBUFLINE(&(pass3472=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_uinteger64(",32),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23259);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3473=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_integer64(",31),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23261);}while(r);
}
}
}
do{
SUB_WRITEBUFLINE(&(pass3474=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip_pu",36),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23265);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23266);}while(r);
S_31274:;
if ((*_SUB_XPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(23267);if(r)goto S_31274;}
do{
goto fornext_exit_3458;
if(!qbevent)break;evnt(23267);}while(r);
}
do{
goto LABEL_PRINTUNEXT;
if(!qbevent)break;evnt(23268);}while(r);
}
}
S_31280:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(23271);if(r)goto S_31280;}
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(_SUB_XPRINT_STRING_E,__STRING1_SP),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23271);}while(r);
}else{
do{
qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23271);}while(r);
}
LABEL_PRINTUNEXT:;
if(qbevent){evnt(23272);r=0;}
fornext_continue_3458:;
}
fornext_exit_3458:;
S_31286:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(23274);if(r)goto S_31286;}
do{
qbs_set(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23274);}while(r);
do{
*_SUB_XPRINT_LONG_LAST= 1 ;
if(!qbevent)break;evnt(23274);}while(r);
do{
goto LABEL_PRINTULAST;
if(!qbevent)break;evnt(23274);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3476=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip_pu",7),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23275);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3477=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (is_error_pending()){",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23277);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3478=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("g_tmp_long=new_error; new_error=0; qbs_",39),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0); new_error=g_tmp_long;",36)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23278);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3479=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23279);}while(r);
S_31295:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1)))))||is_error_pending()){
if(qbevent){evnt(23280);if(r)goto S_31295;}
do{
*_SUB_XPRINT_LONG_NL= 0 ;
if(!qbevent)break;evnt(23280);}while(r);
}else{
do{
*_SUB_XPRINT_LONG_NL= 1 ;
if(!qbevent)break;evnt(23280);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3480=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,",11)),qbs__tostr((int32)(*_SUB_XPRINT_LONG_NL),NULL,0)),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23281);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3481=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23282);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3482=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_free(tqbs);",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23283);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3483=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_SUB_XPRINT_STRING_PUF),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23284);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3484=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23285);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3485=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23286);}while(r);
S_31306:;
if ((*_SUB_XPRINT_LONG_LP)||is_error_pending()){
if(qbevent){evnt(23287);if(r)goto S_31306;}
do{
SUB_WRITEBUFLINE(&(pass3486=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_LPRINT=0;",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23287);}while(r);
}
do{
qbs_set(__STRING_TLAYOUT,_SUB_XPRINT_STRING_L);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23288);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23289);}while(r);
}
}
do{
*_SUB_XPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(23294);}while(r);
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23295);}while(r);
do{
*_SUB_XPRINT_LONG_LAST= 0 ;
if(!qbevent)break;evnt(23296);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3487=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(0,0);",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23297);}while(r);
do{
*_SUB_XPRINT_LONG_TQBSSET= -1 ;
if(!qbevent)break;evnt(23298);}while(r);
S_31318:;
fornext_value3489= 2 ;
fornext_finalvalue3489=*_SUB_XPRINT_LONG_N;
fornext_step3489= 1 ;
if (fornext_step3489<0) fornext_step_negative3489=1; else fornext_step_negative3489=0;
if (is_error_pending()) goto fornext_error3489;
goto fornext_entrylabel3489;
while(1){
fornext_value3489=fornext_step3489+(*_SUB_XPRINT_LONG_I);
fornext_entrylabel3489:
*_SUB_XPRINT_LONG_I=fornext_value3489;
if (fornext_step_negative3489){
if (fornext_value3489<fornext_finalvalue3489) break;
}else{
if (fornext_value3489>fornext_finalvalue3489) break;
}
fornext_error3489:;
if(qbevent){evnt(23299);if(r)goto S_31318;}
do{
qbs_set(_SUB_XPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XPRINT_STRING_CA,_SUB_XPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23300);}while(r);
S_31320:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(23301);if(r)goto S_31320;}
do{
*_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(23301);}while(r);
}
S_31323:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(23302);if(r)goto S_31323;}
do{
*_SUB_XPRINT_LONG_B=*_SUB_XPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(23302);}while(r);
}
S_31326:;
if ((-(*_SUB_XPRINT_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(23303);if(r)goto S_31326;}
S_31327:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(qbs_ucase(_SUB_XPRINT_STRING_A2),qbs_new_txt_len("USING",5)))))||is_error_pending()){
if(qbevent){evnt(23304);if(r)goto S_31327;}
LABEL_PRINTLAST:;
if(qbevent){evnt(23305);r=0;}
S_31328:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_XPRINT_STRING_A2),qbs_new_txt_len("USING",5))))||is_error_pending()){
if(qbevent){evnt(23307);if(r)goto S_31328;}
S_31329:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(23308);if(r)goto S_31329;}
do{
*_SUB_XPRINT_LONG_GOTOPU= 1 ;
if(!qbevent)break;evnt(23308);}while(r);
}else{
do{
*_SUB_XPRINT_LONG_I=*_SUB_XPRINT_LONG_I+ 1 ;
if(!qbevent)break;evnt(23308);}while(r);
do{
goto LABEL_PUJUMP;
if(!qbevent)break;evnt(23308);}while(r);
}
}
S_31336:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(23311);if(r)goto S_31336;}
do{
qbs_set(_SUB_XPRINT_STRING_EBAK,_SUB_XPRINT_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23312);}while(r);
do{
*_SUB_XPRINT_LONG_PNRTNUM= 0 ;
if(!qbevent)break;evnt(23313);}while(r);
LABEL_PRINTNUMBER:;
if(qbevent){evnt(23314);r=0;}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XPRINT_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23315);}while(r);
S_31340:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23316);if(r)goto S_31340;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23316);}while(r);
}
S_31343:;
if ((-(*_SUB_XPRINT_LONG_PNRTNUM== 0 ))||is_error_pending()){
if(qbevent){evnt(23317);if(r)goto S_31343;}
S_31344:;
if ((*_SUB_XPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(23318);if(r)goto S_31344;}
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23318);}while(r);
}else{
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23318);}while(r);
}
}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_EVALUATE(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23320);}while(r);
S_31351:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23321);if(r)goto S_31351;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23321);}while(r);
}
S_31354:;
if ((-((*_SUB_XPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||is_error_pending()){
if(qbevent){evnt(23322);if(r)goto S_31354;}
do{
qbs_set(_SUB_XPRINT_STRING_E,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_new_txt_len("STR$",4),__STRING1_SP),qbs_new_txt_len("(",1)),__STRING1_SP),_SUB_XPRINT_STRING_EBAK),__STRING1_SP),qbs_new_txt_len(")",1)),__STRING1_SP),qbs_new_txt_len("+",1)),__STRING1_SP),func_chr( 34 )),qbs_new_txt_len(" ",1)),func_chr( 34 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23324);}while(r);
do{
*_SUB_XPRINT_LONG_PNRTNUM= 1 ;
if(!qbevent)break;evnt(23325);}while(r);
do{
goto LABEL_PRINTNUMBER;
if(!qbevent)break;evnt(23326);}while(r);
}
S_31359:;
if (((*_SUB_XPRINT_LONG_TYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(23328);if(r)goto S_31359;}
do{
qbs_set(_SUB_XPRINT_STRING_E,FUNC_REFER(_SUB_XPRINT_STRING_E,_SUB_XPRINT_LONG_TYP,&(pass3491= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23328);}while(r);
}
S_31362:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(23329);if(r)goto S_31362;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(23329);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3492=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XPRINT_STRING_E),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23330);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3493=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip",33),_SUB_XPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23331);}while(r);
S_31367:;
if ((*_SUB_XPRINT_LONG_LP)||is_error_pending()){
if(qbevent){evnt(23332);if(r)goto S_31367;}
do{
SUB_WRITEBUFLINE(&(pass3494=*__LONG_MAINTXTBUF),qbs_new_txt_len("lprint_makefit(tqbs);",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23332);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3495=*__LONG_MAINTXTBUF),qbs_new_txt_len("makefit(tqbs);",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23332);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3496=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(tqbs,0);",14)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23333);}while(r);
}else{
S_31374:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(23335);if(r)goto S_31374;}
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23335);}while(r);
}
S_31377:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(23336);if(r)goto S_31377;}
S_31378:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_SUB_XPRINT_STRING_L, 1 ),qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(23337);if(r)goto S_31378;}
do{
qbs_set(_SUB_XPRINT_STRING_L,qbs_add(qbs_add(_SUB_XPRINT_STRING_L,__STRING1_SP),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23337);}while(r);
}
}
}
S_31383:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XPRINT_STRING_A2,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(23340);if(r)goto S_31383;}
do{
SUB_WRITEBUFLINE(&(pass3497=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab();",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23340);}while(r);
}
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23341);}while(r);
S_31387:;
if ((*_SUB_XPRINT_LONG_GOTOPU)||is_error_pending()){
if(qbevent){evnt(23343);if(r)goto S_31387;}
do{
*_SUB_XPRINT_LONG_I=*_SUB_XPRINT_LONG_I+ 1 ;
if(!qbevent)break;evnt(23343);}while(r);
do{
goto LABEL_PUJUMP;
if(!qbevent)break;evnt(23343);}while(r);
}
S_31391:;
if ((*_SUB_XPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(23345);if(r)goto S_31391;}
do{
SUB_WRITEBUFLINE(&(pass3498=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(nothingstring,1);",23)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23346);}while(r);
do{
goto fornext_exit_3488;
if(!qbevent)break;evnt(23347);}while(r);
}
do{
goto LABEL_PRINTNEXT;
if(!qbevent)break;evnt(23350);}while(r);
}
}
S_31398:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(23354);if(r)goto S_31398;}
do{
qbs_set(_SUB_XPRINT_STRING_E,qbs_add(qbs_add(_SUB_XPRINT_STRING_E,__STRING1_SP),_SUB_XPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23354);}while(r);
}else{
do{
qbs_set(_SUB_XPRINT_STRING_E,_SUB_XPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23354);}while(r);
}
LABEL_PRINTNEXT:;
if(qbevent){evnt(23355);r=0;}
fornext_continue_3488:;
}
fornext_exit_3488:;
S_31404:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(23357);if(r)goto S_31404;}
do{
qbs_set(_SUB_XPRINT_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23357);}while(r);
do{
*_SUB_XPRINT_LONG_LAST= 1 ;
if(!qbevent)break;evnt(23357);}while(r);
do{
goto LABEL_PRINTLAST;
if(!qbevent)break;evnt(23357);}while(r);
}
S_31409:;
if ((-(*_SUB_XPRINT_LONG_N== 1 ))||is_error_pending()){
if(qbevent){evnt(23358);if(r)goto S_31409;}
do{
SUB_WRITEBUFLINE(&(pass3501=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_",4),_SUB_XPRINT_STRING_LP),qbs_new_txt_len("print(nothingstring,1);",23)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23358);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3502=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XPRINT_STRING_U),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23359);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3503=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_free(tqbs);",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23360);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3504=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23361);}while(r);
S_31415:;
if ((*_SUB_XPRINT_LONG_LP)||is_error_pending()){
if(qbevent){evnt(23362);if(r)goto S_31415;}
do{
SUB_WRITEBUFLINE(&(pass3505=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_LPRINT=0;",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23362);}while(r);
}
do{
qbs_set(__STRING_TLAYOUT,_SUB_XPRINT_STRING_L);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23363);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free48.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;
}
