diff --git a/internal/source/clear.txt b/internal/source/clear.txt index c6638c3fe..8c1c45622 100644 --- a/internal/source/clear.txt +++ b/internal/source/clear.txt @@ -3158,5 +3158,4 @@ _SUB_GETINPUT_STRING_ASCVALUE->len=0; *_FUNC_IDEASCIIBOX_LONG_ASCIIWARNINGSHOWN=0; _FUNC_GETBYTES_STRING_PREVIOUSVALUE->len=0; *_FUNC_GETBYTES_LONG_GETBYTESPOSITION=0; -_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR->len=0; -_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR->len=0; +__STRING_DEFAULT_STARTDIR->len=0; diff --git a/internal/source/global.txt b/internal/source/global.txt index 73cffe2ad..06d43e258 100644 --- a/internal/source/global.txt +++ b/internal/source/global.txt @@ -1182,8 +1182,7 @@ int32 *_SUB_HELP_SHOWTEXT_LONG_SETUP=NULL; int32 *_FUNC_IDEASCIIBOX_LONG_ASCIIWARNINGSHOWN=NULL; qbs *_FUNC_GETBYTES_STRING_PREVIOUSVALUE=NULL; int32 *_FUNC_GETBYTES_LONG_GETBYTESPOSITION=NULL; -qbs *_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR=NULL; -qbs *_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR=NULL; +qbs *__STRING_DEFAULT_STARTDIR=NULL; int32 console=1; int32 screen_hide_startup=1; int32 asserts=0; diff --git a/internal/source/main.txt b/internal/source/main.txt index b268a9a22..08eb2cd93 100644 --- a/internal/source/main.txt +++ b/internal/source/main.txt @@ -203440,95 +203440,111 @@ sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ -if(!qbevent)break;evnt(26099,20296,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20297,"ide_methods.bas");}while(r); S_59944:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20298,"ide_methods.bas");if(r)goto S_59944;} +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_DEFAULT_STARTDIR,qbs_new_txt_len("",0))))||new_error){ +if(qbevent){evnt(26099,20299,"ide_methods.bas");if(r)goto S_59944;} do{ -qbs_set(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR,func__startdir()); +qbs_set(__STRING_DEFAULT_STARTDIR,func__startdir()); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20299,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20300,"ide_methods.bas");}while(r); S_59946:; -if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ -if(qbevent){evnt(26099,20300,"ide_methods.bas");if(r)goto S_59946;} +if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ +if(qbevent){evnt(26099,20301,"ide_methods.bas");if(r)goto S_59946;} do{ -qbs_set(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR,qbs_add(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); +qbs_set(__STRING_DEFAULT_STARTDIR,qbs_add(__STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20300,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20301,"ide_methods.bas");}while(r); } } do{ -qbs_set(_FUNC_SAVEFILE_STRING_F,func__guiSaveFileDialog(qbs_new_txt_len("Save As",7),qbs_add(qbs_add(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR,_FUNC_SAVEFILE_STRING_PATH),_FUNC_SAVEFILE_STRING_IDEOPENFILE),qbs_new_txt_len(".bas",4),qbs_new_txt_len("QB64PE BAS file",15),0|1|2|4|8)); +qbs_set(_FUNC_SAVEFILE_STRING_F,func__guiSaveFileDialog(qbs_new_txt_len("Save Source File",16),qbs_add(__STRING_DEFAULT_STARTDIR,_FUNC_SAVEFILE_STRING_IDEOPENFILE),qbs_new_txt_len("*.bas|*.BAS|*.Bas",17),qbs_new_txt_len("QB64-PE BAS File",16),0|1|2|4|8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20303,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20304,"ide_methods.bas");}while(r); S_59951:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_SAVEFILE_STRING_F,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20304,"ide_methods.bas");if(r)goto S_59951;} +if(qbevent){evnt(26099,20305,"ide_methods.bas");if(r)goto S_59951;} +do{ +qbs_set(_FUNC_SAVEFILE_STRING_SAVEFILE,qbs_new_txt_len("C",1)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26099,20306,"ide_methods.bas");}while(r); do{ goto exit_subfunc; -if(!qbevent)break;evnt(26099,20304,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20307,"ide_methods.bas");}while(r); } -S_59954:; +S_59955:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_FILEHASEXTENSION(_FUNC_SAVEFILE_STRING_F)== 0 )))||new_error){ -if(qbevent){evnt(26099,20305,"ide_methods.bas");if(r)goto S_59954;} +if(qbevent){evnt(26099,20310,"ide_methods.bas");if(r)goto S_59955;} do{ qbs_set(_FUNC_SAVEFILE_STRING_F,qbs_add(_FUNC_SAVEFILE_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20305,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20310,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_SAVEFILE_STRING_PATH,FUNC_IDEZGETFILEPATH(__STRING_IDEROOT,_FUNC_SAVEFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20306,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20311,"ide_methods.bas");}while(r); do{ *_FUNC_SAVEFILE_LONG_PATHSEPPOS=func__instrrev(NULL,_FUNC_SAVEFILE_STRING_F,__STRING1_IDEPATHSEP,0); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20307,"ide_methods.bas");}while(r); -S_59959:; +if(!qbevent)break;evnt(26099,20312,"ide_methods.bas");}while(r); +S_59960:; if ((-(*_FUNC_SAVEFILE_LONG_PATHSEPPOS> 0 ))||new_error){ -if(qbevent){evnt(26099,20308,"ide_methods.bas");if(r)goto S_59959;} +if(qbevent){evnt(26099,20313,"ide_methods.bas");if(r)goto S_59960;} do{ qbs_set(_FUNC_SAVEFILE_STRING_F,func_mid(_FUNC_SAVEFILE_STRING_F,*_FUNC_SAVEFILE_LONG_PATHSEPPOS+ 1 ,NULL,0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20308,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20313,"ide_methods.bas");}while(r); +} +do{ +qbs_set(__STRING_DEFAULT_STARTDIR,_FUNC_SAVEFILE_STRING_PATH); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26099,20315,"ide_methods.bas");}while(r); +S_59964:; +if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ +if(qbevent){evnt(26099,20316,"ide_methods.bas");if(r)goto S_59964;} +do{ +qbs_set(__STRING_DEFAULT_STARTDIR,qbs_add(__STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26099,20316,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 3 ; -if(!qbevent)break;evnt(26099,20310,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20318,"ide_methods.bas");}while(r); do{ sub_open(qbs_add(qbs_add(_FUNC_SAVEFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_SAVEFILE_STRING_F), 2 ,NULL,NULL, 150 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20311,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20319,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; -if(!qbevent)break;evnt(26099,20312,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20320,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_SAVEFILE_STRING_F); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20313,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20321,"ide_methods.bas");}while(r); do{ sub__title(qbs_add(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - ",3)),__STRING_WINDOWTITLE)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20313,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20322,"ide_methods.bas");}while(r); do{ SUB_IDESAVE(qbs_add(qbs_add(_FUNC_SAVEFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_SAVEFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20314,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20323,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_SAVEFILE_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20315,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20324,"ide_methods.bas");}while(r); do{ SUB_IDEADDRECENT(qbs_add(qbs_add(_FUNC_SAVEFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_SAVEFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20316,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20325,"ide_methods.bas");}while(r); do{ SUB_IDESAVEBOOKMARKS(qbs_add(qbs_add(_FUNC_SAVEFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_SAVEFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20317,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20326,"ide_methods.bas");}while(r); do{ sub_close( 150 ,1); -if(!qbevent)break;evnt(26099,20318,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20327,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free296.txt" @@ -203550,345 +203566,345 @@ sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; do{ -if(!qbevent)break;evnt(26099,20326,"ide_methods.bas");}while(r); -S_59973:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20328,"ide_methods.bas");if(r)goto S_59973;} +if(!qbevent)break;evnt(26099,20332,"ide_methods.bas");}while(r); +S_59978:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_DEFAULT_STARTDIR,qbs_new_txt_len("",0))))||new_error){ +if(qbevent){evnt(26099,20334,"ide_methods.bas");if(r)goto S_59978;} do{ -qbs_set(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,func__startdir()); +qbs_set(__STRING_DEFAULT_STARTDIR,func__startdir()); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20329,"ide_methods.bas");}while(r); -S_59975:; -if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ -if(qbevent){evnt(26099,20330,"ide_methods.bas");if(r)goto S_59975;} +if(!qbevent)break;evnt(26099,20335,"ide_methods.bas");}while(r); +S_59980:; +if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ +if(qbevent){evnt(26099,20336,"ide_methods.bas");if(r)goto S_59980;} do{ -qbs_set(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,qbs_add(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); +qbs_set(__STRING_DEFAULT_STARTDIR,qbs_add(__STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20330,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20336,"ide_methods.bas");}while(r); } } LABEL_IDEOPENLOOP:; -if(qbevent){evnt(26099,20333,"ide_methods.bas");r=0;} -S_59979:; +if(qbevent){evnt(26099,20339,"ide_methods.bas");r=0;} +S_59984:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPENFILE_STRING_IDEOPENFILE,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20334,"ide_methods.bas");if(r)goto S_59979;} +if(qbevent){evnt(26099,20340,"ide_methods.bas");if(r)goto S_59984;} do{ -qbs_set(_FUNC_OPENFILE_STRING_F,func__guiOpenFileDialog(qbs_new_txt_len("Open Source File",16),_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,qbs_new_txt_len("*.bas|*.BAS|*.Bas|*.bi|*.BI|*.Bi|*.bm|*.BM|*.Bm",47),qbs_new_txt_len("QB64-PE Source Files",20), 0 ,0|1|2|4|8|16)); +qbs_set(_FUNC_OPENFILE_STRING_F,func__guiOpenFileDialog(qbs_new_txt_len("Open Source File",16),__STRING_DEFAULT_STARTDIR,qbs_new_txt_len("*.bas|*.BAS|*.Bas|*.bi|*.BI|*.Bi|*.bm|*.BM|*.Bm",47),qbs_new_txt_len("QB64-PE Source Files",20), 0 ,0|1|2|4|8|16)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20334,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20340,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_OPENFILE_STRING_F,_FUNC_OPENFILE_STRING_IDEOPENFILE); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20334,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20340,"ide_methods.bas");}while(r); } -S_59984:; +S_59989:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_OPENFILE_STRING_F,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20335,"ide_methods.bas");if(r)goto S_59984;} +if(qbevent){evnt(26099,20341,"ide_methods.bas");if(r)goto S_59989;} do{ qbs_set(_FUNC_OPENFILE_STRING_OPENFILE,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20335,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20341,"ide_methods.bas");}while(r); do{ goto exit_subfunc; -if(!qbevent)break;evnt(26099,20335,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20341,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_OPENFILE_STRING_PATH,FUNC_IDEZTAKEPATH(_FUNC_OPENFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20336,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20342,"ide_methods.bas");}while(r); do{ -qbs_set(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,_FUNC_OPENFILE_STRING_PATH); +qbs_set(__STRING_DEFAULT_STARTDIR,_FUNC_OPENFILE_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20338,"ide_methods.bas");}while(r); -S_59990:; -if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ -if(qbevent){evnt(26099,20339,"ide_methods.bas");if(r)goto S_59990;} +if(!qbevent)break;evnt(26099,20344,"ide_methods.bas");}while(r); +S_59995:; +if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_DEFAULT_STARTDIR, 1 ),__STRING1_IDEPATHSEP)))||new_error){ +if(qbevent){evnt(26099,20345,"ide_methods.bas");if(r)goto S_59995;} do{ -qbs_set(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,qbs_add(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); +qbs_set(__STRING_DEFAULT_STARTDIR,qbs_add(__STRING_DEFAULT_STARTDIR,__STRING1_IDEPATHSEP)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20339,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20345,"ide_methods.bas");}while(r); } -S_59993:; +S_59998:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_add(_FUNC_OPENFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_OPENFILE_STRING_F))== 0 )))||new_error){ -if(qbevent){evnt(26099,20341,"ide_methods.bas");if(r)goto S_59993;} -S_59994:; +if(qbevent){evnt(26099,20347,"ide_methods.bas");if(r)goto S_59998;} +S_59999:; if ((qbs_cleanup(qbs_tmp_base,((qbs_notequal(qbs_lcase(qbs_right(_FUNC_OPENFILE_STRING_F, 4 )),qbs_new_txt_len(".bas",4))))&(-(*_FUNC_OPENFILE_LONG_ALLFILES== 0 ))))||new_error){ -if(qbevent){evnt(26099,20343,"ide_methods.bas");if(r)goto S_59994;} +if(qbevent){evnt(26099,20349,"ide_methods.bas");if(r)goto S_59999;} do{ qbs_set(_FUNC_OPENFILE_STRING_F,qbs_add(_FUNC_OPENFILE_STRING_F,qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20343,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20349,"ide_methods.bas");}while(r); } do{ *__LONG_IDEERROR= 2 ; -if(!qbevent)break;evnt(26099,20346,"ide_methods.bas");}while(r); -S_59998:; +if(!qbevent)break;evnt(26099,20352,"ide_methods.bas");}while(r); +S_60003:; if ((qbs_cleanup(qbs_tmp_base,-(func__fileexists(qbs_add(qbs_add(_FUNC_OPENFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_OPENFILE_STRING_F))== 0 )))||new_error){ -if(qbevent){evnt(26099,20347,"ide_methods.bas");if(r)goto S_59998;} +if(qbevent){evnt(26099,20353,"ide_methods.bas");if(r)goto S_60003;} do{ goto exit_subfunc; -if(!qbevent)break;evnt(26099,20347,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20353,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_OPENFILE_STRING_IDEOPENFILE,qbs_add(qbs_add(_FUNC_OPENFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_OPENFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20349,"ide_methods.bas");}while(r); -S_60002:; +if(!qbevent)break;evnt(26099,20355,"ide_methods.bas");}while(r); +S_60007:; if ((qbs_cleanup(qbs_tmp_base,-(FUNC_BINARYFORMATCHECK(_FUNC_OPENFILE_STRING_PATH,__STRING1_IDEPATHSEP,_FUNC_OPENFILE_STRING_F)> 0 )))||new_error){ -if(qbevent){evnt(26099,20351,"ide_methods.bas");if(r)goto S_60002;} -S_60003:; +if(qbevent){evnt(26099,20357,"ide_methods.bas");if(r)goto S_60007;} +S_60008:; if ((qbs_cleanup(qbs_tmp_base,_FUNC_OPENFILE_STRING_IDEOPENFILE->len))||new_error){ -if(qbevent){evnt(26099,20352,"ide_methods.bas");if(r)goto S_60003;} +if(qbevent){evnt(26099,20358,"ide_methods.bas");if(r)goto S_60008;} do{ qbs_set(_FUNC_OPENFILE_STRING_OPENFILE,qbs_new_txt_len("C",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20353,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20359,"ide_methods.bas");}while(r); do{ goto exit_subfunc; -if(!qbevent)break;evnt(26099,20354,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20360,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_OPENFILE_LONG_INFO= 0 ; -if(!qbevent)break;evnt(26099,20356,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20362,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENLOOP; -if(!qbevent)break;evnt(26099,20356,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20362,"ide_methods.bas");}while(r); } } } do{ *__LONG_IDEERROR= 3 ; -if(!qbevent)break;evnt(26099,20362,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20368,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20363,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20369,"ide_methods.bas");}while(r); do{ *__LONG_IDEL= 1 ; -if(!qbevent)break;evnt(26099,20363,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20369,"ide_methods.bas");}while(r); do{ *__LONG_IDELI= 1 ; -if(!qbevent)break;evnt(26099,20363,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20369,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; -if(!qbevent)break;evnt(26099,20363,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20369,"ide_methods.bas");}while(r); do{ *__LONG_IDEBMKN= 0 ; -if(!qbevent)break;evnt(26099,20363,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20369,"ide_methods.bas");}while(r); do{ *__LONG_IDESX= 1 ; -if(!qbevent)break;evnt(26099,20364,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20370,"ide_methods.bas");}while(r); do{ *__LONG_IDESY= 1 ; -if(!qbevent)break;evnt(26099,20365,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20371,"ide_methods.bas");}while(r); do{ *__LONG_IDECX= 1 ; -if(!qbevent)break;evnt(26099,20366,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20372,"ide_methods.bas");}while(r); do{ *__LONG_IDECY= 1 ; -if(!qbevent)break;evnt(26099,20367,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20373,"ide_methods.bas");}while(r); do{ *__LONG_IDESELECT= 0 ; -if(!qbevent)break;evnt(26099,20368,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20374,"ide_methods.bas");}while(r); do{ *__LONG_IDEFOCUSLINE= 0 ; -if(!qbevent)break;evnt(26099,20369,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20375,"ide_methods.bas");}while(r); do{ SUB_LINEINPUT3LOAD(qbs_add(qbs_add(_FUNC_OPENFILE_STRING_PATH,__STRING1_IDEPATHSEP),_FUNC_OPENFILE_STRING_F)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20370,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDET,func_space(__STRING_LINEINPUT3BUFFER->len* 8 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20371,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20377,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_I2= 1 ; -if(!qbevent)break;evnt(26099,20372,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20378,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_N= 0 ; -if(!qbevent)break;evnt(26099,20373,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20379,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHRTAB,func_chr( 9 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20374,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20380,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_SPACE1,qbs_new_txt_len(" ",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20375,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20381,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_SPACE2,qbs_new_txt_len(" ",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20375,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20381,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_SPACE3,qbs_new_txt_len(" ",3)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20375,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20381,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_SPACE4,qbs_new_txt_len(" ",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20375,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20381,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR7,func_chr( 7 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR11,func_chr( 11 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR12,func_chr( 12 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR28,func_chr( 28 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR29,func_chr( 29 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR30,func_chr( 30 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_OPENFILE_STRING_CHR31,func_chr( 31 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20376,"ide_methods.bas");}while(r); -S_60040:; +if(!qbevent)break;evnt(26099,20382,"ide_methods.bas");}while(r); +S_60045:; do{ -if(qbevent){evnt(26099,20377,"ide_methods.bas");if(r)goto S_60040;} +if(qbevent){evnt(26099,20383,"ide_methods.bas");if(r)goto S_60045;} do{ qbs_set(_FUNC_OPENFILE_STRING_A,FUNC_LINEINPUT3()); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20378,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20384,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_L=_FUNC_OPENFILE_STRING_A->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20379,"ide_methods.bas");}while(r); -S_60043:; +if(!qbevent)break;evnt(26099,20385,"ide_methods.bas");}while(r); +S_60048:; if ((*_FUNC_OPENFILE_LONG_L)||new_error){ -if(qbevent){evnt(26099,20380,"ide_methods.bas");if(r)goto S_60043;} +if(qbevent){evnt(26099,20386,"ide_methods.bas");if(r)goto S_60048;} do{ *_FUNC_OPENFILE_LONG_ASCA=qbs_asc(_FUNC_OPENFILE_STRING_A); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20380,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20386,"ide_methods.bas");}while(r); }else{ do{ *_FUNC_OPENFILE_LONG_ASCA= -1 ; -if(!qbevent)break;evnt(26099,20380,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20386,"ide_methods.bas");}while(r); } -S_60048:; +S_60053:; if ((-(*_FUNC_OPENFILE_LONG_ASCA!= 13 ))||new_error){ -if(qbevent){evnt(26099,20381,"ide_methods.bas");if(r)goto S_60048;} -S_60049:; +if(qbevent){evnt(26099,20387,"ide_methods.bas");if(r)goto S_60053;} +S_60054:; if ((-(*_FUNC_OPENFILE_LONG_ASCA!= -1 ))||new_error){ -if(qbevent){evnt(26099,20382,"ide_methods.bas");if(r)goto S_60049;} +if(qbevent){evnt(26099,20388,"ide_methods.bas");if(r)goto S_60054;} LABEL_IDEOPENFIXTABS:; -if(qbevent){evnt(26099,20384,"ide_methods.bas");r=0;} +if(qbevent){evnt(26099,20390,"ide_methods.bas");r=0;} do{ *_FUNC_OPENFILE_LONG_X=func_instr(NULL,_FUNC_OPENFILE_STRING_A,_FUNC_OPENFILE_STRING_CHRTAB,0); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20385,"ide_methods.bas");}while(r); -S_60051:; +if(!qbevent)break;evnt(26099,20391,"ide_methods.bas");}while(r); +S_60056:; if ((*_FUNC_OPENFILE_LONG_X)||new_error){ -if(qbevent){evnt(26099,20386,"ide_methods.bas");if(r)goto S_60051;} +if(qbevent){evnt(26099,20392,"ide_methods.bas");if(r)goto S_60056;} do{ *_FUNC_OPENFILE_LONG_X2=(*_FUNC_OPENFILE_LONG_X- 1 )% 4 ; -if(!qbevent)break;evnt(26099,20387,"ide_methods.bas");}while(r); -S_60053:; +if(!qbevent)break;evnt(26099,20393,"ide_methods.bas");}while(r); +S_60058:; if ((-(*_FUNC_OPENFILE_LONG_X2== 0 ))||new_error){ -if(qbevent){evnt(26099,20388,"ide_methods.bas");if(r)goto S_60053;} +if(qbevent){evnt(26099,20394,"ide_methods.bas");if(r)goto S_60058;} do{ qbs_set(_FUNC_OPENFILE_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_X- 1 ),_FUNC_OPENFILE_STRING_SPACE4),qbs_right(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_L-*_FUNC_OPENFILE_LONG_X))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20388,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20394,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_L=*_FUNC_OPENFILE_LONG_L+ 3 ; -if(!qbevent)break;evnt(26099,20388,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20394,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; -if(!qbevent)break;evnt(26099,20388,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20394,"ide_methods.bas");}while(r); } -S_60058:; +S_60063:; if ((-(*_FUNC_OPENFILE_LONG_X2== 1 ))||new_error){ -if(qbevent){evnt(26099,20389,"ide_methods.bas");if(r)goto S_60058;} +if(qbevent){evnt(26099,20395,"ide_methods.bas");if(r)goto S_60063;} do{ qbs_set(_FUNC_OPENFILE_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_X- 1 ),_FUNC_OPENFILE_STRING_SPACE3),qbs_right(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_L-*_FUNC_OPENFILE_LONG_X))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20389,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20395,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_L=*_FUNC_OPENFILE_LONG_L+ 2 ; -if(!qbevent)break;evnt(26099,20389,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20395,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; -if(!qbevent)break;evnt(26099,20389,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20395,"ide_methods.bas");}while(r); } -S_60063:; +S_60068:; if ((-(*_FUNC_OPENFILE_LONG_X2== 2 ))||new_error){ -if(qbevent){evnt(26099,20390,"ide_methods.bas");if(r)goto S_60063;} +if(qbevent){evnt(26099,20396,"ide_methods.bas");if(r)goto S_60068;} do{ qbs_set(_FUNC_OPENFILE_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_X- 1 ),_FUNC_OPENFILE_STRING_SPACE2),qbs_right(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_L-*_FUNC_OPENFILE_LONG_X))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20390,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20396,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_L=*_FUNC_OPENFILE_LONG_L+ 1 ; -if(!qbevent)break;evnt(26099,20390,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20396,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; -if(!qbevent)break;evnt(26099,20390,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20396,"ide_methods.bas");}while(r); } -S_60068:; +S_60073:; if ((-(*_FUNC_OPENFILE_LONG_X2== 3 ))||new_error){ -if(qbevent){evnt(26099,20391,"ide_methods.bas");if(r)goto S_60068;} +if(qbevent){evnt(26099,20397,"ide_methods.bas");if(r)goto S_60073;} do{ qbs_set(_FUNC_OPENFILE_STRING_A,qbs_add(qbs_add(qbs_left(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_X- 1 ),_FUNC_OPENFILE_STRING_SPACE1),qbs_right(_FUNC_OPENFILE_STRING_A,*_FUNC_OPENFILE_LONG_L-*_FUNC_OPENFILE_LONG_X))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20391,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20397,"ide_methods.bas");}while(r); do{ goto LABEL_IDEOPENFIXTABS; -if(!qbevent)break;evnt(26099,20391,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20397,"ide_methods.bas");}while(r); } } } do{ sub_mid(__STRING_IDET,*_FUNC_OPENFILE_LONG_I2,*_FUNC_OPENFILE_LONG_L+ 8 ,qbs_add(qbs_add(l2string(*_FUNC_OPENFILE_LONG_L),_FUNC_OPENFILE_STRING_A),l2string(*_FUNC_OPENFILE_LONG_L)),1); -if(!qbevent)break;evnt(26099,20394,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20400,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_I2=*_FUNC_OPENFILE_LONG_I2+*_FUNC_OPENFILE_LONG_L+ 8 ; -if(!qbevent)break;evnt(26099,20394,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20400,"ide_methods.bas");}while(r); do{ *_FUNC_OPENFILE_LONG_N=*_FUNC_OPENFILE_LONG_N+ 1 ; -if(!qbevent)break;evnt(26099,20394,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20400,"ide_methods.bas");}while(r); } -S_60078:; +S_60083:; dl_continue_6711:; }while((!(-(*_FUNC_OPENFILE_LONG_ASCA== 13 )))&&(!new_error)); dl_exit_6711:; -if(qbevent){evnt(26099,20396,"ide_methods.bas");if(r)goto S_60078;} +if(qbevent){evnt(26099,20402,"ide_methods.bas");if(r)goto S_60083;} do{ qbs_set(__STRING_LINEINPUT3BUFFER,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20397,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20403,"ide_methods.bas");}while(r); do{ *__LONG_IDEN=*_FUNC_OPENFILE_LONG_N; -if(!qbevent)break;evnt(26099,20398,"ide_methods.bas");}while(r); -S_60081:; +if(!qbevent)break;evnt(26099,20404,"ide_methods.bas");}while(r); +S_60086:; if ((-(*_FUNC_OPENFILE_LONG_N== 0 ))||new_error){ -if(qbevent){evnt(26099,20398,"ide_methods.bas");if(r)goto S_60081;} +if(qbevent){evnt(26099,20404,"ide_methods.bas");if(r)goto S_60086;} do{ qbs_set(__STRING_IDET,qbs_add(l2string( 0 ),l2string( 0 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20398,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20404,"ide_methods.bas");}while(r); do{ *__LONG_IDEN= 1 ; -if(!qbevent)break;evnt(26099,20398,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20404,"ide_methods.bas");}while(r); }else{ do{ qbs_set(__STRING_IDET,qbs_left(__STRING_IDET,*_FUNC_OPENFILE_LONG_I2- 1 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20398,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20404,"ide_methods.bas");}while(r); } do{ @@ -203915,7 +203931,7 @@ if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257); } __ARRAY_BYTE_IDEBREAKPOINTS[2]|=1; } -if(!qbevent)break;evnt(26099,20399,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20405,"ide_methods.bas");}while(r); do{ if (__ARRAY_BYTE_IDESKIPLINES[2]&2){ @@ -203941,15 +203957,15 @@ if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257); } __ARRAY_BYTE_IDESKIPLINES[2]|=1; } -if(!qbevent)break;evnt(26099,20400,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20406,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_VARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20401,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20407,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPVARIABLEWATCHLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20402,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20408,"ide_methods.bas");}while(r); do{ if (__ARRAY_UDT_BACKUPUSEDVARIABLELIST[2]&2){ @@ -203996,45 +204012,45 @@ while(tmp_long--){ *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 104)=qbs_new(0,0); *(qbs**)(__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(960/8+1-1)*tmp_long+ 112)=qbs_new(0,0);} } -if(!qbevent)break;evnt(26099,20402,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20408,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_BACKUPTYPEDEFINITIONS,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20403,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20409,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_CALLSTACKLIST,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20404,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20410,"ide_methods.bas");}while(r); do{ *__LONG_CALLSTACKLENGTH= 0 ; -if(!qbevent)break;evnt(26099,20404,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20410,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; -if(!qbevent)break;evnt(26099,20406,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20412,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPROGNAME,_FUNC_OPENFILE_STRING_F); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20407,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20413,"ide_methods.bas");}while(r); do{ sub__title(qbs_add(qbs_add(__STRING_IDEPROGNAME,qbs_new_txt_len(" - ",3)),__STRING_WINDOWTITLE)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20407,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20413,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*__LONG_CUSTOMKEYWORDSLENGTH)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20408,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20414,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEPATH,_FUNC_OPENFILE_STRING_PATH); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20409,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20415,"ide_methods.bas");}while(r); do{ SUB_IDEADDRECENT(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20410,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20416,"ide_methods.bas");}while(r); do{ SUB_IDEIMPORTBOOKMARKS(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),__STRING_IDEPROGNAME)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20411,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20417,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free297.txt" @@ -204058,56 +204074,56 @@ if (new_error) goto exit_subfunc; do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PNAM,__STRING_IDEPROGNAME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20428,"ide_methods.bas");}while(r); -S_60103:; +if(!qbevent)break;evnt(26099,20435,"ide_methods.bas");}while(r); +S_60108:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PNAM,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20428,"ide_methods.bas");if(r)goto S_60103;} +if(qbevent){evnt(26099,20435,"ide_methods.bas");if(r)goto S_60108;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PNAM,qbs_add(qbs_add(qbs_new_txt_len("Untitled",8),__STRING_TEMPFOLDERINDEXSTR),qbs_new_txt_len(".bas",4))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20428,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20435,"ide_methods.bas");}while(r); } -S_60106:; +S_60111:; qbs_set(sc_6714,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20429,"ide_methods.bas");if(r)goto S_60106;} -S_60107:; +if(qbevent){evnt(26099,20436,"ide_methods.bas");if(r)goto S_60111;} +S_60112:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6714,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20430,"ide_methods.bas");if(r)goto S_60107;} +if(qbevent){evnt(26099,20437,"ide_methods.bas");if(r)goto S_60112;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_EXT,qbs_new_txt_len(".htm",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20430,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20437,"ide_methods.bas");}while(r); sc_ec_448_end:; goto sc_6714_end; } -S_60109:; +S_60114:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6714,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20431,"ide_methods.bas");if(r)goto S_60109;} +if(qbevent){evnt(26099,20438,"ide_methods.bas");if(r)goto S_60114;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_EXT,qbs_new_txt_len(".rtf",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20431,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20438,"ide_methods.bas");}while(r); sc_ec_449_end:; goto sc_6714_end; } do{ qbs_set(_SUB_EXPORTCODEAS_STRING_EXT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20432,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20439,"ide_methods.bas");}while(r); sc_6714_end:; -S_60114:; +S_60119:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_EXPORTCODEAS_STRING_EXT,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20434,"ide_methods.bas");if(r)goto S_60114;} -S_60115:; +if(qbevent){evnt(26099,20441,"ide_methods.bas");if(r)goto S_60119;} +S_60120:; if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),_SUB_EXPORTCODEAS_STRING_PNAM),_SUB_EXPORTCODEAS_STRING_EXT))))||new_error){ -if(qbevent){evnt(26099,20435,"ide_methods.bas");if(r)goto S_60115;} -S_60116:; +if(qbevent){evnt(26099,20442,"ide_methods.bas");if(r)goto S_60120;} +S_60121:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_IDEYESNOBOX(qbs_new_txt_len("Export As...",12),qbs_add(qbs_add(qbs_new_txt_len("Overwrite file ",15),_SUB_EXPORTCODEAS_STRING_PNAM),_SUB_EXPORTCODEAS_STRING_EXT)),qbs_new_txt_len("N",1))))||new_error){ -if(qbevent){evnt(26099,20436,"ide_methods.bas");if(r)goto S_60116;} +if(qbevent){evnt(26099,20443,"ide_methods.bas");if(r)goto S_60121;} do{ goto exit_subfunc; -if(!qbevent)break;evnt(26099,20436,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20443,"ide_methods.bas");}while(r); } } } @@ -204116,30 +204132,30 @@ return_point[next_return_point++]=183; if (next_return_point>=return_points) more_return_points(); goto LABEL_GETTHEMECOLORS; RETURN_183:; -if(!qbevent)break;evnt(26099,20439,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20446,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_CEOL,func_chr( 10 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20440,"ide_methods.bas");}while(r); -S_60123:; +if(!qbevent)break;evnt(26099,20447,"ide_methods.bas");}while(r); +S_60128:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,func__os(),qbs_new_txt_len("[LINUX]",7),0)== 0 )))||new_error){ -if(qbevent){evnt(26099,20441,"ide_methods.bas");if(r)goto S_60123;} +if(qbevent){evnt(26099,20448,"ide_methods.bas");if(r)goto S_60128;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_CEOL,qbs_add(func_chr( 13 ),_SUB_EXPORTCODEAS_STRING_CEOL)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20441,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20448,"ide_methods.bas");}while(r); } do{ sub_pcopy( 3 , 2 ); -if(!qbevent)break;evnt(26099,20443,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20450,"ide_methods.bas");}while(r); do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); -if(!qbevent)break;evnt(26099,20443,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20450,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20444,"ide_methods.bas");}while(r); -S_60129:; +if(!qbevent)break;evnt(26099,20451,"ide_methods.bas");}while(r); +S_60134:; fornext_value6716= 1 ; fornext_finalvalue6716=*__LONG_IDEN; fornext_step6716= 1 ; @@ -204156,494 +204172,494 @@ if (fornext_value6716fornext_finalvalue6716) break; } fornext_error6716:; -if(qbevent){evnt(26099,20445,"ide_methods.bas");if(r)goto S_60129;} +if(qbevent){evnt(26099,20452,"ide_methods.bas");if(r)goto S_60134;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_STXT,FUNC_IDEGETLINE(_SUB_EXPORTCODEAS_LONG_I)),_SUB_EXPORTCODEAS_STRING_CEOL)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20446,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20453,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6717=qbr(floor( 30 / ((long double)(*__LONG_IDEN))**_SUB_EXPORTCODEAS_LONG_I))))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20447,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20454,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEINFO,qbs_add(qbs_add(qbs_add(func_chr( 0 ),func_string( 3 -_SUB_EXPORTCODEAS_STRING_PERC->len, 32 )),_SUB_EXPORTCODEAS_STRING_PERC),qbs_new_txt_len("% exported...",13))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20448,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20455,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); -if(!qbevent)break;evnt(26099,20449,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20456,"ide_methods.bas");}while(r); fornext_continue_6715:; } fornext_exit_6715:; -S_60135:; +S_60140:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_EXPORTCODEAS_STRING_STXT,_SUB_EXPORTCODEAS_STRING_CEOL->len),_SUB_EXPORTCODEAS_STRING_CEOL)))||new_error){ -if(qbevent){evnt(26099,20451,"ide_methods.bas");if(r)goto S_60135;} +if(qbevent){evnt(26099,20458,"ide_methods.bas");if(r)goto S_60140;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_left(_SUB_EXPORTCODEAS_STRING_STXT,_SUB_EXPORTCODEAS_STRING_STXT->len-_SUB_EXPORTCODEAS_STRING_CEOL->len)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20452,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20459,"ide_methods.bas");}while(r); ww_continue_6719:; } ww_exit_6719:; -S_60138:; +S_60143:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_STXT,qbs_new_txt_len("",0))))||new_error){ -if(qbevent){evnt(26099,20454,"ide_methods.bas");if(r)goto S_60138;} +if(qbevent){evnt(26099,20461,"ide_methods.bas");if(r)goto S_60143;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_add(_SUB_EXPORTCODEAS_STRING_STXT,_SUB_EXPORTCODEAS_STRING_CEOL)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20454,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20461,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_STXT,_SUB_EXPORTCODEAS_STRING_CEOL),_SUB_EXPORTCODEAS_STRING_CEOL)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20454,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20461,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_LONG_SLEN=_SUB_EXPORTCODEAS_STRING_STXT->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20455,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20462,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_SPOS= 1 ; -if(!qbevent)break;evnt(26099,20456,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20463,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ETXT,func_space( 10000000 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20457,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20464,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS= 1 ; -if(!qbevent)break;evnt(26099,20458,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20465,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20460,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20467,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20461,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20468,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(26099,20463,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20470,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26099,20464,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20471,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26099,20465,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20472,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20466,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20473,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20467,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20474,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; -if(!qbevent)break;evnt(26099,20468,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20475,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26099,20470,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20477,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_MA,qbs_new_txt_len("@_ARCCOT@_ARCCSC@_ARCSEC@_COT@_COTH@_COSH@_CSC@_CSCH@_SEC@_SECH@_SINH@_TANH@",76)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20471,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20478,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26099,20472,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20479,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_FU,qbs_new_txt_len("@_AUTODISPLAY@_BLEND@_BLINK@_CAPSLOCK@_CLEARCOLOR@_CLIPBOARD$@_CLIPBOARDIMAGE@_CONTROLCHR@_DEST@_DISPLAY@_EXIT@_FONT@_FULLSCREEN@_MAPUNICODE@_MEM@_MEMGET@_MESSAGEBOX@_NUMLOCK@_OFFSET@_PALETTECOLOR@_PRINTMODE@_RESIZE@_SCREENICON@_SCROLLLOCK@_SMOOTH@_SOURCE@_WIDTH@ASC@MID$@PLAY@SCREEN@SEEK@SHELL@TIMER@",301)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20473,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20480,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26099,20474,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20481,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_BO,qbs_new_txt_len("@AND@OR@XOR@",12)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20475,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20482,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NP= 0 ; -if(!qbevent)break;evnt(26099,20477,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20484,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; -if(!qbevent)break;evnt(26099,20478,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20485,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; -if(!qbevent)break;evnt(26099,20479,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20486,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; -if(!qbevent)break;evnt(26099,20480,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20487,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; -if(!qbevent)break;evnt(26099,20481,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20488,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; -if(!qbevent)break;evnt(26099,20482,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20489,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20483,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20490,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NC= 0 ; -if(!qbevent)break;evnt(26099,20485,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20492,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20486,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20493,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(26099,20487,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20494,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=184; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENCODEBLOCK; RETURN_184:; -if(!qbevent)break;evnt(26099,20489,"ide_methods.bas");}while(r); -S_60172:; +if(!qbevent)break;evnt(26099,20496,"ide_methods.bas");}while(r); +S_60177:; while((-(*_SUB_EXPORTCODEAS_LONG_SPOS<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26099,20490,"ide_methods.bas");if(r)goto S_60172;} +if(qbevent){evnt(26099,20497,"ide_methods.bas");if(r)goto S_60177;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6725=qbr( 30 +floor( 70 / ((long double)(*_SUB_EXPORTCODEAS_LONG_SLEN))**_SUB_EXPORTCODEAS_LONG_SPOS))))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20491,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20498,"ide_methods.bas");}while(r); do{ qbs_set(__STRING_IDEINFO,qbs_add(qbs_add(qbs_add(func_chr( 0 ),func_string( 3 -_SUB_EXPORTCODEAS_STRING_PERC->len, 32 )),_SUB_EXPORTCODEAS_STRING_PERC),qbs_new_txt_len("% exported...",13))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20492,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20499,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); -if(!qbevent)break;evnt(26099,20493,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20500,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CURR=qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20495,"ide_methods.bas");}while(r); -S_60177:; -if(qbevent){evnt(26099,20496,"ide_methods.bas");if(r)goto S_60177;} -S_60178:; +if(!qbevent)break;evnt(26099,20502,"ide_methods.bas");}while(r); +S_60182:; +if(qbevent){evnt(26099,20503,"ide_methods.bas");if(r)goto S_60182;} +S_60183:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 10 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 13 )))||new_error){ -if(qbevent){evnt(26099,20497,"ide_methods.bas");if(r)goto S_60178;} -S_60179:; +if(qbevent){evnt(26099,20504,"ide_methods.bas");if(r)goto S_60183;} +S_60184:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_LB))||new_error){ -if(qbevent){evnt(26099,20498,"ide_methods.bas");if(r)goto S_60179;} -S_60180:; +if(qbevent){evnt(26099,20505,"ide_methods.bas");if(r)goto S_60184;} +S_60185:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20499,"ide_methods.bas");if(r)goto S_60180;} -S_60181:; +if(qbevent){evnt(26099,20506,"ide_methods.bas");if(r)goto S_60185;} +S_60186:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20500,"ide_methods.bas");if(r)goto S_60181;} +if(qbevent){evnt(26099,20507,"ide_methods.bas");if(r)goto S_60186;} do{ return_point[next_return_point++]=185; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_185:; -if(!qbevent)break;evnt(26099,20500,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20507,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=186; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_186:; -if(!qbevent)break;evnt(26099,20500,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20507,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20500,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20507,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20500,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20507,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26099,20501,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20508,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26099,20501,"ide_methods.bas");}while(r); -S_60190:; +if(!qbevent)break;evnt(26099,20508,"ide_methods.bas");}while(r); +S_60195:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME),qbs_new_txt_len("$NOPREFIX",9))))||new_error){ -if(qbevent){evnt(26099,20502,"ide_methods.bas");if(r)goto S_60190;} +if(qbevent){evnt(26099,20509,"ide_methods.bas");if(r)goto S_60195;} do{ *_SUB_EXPORTCODEAS_INTEGER_NP= -1 ; -if(!qbevent)break;evnt(26099,20502,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20509,"ide_methods.bas");}while(r); } } -S_60194:; +S_60199:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20504,"ide_methods.bas");if(r)goto S_60194;} -S_60195:; +if(qbevent){evnt(26099,20511,"ide_methods.bas");if(r)goto S_60199;} +S_60200:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20505,"ide_methods.bas");if(r)goto S_60195;} +if(qbevent){evnt(26099,20512,"ide_methods.bas");if(r)goto S_60200;} do{ return_point[next_return_point++]=187; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_187:; -if(!qbevent)break;evnt(26099,20505,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20512,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=188; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_188:; -if(!qbevent)break;evnt(26099,20505,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20512,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20505,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20512,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20505,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20512,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20506,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20513,"ide_methods.bas");}while(r); } -S_60204:; +S_60209:; if ((*_SUB_EXPORTCODEAS_INTEGER_CO)||new_error){ -if(qbevent){evnt(26099,20508,"ide_methods.bas");if(r)goto S_60204;} +if(qbevent){evnt(26099,20515,"ide_methods.bas");if(r)goto S_60209;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20508,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20515,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("co",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20508,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20515,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=189; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_189:; -if(!qbevent)break;evnt(26099,20508,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20515,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(26099,20508,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20515,"ide_methods.bas");}while(r); } -S_60210:; +S_60215:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26099,20509,"ide_methods.bas");if(r)goto S_60210;} +if(qbevent){evnt(26099,20516,"ide_methods.bas");if(r)goto S_60215;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20509,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20516,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20509,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20516,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=190; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_190:; -if(!qbevent)break;evnt(26099,20509,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20516,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20509,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20516,"ide_methods.bas");}while(r); } -S_60216:; +S_60221:; if ((-(*_SUB_EXPORTCODEAS_LONG_SPOS> 1 ))||new_error){ -if(qbevent){evnt(26099,20510,"ide_methods.bas");if(r)goto S_60216;} -S_60217:; +if(qbevent){evnt(26099,20517,"ide_methods.bas");if(r)goto S_60221;} +S_60222:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 )!= 95 )))||new_error){ -if(qbevent){evnt(26099,20511,"ide_methods.bas");if(r)goto S_60217;} +if(qbevent){evnt(26099,20518,"ide_methods.bas");if(r)goto S_60222;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26099,20511,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26099,20511,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26099,20511,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); } }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26099,20513,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20520,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26099,20513,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20520,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26099,20513,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20520,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=191; if (next_return_point>=return_points) more_return_points(); goto LABEL_ENDLINEOPS; RETURN_191:; -if(!qbevent)break;evnt(26099,20515,"ide_methods.bas");}while(r); -S_60228:; +if(!qbevent)break;evnt(26099,20522,"ide_methods.bas");}while(r); +S_60233:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 13 ))||new_error){ -if(qbevent){evnt(26099,20516,"ide_methods.bas");if(r)goto S_60228;} +if(qbevent){evnt(26099,20523,"ide_methods.bas");if(r)goto S_60233;} do{ *_SUB_EXPORTCODEAS_INTEGER_LB= -1 ; -if(!qbevent)break;evnt(26099,20516,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20523,"ide_methods.bas");}while(r); } } -S_60232:; +S_60237:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 10 ))||new_error){ -if(qbevent){evnt(26099,20518,"ide_methods.bas");if(r)goto S_60232;} +if(qbevent){evnt(26099,20525,"ide_methods.bas");if(r)goto S_60237;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; -if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20525,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; -if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20525,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; -if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20525,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; -if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20525,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20518,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20525,"ide_methods.bas");}while(r); } sc_ec_450_end:; goto sc_6727_end; } -S_60239:; +S_60244:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 9 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 32 )))||new_error){ -if(qbevent){evnt(26099,20519,"ide_methods.bas");if(r)goto S_60239;} -S_60240:; +if(qbevent){evnt(26099,20526,"ide_methods.bas");if(r)goto S_60244;} +S_60245:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20520,"ide_methods.bas");if(r)goto S_60240;} +if(qbevent){evnt(26099,20527,"ide_methods.bas");if(r)goto S_60245;} do{ return_point[next_return_point++]=192; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_192:; -if(!qbevent)break;evnt(26099,20521,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=193; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_193:; -if(!qbevent)break;evnt(26099,20521,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26099,20521,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26099,20521,"ide_methods.bas");}while(r); -S_60245:; +if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); +S_60250:; qbs_set(sc_6728,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20522,"ide_methods.bas");if(r)goto S_60245;} -S_60246:; +if(qbevent){evnt(26099,20529,"ide_methods.bas");if(r)goto S_60250;} +S_60251:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6728,qbs_new_txt_len("$LET",4))||qbs_equal(sc_6728,qbs_new_txt_len("$ELSE",5))||qbs_equal(sc_6728,qbs_new_txt_len("$END",4))))||new_error){ -if(qbevent){evnt(26099,20523,"ide_methods.bas");if(r)goto S_60246;} +if(qbevent){evnt(26099,20530,"ide_methods.bas");if(r)goto S_60251;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= -1 ; -if(!qbevent)break;evnt(26099,20523,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20530,"ide_methods.bas");}while(r); sc_ec_451_end:; goto sc_6728_end; } -S_60248:; +S_60253:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6728,qbs_new_txt_len("$IF",3))||qbs_equal(sc_6728,qbs_new_txt_len("$ELSEIF",7))))||new_error){ -if(qbevent){evnt(26099,20524,"ide_methods.bas");if(r)goto S_60248;} +if(qbevent){evnt(26099,20531,"ide_methods.bas");if(r)goto S_60253;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= -1 ; -if(!qbevent)break;evnt(26099,20524,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20531,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26099,20524,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20531,"ide_methods.bas");}while(r); sc_ec_452_end:; goto sc_6728_end; } sc_6728_end:; } -S_60253:; +S_60258:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20527,"ide_methods.bas");if(r)goto S_60253;} -S_60254:; +if(qbevent){evnt(26099,20534,"ide_methods.bas");if(r)goto S_60258;} +S_60259:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20528,"ide_methods.bas");if(r)goto S_60254;} +if(qbevent){evnt(26099,20535,"ide_methods.bas");if(r)goto S_60259;} do{ return_point[next_return_point++]=194; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_194:; -if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20535,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=195; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_195:; -if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20535,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20535,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20528,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20535,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20529,"ide_methods.bas");}while(r); -S_60262:; +if(!qbevent)break;evnt(26099,20536,"ide_methods.bas");}while(r); +S_60267:; if ((*_SUB_EXPORTCODEAS_INTEGER_IN)||new_error){ -if(qbevent){evnt(26099,20529,"ide_methods.bas");if(r)goto S_60262;} +if(qbevent){evnt(26099,20536,"ide_methods.bas");if(r)goto S_60267;} do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20529,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20536,"ide_methods.bas");}while(r); } -S_60265:; +S_60270:; qbs_set(sc_6729,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20530,"ide_methods.bas");if(r)goto S_60265;} -S_60266:; +if(qbevent){evnt(26099,20537,"ide_methods.bas");if(r)goto S_60270;} +S_60271:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6729,qbs_new_txt_len("REM",3))))||new_error){ -if(qbevent){evnt(26099,20531,"ide_methods.bas");if(r)goto S_60266;} -S_60267:; +if(qbevent){evnt(26099,20538,"ide_methods.bas");if(r)goto S_60271;} +S_60272:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26099,20531,"ide_methods.bas");if(r)goto S_60267;} +if(qbevent){evnt(26099,20538,"ide_methods.bas");if(r)goto S_60272;} do{ *_SUB_EXPORTCODEAS_INTEGER_CO= -1 ; -if(!qbevent)break;evnt(26099,20531,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20538,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("co",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20531,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20538,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=196; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_196:; -if(!qbevent)break;evnt(26099,20531,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20538,"ide_methods.bas");}while(r); } sc_ec_453_end:; goto sc_6729_end; } -S_60272:; +S_60277:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6729,qbs_new_txt_len("OPEN",4))))||new_error){ -if(qbevent){evnt(26099,20532,"ide_methods.bas");if(r)goto S_60272;} +if(qbevent){evnt(26099,20539,"ide_methods.bas");if(r)goto S_60277;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= -1 ; -if(!qbevent)break;evnt(26099,20532,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20539,"ide_methods.bas");}while(r); sc_ec_454_end:; goto sc_6729_end; } -S_60274:; +S_60279:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6729,qbs_new_txt_len("IF",2))||qbs_equal(sc_6729,qbs_new_txt_len("ELSEIF",6))||qbs_equal(sc_6729,qbs_new_txt_len("UNTIL",5))||qbs_equal(sc_6729,qbs_new_txt_len("WHILE",5))))||new_error){ -if(qbevent){evnt(26099,20533,"ide_methods.bas");if(r)goto S_60274;} +if(qbevent){evnt(26099,20540,"ide_methods.bas");if(r)goto S_60279;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26099,20533,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20540,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26099,20533,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20540,"ide_methods.bas");}while(r); sc_ec_455_end:; goto sc_6729_end; } -S_60277:; +S_60282:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6729,qbs_new_txt_len("THEN",4))))||new_error){ -if(qbevent){evnt(26099,20534,"ide_methods.bas");if(r)goto S_60277;} +if(qbevent){evnt(26099,20541,"ide_methods.bas");if(r)goto S_60282;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26099,20534,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20541,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26099,20534,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20541,"ide_methods.bas");}while(r); sc_ec_456_end:; goto sc_6729_end; } -S_60281:; +S_60286:; fornext_value6731= 1 ; fornext_finalvalue6731=*__LONG_IDN; fornext_step6731= 1 ; @@ -204660,27 +204676,27 @@ if (fornext_value6731fornext_finalvalue6731) break; } fornext_error6731:; -if(qbevent){evnt(26099,20536,"ide_methods.bas");if(r)goto S_60281;} -S_60282:; +if(qbevent){evnt(26099,20543,"ide_methods.bas");if(r)goto S_60286;} +S_60287:; if (((-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_EXPORTCODEAS_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+544))== 2 ))&(-(*(int16*)(((char*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_EXPORTCODEAS_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869+809))> 0 )))||new_error){ -if(qbevent){evnt(26099,20537,"ide_methods.bas");if(r)goto S_60282;} +if(qbevent){evnt(26099,20544,"ide_methods.bas");if(r)goto S_60287;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ID,qbs_rtrim(qbs_new_fixed((((uint8*)__ARRAY_UDT_IDS[0])+((array_check((*_SUB_EXPORTCODEAS_LONG_I)-__ARRAY_UDT_IDS[4],__ARRAY_UDT_IDS[5]))*2869)),256,1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20538,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20545,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_UW,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20538,"ide_methods.bas");}while(r); -S_60285:; +if(!qbevent)break;evnt(26099,20545,"ide_methods.bas");}while(r); +S_60290:; if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_EXPORTCODEAS_STRING_ID,_SUB_EXPORTCODEAS_STRING_UW))|(*_SUB_EXPORTCODEAS_INTEGER_NP&(qbs_equal(_SUB_EXPORTCODEAS_STRING_ID,(qbs_add(qbs_new_txt_len("_",1),_SUB_EXPORTCODEAS_STRING_UW)))))))||new_error){ -if(qbevent){evnt(26099,20539,"ide_methods.bas");if(r)goto S_60285;} +if(qbevent){evnt(26099,20546,"ide_methods.bas");if(r)goto S_60290;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -2 ; -if(!qbevent)break;evnt(26099,20539,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20546,"ide_methods.bas");}while(r); do{ goto fornext_exit_6730; -if(!qbevent)break;evnt(26099,20539,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20546,"ide_methods.bas");}while(r); } } fornext_continue_6730:; @@ -204688,450 +204704,450 @@ fornext_continue_6730:; fornext_exit_6730:; sc_6729_end:; } -S_60293:; +S_60298:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26099,20544,"ide_methods.bas");if(r)goto S_60293;} +if(qbevent){evnt(26099,20551,"ide_methods.bas");if(r)goto S_60298;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20544,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20551,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20544,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20551,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=197; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_197:; -if(!qbevent)break;evnt(26099,20544,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20551,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20544,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20551,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20545,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20552,"ide_methods.bas");}while(r); sc_ec_457_end:; goto sc_6727_end; } -S_60300:; +S_60305:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||new_error){ -if(qbevent){evnt(26099,20546,"ide_methods.bas");if(r)goto S_60300;} -S_60301:; +if(qbevent){evnt(26099,20553,"ide_methods.bas");if(r)goto S_60305;} +S_60306:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26099,20547,"ide_methods.bas");if(r)goto S_60301;} +if(qbevent){evnt(26099,20554,"ide_methods.bas");if(r)goto S_60306;} do{ *_SUB_EXPORTCODEAS_INTEGER_QU= -1 ; -if(!qbevent)break;evnt(26099,20548,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20555,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("qu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20548,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20555,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=198; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_198:; -if(!qbevent)break;evnt(26099,20548,"ide_methods.bas");}while(r); -S_60305:; +if(!qbevent)break;evnt(26099,20555,"ide_methods.bas");}while(r); +S_60310:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_QU){ -if(qbevent){evnt(26099,20549,"ide_methods.bas");if(r)goto S_60305;} +if(qbevent){evnt(26099,20556,"ide_methods.bas");if(r)goto S_60310;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= -1 ; -if(!qbevent)break;evnt(26099,20550,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20557,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("qu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20550,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20557,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=199; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_199:; -if(!qbevent)break;evnt(26099,20550,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20557,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; -if(!qbevent)break;evnt(26099,20550,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20557,"ide_methods.bas");}while(r); } } -S_60311:; +S_60316:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||new_error){ -if(qbevent){evnt(26099,20552,"ide_methods.bas");if(r)goto S_60311;} +if(qbevent){evnt(26099,20559,"ide_methods.bas");if(r)goto S_60316;} do{ return_point[next_return_point++]=200; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_200:; -if(!qbevent)break;evnt(26099,20552,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20559,"ide_methods.bas");}while(r); } sc_ec_458_end:; goto sc_6727_end; } -S_60314:; +S_60319:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 36 )))||new_error){ -if(qbevent){evnt(26099,20553,"ide_methods.bas");if(r)goto S_60314;} -S_60315:; +if(qbevent){evnt(26099,20560,"ide_methods.bas");if(r)goto S_60319;} +S_60320:; if ((*_SUB_EXPORTCODEAS_INTEGER_NL|*_SUB_EXPORTCODEAS_INTEGER_LE)||new_error){ -if(qbevent){evnt(26099,20554,"ide_methods.bas");if(r)goto S_60315;} +if(qbevent){evnt(26099,20561,"ide_methods.bas");if(r)goto S_60320;} do{ *_SUB_EXPORTCODEAS_INTEGER_ML= -1 ; -if(!qbevent)break;evnt(26099,20554,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20561,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= -1 ; -if(!qbevent)break;evnt(26099,20554,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20561,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20554,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20561,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20554,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20561,"ide_methods.bas");}while(r); } sc_ec_459_end:; goto sc_6727_end; } -S_60321:; +S_60326:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||new_error){ -if(qbevent){evnt(26099,20555,"ide_methods.bas");if(r)goto S_60321;} -S_60322:; +if(qbevent){evnt(26099,20562,"ide_methods.bas");if(r)goto S_60326;} +S_60327:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26099,20556,"ide_methods.bas");if(r)goto S_60322;} -S_60323:; +if(qbevent){evnt(26099,20563,"ide_methods.bas");if(r)goto S_60327;} +S_60328:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26099,20557,"ide_methods.bas");if(r)goto S_60323;} -S_60324:; +if(qbevent){evnt(26099,20564,"ide_methods.bas");if(r)goto S_60328;} +S_60329:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len("BHO",3),func_chr(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )),0)> 0 )))||new_error){ -if(qbevent){evnt(26099,20558,"ide_methods.bas");if(r)goto S_60324;} +if(qbevent){evnt(26099,20565,"ide_methods.bas");if(r)goto S_60329;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26099,20559,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20566,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20559,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20566,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=201; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_201:; -if(!qbevent)break;evnt(26099,20559,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20566,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20559,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20566,"ide_methods.bas");}while(r); } } } -S_60332:; +S_60337:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_KW)))||new_error){ -if(qbevent){evnt(26099,20563,"ide_methods.bas");if(r)goto S_60332;} +if(qbevent){evnt(26099,20570,"ide_methods.bas");if(r)goto S_60337;} do{ return_point[next_return_point++]=202; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_202:; -if(!qbevent)break;evnt(26099,20563,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20570,"ide_methods.bas");}while(r); } sc_ec_460_end:; goto sc_6727_end; } -S_60335:; +S_60340:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 39 )))||new_error){ -if(qbevent){evnt(26099,20564,"ide_methods.bas");if(r)goto S_60335;} -S_60336:; +if(qbevent){evnt(26099,20571,"ide_methods.bas");if(r)goto S_60340;} +S_60341:; if ((*_SUB_EXPORTCODEAS_INTEGER_NL)||new_error){ -if(qbevent){evnt(26099,20565,"ide_methods.bas");if(r)goto S_60336;} -S_60337:; +if(qbevent){evnt(26099,20572,"ide_methods.bas");if(r)goto S_60341;} +S_60342:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26099,20566,"ide_methods.bas");if(r)goto S_60337;} -S_60338:; +if(qbevent){evnt(26099,20573,"ide_methods.bas");if(r)goto S_60342;} +S_60343:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )== 36 )))||new_error){ -if(qbevent){evnt(26099,20567,"ide_methods.bas");if(r)goto S_60338;} +if(qbevent){evnt(26099,20574,"ide_methods.bas");if(r)goto S_60343;} do{ *_SUB_EXPORTCODEAS_INTEGER_LE= -1 ; -if(!qbevent)break;evnt(26099,20567,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20574,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20567,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20574,"ide_methods.bas");}while(r); } } } -S_60344:; +S_60349:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26099,20570,"ide_methods.bas");if(r)goto S_60344;} +if(qbevent){evnt(26099,20577,"ide_methods.bas");if(r)goto S_60349;} do{ *_SUB_EXPORTCODEAS_INTEGER_CO= -1 ; -if(!qbevent)break;evnt(26099,20570,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20577,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("co",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20570,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20577,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=203; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_203:; -if(!qbevent)break;evnt(26099,20570,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20577,"ide_methods.bas");}while(r); } sc_ec_461_end:; goto sc_6727_end; } -S_60349:; +S_60354:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 40 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 41 )))||new_error){ -if(qbevent){evnt(26099,20571,"ide_methods.bas");if(r)goto S_60349;} -S_60350:; +if(qbevent){evnt(26099,20578,"ide_methods.bas");if(r)goto S_60354;} +S_60355:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20572,"ide_methods.bas");if(r)goto S_60350;} -S_60351:; +if(qbevent){evnt(26099,20579,"ide_methods.bas");if(r)goto S_60355;} +S_60356:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20573,"ide_methods.bas");if(r)goto S_60351;} +if(qbevent){evnt(26099,20580,"ide_methods.bas");if(r)goto S_60356;} do{ return_point[next_return_point++]=204; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_204:; -if(!qbevent)break;evnt(26099,20573,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20580,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=205; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_205:; -if(!qbevent)break;evnt(26099,20573,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20580,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20573,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20580,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20573,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20580,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20574,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20581,"ide_methods.bas");}while(r); } -S_60360:; +S_60365:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26099,20576,"ide_methods.bas");if(r)goto S_60360;} +if(qbevent){evnt(26099,20583,"ide_methods.bas");if(r)goto S_60365;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20576,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20583,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20576,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20583,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=206; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_206:; -if(!qbevent)break;evnt(26099,20576,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20583,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20576,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20583,"ide_methods.bas");}while(r); } -S_60366:; +S_60371:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26099,20577,"ide_methods.bas");if(r)goto S_60366;} -S_60367:; +if(qbevent){evnt(26099,20584,"ide_methods.bas");if(r)goto S_60371;} +S_60372:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 40 ))||new_error){ -if(qbevent){evnt(26099,20578,"ide_methods.bas");if(r)goto S_60367;} +if(qbevent){evnt(26099,20585,"ide_methods.bas");if(r)goto S_60372;} do{ *_SUB_EXPORTCODEAS_INTEGER_NC=*_SUB_EXPORTCODEAS_INTEGER_NC+ 1 ; -if(!qbevent)break;evnt(26099,20578,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20585,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_NC=*_SUB_EXPORTCODEAS_INTEGER_NC- 1 ; -if(!qbevent)break;evnt(26099,20578,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20585,"ide_methods.bas");}while(r); } } -S_60373:; +S_60378:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU|(-(*_SUB_EXPORTCODEAS_INTEGER_FU< -1 ))|*_SUB_EXPORTCODEAS_INTEGER_BO)))||new_error){ -if(qbevent){evnt(26099,20580,"ide_methods.bas");if(r)goto S_60373;} -S_60374:; +if(qbevent){evnt(26099,20587,"ide_methods.bas");if(r)goto S_60378;} +S_60379:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_NC> 0 ))||new_error){ -if(qbevent){evnt(26099,20581,"ide_methods.bas");if(r)goto S_60374;} +if(qbevent){evnt(26099,20588,"ide_methods.bas");if(r)goto S_60379;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26099,20581,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20588,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26099,20581,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20588,"ide_methods.bas");}while(r); } } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20583,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20590,"ide_methods.bas");}while(r); sc_ec_462_end:; goto sc_6727_end; } -S_60381:; +S_60386:; if ((((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 42 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 44 )))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 47 ))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 59 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 62 )))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 92 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 94 )))||new_error){ -if(qbevent){evnt(26099,20584,"ide_methods.bas");if(r)goto S_60381;} -S_60382:; +if(qbevent){evnt(26099,20591,"ide_methods.bas");if(r)goto S_60386;} +S_60387:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20585,"ide_methods.bas");if(r)goto S_60382;} -S_60383:; +if(qbevent){evnt(26099,20592,"ide_methods.bas");if(r)goto S_60387;} +S_60388:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20586,"ide_methods.bas");if(r)goto S_60383;} +if(qbevent){evnt(26099,20593,"ide_methods.bas");if(r)goto S_60388;} do{ return_point[next_return_point++]=207; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_207:; -if(!qbevent)break;evnt(26099,20586,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20593,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=208; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_208:; -if(!qbevent)break;evnt(26099,20586,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20593,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20586,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20593,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20586,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20593,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20587,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20594,"ide_methods.bas");}while(r); } -S_60392:; +S_60397:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26099,20589,"ide_methods.bas");if(r)goto S_60392;} +if(qbevent){evnt(26099,20596,"ide_methods.bas");if(r)goto S_60397;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20589,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20596,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20589,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20596,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=209; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_209:; -if(!qbevent)break;evnt(26099,20589,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20596,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20589,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20596,"ide_methods.bas");}while(r); } -S_60398:; +S_60403:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 61 ))&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU|(-(*_SUB_EXPORTCODEAS_INTEGER_FU< -1 ))|*_SUB_EXPORTCODEAS_INTEGER_BO))))||new_error){ -if(qbevent){evnt(26099,20590,"ide_methods.bas");if(r)goto S_60398;} +if(qbevent){evnt(26099,20597,"ide_methods.bas");if(r)goto S_60403;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -3 ; -if(!qbevent)break;evnt(26099,20590,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20597,"ide_methods.bas");}while(r); } -S_60401:; +S_60406:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 60 ))|(-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 62 ))|(-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 92 )))||new_error){ -if(qbevent){evnt(26099,20591,"ide_methods.bas");if(r)goto S_60401;} +if(qbevent){evnt(26099,20598,"ide_methods.bas");if(r)goto S_60406;} do{ return_point[next_return_point++]=210; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_210:; -if(!qbevent)break;evnt(26099,20591,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20598,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20592,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20599,"ide_methods.bas");}while(r); sc_ec_463_end:; goto sc_6727_end; } -S_60405:; +S_60410:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 45 )))||new_error){ -if(qbevent){evnt(26099,20593,"ide_methods.bas");if(r)goto S_60405;} -S_60406:; +if(qbevent){evnt(26099,20600,"ide_methods.bas");if(r)goto S_60410;} +S_60411:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20594,"ide_methods.bas");if(r)goto S_60406;} -S_60407:; +if(qbevent){evnt(26099,20601,"ide_methods.bas");if(r)goto S_60411;} +S_60412:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20595,"ide_methods.bas");if(r)goto S_60407;} +if(qbevent){evnt(26099,20602,"ide_methods.bas");if(r)goto S_60412;} do{ return_point[next_return_point++]=211; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_211:; -if(!qbevent)break;evnt(26099,20595,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20602,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=212; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_212:; -if(!qbevent)break;evnt(26099,20595,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20602,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20595,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20602,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20595,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20602,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20596,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20603,"ide_methods.bas");}while(r); } -S_60416:; +S_60421:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26099,20598,"ide_methods.bas");if(r)goto S_60416;} +if(qbevent){evnt(26099,20605,"ide_methods.bas");if(r)goto S_60421;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20598,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20598,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=213; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_213:; -if(!qbevent)break;evnt(26099,20598,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20598,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20599,"ide_methods.bas");}while(r); -S_60423:; +if(!qbevent)break;evnt(26099,20606,"ide_methods.bas");}while(r); +S_60428:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26099,20600,"ide_methods.bas");if(r)goto S_60423;} -S_60424:; +if(qbevent){evnt(26099,20607,"ide_methods.bas");if(r)goto S_60428;} +S_60429:; sc_6732=qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 ); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20601,"ide_methods.bas");if(r)goto S_60424;} -S_60425:; +if(qbevent){evnt(26099,20608,"ide_methods.bas");if(r)goto S_60429;} +S_60430:; if (((sc_6732==( 9 ))||(sc_6732==( 32 ))||(sc_6732==( 40 ))||((sc_6732>=( 42 ))&&(sc_6732<=( 45 )))||(sc_6732==( 47 ))||((sc_6732>=( 59 ))&&(sc_6732<=( 63 )))||(sc_6732==( 92 ))||(sc_6732==( 94 )))||new_error){ -if(qbevent){evnt(26099,20602,"ide_methods.bas");if(r)goto S_60425;} -S_60426:; +if(qbevent){evnt(26099,20609,"ide_methods.bas");if(r)goto S_60430;} +S_60431:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26099,20603,"ide_methods.bas");if(r)goto S_60426;} -S_60427:; +if(qbevent){evnt(26099,20610,"ide_methods.bas");if(r)goto S_60431;} +S_60432:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len(".0123456789",11),func_chr(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )),0)> 0 )))||new_error){ -if(qbevent){evnt(26099,20604,"ide_methods.bas");if(r)goto S_60427;} +if(qbevent){evnt(26099,20611,"ide_methods.bas");if(r)goto S_60432;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20612,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20612,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=214; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_214:; -if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20612,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20605,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20612,"ide_methods.bas");}while(r); } } sc_ec_464_end:; @@ -205142,302 +205158,302 @@ sc_6732_end:; sc_ec_465_end:; goto sc_6727_end; } -S_60436:; +S_60441:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 46 )))||new_error){ -if(qbevent){evnt(26099,20610,"ide_methods.bas");if(r)goto S_60436;} -S_60437:; +if(qbevent){evnt(26099,20617,"ide_methods.bas");if(r)goto S_60441;} +S_60442:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26099,20611,"ide_methods.bas");if(r)goto S_60437;} -S_60438:; +if(qbevent){evnt(26099,20618,"ide_methods.bas");if(r)goto S_60442;} +S_60443:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26099,20612,"ide_methods.bas");if(r)goto S_60438;} -S_60439:; +if(qbevent){evnt(26099,20619,"ide_methods.bas");if(r)goto S_60443;} +S_60444:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len("0123456789",10),func_chr(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )),0)> 0 )))||new_error){ -if(qbevent){evnt(26099,20613,"ide_methods.bas");if(r)goto S_60439;} +if(qbevent){evnt(26099,20620,"ide_methods.bas");if(r)goto S_60444;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26099,20614,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20614,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=215; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_215:; -if(!qbevent)break;evnt(26099,20614,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20614,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); } } } sc_ec_466_end:; goto sc_6727_end; } -S_60447:; +S_60452:; if ((((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 48 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 57 ))))||new_error){ -if(qbevent){evnt(26099,20618,"ide_methods.bas");if(r)goto S_60447;} -S_60448:; +if(qbevent){evnt(26099,20625,"ide_methods.bas");if(r)goto S_60452;} +S_60453:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26099,20619,"ide_methods.bas");if(r)goto S_60448;} +if(qbevent){evnt(26099,20626,"ide_methods.bas");if(r)goto S_60453;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26099,20619,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20619,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=216; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_216:; -if(!qbevent)break;evnt(26099,20619,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20619,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); } sc_ec_467_end:; goto sc_6727_end; } -S_60454:; +S_60459:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 58 )))||new_error){ -if(qbevent){evnt(26099,20620,"ide_methods.bas");if(r)goto S_60454;} -S_60455:; +if(qbevent){evnt(26099,20627,"ide_methods.bas");if(r)goto S_60459;} +S_60460:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20621,"ide_methods.bas");if(r)goto S_60455;} +if(qbevent){evnt(26099,20628,"ide_methods.bas");if(r)goto S_60460;} do{ return_point[next_return_point++]=217; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_217:; -if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20628,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=218; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_218:; -if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20628,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20628,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26099,20621,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20628,"ide_methods.bas");}while(r); } -S_60461:; +S_60466:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20622,"ide_methods.bas");if(r)goto S_60461;} -S_60462:; +if(qbevent){evnt(26099,20629,"ide_methods.bas");if(r)goto S_60466;} +S_60467:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26099,20623,"ide_methods.bas");if(r)goto S_60462;} +if(qbevent){evnt(26099,20630,"ide_methods.bas");if(r)goto S_60467;} do{ return_point[next_return_point++]=219; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_219:; -if(!qbevent)break;evnt(26099,20623,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20630,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=220; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_220:; -if(!qbevent)break;evnt(26099,20623,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20630,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20623,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20630,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26099,20623,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20630,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26099,20624,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20631,"ide_methods.bas");}while(r); } -S_60471:; +S_60476:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26099,20626,"ide_methods.bas");if(r)goto S_60471;} +if(qbevent){evnt(26099,20633,"ide_methods.bas");if(r)goto S_60476;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20633,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("nu",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20633,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=221; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_221:; -if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20633,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26099,20626,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20633,"ide_methods.bas");}while(r); } -S_60477:; +S_60482:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26099,20627,"ide_methods.bas");if(r)goto S_60477;} +if(qbevent){evnt(26099,20634,"ide_methods.bas");if(r)goto S_60482;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26099,20627,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20634,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26099,20627,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20634,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26099,20627,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20634,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26099,20628,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20635,"ide_methods.bas");}while(r); sc_ec_468_end:; goto sc_6727_end; } -S_60483:; +S_60488:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||new_error){ -if(qbevent){evnt(26099,20629,"ide_methods.bas");if(r)goto S_60483;} +if(qbevent){evnt(26099,20636,"ide_methods.bas");if(r)goto S_60488;} do{ return_point[next_return_point++]=222; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_222:; -if(!qbevent)break;evnt(26099,20630,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20637,"ide_methods.bas");}while(r); sc_ec_469_end:; goto sc_6727_end; } -S_60485:; +S_60490:; if ((((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 65 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 90 )))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 97 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 122 ))))||new_error){ -if(qbevent){evnt(26099,20631,"ide_methods.bas");if(r)goto S_60485;} -S_60486:; +if(qbevent){evnt(26099,20638,"ide_methods.bas");if(r)goto S_60490;} +S_60491:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26099,20632,"ide_methods.bas");if(r)goto S_60486;} +if(qbevent){evnt(26099,20639,"ide_methods.bas");if(r)goto S_60491;} do{ *_SUB_EXPORTCODEAS_INTEGER_KW= -1 ; -if(!qbevent)break;evnt(26099,20632,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20639,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20632,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20639,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20632,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20639,"ide_methods.bas");}while(r); } -S_60491:; +S_60496:; if ((qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_NL&(qbs_equal(qbs_ucase(func_mid(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS, 5 ,0|1)),qbs_new_txt_len("REM $",5)))))||new_error){ -if(qbevent){evnt(26099,20633,"ide_methods.bas");if(r)goto S_60491;} +if(qbevent){evnt(26099,20640,"ide_methods.bas");if(r)goto S_60496;} do{ *_SUB_EXPORTCODEAS_INTEGER_LE= -1 ; -if(!qbevent)break;evnt(26099,20633,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20640,"ide_methods.bas");}while(r); } sc_ec_470_end:; goto sc_6727_end; } -S_60494:; +S_60499:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 95 )))||new_error){ -if(qbevent){evnt(26099,20634,"ide_methods.bas");if(r)goto S_60494;} -S_60495:; +if(qbevent){evnt(26099,20641,"ide_methods.bas");if(r)goto S_60499;} +S_60500:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26099,20635,"ide_methods.bas");if(r)goto S_60495;} -S_60496:; +if(qbevent){evnt(26099,20642,"ide_methods.bas");if(r)goto S_60500;} +S_60501:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26099,20636,"ide_methods.bas");if(r)goto S_60496;} -S_60497:; +if(qbevent){evnt(26099,20643,"ide_methods.bas");if(r)goto S_60501;} +S_60502:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )!= 13 ))&(-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )!= 10 ))))||new_error){ -if(qbevent){evnt(26099,20637,"ide_methods.bas");if(r)goto S_60497;} +if(qbevent){evnt(26099,20644,"ide_methods.bas");if(r)goto S_60502;} do{ *_SUB_EXPORTCODEAS_INTEGER_KW= -1 ; -if(!qbevent)break;evnt(26099,20638,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20645,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20638,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20645,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20638,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20645,"ide_methods.bas");}while(r); } } } sc_ec_471_end:; goto sc_6727_end; } -S_60504:; +S_60509:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26099,20642,"ide_methods.bas");if(r)goto S_60504;} +if(qbevent){evnt(26099,20649,"ide_methods.bas");if(r)goto S_60509;} do{ return_point[next_return_point++]=223; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_223:; -if(!qbevent)break;evnt(26099,20643,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20650,"ide_methods.bas");}while(r); sc_ec_472_end:; goto sc_6727_end; } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26099,20645,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20652,"ide_methods.bas");}while(r); sc_6727_end:; -S_60509:; -if(qbevent){evnt(26099,20647,"ide_methods.bas");if(r)goto S_60509;} -S_60510:; +S_60514:; +if(qbevent){evnt(26099,20654,"ide_methods.bas");if(r)goto S_60514;} +S_60515:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 33 ))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 35 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 38 )))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 46 ))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 48 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 57 )))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 65 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 90 )))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 95 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 122 )))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 126 )))||new_error){ -if(qbevent){evnt(26099,20648,"ide_methods.bas");if(r)goto S_60510;} -S_60511:; +if(qbevent){evnt(26099,20655,"ide_methods.bas");if(r)goto S_60515;} +S_60516:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20649,"ide_methods.bas");if(r)goto S_60511;} +if(qbevent){evnt(26099,20656,"ide_methods.bas");if(r)goto S_60516;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_add(_SUB_EXPORTCODEAS_STRING_ME,func_chr(*_SUB_EXPORTCODEAS_INTEGER_CURR))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20649,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20656,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20649,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20656,"ide_methods.bas");}while(r); } -S_60515:; +S_60520:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26099,20650,"ide_methods.bas");if(r)goto S_60515;} +if(qbevent){evnt(26099,20657,"ide_methods.bas");if(r)goto S_60520;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(_SUB_EXPORTCODEAS_STRING_KW,func_chr(*_SUB_EXPORTCODEAS_INTEGER_CURR))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20650,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20657,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20650,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20657,"ide_methods.bas");}while(r); } sc_ec_473_end:; goto sc_6733_end; } sc_6733_end:; -S_60520:; +S_60525:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 9 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 10 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 32 )))||new_error){ -if(qbevent){evnt(26099,20652,"ide_methods.bas");if(r)goto S_60520;} +if(qbevent){evnt(26099,20659,"ide_methods.bas");if(r)goto S_60525;} do{ *_SUB_EXPORTCODEAS_INTEGER_NL= 0 ; -if(!qbevent)break;evnt(26099,20652,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20659,"ide_methods.bas");}while(r); } -S_60523:; +S_60528:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||new_error){ -if(qbevent){evnt(26099,20653,"ide_methods.bas");if(r)goto S_60523;} +if(qbevent){evnt(26099,20660,"ide_methods.bas");if(r)goto S_60528;} do{ tqbs=_SUB_EXPORTCODEAS_STRING_ETXT; if (!new_error){ tmp_fileno=*_SUB_EXPORTCODEAS_LONG_EPOS; if (!new_error){ tmp_long=*_SUB_EXPORTCODEAS_INTEGER_CURR; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} -if(!qbevent)break;evnt(26099,20653,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20660,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+ 1 ; -if(!qbevent)break;evnt(26099,20653,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20660,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(26099,20654,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20661,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_SPOS=*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 ; -if(!qbevent)break;evnt(26099,20654,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20661,"ide_methods.bas");}while(r); ww_continue_6724:; } ww_exit_6724:; @@ -205446,27 +205462,27 @@ return_point[next_return_point++]=224; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSECODEBLOCK; RETURN_224:; -if(!qbevent)break;evnt(26099,20656,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20663,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 3 ); -if(!qbevent)break;evnt(26099,20658,"ide_methods.bas");}while(r); -S_60532:; +if(!qbevent)break;evnt(26099,20665,"ide_methods.bas");}while(r); +S_60537:; qbs_set(sc_6734,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20659,"ide_methods.bas");if(r)goto S_60532;} -S_60533:; +if(qbevent){evnt(26099,20666,"ide_methods.bas");if(r)goto S_60537;} +S_60538:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6734,qbs_new_txt_len("html",4))||qbs_equal(sc_6734,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20660,"ide_methods.bas");if(r)goto S_60533;} +if(qbevent){evnt(26099,20667,"ide_methods.bas");if(r)goto S_60538;} do{ *__LONG_IDEERROR= 7 ; -if(!qbevent)break;evnt(26099,20661,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20668,"ide_methods.bas");}while(r); do{ sub_open(qbs_add(qbs_add(qbs_add(__STRING_IDEPATH,__STRING1_IDEPATHSEP),_SUB_EXPORTCODEAS_STRING_PNAM),_SUB_EXPORTCODEAS_STRING_EXT), 4 ,NULL,NULL, 151 ,NULL,0); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20662,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20669,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; -if(!qbevent)break;evnt(26099,20663,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20670,"ide_methods.bas");}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 151 ; @@ -205476,647 +205492,647 @@ if (new_error) goto skip6735; skip6735: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; -if(!qbevent)break;evnt(26099,20664,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20671,"ide_methods.bas");}while(r); do{ sub_close( 151 ,1); -if(!qbevent)break;evnt(26099,20665,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20672,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_OK=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Export As...",12),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Export to ",10),_SUB_EXPORTCODEAS_STRING_PNAM),_SUB_EXPORTCODEAS_STRING_EXT),qbs_new_txt_len(" completed.",11)),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20666,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20673,"ide_methods.bas");}while(r); sc_ec_474_end:; goto sc_6734_end; } -S_60540:; +S_60545:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6734,qbs_new_txt_len("foru",4))||qbs_equal(sc_6734,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20667,"ide_methods.bas");if(r)goto S_60540;} +if(qbevent){evnt(26099,20674,"ide_methods.bas");if(r)goto S_60545;} do{ sub__clipboard(qbs_left(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS- 1 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20668,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20675,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_OK=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Export As...",12),qbs_new_txt_len("Forum/Wiki export to Clipboard completed.",41),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20669,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20676,"ide_methods.bas");}while(r); sc_ec_475_end:; goto sc_6734_end; } sc_6734_end:; do{ goto exit_subfunc; -if(!qbevent)break;evnt(26099,20671,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20678,"ide_methods.bas");}while(r); LABEL_OPENCODEBLOCK:; -if(qbevent){evnt(26099,20673,"ide_methods.bas");r=0;} -S_60545:; +if(qbevent){evnt(26099,20680,"ide_methods.bas");r=0;} +S_60550:; qbs_set(sc_6736,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20674,"ide_methods.bas");if(r)goto S_60545;} -S_60546:; +if(qbevent){evnt(26099,20681,"ide_methods.bas");if(r)goto S_60550;} +S_60551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6736,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20675,"ide_methods.bas");if(r)goto S_60546;} +if(qbevent){evnt(26099,20682,"ide_methods.bas");if(r)goto S_60551;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",8)),FUNC_ANSITEXTTOUTF8TEXT(_SUB_EXPORTCODEAS_STRING_PNAM)),qbs_new_txt_len("
",1)));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26099,20675,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20682,"ide_methods.bas");}while(r);
 sc_ec_476_end:;
 goto sc_6736_end;
 }
