From 64088c2b142f1c52fc3a08d5204c403b1a352215 Mon Sep 17 00:00:00 2001 From: "github-actions[bot]" <41898282+github-actions[bot]@users.noreply.github.com> Date: Tue, 28 Mar 2023 22:51:12 +0000 Subject: [PATCH] Automatic update of ./internal/source --- internal/source/data297.txt | 188 +- internal/source/data299.txt | 26 +- internal/source/free299.txt | 4 +- internal/source/main.txt | 3367 ++++++++++++++++++----------------- 4 files changed, 1845 insertions(+), 1740 deletions(-) diff --git a/internal/source/data297.txt b/internal/source/data297.txt index 4ac47de46..54fd48461 100644 --- a/internal/source/data297.txt +++ b/internal/source/data297.txt @@ -33,14 +33,26 @@ byte_element_struct *byte_element_6717=NULL; if (!byte_element_6717){ if ((mem_static_pointer+=12)tmp||_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->fixed||_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->readonly){ -oldstr6772=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT; -if (oldstr6772->cmem_descriptor){ -_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new_cmem(oldstr6772->len,0); +oldstr6777=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT; +if (oldstr6777->cmem_descriptor){ +_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new_cmem(oldstr6777->len,0); }else{ -_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new(oldstr6772->len,0); +_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new(oldstr6777->len,0); } -memcpy(_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->chr,oldstr6772->chr,oldstr6772->len); +memcpy(_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->chr,oldstr6777->chr,oldstr6777->len); } qbs *_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF=NULL; if (!_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF)_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF=qbs_new(0,0); @@ -17,13 +17,13 @@ if(_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI==NULL){ _FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI=(int32*)mem_static_malloc(4); *_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI=0; } -int64 fornext_value6774; -int64 fornext_finalvalue6774; -int64 fornext_step6774; -uint8 fornext_step_negative6774; -byte_element_struct *byte_element_6775=NULL; -if (!byte_element_6775){ -if ((mem_static_pointer+=12)fixed)qbs_set(oldstr6772,_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT); +if(oldstr6777){ +if(oldstr6777->fixed)qbs_set(oldstr6777,_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT); qbs_free(_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT); } qbs_free(_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF); diff --git a/internal/source/main.txt b/internal/source/main.txt index d86a393f5..6baa6c48d 100644 --- a/internal/source/main.txt +++ b/internal/source/main.txt @@ -203751,178 +203751,172 @@ if(!qbevent)break;evnt(26070,20398,"ide_methods.bas");}while(r); fornext_continue_6714:; } fornext_exit_6714:; +S_60008:; +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(26070,20400,"ide_methods.bas");if(r)goto S_60008;} +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(26070,20401,"ide_methods.bas");}while(r); +ww_continue_6718:; +} +ww_exit_6718:; +S_60011:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_STXT,qbs_new_txt_len("",0))))||new_error){ +if(qbevent){evnt(26070,20403,"ide_methods.bas");if(r)goto S_60011;} +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(26070,20403,"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(26070,20403,"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(26070,20400,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20404,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_SPOS= 1 ; -if(!qbevent)break;evnt(26070,20401,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20405,"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(26070,20402,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20406,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS= 1 ; -if(!qbevent)break;evnt(26070,20403,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20407,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20405,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20409,"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(26070,20406,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(26070,20408,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26070,20409,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; if(!qbevent)break;evnt(26070,20410,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26070,20411,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; if(!qbevent)break;evnt(26070,20412,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; if(!qbevent)break;evnt(26070,20413,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; +if(!qbevent)break;evnt(26070,20414,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; if(!qbevent)break;evnt(26070,20415,"ide_methods.bas");}while(r); do{ +*_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; +if(!qbevent)break;evnt(26070,20416,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; +if(!qbevent)break;evnt(26070,20417,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; +if(!qbevent)break;evnt(26070,20419,"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(26070,20416,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20420,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26070,20417,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20421,"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(26070,20418,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20422,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26070,20419,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20423,"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(26070,20420,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_NP= 0 ; -if(!qbevent)break;evnt(26070,20422,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; -if(!qbevent)break;evnt(26070,20423,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; if(!qbevent)break;evnt(26070,20424,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; -if(!qbevent)break;evnt(26070,20425,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_NP= 0 ; if(!qbevent)break;evnt(26070,20426,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; +*_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; if(!qbevent)break;evnt(26070,20427,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; +*_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; if(!qbevent)break;evnt(26070,20428,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_NC= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; +if(!qbevent)break;evnt(26070,20429,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; if(!qbevent)break;evnt(26070,20430,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; if(!qbevent)break;evnt(26070,20431,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; if(!qbevent)break;evnt(26070,20432,"ide_methods.bas");}while(r); do{ +*_SUB_EXPORTCODEAS_INTEGER_NC= 0 ; +if(!qbevent)break;evnt(26070,20434,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; +if(!qbevent)break;evnt(26070,20435,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; +if(!qbevent)break;evnt(26070,20436,"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(26070,20434,"ide_methods.bas");}while(r); -S_60037:; +if(!qbevent)break;evnt(26070,20438,"ide_methods.bas");}while(r); +S_60045:; while((-(*_SUB_EXPORTCODEAS_LONG_SPOS<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26070,20435,"ide_methods.bas");if(r)goto S_60037;} +if(qbevent){evnt(26070,20439,"ide_methods.bas");if(r)goto S_60045;} do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6720=qbr( 30 +floor( 70 / ((long double)(*_SUB_EXPORTCODEAS_LONG_SLEN))**_SUB_EXPORTCODEAS_LONG_SPOS))))); +qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6724=qbr( 30 +floor( 70 / ((long double)(*_SUB_EXPORTCODEAS_LONG_SLEN))**_SUB_EXPORTCODEAS_LONG_SPOS))))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20436,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20440,"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(26070,20437,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20441,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); -if(!qbevent)break;evnt(26070,20438,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20442,"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(26070,20440,"ide_methods.bas");}while(r); -S_60042:; -if(qbevent){evnt(26070,20441,"ide_methods.bas");if(r)goto S_60042;} -S_60043:; +if(!qbevent)break;evnt(26070,20444,"ide_methods.bas");}while(r); +S_60050:; +if(qbevent){evnt(26070,20445,"ide_methods.bas");if(r)goto S_60050;} +S_60051:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 10 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 13 )))||new_error){ -if(qbevent){evnt(26070,20442,"ide_methods.bas");if(r)goto S_60043;} -S_60044:; +if(qbevent){evnt(26070,20446,"ide_methods.bas");if(r)goto S_60051;} +S_60052:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_LB))||new_error){ -if(qbevent){evnt(26070,20443,"ide_methods.bas");if(r)goto S_60044;} -S_60045:; +if(qbevent){evnt(26070,20447,"ide_methods.bas");if(r)goto S_60052;} +S_60053:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20444,"ide_methods.bas");if(r)goto S_60045;} +if(qbevent){evnt(26070,20448,"ide_methods.bas");if(r)goto S_60053;} +S_60054:; +if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ +if(qbevent){evnt(26070,20449,"ide_methods.bas");if(r)goto S_60054;} 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(26070,20445,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20449,"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(26070,20445,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26070,20445,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26070,20445,"ide_methods.bas");}while(r); -S_60050:; -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(26070,20446,"ide_methods.bas");if(r)goto S_60050;} -do{ -*_SUB_EXPORTCODEAS_INTEGER_NP= -1 ; -if(!qbevent)break;evnt(26070,20446,"ide_methods.bas");}while(r); -} -} -S_60054:; -if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20448,"ide_methods.bas");if(r)goto S_60054;} -S_60055:; -if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26070,20449,"ide_methods.bas");if(r)goto S_60055;} -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(26070,20449,"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(26070,20449,"ide_methods.bas");}while(r); }else{ do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); +qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070,20449,"ide_methods.bas");}while(r); do{ @@ -203930,1580 +203924,1654 @@ do{ if(!qbevent)break;evnt(26070,20449,"ide_methods.bas");}while(r); } do{ -*_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; +*_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; if(!qbevent)break;evnt(26070,20450,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; +if(!qbevent)break;evnt(26070,20450,"ide_methods.bas");}while(r); +S_60063:; +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(26070,20451,"ide_methods.bas");if(r)goto S_60063;} +do{ +*_SUB_EXPORTCODEAS_INTEGER_NP= -1 ; +if(!qbevent)break;evnt(26070,20451,"ide_methods.bas");}while(r); } -S_60064:; +} +S_60067:; +if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ +if(qbevent){evnt(26070,20453,"ide_methods.bas");if(r)goto S_60067;} +S_60068:; +if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ +if(qbevent){evnt(26070,20454,"ide_methods.bas");if(r)goto S_60068;} +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(26070,20454,"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(26070,20454,"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(26070,20454,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; +if(!qbevent)break;evnt(26070,20454,"ide_methods.bas");}while(r); +} +do{ +*_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; +if(!qbevent)break;evnt(26070,20455,"ide_methods.bas");}while(r); +} +S_60077:; if ((*_SUB_EXPORTCODEAS_INTEGER_CO)||new_error){ -if(qbevent){evnt(26070,20452,"ide_methods.bas");if(r)goto S_60064;} +if(qbevent){evnt(26070,20457,"ide_methods.bas");if(r)goto S_60077;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20452,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20457,"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(26070,20452,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20457,"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(26070,20452,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20457,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(26070,20452,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20457,"ide_methods.bas");}while(r); } -S_60070:; +S_60083:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26070,20453,"ide_methods.bas");if(r)goto S_60070;} +if(qbevent){evnt(26070,20458,"ide_methods.bas");if(r)goto S_60083;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20453,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20458,"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(26070,20453,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20458,"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(26070,20453,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20458,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26070,20453,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20458,"ide_methods.bas");}while(r); } -S_60076:; +S_60089:; if ((-(*_SUB_EXPORTCODEAS_LONG_SPOS> 1 ))||new_error){ -if(qbevent){evnt(26070,20454,"ide_methods.bas");if(r)goto S_60076;} -S_60077:; +if(qbevent){evnt(26070,20459,"ide_methods.bas");if(r)goto S_60089;} +S_60090:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 )!= 95 )))||new_error){ -if(qbevent){evnt(26070,20455,"ide_methods.bas");if(r)goto S_60077;} +if(qbevent){evnt(26070,20460,"ide_methods.bas");if(r)goto S_60090;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26070,20455,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20460,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26070,20455,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20460,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26070,20455,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20460,"ide_methods.bas");}while(r); } }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26070,20457,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26070,20457,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26070,20457,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20462,"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(26070,20459,"ide_methods.bas");}while(r); -S_60088:; +if(!qbevent)break;evnt(26070,20464,"ide_methods.bas");}while(r); +S_60101:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 13 ))||new_error){ -if(qbevent){evnt(26070,20460,"ide_methods.bas");if(r)goto S_60088;} +if(qbevent){evnt(26070,20465,"ide_methods.bas");if(r)goto S_60101;} do{ *_SUB_EXPORTCODEAS_INTEGER_LB= -1 ; -if(!qbevent)break;evnt(26070,20460,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20465,"ide_methods.bas");}while(r); } } -S_60092:; +S_60105:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 10 ))||new_error){ -if(qbevent){evnt(26070,20462,"ide_methods.bas");if(r)goto S_60092;} +if(qbevent){evnt(26070,20467,"ide_methods.bas");if(r)goto S_60105;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; -if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20467,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; -if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20467,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; -if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20467,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; -if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20467,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26070,20462,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20467,"ide_methods.bas");}while(r); } sc_ec_451_end:; -goto sc_6722_end; +goto sc_6726_end; } -S_60099:; +S_60112:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 9 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 32 )))||new_error){ -if(qbevent){evnt(26070,20463,"ide_methods.bas");if(r)goto S_60099;} -S_60100:; +if(qbevent){evnt(26070,20468,"ide_methods.bas");if(r)goto S_60112;} +S_60113:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20464,"ide_methods.bas");if(r)goto S_60100;} +if(qbevent){evnt(26070,20469,"ide_methods.bas");if(r)goto S_60113;} 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(26070,20465,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20470,"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(26070,20465,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20470,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26070,20465,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20470,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26070,20465,"ide_methods.bas");}while(r); -S_60105:; -qbs_set(sc_6723,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); +if(!qbevent)break;evnt(26070,20470,"ide_methods.bas");}while(r); +S_60118:; +qbs_set(sc_6727,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20466,"ide_methods.bas");if(r)goto S_60105;} -S_60106:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6723,qbs_new_txt_len("$IF",3))||qbs_equal(sc_6723,qbs_new_txt_len("$ELSEIF",7))||qbs_equal(sc_6723,qbs_new_txt_len("$END",4))))||new_error){ -if(qbevent){evnt(26070,20467,"ide_methods.bas");if(r)goto S_60106;} +if(qbevent){evnt(26070,20471,"ide_methods.bas");if(r)goto S_60118;} +S_60119:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6727,qbs_new_txt_len("$LET",4))||qbs_equal(sc_6727,qbs_new_txt_len("$ELSE",5))||qbs_equal(sc_6727,qbs_new_txt_len("$END",4))))||new_error){ +if(qbevent){evnt(26070,20472,"ide_methods.bas");if(r)goto S_60119;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= -1 ; -if(!qbevent)break;evnt(26070,20467,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20472,"ide_methods.bas");}while(r); sc_ec_452_end:; -goto sc_6723_end; +goto sc_6727_end; } -sc_6723_end:; +S_60121:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6727,qbs_new_txt_len("$IF",3))||qbs_equal(sc_6727,qbs_new_txt_len("$ELSEIF",7))))||new_error){ +if(qbevent){evnt(26070,20473,"ide_methods.bas");if(r)goto S_60121;} +do{ +*_SUB_EXPORTCODEAS_INTEGER_PC= -1 ; +if(!qbevent)break;evnt(26070,20473,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; +if(!qbevent)break;evnt(26070,20473,"ide_methods.bas");}while(r); +sc_ec_453_end:; +goto sc_6727_end; } -S_60110:; +sc_6727_end:; +} +S_60126:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20470,"ide_methods.bas");if(r)goto S_60110;} -S_60111:; +if(qbevent){evnt(26070,20476,"ide_methods.bas");if(r)goto S_60126;} +S_60127:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26070,20471,"ide_methods.bas");if(r)goto S_60111;} +if(qbevent){evnt(26070,20477,"ide_methods.bas");if(r)goto S_60127;} 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(26070,20471,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20477,"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(26070,20471,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20477,"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(26070,20471,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20477,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26070,20471,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20477,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26070,20472,"ide_methods.bas");}while(r); -S_60119:; +if(!qbevent)break;evnt(26070,20478,"ide_methods.bas");}while(r); +S_60135:; if ((*_SUB_EXPORTCODEAS_INTEGER_IN)||new_error){ -if(qbevent){evnt(26070,20472,"ide_methods.bas");if(r)goto S_60119;} +if(qbevent){evnt(26070,20478,"ide_methods.bas");if(r)goto S_60135;} do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20472,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20478,"ide_methods.bas");}while(r); } -S_60122:; -qbs_set(sc_6724,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); +S_60138:; +qbs_set(sc_6728,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20473,"ide_methods.bas");if(r)goto S_60122;} -S_60123:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6724,qbs_new_txt_len("REM",3))))||new_error){ -if(qbevent){evnt(26070,20474,"ide_methods.bas");if(r)goto S_60123;} -S_60124:; +if(qbevent){evnt(26070,20479,"ide_methods.bas");if(r)goto S_60138;} +S_60139:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6728,qbs_new_txt_len("REM",3))))||new_error){ +if(qbevent){evnt(26070,20480,"ide_methods.bas");if(r)goto S_60139;} +S_60140:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26070,20474,"ide_methods.bas");if(r)goto S_60124;} +if(qbevent){evnt(26070,20480,"ide_methods.bas");if(r)goto S_60140;} do{ *_SUB_EXPORTCODEAS_INTEGER_CO= -1 ; -if(!qbevent)break;evnt(26070,20474,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20480,"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(26070,20474,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20480,"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(26070,20474,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20480,"ide_methods.bas");}while(r); } -sc_ec_453_end:; -goto sc_6724_end; +sc_ec_454_end:; +goto sc_6728_end; } -S_60129:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6724,qbs_new_txt_len("OPEN",4))))||new_error){ -if(qbevent){evnt(26070,20475,"ide_methods.bas");if(r)goto S_60129;} +S_60145:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6728,qbs_new_txt_len("OPEN",4))))||new_error){ +if(qbevent){evnt(26070,20481,"ide_methods.bas");if(r)goto S_60145;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= -1 ; -if(!qbevent)break;evnt(26070,20475,"ide_methods.bas");}while(r); -sc_ec_454_end:; -goto sc_6724_end; +if(!qbevent)break;evnt(26070,20481,"ide_methods.bas");}while(r); +sc_ec_455_end:; +goto sc_6728_end; } -S_60131:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6724,qbs_new_txt_len("IF",2))||qbs_equal(sc_6724,qbs_new_txt_len("ELSEIF",6))||qbs_equal(sc_6724,qbs_new_txt_len("UNTIL",5))||qbs_equal(sc_6724,qbs_new_txt_len("WHILE",5))))||new_error){ -if(qbevent){evnt(26070,20476,"ide_methods.bas");if(r)goto S_60131;} +S_60147:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6728,qbs_new_txt_len("IF",2))||qbs_equal(sc_6728,qbs_new_txt_len("ELSEIF",6))||qbs_equal(sc_6728,qbs_new_txt_len("UNTIL",5))||qbs_equal(sc_6728,qbs_new_txt_len("WHILE",5))))||new_error){ +if(qbevent){evnt(26070,20482,"ide_methods.bas");if(r)goto S_60147;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26070,20476,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20482,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26070,20476,"ide_methods.bas");}while(r); -sc_ec_455_end:; -goto sc_6724_end; +if(!qbevent)break;evnt(26070,20482,"ide_methods.bas");}while(r); +sc_ec_456_end:; +goto sc_6728_end; } -S_60134:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6724,qbs_new_txt_len("THEN",4))))||new_error){ -if(qbevent){evnt(26070,20477,"ide_methods.bas");if(r)goto S_60134;} +S_60150:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6728,qbs_new_txt_len("THEN",4))))||new_error){ +if(qbevent){evnt(26070,20483,"ide_methods.bas");if(r)goto S_60150;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26070,20477,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20483,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26070,20477,"ide_methods.bas");}while(r); -sc_ec_456_end:; -goto sc_6724_end; +if(!qbevent)break;evnt(26070,20483,"ide_methods.bas");}while(r); +sc_ec_457_end:; +goto sc_6728_end; } -S_60138:; -fornext_value6726= 1 ; -fornext_finalvalue6726=*__LONG_IDN; -fornext_step6726= 1 ; -if (fornext_step6726<0) fornext_step_negative6726=1; else fornext_step_negative6726=0; -if (new_error) goto fornext_error6726; -goto fornext_entrylabel6726; +S_60154:; +fornext_value6730= 1 ; +fornext_finalvalue6730=*__LONG_IDN; +fornext_step6730= 1 ; +if (fornext_step6730<0) fornext_step_negative6730=1; else fornext_step_negative6730=0; +if (new_error) goto fornext_error6730; +goto fornext_entrylabel6730; while(1){ -fornext_value6726=fornext_step6726+(*_SUB_EXPORTCODEAS_LONG_I); -fornext_entrylabel6726: -*_SUB_EXPORTCODEAS_LONG_I=fornext_value6726; -if (fornext_step_negative6726){ -if (fornext_value6726fornext_finalvalue6726) break; +if (fornext_value6730>fornext_finalvalue6730) break; } -fornext_error6726:; -if(qbevent){evnt(26070,20479,"ide_methods.bas");if(r)goto S_60138;} -S_60139:; +fornext_error6730:; +if(qbevent){evnt(26070,20485,"ide_methods.bas");if(r)goto S_60154;} +S_60155:; 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(26070,20480,"ide_methods.bas");if(r)goto S_60139;} +if(qbevent){evnt(26070,20486,"ide_methods.bas");if(r)goto S_60155;} 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(26070,20481,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20487,"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(26070,20481,"ide_methods.bas");}while(r); -S_60142:; +if(!qbevent)break;evnt(26070,20487,"ide_methods.bas");}while(r); +S_60158:; 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(26070,20482,"ide_methods.bas");if(r)goto S_60142;} +if(qbevent){evnt(26070,20488,"ide_methods.bas");if(r)goto S_60158;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -2 ; -if(!qbevent)break;evnt(26070,20482,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20488,"ide_methods.bas");}while(r); do{ -goto fornext_exit_6725; -if(!qbevent)break;evnt(26070,20482,"ide_methods.bas");}while(r); +goto fornext_exit_6729; +if(!qbevent)break;evnt(26070,20488,"ide_methods.bas");}while(r); } } -fornext_continue_6725:; +fornext_continue_6729:; } -fornext_exit_6725:; -sc_6724_end:; +fornext_exit_6729:; +sc_6728_end:; } -S_60150:; +S_60166:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26070,20487,"ide_methods.bas");if(r)goto S_60150;} +if(qbevent){evnt(26070,20493,"ide_methods.bas");if(r)goto S_60166;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20487,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20493,"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(26070,20487,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20493,"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(26070,20487,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20493,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26070,20487,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20493,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26070,20488,"ide_methods.bas");}while(r); -sc_ec_457_end:; -goto sc_6722_end; +if(!qbevent)break;evnt(26070,20494,"ide_methods.bas");}while(r); +sc_ec_458_end:; +goto sc_6726_end; } -S_60157:; +S_60173:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||new_error){ -if(qbevent){evnt(26070,20489,"ide_methods.bas");if(r)goto S_60157;} -S_60158:; +if(qbevent){evnt(26070,20495,"ide_methods.bas");if(r)goto S_60173;} +S_60174:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26070,20490,"ide_methods.bas");if(r)goto S_60158;} +if(qbevent){evnt(26070,20496,"ide_methods.bas");if(r)goto S_60174;} do{ *_SUB_EXPORTCODEAS_INTEGER_QU= -1 ; -if(!qbevent)break;evnt(26070,20491,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20497,"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(26070,20491,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20497,"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(26070,20491,"ide_methods.bas");}while(r); -S_60162:; +if(!qbevent)break;evnt(26070,20497,"ide_methods.bas");}while(r); +S_60178:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_QU){ -if(qbevent){evnt(26070,20492,"ide_methods.bas");if(r)goto S_60162;} +if(qbevent){evnt(26070,20498,"ide_methods.bas");if(r)goto S_60178;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= -1 ; -if(!qbevent)break;evnt(26070,20493,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20499,"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(26070,20493,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20499,"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(26070,20493,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20499,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; -if(!qbevent)break;evnt(26070,20493,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20499,"ide_methods.bas");}while(r); } } -S_60168:; +S_60184:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||new_error){ -if(qbevent){evnt(26070,20495,"ide_methods.bas");if(r)goto S_60168;} +if(qbevent){evnt(26070,20501,"ide_methods.bas");if(r)goto S_60184;} 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(26070,20495,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20501,"ide_methods.bas");}while(r); } -sc_ec_458_end:; -goto sc_6722_end; +sc_ec_459_end:; +goto sc_6726_end; } -S_60171:; +S_60187:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 36 )))||new_error){ -if(qbevent){evnt(26070,20496,"ide_methods.bas");if(r)goto S_60171;} -S_60172:; +if(qbevent){evnt(26070,20502,"ide_methods.bas");if(r)goto S_60187;} +S_60188:; if ((*_SUB_EXPORTCODEAS_INTEGER_NL|*_SUB_EXPORTCODEAS_INTEGER_LE)||new_error){ -if(qbevent){evnt(26070,20497,"ide_methods.bas");if(r)goto S_60172;} +if(qbevent){evnt(26070,20503,"ide_methods.bas");if(r)goto S_60188;} do{ *_SUB_EXPORTCODEAS_INTEGER_ML= -1 ; -if(!qbevent)break;evnt(26070,20497,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20503,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= -1 ; -if(!qbevent)break;evnt(26070,20497,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20503,"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(26070,20497,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20503,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20497,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20503,"ide_methods.bas");}while(r); } -sc_ec_459_end:; -goto sc_6722_end; +sc_ec_460_end:; +goto sc_6726_end; } -S_60178:; +S_60194:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||new_error){ -if(qbevent){evnt(26070,20498,"ide_methods.bas");if(r)goto S_60178;} -S_60179:; +if(qbevent){evnt(26070,20504,"ide_methods.bas");if(r)goto S_60194;} +S_60195:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26070,20499,"ide_methods.bas");if(r)goto S_60179;} -S_60180:; +if(qbevent){evnt(26070,20505,"ide_methods.bas");if(r)goto S_60195;} +S_60196:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26070,20500,"ide_methods.bas");if(r)goto S_60180;} -S_60181:; +if(qbevent){evnt(26070,20506,"ide_methods.bas");if(r)goto S_60196;} +S_60197:; 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(26070,20501,"ide_methods.bas");if(r)goto S_60181;} +if(qbevent){evnt(26070,20507,"ide_methods.bas");if(r)goto S_60197;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26070,20502,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20508,"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(26070,20502,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20508,"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(26070,20502,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20508,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20502,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20508,"ide_methods.bas");}while(r); } } } -S_60189:; +S_60205:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_KW)))||new_error){ -if(qbevent){evnt(26070,20506,"ide_methods.bas");if(r)goto S_60189;} +if(qbevent){evnt(26070,20512,"ide_methods.bas");if(r)goto S_60205;} 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(26070,20506,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20512,"ide_methods.bas");}while(r); } -sc_ec_460_end:; -goto sc_6722_end; +sc_ec_461_end:; +goto sc_6726_end; } -S_60192:; +S_60208:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 39 )))||new_error){ -if(qbevent){evnt(26070,20507,"ide_methods.bas");if(r)goto S_60192;} -S_60193:; +if(qbevent){evnt(26070,20513,"ide_methods.bas");if(r)goto S_60208;} +S_60209:; if ((*_SUB_EXPORTCODEAS_INTEGER_NL)||new_error){ -if(qbevent){evnt(26070,20508,"ide_methods.bas");if(r)goto S_60193;} -S_60194:; +if(qbevent){evnt(26070,20514,"ide_methods.bas");if(r)goto S_60209;} +S_60210:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26070,20509,"ide_methods.bas");if(r)goto S_60194;} -S_60195:; +if(qbevent){evnt(26070,20515,"ide_methods.bas");if(r)goto S_60210;} +S_60211:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )== 36 )))||new_error){ -if(qbevent){evnt(26070,20510,"ide_methods.bas");if(r)goto S_60195;} +if(qbevent){evnt(26070,20516,"ide_methods.bas");if(r)goto S_60211;} do{ *_SUB_EXPORTCODEAS_INTEGER_LE= -1 ; -if(!qbevent)break;evnt(26070,20510,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20516,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20510,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20516,"ide_methods.bas");}while(r); } } } -S_60201:; +S_60217:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26070,20513,"ide_methods.bas");if(r)goto S_60201;} +if(qbevent){evnt(26070,20519,"ide_methods.bas");if(r)goto S_60217;} do{ *_SUB_EXPORTCODEAS_INTEGER_CO= -1 ; -if(!qbevent)break;evnt(26070,20513,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20519,"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(26070,20513,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20519,"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(26070,20513,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20519,"ide_methods.bas");}while(r); } -sc_ec_461_end:; -goto sc_6722_end; +sc_ec_462_end:; +goto sc_6726_end; } -S_60206:; +S_60222:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 40 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 41 )))||new_error){ -if(qbevent){evnt(26070,20514,"ide_methods.bas");if(r)goto S_60206;} -S_60207:; +if(qbevent){evnt(26070,20520,"ide_methods.bas");if(r)goto S_60222;} +S_60223:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20515,"ide_methods.bas");if(r)goto S_60207;} -S_60208:; +if(qbevent){evnt(26070,20521,"ide_methods.bas");if(r)goto S_60223;} +S_60224:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26070,20516,"ide_methods.bas");if(r)goto S_60208;} +if(qbevent){evnt(26070,20522,"ide_methods.bas");if(r)goto S_60224;} 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(26070,20516,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20522,"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(26070,20516,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20522,"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(26070,20516,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20522,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26070,20516,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20522,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26070,20517,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20523,"ide_methods.bas");}while(r); } -S_60217:; +S_60233:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26070,20519,"ide_methods.bas");if(r)goto S_60217;} +if(qbevent){evnt(26070,20525,"ide_methods.bas");if(r)goto S_60233;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20519,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20525,"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(26070,20519,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20525,"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(26070,20519,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20525,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26070,20519,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20525,"ide_methods.bas");}while(r); } -S_60223:; +S_60239:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26070,20520,"ide_methods.bas");if(r)goto S_60223;} -S_60224:; +if(qbevent){evnt(26070,20526,"ide_methods.bas");if(r)goto S_60239;} +S_60240:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 40 ))||new_error){ -if(qbevent){evnt(26070,20521,"ide_methods.bas");if(r)goto S_60224;} +if(qbevent){evnt(26070,20527,"ide_methods.bas");if(r)goto S_60240;} do{ *_SUB_EXPORTCODEAS_INTEGER_NC=*_SUB_EXPORTCODEAS_INTEGER_NC+ 1 ; -if(!qbevent)break;evnt(26070,20521,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20527,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_NC=*_SUB_EXPORTCODEAS_INTEGER_NC- 1 ; -if(!qbevent)break;evnt(26070,20521,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20527,"ide_methods.bas");}while(r); } } -S_60230:; +S_60246:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU|(-(*_SUB_EXPORTCODEAS_INTEGER_FU< -1 ))|*_SUB_EXPORTCODEAS_INTEGER_BO)))||new_error){ -if(qbevent){evnt(26070,20523,"ide_methods.bas");if(r)goto S_60230;} -S_60231:; +if(qbevent){evnt(26070,20529,"ide_methods.bas");if(r)goto S_60246;} +S_60247:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_NC> 0 ))||new_error){ -if(qbevent){evnt(26070,20524,"ide_methods.bas");if(r)goto S_60231;} +if(qbevent){evnt(26070,20530,"ide_methods.bas");if(r)goto S_60247;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26070,20524,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20530,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26070,20524,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20530,"ide_methods.bas");}while(r); } } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26070,20526,"ide_methods.bas");}while(r); -sc_ec_462_end:; -goto sc_6722_end; +if(!qbevent)break;evnt(26070,20532,"ide_methods.bas");}while(r); +sc_ec_463_end:; +goto sc_6726_end; } -S_60238:; +S_60254:; 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(26070,20527,"ide_methods.bas");if(r)goto S_60238;} -S_60239:; +if(qbevent){evnt(26070,20533,"ide_methods.bas");if(r)goto S_60254;} +S_60255:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20528,"ide_methods.bas");if(r)goto S_60239;} -S_60240:; +if(qbevent){evnt(26070,20534,"ide_methods.bas");if(r)goto S_60255;} +S_60256:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26070,20529,"ide_methods.bas");if(r)goto S_60240;} +if(qbevent){evnt(26070,20535,"ide_methods.bas");if(r)goto S_60256;} 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(26070,20529,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20535,"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(26070,20529,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,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(26070,20529,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20535,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26070,20529,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20535,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26070,20530,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20536,"ide_methods.bas");}while(r); } -S_60249:; +S_60265:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26070,20532,"ide_methods.bas");if(r)goto S_60249;} +if(qbevent){evnt(26070,20538,"ide_methods.bas");if(r)goto S_60265;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20532,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20538,"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(26070,20532,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20538,"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(26070,20532,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20538,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26070,20532,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20538,"ide_methods.bas");}while(r); } -S_60255:; +S_60271:; 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(26070,20533,"ide_methods.bas");if(r)goto S_60255;} +if(qbevent){evnt(26070,20539,"ide_methods.bas");if(r)goto S_60271;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -3 ; -if(!qbevent)break;evnt(26070,20533,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20539,"ide_methods.bas");}while(r); } -S_60258:; +S_60274:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 60 ))|(-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 62 ))|(-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 92 )))||new_error){ -if(qbevent){evnt(26070,20534,"ide_methods.bas");if(r)goto S_60258;} +if(qbevent){evnt(26070,20540,"ide_methods.bas");if(r)goto S_60274;} 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(26070,20534,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20540,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26070,20535,"ide_methods.bas");}while(r); -sc_ec_463_end:; -goto sc_6722_end; +if(!qbevent)break;evnt(26070,20541,"ide_methods.bas");}while(r); +sc_ec_464_end:; +goto sc_6726_end; } -S_60262:; +S_60278:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 45 )))||new_error){ -if(qbevent){evnt(26070,20536,"ide_methods.bas");if(r)goto S_60262;} -S_60263:; +if(qbevent){evnt(26070,20542,"ide_methods.bas");if(r)goto S_60278;} +S_60279:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20537,"ide_methods.bas");if(r)goto S_60263;} -S_60264:; +if(qbevent){evnt(26070,20543,"ide_methods.bas");if(r)goto S_60279;} +S_60280:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26070,20538,"ide_methods.bas");if(r)goto S_60264;} +if(qbevent){evnt(26070,20544,"ide_methods.bas");if(r)goto S_60280;} 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(26070,20538,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20544,"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(26070,20538,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20544,"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(26070,20538,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20544,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26070,20538,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20544,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26070,20539,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20545,"ide_methods.bas");}while(r); } -S_60273:; +S_60289:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26070,20541,"ide_methods.bas");if(r)goto S_60273;} +if(qbevent){evnt(26070,20547,"ide_methods.bas");if(r)goto S_60289;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20541,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20547,"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(26070,20541,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20547,"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(26070,20541,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20547,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26070,20541,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20547,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26070,20542,"ide_methods.bas");}while(r); -S_60280:; +if(!qbevent)break;evnt(26070,20548,"ide_methods.bas");}while(r); +S_60296:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26070,20543,"ide_methods.bas");if(r)goto S_60280;} -S_60281:; -sc_6727=qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 ); +if(qbevent){evnt(26070,20549,"ide_methods.bas");if(r)goto S_60296;} +S_60297:; +sc_6731=qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 ); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20544,"ide_methods.bas");if(r)goto S_60281;} -S_60282:; -if (((sc_6727==( 9 ))||(sc_6727==( 32 ))||(sc_6727==( 40 ))||((sc_6727>=( 42 ))&&(sc_6727<=( 45 )))||(sc_6727==( 47 ))||((sc_6727>=( 59 ))&&(sc_6727<=( 63 )))||(sc_6727==( 92 ))||(sc_6727==( 94 )))||new_error){ -if(qbevent){evnt(26070,20545,"ide_methods.bas");if(r)goto S_60282;} -S_60283:; +if(qbevent){evnt(26070,20550,"ide_methods.bas");if(r)goto S_60297;} +S_60298:; +if (((sc_6731==( 9 ))||(sc_6731==( 32 ))||(sc_6731==( 40 ))||((sc_6731>=( 42 ))&&(sc_6731<=( 45 )))||(sc_6731==( 47 ))||((sc_6731>=( 59 ))&&(sc_6731<=( 63 )))||(sc_6731==( 92 ))||(sc_6731==( 94 )))||new_error){ +if(qbevent){evnt(26070,20551,"ide_methods.bas");if(r)goto S_60298;} +S_60299:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26070,20546,"ide_methods.bas");if(r)goto S_60283;} -S_60284:; +if(qbevent){evnt(26070,20552,"ide_methods.bas");if(r)goto S_60299;} +S_60300:; 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(26070,20547,"ide_methods.bas");if(r)goto S_60284;} +if(qbevent){evnt(26070,20553,"ide_methods.bas");if(r)goto S_60300;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26070,20548,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20554,"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(26070,20548,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20554,"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(26070,20548,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20554,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20548,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20554,"ide_methods.bas");}while(r); } } -sc_ec_464_end:; -goto sc_6727_end; -} -sc_6727_end:; -} sc_ec_465_end:; -goto sc_6722_end; +goto sc_6731_end; } -S_60293:; +sc_6731_end:; +} +sc_ec_466_end:; +goto sc_6726_end; +} +S_60309:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 46 )))||new_error){ -if(qbevent){evnt(26070,20553,"ide_methods.bas");if(r)goto S_60293;} -S_60294:; +if(qbevent){evnt(26070,20559,"ide_methods.bas");if(r)goto S_60309;} +S_60310:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26070,20554,"ide_methods.bas");if(r)goto S_60294;} -S_60295:; +if(qbevent){evnt(26070,20560,"ide_methods.bas");if(r)goto S_60310;} +S_60311:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26070,20555,"ide_methods.bas");if(r)goto S_60295;} -S_60296:; +if(qbevent){evnt(26070,20561,"ide_methods.bas");if(r)goto S_60311;} +S_60312:; 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(26070,20556,"ide_methods.bas");if(r)goto S_60296;} +if(qbevent){evnt(26070,20562,"ide_methods.bas");if(r)goto S_60312;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26070,20557,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20563,"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(26070,20557,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20563,"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(26070,20557,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20563,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20557,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20563,"ide_methods.bas");}while(r); } } } -sc_ec_466_end:; -goto sc_6722_end; +sc_ec_467_end:; +goto sc_6726_end; } -S_60304:; +S_60320:; if ((((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 48 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 57 ))))||new_error){ -if(qbevent){evnt(26070,20561,"ide_methods.bas");if(r)goto S_60304;} -S_60305:; +if(qbevent){evnt(26070,20567,"ide_methods.bas");if(r)goto S_60320;} +S_60321:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26070,20562,"ide_methods.bas");if(r)goto S_60305;} +if(qbevent){evnt(26070,20568,"ide_methods.bas");if(r)goto S_60321;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(26070,20562,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20568,"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(26070,20562,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20568,"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(26070,20562,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20568,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20562,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20568,"ide_methods.bas");}while(r); } -sc_ec_467_end:; -goto sc_6722_end; +sc_ec_468_end:; +goto sc_6726_end; } -S_60311:; +S_60327:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 58 )))||new_error){ -if(qbevent){evnt(26070,20563,"ide_methods.bas");if(r)goto S_60311;} -S_60312:; +if(qbevent){evnt(26070,20569,"ide_methods.bas");if(r)goto S_60327;} +S_60328:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20564,"ide_methods.bas");if(r)goto S_60312;} +if(qbevent){evnt(26070,20570,"ide_methods.bas");if(r)goto S_60328;} 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(26070,20564,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20570,"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(26070,20564,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20570,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(26070,20564,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20570,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(26070,20564,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20570,"ide_methods.bas");}while(r); } -S_60318:; +S_60334:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20565,"ide_methods.bas");if(r)goto S_60318;} -S_60319:; +if(qbevent){evnt(26070,20571,"ide_methods.bas");if(r)goto S_60334;} +S_60335:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||new_error){ -if(qbevent){evnt(26070,20566,"ide_methods.bas");if(r)goto S_60319;} +if(qbevent){evnt(26070,20572,"ide_methods.bas");if(r)goto S_60335;} 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(26070,20566,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20572,"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(26070,20566,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20572,"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(26070,20566,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20572,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(26070,20566,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20572,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(26070,20567,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20573,"ide_methods.bas");}while(r); } -S_60328:; +S_60344:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||new_error){ -if(qbevent){evnt(26070,20569,"ide_methods.bas");if(r)goto S_60328;} +if(qbevent){evnt(26070,20575,"ide_methods.bas");if(r)goto S_60344;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20569,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20575,"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(26070,20569,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20575,"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(26070,20569,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20575,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(26070,20569,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20575,"ide_methods.bas");}while(r); } -S_60334:; +S_60350:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||new_error){ -if(qbevent){evnt(26070,20570,"ide_methods.bas");if(r)goto S_60334;} +if(qbevent){evnt(26070,20576,"ide_methods.bas");if(r)goto S_60350;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(26070,20570,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20576,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(26070,20570,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20576,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(26070,20570,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20576,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(26070,20571,"ide_methods.bas");}while(r); -sc_ec_468_end:; -goto sc_6722_end; +if(!qbevent)break;evnt(26070,20577,"ide_methods.bas");}while(r); +sc_ec_469_end:; +goto sc_6726_end; } -S_60340:; +S_60356:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||new_error){ -if(qbevent){evnt(26070,20572,"ide_methods.bas");if(r)goto S_60340;} +if(qbevent){evnt(26070,20578,"ide_methods.bas");if(r)goto S_60356;} 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(26070,20573,"ide_methods.bas");}while(r); -sc_ec_469_end:; -goto sc_6722_end; +if(!qbevent)break;evnt(26070,20579,"ide_methods.bas");}while(r); +sc_ec_470_end:; +goto sc_6726_end; } -S_60342:; +S_60358:; 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(26070,20574,"ide_methods.bas");if(r)goto S_60342;} -S_60343:; +if(qbevent){evnt(26070,20580,"ide_methods.bas");if(r)goto S_60358;} +S_60359:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26070,20575,"ide_methods.bas");if(r)goto S_60343;} +if(qbevent){evnt(26070,20581,"ide_methods.bas");if(r)goto S_60359;} do{ *_SUB_EXPORTCODEAS_INTEGER_KW= -1 ; -if(!qbevent)break;evnt(26070,20575,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20581,"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(26070,20575,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20581,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20575,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20581,"ide_methods.bas");}while(r); } -S_60348:; +S_60364:; 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(26070,20576,"ide_methods.bas");if(r)goto S_60348;} +if(qbevent){evnt(26070,20582,"ide_methods.bas");if(r)goto S_60364;} do{ *_SUB_EXPORTCODEAS_INTEGER_LE= -1 ; -if(!qbevent)break;evnt(26070,20576,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20582,"ide_methods.bas");}while(r); } -sc_ec_470_end:; -goto sc_6722_end; +sc_ec_471_end:; +goto sc_6726_end; } -S_60351:; +S_60367:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 95 )))||new_error){ -if(qbevent){evnt(26070,20577,"ide_methods.bas");if(r)goto S_60351;} -S_60352:; +if(qbevent){evnt(26070,20583,"ide_methods.bas");if(r)goto S_60367;} +S_60368:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||new_error){ -if(qbevent){evnt(26070,20578,"ide_methods.bas");if(r)goto S_60352;} -S_60353:; +if(qbevent){evnt(26070,20584,"ide_methods.bas");if(r)goto S_60368;} +S_60369:; if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||new_error){ -if(qbevent){evnt(26070,20579,"ide_methods.bas");if(r)goto S_60353;} -S_60354:; +if(qbevent){evnt(26070,20585,"ide_methods.bas");if(r)goto S_60369;} +S_60370:; 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(26070,20580,"ide_methods.bas");if(r)goto S_60354;} +if(qbevent){evnt(26070,20586,"ide_methods.bas");if(r)goto S_60370;} do{ *_SUB_EXPORTCODEAS_INTEGER_KW= -1 ; -if(!qbevent)break;evnt(26070,20581,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20587,"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(26070,20581,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20587,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20581,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20587,"ide_methods.bas");}while(r); } } } -sc_ec_471_end:; -goto sc_6722_end; +sc_ec_472_end:; +goto sc_6726_end; } -S_60361:; +S_60377:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26070,20585,"ide_methods.bas");if(r)goto S_60361;} +if(qbevent){evnt(26070,20591,"ide_methods.bas");if(r)goto S_60377;} 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(26070,20586,"ide_methods.bas");}while(r); -sc_ec_472_end:; -goto sc_6722_end; +if(!qbevent)break;evnt(26070,20592,"ide_methods.bas");}while(r); +sc_ec_473_end:; +goto sc_6726_end; } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(26070,20588,"ide_methods.bas");}while(r); -sc_6722_end:; -S_60366:; -if(qbevent){evnt(26070,20590,"ide_methods.bas");if(r)goto S_60366;} -S_60367:; +if(!qbevent)break;evnt(26070,20594,"ide_methods.bas");}while(r); +sc_6726_end:; +S_60382:; +if(qbevent){evnt(26070,20596,"ide_methods.bas");if(r)goto S_60382;} +S_60383:; 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(26070,20591,"ide_methods.bas");if(r)goto S_60367;} -S_60368:; +if(qbevent){evnt(26070,20597,"ide_methods.bas");if(r)goto S_60383;} +S_60384:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20592,"ide_methods.bas");if(r)goto S_60368;} +if(qbevent){evnt(26070,20598,"ide_methods.bas");if(r)goto S_60384;} 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(26070,20592,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20598,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20592,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20598,"ide_methods.bas");}while(r); } -S_60372:; +S_60388:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||new_error){ -if(qbevent){evnt(26070,20593,"ide_methods.bas");if(r)goto S_60372;} +if(qbevent){evnt(26070,20599,"ide_methods.bas");if(r)goto S_60388;} 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(26070,20593,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20599,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20593,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20599,"ide_methods.bas");}while(r); } -sc_ec_473_end:; -goto sc_6728_end; +sc_ec_474_end:; +goto sc_6732_end; } -sc_6728_end:; -S_60377:; +sc_6732_end:; +S_60393:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 9 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 10 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 32 )))||new_error){ -if(qbevent){evnt(26070,20595,"ide_methods.bas");if(r)goto S_60377;} +if(qbevent){evnt(26070,20601,"ide_methods.bas");if(r)goto S_60393;} do{ *_SUB_EXPORTCODEAS_INTEGER_NL= 0 ; -if(!qbevent)break;evnt(26070,20595,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20601,"ide_methods.bas");}while(r); } -S_60380:; +S_60396:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||new_error){ -if(qbevent){evnt(26070,20596,"ide_methods.bas");if(r)goto S_60380;} +if(qbevent){evnt(26070,20602,"ide_methods.bas");if(r)goto S_60396;} 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(26070,20596,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20602,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+ 1 ; -if(!qbevent)break;evnt(26070,20596,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20602,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(26070,20597,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20603,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_SPOS=*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 ; -if(!qbevent)break;evnt(26070,20597,"ide_methods.bas");}while(r); -ww_continue_6719:; +if(!qbevent)break;evnt(26070,20603,"ide_methods.bas");}while(r); +ww_continue_6723:; } -ww_exit_6719:; +ww_exit_6723:; do{ return_point[next_return_point++]=224; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSECODEBLOCK; RETURN_224:; -if(!qbevent)break;evnt(26070,20599,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20605,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 7 ; -if(!qbevent)break;evnt(26070,20601,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20607,"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(26070,20602,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20608,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; -if(!qbevent)break;evnt(26070,20603,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20609,"ide_methods.bas");}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 151 ; -if (new_error) goto skip6729; +if (new_error) goto skip6733; sub_file_print(tmp_fileno,qbs_left(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS- 1 ), 0, 0, 0); -if (new_error) goto skip6729; -skip6729: +if (new_error) goto skip6733; +skip6733: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; -if(!qbevent)break;evnt(26070,20604,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20610,"ide_methods.bas");}while(r); do{ sub_close( 151 ,1); -if(!qbevent)break;evnt(26070,20605,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20611,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 3 ); -if(!qbevent)break;evnt(26070,20606,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20612,"ide_methods.bas");}while(r); do{ goto exit_subfunc; -if(!qbevent)break;evnt(26070,20607,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20613,"ide_methods.bas");}while(r); LABEL_OPENCODEBLOCK:; -if(qbevent){evnt(26070,20609,"ide_methods.bas");r=0;} -S_60395:; -qbs_set(sc_6730,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(qbevent){evnt(26070,20615,"ide_methods.bas");r=0;} +S_60411:; +qbs_set(sc_6734,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20610,"ide_methods.bas");if(r)goto S_60395;} -S_60396:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6730,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26070,20611,"ide_methods.bas");if(r)goto S_60396;} +if(qbevent){evnt(26070,20616,"ide_methods.bas");if(r)goto S_60411;} +S_60412:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6734,qbs_new_txt_len("html",4))))||new_error){ +if(qbevent){evnt(26070,20617,"ide_methods.bas");if(r)goto S_60412;} 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(26070,20611,"ide_methods.bas");}while(r);
-sc_ec_474_end:;
-goto sc_6730_end;
+if(!qbevent)break;evnt(26070,20617,"ide_methods.bas");}while(r);
+sc_ec_475_end:;
+goto sc_6734_end;
 }
-S_60398:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6730,qbs_new_txt_len("rich",4))))||new_error){
-if(qbevent){evnt(26070,20612,"ide_methods.bas");if(r)goto S_60398;}
+S_60414:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6734,qbs_new_txt_len("rich",4))))||new_error){
+if(qbevent){evnt(26070,20618,"ide_methods.bas");if(r)goto S_60414;}
 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(26070,20612,"ide_methods.bas");}while(r);
