qbs* FUNC_APPLY_LAYOUT_INDENT(qbs*_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL){
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 "data327.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_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,__STRING_LAYOUT);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,3,"format.bas");}while(r);
S_43343:;
if ((qbs_cleanup(qbs_tmp_base,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len))||is_error_pending()){
if(qbevent){evnt(28174,6,"format.bas");if(r)goto S_43343;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_L=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,9,"format.bas");}while(r);
S_43345:;
fornext_value5241= 1 ;
fornext_finalvalue5241=*_FUNC_APPLY_LAYOUT_INDENT_LONG_L;
fornext_step5241= 1 ;
if (fornext_step5241<0) fornext_step_negative5241=1; else fornext_step_negative5241=0;
if (is_error_pending()) goto fornext_error5241;
goto fornext_entrylabel5241;
while(1){
fornext_value5241=fornext_step5241+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
fornext_entrylabel5241:
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value5241;
if (fornext_step_negative5241){
if (fornext_value5241<fornext_finalvalue5241) break;
}else{
if (fornext_value5241>fornext_finalvalue5241) break;
}
fornext_error5241:;
if(qbevent){evnt(28174,10,"format.bas");if(r)goto S_43345;}
S_43346:;
if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I)!= 32 ))|(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I==*_FUNC_APPLY_LAYOUT_INDENT_LONG_L))))||is_error_pending()){
if(qbevent){evnt(28174,11,"format.bas");if(r)goto S_43346;}
S_43347:;
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I)== 32 )))||is_error_pending()){
if(qbevent){evnt(28174,12,"format.bas");if(r)goto S_43347;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,13,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I;
if(!qbevent)break;evnt(28174,13,"format.bas");}while(r);
}else{
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I- 1 ;
if(!qbevent)break;evnt(28174,15,"format.bas");}while(r);
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_right(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len-*_FUNC_APPLY_LAYOUT_INDENT_LONG_I+ 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,16,"format.bas");}while(r);
}
do{
goto fornext_exit_5240;
if(!qbevent)break;evnt(28174,18,"format.bas");}while(r);
}
fornext_continue_5240:;
}
fornext_exit_5240:;
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,22,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2= 1 ;
if(!qbevent)break;evnt(28174,22,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP= 0 ;
if(!qbevent)break;evnt(28174,23,"format.bas");}while(r);
S_43360:;
fornext_value5244= 1 ;
fornext_finalvalue5244=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len;
fornext_step5244= 1 ;
if (fornext_step5244<0) fornext_step_negative5244=1; else fornext_step_negative5244=0;
if (is_error_pending()) goto fornext_error5244;
goto fornext_entrylabel5244;
while(1){
fornext_value5244=fornext_step5244+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
fornext_entrylabel5244:
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value5244;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative5244){
if (fornext_value5244<fornext_finalvalue5244) break;
}else{
if (fornext_value5244>fornext_finalvalue5244) break;
}
fornext_error5244:;
if(qbevent){evnt(28174,24,"format.bas");if(r)goto S_43360;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_A=qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,25,"format.bas");}while(r);
S_43362:;
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_A== 34 ))||is_error_pending()){
if(qbevent){evnt(28174,26,"format.bas");if(r)goto S_43362;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP=*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP+ 1 ;
if(!qbevent)break;evnt(28174,27,"format.bas");}while(r);
S_43364:;
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP== 2 ))||is_error_pending()){
if(qbevent){evnt(28174,27,"format.bas");if(r)goto S_43364;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP= 0 ;
if(!qbevent)break;evnt(28174,27,"format.bas");}while(r);
}
}
S_43368:;
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP== 0 ))||is_error_pending()){
if(qbevent){evnt(28174,29,"format.bas");if(r)goto S_43368;}
S_43369:;
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_A==*__LONG_SP_ASC))||is_error_pending()){
if(qbevent){evnt(28174,30,"format.bas");if(r)goto S_43369;}
do{
tqbs=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3; if (!is_error_pending()){
tmp_fileno=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2; if (!is_error_pending()){
tmp_long= 32 ; if (!is_error_pending()){
if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);}
}}}
if(!qbevent)break;evnt(28174,30,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2+ 1 ;
if(!qbevent)break;evnt(28174,30,"format.bas");}while(r);
do{
goto LABEL_SKIPCHAR;
if(!qbevent)break;evnt(28174,30,"format.bas");}while(r);
}
S_43374:;
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_A==*__LONG_SP2_ASC))||is_error_pending()){
if(qbevent){evnt(28174,31,"format.bas");if(r)goto S_43374;}
do{
goto LABEL_SKIPCHAR;
if(!qbevent)break;evnt(28174,31,"format.bas");}while(r);
}
}
do{
tqbs=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3; if (!is_error_pending()){
tmp_fileno=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2; if (!is_error_pending()){
tmp_long=*_FUNC_APPLY_LAYOUT_INDENT_LONG_A; if (!is_error_pending()){
if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);}
}}}
if(!qbevent)break;evnt(28174,33,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2+ 1 ;
if(!qbevent)break;evnt(28174,33,"format.bas");}while(r);
LABEL_SKIPCHAR:;
if(qbevent){evnt(28174,34,"format.bas");r=0;}
fornext_continue_5243:;
}
fornext_exit_5243:;
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_left(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,36,"format.bas");}while(r);
S_43382:;
if ((-(*__LONG_IDEAUTOINDENT== 0 ))||is_error_pending()){
if(qbevent){evnt(28174,38,"format.bas");if(r)goto S_43382;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT= 0 ;
if(!qbevent)break;evnt(28174,41,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_L=_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,42,"format.bas");}while(r);
S_43385:;
fornext_value5248= 1 ;
fornext_finalvalue5248=*_FUNC_APPLY_LAYOUT_INDENT_LONG_L;
fornext_step5248= 1 ;
if (fornext_step5248<0) fornext_step_negative5248=1; else fornext_step_negative5248=0;
if (is_error_pending()) goto fornext_error5248;
goto fornext_entrylabel5248;
while(1){
fornext_value5248=fornext_step5248+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
fornext_entrylabel5248:
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value5248;
if (fornext_step_negative5248){
if (fornext_value5248<fornext_finalvalue5248) break;
}else{
if (fornext_value5248>fornext_finalvalue5248) break;
}
fornext_error5248:;
if(qbevent){evnt(28174,43,"format.bas");if(r)goto S_43385;}
S_43386:;
if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I)!= 32 ))|(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I==*_FUNC_APPLY_LAYOUT_INDENT_LONG_L))))||is_error_pending()){
if(qbevent){evnt(28174,44,"format.bas");if(r)goto S_43386;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I- 1 ;
if(!qbevent)break;evnt(28174,45,"format.bas");}while(r);
do{
goto fornext_exit_5247;
if(!qbevent)break;evnt(28174,46,"format.bas");}while(r);
}
fornext_continue_5247:;
}
fornext_exit_5247:;
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_INDENT,func_space(*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,49,"format.bas");}while(r);
}else{
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_INDENT,func_space(*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT**__LONG_IDEAUTOINDENTSIZE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,51,"format.bas");}while(r);
}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,54,"format.bas");}while(r);
S_43396:;
if ((-(*__LONG_IDEAUTOLAYOUT== 0 ))||is_error_pending()){
if(qbevent){evnt(28174,55,"format.bas");if(r)goto S_43396;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_L=_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,57,"format.bas");}while(r);
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,58,"format.bas");}while(r);
S_43399:;
fornext_value5251= 1 ;
fornext_finalvalue5251=*_FUNC_APPLY_LAYOUT_INDENT_LONG_L;
fornext_step5251= 1 ;
if (fornext_step5251<0) fornext_step_negative5251=1; else fornext_step_negative5251=0;
if (is_error_pending()) goto fornext_error5251;
goto fornext_entrylabel5251;
while(1){
fornext_value5251=fornext_step5251+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
fornext_entrylabel5251:
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value5251;
if (fornext_step_negative5251){
if (fornext_value5251<fornext_finalvalue5251) break;
}else{
if (fornext_value5251>fornext_finalvalue5251) break;
}
fornext_error5251:;
if(qbevent){evnt(28174,59,"format.bas");if(r)goto S_43399;}
S_43400:;
if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I)!= 32 ))|(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I==*_FUNC_APPLY_LAYOUT_INDENT_LONG_L))))||is_error_pending()){
if(qbevent){evnt(28174,60,"format.bas");if(r)goto S_43400;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_right(_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL,*_FUNC_APPLY_LAYOUT_INDENT_LONG_L-*_FUNC_APPLY_LAYOUT_INDENT_LONG_I+ 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,61,"format.bas");}while(r);
do{
goto fornext_exit_5250;
if(!qbevent)break;evnt(28174,62,"format.bas");}while(r);
}
fornext_continue_5250:;
}
fornext_exit_5250:;
}
S_43406:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY)))||is_error_pending()){
if(qbevent){evnt(28174,67,"format.bas");if(r)goto S_43406;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT= 0 ;
if(!qbevent)break;evnt(28174,68,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT= 0 ;
if(!qbevent)break;evnt(28174,68,"format.bas");}while(r);
S_43409:;
while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT<=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len)))||is_error_pending()){
if(qbevent){evnt(28174,69,"format.bas");if(r)goto S_43409;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT+ 1 ;
if(!qbevent)break;evnt(28174,70,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT+ 1 ;
if(!qbevent)break;evnt(28174,70,"format.bas");}while(r);
LABEL_RECHECKDIFF:;
if(qbevent){evnt(28174,71,"format.bas");r=0;}
S_43412:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,qbs_new_txt_len("",0)))&(qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,qbs_new_txt_len(" ",1)))))||is_error_pending()){
if(qbevent){evnt(28174,72,"format.bas");if(r)goto S_43412;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LLCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,72,"format.bas");}while(r);
}
S_43415:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,qbs_new_txt_len("",0)))&(qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,qbs_new_txt_len(" ",1)))))||is_error_pending()){
if(qbevent){evnt(28174,73,"format.bas");if(r)goto S_43415;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LOCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,73,"format.bas");}while(r);
}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,func_mid(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,74,"format.bas");}while(r);
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,func_mid(_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY,*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,75,"format.bas");}while(r);
S_43420:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH)))||is_error_pending()){
if(qbevent){evnt(28174,76,"format.bas");if(r)goto S_43420;}
do{
goto ww_continue_5252;
if(!qbevent)break;evnt(28174,76,"format.bas");}while(r);
}
S_43423:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,qbs_new_txt_len(" ",1))))||is_error_pending()){
if(qbevent){evnt(28174,77,"format.bas");if(r)goto S_43423;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT+ 1 ;
if(!qbevent)break;evnt(28174,78,"format.bas");}while(r);
S_43425:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT>_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len))&(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT>_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY->len))))||is_error_pending()){
if(qbevent){evnt(28174,78,"format.bas");if(r)goto S_43425;}
do{
goto ww_exit_5252;
if(!qbevent)break;evnt(28174,78,"format.bas");}while(r);
}
do{
goto LABEL_RECHECKDIFF;
if(!qbevent)break;evnt(28174,79,"format.bas");}while(r);
}
S_43430:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,qbs_new_txt_len(" ",1))))||is_error_pending()){
if(qbevent){evnt(28174,81,"format.bas");if(r)goto S_43430;}
do{
*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT+ 1 ;
if(!qbevent)break;evnt(28174,82,"format.bas");}while(r);
S_43432:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT>_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY->len))&(-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT>_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len))))||is_error_pending()){
if(qbevent){evnt(28174,82,"format.bas");if(r)goto S_43432;}
do{
goto ww_exit_5252;
if(!qbevent)break;evnt(28174,82,"format.bas");}while(r);
}
do{
goto LABEL_RECHECKDIFF;
if(!qbevent)break;evnt(28174,83,"format.bas");}while(r);
}
S_43437:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,qbs_new_txt_len("?",1)))&(qbs_equal(qbs_ucase(func_mid(_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY,*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT, 5 ,0|1)),qbs_new_txt_len("PRINT",5)))))||is_error_pending()){
if(qbevent){evnt(28174,85,"format.bas");if(r)goto S_43437;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_PS,qbs_new_txt_len("print",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,86,"format.bas");}while(r);
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_NLCH,func_mid(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT+ 1 , 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,86,"format.bas");}while(r);
S_43440:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_NLCH,qbs_new_txt_len(" ",1)))&(qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_NLCH,qbs_new_txt_len("",0)))))||is_error_pending()){
if(qbevent){evnt(28174,87,"format.bas");if(r)goto S_43440;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_PS,qbs_add(_FUNC_APPLY_LAYOUT_INDENT_STRING_PS,qbs_new_txt_len(" ",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,87,"format.bas");}while(r);
}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_add(qbs_add(qbs_left(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT- 1 ),_FUNC_APPLY_LAYOUT_INDENT_STRING_PS),qbs_right(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len-*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,88,"format.bas");}while(r);
do{
goto LABEL_RECHECKDIFF;
if(!qbevent)break;evnt(28174,89,"format.bas");}while(r);
}
S_43446:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,func_chr( 34 )))&(qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LLCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_LOCH))))||is_error_pending()){
if(qbevent){evnt(28174,91,"format.bas");if(r)goto S_43446;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_add(qbs_add(qbs_left(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT- 1 ),func_chr( 34 )),qbs_right(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len-*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,92,"format.bas");}while(r);
do{
goto LABEL_RECHECKDIFF;
if(!qbevent)break;evnt(28174,93,"format.bas");}while(r);
}
do{
*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_LAS=((_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH->len)?(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH)):( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,95,"format.bas");}while(r);
do{
*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_OAS=((_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH->len)?(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH)):( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,95,"format.bas");}while(r);
S_43452:;
if ((((int32*)(__ARRAY_LONG_ISALPHA[0]))[array_check((*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_LAS)-__ARRAY_LONG_ISALPHA[4],__ARRAY_LONG_ISALPHA[5])]&((int32*)(__ARRAY_LONG_ISALPHA[0]))[array_check((*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_OAS)-__ARRAY_LONG_ISALPHA[4],__ARRAY_LONG_ISALPHA[5])]&(-(func_abs((int64)(*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_LAS-*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_OAS))== 32 )))||is_error_pending()){
if(qbevent){evnt(28174,96,"format.bas");if(r)goto S_43452;}
do{
sub_mid(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT, 1 ,_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,1);
if(!qbevent)break;evnt(28174,96,"format.bas");}while(r);
}
ww_continue_5252:;
}
ww_exit_5252:;
}
S_43457:;
if ((qbs_cleanup(qbs_tmp_base,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len))||is_error_pending()){
if(qbevent){evnt(28174,100,"format.bas");if(r)goto S_43457;}
do{
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_APPLY_LAYOUT_INDENT,qbs_add(_FUNC_APPLY_LAYOUT_INDENT_STRING_INDENT,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28174,101,"format.bas");}while(r);
}
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free327.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_APPLY_LAYOUT_INDENT_STRING_APPLY_LAYOUT_INDENT);return _FUNC_APPLY_LAYOUT_INDENT_STRING_APPLY_LAYOUT_INDENT;
}