-S_60548:;
+S_60553:;
 if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6736,qbs_new_txt_len("rich",4))))||new_error){
-if(qbevent){evnt(26099,20676,"ide_methods.bas");if(r)goto S_60548;}
+if(qbevent){evnt(26099,20683,"ide_methods.bas");if(r)goto S_60553;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_add(qbs_add(qbs_new_txt_len("{\\rtf1\\ansi\\deff0{\\fonttbl{\\f0 Courier New;}}{\\colortbl ",56),_SUB_EXPORTCODEAS_STRING_RTC),qbs_new_txt_len("}\\pard\\f0\\fs32\\cbpat6\\paperh23811\\paperw16838\\margl142\\margr142\\margt142\\margb142",81)));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26099,20676,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20683,"ide_methods.bas");}while(r);
 sc_ec_477_end:;
 goto sc_6736_end;
 }
-S_60550:;
+S_60555:;
 if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6736,qbs_new_txt_len("foru",4))))||new_error){
-if(qbevent){evnt(26099,20677,"ide_methods.bas");if(r)goto S_60550;}
+if(qbevent){evnt(26099,20684,"ide_methods.bas");if(r)goto S_60555;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[qb=export]",11));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26099,20677,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20684,"ide_methods.bas");}while(r);
 sc_ec_478_end:;
 goto sc_6736_end;
 }
-S_60552:;
+S_60557:;
 if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6736,qbs_new_txt_len("wiki",4))))||new_error){
-if(qbevent){evnt(26099,20678,"ide_methods.bas");if(r)goto S_60552;}
+if(qbevent){evnt(26099,20685,"ide_methods.bas");if(r)goto S_60557;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{CodeStart}}",13));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26099,20678,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20685,"ide_methods.bas");}while(r);
 sc_ec_479_end:;
 goto sc_6736_end;
 }
 do{
 #include "ret298.txt"
-if(!qbevent)break;evnt(26099,20679,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20686,"ide_methods.bas");}while(r);
 sc_6736_end:;
 do{
 sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_TMP->len,_SUB_EXPORTCODEAS_STRING_TMP,1);
