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 "data124.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{
if(!qbevent)break;evnt(25752,582,"elements.bas");}while(r);
do{
*_FUNC_ESCAPESTRING_LONG_P1= 1 ;
if(!qbevent)break;evnt(25752,584,"elements.bas");}while(r);
S_34562:;
fornext_value4045= 1 ;
fornext_finalvalue4045=_FUNC_ESCAPESTRING_STRING_S->len;
fornext_step4045= 1 ;
if (fornext_step4045<0) fornext_step_negative4045=1; else fornext_step_negative4045=0;
if (is_error_pending()) goto fornext_error4045;
goto fornext_entrylabel4045;
while(1){
fornext_value4045=fornext_step4045+(*_FUNC_ESCAPESTRING_LONG_I);
fornext_entrylabel4045:
*_FUNC_ESCAPESTRING_LONG_I=fornext_value4045;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative4045){
if (fornext_value4045<fornext_finalvalue4045) break;
}else{
if (fornext_value4045>fornext_finalvalue4045) break;
}
fornext_error4045:;
if(qbevent){evnt(25752,585,"elements.bas");if(r)goto S_34562;}
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(25752,586,"elements.bas");}while(r);
S_34564:;
if ((-(*_FUNC_ESCAPESTRING_LONG_C2== 92 ))||is_error_pending()){
if(qbevent){evnt(25752,588,"elements.bas");if(r)goto S_34564;}
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(25752,589,"elements.bas");}while(r);
do{
*_FUNC_ESCAPESTRING_LONG_P1=*_FUNC_ESCAPESTRING_LONG_I+ 1 ;
if(!qbevent)break;evnt(25752,590,"elements.bas");}while(r);
}
S_34568:;
if (((-(*_FUNC_ESCAPESTRING_LONG_C2< 32 ))|(-(*_FUNC_ESCAPESTRING_LONG_C2== 34 ))|(-(*_FUNC_ESCAPESTRING_LONG_C2> 126 )))||is_error_pending()){
if(qbevent){evnt(25752,593,"elements.bas");if(r)goto S_34568;}
do{
qbs_set(_FUNC_ESCAPESTRING_STRING_O,func_oct(*_FUNC_ESCAPESTRING_LONG_C2,32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25752,594,"elements.bas");}while(r);
S_34570:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ESCAPESTRING_STRING_O->len< 3 )))||is_error_pending()){
if(qbevent){evnt(25752,595,"elements.bas");if(r)goto S_34570;}
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(25752,596,"elements.bas");}while(r);
S_34572:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_ESCAPESTRING_STRING_O->len< 3 )))||is_error_pending()){
if(qbevent){evnt(25752,597,"elements.bas");if(r)goto S_34572;}
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(25752,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(25752,599,"elements.bas");}while(r);
do{
*_FUNC_ESCAPESTRING_LONG_P1=*_FUNC_ESCAPESTRING_LONG_I+ 1 ;
if(!qbevent)break;evnt(25752,601,"elements.bas");}while(r);
}
fornext_continue_4044:;
}
fornext_exit_4044:;
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(25752,605,"elements.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free124.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;
}
