#line 2 "utilities/format.bas"
qbs* FUNC_APPLY_LAYOUT_INDENT(qbs*_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL){
#line 2 "utilities/format.bas"
qbs *tqbs;
#line 2 "utilities/format.bas"
ptrszint tmp_long;
#line 2 "utilities/format.bas"
int32 tmp_fileno;
#line 2 "utilities/format.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 2 "utilities/format.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 2 "utilities/format.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 2 "utilities/format.bas"
#include "data368.txt"
#line 2 "utilities/format.bas"
mem_lock *sf_mem_lock;
#line 2 "utilities/format.bas"
new_mem_lock();
#line 2 "utilities/format.bas"
sf_mem_lock=mem_lock_tmp;
#line 2 "utilities/format.bas"
sf_mem_lock->type=3;
#line 2 "utilities/format.bas"
libqb_check_stack();
#line 2 "utilities/format.bas"
if (is_error_pending()) goto exit_subfunc;
#line 3 "utilities/format.bas"
do{
#line 3 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,__STRING_LAYOUT);
#line 3 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3 "utilities/format.bas"
if(!qbevent)break;evnt(28811,3,"format.bas");}while(r);
#line 6 "utilities/format.bas"
S_44454:;
#line 6 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len))||is_error_pending()){
#line 6 "utilities/format.bas"
if(qbevent){evnt(28811,6,"format.bas");if(r)goto S_44454;}
#line 9 "utilities/format.bas"
do{
#line 9 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_L=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len;
#line 9 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 9 "utilities/format.bas"
if(!qbevent)break;evnt(28811,9,"format.bas");}while(r);
#line 10 "utilities/format.bas"
S_44456:;
#line 10 "utilities/format.bas"
fornext_value4530= 1 ;
#line 10 "utilities/format.bas"
fornext_finalvalue4530=*_FUNC_APPLY_LAYOUT_INDENT_LONG_L;
#line 10 "utilities/format.bas"
fornext_step4530= 1 ;
#line 10 "utilities/format.bas"
if (fornext_step4530<0) fornext_step_negative4530=1; else fornext_step_negative4530=0;
#line 10 "utilities/format.bas"
if (is_error_pending()) goto fornext_error4530;
#line 10 "utilities/format.bas"
goto fornext_entrylabel4530;
#line 10 "utilities/format.bas"
while(1){
#line 10 "utilities/format.bas"
fornext_value4530=fornext_step4530+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
#line 10 "utilities/format.bas"
fornext_entrylabel4530:
#line 10 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value4530;
#line 10 "utilities/format.bas"
if (fornext_step_negative4530){
#line 10 "utilities/format.bas"
if (fornext_value4530<fornext_finalvalue4530) break;
#line 10 "utilities/format.bas"
}else{
#line 10 "utilities/format.bas"
if (fornext_value4530>fornext_finalvalue4530) break;
#line 10 "utilities/format.bas"
}
#line 10 "utilities/format.bas"
fornext_error4530:;
#line 10 "utilities/format.bas"
if(qbevent){evnt(28811,10,"format.bas");if(r)goto S_44456;}
#line 11 "utilities/format.bas"
S_44457:;
#line 11 "utilities/format.bas"
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()){
#line 11 "utilities/format.bas"
if(qbevent){evnt(28811,11,"format.bas");if(r)goto S_44457;}
#line 12 "utilities/format.bas"
S_44458:;
#line 12 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I)== 32 )))||is_error_pending()){
#line 12 "utilities/format.bas"
if(qbevent){evnt(28811,12,"format.bas");if(r)goto S_44458;}
#line 13 "utilities/format.bas"
do{
#line 13 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_new_txt_len("",0));
#line 13 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 13 "utilities/format.bas"
if(!qbevent)break;evnt(28811,13,"format.bas");}while(r);
#line 13 "utilities/format.bas"
do{
#line 13 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I;
#line 13 "utilities/format.bas"
if(!qbevent)break;evnt(28811,13,"format.bas");}while(r);
#line 14 "utilities/format.bas"
}else{
#line 15 "utilities/format.bas"
do{
#line 15 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I- 1 ;
#line 15 "utilities/format.bas"
if(!qbevent)break;evnt(28811,15,"format.bas");}while(r);
#line 16 "utilities/format.bas"
do{
#line 16 "utilities/format.bas"
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 ));
#line 16 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16 "utilities/format.bas"
if(!qbevent)break;evnt(28811,16,"format.bas");}while(r);
#line 17 "utilities/format.bas"
}
#line 18 "utilities/format.bas"
do{
#line 18 "utilities/format.bas"
goto fornext_exit_4529;
#line 18 "utilities/format.bas"
if(!qbevent)break;evnt(28811,18,"format.bas");}while(r);
#line 19 "utilities/format.bas"
}
#line 20 "utilities/format.bas"
fornext_continue_4529:;
#line 20 "utilities/format.bas"
}
#line 20 "utilities/format.bas"
fornext_exit_4529:;
#line 22 "utilities/format.bas"
do{
#line 22 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2);
#line 22 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 22 "utilities/format.bas"
if(!qbevent)break;evnt(28811,22,"format.bas");}while(r);
#line 22 "utilities/format.bas"
do{
#line 22 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2= 1 ;
#line 22 "utilities/format.bas"
if(!qbevent)break;evnt(28811,22,"format.bas");}while(r);
#line 23 "utilities/format.bas"
do{
#line 23 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP= 0 ;
#line 23 "utilities/format.bas"
if(!qbevent)break;evnt(28811,23,"format.bas");}while(r);
#line 24 "utilities/format.bas"
S_44471:;
#line 24 "utilities/format.bas"
fornext_value4533= 1 ;
#line 24 "utilities/format.bas"
fornext_finalvalue4533=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len;
#line 24 "utilities/format.bas"
fornext_step4533= 1 ;
#line 24 "utilities/format.bas"
if (fornext_step4533<0) fornext_step_negative4533=1; else fornext_step_negative4533=0;
#line 24 "utilities/format.bas"
if (is_error_pending()) goto fornext_error4533;
#line 24 "utilities/format.bas"
goto fornext_entrylabel4533;
#line 24 "utilities/format.bas"
while(1){
#line 24 "utilities/format.bas"
fornext_value4533=fornext_step4533+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
#line 24 "utilities/format.bas"
fornext_entrylabel4533:
#line 24 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value4533;
#line 24 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 24 "utilities/format.bas"
if (fornext_step_negative4533){
#line 24 "utilities/format.bas"
if (fornext_value4533<fornext_finalvalue4533) break;
#line 24 "utilities/format.bas"
}else{
#line 24 "utilities/format.bas"
if (fornext_value4533>fornext_finalvalue4533) break;
#line 24 "utilities/format.bas"
}
#line 24 "utilities/format.bas"
fornext_error4533:;
#line 24 "utilities/format.bas"
if(qbevent){evnt(28811,24,"format.bas");if(r)goto S_44471;}
#line 25 "utilities/format.bas"
do{
#line 25 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_A=qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
#line 25 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25 "utilities/format.bas"
if(!qbevent)break;evnt(28811,25,"format.bas");}while(r);
#line 26 "utilities/format.bas"
S_44473:;
#line 26 "utilities/format.bas"
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_A== 34 ))||is_error_pending()){
#line 26 "utilities/format.bas"
if(qbevent){evnt(28811,26,"format.bas");if(r)goto S_44473;}
#line 27 "utilities/format.bas"
do{
#line 27 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP=*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP+ 1 ;
#line 27 "utilities/format.bas"
if(!qbevent)break;evnt(28811,27,"format.bas");}while(r);
#line 27 "utilities/format.bas"
S_44475:;
#line 27 "utilities/format.bas"
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP== 2 ))||is_error_pending()){
#line 27 "utilities/format.bas"
if(qbevent){evnt(28811,27,"format.bas");if(r)goto S_44475;}
#line 27 "utilities/format.bas"
do{
#line 27 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP= 0 ;
#line 27 "utilities/format.bas"
if(!qbevent)break;evnt(28811,27,"format.bas");}while(r);
#line 27 "utilities/format.bas"
}
#line 28 "utilities/format.bas"
}
#line 29 "utilities/format.bas"
S_44479:;
#line 29 "utilities/format.bas"
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_IGNORESP== 0 ))||is_error_pending()){
#line 29 "utilities/format.bas"
if(qbevent){evnt(28811,29,"format.bas");if(r)goto S_44479;}
#line 30 "utilities/format.bas"
S_44480:;
#line 30 "utilities/format.bas"
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_A==*__LONG_SP_ASC))||is_error_pending()){
#line 30 "utilities/format.bas"
if(qbevent){evnt(28811,30,"format.bas");if(r)goto S_44480;}
#line 30 "utilities/format.bas"
do{
#line 30 "utilities/format.bas"
tqbs=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3; if (!is_error_pending()){
#line 30 "utilities/format.bas"
tmp_fileno=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2; if (!is_error_pending()){
#line 30 "utilities/format.bas"
tmp_long= 32 ; if (!is_error_pending()){
#line 30 "utilities/format.bas"
if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);}
#line 30 "utilities/format.bas"
}}}
#line 30 "utilities/format.bas"
if(!qbevent)break;evnt(28811,30,"format.bas");}while(r);
#line 30 "utilities/format.bas"
do{
#line 30 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2+ 1 ;
#line 30 "utilities/format.bas"
if(!qbevent)break;evnt(28811,30,"format.bas");}while(r);
#line 30 "utilities/format.bas"
do{
#line 30 "utilities/format.bas"
goto LABEL_SKIPCHAR;
#line 30 "utilities/format.bas"
if(!qbevent)break;evnt(28811,30,"format.bas");}while(r);
#line 30 "utilities/format.bas"
}
#line 31 "utilities/format.bas"
S_44485:;
#line 31 "utilities/format.bas"
if ((-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_A==*__LONG_SP2_ASC))||is_error_pending()){
#line 31 "utilities/format.bas"
if(qbevent){evnt(28811,31,"format.bas");if(r)goto S_44485;}
#line 31 "utilities/format.bas"
do{
#line 31 "utilities/format.bas"
goto LABEL_SKIPCHAR;
#line 31 "utilities/format.bas"
if(!qbevent)break;evnt(28811,31,"format.bas");}while(r);
#line 31 "utilities/format.bas"
}
#line 32 "utilities/format.bas"
}
#line 33 "utilities/format.bas"
do{
#line 33 "utilities/format.bas"
tqbs=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3; if (!is_error_pending()){
#line 33 "utilities/format.bas"
tmp_fileno=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2; if (!is_error_pending()){
#line 33 "utilities/format.bas"
tmp_long=*_FUNC_APPLY_LAYOUT_INDENT_LONG_A; if (!is_error_pending()){
#line 33 "utilities/format.bas"
if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);}
#line 33 "utilities/format.bas"
}}}
#line 33 "utilities/format.bas"
if(!qbevent)break;evnt(28811,33,"format.bas");}while(r);
#line 33 "utilities/format.bas"
do{
#line 33 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2+ 1 ;
#line 33 "utilities/format.bas"
if(!qbevent)break;evnt(28811,33,"format.bas");}while(r);
#line 34 "utilities/format.bas"
LABEL_SKIPCHAR:;
#line 34 "utilities/format.bas"
if(qbevent){evnt(28811,34,"format.bas");r=0;}
#line 35 "utilities/format.bas"
fornext_continue_4532:;
#line 35 "utilities/format.bas"
}
#line 35 "utilities/format.bas"
fornext_exit_4532:;
#line 36 "utilities/format.bas"
do{
#line 36 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_left(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT3,*_FUNC_APPLY_LAYOUT_INDENT_LONG_I2- 1 ));
#line 36 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 36 "utilities/format.bas"
if(!qbevent)break;evnt(28811,36,"format.bas");}while(r);
#line 38 "utilities/format.bas"
S_44493:;
#line 38 "utilities/format.bas"
if ((-(*__LONG_IDEAUTOINDENT== 0 ))||is_error_pending()){
#line 38 "utilities/format.bas"
if(qbevent){evnt(28811,38,"format.bas");if(r)goto S_44493;}
#line 41 "utilities/format.bas"
do{
#line 41 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT= 0 ;
#line 41 "utilities/format.bas"
if(!qbevent)break;evnt(28811,41,"format.bas");}while(r);
#line 42 "utilities/format.bas"
do{
#line 42 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_L=_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL->len;
#line 42 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 42 "utilities/format.bas"
if(!qbevent)break;evnt(28811,42,"format.bas");}while(r);
#line 43 "utilities/format.bas"
S_44496:;
#line 43 "utilities/format.bas"
fornext_value4537= 1 ;
#line 43 "utilities/format.bas"
fornext_finalvalue4537=*_FUNC_APPLY_LAYOUT_INDENT_LONG_L;
#line 43 "utilities/format.bas"
fornext_step4537= 1 ;
#line 43 "utilities/format.bas"
if (fornext_step4537<0) fornext_step_negative4537=1; else fornext_step_negative4537=0;
#line 43 "utilities/format.bas"
if (is_error_pending()) goto fornext_error4537;
#line 43 "utilities/format.bas"
goto fornext_entrylabel4537;
#line 43 "utilities/format.bas"
while(1){
#line 43 "utilities/format.bas"
fornext_value4537=fornext_step4537+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
#line 43 "utilities/format.bas"
fornext_entrylabel4537:
#line 43 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value4537;
#line 43 "utilities/format.bas"
if (fornext_step_negative4537){
#line 43 "utilities/format.bas"
if (fornext_value4537<fornext_finalvalue4537) break;
#line 43 "utilities/format.bas"
}else{
#line 43 "utilities/format.bas"
if (fornext_value4537>fornext_finalvalue4537) break;
#line 43 "utilities/format.bas"
}
#line 43 "utilities/format.bas"
fornext_error4537:;
#line 43 "utilities/format.bas"
if(qbevent){evnt(28811,43,"format.bas");if(r)goto S_44496;}
#line 44 "utilities/format.bas"
S_44497:;
#line 44 "utilities/format.bas"
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()){
#line 44 "utilities/format.bas"
if(qbevent){evnt(28811,44,"format.bas");if(r)goto S_44497;}
#line 45 "utilities/format.bas"
do{
#line 45 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_I- 1 ;
#line 45 "utilities/format.bas"
if(!qbevent)break;evnt(28811,45,"format.bas");}while(r);
#line 46 "utilities/format.bas"
do{
#line 46 "utilities/format.bas"
goto fornext_exit_4536;
#line 46 "utilities/format.bas"
if(!qbevent)break;evnt(28811,46,"format.bas");}while(r);
#line 47 "utilities/format.bas"
}
#line 48 "utilities/format.bas"
fornext_continue_4536:;
#line 48 "utilities/format.bas"
}
#line 48 "utilities/format.bas"
fornext_exit_4536:;
#line 49 "utilities/format.bas"
do{
#line 49 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_INDENT,func_space(*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT));
#line 49 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 49 "utilities/format.bas"
if(!qbevent)break;evnt(28811,49,"format.bas");}while(r);
#line 50 "utilities/format.bas"
}else{
#line 51 "utilities/format.bas"
do{
#line 51 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_INDENT,func_space(*_FUNC_APPLY_LAYOUT_INDENT_LONG_INDENT**__LONG_IDEAUTOINDENTSIZE));
#line 51 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 51 "utilities/format.bas"
if(!qbevent)break;evnt(28811,51,"format.bas");}while(r);
#line 52 "utilities/format.bas"
}
#line 54 "utilities/format.bas"
do{
#line 54 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2);
#line 54 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 54 "utilities/format.bas"
if(!qbevent)break;evnt(28811,54,"format.bas");}while(r);
#line 55 "utilities/format.bas"
S_44507:;
#line 55 "utilities/format.bas"
if ((-(*__LONG_IDEAUTOLAYOUT== 0 ))||is_error_pending()){
#line 55 "utilities/format.bas"
if(qbevent){evnt(28811,55,"format.bas");if(r)goto S_44507;}
#line 57 "utilities/format.bas"
do{
#line 57 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_L=_FUNC_APPLY_LAYOUT_INDENT_STRING_ORIGINAL->len;
#line 57 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 57 "utilities/format.bas"
if(!qbevent)break;evnt(28811,57,"format.bas");}while(r);
#line 58 "utilities/format.bas"
do{
#line 58 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,qbs_new_txt_len("",0));
#line 58 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 58 "utilities/format.bas"
if(!qbevent)break;evnt(28811,58,"format.bas");}while(r);
#line 59 "utilities/format.bas"
S_44510:;
#line 59 "utilities/format.bas"
fornext_value4540= 1 ;
#line 59 "utilities/format.bas"
fornext_finalvalue4540=*_FUNC_APPLY_LAYOUT_INDENT_LONG_L;
#line 59 "utilities/format.bas"
fornext_step4540= 1 ;
#line 59 "utilities/format.bas"
if (fornext_step4540<0) fornext_step_negative4540=1; else fornext_step_negative4540=0;
#line 59 "utilities/format.bas"
if (is_error_pending()) goto fornext_error4540;
#line 59 "utilities/format.bas"
goto fornext_entrylabel4540;
#line 59 "utilities/format.bas"
while(1){
#line 59 "utilities/format.bas"
fornext_value4540=fornext_step4540+(*_FUNC_APPLY_LAYOUT_INDENT_LONG_I);
#line 59 "utilities/format.bas"
fornext_entrylabel4540:
#line 59 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_I=fornext_value4540;
#line 59 "utilities/format.bas"
if (fornext_step_negative4540){
#line 59 "utilities/format.bas"
if (fornext_value4540<fornext_finalvalue4540) break;
#line 59 "utilities/format.bas"
}else{
#line 59 "utilities/format.bas"
if (fornext_value4540>fornext_finalvalue4540) break;
#line 59 "utilities/format.bas"
}
#line 59 "utilities/format.bas"
fornext_error4540:;
#line 59 "utilities/format.bas"
if(qbevent){evnt(28811,59,"format.bas");if(r)goto S_44510;}
#line 60 "utilities/format.bas"
S_44511:;
#line 60 "utilities/format.bas"
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()){
#line 60 "utilities/format.bas"
if(qbevent){evnt(28811,60,"format.bas");if(r)goto S_44511;}
#line 61 "utilities/format.bas"
do{
#line 61 "utilities/format.bas"
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 ));
#line 61 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 61 "utilities/format.bas"
if(!qbevent)break;evnt(28811,61,"format.bas");}while(r);
#line 62 "utilities/format.bas"
do{
#line 62 "utilities/format.bas"
goto fornext_exit_4539;
#line 62 "utilities/format.bas"
if(!qbevent)break;evnt(28811,62,"format.bas");}while(r);
#line 63 "utilities/format.bas"
}
#line 64 "utilities/format.bas"
fornext_continue_4539:;
#line 64 "utilities/format.bas"
}
#line 64 "utilities/format.bas"
fornext_exit_4539:;
#line 65 "utilities/format.bas"
}
#line 67 "utilities/format.bas"
S_44517:;
#line 67 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,_FUNC_APPLY_LAYOUT_INDENT_STRING_OLAY)))||is_error_pending()){
#line 67 "utilities/format.bas"
if(qbevent){evnt(28811,67,"format.bas");if(r)goto S_44517;}
#line 68 "utilities/format.bas"
do{
#line 68 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT= 0 ;
#line 68 "utilities/format.bas"
if(!qbevent)break;evnt(28811,68,"format.bas");}while(r);
#line 68 "utilities/format.bas"
do{
#line 68 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT= 0 ;
#line 68 "utilities/format.bas"
if(!qbevent)break;evnt(28811,68,"format.bas");}while(r);
#line 69 "utilities/format.bas"
S_44520:;
#line 69 "utilities/format.bas"
while((qbs_cleanup(qbs_tmp_base,-(*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT<=_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len)))||is_error_pending()){
#line 69 "utilities/format.bas"
if(qbevent){evnt(28811,69,"format.bas");if(r)goto S_44520;}
#line 70 "utilities/format.bas"
do{
#line 70 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT+ 1 ;
#line 70 "utilities/format.bas"
if(!qbevent)break;evnt(28811,70,"format.bas");}while(r);
#line 70 "utilities/format.bas"
do{
#line 70 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT+ 1 ;
#line 70 "utilities/format.bas"
if(!qbevent)break;evnt(28811,70,"format.bas");}while(r);
#line 71 "utilities/format.bas"
LABEL_RECHECKDIFF:;
#line 71 "utilities/format.bas"
if(qbevent){evnt(28811,71,"format.bas");r=0;}
#line 72 "utilities/format.bas"
S_44523:;
#line 72 "utilities/format.bas"
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()){
#line 72 "utilities/format.bas"
if(qbevent){evnt(28811,72,"format.bas");if(r)goto S_44523;}
#line 72 "utilities/format.bas"
do{
#line 72 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LLCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH);
#line 72 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 72 "utilities/format.bas"
if(!qbevent)break;evnt(28811,72,"format.bas");}while(r);
#line 72 "utilities/format.bas"
}
#line 73 "utilities/format.bas"
S_44526:;
#line 73 "utilities/format.bas"
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()){
#line 73 "utilities/format.bas"
if(qbevent){evnt(28811,73,"format.bas");if(r)goto S_44526;}
#line 73 "utilities/format.bas"
do{
#line 73 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_LOCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH);
#line 73 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 73 "utilities/format.bas"
if(!qbevent)break;evnt(28811,73,"format.bas");}while(r);
#line 73 "utilities/format.bas"
}
#line 74 "utilities/format.bas"
do{
#line 74 "utilities/format.bas"
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));
#line 74 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 74 "utilities/format.bas"
if(!qbevent)break;evnt(28811,74,"format.bas");}while(r);
#line 75 "utilities/format.bas"
do{
#line 75 "utilities/format.bas"
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));
#line 75 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 75 "utilities/format.bas"
if(!qbevent)break;evnt(28811,75,"format.bas");}while(r);
#line 76 "utilities/format.bas"
S_44531:;
#line 76 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH)))||is_error_pending()){
#line 76 "utilities/format.bas"
if(qbevent){evnt(28811,76,"format.bas");if(r)goto S_44531;}
#line 76 "utilities/format.bas"
do{
#line 76 "utilities/format.bas"
goto ww_continue_4541;
#line 76 "utilities/format.bas"
if(!qbevent)break;evnt(28811,76,"format.bas");}while(r);
#line 76 "utilities/format.bas"
}
#line 77 "utilities/format.bas"
S_44534:;
#line 77 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH,qbs_new_txt_len(" ",1))))||is_error_pending()){
#line 77 "utilities/format.bas"
if(qbevent){evnt(28811,77,"format.bas");if(r)goto S_44534;}
#line 78 "utilities/format.bas"
do{
#line 78 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT+ 1 ;
#line 78 "utilities/format.bas"
if(!qbevent)break;evnt(28811,78,"format.bas");}while(r);
#line 78 "utilities/format.bas"
S_44536:;
#line 78 "utilities/format.bas"
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()){
#line 78 "utilities/format.bas"
if(qbevent){evnt(28811,78,"format.bas");if(r)goto S_44536;}
#line 78 "utilities/format.bas"
do{
#line 78 "utilities/format.bas"
goto ww_exit_4541;
#line 78 "utilities/format.bas"
if(!qbevent)break;evnt(28811,78,"format.bas");}while(r);
#line 78 "utilities/format.bas"
}
#line 79 "utilities/format.bas"
do{
#line 79 "utilities/format.bas"
goto LABEL_RECHECKDIFF;
#line 79 "utilities/format.bas"
if(!qbevent)break;evnt(28811,79,"format.bas");}while(r);
#line 80 "utilities/format.bas"
}
#line 81 "utilities/format.bas"
S_44541:;
#line 81 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,qbs_new_txt_len(" ",1))))||is_error_pending()){
#line 81 "utilities/format.bas"
if(qbevent){evnt(28811,81,"format.bas");if(r)goto S_44541;}
#line 82 "utilities/format.bas"
do{
#line 82 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT=*_FUNC_APPLY_LAYOUT_INDENT_LONG_OCNT+ 1 ;
#line 82 "utilities/format.bas"
if(!qbevent)break;evnt(28811,82,"format.bas");}while(r);
#line 82 "utilities/format.bas"
S_44543:;
#line 82 "utilities/format.bas"
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()){
#line 82 "utilities/format.bas"
if(qbevent){evnt(28811,82,"format.bas");if(r)goto S_44543;}
#line 82 "utilities/format.bas"
do{
#line 82 "utilities/format.bas"
goto ww_exit_4541;
#line 82 "utilities/format.bas"
if(!qbevent)break;evnt(28811,82,"format.bas");}while(r);
#line 82 "utilities/format.bas"
}
#line 83 "utilities/format.bas"
do{
#line 83 "utilities/format.bas"
goto LABEL_RECHECKDIFF;
#line 83 "utilities/format.bas"
if(!qbevent)break;evnt(28811,83,"format.bas");}while(r);
#line 84 "utilities/format.bas"
}
#line 85 "utilities/format.bas"
S_44548:;
#line 85 "utilities/format.bas"
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()){
#line 85 "utilities/format.bas"
if(qbevent){evnt(28811,85,"format.bas");if(r)goto S_44548;}
#line 86 "utilities/format.bas"
do{
#line 86 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_PS,qbs_new_txt_len("print",5));
#line 86 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 86 "utilities/format.bas"
if(!qbevent)break;evnt(28811,86,"format.bas");}while(r);
#line 86 "utilities/format.bas"
do{
#line 86 "utilities/format.bas"
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));
#line 86 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 86 "utilities/format.bas"
if(!qbevent)break;evnt(28811,86,"format.bas");}while(r);
#line 87 "utilities/format.bas"
S_44551:;
#line 87 "utilities/format.bas"
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()){
#line 87 "utilities/format.bas"
if(qbevent){evnt(28811,87,"format.bas");if(r)goto S_44551;}
#line 87 "utilities/format.bas"
do{
#line 87 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_PS,qbs_add(_FUNC_APPLY_LAYOUT_INDENT_STRING_PS,qbs_new_txt_len(" ",1)));
#line 87 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 87 "utilities/format.bas"
if(!qbevent)break;evnt(28811,87,"format.bas");}while(r);
#line 87 "utilities/format.bas"
}
#line 88 "utilities/format.bas"
do{
#line 88 "utilities/format.bas"
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)));
#line 88 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 88 "utilities/format.bas"
if(!qbevent)break;evnt(28811,88,"format.bas");}while(r);
#line 89 "utilities/format.bas"
do{
#line 89 "utilities/format.bas"
goto LABEL_RECHECKDIFF;
#line 89 "utilities/format.bas"
if(!qbevent)break;evnt(28811,89,"format.bas");}while(r);
#line 90 "utilities/format.bas"
}
#line 91 "utilities/format.bas"
S_44557:;
#line 91 "utilities/format.bas"
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()){
#line 91 "utilities/format.bas"
if(qbevent){evnt(28811,91,"format.bas");if(r)goto S_44557;}
#line 92 "utilities/format.bas"
do{
#line 92 "utilities/format.bas"
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)));
#line 92 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 92 "utilities/format.bas"
if(!qbevent)break;evnt(28811,92,"format.bas");}while(r);
#line 93 "utilities/format.bas"
do{
#line 93 "utilities/format.bas"
goto LABEL_RECHECKDIFF;
#line 93 "utilities/format.bas"
if(!qbevent)break;evnt(28811,93,"format.bas");}while(r);
#line 94 "utilities/format.bas"
}
#line 95 "utilities/format.bas"
do{
#line 95 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_LAS=((_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH->len)?(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_LCH)):( 0 ));
#line 95 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 95 "utilities/format.bas"
if(!qbevent)break;evnt(28811,95,"format.bas");}while(r);
#line 95 "utilities/format.bas"
do{
#line 95 "utilities/format.bas"
*_FUNC_APPLY_LAYOUT_INDENT_INTEGER_OAS=((_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH->len)?(qbs_asc(_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH)):( 0 ));
#line 95 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 95 "utilities/format.bas"
if(!qbevent)break;evnt(28811,95,"format.bas");}while(r);
#line 96 "utilities/format.bas"
S_44563:;
#line 96 "utilities/format.bas"
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()){
#line 96 "utilities/format.bas"
if(qbevent){evnt(28811,96,"format.bas");if(r)goto S_44563;}
#line 96 "utilities/format.bas"
do{
#line 96 "utilities/format.bas"
sub_mid(_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2,*_FUNC_APPLY_LAYOUT_INDENT_LONG_LCNT, 1 ,_FUNC_APPLY_LAYOUT_INDENT_STRING_OCH,1);
#line 96 "utilities/format.bas"
if(!qbevent)break;evnt(28811,96,"format.bas");}while(r);
#line 96 "utilities/format.bas"
}
#line 97 "utilities/format.bas"
ww_continue_4541:;
#line 97 "utilities/format.bas"
}
#line 97 "utilities/format.bas"
ww_exit_4541:;
#line 98 "utilities/format.bas"
}
#line 100 "utilities/format.bas"
S_44568:;
#line 100 "utilities/format.bas"
if ((qbs_cleanup(qbs_tmp_base,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2->len))||is_error_pending()){
#line 100 "utilities/format.bas"
if(qbevent){evnt(28811,100,"format.bas");if(r)goto S_44568;}
#line 101 "utilities/format.bas"
do{
#line 101 "utilities/format.bas"
qbs_set(_FUNC_APPLY_LAYOUT_INDENT_STRING_APPLY_LAYOUT_INDENT,qbs_add(_FUNC_APPLY_LAYOUT_INDENT_STRING_INDENT,_FUNC_APPLY_LAYOUT_INDENT_STRING_LAYOUT2));
#line 101 "utilities/format.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 101 "utilities/format.bas"
if(!qbevent)break;evnt(28811,101,"format.bas");}while(r);
#line 102 "utilities/format.bas"
}
#line 103 "utilities/format.bas"
}
#line 105 "utilities/format.bas"
exit_subfunc:;
#line 105 "utilities/format.bas"
free_mem_lock(sf_mem_lock);
#line 105 "utilities/format.bas"
#include "free368.txt"
#line 105 "utilities/format.bas"
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;
#line 105 "utilities/format.bas"
cmem_sp=tmp_cmem_sp;
#line 105 "utilities/format.bas"
qbs_maketmp(_FUNC_APPLY_LAYOUT_INDENT_STRING_APPLY_LAYOUT_INDENT);return _FUNC_APPLY_LAYOUT_INDENT_STRING_APPLY_LAYOUT_INDENT;
#line 105 "utilities/format.bas"
}