-if(!qbevent)break;evnt(26099,20681,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20688,"ide_methods.bas");}while(r);
 do{
 *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_TMP->len;
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26099,20681,"ide_methods.bas");}while(r);
-S_60559:;
+if(!qbevent)break;evnt(26099,20688,"ide_methods.bas");}while(r);
+S_60564:;
 if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT),qbs_new_txt_len("foru",4))))||new_error){
-if(qbevent){evnt(26099,20682,"ide_methods.bas");if(r)goto S_60559;}
+if(qbevent){evnt(26099,20689,"ide_methods.bas");if(r)goto S_60564;}
 do{
 sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_CEOL->len,_SUB_EXPORTCODEAS_STRING_CEOL,1);
-if(!qbevent)break;evnt(26099,20682,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20689,"ide_methods.bas");}while(r);
 do{
 *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_CEOL->len;
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26099,20682,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20689,"ide_methods.bas");}while(r);
 }
 do{
 #include "ret298.txt"
-if(!qbevent)break;evnt(26099,20683,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26099,20690,"ide_methods.bas");}while(r);
 LABEL_CLOSECODEBLOCK:;
-if(qbevent){evnt(26099,20685,"ide_methods.bas");r=0;}
-S_60564:;
+if(qbevent){evnt(26099,20692,"ide_methods.bas");r=0;}
+S_60569:;
 qbs_set(sc_6741,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT));
 qbs_cleanup(qbs_tmp_base,0);