-sc_ec_475_end:;
-goto sc_6730_end;
+if(!qbevent)break;evnt(26070,20618,"ide_methods.bas");}while(r);
+sc_ec_476_end:;
+goto sc_6734_end;
 }
-S_60400:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6730,qbs_new_txt_len("wiki",4))))||new_error){
-if(qbevent){evnt(26070,20613,"ide_methods.bas");if(r)goto S_60400;}
+S_60416:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6734,qbs_new_txt_len("wiki",4))))||new_error){
+if(qbevent){evnt(26070,20619,"ide_methods.bas");if(r)goto S_60416;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{CodeStart}}",13));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(26070,20613,"ide_methods.bas");}while(r);
-sc_ec_476_end:;
-goto sc_6730_end;
+if(!qbevent)break;evnt(26070,20619,"ide_methods.bas");}while(r);
+sc_ec_477_end:;
+goto sc_6734_end;
 }
 do{
 #include "ret297.txt"
-if(!qbevent)break;evnt(26070,20614,"ide_methods.bas");}while(r);
-sc_6730_end:;
+if(!qbevent)break;evnt(26070,20620,"ide_methods.bas");}while(r);
+sc_6734_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(26070,20616,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26070,20622,"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(26070,20616,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26070,20622,"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(26070,20617,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26070,20623,"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(26070,20617,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26070,20623,"ide_methods.bas");}while(r);
 do{
 #include "ret297.txt"
-if(!qbevent)break;evnt(26070,20618,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(26070,20624,"ide_methods.bas");}while(r);
 LABEL_CLOSECODEBLOCK:;
-if(qbevent){evnt(26070,20620,"ide_methods.bas");r=0;}
-S_60410:;
-qbs_set(sc_6735,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT));
+if(qbevent){evnt(26070,20626,"ide_methods.bas");r=0;}
+S_60426:;
+qbs_set(sc_6739,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT));
 qbs_cleanup(qbs_tmp_base,0);
-if(qbevent){evnt(26070,20621,"ide_methods.bas");if(r)goto S_60410;}
-S_60411:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6735,qbs_new_txt_len("html",4))))||new_error){
-if(qbevent){evnt(26070,20622,"ide_methods.bas");if(r)goto S_60411;}
+if(qbevent){evnt(26070,20627,"ide_methods.bas");if(r)goto S_60426;}
+S_60427:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6739,qbs_new_txt_len("html",4))))||new_error){
+if(qbevent){evnt(26070,20628,"ide_methods.bas");if(r)goto S_60427;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("
",20)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20622,"ide_methods.bas");}while(r); -sc_ec_477_end:; -goto sc_6735_end; +if(!qbevent)break;evnt(26070,20628,"ide_methods.bas");}while(r); +sc_ec_478_end:; +goto sc_6739_end; } -S_60413:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6735,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20623,"ide_methods.bas");if(r)goto S_60413;} +S_60429:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6739,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20629,"ide_methods.bas");if(r)goto S_60429;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20623,"ide_methods.bas");}while(r); -sc_ec_478_end:; -goto sc_6735_end; +if(!qbevent)break;evnt(26070,20629,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS- 4 ; +if(!qbevent)break;evnt(26070,20629,"ide_methods.bas");}while(r); +sc_ec_479_end:; +goto sc_6739_end; } -S_60415:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6735,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26070,20624,"ide_methods.bas");if(r)goto S_60415;} +S_60432:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6739,qbs_new_txt_len("wiki",4))))||new_error){ +if(qbevent){evnt(26070,20630,"ide_methods.bas");if(r)goto S_60432;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{CodeEnd}}",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20624,"ide_methods.bas");}while(r); -sc_ec_479_end:; -goto sc_6735_end; +if(!qbevent)break;evnt(26070,20630,"ide_methods.bas");}while(r); +sc_ec_480_end:; +goto sc_6739_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20625,"ide_methods.bas");}while(r); -sc_6735_end:; +if(!qbevent)break;evnt(26070,20631,"ide_methods.bas");}while(r); +sc_6739_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(26070,20633,"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(26070,20627,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20634,"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(26070,20627,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20634,"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(26070,20628,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20635,"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(26070,20628,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20635,"ide_methods.bas");}while(r); do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20629,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20636,"ide_methods.bas");}while(r); LABEL_OPENTEXT:; -if(qbevent){evnt(26070,20631,"ide_methods.bas");r=0;} -S_60425:; -qbs_set(sc_6740,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(qbevent){evnt(26070,20638,"ide_methods.bas");r=0;} +S_60443:; +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(26070,20639,"ide_methods.bas");if(r)goto S_60443;} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20639,"ide_methods.bas");}while(r); +} +S_60446:; +qbs_set(sc_6745,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20632,"ide_methods.bas");if(r)goto S_60425;} -S_60426:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6740,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26070,20633,"ide_methods.bas");if(r)goto S_60426;} -S_60427:; -qbs_set(sc_6741,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +if(qbevent){evnt(26070,20640,"ide_methods.bas");if(r)goto S_60446;} +S_60447:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6745,qbs_new_txt_len("html",4))))||new_error){ +if(qbevent){evnt(26070,20641,"ide_methods.bas");if(r)goto S_60447;} +S_60448:; +qbs_set(sc_6746,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20634,"ide_methods.bas");if(r)goto S_60427;} -S_60428:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26070,20635,"ide_methods.bas");if(r)goto S_60428;} +if(qbevent){evnt(26070,20642,"ide_methods.bas");if(r)goto S_60448;} +S_60449:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6746,qbs_new_txt_len("co",2))))||new_error){ +if(qbevent){evnt(26070,20643,"ide_methods.bas");if(r)goto S_60449;} 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(26070,20635,"ide_methods.bas");}while(r); -sc_ec_480_end:; -goto sc_6741_end; +if(!qbevent)break;evnt(26070,20643,"ide_methods.bas");}while(r); +sc_ec_481_end:; +goto sc_6746_end; } -S_60430:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26070,20636,"ide_methods.bas");if(r)goto S_60430;} +S_60451:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6746,qbs_new_txt_len("nu",2))))||new_error){ +if(qbevent){evnt(26070,20644,"ide_methods.bas");if(r)goto S_60451;} 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(26070,20636,"ide_methods.bas");}while(r); -sc_ec_481_end:; -goto sc_6741_end; +if(!qbevent)break;evnt(26070,20644,"ide_methods.bas");}while(r); +sc_ec_482_end:; +goto sc_6746_end; } -S_60432:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6741,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26070,20637,"ide_methods.bas");if(r)goto S_60432;} +S_60453:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6746,qbs_new_txt_len("qu",2))))||new_error){ +if(qbevent){evnt(26070,20645,"ide_methods.bas");if(r)goto S_60453;} 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(26070,20637,"ide_methods.bas");}while(r); -sc_ec_482_end:; -goto sc_6741_end; +if(!qbevent)break;evnt(26070,20645,"ide_methods.bas");}while(r); +sc_ec_483_end:; +goto sc_6746_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20638,"ide_methods.bas");}while(r); -sc_6741_end:; -sc_ec_483_end:; -goto sc_6740_end; +if(!qbevent)break;evnt(26070,20646,"ide_methods.bas");}while(r); +sc_6746_end:; +sc_ec_484_end:; +goto sc_6745_end; } -S_60437:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6740,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20640,"ide_methods.bas");if(r)goto S_60437;} -S_60438:; -qbs_set(sc_6742,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +S_60458:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6745,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20648,"ide_methods.bas");if(r)goto S_60458;} +S_60459:; +qbs_set(sc_6747,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20641,"ide_methods.bas");if(r)goto S_60438;} -S_60439:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6742,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26070,20642,"ide_methods.bas");if(r)goto S_60439;} +if(qbevent){evnt(26070,20649,"ide_methods.bas");if(r)goto S_60459;} +S_60460:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("co",2))))||new_error){ +if(qbevent){evnt(26070,20650,"ide_methods.bas");if(r)goto S_60460;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf1 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20642,"ide_methods.bas");}while(r); -sc_ec_484_end:; -goto sc_6742_end; +if(!qbevent)break;evnt(26070,20650,"ide_methods.bas");}while(r); +sc_ec_485_end:; +goto sc_6747_end; } -S_60441:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6742,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26070,20643,"ide_methods.bas");if(r)goto S_60441;} +S_60462:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("nu",2))))||new_error){ +if(qbevent){evnt(26070,20651,"ide_methods.bas");if(r)goto S_60462;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf4 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20643,"ide_methods.bas");}while(r); -sc_ec_485_end:; -goto sc_6742_end; +if(!qbevent)break;evnt(26070,20651,"ide_methods.bas");}while(r); +sc_ec_486_end:; +goto sc_6747_end; } -S_60443:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6742,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26070,20644,"ide_methods.bas");if(r)goto S_60443;} +S_60464:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("qu",2))))||new_error){ +if(qbevent){evnt(26070,20652,"ide_methods.bas");if(r)goto S_60464;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf5 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20644,"ide_methods.bas");}while(r); -sc_ec_486_end:; -goto sc_6742_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20645,"ide_methods.bas");}while(r); -sc_6742_end:; +if(!qbevent)break;evnt(26070,20652,"ide_methods.bas");}while(r); sc_ec_487_end:; -goto sc_6740_end; -} -S_60448:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6740,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26070,20647,"ide_methods.bas");if(r)goto S_60448;} -S_60449:; -qbs_set(sc_6743,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20648,"ide_methods.bas");if(r)goto S_60449;} -S_60450:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6743,qbs_new_txt_len("co",2))||qbs_equal(sc_6743,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26070,20649,"ide_methods.bas");if(r)goto S_60450;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",15)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20649,"ide_methods.bas");}while(r); -sc_ec_488_end:; -goto sc_6743_end; -} -S_60452:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6743,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26070,20650,"ide_methods.bas");if(r)goto S_60452;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",7)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20650,"ide_methods.bas");}while(r); -sc_ec_489_end:; -goto sc_6743_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20651,"ide_methods.bas");}while(r); -sc_6743_end:; -sc_ec_490_end:; -goto sc_6740_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20653,"ide_methods.bas");}while(r); -sc_6740_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(26070,20655,"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(26070,20655,"ide_methods.bas");}while(r); -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20656,"ide_methods.bas");}while(r); -LABEL_CLOSETEXT:; -if(qbevent){evnt(26070,20658,"ide_methods.bas");r=0;} -S_60463:; -qbs_set(sc_6746,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20659,"ide_methods.bas");if(r)goto S_60463;} -S_60464:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6746,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26070,20660,"ide_methods.bas");if(r)goto S_60464;} -S_60465:; -qbs_set(sc_6747,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20661,"ide_methods.bas");if(r)goto S_60465;} -S_60466:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6747,qbs_new_txt_len("co",2))||qbs_equal(sc_6747,qbs_new_txt_len("nu",2))||qbs_equal(sc_6747,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26070,20662,"ide_methods.bas");if(r)goto S_60466;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("",7)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20662,"ide_methods.bas");}while(r); -sc_ec_491_end:; goto sc_6747_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20663,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20653,"ide_methods.bas");}while(r); sc_6747_end:; -sc_ec_492_end:; -goto sc_6746_end; +sc_ec_488_end:; +goto sc_6745_end; } -S_60471:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6746,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20665,"ide_methods.bas");if(r)goto S_60471;} -S_60472:; +S_60469:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6745,qbs_new_txt_len("wiki",4))))||new_error){ +if(qbevent){evnt(26070,20655,"ide_methods.bas");if(r)goto S_60469;} +S_60470:; qbs_set(sc_6748,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20666,"ide_methods.bas");if(r)goto S_60472;} -S_60473:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6748,qbs_new_txt_len("co",2))||qbs_equal(sc_6748,qbs_new_txt_len("nu",2))||qbs_equal(sc_6748,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26070,20667,"ide_methods.bas");if(r)goto S_60473;} +if(qbevent){evnt(26070,20656,"ide_methods.bas");if(r)goto S_60470;} +S_60471:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6748,qbs_new_txt_len("co",2))||qbs_equal(sc_6748,qbs_new_txt_len("qu",2))))||new_error){ +if(qbevent){evnt(26070,20657,"ide_methods.bas");if(r)goto S_60471;} do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf0 ",5)); +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20667,"ide_methods.bas");}while(r); -sc_ec_493_end:; +if(!qbevent)break;evnt(26070,20657,"ide_methods.bas");}while(r); +sc_ec_489_end:; +goto sc_6748_end; +} +S_60473:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6748,qbs_new_txt_len("nu",2))))||new_error){ +if(qbevent){evnt(26070,20658,"ide_methods.bas");if(r)goto S_60473;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",7)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20658,"ide_methods.bas");}while(r); +sc_ec_490_end:; goto sc_6748_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20668,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20659,"ide_methods.bas");}while(r); sc_6748_end:; -sc_ec_494_end:; -goto sc_6746_end; -} -S_60478:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6746,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26070,20670,"ide_methods.bas");if(r)goto S_60478;} -S_60479:; -qbs_set(sc_6749,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20671,"ide_methods.bas");if(r)goto S_60479;} -S_60480:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6749,qbs_new_txt_len("co",2))))||new_error){ -if(qbevent){evnt(26070,20672,"ide_methods.bas");if(r)goto S_60480;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#919191}}",19)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20672,"ide_methods.bas");}while(r); -sc_ec_495_end:; -goto sc_6749_end; -} -S_60482:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6749,qbs_new_txt_len("nu",2))))||new_error){ -if(qbevent){evnt(26070,20673,"ide_methods.bas");if(r)goto S_60482;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#F580B1}}",10)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20673,"ide_methods.bas");}while(r); -sc_ec_496_end:; -goto sc_6749_end; -} -S_60484:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6749,qbs_new_txt_len("qu",2))))||new_error){ -if(qbevent){evnt(26070,20674,"ide_methods.bas");if(r)goto S_60484;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#FFB100}}",19)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20674,"ide_methods.bas");}while(r); -sc_ec_497_end:; -goto sc_6749_end; +sc_ec_491_end:; +goto sc_6745_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20675,"ide_methods.bas");}while(r); -sc_6749_end:; -sc_ec_498_end:; -goto sc_6746_end; +if(!qbevent)break;evnt(26070,20661,"ide_methods.bas");}while(r); +sc_6745_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(26070,20663,"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(26070,20663,"ide_methods.bas");}while(r); +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20664,"ide_methods.bas");}while(r); +LABEL_CLOSETEXT:; +if(qbevent){evnt(26070,20666,"ide_methods.bas");r=0;} +S_60484:; +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(26070,20667,"ide_methods.bas");if(r)goto S_60484;} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20667,"ide_methods.bas");}while(r); +} +S_60487:; +qbs_set(sc_6751,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(26070,20668,"ide_methods.bas");if(r)goto S_60487;} +S_60488:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6751,qbs_new_txt_len("html",4))))||new_error){ +if(qbevent){evnt(26070,20669,"ide_methods.bas");if(r)goto S_60488;} +S_60489:; +qbs_set(sc_6752,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(26070,20670,"ide_methods.bas");if(r)goto S_60489;} +S_60490:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6752,qbs_new_txt_len("co",2))||qbs_equal(sc_6752,qbs_new_txt_len("nu",2))||qbs_equal(sc_6752,qbs_new_txt_len("qu",2))))||new_error){ +if(qbevent){evnt(26070,20671,"ide_methods.bas");if(r)goto S_60490;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("",7)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20671,"ide_methods.bas");}while(r); +sc_ec_492_end:; +goto sc_6752_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20672,"ide_methods.bas");}while(r); +sc_6752_end:; +sc_ec_493_end:; +goto sc_6751_end; +} +S_60495:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6751,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20674,"ide_methods.bas");if(r)goto S_60495;} +S_60496:; +qbs_set(sc_6753,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(26070,20675,"ide_methods.bas");if(r)goto S_60496;} +S_60497:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6753,qbs_new_txt_len("co",2))||qbs_equal(sc_6753,qbs_new_txt_len("nu",2))||qbs_equal(sc_6753,qbs_new_txt_len("qu",2))))||new_error){ +if(qbevent){evnt(26070,20676,"ide_methods.bas");if(r)goto S_60497;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf0 ",5)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20676,"ide_methods.bas");}while(r); +sc_ec_494_end:; +goto sc_6753_end; } do{ #include "ret297.txt" if(!qbevent)break;evnt(26070,20677,"ide_methods.bas");}while(r); -sc_6746_end:; -S_60492:; +sc_6753_end:; +sc_ec_495_end:; +goto sc_6751_end; +} +S_60502:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6751,qbs_new_txt_len("wiki",4))))||new_error){ +if(qbevent){evnt(26070,20679,"ide_methods.bas");if(r)goto S_60502;} +S_60503:; +qbs_set(sc_6754,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(26070,20680,"ide_methods.bas");if(r)goto S_60503;} +S_60504:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("co",2))))||new_error){ +if(qbevent){evnt(26070,20681,"ide_methods.bas");if(r)goto S_60504;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#919191}}",19)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20681,"ide_methods.bas");}while(r); +sc_ec_496_end:; +goto sc_6754_end; +} +S_60506:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("nu",2))))||new_error){ +if(qbevent){evnt(26070,20682,"ide_methods.bas");if(r)goto S_60506;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#F580B1}}",10)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20682,"ide_methods.bas");}while(r); +sc_ec_497_end:; +goto sc_6754_end; +} +S_60508:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6754,qbs_new_txt_len("qu",2))))||new_error){ +if(qbevent){evnt(26070,20683,"ide_methods.bas");if(r)goto S_60508;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#FFB100}}",19)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20683,"ide_methods.bas");}while(r); +sc_ec_498_end:; +goto sc_6754_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20684,"ide_methods.bas");}while(r); +sc_6754_end:; +sc_ec_499_end:; +goto sc_6751_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20686,"ide_methods.bas");}while(r); +sc_6751_end:; +S_60516:; if ((*_SUB_EXPORTCODEAS_INTEGER_POST)||new_error){ -if(qbevent){evnt(26070,20679,"ide_methods.bas");if(r)goto S_60492;} +if(qbevent){evnt(26070,20688,"ide_methods.bas");if(r)goto S_60516;} do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(26070,20680,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20689,"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(26070,20680,"ide_methods.bas");}while(r); -S_60495:; +if(!qbevent)break;evnt(26070,20689,"ide_methods.bas");}while(r); +S_60519:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||new_error){ -if(qbevent){evnt(26070,20681,"ide_methods.bas");if(r)goto S_60495;} +if(qbevent){evnt(26070,20690,"ide_methods.bas");if(r)goto S_60519;} 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(26070,20681,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20690,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+ 1 ; -if(!qbevent)break;evnt(26070,20681,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20690,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20681,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20690,"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(26070,20683,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20692,"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(26070,20683,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20692,"ide_methods.bas");}while(r); do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20684,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20693,"ide_methods.bas");}while(r); LABEL_VERIFYKEYWORD:; -if(qbevent){evnt(26070,20686,"ide_methods.bas");r=0;} -S_60504:; +if(qbevent){evnt(26070,20695,"ide_methods.bas");r=0;} +S_60528:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20687,"ide_methods.bas");if(r)goto S_60504;} +if(qbevent){evnt(26070,20696,"ide_methods.bas");if(r)goto S_60528;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_VERI,_SUB_EXPORTCODEAS_STRING_ME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20687,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20696,"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(26070,20687,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20696,"ide_methods.bas");}while(r); } -S_60509:; +S_60533:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_VERI, 1 )!= 95 )))||new_error){ -if(qbevent){evnt(26070,20688,"ide_methods.bas");if(r)goto S_60509;} +if(qbevent){evnt(26070,20697,"ide_methods.bas");if(r)goto S_60533;} do{ *_SUB_EXPORTCODEAS_INTEGER_FLP= 1 ; -if(!qbevent)break;evnt(26070,20688,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20697,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_FLP= 2 ; -if(!qbevent)break;evnt(26070,20688,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20697,"ide_methods.bas");}while(r); } -S_60514:; +S_60538:; 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(26070,20689,"ide_methods.bas");if(r)goto S_60514;} -S_60515:; +if(qbevent){evnt(26070,20698,"ide_methods.bas");if(r)goto S_60538;} +S_60539:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME&*_SUB_EXPORTCODEAS_INTEGER_LE)||new_error){ -if(qbevent){evnt(26070,20690,"ide_methods.bas");if(r)goto S_60515;} -S_60516:; +if(qbevent){evnt(26070,20699,"ide_methods.bas");if(r)goto S_60539;} +S_60540:; 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(26070,20691,"ide_methods.bas");if(r)goto S_60516;} +if(qbevent){evnt(26070,20700,"ide_methods.bas");if(r)goto S_60540;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20691,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20700,"ide_methods.bas");}while(r); } -S_60519:; +S_60543:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_ME&(~(*_SUB_EXPORTCODEAS_INTEGER_LE))){ -if(qbevent){evnt(26070,20692,"ide_methods.bas");if(r)goto S_60519;} -S_60520:; +if(qbevent){evnt(26070,20701,"ide_methods.bas");if(r)goto S_60543;} +S_60544:; 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(26070,20693,"ide_methods.bas");if(r)goto S_60520;} +if(qbevent){evnt(26070,20702,"ide_methods.bas");if(r)goto S_60544;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20693,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20702,"ide_methods.bas");}while(r); } } } -S_60524:; -if ((qbs_cleanup(qbs_tmp_base,*_SUB_EXPORTCODEAS_INTEGER_PC&((qbs_equal(qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI),qbs_new_txt_len("IF",2)))|(qbs_equal(qbs_ucase(_SUB_EXPORTCODEAS_STRING_VERI),qbs_new_txt_len("THEN",4))))))||new_error){ -if(qbevent){evnt(26070,20695,"ide_methods.bas");if(r)goto S_60524;} +S_60548:; +if ((*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ +if(qbevent){evnt(26070,20704,"ide_methods.bas");if(r)goto S_60548;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,_SUB_EXPORTCODEAS_STRING_VERI); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20695,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20704,"ide_methods.bas");}while(r); } -S_60527:; +S_60551:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_NP&*_SUB_EXPORTCODEAS_INTEGER_KW){ -if(qbevent){evnt(26070,20696,"ide_methods.bas");if(r)goto S_60527;} -S_60528:; +if(qbevent){evnt(26070,20705,"ide_methods.bas");if(r)goto S_60551;} +S_60552:; 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(26070,20697,"ide_methods.bas");if(r)goto S_60528;} +if(qbevent){evnt(26070,20706,"ide_methods.bas");if(r)goto S_60552;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20697,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20706,"ide_methods.bas");}while(r); } -S_60531:; +S_60555:; }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(26070,20698,"ide_methods.bas");if(r)goto S_60531;} +if(qbevent){evnt(26070,20707,"ide_methods.bas");if(r)goto S_60555;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= -1 ; -if(!qbevent)break;evnt(26070,20699,"ide_methods.bas");}while(r); -S_60533:; +if(!qbevent)break;evnt(26070,20708,"ide_methods.bas");}while(r); +S_60557:; }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(26070,20700,"ide_methods.bas");if(r)goto S_60533;} +if(qbevent){evnt(26070,20709,"ide_methods.bas");if(r)goto S_60557;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= -1 ; -if(!qbevent)break;evnt(26070,20701,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20710,"ide_methods.bas");}while(r); }else{ -S_60536:; +S_60560:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20703,"ide_methods.bas");if(r)goto S_60536;} +if(qbevent){evnt(26070,20712,"ide_methods.bas");if(r)goto S_60560;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20703,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20712,"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(26070,20703,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20712,"ide_methods.bas");}while(r); } } } @@ -205511,291 +205579,168 @@ if(!qbevent)break;evnt(26070,20703,"ide_methods.bas");}while(r); } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20705,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20714,"ide_methods.bas");}while(r); LABEL_FINDWIKIPAGE:; -if(qbevent){evnt(26070,20707,"ide_methods.bas");r=0;} -S_60543:; +if(qbevent){evnt(26070,20716,"ide_methods.bas");r=0;} +S_60567:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||new_error){ -if(qbevent){evnt(26070,20708,"ide_methods.bas");if(r)goto S_60543;} +if(qbevent){evnt(26070,20717,"ide_methods.bas");if(r)goto S_60567;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20708,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20717,"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(26070,20708,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20717,"ide_methods.bas");}while(r); } -S_60548:; +S_60572:; if ((*_SUB_EXPORTCODEAS_INTEGER_OP)||new_error){ -if(qbevent){evnt(26070,20709,"ide_methods.bas");if(r)goto S_60548;} -S_60549:; -if(qbevent){evnt(26070,20710,"ide_methods.bas");if(r)goto S_60549;} -S_60550:; +if(qbevent){evnt(26070,20718,"ide_methods.bas");if(r)goto S_60572;} +S_60573:; +if(qbevent){evnt(26070,20719,"ide_methods.bas");if(r)goto S_60573;} +S_60574:; 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(26070,20711,"ide_methods.bas");if(r)goto S_60550;} +if(qbevent){evnt(26070,20720,"ide_methods.bas");if(r)goto S_60574;} 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(26070,20711,"ide_methods.bas");}while(r); -sc_ec_499_end:; -goto sc_6752_end; +if(!qbevent)break;evnt(26070,20720,"ide_methods.bas");}while(r); +sc_ec_500_end:; +goto sc_6757_end; } -S_60552:; +S_60576:; 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(26070,20712,"ide_methods.bas");if(r)goto S_60552;} +if(qbevent){evnt(26070,20721,"ide_methods.bas");if(r)goto S_60576;} 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(26070,20712,"ide_methods.bas");}while(r); -sc_ec_500_end:; -goto sc_6752_end; +if(!qbevent)break;evnt(26070,20721,"ide_methods.bas");}while(r); +sc_ec_501_end:; +goto sc_6757_end; } do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPEN",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20713,"ide_methods.bas");}while(r); -sc_6752_end:; -S_60557:; +if(!qbevent)break;evnt(26070,20722,"ide_methods.bas");}while(r); +sc_6757_end:; +S_60581:; }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(26070,20715,"ide_methods.bas");if(r)goto S_60557;} -S_60558:; +if(qbevent){evnt(26070,20724,"ide_methods.bas");if(r)goto S_60581;} +S_60582:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SHELL",5))))||new_error){ -if(qbevent){evnt(26070,20716,"ide_methods.bas");if(r)goto S_60558;} +if(qbevent){evnt(26070,20725,"ide_methods.bas");if(r)goto S_60582;} 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(26070,20716,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20725,"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(26070,20716,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20725,"ide_methods.bas");}while(r); } -S_60563:; +S_60587:; }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(26070,20717,"ide_methods.bas");if(r)goto S_60563;} +if(qbevent){evnt(26070,20726,"ide_methods.bas");if(r)goto S_60587;} 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(26070,20718,"ide_methods.bas");}while(r); -S_60565:; +if(!qbevent)break;evnt(26070,20727,"ide_methods.bas");}while(r); +S_60589:; }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(26070,20719,"ide_methods.bas");if(r)goto S_60565;} +if(qbevent){evnt(26070,20728,"ide_methods.bas");if(r)goto S_60589;} 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(26070,20720,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20729,"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(26070,20722,"ide_methods.bas");}while(r); -S_60569:; -sc_6753_var=0; -if(qbevent){evnt(26070,20723,"ide_methods.bas");if(r)goto S_60569;} -S_60570:; +if(!qbevent)break;evnt(26070,20731,"ide_methods.bas");}while(r); +S_60593:; +sc_6758_var=0; +if(qbevent){evnt(26070,20732,"ide_methods.bas");if(r)goto S_60593;} +S_60594:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("$END",4))))||new_error){ +if(qbevent){evnt(26070,20733,"ide_methods.bas");if(r)goto S_60594;} +S_60595:; +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(26070,20733,"ide_methods.bas");if(r)goto S_60595;} +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(26070,20733,"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(26070,20733,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20733,"ide_methods.bas");}while(r); +} +sc_ec_502_end:; +sc_6758_var=-1; +} +S_60600:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("CALL",4))))||new_error){ -if(qbevent){evnt(26070,20724,"ide_methods.bas");if(r)goto S_60570;} -S_60571:; +if(qbevent){evnt(26070,20734,"ide_methods.bas");if(r)goto S_60600;} +S_60601:; 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(26070,20724,"ide_methods.bas");if(r)goto S_60571;} +if(qbevent){evnt(26070,20734,"ide_methods.bas");if(r)goto S_60601;} 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(26070,20724,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20734,"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(26070,20724,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20734,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20724,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20734,"ide_methods.bas");}while(r); } -sc_ec_501_end:; -sc_6753_var=-1; +sc_ec_503_end:; +sc_6758_var=-1; } -S_60576:; +S_60606:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DECLARE",7))))||new_error){ -if(qbevent){evnt(26070,20725,"ide_methods.bas");if(r)goto S_60576;} -S_60577:; +if(qbevent){evnt(26070,20735,"ide_methods.bas");if(r)goto S_60606;} +S_60607:; 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(26070,20725,"ide_methods.bas");if(r)goto S_60577;} +if(qbevent){evnt(26070,20735,"ide_methods.bas");if(r)goto S_60607;} 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(26070,20725,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20735,"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(26070,20725,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20735,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20725,"ide_methods.bas");}while(r); -} -sc_ec_502_end:; -sc_6753_var=-1; -} -S_60582:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DEF",3))))||new_error){ -if(qbevent){evnt(26070,20726,"ide_methods.bas");if(r)goto S_60582;} -S_60583:; -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(26070,20726,"ide_methods.bas");if(r)goto S_60583;} -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(26070,20726,"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(26070,20726,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20726,"ide_methods.bas");}while(r); -} -sc_ec_503_end:; -sc_6753_var=-1; -} -S_60588:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO",2))))||new_error){ -if(qbevent){evnt(26070,20727,"ide_methods.bas");if(r)goto S_60588;} -S_60589:; -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(26070,20728,"ide_methods.bas");if(r)goto S_60589;} -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(26070,20728,"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(26070,20728,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26070,20728,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26070,20728,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20728,"ide_methods.bas");}while(r); -} -S_60596:; -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(26070,20729,"ide_methods.bas");if(r)goto S_60596;} -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(26070,20729,"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(26070,20729,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26070,20729,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26070,20729,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20729,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20735,"ide_methods.bas");}while(r); } sc_ec_504_end:; -sc_6753_var=-1; +sc_6758_var=-1; } -S_60603:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END",3))))||new_error){ -if(qbevent){evnt(26070,20730,"ide_methods.bas");if(r)goto S_60603;} -S_60604:; -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(26070,20731,"ide_methods.bas");if(r)goto S_60604;} -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(26070,20731,"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(26070,20731,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20731,"ide_methods.bas");}while(r); -} -S_60609:; -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(26070,20732,"ide_methods.bas");if(r)goto S_60609;} -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(26070,20732,"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(26070,20732,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20732,"ide_methods.bas");}while(r); -} -S_60614:; -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(26070,20733,"ide_methods.bas");if(r)goto S_60614;} -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(26070,20733,"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(26070,20733,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20733,"ide_methods.bas");}while(r); -} -S_60619:; -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(26070,20734,"ide_methods.bas");if(r)goto S_60619;} -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(26070,20734,"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(26070,20734,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20734,"ide_methods.bas");}while(r); -} -S_60624:; -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(26070,20735,"ide_methods.bas");if(r)goto S_60624;} +S_60612:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DEF",3))))||new_error){ +if(qbevent){evnt(26070,20736,"ide_methods.bas");if(r)goto S_60612;} +S_60613:; +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(26070,20736,"ide_methods.bas");if(r)goto S_60613;} 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(26070,20735,"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(26070,20735,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20735,"ide_methods.bas");}while(r); -} -S_60629:; -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(26070,20736,"ide_methods.bas");if(r)goto S_60629;} -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(26070,20736,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END TYPE",8)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DEF SEG",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070,20736,"ide_methods.bas");}while(r); do{ @@ -205803,989 +205748,1133 @@ do{ if(!qbevent)break;evnt(26070,20736,"ide_methods.bas");}while(r); } sc_ec_505_end:; -sc_6753_var=-1; +sc_6758_var=-1; } +S_60618:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO",2))))||new_error){ +if(qbevent){evnt(26070,20737,"ide_methods.bas");if(r)goto S_60618;} +S_60619:; +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(26070,20738,"ide_methods.bas");if(r)goto S_60619;} +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(26070,20738,"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(26070,20738,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; +if(!qbevent)break;evnt(26070,20738,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; +if(!qbevent)break;evnt(26070,20738,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20738,"ide_methods.bas");}while(r); +} +S_60626:; +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(26070,20739,"ide_methods.bas");if(r)goto S_60626;} +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(26070,20739,"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(26070,20739,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; +if(!qbevent)break;evnt(26070,20739,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; +if(!qbevent)break;evnt(26070,20739,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20739,"ide_methods.bas");}while(r); +} +sc_ec_506_end:; +sc_6758_var=-1; +} +S_60633:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END",3))))||new_error){ +if(qbevent){evnt(26070,20740,"ide_methods.bas");if(r)goto S_60633;} S_60634:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT",4))))||new_error){ -if(qbevent){evnt(26070,20737,"ide_methods.bas");if(r)goto S_60634;} -S_60635:; -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(26070,20738,"ide_methods.bas");if(r)goto S_60635;} +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(26070,20741,"ide_methods.bas");if(r)goto S_60634;} 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_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(26070,20738,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20741,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT CASE",9)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END DECLARE",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20738,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20741,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20738,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20741,"ide_methods.bas");}while(r); } -S_60640:; -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(26070,20739,"ide_methods.bas");if(r)goto S_60640;} -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(26070,20739,"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(26070,20739,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20739,"ide_methods.bas");}while(r); -} -S_60645:; -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(26070,20740,"ide_methods.bas");if(r)goto S_60645;} -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(26070,20740,"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(26070,20740,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20740,"ide_methods.bas");}while(r); -} -S_60650:; +S_60639:; 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(26070,20741,"ide_methods.bas");if(r)goto S_60650;} +if(qbevent){evnt(26070,20742,"ide_methods.bas");if(r)goto S_60639;} 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(26070,20741,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20742,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT FUNCTION",13)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END FUNCTION",12)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20741,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20742,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20741,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20742,"ide_methods.bas");}while(r); } -S_60655:; +S_60644:; +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(26070,20743,"ide_methods.bas");if(r)goto S_60644;} +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(26070,20743,"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(26070,20743,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20743,"ide_methods.bas");}while(r); +} +S_60649:; 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(26070,20742,"ide_methods.bas");if(r)goto S_60655;} +if(qbevent){evnt(26070,20744,"ide_methods.bas");if(r)goto S_60649;} 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(26070,20742,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20744,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT SELECT",11)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END SELECT",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20742,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20744,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20742,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20744,"ide_methods.bas");}while(r); } -S_60660:; +S_60654:; 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(26070,20743,"ide_methods.bas");if(r)goto S_60660;} +if(qbevent){evnt(26070,20745,"ide_methods.bas");if(r)goto S_60654;} 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(26070,20743,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20745,"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(26070,20743,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20743,"ide_methods.bas");}while(r); -} -S_60665:; -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(26070,20744,"ide_methods.bas");if(r)goto S_60665;} -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(26070,20744,"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(26070,20744,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20744,"ide_methods.bas");}while(r); -} -sc_ec_506_end:; -sc_6753_var=-1; -} -S_60670:; -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(26070,20745,"ide_methods.bas");if(r)goto S_60670;} -S_60671:; -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(26070,20745,"ide_methods.bas");if(r)goto S_60671;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (general)",10))); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END SUB",7)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070,20745,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20745,"ide_methods.bas");}while(r); } -sc_ec_507_end:; -sc_6753_var=-1; -} -S_60674:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("KEY",3))))||new_error){ -if(qbevent){evnt(26070,20746,"ide_methods.bas");if(r)goto S_60674;} -S_60675:; -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(26070,20746,"ide_methods.bas");if(r)goto S_60675;} +S_60659:; +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(26070,20746,"ide_methods.bas");if(r)goto S_60659;} 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(26070,20746,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("KEY LIST",8)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END TYPE",8)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070,20746,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; if(!qbevent)break;evnt(26070,20746,"ide_methods.bas");}while(r); } -sc_ec_508_end:; -sc_6753_var=-1; +sc_ec_507_end:; +sc_6758_var=-1; +} +S_60664:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT",4))))||new_error){ +if(qbevent){evnt(26070,20747,"ide_methods.bas");if(r)goto S_60664;} +S_60665:; +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(26070,20748,"ide_methods.bas");if(r)goto S_60665;} +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(26070,20748,"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(26070,20748,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20748,"ide_methods.bas");}while(r); +} +S_60670:; +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(26070,20749,"ide_methods.bas");if(r)goto S_60670;} +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(26070,20749,"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(26070,20749,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20749,"ide_methods.bas");}while(r); +} +S_60675:; +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(26070,20750,"ide_methods.bas");if(r)goto S_60675;} +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(26070,20750,"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(26070,20750,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20750,"ide_methods.bas");}while(r); } S_60680:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LPRINT",6))))||new_error){ -if(qbevent){evnt(26070,20747,"ide_methods.bas");if(r)goto S_60680;} -S_60681:; -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(26070,20747,"ide_methods.bas");if(r)goto S_60681;} +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(26070,20751,"ide_methods.bas");if(r)goto S_60680;} 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(26070,20747,"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(26070,20747,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20747,"ide_methods.bas");}while(r); -} -sc_ec_509_end:; -sc_6753_var=-1; -} -S_60686:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LINE",4))))||new_error){ -if(qbevent){evnt(26070,20748,"ide_methods.bas");if(r)goto S_60686;} -S_60687:; -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(26070,20749,"ide_methods.bas");if(r)goto S_60687;} -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(26070,20750,"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(26070,20750,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20750,"ide_methods.bas");}while(r); -S_60691:; -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(26070,20751,"ide_methods.bas");if(r)goto S_60691;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (file statement)",17))); +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(26070,20751,"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(26070,20751,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20751,"ide_methods.bas");}while(r); } +S_60685:; +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(26070,20752,"ide_methods.bas");if(r)goto S_60685;} +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(26070,20752,"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(26070,20752,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20752,"ide_methods.bas");}while(r); } -sc_ec_510_end:; -sc_6753_var=-1; +S_60690:; +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(26070,20753,"ide_methods.bas");if(r)goto S_60690;} +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(26070,20753,"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(26070,20753,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20753,"ide_methods.bas");}while(r); } S_60695:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LOOP",4))))||new_error){ -if(qbevent){evnt(26070,20753,"ide_methods.bas");if(r)goto S_60695;} -S_60696:; 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(26070,20754,"ide_methods.bas");if(r)goto S_60696;} +if(qbevent){evnt(26070,20754,"ide_methods.bas");if(r)goto S_60695;} 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(26070,20754,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO...LOOP",9)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT WHILE",10)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070,20754,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26070,20754,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26070,20754,"ide_methods.bas");}while(r); -do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; if(!qbevent)break;evnt(26070,20754,"ide_methods.bas");}while(r); } -S_60703:; -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(26070,20755,"ide_methods.bas");if(r)goto S_60703;} +sc_ec_508_end:; +sc_6758_var=-1; +} +S_60700:; +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(26070,20755,"ide_methods.bas");if(r)goto S_60700;} +S_60701:; +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(26070,20755,"ide_methods.bas");if(r)goto S_60701;} 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_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(26070,20755,"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(26070,20755,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(26070,20755,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(26070,20755,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20755,"ide_methods.bas");}while(r); } -sc_ec_511_end:; -sc_6753_var=-1; +sc_ec_509_end:; +sc_6758_var=-1; +} +S_60704:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("KEY",3))))||new_error){ +if(qbevent){evnt(26070,20756,"ide_methods.bas");if(r)goto S_60704;} +S_60705:; +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(26070,20756,"ide_methods.bas");if(r)goto S_60705;} +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(26070,20756,"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(26070,20756,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20756,"ide_methods.bas");}while(r); +} +sc_ec_510_end:; +sc_6758_var=-1; } S_60710:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON",2))))||new_error){ -if(qbevent){evnt(26070,20756,"ide_methods.bas");if(r)goto S_60710;} +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LPRINT",6))))||new_error){ +if(qbevent){evnt(26070,20757,"ide_methods.bas");if(r)goto S_60710;} S_60711:; -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 ((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(26070,20757,"ide_methods.bas");if(r)goto S_60711;} 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(26070,20757,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON ERROR",8)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LPRINT USING",12)); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(26070,20757,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; if(!qbevent)break;evnt(26070,20757,"ide_methods.bas");}while(r); } +sc_ec_511_end:; +sc_6758_var=-1; +} S_60716:; -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 ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LINE",4))))||new_error){ if(qbevent){evnt(26070,20758,"ide_methods.bas");if(r)goto S_60716;} +S_60717:; +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(26070,20759,"ide_methods.bas");if(r)goto S_60717;} +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(26070,20760,"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(26070,20760,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20760,"ide_methods.bas");}while(r); +S_60721:; +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(26070,20761,"ide_methods.bas");if(r)goto S_60721;} +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(26070,20761,"ide_methods.bas");}while(r); +} +} +sc_ec_512_end:; +sc_6758_var=-1; +} +S_60725:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LOOP",4))))||new_error){ +if(qbevent){evnt(26070,20763,"ide_methods.bas");if(r)goto S_60725;} +S_60726:; +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(26070,20764,"ide_methods.bas");if(r)goto S_60726;} +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(26070,20764,"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(26070,20764,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; +if(!qbevent)break;evnt(26070,20764,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; +if(!qbevent)break;evnt(26070,20764,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20764,"ide_methods.bas");}while(r); +} +S_60733:; +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(26070,20765,"ide_methods.bas");if(r)goto S_60733;} +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(26070,20765,"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(26070,20765,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; +if(!qbevent)break;evnt(26070,20765,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; +if(!qbevent)break;evnt(26070,20765,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20765,"ide_methods.bas");}while(r); +} +sc_ec_513_end:; +sc_6758_var=-1; +} +S_60740:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON",2))))||new_error){ +if(qbevent){evnt(26070,20766,"ide_methods.bas");if(r)goto S_60740;} +S_60741:; +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(26070,20767,"ide_methods.bas");if(r)goto S_60741;} +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(26070,20767,"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(26070,20767,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; +if(!qbevent)break;evnt(26070,20767,"ide_methods.bas");}while(r); +} +S_60746:; +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(26070,20768,"ide_methods.bas");if(r)goto S_60746;} 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(26070,20758,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20768,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON KEY",6)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON KEY(n)",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20758,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20768,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20758,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20768,"ide_methods.bas");}while(r); } -S_60721:; +S_60751:; 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(26070,20759,"ide_methods.bas");if(r)goto S_60721;} +if(qbevent){evnt(26070,20769,"ide_methods.bas");if(r)goto S_60751;} 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(26070,20759,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20769,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON STRIG",8)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON STRIG(n)",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20759,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20769,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20759,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20769,"ide_methods.bas");}while(r); } -S_60726:; +S_60756:; 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(26070,20760,"ide_methods.bas");if(r)goto S_60726;} +if(qbevent){evnt(26070,20770,"ide_methods.bas");if(r)goto S_60756;} 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(26070,20760,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20770,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON TIMER",8)); +qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON TIMER(n)",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20760,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20770,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20760,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20770,"ide_methods.bas");}while(r); } -sc_ec_512_end:; -sc_6753_var=-1; +sc_ec_514_end:; +sc_6758_var=-1; } -S_60731:; +S_60761:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPTION",6))))||new_error){ -if(qbevent){evnt(26070,20761,"ide_methods.bas");if(r)goto S_60731;} -S_60732:; +if(qbevent){evnt(26070,20771,"ide_methods.bas");if(r)goto S_60761;} +S_60762:; 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(26070,20761,"ide_methods.bas");if(r)goto S_60732;} +if(qbevent){evnt(26070,20771,"ide_methods.bas");if(r)goto S_60762;} 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(26070,20761,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20771,"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(26070,20761,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20771,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20761,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20771,"ide_methods.bas");}while(r); } -sc_ec_513_end:; -sc_6753_var=-1; +sc_ec_515_end:; +sc_6758_var=-1; } -S_60737:; +S_60767:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PALETTE",7))))||new_error){ -if(qbevent){evnt(26070,20762,"ide_methods.bas");if(r)goto S_60737;} -S_60738:; +if(qbevent){evnt(26070,20772,"ide_methods.bas");if(r)goto S_60767;} +S_60768:; 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(26070,20762,"ide_methods.bas");if(r)goto S_60738;} +if(qbevent){evnt(26070,20772,"ide_methods.bas");if(r)goto S_60768;} 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(26070,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20772,"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(26070,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20772,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20772,"ide_methods.bas");}while(r); } -sc_ec_514_end:; -sc_6753_var=-1; +sc_ec_516_end:; +sc_6758_var=-1; } -S_60743:; +S_60773:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PRINT",5))))||new_error){ -if(qbevent){evnt(26070,20763,"ide_methods.bas");if(r)goto S_60743;} -S_60744:; +if(qbevent){evnt(26070,20773,"ide_methods.bas");if(r)goto S_60773;} +S_60774:; 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(26070,20764,"ide_methods.bas");if(r)goto S_60744;} +if(qbevent){evnt(26070,20774,"ide_methods.bas");if(r)goto S_60774;} 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(26070,20765,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20775,"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(26070,20765,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20775,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20765,"ide_methods.bas");}while(r); -S_60748:; +if(!qbevent)break;evnt(26070,20775,"ide_methods.bas");}while(r); +S_60778:; 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(26070,20766,"ide_methods.bas");if(r)goto S_60748;} +if(qbevent){evnt(26070,20776,"ide_methods.bas");if(r)goto S_60778;} 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(26070,20766,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20776,"ide_methods.bas");}while(r); } } -sc_ec_515_end:; -sc_6753_var=-1; +sc_ec_517_end:; +sc_6758_var=-1; } -S_60752:; +S_60782:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("RANDOMIZE",9))))||new_error){ -if(qbevent){evnt(26070,20768,"ide_methods.bas");if(r)goto S_60752;} -S_60753:; +if(qbevent){evnt(26070,20778,"ide_methods.bas");if(r)goto S_60782;} +S_60783:; 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(26070,20768,"ide_methods.bas");if(r)goto S_60753;} +if(qbevent){evnt(26070,20778,"ide_methods.bas");if(r)goto S_60783;} 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(26070,20768,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20778,"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(26070,20768,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20778,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20768,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20778,"ide_methods.bas");}while(r); } -sc_ec_516_end:; -sc_6753_var=-1; +sc_ec_518_end:; +sc_6758_var=-1; } -S_60758:; +S_60788:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SELECT",6))))||new_error){ -if(qbevent){evnt(26070,20769,"ide_methods.bas");if(r)goto S_60758;} -S_60759:; +if(qbevent){evnt(26070,20779,"ide_methods.bas");if(r)goto S_60788;} +S_60789:; 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(26070,20770,"ide_methods.bas");if(r)goto S_60759;} +if(qbevent){evnt(26070,20780,"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, 4 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20770,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20780,"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(26070,20770,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20780,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20770,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20780,"ide_methods.bas");}while(r); } -S_60764:; +S_60794:; 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(26070,20771,"ide_methods.bas");if(r)goto S_60764;} +if(qbevent){evnt(26070,20781,"ide_methods.bas");if(r)goto S_60794;} 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(26070,20771,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20781,"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(26070,20771,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20781,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20771,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20781,"ide_methods.bas");}while(r); } -sc_ec_517_end:; -sc_6753_var=-1; +sc_ec_519_end:; +sc_6758_var=-1; } -S_60769:; +S_60799:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("VIEW",4))))||new_error){ -if(qbevent){evnt(26070,20772,"ide_methods.bas");if(r)goto S_60769;} -S_60770:; +if(qbevent){evnt(26070,20782,"ide_methods.bas");if(r)goto S_60799;} +S_60800:; 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(26070,20772,"ide_methods.bas");if(r)goto S_60770;} +if(qbevent){evnt(26070,20782,"ide_methods.bas");if(r)goto S_60800;} 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(26070,20772,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20782,"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(26070,20772,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20782,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(26070,20772,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20782,"ide_methods.bas");}while(r); } -sc_ec_518_end:; -sc_6753_var=-1; +sc_ec_520_end:; +sc_6758_var=-1; } -S_60775:; +S_60805:; 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(26070,20773,"ide_methods.bas");if(r)goto S_60775;} -S_60776:; +if(qbevent){evnt(26070,20783,"ide_methods.bas");if(r)goto S_60805;} +S_60806:; 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(26070,20773,"ide_methods.bas");if(r)goto S_60776;} +if(qbevent){evnt(26070,20783,"ide_methods.bas");if(r)goto S_60806;} 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(26070,20773,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); } -sc_ec_519_end:; +sc_ec_521_end:; } -sc_6753_end:; +sc_6758_end:; } } } } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20776,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20786,"ide_methods.bas");}while(r); LABEL_WRITELINK:; -if(qbevent){evnt(26070,20778,"ide_methods.bas");r=0;} -S_60782:; +if(qbevent){evnt(26070,20788,"ide_methods.bas");r=0;} +S_60812:; 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(26070,20779,"ide_methods.bas");if(r)goto S_60782;} +if(qbevent){evnt(26070,20789,"ide_methods.bas");if(r)goto S_60812;} do{ goto LABEL_UNKNOWNNOLINKNOCOLOR; -if(!qbevent)break;evnt(26070,20779,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20789,"ide_methods.bas");}while(r); } -S_60785:; +S_60815:; if ((*_SUB_EXPORTCODEAS_INTEGER_CU)||new_error){ -if(qbevent){evnt(26070,20780,"ide_methods.bas");if(r)goto S_60785;} +if(qbevent){evnt(26070,20790,"ide_methods.bas");if(r)goto S_60815;} do{ goto LABEL_CUSTOMNOLINK; -if(!qbevent)break;evnt(26070,20780,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20790,"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(26070,20781,"ide_methods.bas");}while(r); -S_60789:; +if(!qbevent)break;evnt(26070,20791,"ide_methods.bas");}while(r); +S_60819:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME&*_SUB_EXPORTCODEAS_INTEGER_LE&*_SUB_EXPORTCODEAS_INTEGER_CO)||new_error){ -if(qbevent){evnt(26070,20782,"ide_methods.bas");if(r)goto S_60789;} +if(qbevent){evnt(26070,20792,"ide_methods.bas");if(r)goto S_60819;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(26070,20782,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20792,"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(26070,20782,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20792,"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(26070,20782,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20792,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(26070,20782,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20792,"ide_methods.bas");}while(r); } -S_60795:; +S_60825:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||new_error){ -if(qbevent){evnt(26070,20783,"ide_methods.bas");if(r)goto S_60795;} +if(qbevent){evnt(26070,20793,"ide_methods.bas");if(r)goto S_60825;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LNK,_SUB_EXPORTCODEAS_STRING_ME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Cm|",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_MEC); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\cf2",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"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(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Cl|",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_KWC); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_RTC,qbs_new_txt_len("\\cf3",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20793,"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(26070,20784,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20794,"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(26070,20784,"ide_methods.bas");}while(r); -S_60808:; -qbs_set(sc_6756,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(!qbevent)break;evnt(26070,20794,"ide_methods.bas");}while(r); +S_60838:; +qbs_set(sc_6761,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20785,"ide_methods.bas");if(r)goto S_60808;} -S_60809:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6756,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26070,20786,"ide_methods.bas");if(r)goto S_60809;} +if(qbevent){evnt(26070,20795,"ide_methods.bas");if(r)goto S_60838;} +S_60839:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6761,qbs_new_txt_len("html",4))))||new_error){ +if(qbevent){evnt(26070,20796,"ide_methods.bas");if(r)goto S_60839;} do{ -sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 111 ,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(26070,20787,"ide_methods.bas");}while(r); +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(26070,20797,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 111 ; -if(!qbevent)break;evnt(26070,20788,"ide_methods.bas");}while(r); -sc_ec_520_end:; -goto sc_6756_end; +*_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+( 2 **_SUB_EXPORTCODEAS_INTEGER_PAL)+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 120 ; +if(!qbevent)break;evnt(26070,20798,"ide_methods.bas");}while(r); +sc_ec_522_end:; +goto sc_6761_end; } -S_60812:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6756,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20789,"ide_methods.bas");if(r)goto S_60812;} +S_60842:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6761,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20799,"ide_methods.bas");if(r)goto S_60842;} 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_RTC),qbs_new_txt_len("\\ul0 ",5)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}}\\cf0 ",8)),1); -if(!qbevent)break;evnt(26070,20790,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20800,"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(26070,20791,"ide_methods.bas");}while(r); -sc_ec_521_end:; -goto sc_6756_end; +if(!qbevent)break;evnt(26070,20801,"ide_methods.bas");}while(r); +sc_ec_523_end:; +goto sc_6761_end; } -S_60815:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6756,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26070,20792,"ide_methods.bas");if(r)goto S_60815;} -S_60816:; +S_60845:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6761,qbs_new_txt_len("wiki",4))))||new_error){ +if(qbevent){evnt(26070,20802,"ide_methods.bas");if(r)goto S_60845;} +S_60846:; 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(26070,20793,"ide_methods.bas");if(r)goto S_60816;} +if(qbevent){evnt(26070,20803,"ide_methods.bas");if(r)goto S_60846;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_LKL+ 7 ,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_TMP,_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}",2)),1); -if(!qbevent)break;evnt(26070,20794,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20804,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 7 ; -if(!qbevent)break;evnt(26070,20795,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20805,"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_TMP,_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("|",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}",2)),1); -if(!qbevent)break;evnt(26070,20797,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20807,"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(26070,20798,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20808,"ide_methods.bas");}while(r); } -sc_ec_522_end:; -goto sc_6756_end; +sc_ec_524_end:; +goto sc_6761_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20800,"ide_methods.bas");}while(r); -sc_6756_end:; +if(!qbevent)break;evnt(26070,20810,"ide_methods.bas");}while(r); +sc_6761_end:; do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20802,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20812,"ide_methods.bas");}while(r); LABEL_CUSTOMNOLINK:; -if(qbevent){evnt(26070,20804,"ide_methods.bas");r=0;} +if(qbevent){evnt(26070,20814,"ide_methods.bas");r=0;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; -if(!qbevent)break;evnt(26070,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20815,"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(26070,20805,"ide_methods.bas");}while(r); -S_60829:; -qbs_set(sc_6758,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(!qbevent)break;evnt(26070,20815,"ide_methods.bas");}while(r); +S_60859:; +qbs_set(sc_6763,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20806,"ide_methods.bas");if(r)goto S_60829;} -S_60830:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6758,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26070,20807,"ide_methods.bas");if(r)goto S_60830;} +if(qbevent){evnt(26070,20816,"ide_methods.bas");if(r)goto S_60859;} +S_60860:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6763,qbs_new_txt_len("html",4))))||new_error){ +if(qbevent){evnt(26070,20817,"ide_methods.bas");if(r)goto S_60860;} 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(26070,20808,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20818,"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(26070,20808,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20818,"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(26070,20809,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20819,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 37 ; -if(!qbevent)break;evnt(26070,20810,"ide_methods.bas");}while(r); -sc_ec_523_end:; -goto sc_6758_end; +if(!qbevent)break;evnt(26070,20820,"ide_methods.bas");}while(r); +sc_ec_525_end:; +goto sc_6763_end; } -S_60835:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6758,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20811,"ide_methods.bas");if(r)goto S_60835;} +S_60865:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6763,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20821,"ide_methods.bas");if(r)goto S_60865;} 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(26070,20812,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20822,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 10 ; -if(!qbevent)break;evnt(26070,20813,"ide_methods.bas");}while(r); -sc_ec_524_end:; -goto sc_6758_end; -} -S_60838:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6758,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26070,20814,"ide_methods.bas");if(r)goto S_60838;} -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(26070,20815,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 17 ; -if(!qbevent)break;evnt(26070,20816,"ide_methods.bas");}while(r); -sc_ec_525_end:; -goto sc_6758_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20817,"ide_methods.bas");}while(r); -sc_6758_end:; -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20819,"ide_methods.bas");}while(r); -LABEL_UNKNOWNNOLINKNOCOLOR:; -if(qbevent){evnt(26070,20821,"ide_methods.bas");r=0;} -S_60845:; -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(26070,20822,"ide_methods.bas");if(r)goto S_60845;} -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(26070,20822,"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(26070,20823,"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(26070,20823,"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(26070,20823,"ide_methods.bas");}while(r); -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20824,"ide_methods.bas");}while(r); -LABEL_ESCAPECHAR:; -if(qbevent){evnt(26070,20826,"ide_methods.bas");r=0;} -S_60852:; -qbs_set(sc_6762,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20827,"ide_methods.bas");if(r)goto S_60852;} -S_60853:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6762,qbs_new_txt_len("html",4))))||new_error){ -if(qbevent){evnt(26070,20828,"ide_methods.bas");if(r)goto S_60853;} -S_60854:; -if(qbevent){evnt(26070,20829,"ide_methods.bas");if(r)goto S_60854;} -S_60855:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||new_error){ -if(qbevent){evnt(26070,20830,"ide_methods.bas");if(r)goto S_60855;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(""",6)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20830,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20830,"ide_methods.bas");}while(r); sc_ec_526_end:; goto sc_6763_end; } -S_60858:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||new_error){ -if(qbevent){evnt(26070,20831,"ide_methods.bas");if(r)goto S_60858;} +S_60868:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6763,qbs_new_txt_len("wiki",4))))||new_error){ +if(qbevent){evnt(26070,20824,"ide_methods.bas");if(r)goto S_60868;} do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("&",5)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20831,"ide_methods.bas");}while(r); +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(26070,20825,"ide_methods.bas");}while(r); do{ -*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20831,"ide_methods.bas");}while(r); +*_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 17 ; +if(!qbevent)break;evnt(26070,20826,"ide_methods.bas");}while(r); sc_ec_527_end:; goto sc_6763_end; } -S_60861:; +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20827,"ide_methods.bas");}while(r); +sc_6763_end:; +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20829,"ide_methods.bas");}while(r); +LABEL_UNKNOWNNOLINKNOCOLOR:; +if(qbevent){evnt(26070,20831,"ide_methods.bas");r=0;} +S_60875:; +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(26070,20832,"ide_methods.bas");if(r)goto S_60875;} +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(26070,20832,"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(26070,20833,"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(26070,20833,"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(26070,20833,"ide_methods.bas");}while(r); +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20834,"ide_methods.bas");}while(r); +LABEL_ESCAPECHAR:; +if(qbevent){evnt(26070,20836,"ide_methods.bas");r=0;} +S_60882:; +qbs_set(sc_6767,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(26070,20837,"ide_methods.bas");if(r)goto S_60882;} +S_60883:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("html",4))))||new_error){ +if(qbevent){evnt(26070,20838,"ide_methods.bas");if(r)goto S_60883;} +S_60884:; +if(qbevent){evnt(26070,20839,"ide_methods.bas");if(r)goto S_60884;} +S_60885:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||new_error){ +if(qbevent){evnt(26070,20840,"ide_methods.bas");if(r)goto S_60885;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(""",6)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20840,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; +if(!qbevent)break;evnt(26070,20840,"ide_methods.bas");}while(r); +sc_ec_528_end:; +goto sc_6768_end; +} +S_60888:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||new_error){ +if(qbevent){evnt(26070,20841,"ide_methods.bas");if(r)goto S_60888;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("&",5)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20841,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; +if(!qbevent)break;evnt(26070,20841,"ide_methods.bas");}while(r); +sc_ec_529_end:; +goto sc_6768_end; +} +S_60891:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 60 )))||new_error){ -if(qbevent){evnt(26070,20832,"ide_methods.bas");if(r)goto S_60861;} +if(qbevent){evnt(26070,20842,"ide_methods.bas");if(r)goto S_60891;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("<",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20832,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20842,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20832,"ide_methods.bas");}while(r); -sc_ec_528_end:; -goto sc_6763_end; +if(!qbevent)break;evnt(26070,20842,"ide_methods.bas");}while(r); +sc_ec_530_end:; +goto sc_6768_end; } -S_60864:; +S_60894:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 62 )))||new_error){ -if(qbevent){evnt(26070,20833,"ide_methods.bas");if(r)goto S_60864;} +if(qbevent){evnt(26070,20843,"ide_methods.bas");if(r)goto S_60894;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(">",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20833,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20843,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20833,"ide_methods.bas");}while(r); -sc_ec_529_end:; -goto sc_6763_end; +if(!qbevent)break;evnt(26070,20843,"ide_methods.bas");}while(r); +sc_ec_531_end:; +goto sc_6768_end; } -S_60867:; +S_60897:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26070,20834,"ide_methods.bas");if(r)goto S_60867;} +if(qbevent){evnt(26070,20844,"ide_methods.bas");if(r)goto S_60897;} do{ *_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); -if(!qbevent)break;evnt(26070,20835,"ide_methods.bas");}while(r); -S_60869:; +if(!qbevent)break;evnt(26070,20845,"ide_methods.bas");}while(r); +S_60899:; if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||new_error){ -if(qbevent){evnt(26070,20836,"ide_methods.bas");if(r)goto S_60869;} +if(qbevent){evnt(26070,20846,"ide_methods.bas");if(r)goto S_60899;} do{ *_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; -if(!qbevent)break;evnt(26070,20836,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20846,"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(26070,20837,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20837,"ide_methods.bas");}while(r); -sc_ec_530_end:; -goto sc_6763_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20838,"ide_methods.bas");}while(r); -sc_6763_end:; -sc_ec_531_end:; -goto sc_6762_end; -} -S_60877:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6762,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20840,"ide_methods.bas");if(r)goto S_60877;} -S_60878:; -if(qbevent){evnt(26070,20841,"ide_methods.bas");if(r)goto S_60878;} -S_60879:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 92 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||new_error){ -if(qbevent){evnt(26070,20842,"ide_methods.bas");if(r)goto S_60879;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("\\",1)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20842,"ide_methods.bas");}while(r); -sc_ec_532_end:; -goto sc_6764_end; -} -S_60881:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26070,20843,"ide_methods.bas");if(r)goto S_60881;} -do{ -*_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); -if(!qbevent)break;evnt(26070,20844,"ide_methods.bas");}while(r); -S_60883:; -if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||new_error){ -if(qbevent){evnt(26070,20845,"ide_methods.bas");if(r)goto S_60883;} -do{ -*_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; -if(!qbevent)break;evnt(26070,20845,"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(26070,20846,"ide_methods.bas");}while(r); -do{ -*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20846,"ide_methods.bas");}while(r); -sc_ec_533_end:; -goto sc_6764_end; -} -do{ -#include "ret297.txt" if(!qbevent)break;evnt(26070,20847,"ide_methods.bas");}while(r); -sc_6764_end:; -sc_ec_534_end:; -goto sc_6762_end; -} -S_60891:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6762,qbs_new_txt_len("wiki",4))))||new_error){ -if(qbevent){evnt(26070,20849,"ide_methods.bas");if(r)goto S_60891;} -S_60892:; -if(qbevent){evnt(26070,20850,"ide_methods.bas");if(r)goto S_60892;} -S_60893:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ -if(qbevent){evnt(26070,20851,"ide_methods.bas");if(r)goto S_60893;} -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(26070,20851,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(26070,20851,"ide_methods.bas");}while(r); -sc_ec_535_end:; -goto sc_6765_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20852,"ide_methods.bas");}while(r); -sc_6765_end:; -sc_ec_536_end:; -goto sc_6762_end; -} -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20854,"ide_methods.bas");}while(r); -sc_6762_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(26070,20856,"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(26070,20856,"ide_methods.bas");}while(r); -do{ -#include "ret297.txt" -if(!qbevent)break;evnt(26070,20857,"ide_methods.bas");}while(r); -LABEL_ENDLINEOPS:; -if(qbevent){evnt(26070,20859,"ide_methods.bas");r=0;} -S_60905:; -qbs_set(sc_6768,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(26070,20860,"ide_methods.bas");if(r)goto S_60905;} -S_60906:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6768,qbs_new_txt_len("rich",4))))||new_error){ -if(qbevent){evnt(26070,20861,"ide_methods.bas");if(r)goto S_60906;} -do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\par",4)); -qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20861,"ide_methods.bas");}while(r); -sc_ec_537_end:; +if(!qbevent)break;evnt(26070,20847,"ide_methods.bas");}while(r); +sc_ec_532_end:; goto sc_6768_end; } do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20862,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20848,"ide_methods.bas");}while(r); sc_6768_end:; +sc_ec_533_end:; +goto sc_6767_end; +} +S_60907:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20850,"ide_methods.bas");if(r)goto S_60907;} +S_60908:; +if(qbevent){evnt(26070,20851,"ide_methods.bas");if(r)goto S_60908;} +S_60909:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 92 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||new_error){ +if(qbevent){evnt(26070,20852,"ide_methods.bas");if(r)goto S_60909;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("\\",1)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20852,"ide_methods.bas");}while(r); +sc_ec_534_end:; +goto sc_6769_end; +} +S_60911:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ +if(qbevent){evnt(26070,20853,"ide_methods.bas");if(r)goto S_60911;} +do{ +*_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); +if(!qbevent)break;evnt(26070,20854,"ide_methods.bas");}while(r); +S_60913:; +if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||new_error){ +if(qbevent){evnt(26070,20855,"ide_methods.bas");if(r)goto S_60913;} +do{ +*_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; +if(!qbevent)break;evnt(26070,20855,"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(26070,20856,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; +if(!qbevent)break;evnt(26070,20856,"ide_methods.bas");}while(r); +sc_ec_535_end:; +goto sc_6769_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20857,"ide_methods.bas");}while(r); +sc_6769_end:; +sc_ec_536_end:; +goto sc_6767_end; +} +S_60921:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6767,qbs_new_txt_len("wiki",4))))||new_error){ +if(qbevent){evnt(26070,20859,"ide_methods.bas");if(r)goto S_60921;} +S_60922:; +if(qbevent){evnt(26070,20860,"ide_methods.bas");if(r)goto S_60922;} +S_60923:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||new_error){ +if(qbevent){evnt(26070,20861,"ide_methods.bas");if(r)goto S_60923;} +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(26070,20861,"ide_methods.bas");}while(r); +do{ +*_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; +if(!qbevent)break;evnt(26070,20861,"ide_methods.bas");}while(r); +sc_ec_537_end:; +goto sc_6770_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20862,"ide_methods.bas");}while(r); +sc_6770_end:; +sc_ec_538_end:; +goto sc_6767_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20864,"ide_methods.bas");}while(r); +sc_6767_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(26070,20866,"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(26070,20866,"ide_methods.bas");}while(r); +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20867,"ide_methods.bas");}while(r); +LABEL_ENDLINEOPS:; +if(qbevent){evnt(26070,20869,"ide_methods.bas");r=0;} +S_60935:; +qbs_set(sc_6773,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(26070,20870,"ide_methods.bas");if(r)goto S_60935;} +S_60936:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6773,qbs_new_txt_len("rich",4))))||new_error){ +if(qbevent){evnt(26070,20871,"ide_methods.bas");if(r)goto S_60936;} +do{ +qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\par",4)); +qbs_cleanup(qbs_tmp_base,0); +if(!qbevent)break;evnt(26070,20871,"ide_methods.bas");}while(r); +sc_ec_539_end:; +goto sc_6773_end; +} +do{ +#include "ret297.txt" +if(!qbevent)break;evnt(26070,20872,"ide_methods.bas");}while(r); +sc_6773_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(26070,20864,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20874,"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(26070,20864,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20874,"ide_methods.bas");}while(r); do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20865,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20875,"ide_methods.bas");}while(r); LABEL_GETTHEMECOLORS:; -if(qbevent){evnt(26070,20867,"ide_methods.bas");r=0;} +if(qbevent){evnt(26070,20877,"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(26070,20868,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20878,"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(26070,20869,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20879,"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(26070,20870,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20880,"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(26070,20871,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20881,"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(26070,20872,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20882,"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(26070,20873,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20883,"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(26070,20874,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20884,"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(26070,20875,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20885,"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(26070,20876,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20886,"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(26070,20877,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20887,"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(26070,20878,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20888,"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(26070,20879,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20889,"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(26070,20880,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20890,"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(26070,20881,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20891,"ide_methods.bas");}while(r); do{ #include "ret297.txt" -if(!qbevent)break;evnt(26070,20882,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20892,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free297.txt" @@ -206805,65 +206894,65 @@ new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (new_error) goto exit_subfunc; -S_60929:; +S_60959:; if ((-(*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE< 128 ))||new_error){ -if(qbevent){evnt(26070,20887,"ide_methods.bas");if(r)goto S_60929;} +if(qbevent){evnt(26070,20897,"ide_methods.bas");if(r)goto S_60959;} do{ qbs_set(_FUNC_UNICODETOUTF8CHAR_STRING_UNICODETOUTF8CHAR,func_chr(*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20889,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20899,"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(26070,20892,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20902,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC=*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE; -if(!qbevent)break;evnt(26070,20892,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20902,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST= 128 ; -if(!qbevent)break;evnt(26070,20893,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20903,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN= 63 ; -if(!qbevent)break;evnt(26070,20893,"ide_methods.bas");}while(r); -S_60936:; +if(!qbevent)break;evnt(26070,20903,"ide_methods.bas");}while(r); +S_60966:; do{ -if(qbevent){evnt(26070,20894,"ide_methods.bas");if(r)goto S_60936;} +if(qbevent){evnt(26070,20904,"ide_methods.bas");if(r)goto S_60966;} do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST= 128 |(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST/ 2 ); -if(!qbevent)break;evnt(26070,20895,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20905,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN=(*_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN/ 2 ); -if(!qbevent)break;evnt(26070,20895,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20905,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_CONTI= 128 |(*_FUNC_UNICODETOUTF8CHAR_LONG_UC& 63 ); -if(!qbevent)break;evnt(26070,20896,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20906,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC=*_FUNC_UNICODETOUTF8CHAR_LONG_UC/ 64 ; -if(!qbevent)break;evnt(26070,20896,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20906,"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(26070,20897,"ide_methods.bas");}while(r); -S_60942:; +if(!qbevent)break;evnt(26070,20907,"ide_methods.bas");}while(r); +S_60972:; if ((-(*_FUNC_UNICODETOUTF8CHAR_LONG_UC<=*_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN))||new_error){ -if(qbevent){evnt(26070,20898,"ide_methods.bas");if(r)goto S_60942;} +if(qbevent){evnt(26070,20908,"ide_methods.bas");if(r)goto S_60972;} do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST=(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST|*_FUNC_UNICODETOUTF8CHAR_LONG_UC); -if(!qbevent)break;evnt(26070,20899,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20909,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC= 0 ; -if(!qbevent)break;evnt(26070,20899,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20909,"ide_methods.bas");}while(r); } -S_60946:; -dl_continue_6771:; +S_60976:; +dl_continue_6776:; }while((!(-(*_FUNC_UNICODETOUTF8CHAR_LONG_UC== 0 )))&&(!new_error)); -dl_exit_6771:; -if(qbevent){evnt(26070,20901,"ide_methods.bas");if(r)goto S_60946;} +dl_exit_6776:; +if(qbevent){evnt(26070,20911,"ide_methods.bas");if(r)goto S_60976;} 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(26070,20902,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20912,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); @@ -206888,60 +206977,60 @@ 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(26070,20907,"ide_methods.bas");}while(r); -S_60950:; -fornext_value6774= 1 ; -fornext_finalvalue6774=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->len; -fornext_step6774= 1 ; -if (fornext_step6774<0) fornext_step_negative6774=1; else fornext_step_negative6774=0; -if (new_error) goto fornext_error6774; -goto fornext_entrylabel6774; +if(!qbevent)break;evnt(26070,20917,"ide_methods.bas");}while(r); +S_60980:; +fornext_value6779= 1 ; +fornext_finalvalue6779=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->len; +fornext_step6779= 1 ; +if (fornext_step6779<0) fornext_step_negative6779=1; else fornext_step_negative6779=0; +if (new_error) goto fornext_error6779; +goto fornext_entrylabel6779; while(1){ -fornext_value6774=fornext_step6774+(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI); -fornext_entrylabel6774: -*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI=fornext_value6774; +fornext_value6779=fornext_step6779+(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI); +fornext_entrylabel6779: +*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI=fornext_value6779; qbs_cleanup(qbs_tmp_base,0); -if (fornext_step_negative6774){ -if (fornext_value6774fornext_finalvalue6774) break; +if (fornext_value6779>fornext_finalvalue6779) break; } -fornext_error6774:; -if(qbevent){evnt(26070,20908,"ide_methods.bas");if(r)goto S_60950;} +fornext_error6779:; +if(qbevent){evnt(26070,20918,"ide_methods.bas");if(r)goto S_60980;} 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(26070,20910,"ide_methods.bas");}while(r); -S_60952:; +if(!qbevent)break;evnt(26070,20920,"ide_methods.bas");}while(r); +S_60982:; if ((-(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII> 127 ))||new_error){ -if(qbevent){evnt(26070,20911,"ide_methods.bas");if(r)goto S_60952;} +if(qbevent){evnt(26070,20921,"ide_methods.bas");if(r)goto S_60982;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE=func__mapunicode(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII); -if(!qbevent)break;evnt(26070,20913,"ide_methods.bas");}while(r); -S_60954:; +if(!qbevent)break;evnt(26070,20923,"ide_methods.bas");}while(r); +S_60984:; if ((-(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE== 0 ))||new_error){ -if(qbevent){evnt(26070,20915,"ide_methods.bas");if(r)goto S_60954;} +if(qbevent){evnt(26070,20925,"ide_methods.bas");if(r)goto S_60984;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE= 65533 ; -if(!qbevent)break;evnt(26070,20915,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20925,"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(26070,20916,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20926,"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(26070,20919,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20929,"ide_methods.bas");}while(r); } -fornext_continue_6773:; +fornext_continue_6778:; } -fornext_exit_6773:; +fornext_exit_6778:; do{ qbs_set(_FUNC_ANSITEXTTOUTF8TEXT_STRING_ANSITEXTTOUTF8TEXT,_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(26070,20922,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(26070,20932,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free299.txt"