qbs* FUNC_ESCAPESTRING(qbs*_FUNC_ESCAPESTRING_STRING_S){
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 "data151.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{
if(!qbevent)break;evnt(28165,582,"elements.bas");}while(r);
do{
*_FUNC_ESCAPESTRING_LONG_P1= 1 ;
if(!qbevent)break;evnt(28165,584,"elements.bas");}while(r);
S_37281:;
fornext_value4475= 1 ;
fornext_finalvalue4475=_FUNC_ESCAPESTRING_STRING_S->len;
fornext_step4475= 1 ;
if (fornext_step4475<0) fornext_step_negative4475=1; else fornext_step_negative4475=0;
if (is_error_pending()) goto fornext_error4475;
goto fornext_entrylabel4475;
while(1){
fornext_value4475=fornext_step4475+(*_FUNC_ESCAPESTRING_LONG_I);
fornext_entrylabel4475:
*_FUNC_ESCAPESTRING_LONG_I=fornext_value4475;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4475){
if (fornext_value4475<fornext_finalvalue4475) break;
}else{
if (fornext_value4475>fornext_finalvalue4475) break;
}
fornext_error4475:;
if(qbevent){evnt(28165,585,"elements.bas");if(r)goto S_37281;}
do{
*_FUNC_ESCAPESTRING_LONG_C2=qbs_asc(_FUNC_ESCAPESTRING_STRING_S,*_FUNC_ESCAPESTRING_LONG_I);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,586,"elements.bas");}while(r);
S_37283:;
if ((-(*_FUNC_ESCAPESTRING_LONG_C2== 92 ))||is_error_pending()){
if(qbevent){evnt(28165,588,"elements.bas");if(r)goto S_37283;}
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_ELE,qbs_add(qbs_add(_FUNC_ESCAPESTRING_STRING_ELE,func_mid(_FUNC_ESCAPESTRING_STRING_S,*_FUNC_ESCAPESTRING_LONG_P1,*_FUNC_ESCAPESTRING_LONG_I-*_FUNC_ESCAPESTRING_LONG_P1,0|1)),qbs_new_txt_len("\\\\",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,589,"elements.bas");}while(r);
do{
*_FUNC_ESCAPESTRING_LONG_P1=*_FUNC_ESCAPESTRING_LONG_I+ 1 ;
if(!qbevent)break;evnt(28165,590,"elements.bas");}while(r);
}
S_37287:;
if (((-(*_FUNC_ESCAPESTRING_LONG_C2< 32 ))|(-(*_FUNC_ESCAPESTRING_LONG_C2== 34 ))|(-(*_FUNC_ESCAPESTRING_LONG_C2> 126 )))||is_error_pending()){
if(qbevent){evnt(28165,593,"elements.bas");if(r)goto S_37287;}
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_O,func_oct(*_FUNC_ESCAPESTRING_LONG_C2,32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,594,"elements.bas");}while(r);
S_37289:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ESCAPESTRING_STRING_O->len< 3 )))||is_error_pending()){
if(qbevent){evnt(28165,595,"elements.bas");if(r)goto S_37289;}
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_O,qbs_add(qbs_new_txt_len("0",1),_FUNC_ESCAPESTRING_STRING_O));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,596,"elements.bas");}while(r);
S_37291:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ESCAPESTRING_STRING_O->len< 3 )))||is_error_pending()){
if(qbevent){evnt(28165,597,"elements.bas");if(r)goto S_37291;}
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_O,qbs_add(qbs_new_txt_len("0",1),_FUNC_ESCAPESTRING_STRING_O));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,597,"elements.bas");}while(r);
}
}
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_ELE,qbs_add(qbs_add(qbs_add(_FUNC_ESCAPESTRING_STRING_ELE,func_mid(_FUNC_ESCAPESTRING_STRING_S,*_FUNC_ESCAPESTRING_LONG_P1,*_FUNC_ESCAPESTRING_LONG_I-*_FUNC_ESCAPESTRING_LONG_P1,0|1)),qbs_new_txt_len("\\",1)),_FUNC_ESCAPESTRING_STRING_O));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,599,"elements.bas");}while(r);
do{
*_FUNC_ESCAPESTRING_LONG_P1=*_FUNC_ESCAPESTRING_LONG_I+ 1 ;
if(!qbevent)break;evnt(28165,601,"elements.bas");}while(r);
}
fornext_continue_4474:;
}
fornext_exit_4474:;
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_ESCAPESTRING,qbs_add(_FUNC_ESCAPESTRING_STRING_ELE,func_mid(_FUNC_ESCAPESTRING_STRING_S,*_FUNC_ESCAPESTRING_LONG_P1,NULL,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28165,605,"elements.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free151.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_ESCAPESTRING_STRING_ESCAPESTRING);return _FUNC_ESCAPESTRING_STRING_ESCAPESTRING;
}