-if(qbevent){evnt(26099,20686,"ide_methods.bas");if(r)goto S_60564;}
-S_60565:;
+if(qbevent){evnt(26099,20693,"ide_methods.bas");if(r)goto S_60569;}
+S_60570:;
 if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("html",4))))||new_error){
-if(qbevent){evnt(26099,20687,"ide_methods.bas");if(r)goto S_60565;}
+if(qbevent){evnt(26099,20694,"ide_methods.bas");if(r)goto S_60570;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("
",20)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20687,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20694,"ide_methods.bas");}while(r); sc_ec_480_end:; goto sc_6741_end; } -S_60567:; +S_60572:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20688,"ide_methods.bas");if(r)goto S_60567;} +if(qbevent){evnt(26099,20695,"ide_methods.bas");if(r)goto S_60572;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20688,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20695,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS- 4 ; -if(!qbevent)break;evnt(26099,20688,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20695,"ide_methods.bas");}while(r); sc_ec_481_end:; goto sc_6741_end; } -S_60570:; +S_60575:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("foru",4))))||new_error){ -if(qbevent){evnt(26099,20689,"ide_methods.bas");if(r)goto S_60570;} +if(qbevent){evnt(26099,20696,"ide_methods.bas");if(r)goto S_60575;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[/qb]",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20689,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20696,"ide_methods.bas");}while(r); sc_ec_482_end:; goto sc_6741_end; } -S_60572:; +S_60577:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20690,"ide_methods.bas");if(r)goto S_60572;} +if(qbevent){evnt(26099,20697,"ide_methods.bas");if(r)goto S_60577;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{CodeEnd}}",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20690,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20697,"ide_methods.bas");}while(r); sc_ec_483_end:; goto sc_6741_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20691,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20698,"ide_methods.bas");}while(r); sc_6741_end:; do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS-_SUB_EXPORTCODEAS_STRING_CEOL->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20693,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20700,"ide_methods.bas");}while(r); do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_TMP->len,_SUB_EXPORTCODEAS_STRING_TMP,1); -if(!qbevent)break;evnt(26099,20694,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20701,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_TMP->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20694,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20701,"ide_methods.bas");}while(r); do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_CEOL->len,_SUB_EXPORTCODEAS_STRING_CEOL,1); -if(!qbevent)break;evnt(26099,20695,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20702,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_CEOL->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20695,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20702,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20696,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20703,"ide_methods.bas");}while(r); LABEL_OPENTEXT:; -if(qbevent){evnt(26099,20698,"ide_methods.bas");r=0;} -S_60583:; +if(qbevent){evnt(26099,20705,"ide_methods.bas");r=0;} +S_60588:; if ((qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_ML&(~(*_SUB_EXPORTCODEAS_INTEGER_PC))&(qbs_notequal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT),qbs_new_txt_len("co",2)))))||new_error){ -if(qbevent){evnt(26099,20699,"ide_methods.bas");if(r)goto S_60583;} +if(qbevent){evnt(26099,20706,"ide_methods.bas");if(r)goto S_60588;} do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20699,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20706,"ide_methods.bas");}while(r); } -S_60586:; +S_60591:; qbs_set(sc_6747,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20700,"ide_methods.bas");if(r)goto S_60586;} -S_60587:; +if(qbevent){evnt(26099,20707,"ide_methods.bas");if(r)goto S_60591;} +S_60592:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20701,"ide_methods.bas");if(r)goto S_60587;} -S_60588:; +if(qbevent){evnt(26099,20708,"ide_methods.bas");if(r)goto S_60592;} +S_60593:; qbs_set(sc_6748,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20702,"ide_methods.bas");if(r)goto S_60588;} -S_60589:; +if(qbevent){evnt(26099,20709,"ide_methods.bas");if(r)goto S_60593;} +S_60594:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6748,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26099,20703,"ide_methods.bas");if(r)goto S_60589;} +if(qbevent){evnt(26099,20710,"ide_methods.bas");if(r)goto S_60594;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20703,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20710,"ide_methods.bas");}while(r); sc_ec_484_end:; goto sc_6748_end; } -S_60591:; +S_60596:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6748,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26099,20704,"ide_methods.bas");if(r)goto S_60591;} +if(qbevent){evnt(26099,20711,"ide_methods.bas");if(r)goto S_60596;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20704,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20711,"ide_methods.bas");}while(r); sc_ec_485_end:; goto sc_6748_end; } -S_60593:; +S_60598:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6748,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20705,"ide_methods.bas");if(r)goto S_60593;} +if(qbevent){evnt(26099,20712,"ide_methods.bas");if(r)goto S_60598;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20705,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20712,"ide_methods.bas");}while(r); sc_ec_486_end:; goto sc_6748_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20706,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20713,"ide_methods.bas");}while(r); sc_6748_end:; sc_ec_487_end:; goto sc_6747_end; } -S_60598:; +S_60603:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20708,"ide_methods.bas");if(r)goto S_60598;} -S_60599:; +if(qbevent){evnt(26099,20715,"ide_methods.bas");if(r)goto S_60603;} +S_60604:; qbs_set(sc_6749,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20709,"ide_methods.bas");if(r)goto S_60599;} -S_60600:; +if(qbevent){evnt(26099,20716,"ide_methods.bas");if(r)goto S_60604;} +S_60605:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6749,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26099,20710,"ide_methods.bas");if(r)goto S_60600;} +if(qbevent){evnt(26099,20717,"ide_methods.bas");if(r)goto S_60605;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf1 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20710,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20717,"ide_methods.bas");}while(r); sc_ec_488_end:; goto sc_6749_end; } -S_60602:; +S_60607:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6749,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26099,20711,"ide_methods.bas");if(r)goto S_60602;} +if(qbevent){evnt(26099,20718,"ide_methods.bas");if(r)goto S_60607;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf4 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20711,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20718,"ide_methods.bas");}while(r); sc_ec_489_end:; goto sc_6749_end; } -S_60604:; +S_60609:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6749,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20712,"ide_methods.bas");if(r)goto S_60604;} +if(qbevent){evnt(26099,20719,"ide_methods.bas");if(r)goto S_60609;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf5 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20712,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20719,"ide_methods.bas");}while(r); sc_ec_490_end:; goto sc_6749_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20713,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20720,"ide_methods.bas");}while(r); sc_6749_end:; sc_ec_491_end:; goto sc_6747_end; } -S_60609:; +S_60614:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("foru",4))))||new_error){ -if(qbevent){evnt(26099,20715,"ide_methods.bas");if(r)goto S_60609;} -S_60610:; +if(qbevent){evnt(26099,20722,"ide_methods.bas");if(r)goto S_60614;} +S_60615:; qbs_set(sc_6750,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20716,"ide_methods.bas");if(r)goto S_60610;} -S_60611:; +if(qbevent){evnt(26099,20723,"ide_methods.bas");if(r)goto S_60615;} +S_60616:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6750,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26099,20717,"ide_methods.bas");if(r)goto S_60611;} +if(qbevent){evnt(26099,20724,"ide_methods.bas");if(r)goto S_60616;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[color=#919191]",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20717,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20724,"ide_methods.bas");}while(r); sc_ec_492_end:; goto sc_6750_end; } -S_60613:; +S_60618:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6750,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26099,20718,"ide_methods.bas");if(r)goto S_60613;} +if(qbevent){evnt(26099,20725,"ide_methods.bas");if(r)goto S_60618;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[color=#F580B1]",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20718,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20725,"ide_methods.bas");}while(r); sc_ec_493_end:; goto sc_6750_end; } -S_60615:; +S_60620:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6750,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20719,"ide_methods.bas");if(r)goto S_60615;} +if(qbevent){evnt(26099,20726,"ide_methods.bas");if(r)goto S_60620;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[color=#FFB100]",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20719,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20726,"ide_methods.bas");}while(r); sc_ec_494_end:; goto sc_6750_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20720,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20727,"ide_methods.bas");}while(r); sc_6750_end:; sc_ec_495_end:; goto sc_6747_end; } -S_60620:; +S_60625:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20722,"ide_methods.bas");if(r)goto S_60620;} -S_60621:; +if(qbevent){evnt(26099,20729,"ide_methods.bas");if(r)goto S_60625;} +S_60626:; qbs_set(sc_6751,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20723,"ide_methods.bas");if(r)goto S_60621;} -S_60622:; +if(qbevent){evnt(26099,20730,"ide_methods.bas");if(r)goto S_60626;} +S_60627:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6751,qbs_new_txt_len("co",2))||qbs_equal(sc_6751,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20724,"ide_methods.bas");if(r)goto S_60622;} +if(qbevent){evnt(26099,20731,"ide_methods.bas");if(r)goto S_60627;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20724,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20731,"ide_methods.bas");}while(r); sc_ec_496_end:; goto sc_6751_end; } -S_60624:; +S_60629:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6751,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26099,20725,"ide_methods.bas");if(r)goto S_60624;} +if(qbevent){evnt(26099,20732,"ide_methods.bas");if(r)goto S_60629;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20725,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20732,"ide_methods.bas");}while(r); sc_ec_497_end:; goto sc_6751_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20726,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20733,"ide_methods.bas");}while(r); sc_6751_end:; sc_ec_498_end:; goto sc_6747_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20728,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20735,"ide_methods.bas");}while(r); sc_6747_end:; do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_TMP->len,_SUB_EXPORTCODEAS_STRING_TMP,1); -if(!qbevent)break;evnt(26099,20730,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20737,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_TMP->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20730,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20737,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20731,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20738,"ide_methods.bas");}while(r); LABEL_CLOSETEXT:; -if(qbevent){evnt(26099,20733,"ide_methods.bas");r=0;} -S_60635:; +if(qbevent){evnt(26099,20740,"ide_methods.bas");r=0;} +S_60640:; if ((qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_ML&(~(*_SUB_EXPORTCODEAS_INTEGER_PC))&(qbs_notequal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT),qbs_new_txt_len("co",2)))))||new_error){ -if(qbevent){evnt(26099,20734,"ide_methods.bas");if(r)goto S_60635;} +if(qbevent){evnt(26099,20741,"ide_methods.bas");if(r)goto S_60640;} do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20734,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20741,"ide_methods.bas");}while(r); } -S_60638:; +S_60643:; qbs_set(sc_6754,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20735,"ide_methods.bas");if(r)goto S_60638;} -S_60639:; +if(qbevent){evnt(26099,20742,"ide_methods.bas");if(r)goto S_60643;} +S_60644:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20736,"ide_methods.bas");if(r)goto S_60639;} -S_60640:; +if(qbevent){evnt(26099,20743,"ide_methods.bas");if(r)goto S_60644;} +S_60645:; qbs_set(sc_6755,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20737,"ide_methods.bas");if(r)goto S_60640;} -S_60641:; +if(qbevent){evnt(26099,20744,"ide_methods.bas");if(r)goto S_60645;} +S_60646:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6755,qbs_new_txt_len("co",2))||qbs_equal(sc_6755,qbs_new_txt_len("nu",2))||qbs_equal(sc_6755,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20738,"ide_methods.bas");if(r)goto S_60641;} +if(qbevent){evnt(26099,20745,"ide_methods.bas");if(r)goto S_60646;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20738,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20745,"ide_methods.bas");}while(r); sc_ec_499_end:; goto sc_6755_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20739,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20746,"ide_methods.bas");}while(r); sc_6755_end:; sc_ec_500_end:; goto sc_6754_end; } -S_60646:; +S_60651:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20741,"ide_methods.bas");if(r)goto S_60646;} -S_60647:; +if(qbevent){evnt(26099,20748,"ide_methods.bas");if(r)goto S_60651;} +S_60652:; qbs_set(sc_6756,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20742,"ide_methods.bas");if(r)goto S_60647;} -S_60648:; +if(qbevent){evnt(26099,20749,"ide_methods.bas");if(r)goto S_60652;} +S_60653:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6756,qbs_new_txt_len("co",2))||qbs_equal(sc_6756,qbs_new_txt_len("nu",2))||qbs_equal(sc_6756,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20743,"ide_methods.bas");if(r)goto S_60648;} +if(qbevent){evnt(26099,20750,"ide_methods.bas");if(r)goto S_60653;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf0 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20743,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20750,"ide_methods.bas");}while(r); sc_ec_501_end:; goto sc_6756_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20744,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20751,"ide_methods.bas");}while(r); sc_6756_end:; sc_ec_502_end:; goto sc_6754_end; } -S_60653:; +S_60658:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("foru",4))))||new_error){ -if(qbevent){evnt(26099,20746,"ide_methods.bas");if(r)goto S_60653;} -S_60654:; +if(qbevent){evnt(26099,20753,"ide_methods.bas");if(r)goto S_60658;} +S_60659:; qbs_set(sc_6757,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20747,"ide_methods.bas");if(r)goto S_60654;} -S_60655:; +if(qbevent){evnt(26099,20754,"ide_methods.bas");if(r)goto S_60659;} +S_60660:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6757,qbs_new_txt_len("co",2))||qbs_equal(sc_6757,qbs_new_txt_len("nu",2))||qbs_equal(sc_6757,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20748,"ide_methods.bas");if(r)goto S_60655;} +if(qbevent){evnt(26099,20755,"ide_methods.bas");if(r)goto S_60660;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[/color]",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20748,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20755,"ide_methods.bas");}while(r); sc_ec_503_end:; goto sc_6757_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20749,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20756,"ide_methods.bas");}while(r); sc_6757_end:; sc_ec_504_end:; goto sc_6754_end; } -S_60660:; +S_60665:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20751,"ide_methods.bas");if(r)goto S_60660;} -S_60661:; +if(qbevent){evnt(26099,20758,"ide_methods.bas");if(r)goto S_60665;} +S_60666:; qbs_set(sc_6758,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20752,"ide_methods.bas");if(r)goto S_60661;} -S_60662:; +if(qbevent){evnt(26099,20759,"ide_methods.bas");if(r)goto S_60666;} +S_60667:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6758,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26099,20753,"ide_methods.bas");if(r)goto S_60662;} +if(qbevent){evnt(26099,20760,"ide_methods.bas");if(r)goto S_60667;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#919191}}",19)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20753,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20760,"ide_methods.bas");}while(r); sc_ec_505_end:; goto sc_6758_end; } -S_60664:; +S_60669:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6758,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26099,20754,"ide_methods.bas");if(r)goto S_60664;} +if(qbevent){evnt(26099,20761,"ide_methods.bas");if(r)goto S_60669;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#F580B1}}",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20754,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20761,"ide_methods.bas");}while(r); sc_ec_506_end:; goto sc_6758_end; } -S_60666:; +S_60671:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6758,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26099,20755,"ide_methods.bas");if(r)goto S_60666;} +if(qbevent){evnt(26099,20762,"ide_methods.bas");if(r)goto S_60671;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#FFB100}}",19)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20755,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20762,"ide_methods.bas");}while(r); sc_ec_507_end:; goto sc_6758_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20756,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20763,"ide_methods.bas");}while(r); sc_6758_end:; sc_ec_508_end:; goto sc_6754_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20758,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20765,"ide_methods.bas");}while(r); sc_6754_end:; -S_60674:; +S_60679:; if ((*_SUB_EXPORTCODEAS_INTEGER_POST)||new_error){ -if(qbevent){evnt(26099,20760,"ide_methods.bas");if(r)goto S_60674;} +if(qbevent){evnt(26099,20767,"ide_methods.bas");if(r)goto S_60679;} do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(26099,20761,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20768,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=225; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_225:; -if(!qbevent)break;evnt(26099,20761,"ide_methods.bas");}while(r); -S_60677:; +if(!qbevent)break;evnt(26099,20768,"ide_methods.bas");}while(r); +S_60682:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||new_error){ -if(qbevent){evnt(26099,20762,"ide_methods.bas");if(r)goto S_60677;} +if(qbevent){evnt(26099,20769,"ide_methods.bas");if(r)goto S_60682;} do{ tqbs=_SUB_EXPORTCODEAS_STRING_ETXT; if (!new_error){ tmp_fileno=*_SUB_EXPORTCODEAS_LONG_EPOS; if (!new_error){ tmp_long=*_SUB_EXPORTCODEAS_INTEGER_CURR; if (!new_error){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} -if(!qbevent)break;evnt(26099,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20769,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+ 1 ; -if(!qbevent)break;evnt(26099,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20769,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20769,"ide_methods.bas");}while(r); } } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_TMP->len,_SUB_EXPORTCODEAS_STRING_TMP,1); -if(!qbevent)break;evnt(26099,20764,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20771,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_TMP->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20764,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20771,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20765,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20772,"ide_methods.bas");}while(r); LABEL_VERIFYKEYWORD:; -if(qbevent){evnt(26099,20767,"ide_methods.bas");r=0;} -S_60686:; +if(qbevent){evnt(26099,20774,"ide_methods.bas");r=0;} +S_60691:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20768,"ide_methods.bas");if(r)goto S_60686;} +if(qbevent){evnt(26099,20775,"ide_methods.bas");if(r)goto S_60691;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_VERI,_SUB_EXPORTCODEAS_STRING_ME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20768,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20775,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_VERI,_SUB_EXPORTCODEAS_STRING_KW); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20768,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20775,"ide_methods.bas");}while(r); } -S_60691:; +S_60696:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_VERI, 1 )!= 95 )))||new_error){ -if(qbevent){evnt(26099,20769,"ide_methods.bas");if(r)goto S_60691;} +if(qbevent){evnt(26099,20776,"ide_methods.bas");if(r)goto S_60696;} do{ *_SUB_EXPORTCODEAS_INTEGER_FLP= 1 ; -if(!qbevent)break;evnt(26099,20769,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20776,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_FLP= 2 ; -if(!qbevent)break;evnt(26099,20769,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20776,"ide_methods.bas");}while(r); } -S_60696:; +S_60701:; if ((qbs_cleanup(qbs_tmp_base,(((-(qbs_asc(_SUB_EXPORTCODEAS_STRING_VERI,*_SUB_EXPORTCODEAS_INTEGER_FLP)< 91 ))|(qbs_equal(func_mid(_SUB_EXPORTCODEAS_STRING_VERI,*_SUB_EXPORTCODEAS_INTEGER_FLP, 2 ,0|1),qbs_new_txt_len("gl",2)))))&(-(func_instr(NULL,__STRING_LISTOFKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI)),qbs_new_txt_len("@",1)),0)> 0 ))))||new_error){ -if(qbevent){evnt(26099,20770,"ide_methods.bas");if(r)goto S_60696;} -S_60697:; +if(qbevent){evnt(26099,20777,"ide_methods.bas");if(r)goto S_60701;} +S_60702:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME&*_SUB_EXPORTCODEAS_INTEGER_LE)||new_error){ -if(qbevent){evnt(26099,20771,"ide_methods.bas");if(r)goto S_60697;} -S_60698:; +if(qbevent){evnt(26099,20778,"ide_methods.bas");if(r)goto S_60702;} +S_60703:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len("$DYNAMIC$INCLUDE$STATIC",23),qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI),0)== 0 )))||new_error){ -if(qbevent){evnt(26099,20772,"ide_methods.bas");if(r)goto S_60698;} +if(qbevent){evnt(26099,20779,"ide_methods.bas");if(r)goto S_60703;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20772,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20779,"ide_methods.bas");}while(r); } -S_60701:; +S_60706:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_ME&(~(*_SUB_EXPORTCODEAS_INTEGER_LE))){ -if(qbevent){evnt(26099,20773,"ide_methods.bas");if(r)goto S_60701;} -S_60702:; +if(qbevent){evnt(26099,20780,"ide_methods.bas");if(r)goto S_60706;} +S_60707:; if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len("$DYNAMIC$INCLUDE$STATIC",23),qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI),0)> 0 )))||new_error){ -if(qbevent){evnt(26099,20774,"ide_methods.bas");if(r)goto S_60702;} +if(qbevent){evnt(26099,20781,"ide_methods.bas");if(r)goto S_60707;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20774,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20781,"ide_methods.bas");}while(r); } } } -S_60706:; +S_60711:; if ((*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26099,20776,"ide_methods.bas");if(r)goto S_60706;} +if(qbevent){evnt(26099,20783,"ide_methods.bas");if(r)goto S_60711;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,_SUB_EXPORTCODEAS_STRING_VERI); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20776,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20783,"ide_methods.bas");}while(r); } -S_60709:; +S_60714:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_NP&*_SUB_EXPORTCODEAS_INTEGER_KW){ -if(qbevent){evnt(26099,20777,"ide_methods.bas");if(r)goto S_60709;} -S_60710:; +if(qbevent){evnt(26099,20784,"ide_methods.bas");if(r)goto S_60714;} +S_60715:; if ((qbs_cleanup(qbs_tmp_base,(-(qbs_asc(_SUB_EXPORTCODEAS_STRING_VERI, 1 )> 90 ))|(-(func_instr(NULL,__STRING_LISTOFKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@_",2),qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI)),qbs_new_txt_len("@",1)),0)== 0 ))))||new_error){ -if(qbevent){evnt(26099,20778,"ide_methods.bas");if(r)goto S_60710;} +if(qbevent){evnt(26099,20785,"ide_methods.bas");if(r)goto S_60715;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20778,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20785,"ide_methods.bas");}while(r); } -S_60713:; +S_60718:; }else{ if (qbs_cleanup(qbs_tmp_base,(~(*_SUB_EXPORTCODEAS_INTEGER_ML))&(-(func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),qbs_ucase(FUNC_REMOVESYMBOL2(_SUB_EXPORTCODEAS_STRING_VERI))),qbs_new_txt_len("@",1)),0)> 0 )))){ -if(qbevent){evnt(26099,20779,"ide_methods.bas");if(r)goto S_60713;} +if(qbevent){evnt(26099,20786,"ide_methods.bas");if(r)goto S_60718;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= -1 ; -if(!qbevent)break;evnt(26099,20780,"ide_methods.bas");}while(r); -S_60715:; +if(!qbevent)break;evnt(26099,20787,"ide_methods.bas");}while(r); +S_60720:; }else{ if (qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_PC&(-(func_instr(NULL,__STRING_USERDEFINELIST,qbs_add(qbs_add(qbs_new_txt_len("@",1),qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI)),qbs_new_txt_len("@",1)),0)> 0 )))){ -if(qbevent){evnt(26099,20781,"ide_methods.bas");if(r)goto S_60715;} +if(qbevent){evnt(26099,20788,"ide_methods.bas");if(r)goto S_60720;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= -1 ; -if(!qbevent)break;evnt(26099,20782,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20789,"ide_methods.bas");}while(r); }else{ -S_60718:; +S_60723:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20784,"ide_methods.bas");if(r)goto S_60718;} +if(qbevent){evnt(26099,20791,"ide_methods.bas");if(r)goto S_60723;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20784,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20791,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20784,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20791,"ide_methods.bas");}while(r); } } } @@ -206124,790 +206140,790 @@ if(!qbevent)break;evnt(26099,20784,"ide_methods.bas");}while(r); } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20786,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20793,"ide_methods.bas");}while(r); LABEL_FINDWIKIPAGE:; -if(qbevent){evnt(26099,20788,"ide_methods.bas");r=0;} -S_60725:; +if(qbevent){evnt(26099,20795,"ide_methods.bas");r=0;} +S_60730:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26099,20789,"ide_methods.bas");if(r)goto S_60725;} +if(qbevent){evnt(26099,20796,"ide_methods.bas");if(r)goto S_60730;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20789,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20796,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20789,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20796,"ide_methods.bas");}while(r); } -S_60730:; +S_60735:; if ((*_SUB_EXPORTCODEAS_INTEGER_OP)||new_error){ -if(qbevent){evnt(26099,20790,"ide_methods.bas");if(r)goto S_60730;} -S_60731:; -if(qbevent){evnt(26099,20791,"ide_methods.bas");if(r)goto S_60731;} -S_60732:; +if(qbevent){evnt(26099,20797,"ide_methods.bas");if(r)goto S_60735;} +S_60736:; +if(qbevent){evnt(26099,20798,"ide_methods.bas");if(r)goto S_60736;} +S_60737:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ACCESS",6))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LOCK",4))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SHARED",6))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("READ",4))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("WRITE",5))))||new_error){ -if(qbevent){evnt(26099,20792,"ide_methods.bas");if(r)goto S_60732;} +if(qbevent){evnt(26099,20799,"ide_methods.bas");if(r)goto S_60737;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPEN#File_ACCESS_and_LOCK_Permissions",37)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20792,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20799,"ide_methods.bas");}while(r); sc_ec_509_end:; goto sc_6761_end; } -S_60734:; +S_60739:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("FOR",3))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OUTPUT",6))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("APPEND",6))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("INPUT",5))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("BINARY",6))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("RANDOM",6))))||new_error){ -if(qbevent){evnt(26099,20793,"ide_methods.bas");if(r)goto S_60734;} +if(qbevent){evnt(26099,20800,"ide_methods.bas");if(r)goto S_60739;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPEN#File_Access_Modes",22)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20793,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20800,"ide_methods.bas");}while(r); sc_ec_510_end:; goto sc_6761_end; } do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPEN",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20794,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20801,"ide_methods.bas");}while(r); sc_6761_end:; -S_60739:; +S_60744:; }else{ if (qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_FU&((-(func_instr(NULL,_SUB_EXPORTCODEAS_STRING_FU,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("@",1)),0)> 0 ))|(*_SUB_EXPORTCODEAS_INTEGER_NP&(-(func_instr(NULL,_SUB_EXPORTCODEAS_STRING_FU,qbs_add(qbs_add(qbs_new_txt_len("@_",2),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("@",1)),0)> 0 )))))){ -if(qbevent){evnt(26099,20796,"ide_methods.bas");if(r)goto S_60739;} -S_60740:; +if(qbevent){evnt(26099,20803,"ide_methods.bas");if(r)goto S_60744;} +S_60745:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SHELL",5))))||new_error){ -if(qbevent){evnt(26099,20797,"ide_methods.bas");if(r)goto S_60740;} +if(qbevent){evnt(26099,20804,"ide_methods.bas");if(r)goto S_60745;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (QB64 function)",16))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20797,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20804,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (function)",11))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20797,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20804,"ide_methods.bas");}while(r); } -S_60745:; +S_60750:; }else{ if (qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_BO&(-(func_instr(NULL,_SUB_EXPORTCODEAS_STRING_BO,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("@",1)),0)> 0 )))){ -if(qbevent){evnt(26099,20798,"ide_methods.bas");if(r)goto S_60745;} +if(qbevent){evnt(26099,20805,"ide_methods.bas");if(r)goto S_60750;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (boolean)",10))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20799,"ide_methods.bas");}while(r); -S_60747:; +if(!qbevent)break;evnt(26099,20806,"ide_methods.bas");}while(r); +S_60752:; }else{ if (qbs_cleanup(qbs_tmp_base,((-(func_instr(NULL,_SUB_EXPORTCODEAS_STRING_MA,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("@",1)),0)> 0 ))|(*_SUB_EXPORTCODEAS_INTEGER_NP&(-(func_instr(NULL,_SUB_EXPORTCODEAS_STRING_MA,qbs_add(qbs_add(qbs_new_txt_len("@_",2),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("@",1)),0)> 0 )))))){ -if(qbevent){evnt(26099,20800,"ide_methods.bas");if(r)goto S_60747;} +if(qbevent){evnt(26099,20807,"ide_methods.bas");if(r)goto S_60752;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("Mathematical Operations#Derived_Mathematical_Functions",54)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20801,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20808,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LA,qbs_ltrim(FUNC_STRREPLACE(func_mid(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS, 100 ,0|1),func_chr( 9 ),qbs_new_txt_len(" ",1)))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20803,"ide_methods.bas");}while(r); -S_60751:; +if(!qbevent)break;evnt(26099,20810,"ide_methods.bas");}while(r); +S_60756:; sc_6762_var=0; -if(qbevent){evnt(26099,20804,"ide_methods.bas");if(r)goto S_60751;} -S_60752:; +if(qbevent){evnt(26099,20811,"ide_methods.bas");if(r)goto S_60756;} +S_60757:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("$END",4))))||new_error){ -if(qbevent){evnt(26099,20805,"ide_methods.bas");if(r)goto S_60752;} -S_60753:; +if(qbevent){evnt(26099,20812,"ide_methods.bas");if(r)goto S_60757;} +S_60758:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 )),qbs_new_txt_len("IF",2))))||new_error){ -if(qbevent){evnt(26099,20805,"ide_methods.bas");if(r)goto S_60753;} +if(qbevent){evnt(26099,20812,"ide_methods.bas");if(r)goto S_60758;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20812,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("$END IF",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20812,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20812,"ide_methods.bas");}while(r); } sc_ec_511_end:; sc_6762_var=-1; } -S_60758:; +S_60763:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("CALL",4))))||new_error){ -if(qbevent){evnt(26099,20806,"ide_methods.bas");if(r)goto S_60758;} -S_60759:; +if(qbevent){evnt(26099,20813,"ide_methods.bas");if(r)goto S_60763;} +S_60764:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 )),qbs_new_txt_len("ABSOLUTE",8))))||new_error){ -if(qbevent){evnt(26099,20806,"ide_methods.bas");if(r)goto S_60759;} +if(qbevent){evnt(26099,20813,"ide_methods.bas");if(r)goto S_60764;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20806,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20813,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("CALL ABSOLUTE",13)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20806,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20813,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20806,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20813,"ide_methods.bas");}while(r); } sc_ec_512_end:; sc_6762_var=-1; } -S_60764:; +S_60769:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DECLARE",7))))||new_error){ -if(qbevent){evnt(26099,20807,"ide_methods.bas");if(r)goto S_60764;} -S_60765:; +if(qbevent){evnt(26099,20814,"ide_methods.bas");if(r)goto S_60769;} +S_60770:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 7 )),qbs_new_txt_len("LIBRARY",7))))||new_error){ -if(qbevent){evnt(26099,20807,"ide_methods.bas");if(r)goto S_60765;} +if(qbevent){evnt(26099,20814,"ide_methods.bas");if(r)goto S_60770;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 7 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20807,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20814,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DECLARE LIBRARY",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20807,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20814,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20807,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20814,"ide_methods.bas");}while(r); } sc_ec_513_end:; sc_6762_var=-1; } -S_60770:; +S_60775:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DEF",3))))||new_error){ -if(qbevent){evnt(26099,20808,"ide_methods.bas");if(r)goto S_60770;} -S_60771:; +if(qbevent){evnt(26099,20815,"ide_methods.bas");if(r)goto S_60775;} +S_60776:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("SEG",3))))||new_error){ -if(qbevent){evnt(26099,20808,"ide_methods.bas");if(r)goto S_60771;} +if(qbevent){evnt(26099,20815,"ide_methods.bas");if(r)goto S_60776;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20808,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20815,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DEF SEG",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20808,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20815,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20808,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20815,"ide_methods.bas");}while(r); } sc_ec_514_end:; sc_6762_var=-1; } -S_60776:; +S_60781:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO",2))))||new_error){ -if(qbevent){evnt(26099,20809,"ide_methods.bas");if(r)goto S_60776;} -S_60777:; +if(qbevent){evnt(26099,20816,"ide_methods.bas");if(r)goto S_60781;} +S_60782:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("WHILE",5))))||new_error){ -if(qbevent){evnt(26099,20810,"ide_methods.bas");if(r)goto S_60777;} +if(qbevent){evnt(26099,20817,"ide_methods.bas");if(r)goto S_60782;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO...LOOP",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26099,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26099,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); } -S_60784:; +S_60789:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("UNTIL",5))))||new_error){ -if(qbevent){evnt(26099,20811,"ide_methods.bas");if(r)goto S_60784;} +if(qbevent){evnt(26099,20818,"ide_methods.bas");if(r)goto S_60789;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20811,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO...LOOP",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20811,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26099,20811,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26099,20811,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20811,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); } sc_ec_515_end:; sc_6762_var=-1; } -S_60791:; +S_60796:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END",3))))||new_error){ -if(qbevent){evnt(26099,20812,"ide_methods.bas");if(r)goto S_60791;} -S_60792:; +if(qbevent){evnt(26099,20819,"ide_methods.bas");if(r)goto S_60796;} +S_60797:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 7 )),qbs_new_txt_len("DECLARE",7))))||new_error){ -if(qbevent){evnt(26099,20813,"ide_methods.bas");if(r)goto S_60792;} +if(qbevent){evnt(26099,20820,"ide_methods.bas");if(r)goto S_60797;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 7 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20813,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20820,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END DECLARE",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20813,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20820,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20813,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20820,"ide_methods.bas");}while(r); } -S_60797:; +S_60802:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 )),qbs_new_txt_len("FUNCTION",8))))||new_error){ -if(qbevent){evnt(26099,20814,"ide_methods.bas");if(r)goto S_60797;} +if(qbevent){evnt(26099,20821,"ide_methods.bas");if(r)goto S_60802;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20814,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20821,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END FUNCTION",12)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20814,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20821,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20814,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20821,"ide_methods.bas");}while(r); } -S_60802:; +S_60807:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 )),qbs_new_txt_len("IF",2))))||new_error){ -if(qbevent){evnt(26099,20815,"ide_methods.bas");if(r)goto S_60802;} +if(qbevent){evnt(26099,20822,"ide_methods.bas");if(r)goto S_60807;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20822,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END IF",6)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20822,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20822,"ide_methods.bas");}while(r); } -S_60807:; +S_60812:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 6 )),qbs_new_txt_len("SELECT",6))))||new_error){ -if(qbevent){evnt(26099,20816,"ide_methods.bas");if(r)goto S_60807;} +if(qbevent){evnt(26099,20823,"ide_methods.bas");if(r)goto S_60812;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20816,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20823,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END SELECT",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20816,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20823,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20816,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20823,"ide_methods.bas");}while(r); } -S_60812:; +S_60817:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("SUB",3))))||new_error){ -if(qbevent){evnt(26099,20817,"ide_methods.bas");if(r)goto S_60812;} +if(qbevent){evnt(26099,20824,"ide_methods.bas");if(r)goto S_60817;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20824,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END SUB",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20824,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20817,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20824,"ide_methods.bas");}while(r); } -S_60817:; +S_60822:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("TYPE",4))))||new_error){ -if(qbevent){evnt(26099,20818,"ide_methods.bas");if(r)goto S_60817;} +if(qbevent){evnt(26099,20825,"ide_methods.bas");if(r)goto S_60822;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20825,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END TYPE",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20825,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20825,"ide_methods.bas");}while(r); } sc_ec_516_end:; sc_6762_var=-1; } -S_60822:; +S_60827:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT",4))))||new_error){ -if(qbevent){evnt(26099,20819,"ide_methods.bas");if(r)goto S_60822;} -S_60823:; +if(qbevent){evnt(26099,20826,"ide_methods.bas");if(r)goto S_60827;} +S_60828:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("CASE",4))))||new_error){ -if(qbevent){evnt(26099,20820,"ide_methods.bas");if(r)goto S_60823;} +if(qbevent){evnt(26099,20827,"ide_methods.bas");if(r)goto S_60828;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20820,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20827,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT CASE",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20820,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20827,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20820,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20827,"ide_methods.bas");}while(r); } -S_60828:; +S_60833:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 )),qbs_new_txt_len("DO",2))))||new_error){ -if(qbevent){evnt(26099,20821,"ide_methods.bas");if(r)goto S_60828;} +if(qbevent){evnt(26099,20828,"ide_methods.bas");if(r)goto S_60833;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20821,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20828,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT DO",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20821,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20828,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20821,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20828,"ide_methods.bas");}while(r); } -S_60833:; +S_60838:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("FOR",3))))||new_error){ -if(qbevent){evnt(26099,20822,"ide_methods.bas");if(r)goto S_60833;} +if(qbevent){evnt(26099,20829,"ide_methods.bas");if(r)goto S_60838;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20822,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20829,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT FOR",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20822,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20829,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20822,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20829,"ide_methods.bas");}while(r); } -S_60838:; +S_60843:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 )),qbs_new_txt_len("FUNCTION",8))))||new_error){ -if(qbevent){evnt(26099,20823,"ide_methods.bas");if(r)goto S_60838;} +if(qbevent){evnt(26099,20830,"ide_methods.bas");if(r)goto S_60843;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20823,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20830,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT FUNCTION",13)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20823,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20830,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20823,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20830,"ide_methods.bas");}while(r); } -S_60843:; +S_60848:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 6 )),qbs_new_txt_len("SELECT",6))))||new_error){ -if(qbevent){evnt(26099,20824,"ide_methods.bas");if(r)goto S_60843;} +if(qbevent){evnt(26099,20831,"ide_methods.bas");if(r)goto S_60848;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20831,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT SELECT",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20831,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20831,"ide_methods.bas");}while(r); } -S_60848:; +S_60853:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("SUB",3))))||new_error){ -if(qbevent){evnt(26099,20825,"ide_methods.bas");if(r)goto S_60848;} +if(qbevent){evnt(26099,20832,"ide_methods.bas");if(r)goto S_60853;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20825,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20832,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT SUB",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20825,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20832,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20825,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20832,"ide_methods.bas");}while(r); } -S_60853:; +S_60858:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("WHILE",5))))||new_error){ -if(qbevent){evnt(26099,20826,"ide_methods.bas");if(r)goto S_60853;} +if(qbevent){evnt(26099,20833,"ide_methods.bas");if(r)goto S_60858;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20826,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20833,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT WHILE",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20826,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20833,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20826,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20833,"ide_methods.bas");}while(r); } sc_ec_517_end:; sc_6762_var=-1; } -S_60858:; +S_60863:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("GET",3))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PUT",3))))||new_error){ -if(qbevent){evnt(26099,20827,"ide_methods.bas");if(r)goto S_60858;} -S_60859:; +if(qbevent){evnt(26099,20834,"ide_methods.bas");if(r)goto S_60863;} +S_60864:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 1 ),qbs_new_txt_len("#",1))))||new_error){ -if(qbevent){evnt(26099,20827,"ide_methods.bas");if(r)goto S_60859;} +if(qbevent){evnt(26099,20834,"ide_methods.bas");if(r)goto S_60864;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (general)",10))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20827,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20834,"ide_methods.bas");}while(r); } sc_ec_518_end:; sc_6762_var=-1; } -S_60862:; +S_60867:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("KEY",3))))||new_error){ -if(qbevent){evnt(26099,20828,"ide_methods.bas");if(r)goto S_60862;} -S_60863:; +if(qbevent){evnt(26099,20835,"ide_methods.bas");if(r)goto S_60867;} +S_60868:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("LIST",4))))||new_error){ -if(qbevent){evnt(26099,20828,"ide_methods.bas");if(r)goto S_60863;} +if(qbevent){evnt(26099,20835,"ide_methods.bas");if(r)goto S_60868;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20828,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20835,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("KEY LIST",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20828,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20835,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20828,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20835,"ide_methods.bas");}while(r); } sc_ec_519_end:; sc_6762_var=-1; } -S_60868:; +S_60873:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LPRINT",6))))||new_error){ -if(qbevent){evnt(26099,20829,"ide_methods.bas");if(r)goto S_60868;} -S_60869:; +if(qbevent){evnt(26099,20836,"ide_methods.bas");if(r)goto S_60873;} +S_60874:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||new_error){ -if(qbevent){evnt(26099,20829,"ide_methods.bas");if(r)goto S_60869;} +if(qbevent){evnt(26099,20836,"ide_methods.bas");if(r)goto S_60874;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20829,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LPRINT USING",12)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20829,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20829,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); } sc_ec_520_end:; sc_6762_var=-1; } -S_60874:; +S_60879:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LINE",4))))||new_error){ -if(qbevent){evnt(26099,20830,"ide_methods.bas");if(r)goto S_60874;} -S_60875:; +if(qbevent){evnt(26099,20837,"ide_methods.bas");if(r)goto S_60879;} +S_60880:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("INPUT",5))))||new_error){ -if(qbevent){evnt(26099,20831,"ide_methods.bas");if(r)goto S_60875;} +if(qbevent){evnt(26099,20838,"ide_methods.bas");if(r)goto S_60880;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20832,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20839,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LINE INPUT",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20832,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20839,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20832,"ide_methods.bas");}while(r); -S_60879:; +if(!qbevent)break;evnt(26099,20839,"ide_methods.bas");}while(r); +S_60884:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(qbs_ltrim(func_mid(_SUB_EXPORTCODEAS_STRING_LA, 6 ,NULL,0)), 1 ),qbs_new_txt_len("#",1))))||new_error){ -if(qbevent){evnt(26099,20833,"ide_methods.bas");if(r)goto S_60879;} +if(qbevent){evnt(26099,20840,"ide_methods.bas");if(r)goto S_60884;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (file statement)",17))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20833,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20840,"ide_methods.bas");}while(r); } } sc_ec_521_end:; sc_6762_var=-1; } -S_60883:; +S_60888:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LOOP",4))))||new_error){ -if(qbevent){evnt(26099,20835,"ide_methods.bas");if(r)goto S_60883;} -S_60884:; +if(qbevent){evnt(26099,20842,"ide_methods.bas");if(r)goto S_60888;} +S_60889:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("WHILE",5))))||new_error){ -if(qbevent){evnt(26099,20836,"ide_methods.bas");if(r)goto S_60884;} +if(qbevent){evnt(26099,20843,"ide_methods.bas");if(r)goto S_60889;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO...LOOP",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20836,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); } -S_60891:; +S_60896:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("UNTIL",5))))||new_error){ -if(qbevent){evnt(26099,20837,"ide_methods.bas");if(r)goto S_60891;} +if(qbevent){evnt(26099,20844,"ide_methods.bas");if(r)goto S_60896;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20837,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO...LOOP",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20837,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26099,20837,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26099,20837,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20837,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); } sc_ec_522_end:; sc_6762_var=-1; } -S_60898:; +S_60903:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON",2))))||new_error){ -if(qbevent){evnt(26099,20838,"ide_methods.bas");if(r)goto S_60898;} -S_60899:; +if(qbevent){evnt(26099,20845,"ide_methods.bas");if(r)goto S_60903;} +S_60904:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("ERROR",5))))||new_error){ -if(qbevent){evnt(26099,20839,"ide_methods.bas");if(r)goto S_60899;} +if(qbevent){evnt(26099,20846,"ide_methods.bas");if(r)goto S_60904;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20839,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20846,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON ERROR",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20839,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20846,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20839,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20846,"ide_methods.bas");}while(r); } -S_60904:; +S_60909:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("KEY",3))))||new_error){ -if(qbevent){evnt(26099,20840,"ide_methods.bas");if(r)goto S_60904;} +if(qbevent){evnt(26099,20847,"ide_methods.bas");if(r)goto S_60909;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20840,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20847,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON KEY(n)",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20840,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20847,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20840,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20847,"ide_methods.bas");}while(r); } -S_60909:; +S_60914:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("STRIG",5))))||new_error){ -if(qbevent){evnt(26099,20841,"ide_methods.bas");if(r)goto S_60909;} +if(qbevent){evnt(26099,20848,"ide_methods.bas");if(r)goto S_60914;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20841,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20848,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON STRIG(n)",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20841,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20848,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20841,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20848,"ide_methods.bas");}while(r); } -S_60914:; +S_60919:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("TIMER",5))))||new_error){ -if(qbevent){evnt(26099,20842,"ide_methods.bas");if(r)goto S_60914;} +if(qbevent){evnt(26099,20849,"ide_methods.bas");if(r)goto S_60919;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20842,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20849,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON TIMER(n)",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20842,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20849,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20842,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20849,"ide_methods.bas");}while(r); } sc_ec_523_end:; sc_6762_var=-1; } -S_60919:; +S_60924:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPTION",6))))||new_error){ -if(qbevent){evnt(26099,20843,"ide_methods.bas");if(r)goto S_60919;} -S_60920:; +if(qbevent){evnt(26099,20850,"ide_methods.bas");if(r)goto S_60924;} +S_60925:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("BASE",4))))||new_error){ -if(qbevent){evnt(26099,20843,"ide_methods.bas");if(r)goto S_60920;} +if(qbevent){evnt(26099,20850,"ide_methods.bas");if(r)goto S_60925;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20850,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPTION BASE",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20850,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20850,"ide_methods.bas");}while(r); } sc_ec_524_end:; sc_6762_var=-1; } -S_60925:; +S_60930:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PALETTE",7))))||new_error){ -if(qbevent){evnt(26099,20844,"ide_methods.bas");if(r)goto S_60925;} -S_60926:; +if(qbevent){evnt(26099,20851,"ide_methods.bas");if(r)goto S_60930;} +S_60931:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||new_error){ -if(qbevent){evnt(26099,20844,"ide_methods.bas");if(r)goto S_60926;} +if(qbevent){evnt(26099,20851,"ide_methods.bas");if(r)goto S_60931;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20851,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PALETTE USING",13)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20851,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20844,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20851,"ide_methods.bas");}while(r); } sc_ec_525_end:; sc_6762_var=-1; } -S_60931:; +S_60936:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PRINT",5))))||new_error){ -if(qbevent){evnt(26099,20845,"ide_methods.bas");if(r)goto S_60931;} -S_60932:; +if(qbevent){evnt(26099,20852,"ide_methods.bas");if(r)goto S_60936;} +S_60937:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||new_error){ -if(qbevent){evnt(26099,20846,"ide_methods.bas");if(r)goto S_60932;} +if(qbevent){evnt(26099,20853,"ide_methods.bas");if(r)goto S_60937;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20847,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20854,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PRINT USING",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20847,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20854,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20847,"ide_methods.bas");}while(r); -S_60936:; +if(!qbevent)break;evnt(26099,20854,"ide_methods.bas");}while(r); +S_60941:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(qbs_ltrim(func_mid(_SUB_EXPORTCODEAS_STRING_LA, 6 ,NULL,0)), 1 ),qbs_new_txt_len("#",1))))||new_error){ -if(qbevent){evnt(26099,20848,"ide_methods.bas");if(r)goto S_60936;} +if(qbevent){evnt(26099,20855,"ide_methods.bas");if(r)goto S_60941;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (file statement)",17))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20848,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20855,"ide_methods.bas");}while(r); } } sc_ec_526_end:; sc_6762_var=-1; } -S_60940:; +S_60945:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("RANDOMIZE",9))))||new_error){ -if(qbevent){evnt(26099,20850,"ide_methods.bas");if(r)goto S_60940;} -S_60941:; +if(qbevent){evnt(26099,20857,"ide_methods.bas");if(r)goto S_60945;} +S_60946:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||new_error){ -if(qbevent){evnt(26099,20850,"ide_methods.bas");if(r)goto S_60941;} +if(qbevent){evnt(26099,20857,"ide_methods.bas");if(r)goto S_60946;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20857,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("RANDOMIZE USING",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20857,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20857,"ide_methods.bas");}while(r); } sc_ec_527_end:; sc_6762_var=-1; } -S_60946:; +S_60951:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SELECT",6))))||new_error){ -if(qbevent){evnt(26099,20851,"ide_methods.bas");if(r)goto S_60946;} -S_60947:; +if(qbevent){evnt(26099,20858,"ide_methods.bas");if(r)goto S_60951;} +S_60952:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("CASE",4))))||new_error){ -if(qbevent){evnt(26099,20852,"ide_methods.bas");if(r)goto S_60947;} +if(qbevent){evnt(26099,20859,"ide_methods.bas");if(r)goto S_60952;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20859,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SELECT CASE",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20859,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20859,"ide_methods.bas");}while(r); } -S_60952:; +S_60957:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 9 )),qbs_new_txt_len("EVERYCASE",9))))||new_error){ -if(qbevent){evnt(26099,20853,"ide_methods.bas");if(r)goto S_60952;} +if(qbevent){evnt(26099,20860,"ide_methods.bas");if(r)goto S_60957;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 9 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20853,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20860,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SELECT CASE",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20853,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20860,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20853,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20860,"ide_methods.bas");}while(r); } sc_ec_528_end:; sc_6762_var=-1; } -S_60957:; +S_60962:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("VIEW",4))))||new_error){ -if(qbevent){evnt(26099,20854,"ide_methods.bas");if(r)goto S_60957;} -S_60958:; +if(qbevent){evnt(26099,20861,"ide_methods.bas");if(r)goto S_60962;} +S_60963:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("PRINT",5))))||new_error){ -if(qbevent){evnt(26099,20854,"ide_methods.bas");if(r)goto S_60958;} +if(qbevent){evnt(26099,20861,"ide_methods.bas");if(r)goto S_60963;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len(" ",1)),qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20854,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20861,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("VIEW PRINT",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20854,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20861,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26099,20854,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20861,"ide_methods.bas");}while(r); } sc_ec_529_end:; sc_6762_var=-1; } -S_60963:; +S_60968:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("INPUT",5))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PRINT",5))||qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("WRITE",5))))||new_error){ -if(qbevent){evnt(26099,20855,"ide_methods.bas");if(r)goto S_60963;} -S_60964:; +if(qbevent){evnt(26099,20862,"ide_methods.bas");if(r)goto S_60968;} +S_60969:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 1 ),qbs_new_txt_len("#",1))))||new_error){ -if(qbevent){evnt(26099,20855,"ide_methods.bas");if(r)goto S_60964;} +if(qbevent){evnt(26099,20862,"ide_methods.bas");if(r)goto S_60969;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (file statement)",17))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20855,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20862,"ide_methods.bas");}while(r); } sc_ec_530_end:; } @@ -206918,560 +206934,560 @@ sc_6762_end:; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20858,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20865,"ide_methods.bas");}while(r); LABEL_WRITELINK:; -if(qbevent){evnt(26099,20860,"ide_methods.bas");r=0;} -S_60970:; +if(qbevent){evnt(26099,20867,"ide_methods.bas");r=0;} +S_60975:; if ((qbs_cleanup(qbs_tmp_base,(*_SUB_EXPORTCODEAS_INTEGER_ME&(qbs_equal(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0))))|(*_SUB_EXPORTCODEAS_INTEGER_KW&(qbs_equal(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0))))))||new_error){ -if(qbevent){evnt(26099,20861,"ide_methods.bas");if(r)goto S_60970;} +if(qbevent){evnt(26099,20868,"ide_methods.bas");if(r)goto S_60975;} do{ goto LABEL_UNKNOWNNOLINKNOCOLOR; -if(!qbevent)break;evnt(26099,20861,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20868,"ide_methods.bas");}while(r); } -S_60973:; +S_60978:; if ((*_SUB_EXPORTCODEAS_INTEGER_CU)||new_error){ -if(qbevent){evnt(26099,20862,"ide_methods.bas");if(r)goto S_60973;} +if(qbevent){evnt(26099,20869,"ide_methods.bas");if(r)goto S_60978;} do{ goto LABEL_CUSTOMNOLINK; -if(!qbevent)break;evnt(26099,20862,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20869,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=226; if (next_return_point>=return_points) more_return_points(); goto LABEL_FINDWIKIPAGE; RETURN_226:; -if(!qbevent)break;evnt(26099,20863,"ide_methods.bas");}while(r); -S_60977:; +if(!qbevent)break;evnt(26099,20870,"ide_methods.bas");}while(r); +S_60982:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME&*_SUB_EXPORTCODEAS_INTEGER_LE&*_SUB_EXPORTCODEAS_INTEGER_CO)||new_error){ -if(qbevent){evnt(26099,20864,"ide_methods.bas");if(r)goto S_60977;} +if(qbevent){evnt(26099,20871,"ide_methods.bas");if(r)goto S_60982;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26099,20864,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20871,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_WHAT,qbs_new_txt_len("co",2)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20864,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20871,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=227; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_227:; -if(!qbevent)break;evnt(26099,20864,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20871,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(26099,20864,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20871,"ide_methods.bas");}while(r); } -S_60983:; +S_60988:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26099,20865,"ide_methods.bas");if(r)goto S_60983;} +if(qbevent){evnt(26099,20872,"ide_methods.bas");if(r)goto S_60988;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LNK,_SUB_EXPORTCODEAS_STRING_ME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20865,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20872,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LNK,_SUB_EXPORTCODEAS_STRING_KW); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20865,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20872,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_PAL=_SUB_EXPORTCODEAS_STRING_PAGE->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20866,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20873,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LKL=_SUB_EXPORTCODEAS_STRING_LNK->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20866,"ide_methods.bas");}while(r); -S_60990:; +if(!qbevent)break;evnt(26099,20873,"ide_methods.bas");}while(r); +S_60995:; qbs_set(sc_6765,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20867,"ide_methods.bas");if(r)goto S_60990;} -S_60991:; +if(qbevent){evnt(26099,20874,"ide_methods.bas");if(r)goto S_60995;} +S_60996:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6765,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20868,"ide_methods.bas");if(r)goto S_60991;} -S_60992:; +if(qbevent){evnt(26099,20875,"ide_methods.bas");if(r)goto S_60996;} +S_60997:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26099,20869,"ide_methods.bas");if(r)goto S_60992;} +if(qbevent){evnt(26099,20876,"ide_methods.bas");if(r)goto S_60997;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_MEC); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20869,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20876,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_KWC); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20869,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20876,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,( 2 **_SUB_EXPORTCODEAS_INTEGER_PAL)+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 120 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("",4)),1); -if(!qbevent)break;evnt(26099,20870,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20877,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+( 2 **_SUB_EXPORTCODEAS_INTEGER_PAL)+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 120 ; -if(!qbevent)break;evnt(26099,20871,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20878,"ide_methods.bas");}while(r); sc_ec_531_end:; goto sc_6765_end; } -S_60999:; +S_61004:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6765,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20872,"ide_methods.bas");if(r)goto S_60999;} -S_61000:; +if(qbevent){evnt(26099,20879,"ide_methods.bas");if(r)goto S_61004;} +S_61005:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26099,20873,"ide_methods.bas");if(r)goto S_61000;} +if(qbevent){evnt(26099,20880,"ide_methods.bas");if(r)goto S_61005;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("\\cf2",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20873,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20880,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("\\cf3",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20873,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20880,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 108 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("{\\field{\\*\\fldinst HYPERLINK ",29),func_chr( 34 )),qbs_new_txt_len("https://qb64phoenix.com/qb64wiki/index.php?title=",49)),_SUB_EXPORTCODEAS_STRING_PAGE),func_chr( 34 )),qbs_new_txt_len("}{\\fldrslt{",11)),_SUB_EXPORTCODEAS_STRING_LKC),qbs_new_txt_len("\\ul0 ",5)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}}\\cf0 ",8)),1); -if(!qbevent)break;evnt(26099,20874,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20881,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 108 ; -if(!qbevent)break;evnt(26099,20875,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20882,"ide_methods.bas");}while(r); sc_ec_532_end:; goto sc_6765_end; } -S_61007:; +S_61012:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6765,qbs_new_txt_len("foru",4))))||new_error){ -if(qbevent){evnt(26099,20876,"ide_methods.bas");if(r)goto S_61007;} -S_61008:; +if(qbevent){evnt(26099,20883,"ide_methods.bas");if(r)goto S_61012;} +S_61013:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26099,20877,"ide_methods.bas");if(r)goto S_61008;} +if(qbevent){evnt(26099,20884,"ide_methods.bas");if(r)goto S_61013;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("#55FF55",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20877,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20884,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("#4593D8",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20877,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20884,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 84 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("[url=https://qb64phoenix.com/qb64wiki/index.php?title=",54),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("][color=",8)),_SUB_EXPORTCODEAS_STRING_LKC),qbs_new_txt_len("]",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("[/color][/url]",14)),1); -if(!qbevent)break;evnt(26099,20878,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20885,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 84 ; -if(!qbevent)break;evnt(26099,20879,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20886,"ide_methods.bas");}while(r); sc_ec_533_end:; goto sc_6765_end; } -S_61015:; +S_61020:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6765,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20880,"ide_methods.bas");if(r)goto S_61015;} -S_61016:; +if(qbevent){evnt(26099,20887,"ide_methods.bas");if(r)goto S_61020;} +S_61021:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26099,20881,"ide_methods.bas");if(r)goto S_61016;} +if(qbevent){evnt(26099,20888,"ide_methods.bas");if(r)goto S_61021;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("{{Cm|",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20881,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20888,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("{{Cl|",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20881,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20888,"ide_methods.bas");}while(r); } -S_61021:; +S_61026:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_EXPORTCODEAS_STRING_PAGE),qbs_ucase(_SUB_EXPORTCODEAS_STRING_LNK))))||new_error){ -if(qbevent){evnt(26099,20882,"ide_methods.bas");if(r)goto S_61021;} +if(qbevent){evnt(26099,20889,"ide_methods.bas");if(r)goto S_61026;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_LKL+ 7 ,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}",2)),1); -if(!qbevent)break;evnt(26099,20883,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20890,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 7 ; -if(!qbevent)break;evnt(26099,20884,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20891,"ide_methods.bas");}while(r); }else{ do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 8 ,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("|",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}",2)),1); -if(!qbevent)break;evnt(26099,20886,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20893,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 8 ; -if(!qbevent)break;evnt(26099,20887,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20894,"ide_methods.bas");}while(r); } sc_ec_534_end:; goto sc_6765_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20889,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20896,"ide_methods.bas");}while(r); sc_6765_end:; do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20891,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20898,"ide_methods.bas");}while(r); LABEL_CUSTOMNOLINK:; -if(qbevent){evnt(26099,20893,"ide_methods.bas");r=0;} +if(qbevent){evnt(26099,20900,"ide_methods.bas");r=0;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; -if(!qbevent)break;evnt(26099,20894,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20901,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_KWL=_SUB_EXPORTCODEAS_STRING_KW->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20894,"ide_methods.bas");}while(r); -S_61034:; +if(!qbevent)break;evnt(26099,20901,"ide_methods.bas");}while(r); +S_61039:; qbs_set(sc_6767,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20895,"ide_methods.bas");if(r)goto S_61034;} -S_61035:; +if(qbevent){evnt(26099,20902,"ide_methods.bas");if(r)goto S_61039;} +S_61040:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20896,"ide_methods.bas");if(r)goto S_61035;} +if(qbevent){evnt(26099,20903,"ide_methods.bas");if(r)goto S_61040;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,FUNC_STRREPLACE(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("&",1),qbs_new_txt_len("&",5))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20897,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20904,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_KWL=_SUB_EXPORTCODEAS_STRING_KW->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20897,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20904,"ide_methods.bas");}while(r); do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_KWL+ 37 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1)),_SUB_EXPORTCODEAS_STRING_KW),qbs_new_txt_len("",7)),1); -if(!qbevent)break;evnt(26099,20898,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20905,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 37 ; -if(!qbevent)break;evnt(26099,20899,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20906,"ide_methods.bas");}while(r); sc_ec_535_end:; goto sc_6767_end; } -S_61040:; +S_61045:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20900,"ide_methods.bas");if(r)goto S_61040;} +if(qbevent){evnt(26099,20907,"ide_methods.bas");if(r)goto S_61045;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_KWL+ 10 ,qbs_add(qbs_add(qbs_new_txt_len("\\cf2 ",5),_SUB_EXPORTCODEAS_STRING_KW),qbs_new_txt_len("\\cf0 ",5)),1); -if(!qbevent)break;evnt(26099,20901,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20908,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 10 ; -if(!qbevent)break;evnt(26099,20902,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20909,"ide_methods.bas");}while(r); sc_ec_536_end:; goto sc_6767_end; } -S_61043:; +S_61048:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("foru",4))))||new_error){ -if(qbevent){evnt(26099,20903,"ide_methods.bas");if(r)goto S_61043;} +if(qbevent){evnt(26099,20910,"ide_methods.bas");if(r)goto S_61048;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_KWL+ 23 ,qbs_add(qbs_add(qbs_new_txt_len("[color=#55FF55]",15),_SUB_EXPORTCODEAS_STRING_KW),qbs_new_txt_len("[/color]",8)),1); -if(!qbevent)break;evnt(26099,20904,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20911,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 23 ; -if(!qbevent)break;evnt(26099,20905,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20912,"ide_methods.bas");}while(r); sc_ec_537_end:; goto sc_6767_end; } -S_61046:; +S_61051:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20906,"ide_methods.bas");if(r)goto S_61046;} +if(qbevent){evnt(26099,20913,"ide_methods.bas");if(r)goto S_61051;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_KWL+ 17 ,qbs_add(qbs_add(qbs_new_txt_len("{{Text|",7),_SUB_EXPORTCODEAS_STRING_KW),qbs_new_txt_len("|#55FF55}}",10)),1); -if(!qbevent)break;evnt(26099,20907,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20914,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 17 ; -if(!qbevent)break;evnt(26099,20908,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20915,"ide_methods.bas");}while(r); sc_ec_538_end:; goto sc_6767_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20909,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20916,"ide_methods.bas");}while(r); sc_6767_end:; do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20911,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20918,"ide_methods.bas");}while(r); LABEL_UNKNOWNNOLINKNOCOLOR:; -if(qbevent){evnt(26099,20913,"ide_methods.bas");r=0;} -S_61053:; +if(qbevent){evnt(26099,20920,"ide_methods.bas");r=0;} +S_61058:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT),qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20914,"ide_methods.bas");if(r)goto S_61053;} +if(qbevent){evnt(26099,20921,"ide_methods.bas");if(r)goto S_61058;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_VERI,FUNC_STRREPLACE(_SUB_EXPORTCODEAS_STRING_VERI,qbs_new_txt_len("&",1),qbs_new_txt_len("&",5))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20914,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20921,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_VERI->len,_SUB_EXPORTCODEAS_STRING_VERI,1); -if(!qbevent)break;evnt(26099,20915,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20922,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_VERI->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20915,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20922,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_VERI,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20915,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20922,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20916,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20923,"ide_methods.bas");}while(r); LABEL_ESCAPECHAR:; -if(qbevent){evnt(26099,20918,"ide_methods.bas");r=0;} -S_61060:; +if(qbevent){evnt(26099,20925,"ide_methods.bas");r=0;} +S_61065:; qbs_set(sc_6771,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20919,"ide_methods.bas");if(r)goto S_61060;} -S_61061:; +if(qbevent){evnt(26099,20926,"ide_methods.bas");if(r)goto S_61065;} +S_61066:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6771,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26099,20920,"ide_methods.bas");if(r)goto S_61061;} -S_61062:; -if(qbevent){evnt(26099,20921,"ide_methods.bas");if(r)goto S_61062;} -S_61063:; +if(qbevent){evnt(26099,20927,"ide_methods.bas");if(r)goto S_61066;} +S_61067:; +if(qbevent){evnt(26099,20928,"ide_methods.bas");if(r)goto S_61067;} +S_61068:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||new_error){ -if(qbevent){evnt(26099,20922,"ide_methods.bas");if(r)goto S_61063;} +if(qbevent){evnt(26099,20929,"ide_methods.bas");if(r)goto S_61068;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(""",6)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20922,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20929,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20922,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20929,"ide_methods.bas");}while(r); sc_ec_539_end:; goto sc_6772_end; } -S_61066:; +S_61071:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||new_error){ -if(qbevent){evnt(26099,20923,"ide_methods.bas");if(r)goto S_61066;} +if(qbevent){evnt(26099,20930,"ide_methods.bas");if(r)goto S_61071;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("&",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20923,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20930,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20923,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20930,"ide_methods.bas");}while(r); sc_ec_540_end:; goto sc_6772_end; } -S_61069:; +S_61074:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 60 )))||new_error){ -if(qbevent){evnt(26099,20924,"ide_methods.bas");if(r)goto S_61069;} +if(qbevent){evnt(26099,20931,"ide_methods.bas");if(r)goto S_61074;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("<",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20924,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20931,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20924,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20931,"ide_methods.bas");}while(r); sc_ec_541_end:; goto sc_6772_end; } -S_61072:; +S_61077:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 62 )))||new_error){ -if(qbevent){evnt(26099,20925,"ide_methods.bas");if(r)goto S_61072;} +if(qbevent){evnt(26099,20932,"ide_methods.bas");if(r)goto S_61077;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(">",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20925,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20932,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20925,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20932,"ide_methods.bas");}while(r); sc_ec_542_end:; goto sc_6772_end; } -S_61075:; +S_61080:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26099,20926,"ide_methods.bas");if(r)goto S_61075;} +if(qbevent){evnt(26099,20933,"ide_methods.bas");if(r)goto S_61080;} do{ *_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); -if(!qbevent)break;evnt(26099,20927,"ide_methods.bas");}while(r); -S_61077:; +if(!qbevent)break;evnt(26099,20934,"ide_methods.bas");}while(r); +S_61082:; if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||new_error){ -if(qbevent){evnt(26099,20928,"ide_methods.bas");if(r)goto S_61077;} +if(qbevent){evnt(26099,20935,"ide_methods.bas");if(r)goto S_61082;} do{ *_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; -if(!qbevent)break;evnt(26099,20928,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20935,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,FUNC_UNICODETOUTF8CHAR(_SUB_EXPORTCODEAS_LONG_UNI)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20929,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20936,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20929,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20936,"ide_methods.bas");}while(r); sc_ec_543_end:; goto sc_6772_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20930,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20937,"ide_methods.bas");}while(r); sc_6772_end:; sc_ec_544_end:; goto sc_6771_end; } -S_61085:; +S_61090:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6771,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20932,"ide_methods.bas");if(r)goto S_61085;} -S_61086:; -if(qbevent){evnt(26099,20933,"ide_methods.bas");if(r)goto S_61086;} -S_61087:; +if(qbevent){evnt(26099,20939,"ide_methods.bas");if(r)goto S_61090;} +S_61091:; +if(qbevent){evnt(26099,20940,"ide_methods.bas");if(r)goto S_61091;} +S_61092:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 92 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||new_error){ -if(qbevent){evnt(26099,20934,"ide_methods.bas");if(r)goto S_61087;} +if(qbevent){evnt(26099,20941,"ide_methods.bas");if(r)goto S_61092;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20934,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20941,"ide_methods.bas");}while(r); sc_ec_545_end:; goto sc_6773_end; } -S_61089:; +S_61094:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26099,20935,"ide_methods.bas");if(r)goto S_61089;} +if(qbevent){evnt(26099,20942,"ide_methods.bas");if(r)goto S_61094;} do{ *_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); -if(!qbevent)break;evnt(26099,20936,"ide_methods.bas");}while(r); -S_61091:; +if(!qbevent)break;evnt(26099,20943,"ide_methods.bas");}while(r); +S_61096:; if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||new_error){ -if(qbevent){evnt(26099,20937,"ide_methods.bas");if(r)goto S_61091;} +if(qbevent){evnt(26099,20944,"ide_methods.bas");if(r)goto S_61096;} do{ *_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; -if(!qbevent)break;evnt(26099,20937,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20944,"ide_methods.bas");}while(r); } do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_add(qbs_add(qbs_new_txt_len("\\u",2),qbs_ltrim(qbs_str((int32)(*_SUB_EXPORTCODEAS_LONG_UNI)))),qbs_new_txt_len("\\'bf",4))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20938,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20945,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20938,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20945,"ide_methods.bas");}while(r); sc_ec_546_end:; goto sc_6773_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20939,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20946,"ide_methods.bas");}while(r); sc_6773_end:; sc_ec_547_end:; goto sc_6771_end; } -S_61099:; +S_61104:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6771,qbs_new_txt_len("foru",4))||qbs_equal(sc_6771,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26099,20941,"ide_methods.bas");if(r)goto S_61099;} -S_61100:; -if(qbevent){evnt(26099,20942,"ide_methods.bas");if(r)goto S_61100;} -S_61101:; +if(qbevent){evnt(26099,20948,"ide_methods.bas");if(r)goto S_61104;} +S_61105:; +if(qbevent){evnt(26099,20949,"ide_methods.bas");if(r)goto S_61105;} +S_61106:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26099,20943,"ide_methods.bas");if(r)goto S_61101;} +if(qbevent){evnt(26099,20950,"ide_methods.bas");if(r)goto S_61106;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_add(qbs_add(qbs_new_txt_len("&#",2),qbs_ltrim(qbs_str((int16)(*_SUB_EXPORTCODEAS_INTEGER_CURR)))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20943,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20950,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26099,20943,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20950,"ide_methods.bas");}while(r); sc_ec_548_end:; goto sc_6774_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20944,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20951,"ide_methods.bas");}while(r); sc_6774_end:; sc_ec_549_end:; goto sc_6771_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20946,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20953,"ide_methods.bas");}while(r); sc_6771_end:; do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_ECH->len,_SUB_EXPORTCODEAS_STRING_ECH,1); -if(!qbevent)break;evnt(26099,20948,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20955,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_ECH->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20948,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20955,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20949,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20956,"ide_methods.bas");}while(r); LABEL_ENDLINEOPS:; -if(qbevent){evnt(26099,20951,"ide_methods.bas");r=0;} -S_61113:; +if(qbevent){evnt(26099,20958,"ide_methods.bas");r=0;} +S_61118:; qbs_set(sc_6777,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26099,20952,"ide_methods.bas");if(r)goto S_61113;} -S_61114:; +if(qbevent){evnt(26099,20959,"ide_methods.bas");if(r)goto S_61118;} +S_61119:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6777,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26099,20953,"ide_methods.bas");if(r)goto S_61114;} +if(qbevent){evnt(26099,20960,"ide_methods.bas");if(r)goto S_61119;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\par",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20953,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20960,"ide_methods.bas");}while(r); sc_ec_550_end:; goto sc_6777_end; } do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20954,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20961,"ide_methods.bas");}while(r); sc_6777_end:; do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,_SUB_EXPORTCODEAS_STRING_TMP->len,_SUB_EXPORTCODEAS_STRING_TMP,1); -if(!qbevent)break;evnt(26099,20956,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20963,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_TMP->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20956,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20963,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20957,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20964,"ide_methods.bas");}while(r); LABEL_GETTHEMECOLORS:; -if(qbevent){evnt(26099,20959,"ide_methods.bas");r=0;} +if(qbevent){evnt(26099,20966,"ide_methods.bas");r=0;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TXC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDETEXTCOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20960,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20967,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("\\red",4),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDETEXTCOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDETEXTCOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDETEXTCOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20961,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20968,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_COC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDECOMMENTCOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20962,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20969,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\red",4)),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDECOMMENTCOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDECOMMENTCOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDECOMMENTCOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20963,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20970,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_MEC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDEMETACOMMANDCOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20964,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20971,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\red",4)),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDEMETACOMMANDCOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDEMETACOMMANDCOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDEMETACOMMANDCOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20965,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20972,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KWC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDEKEYWORDCOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20966,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20973,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\red",4)),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDEKEYWORDCOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDEKEYWORDCOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDEKEYWORDCOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20967,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20974,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_NUC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDENUMBERSCOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20968,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20975,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\red",4)),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDENUMBERSCOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDENUMBERSCOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDENUMBERSCOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20969,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20976,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_QUC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDEQUOTECOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20970,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20977,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\red",4)),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDEQUOTECOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDEQUOTECOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDEQUOTECOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20971,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20978,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_BGC,qbs_add(qbs_new_txt_len("#",1),qbs_right(func_hex(*__ULONG_IDEBACKGROUNDCOLOR,8), 6 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20972,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20979,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\red",4)),qbs_ltrim(qbs_str((int32)(func__red32(*__ULONG_IDEBACKGROUNDCOLOR))))),qbs_new_txt_len("\\green",6)),qbs_ltrim(qbs_str((int32)(func__green32(*__ULONG_IDEBACKGROUNDCOLOR))))),qbs_new_txt_len("\\blue",5)),qbs_ltrim(qbs_str((int32)(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR))))),qbs_new_txt_len(";",1))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20973,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20980,"ide_methods.bas");}while(r); do{ #include "ret298.txt" -if(!qbevent)break;evnt(26099,20974,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20981,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free298.txt" @@ -207491,65 +207507,65 @@ new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; -S_61137:; +S_61142:; if ((-(*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE< 128 ))||new_error){ -if(qbevent){evnt(26099,20979,"ide_methods.bas");if(r)goto S_61137;} +if(qbevent){evnt(26099,20986,"ide_methods.bas");if(r)goto S_61142;} do{ qbs_set(_FUNC_UNICODETOUTF8CHAR_STRING_UNICODETOUTF8CHAR,func_chr(*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20981,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20988,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_UNICODETOUTF8CHAR_STRING_UTF,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20984,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20991,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC=*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE; -if(!qbevent)break;evnt(26099,20984,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20991,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST= 128 ; -if(!qbevent)break;evnt(26099,20985,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20992,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN= 63 ; -if(!qbevent)break;evnt(26099,20985,"ide_methods.bas");}while(r); -S_61144:; +if(!qbevent)break;evnt(26099,20992,"ide_methods.bas");}while(r); +S_61149:; do{ -if(qbevent){evnt(26099,20986,"ide_methods.bas");if(r)goto S_61144;} +if(qbevent){evnt(26099,20993,"ide_methods.bas");if(r)goto S_61149;} do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST= 128 |(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST/ 2 ); -if(!qbevent)break;evnt(26099,20987,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20994,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN=(*_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN/ 2 ); -if(!qbevent)break;evnt(26099,20987,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20994,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_CONTI= 128 |(*_FUNC_UNICODETOUTF8CHAR_LONG_UC& 63 ); -if(!qbevent)break;evnt(26099,20988,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20995,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC=*_FUNC_UNICODETOUTF8CHAR_LONG_UC/ 64 ; -if(!qbevent)break;evnt(26099,20988,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20995,"ide_methods.bas");}while(r); do{ qbs_set(_FUNC_UNICODETOUTF8CHAR_STRING_UTF,qbs_add(func_chr(*_FUNC_UNICODETOUTF8CHAR_INTEGER_CONTI),_FUNC_UNICODETOUTF8CHAR_STRING_UTF)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20989,"ide_methods.bas");}while(r); -S_61150:; +if(!qbevent)break;evnt(26099,20996,"ide_methods.bas");}while(r); +S_61155:; if ((-(*_FUNC_UNICODETOUTF8CHAR_LONG_UC<=*_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN))||new_error){ -if(qbevent){evnt(26099,20990,"ide_methods.bas");if(r)goto S_61150;} +if(qbevent){evnt(26099,20997,"ide_methods.bas");if(r)goto S_61155;} do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST=(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST|*_FUNC_UNICODETOUTF8CHAR_LONG_UC); -if(!qbevent)break;evnt(26099,20991,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20998,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC= 0 ; -if(!qbevent)break;evnt(26099,20991,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,20998,"ide_methods.bas");}while(r); } -S_61154:; +S_61159:; dl_continue_6780:; }while((!(-(*_FUNC_UNICODETOUTF8CHAR_LONG_UC== 0 )))&&(!new_error)); dl_exit_6780:; -if(qbevent){evnt(26099,20993,"ide_methods.bas");if(r)goto S_61154;} +if(qbevent){evnt(26099,21000,"ide_methods.bas");if(r)goto S_61159;} do{ qbs_set(_FUNC_UNICODETOUTF8CHAR_STRING_UNICODETOUTF8CHAR,qbs_add(func_chr(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST),_FUNC_UNICODETOUTF8CHAR_STRING_UTF)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20994,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,21001,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); @@ -207574,8 +207590,8 @@ if (new_error) goto exit_subfunc; do{ qbs_set(_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,20999,"ide_methods.bas");}while(r); -S_61158:; +if(!qbevent)break;evnt(26099,21006,"ide_methods.bas");}while(r); +S_61163:; fornext_value6783= 1 ; fornext_finalvalue6783=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->len; fornext_step6783= 1 ; @@ -207593,33 +207609,33 @@ if (fornext_value6783fornext_finalvalue6783) break; } fornext_error6783:; -if(qbevent){evnt(26099,21000,"ide_methods.bas");if(r)goto S_61158;} +if(qbevent){evnt(26099,21007,"ide_methods.bas");if(r)goto S_61163;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII=qbs_asc(_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT,*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,21002,"ide_methods.bas");}while(r); -S_61160:; +if(!qbevent)break;evnt(26099,21009,"ide_methods.bas");}while(r); +S_61165:; if ((-(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII> 127 ))||new_error){ -if(qbevent){evnt(26099,21003,"ide_methods.bas");if(r)goto S_61160;} +if(qbevent){evnt(26099,21010,"ide_methods.bas");if(r)goto S_61165;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE=func__mapunicode(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII); -if(!qbevent)break;evnt(26099,21005,"ide_methods.bas");}while(r); -S_61162:; +if(!qbevent)break;evnt(26099,21012,"ide_methods.bas");}while(r); +S_61167:; if ((-(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE== 0 ))||new_error){ -if(qbevent){evnt(26099,21007,"ide_methods.bas");if(r)goto S_61162;} +if(qbevent){evnt(26099,21014,"ide_methods.bas");if(r)goto S_61167;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE= 65533 ; -if(!qbevent)break;evnt(26099,21007,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,21014,"ide_methods.bas");}while(r); } do{ qbs_set(_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF,qbs_add(_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF,FUNC_UNICODETOUTF8CHAR(_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,21008,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,21015,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF,qbs_add(_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF,func_chr(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,21011,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,21018,"ide_methods.bas");}while(r); } fornext_continue_6782:; } @@ -207627,7 +207643,7 @@ fornext_exit_6782:; do{ qbs_set(_FUNC_ANSITEXTTOUTF8TEXT_STRING_ANSITEXTTOUTF8TEXT,_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26099,21014,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26099,21021,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free300.txt" diff --git a/internal/source/maindata.txt b/internal/source/maindata.txt index 0cae0a87e..f65426fe8 100644 --- a/internal/source/maindata.txt +++ b/internal/source/maindata.txt @@ -7926,5 +7926,4 @@ if(_FUNC_GETBYTES_LONG_GETBYTESPOSITION==NULL){ _FUNC_GETBYTES_LONG_GETBYTESPOSITION=(int32*)mem_static_malloc(4); *_FUNC_GETBYTES_LONG_GETBYTESPOSITION=0; } -if (!_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR)_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR=qbs_new(0,0); -if (!_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR)_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR=qbs_new(0,0); +if (!__STRING_DEFAULT_STARTDIR)__STRING_DEFAULT_STARTDIR=qbs_new(0,0); diff --git a/internal/source/mainfree.txt b/internal/source/mainfree.txt index d2d4b2da4..44681f8e7 100644 --- a/internal/source/mainfree.txt +++ b/internal/source/mainfree.txt @@ -1205,5 +1205,4 @@ free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_IDEACTIVITYBOX_ARRAY_STRING_FULLMESS qbs_free(_FUNC_IDEACTIVITYBOX_STRING_ALTLETTER); qbs_free(_SUB_GETINPUT_STRING_ASCVALUE); qbs_free(_FUNC_GETBYTES_STRING_PREVIOUSVALUE); -qbs_free(_FUNC_SAVEFILE_STRING_DEFAULT_STARTDIR); -qbs_free(_FUNC_OPENFILE_STRING_DEFAULT_STARTDIR); +qbs_free(__STRING_DEFAULT_STARTDIR);