void SUB_XFILEPRINT(qbs*_SUB_XFILEPRINT_STRING_A,qbs*_SUB_XFILEPRINT_STRING_CA,int32*_SUB_XFILEPRINT_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 "data52.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_XFILEPRINT_STRING_U,qbs__tostr((int32)(FUNC_UNIQUENUMBER()),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24238);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3563=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=2;",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24239);}while(r);
S_32002:;
if ((-(*_SUB_XFILEPRINT_LONG_N== 2 ))||is_error_pending()){
if(qbevent){evnt(24240);if(r)goto S_32002;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24240);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24240);}while(r);
}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24241);}while(r);
do{
*_SUB_XFILEPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(24242);}while(r);
S_32008:;
fornext_value3565= 3 ;
fornext_finalvalue3565=*_SUB_XFILEPRINT_LONG_N;
fornext_step3565= 1 ;
if (fornext_step3565<0) fornext_step_negative3565=1; else fornext_step_negative3565=0;
if (is_error_pending()) goto fornext_error3565;
goto fornext_entrylabel3565;
while(1){
fornext_value3565=fornext_step3565+(*_SUB_XFILEPRINT_LONG_I);
fornext_entrylabel3565:
*_SUB_XFILEPRINT_LONG_I=fornext_value3565;
if (fornext_step_negative3565){
if (fornext_value3565<fornext_finalvalue3565) break;
}else{
if (fornext_value3565>fornext_finalvalue3565) break;
}
fornext_error3565:;
if(qbevent){evnt(24243);if(r)goto S_32008;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24244);}while(r);
S_32010:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(24245);if(r)goto S_32010;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(24245);}while(r);
}
S_32013:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(24246);if(r)goto S_32013;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(24246);}while(r);
}
S_32016:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))&(-(*_SUB_XFILEPRINT_LONG_B== 0 ))))||is_error_pending()){
if(qbevent){evnt(24247);if(r)goto S_32016;}
S_32017:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24248);if(r)goto S_32017;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... , ...",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24248);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24248);}while(r);
}
do{
goto LABEL_PRINTGOTFN;
if(!qbevent)break;evnt(24249);}while(r);
}
S_32023:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A3,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24251);if(r)goto S_32023;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A3,_SUB_XFILEPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24251);}while(r);
}else{
do{
qbs_set(_SUB_XFILEPRINT_STRING_A3,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_A3,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24251);}while(r);
}
fornext_continue_3564:;
}
fornext_exit_3564:;
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected # ... ,",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24253);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24253);}while(r);
LABEL_PRINTGOTFN:;
if(qbevent){evnt(24254);r=0;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_A3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24255);}while(r);
S_32032:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24256);if(r)goto S_32032;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24256);}while(r);
}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCASE(qbs_new_txt_len("Print",5)),__STRING1_SP),qbs_new_txt_len("#",1)),__STRING1_SP2),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(",",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24257);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATETOTYP(_SUB_XFILEPRINT_STRING_E,&(pass3566= 64 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24258);}while(r);
S_32037:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24259);if(r)goto S_32037;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24259);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3567=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("tab_fileno=tmp_fileno=",22),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24260);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3568=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip",33),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24261);}while(r);
do{
*_SUB_XFILEPRINT_LONG_I=*_SUB_XFILEPRINT_LONG_I+ 1 ;
if(!qbevent)break;evnt(24262);}while(r);
S_32043:;
if ((-(*_SUB_XFILEPRINT_LONG_N>=*_SUB_XFILEPRINT_LONG_I))||is_error_pending()){
if(qbevent){evnt(24265);if(r)goto S_32043;}
S_32044:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_A,_SUB_XFILEPRINT_LONG_I),qbs_new_txt_len("USING",5))))||is_error_pending()){
if(qbevent){evnt(24266);if(r)goto S_32044;}
LABEL_FPUJUMP:;
if(qbevent){evnt(24268);r=0;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),FUNC_SCASE(qbs_new_txt_len("Using",5))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24269);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24270);}while(r);
do{
*_SUB_XFILEPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(24270);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24270);}while(r);
S_32049:;
fornext_value3570=*_SUB_XFILEPRINT_LONG_I+ 1 ;
fornext_finalvalue3570=*_SUB_XFILEPRINT_LONG_N;
fornext_step3570= 1 ;
if (fornext_step3570<0) fornext_step_negative3570=1; else fornext_step_negative3570=0;
if (is_error_pending()) goto fornext_error3570;
goto fornext_entrylabel3570;
while(1){
fornext_value3570=fornext_step3570+(*_SUB_XFILEPRINT_LONG_I);
fornext_entrylabel3570:
*_SUB_XFILEPRINT_LONG_I=fornext_value3570;
if (fornext_step_negative3570){
if (fornext_value3570<fornext_finalvalue3570) break;
}else{
if (fornext_value3570>fornext_finalvalue3570) break;
}
fornext_error3570:;
if(qbevent){evnt(24271);if(r)goto S_32049;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24272);}while(r);
S_32051:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(24273);if(r)goto S_32051;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(24273);}while(r);
}
S_32054:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(24274);if(r)goto S_32054;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(24274);}while(r);
}
S_32057:;
if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(24275);if(r)goto S_32057;}
S_32058:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(24276);if(r)goto S_32058;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24276);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24276);}while(r);
}
S_32062:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(24277);if(r)goto S_32062;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24278);}while(r);
S_32064:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24279);if(r)goto S_32064;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24279);}while(r);
}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24280);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATE(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24281);}while(r);
S_32069:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24282);if(r)goto S_32069;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24282);}while(r);
}
S_32072:;
if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(24283);if(r)goto S_32072;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3571= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24283);}while(r);
}
S_32075:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24284);if(r)goto S_32075;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24284);}while(r);
}
S_32078:;
if ((-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||is_error_pending()){
if(qbevent){evnt(24285);if(r)goto S_32078;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24285);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24285);}while(r);
}
do{
qbs_set(_SUB_XFILEPRINT_STRING_PUFORMAT,_SUB_XFILEPRINT_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24286);}while(r);
do{
goto fornext_exit_3569;
if(!qbevent)break;evnt(24287);}while(r);
}
}
S_32086:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(24290);if(r)goto S_32086;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_E,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24290);}while(r);
}else{
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24290);}while(r);
}
fornext_continue_3569:;
}
fornext_exit_3569:;
S_32092:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_PUFORMAT,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24292);if(r)goto S_32092;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24292);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24292);}while(r);
}
S_32096:;
if ((-(*_SUB_XFILEPRINT_LONG_I==*_SUB_XFILEPRINT_LONG_N))||is_error_pending()){
if(qbevent){evnt(24293);if(r)goto S_32096;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected PRINT USING #filenumber, formatstring ; ...",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24293);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24293);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3573=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs=qbs_new(0,0);",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24295);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3574=*__LONG_MAINTXTBUF),qbs_new_txt_len("tmp_long=0;",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24297);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_PUF,qbs_add(qbs_new_txt_len("print_using_format",18),_SUB_XFILEPRINT_STRING_U));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24299);}while(r);
S_32103:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_SUBFUNC,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24300);if(r)goto S_32103;}
do{
SUB_WRITEBUFLINE(&(pass3575=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("static qbs *",12),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24301);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3576=*__LONG_DATATXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs *",5),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24303);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3577=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_PUF,qbs_new_txt_len("=qbs_new(0,0); qbs_set(",23)),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_PUFORMAT),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24305);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3578=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip",33),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24306);}while(r);
do{
*_SUB_XFILEPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(24308);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24309);}while(r);
do{
*_SUB_XFILEPRINT_LONG_LAST= 0 ;
if(!qbevent)break;evnt(24310);}while(r);
S_32113:;
fornext_value3580=*_SUB_XFILEPRINT_LONG_I+ 1 ;
fornext_finalvalue3580=*_SUB_XFILEPRINT_LONG_N;
fornext_step3580= 1 ;
if (fornext_step3580<0) fornext_step_negative3580=1; else fornext_step_negative3580=0;
if (is_error_pending()) goto fornext_error3580;
goto fornext_entrylabel3580;
while(1){
fornext_value3580=fornext_step3580+(*_SUB_XFILEPRINT_LONG_I);
fornext_entrylabel3580:
*_SUB_XFILEPRINT_LONG_I=fornext_value3580;
if (fornext_step_negative3580){
if (fornext_value3580<fornext_finalvalue3580) break;
}else{
if (fornext_value3580>fornext_finalvalue3580) break;
}
fornext_error3580:;
if(qbevent){evnt(24311);if(r)goto S_32113;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24312);}while(r);
S_32115:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(24313);if(r)goto S_32115;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(24313);}while(r);
}
S_32118:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(24314);if(r)goto S_32118;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(24314);}while(r);
}
S_32121:;
if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(24315);if(r)goto S_32121;}
S_32122:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))))||is_error_pending()){
if(qbevent){evnt(24316);if(r)goto S_32122;}
LABEL_FPRINTULAST:;
if(qbevent){evnt(24317);r=0;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24318);}while(r);
S_32124:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24319);if(r)goto S_32124;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24319);}while(r);
}
S_32127:;
if ((*_SUB_XFILEPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(24320);if(r)goto S_32127;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24320);}while(r);
}else{
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24320);}while(r);
}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATE(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24321);}while(r);
S_32133:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24322);if(r)goto S_32133;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24322);}while(r);
}
S_32136:;
if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(24323);if(r)goto S_32136;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3581= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24323);}while(r);
}
S_32139:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24324);if(r)goto S_32139;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24324);}while(r);
}
S_32142:;
if ((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(24325);if(r)goto S_32142;}
S_32143:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_left(_SUB_XFILEPRINT_STRING_E, 9 ),qbs_new_txt_len("func_tab(",9)))|(qbs_equal(qbs_left(_SUB_XFILEPRINT_STRING_E, 9 ),qbs_new_txt_len("func_spc(",9)))))||is_error_pending()){
if(qbevent){evnt(24327);if(r)goto S_32143;}
do{
SUB_WRITEBUFLINE(&(pass3582=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,0);",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24332);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3583=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_set(tqbs,",13),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24334);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3584=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip_pu",36),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24335);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3585=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,0);",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24336);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3586=*__LONG_MAINTXTBUF),qbs_new_txt_len("tqbs->len=0;",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24338);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3587=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using(",21),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",tmp_long,tqbs,",15)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24343);}while(r);
}
}else{
S_32153:;
if ((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISFLOAT)||is_error_pending()){
if(qbevent){evnt(24348);if(r)goto S_32153;}
S_32154:;
if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 32 ))||is_error_pending()){
if(qbevent){evnt(24349);if(r)goto S_32154;}
do{
SUB_WRITEBUFLINE(&(pass3588=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_single(",28),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24349);}while(r);
}
S_32157:;
if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 64 ))||is_error_pending()){
if(qbevent){evnt(24350);if(r)goto S_32157;}
do{
SUB_WRITEBUFLINE(&(pass3589=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_double(",28),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24350);}while(r);
}
S_32160:;
if ((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )> 64 ))||is_error_pending()){
if(qbevent){evnt(24351);if(r)goto S_32160;}
do{
SUB_WRITEBUFLINE(&(pass3590=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_float(",27),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24351);}while(r);
}
}else{
S_32164:;
if ((((-((*_SUB_XFILEPRINT_LONG_TYP& 511 )== 64 )))&(-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISUNSIGNED)!= 0 )))||is_error_pending()){
if(qbevent){evnt(24353);if(r)goto S_32164;}
do{
SUB_WRITEBUFLINE(&(pass3591=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_uinteger64(",32),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24354);}while(r);
}else{
do{
SUB_WRITEBUFLINE(&(pass3592=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("tmp_long=print_using_integer64(",31),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(",",1)),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",tmp_long,tqbs);",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24356);}while(r);
}
}
}
do{
SUB_WRITEBUFLINE(&(pass3593=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip_pu",36),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24360);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24361);}while(r);
S_32173:;
if ((*_SUB_XFILEPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(24362);if(r)goto S_32173;}
do{
goto fornext_exit_3579;
if(!qbevent)break;evnt(24362);}while(r);
}
do{
goto LABEL_FPRINTUNEXT;
if(!qbevent)break;evnt(24363);}while(r);
}
}
S_32179:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(24366);if(r)goto S_32179;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_E,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24366);}while(r);
}else{
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24366);}while(r);
}
LABEL_FPRINTUNEXT:;
if(qbevent){evnt(24367);r=0;}
fornext_continue_3579:;
}
fornext_exit_3579:;
S_32185:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24369);if(r)goto S_32185;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24369);}while(r);
do{
*_SUB_XFILEPRINT_LONG_LAST= 1 ;
if(!qbevent)break;evnt(24369);}while(r);
do{
goto LABEL_FPRINTULAST;
if(!qbevent)break;evnt(24369);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3595=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip_pu",7),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24370);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3596=*__LONG_MAINTXTBUF),qbs_new_txt_len("if (is_error_pending()){",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24372);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3597=*__LONG_MAINTXTBUF),qbs_new_txt_len("g_tmp_long=new_error; new_error=0; sub_file_print(tmp_fileno,tqbs,0,0,0); new_error=g_tmp_long;",95));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24373);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3598=*__LONG_MAINTXTBUF),qbs_new_txt_len("}else{",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24374);}while(r);
S_32194:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1)))))||is_error_pending()){
if(qbevent){evnt(24375);if(r)goto S_32194;}
do{
*_SUB_XFILEPRINT_LONG_NL= 0 ;
if(!qbevent)break;evnt(24375);}while(r);
}else{
do{
*_SUB_XFILEPRINT_LONG_NL= 1 ;
if(!qbevent)break;evnt(24375);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3599=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("sub_file_print(tmp_fileno,tqbs,0,0,",35),qbs__tostr((int32)(*_SUB_XFILEPRINT_LONG_NL),NULL,0)),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24376);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3600=*__LONG_MAINTXTBUF),qbs_new_txt_len("}",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24377);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3601=*__LONG_MAINTXTBUF),qbs_new_txt_len("qbs_free(tqbs);",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24378);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3602=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("qbs_free(",9),_SUB_XFILEPRINT_STRING_PUF),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24379);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3603=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24380);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3604=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24381);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3605=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=1;",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24382);}while(r);
do{
qbs_set(__STRING_TLAYOUT,_SUB_XFILEPRINT_STRING_L);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24383);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24384);}while(r);
}
}
S_32210:;
if ((-(*_SUB_XFILEPRINT_LONG_I>*_SUB_XFILEPRINT_LONG_N))||is_error_pending()){
if(qbevent){evnt(24389);if(r)goto S_32210;}
do{
SUB_WRITEBUFLINE(&(pass3606=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,0,1);",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24390);}while(r);
do{
goto LABEL_PRINTBLANKLINE;
if(!qbevent)break;evnt(24391);}while(r);
}
do{
*_SUB_XFILEPRINT_LONG_B= 0 ;
if(!qbevent)break;evnt(24393);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24394);}while(r);
do{
*_SUB_XFILEPRINT_LONG_LAST= 0 ;
if(!qbevent)break;evnt(24395);}while(r);
S_32217:;
fornext_value3608=*_SUB_XFILEPRINT_LONG_I;
fornext_finalvalue3608=*_SUB_XFILEPRINT_LONG_N;
fornext_step3608= 1 ;
if (fornext_step3608<0) fornext_step_negative3608=1; else fornext_step_negative3608=0;
if (is_error_pending()) goto fornext_error3608;
goto fornext_entrylabel3608;
while(1){
fornext_value3608=fornext_step3608+(*_SUB_XFILEPRINT_LONG_I);
fornext_entrylabel3608:
*_SUB_XFILEPRINT_LONG_I=fornext_value3608;
if (fornext_step_negative3608){
if (fornext_value3608<fornext_finalvalue3608) break;
}else{
if (fornext_value3608>fornext_finalvalue3608) break;
}
fornext_error3608:;
if(qbevent){evnt(24396);if(r)goto S_32217;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A2,FUNC_GETELEMENT(_SUB_XFILEPRINT_STRING_CA,_SUB_XFILEPRINT_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24397);}while(r);
S_32219:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(24398);if(r)goto S_32219;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B+ 1 ;
if(!qbevent)break;evnt(24398);}while(r);
}
S_32222:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(24399);if(r)goto S_32222;}
do{
*_SUB_XFILEPRINT_LONG_B=*_SUB_XFILEPRINT_LONG_B- 1 ;
if(!qbevent)break;evnt(24399);}while(r);
}
S_32225:;
if ((-(*_SUB_XFILEPRINT_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(24400);if(r)goto S_32225;}
S_32226:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1)))|(qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1)))|(qbs_equal(qbs_ucase(_SUB_XFILEPRINT_STRING_A2),qbs_new_txt_len("USING",5)))))||is_error_pending()){
if(qbevent){evnt(24401);if(r)goto S_32226;}
LABEL_PRINTFILELAST:;
if(qbevent){evnt(24402);r=0;}
S_32227:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_XFILEPRINT_STRING_A2),qbs_new_txt_len("USING",5))))||is_error_pending()){
if(qbevent){evnt(24404);if(r)goto S_32227;}
S_32228:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24405);if(r)goto S_32228;}
do{
*_SUB_XFILEPRINT_LONG_GOTOFPU= 1 ;
if(!qbevent)break;evnt(24405);}while(r);
}else{
do{
goto LABEL_FPUJUMP;
if(!qbevent)break;evnt(24405);}while(r);
}
}
S_32234:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(24408);if(r)goto S_32234;}
do{
*_SUB_XFILEPRINT_LONG_USETAB= 1 ;
if(!qbevent)break;evnt(24408);}while(r);
}else{
do{
*_SUB_XFILEPRINT_LONG_USETAB= 0 ;
if(!qbevent)break;evnt(24408);}while(r);
}
S_32239:;
if ((-(*_SUB_XFILEPRINT_LONG_LAST== 1 ))||is_error_pending()){
if(qbevent){evnt(24409);if(r)goto S_32239;}
do{
*_SUB_XFILEPRINT_LONG_NEWLINE= 1 ;
if(!qbevent)break;evnt(24409);}while(r);
}else{
do{
*_SUB_XFILEPRINT_LONG_NEWLINE= 0 ;
if(!qbevent)break;evnt(24409);}while(r);
}
do{
*_SUB_XFILEPRINT_LONG_EXTRASPACE= 0 ;
if(!qbevent)break;evnt(24410);}while(r);
S_32245:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_XFILEPRINT_STRING_E->len))||is_error_pending()){
if(qbevent){evnt(24412);if(r)goto S_32245;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_EBAK,_SUB_XFILEPRINT_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24413);}while(r);
do{
*_SUB_XFILEPRINT_LONG_PNRTNUM= 0 ;
if(!qbevent)break;evnt(24414);}while(r);
LABEL_PRINTFILENUMBER:;
if(qbevent){evnt(24415);r=0;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_FIXOPERATIONORDER(_SUB_XFILEPRINT_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24416);}while(r);
S_32249:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24417);if(r)goto S_32249;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24417);}while(r);
}
S_32252:;
if ((-(*_SUB_XFILEPRINT_LONG_PNRTNUM== 0 ))||is_error_pending()){
if(qbevent){evnt(24418);if(r)goto S_32252;}
S_32253:;
if ((*_SUB_XFILEPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(24419);if(r)goto S_32253;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24419);}while(r);
}else{
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),__STRING_TLAYOUT),__STRING1_SP2),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24419);}while(r);
}
}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_EVALUATE(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24421);}while(r);
S_32260:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24422);if(r)goto S_32260;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24422);}while(r);
}
S_32263:;
if ((-((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISSTRING)== 0 ))||is_error_pending()){
if(qbevent){evnt(24423);if(r)goto S_32263;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,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_XFILEPRINT_STRING_EBAK),__STRING1_SP),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24424);}while(r);
do{
*_SUB_XFILEPRINT_LONG_EXTRASPACE= 1 ;
if(!qbevent)break;evnt(24425);}while(r);
do{
*_SUB_XFILEPRINT_LONG_PNRTNUM= 1 ;
if(!qbevent)break;evnt(24426);}while(r);
do{
goto LABEL_PRINTFILENUMBER;
if(!qbevent)break;evnt(24427);}while(r);
}
S_32269:;
if (((*_SUB_XFILEPRINT_LONG_TYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(24429);if(r)goto S_32269;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,FUNC_REFER(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_LONG_TYP,&(pass3610= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24429);}while(r);
}
S_32272:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(24430);if(r)goto S_32272;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24430);}while(r);
}
do{
SUB_WRITEBUFLINE(&(pass3611=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("sub_file_print(tmp_fileno,",26),_SUB_XFILEPRINT_STRING_E),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XFILEPRINT_LONG_EXTRASPACE))),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XFILEPRINT_LONG_USETAB))),qbs_new_txt_len(",",1)),qbs_str((int32)(*_SUB_XFILEPRINT_LONG_NEWLINE))),qbs_new_txt_len(");",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24432);}while(r);
}else{
S_32277:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(",",1))))||is_error_pending()){
if(qbevent){evnt(24434);if(r)goto S_32277;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24434);}while(r);
}
S_32280:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(24435);if(r)goto S_32280;}
S_32281:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_SUB_XFILEPRINT_STRING_L, 1 ),qbs_new_txt_len(";",1))))||is_error_pending()){
if(qbevent){evnt(24436);if(r)goto S_32281;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_L,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_L,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24436);}while(r);
}
}
S_32285:;
if ((*_SUB_XFILEPRINT_LONG_USETAB)||is_error_pending()){
if(qbevent){evnt(24438);if(r)goto S_32285;}
do{
SUB_WRITEBUFLINE(&(pass3612=*__LONG_MAINTXTBUF),qbs_new_txt_len("sub_file_print(tmp_fileno,nothingstring,0,1,0);",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24438);}while(r);
}
}
do{
SUB_WRITEBUFLINE(&(pass3613=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("if (is_error_pending()) goto skip",33),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(";",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24440);}while(r);
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24442);}while(r);
S_32291:;
if ((*_SUB_XFILEPRINT_LONG_GOTOFPU)||is_error_pending()){
if(qbevent){evnt(24443);if(r)goto S_32291;}
do{
goto LABEL_FPUJUMP;
if(!qbevent)break;evnt(24443);}while(r);
}
S_32294:;
if ((*_SUB_XFILEPRINT_LONG_LAST)||is_error_pending()){
if(qbevent){evnt(24444);if(r)goto S_32294;}
do{
goto fornext_exit_3607;
if(!qbevent)break;evnt(24444);}while(r);
}
do{
goto LABEL_PRINTFILENEXT;
if(!qbevent)break;evnt(24445);}while(r);
}
}
S_32300:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24448);if(r)goto S_32300;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,qbs_add(qbs_add(_SUB_XFILEPRINT_STRING_E,__STRING1_SP),_SUB_XFILEPRINT_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24448);}while(r);
}else{
do{
qbs_set(_SUB_XFILEPRINT_STRING_E,_SUB_XFILEPRINT_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24448);}while(r);
}
LABEL_PRINTFILENEXT:;
if(qbevent){evnt(24449);r=0;}
fornext_continue_3607:;
}
fornext_exit_3607:;
S_32306:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_XFILEPRINT_STRING_E,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24451);if(r)goto S_32306;}
do{
qbs_set(_SUB_XFILEPRINT_STRING_A2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24451);}while(r);
do{
*_SUB_XFILEPRINT_LONG_LAST= 1 ;
if(!qbevent)break;evnt(24451);}while(r);
do{
goto LABEL_PRINTFILELAST;
if(!qbevent)break;evnt(24451);}while(r);
}
LABEL_PRINTBLANKLINE:;
if(qbevent){evnt(24452);r=0;}
do{
SUB_WRITEBUFLINE(&(pass3614=*__LONG_MAINTXTBUF),qbs_add(qbs_add(qbs_new_txt_len("skip",4),_SUB_XFILEPRINT_STRING_U),qbs_new_txt_len(":",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24453);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3615=*__LONG_MAINTXTBUF),qbs_add(__STRING_CLEANUPSTRINGPROCESSINGCALL,qbs_new_txt_len("0);",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24454);}while(r);
do{
SUB_WRITEBUFLINE(&(pass3616=*__LONG_MAINTXTBUF),qbs_new_txt_len("tab_spc_cr_size=1;",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24455);}while(r);
do{
qbs_set(__STRING_TLAYOUT,_SUB_XFILEPRINT_STRING_L);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24456);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free52.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;
}
