diff --git a/internal/source/data340.txt b/internal/source/data340.txt index 9e7701488..8f19e1b59 100644 --- a/internal/source/data340.txt +++ b/internal/source/data340.txt @@ -17,25 +17,22 @@ qbs *_SUB_EXPORTCODEAS_STRING_CEOL=NULL; if (!_SUB_EXPORTCODEAS_STRING_CEOL)_SUB_EXPORTCODEAS_STRING_CEOL=qbs_new(0,0); qbs *_SUB_EXPORTCODEAS_STRING_STXT=NULL; if (!_SUB_EXPORTCODEAS_STRING_STXT)_SUB_EXPORTCODEAS_STRING_STXT=qbs_new(0,0); +int8 pass6934; int32 *_SUB_EXPORTCODEAS_LONG_I=NULL; if(_SUB_EXPORTCODEAS_LONG_I==NULL){ _SUB_EXPORTCODEAS_LONG_I=(int32*)mem_static_malloc(4); *_SUB_EXPORTCODEAS_LONG_I=0; } -int64 fornext_value6935; -int64 fornext_finalvalue6935; -int64 fornext_step6935; -uint8 fornext_step_negative6935; +int64 fornext_value6936; +int64 fornext_finalvalue6936; +int64 fornext_step6936; +uint8 fornext_step_negative6936; qbs *_SUB_EXPORTCODEAS_STRING_PERC=NULL; if (!_SUB_EXPORTCODEAS_STRING_PERC)_SUB_EXPORTCODEAS_STRING_PERC=qbs_new(0,0); -int32 pass6936; -byte_element_struct *byte_element_6937=NULL; -if (!byte_element_6937){ -if ((mem_static_pointer+=12)tmp||_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->fixed||_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->readonly){ -oldstr7001=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT; -if (oldstr7001->cmem_descriptor){ -_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new_cmem(oldstr7001->len,0); +oldstr7002=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT; +if (oldstr7002->cmem_descriptor){ +_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new_cmem(oldstr7002->len,0); }else{ -_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new(oldstr7001->len,0); +_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT=qbs_new(oldstr7002->len,0); } -memcpy(_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->chr,oldstr7001->chr,oldstr7001->len); +memcpy(_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->chr,oldstr7002->chr,oldstr7002->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_value7003; -int64 fornext_finalvalue7003; -int64 fornext_step7003; -uint8 fornext_step_negative7003; -byte_element_struct *byte_element_7004=NULL; -if (!byte_element_7004){ -if ((mem_static_pointer+=12)fixed)qbs_set(oldstr7001,_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT); +if(oldstr7002){ +if(oldstr7002->fixed)qbs_set(oldstr7002,_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 ee72feb53..cfef540bb 100644 --- a/internal/source/main.txt +++ b/internal/source/main.txt @@ -206680,3378 +206680,3382 @@ do{ qbg_screen(NULL,NULL, 3 , 0 ,NULL,12); if(!qbevent)break;evnt(23822,20670,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_new_txt_len("",0)); +qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,FUNC_GETSELECTEDTEXT(&(pass6934= -1 ))); qbs_cleanup(qbs_tmp_base,0); if(!qbevent)break;evnt(23822,20671,"ide_methods.bas");}while(r); S_60739:; -fornext_value6935= 1 ; -fornext_finalvalue6935=*__LONG_IDEN; -fornext_step6935= 1 ; -if (fornext_step6935<0) fornext_step_negative6935=1; else fornext_step_negative6935=0; -if (is_error_pending()) goto fornext_error6935; -goto fornext_entrylabel6935; -while(1){ -fornext_value6935=fornext_step6935+(*_SUB_EXPORTCODEAS_LONG_I); -fornext_entrylabel6935: -*_SUB_EXPORTCODEAS_LONG_I=fornext_value6935; -if (fornext_step_negative6935){ -if (fornext_value6935fornext_finalvalue6935) break; -} -fornext_error6935:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_STXT,qbs_new_txt_len("",0))))||is_error_pending()){ if(qbevent){evnt(23822,20672,"ide_methods.bas");if(r)goto S_60739;} +S_60740:; +fornext_value6936= 1 ; +fornext_finalvalue6936=*__LONG_IDEN; +fornext_step6936= 1 ; +if (fornext_step6936<0) fornext_step_negative6936=1; else fornext_step_negative6936=0; +if (is_error_pending()) goto fornext_error6936; +goto fornext_entrylabel6936; +while(1){ +fornext_value6936=fornext_step6936+(*_SUB_EXPORTCODEAS_LONG_I); +fornext_entrylabel6936: +*_SUB_EXPORTCODEAS_LONG_I=fornext_value6936; +if (fornext_step_negative6936){ +if (fornext_value6936fornext_finalvalue6936) break; +} +fornext_error6936:; +if(qbevent){evnt(23822,20673,"ide_methods.bas");if(r)goto S_60740;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_STXT,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_STXT,FUNC_IDEGETLINE(_SUB_EXPORTCODEAS_LONG_I)),_SUB_EXPORTCODEAS_STRING_CEOL)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20673,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20674,"ide_methods.bas");}while(r); do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6936=qbr(std::floor( 30 / ((long double)(*__LONG_IDEN))**_SUB_EXPORTCODEAS_LONG_I))))); +qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6937=qbr(std::floor( 30 / ((long double)(*__LONG_IDEN))**_SUB_EXPORTCODEAS_LONG_I))))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20674,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20675,"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(23822,20675,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20676,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); -if(!qbevent)break;evnt(23822,20676,"ide_methods.bas");}while(r); -fornext_continue_6934:; +if(!qbevent)break;evnt(23822,20677,"ide_methods.bas");}while(r); +fornext_continue_6935:; } -fornext_exit_6934:; -S_60745:; +fornext_exit_6935:; +S_60746:; while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_EXPORTCODEAS_STRING_STXT,_SUB_EXPORTCODEAS_STRING_CEOL->len),_SUB_EXPORTCODEAS_STRING_CEOL)))||is_error_pending()){ -if(qbevent){evnt(23822,20678,"ide_methods.bas");if(r)goto S_60745;} +if(qbevent){evnt(23822,20679,"ide_methods.bas");if(r)goto S_60746;} 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(23822,20679,"ide_methods.bas");}while(r); -ww_continue_6938:; +if(!qbevent)break;evnt(23822,20680,"ide_methods.bas");}while(r); +ww_continue_6939:; } -ww_exit_6938:; -S_60748:; +ww_exit_6939:; +} +S_60750:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_STXT,qbs_new_txt_len("",0))))||is_error_pending()){ -if(qbevent){evnt(23822,20681,"ide_methods.bas");if(r)goto S_60748;} +if(qbevent){evnt(23822,20683,"ide_methods.bas");if(r)goto S_60750;} 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(23822,20681,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20683,"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(23822,20681,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20683,"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(23822,20682,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20684,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_SPOS= 1 ; -if(!qbevent)break;evnt(23822,20683,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20685,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ETXT,func_space( 1000000 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20684,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20686,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS= 1 ; -if(!qbevent)break;evnt(23822,20685,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20687,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20687,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20689,"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(23822,20688,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20690,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(23822,20690,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20692,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(23822,20691,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20693,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(23822,20692,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20694,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20693,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20695,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20694,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20696,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; -if(!qbevent)break;evnt(23822,20695,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20697,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(23822,20697,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20699,"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(23822,20698,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20700,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(23822,20699,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20701,"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(23822,20700,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20702,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(23822,20701,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20703,"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(23822,20702,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20704,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NP= 0 ; -if(!qbevent)break;evnt(23822,20704,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20706,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; -if(!qbevent)break;evnt(23822,20705,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20707,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; -if(!qbevent)break;evnt(23822,20706,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20708,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_DL= 0 ; -if(!qbevent)break;evnt(23822,20707,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20709,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; -if(!qbevent)break;evnt(23822,20708,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20710,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; -if(!qbevent)break;evnt(23822,20709,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20711,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; -if(!qbevent)break;evnt(23822,20710,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20712,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20711,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20713,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NC= 0 ; -if(!qbevent)break;evnt(23822,20713,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20715,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20714,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20716,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(23822,20715,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20717,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=186; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENCODEBLOCK; RETURN_186:; -if(!qbevent)break;evnt(23822,20717,"ide_methods.bas");}while(r); -S_60783:; +if(!qbevent)break;evnt(23822,20719,"ide_methods.bas");}while(r); +S_60785:; while((-(*_SUB_EXPORTCODEAS_LONG_SPOS<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ -if(qbevent){evnt(23822,20718,"ide_methods.bas");if(r)goto S_60783;} +if(qbevent){evnt(23822,20720,"ide_methods.bas");if(r)goto S_60785;} do{ -qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6944=qbr( 30 +std::floor( 70 / ((long double)(*_SUB_EXPORTCODEAS_LONG_SLEN))**_SUB_EXPORTCODEAS_LONG_SPOS))))); +qbs_set(_SUB_EXPORTCODEAS_STRING_PERC,FUNC_STR2(&(pass6945=qbr( 30 +std::floor( 70 / ((long double)(*_SUB_EXPORTCODEAS_LONG_SLEN))**_SUB_EXPORTCODEAS_LONG_SPOS))))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20719,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20721,"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(23822,20720,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20722,"ide_methods.bas");}while(r); do{ SUB_UPDATEIDEINFO(); -if(!qbevent)break;evnt(23822,20721,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20723,"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(23822,20723,"ide_methods.bas");}while(r); -S_60788:; -if(qbevent){evnt(23822,20724,"ide_methods.bas");if(r)goto S_60788;} -S_60789:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 10 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 13 )))||is_error_pending()){ -if(qbevent){evnt(23822,20725,"ide_methods.bas");if(r)goto S_60789;} +if(!qbevent)break;evnt(23822,20725,"ide_methods.bas");}while(r); S_60790:; -if ((~(*_SUB_EXPORTCODEAS_INTEGER_LB))||is_error_pending()){ if(qbevent){evnt(23822,20726,"ide_methods.bas");if(r)goto S_60790;} S_60791:; -if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 10 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 13 )))||is_error_pending()){ if(qbevent){evnt(23822,20727,"ide_methods.bas");if(r)goto S_60791;} S_60792:; -if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ +if ((~(*_SUB_EXPORTCODEAS_INTEGER_LB))||is_error_pending()){ if(qbevent){evnt(23822,20728,"ide_methods.bas");if(r)goto S_60792;} +S_60793:; +if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ +if(qbevent){evnt(23822,20729,"ide_methods.bas");if(r)goto S_60793;} +S_60794:; +if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ +if(qbevent){evnt(23822,20730,"ide_methods.bas");if(r)goto S_60794;} 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(23822,20728,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20730,"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(23822,20728,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20730,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20728,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20730,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20728,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20730,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(23822,20729,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20731,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(23822,20729,"ide_methods.bas");}while(r); -S_60801:; +if(!qbevent)break;evnt(23822,20731,"ide_methods.bas");}while(r); +S_60803:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME),qbs_new_txt_len("$NOPREFIX",9))))||is_error_pending()){ -if(qbevent){evnt(23822,20730,"ide_methods.bas");if(r)goto S_60801;} +if(qbevent){evnt(23822,20732,"ide_methods.bas");if(r)goto S_60803;} do{ *_SUB_EXPORTCODEAS_INTEGER_NP= -1 ; -if(!qbevent)break;evnt(23822,20730,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20732,"ide_methods.bas");}while(r); } } -S_60805:; +S_60807:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20732,"ide_methods.bas");if(r)goto S_60805;} -S_60806:; +if(qbevent){evnt(23822,20734,"ide_methods.bas");if(r)goto S_60807;} +S_60808:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ -if(qbevent){evnt(23822,20733,"ide_methods.bas");if(r)goto S_60806;} +if(qbevent){evnt(23822,20735,"ide_methods.bas");if(r)goto S_60808;} do{ return_point[next_return_point++]=189; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_189:; -if(!qbevent)break;evnt(23822,20733,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20735,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=190; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_190:; -if(!qbevent)break;evnt(23822,20733,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20735,"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(23822,20733,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20735,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20733,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20735,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20734,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20736,"ide_methods.bas");}while(r); } -S_60815:; +S_60817:; if ((*_SUB_EXPORTCODEAS_INTEGER_CO)||is_error_pending()){ -if(qbevent){evnt(23822,20736,"ide_methods.bas");if(r)goto S_60815;} +if(qbevent){evnt(23822,20738,"ide_methods.bas");if(r)goto S_60817;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20736,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20738,"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(23822,20736,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20738,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=191; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_191:; -if(!qbevent)break;evnt(23822,20736,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20738,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(23822,20736,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20738,"ide_methods.bas");}while(r); } -S_60821:; +S_60823:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||is_error_pending()){ -if(qbevent){evnt(23822,20737,"ide_methods.bas");if(r)goto S_60821;} +if(qbevent){evnt(23822,20739,"ide_methods.bas");if(r)goto S_60823;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20737,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20739,"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(23822,20737,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20739,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=192; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_192:; -if(!qbevent)break;evnt(23822,20737,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20739,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20737,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20739,"ide_methods.bas");}while(r); } -S_60827:; +S_60829:; if ((-(*_SUB_EXPORTCODEAS_LONG_SPOS> 1 ))||is_error_pending()){ -if(qbevent){evnt(23822,20738,"ide_methods.bas");if(r)goto S_60827;} -S_60828:; +if(qbevent){evnt(23822,20740,"ide_methods.bas");if(r)goto S_60829;} +S_60830:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 )!= 95 )))||is_error_pending()){ -if(qbevent){evnt(23822,20739,"ide_methods.bas");if(r)goto S_60828;} +if(qbevent){evnt(23822,20741,"ide_methods.bas");if(r)goto S_60830;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(23822,20739,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20741,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(23822,20739,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20741,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(23822,20739,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20741,"ide_methods.bas");}while(r); } }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(23822,20741,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20743,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(23822,20741,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20743,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(23822,20741,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20743,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=193; if (next_return_point>=return_points) more_return_points(); goto LABEL_ENDLINEOPS; RETURN_193:; -if(!qbevent)break;evnt(23822,20743,"ide_methods.bas");}while(r); -S_60839:; +if(!qbevent)break;evnt(23822,20745,"ide_methods.bas");}while(r); +S_60841:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 13 ))||is_error_pending()){ -if(qbevent){evnt(23822,20744,"ide_methods.bas");if(r)goto S_60839;} +if(qbevent){evnt(23822,20746,"ide_methods.bas");if(r)goto S_60841;} do{ *_SUB_EXPORTCODEAS_INTEGER_LB= -1 ; -if(!qbevent)break;evnt(23822,20744,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); } } -S_60843:; +S_60845:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 10 ))||is_error_pending()){ -if(qbevent){evnt(23822,20746,"ide_methods.bas");if(r)goto S_60843;} +if(qbevent){evnt(23822,20748,"ide_methods.bas");if(r)goto S_60845;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= 0 ; -if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20748,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ML= 0 ; -if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20748,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_DL= 0 ; -if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20748,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LB= 0 ; -if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20748,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NL= -1 ; -if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20748,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20746,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20748,"ide_methods.bas");}while(r); } sc_ec_432_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60851:; +S_60853:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 9 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 32 )))||is_error_pending()){ -if(qbevent){evnt(23822,20747,"ide_methods.bas");if(r)goto S_60851;} -S_60852:; +if(qbevent){evnt(23822,20749,"ide_methods.bas");if(r)goto S_60853;} +S_60854:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ -if(qbevent){evnt(23822,20748,"ide_methods.bas");if(r)goto S_60852;} +if(qbevent){evnt(23822,20750,"ide_methods.bas");if(r)goto S_60854;} 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(23822,20749,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20751,"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(23822,20749,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20751,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(23822,20749,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20751,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(23822,20749,"ide_methods.bas");}while(r); -S_60857:; -qbs_set(sc_6947,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); +if(!qbevent)break;evnt(23822,20751,"ide_methods.bas");}while(r); +S_60859:; +qbs_set(sc_6948,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20750,"ide_methods.bas");if(r)goto S_60857;} -S_60858:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6947,qbs_new_txt_len("$LET",4))||qbs_equal(sc_6947,qbs_new_txt_len("$ELSE",5))||qbs_equal(sc_6947,qbs_new_txt_len("$END",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20751,"ide_methods.bas");if(r)goto S_60858;} +if(qbevent){evnt(23822,20752,"ide_methods.bas");if(r)goto S_60859;} +S_60860:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("$LET",4))||qbs_equal(sc_6948,qbs_new_txt_len("$ELSE",5))||qbs_equal(sc_6948,qbs_new_txt_len("$END",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20753,"ide_methods.bas");if(r)goto S_60860;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= -1 ; -if(!qbevent)break;evnt(23822,20751,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20753,"ide_methods.bas");}while(r); sc_ec_433_end:; -goto sc_6947_end; +goto sc_6948_end; } -S_60860:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6947,qbs_new_txt_len("$IF",3))||qbs_equal(sc_6947,qbs_new_txt_len("$ELSEIF",7))))||is_error_pending()){ -if(qbevent){evnt(23822,20752,"ide_methods.bas");if(r)goto S_60860;} +S_60862:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("$IF",3))||qbs_equal(sc_6948,qbs_new_txt_len("$ELSEIF",7))))||is_error_pending()){ +if(qbevent){evnt(23822,20754,"ide_methods.bas");if(r)goto S_60862;} do{ *_SUB_EXPORTCODEAS_INTEGER_PC= -1 ; -if(!qbevent)break;evnt(23822,20752,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20754,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,20752,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20754,"ide_methods.bas");}while(r); sc_ec_434_end:; -goto sc_6947_end; +goto sc_6948_end; } -sc_6947_end:; +sc_6948_end:; } -S_60865:; +S_60867:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20755,"ide_methods.bas");if(r)goto S_60865;} -S_60866:; +if(qbevent){evnt(23822,20757,"ide_methods.bas");if(r)goto S_60867;} +S_60868:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ -if(qbevent){evnt(23822,20756,"ide_methods.bas");if(r)goto S_60866;} +if(qbevent){evnt(23822,20758,"ide_methods.bas");if(r)goto S_60868;} do{ return_point[next_return_point++]=196; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_196:; -if(!qbevent)break;evnt(23822,20756,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20758,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=197; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_197:; -if(!qbevent)break;evnt(23822,20756,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20758,"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(23822,20756,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20758,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20756,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20758,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20757,"ide_methods.bas");}while(r); -S_60874:; +if(!qbevent)break;evnt(23822,20759,"ide_methods.bas");}while(r); +S_60876:; if ((*_SUB_EXPORTCODEAS_INTEGER_IN)||is_error_pending()){ -if(qbevent){evnt(23822,20757,"ide_methods.bas");if(r)goto S_60874;} +if(qbevent){evnt(23822,20759,"ide_methods.bas");if(r)goto S_60876;} do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,20757,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20759,"ide_methods.bas");}while(r); } -S_60877:; -qbs_set(sc_6948,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20758,"ide_methods.bas");if(r)goto S_60877;} -S_60878:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("REM",3))))||is_error_pending()){ -if(qbevent){evnt(23822,20759,"ide_methods.bas");if(r)goto S_60878;} S_60879:; +qbs_set(sc_6949,qbs_ucase(_SUB_EXPORTCODEAS_STRING_KW)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20760,"ide_methods.bas");if(r)goto S_60879;} +S_60880:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6949,qbs_new_txt_len("REM",3))))||is_error_pending()){ +if(qbevent){evnt(23822,20761,"ide_methods.bas");if(r)goto S_60880;} +S_60881:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ -if(qbevent){evnt(23822,20759,"ide_methods.bas");if(r)goto S_60879;} +if(qbevent){evnt(23822,20761,"ide_methods.bas");if(r)goto S_60881;} do{ *_SUB_EXPORTCODEAS_INTEGER_CO= -1 ; -if(!qbevent)break;evnt(23822,20759,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20761,"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(23822,20759,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20761,"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(23822,20759,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20761,"ide_methods.bas");}while(r); } sc_ec_435_end:; -goto sc_6948_end; +goto sc_6949_end; } -S_60884:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("DATA",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20760,"ide_methods.bas");if(r)goto S_60884;} +S_60886:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6949,qbs_new_txt_len("DATA",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20762,"ide_methods.bas");if(r)goto S_60886;} do{ *_SUB_EXPORTCODEAS_INTEGER_DL= -1 ; -if(!qbevent)break;evnt(23822,20760,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20762,"ide_methods.bas");}while(r); sc_ec_436_end:; -goto sc_6948_end; +goto sc_6949_end; } -S_60886:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("OPEN",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20761,"ide_methods.bas");if(r)goto S_60886;} +S_60888:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6949,qbs_new_txt_len("OPEN",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20763,"ide_methods.bas");if(r)goto S_60888;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= -1 ; -if(!qbevent)break;evnt(23822,20761,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20763,"ide_methods.bas");}while(r); sc_ec_437_end:; -goto sc_6948_end; +goto sc_6949_end; } -S_60888:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("IF",2))||qbs_equal(sc_6948,qbs_new_txt_len("ELSEIF",6))||qbs_equal(sc_6948,qbs_new_txt_len("UNTIL",5))||qbs_equal(sc_6948,qbs_new_txt_len("WHILE",5))))||is_error_pending()){ -if(qbevent){evnt(23822,20762,"ide_methods.bas");if(r)goto S_60888;} +S_60890:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6949,qbs_new_txt_len("IF",2))||qbs_equal(sc_6949,qbs_new_txt_len("ELSEIF",6))||qbs_equal(sc_6949,qbs_new_txt_len("UNTIL",5))||qbs_equal(sc_6949,qbs_new_txt_len("WHILE",5))))||is_error_pending()){ +if(qbevent){evnt(23822,20764,"ide_methods.bas");if(r)goto S_60890;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20764,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,20762,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20764,"ide_methods.bas");}while(r); sc_ec_438_end:; -goto sc_6948_end; +goto sc_6949_end; } -S_60891:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6948,qbs_new_txt_len("THEN",4))||qbs_equal(sc_6948,qbs_new_txt_len("ELSE",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20763,"ide_methods.bas");if(r)goto S_60891;} +S_60893:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6949,qbs_new_txt_len("THEN",4))||qbs_equal(sc_6949,qbs_new_txt_len("ELSE",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20765,"ide_methods.bas");if(r)goto S_60893;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(23822,20763,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20765,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(23822,20763,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20765,"ide_methods.bas");}while(r); sc_ec_439_end:; -goto sc_6948_end; -} -S_60895:; -fornext_value6950= 1 ; -fornext_finalvalue6950=*__LONG_IDN; -fornext_step6950= 1 ; -if (fornext_step6950<0) fornext_step_negative6950=1; else fornext_step_negative6950=0; -if (is_error_pending()) goto fornext_error6950; -goto fornext_entrylabel6950; -while(1){ -fornext_value6950=fornext_step6950+(*_SUB_EXPORTCODEAS_LONG_I); -fornext_entrylabel6950: -*_SUB_EXPORTCODEAS_LONG_I=fornext_value6950; -if (fornext_step_negative6950){ -if (fornext_value6950fornext_finalvalue6950) break; -} -fornext_error6950:; -if(qbevent){evnt(23822,20765,"ide_methods.bas");if(r)goto S_60895;} -S_60896:; +goto sc_6949_end; +} +S_60897:; +fornext_value6951= 1 ; +fornext_finalvalue6951=*__LONG_IDN; +fornext_step6951= 1 ; +if (fornext_step6951<0) fornext_step_negative6951=1; else fornext_step_negative6951=0; +if (is_error_pending()) goto fornext_error6951; +goto fornext_entrylabel6951; +while(1){ +fornext_value6951=fornext_step6951+(*_SUB_EXPORTCODEAS_LONG_I); +fornext_entrylabel6951: +*_SUB_EXPORTCODEAS_LONG_I=fornext_value6951; +if (fornext_step_negative6951){ +if (fornext_value6951fornext_finalvalue6951) break; +} +fornext_error6951:; +if(qbevent){evnt(23822,20767,"ide_methods.bas");if(r)goto S_60897;} +S_60898:; 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 )))||is_error_pending()){ -if(qbevent){evnt(23822,20766,"ide_methods.bas");if(r)goto S_60896;} +if(qbevent){evnt(23822,20768,"ide_methods.bas");if(r)goto S_60898;} 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(23822,20767,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20769,"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(23822,20767,"ide_methods.bas");}while(r); -S_60899:; +if(!qbevent)break;evnt(23822,20769,"ide_methods.bas");}while(r); +S_60901:; 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)))))))||is_error_pending()){ -if(qbevent){evnt(23822,20768,"ide_methods.bas");if(r)goto S_60899;} +if(qbevent){evnt(23822,20770,"ide_methods.bas");if(r)goto S_60901;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -2 ; -if(!qbevent)break;evnt(23822,20768,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20770,"ide_methods.bas");}while(r); do{ -goto fornext_exit_6949; -if(!qbevent)break;evnt(23822,20768,"ide_methods.bas");}while(r); +goto fornext_exit_6950; +if(!qbevent)break;evnt(23822,20770,"ide_methods.bas");}while(r); } } -fornext_continue_6949:; +fornext_continue_6950:; } -fornext_exit_6949:; -sc_6948_end:; +fornext_exit_6950:; +sc_6949_end:; } -S_60907:; +S_60909:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||is_error_pending()){ -if(qbevent){evnt(23822,20773,"ide_methods.bas");if(r)goto S_60907;} +if(qbevent){evnt(23822,20775,"ide_methods.bas");if(r)goto S_60909;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20773,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20775,"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(23822,20773,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20775,"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(23822,20773,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20775,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20773,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20775,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20774,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20776,"ide_methods.bas");}while(r); sc_ec_440_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60914:; +S_60916:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||is_error_pending()){ -if(qbevent){evnt(23822,20775,"ide_methods.bas");if(r)goto S_60914;} -S_60915:; +if(qbevent){evnt(23822,20777,"ide_methods.bas");if(r)goto S_60916;} +S_60917:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ -if(qbevent){evnt(23822,20776,"ide_methods.bas");if(r)goto S_60915;} +if(qbevent){evnt(23822,20778,"ide_methods.bas");if(r)goto S_60917;} do{ *_SUB_EXPORTCODEAS_INTEGER_QU= -1 ; -if(!qbevent)break;evnt(23822,20777,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20779,"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(23822,20777,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20779,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=200; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_200:; -if(!qbevent)break;evnt(23822,20777,"ide_methods.bas");}while(r); -S_60919:; +if(!qbevent)break;evnt(23822,20779,"ide_methods.bas");}while(r); +S_60921:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_QU){ -if(qbevent){evnt(23822,20778,"ide_methods.bas");if(r)goto S_60919;} +if(qbevent){evnt(23822,20780,"ide_methods.bas");if(r)goto S_60921;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= -1 ; -if(!qbevent)break;evnt(23822,20779,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20781,"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(23822,20779,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20781,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=201; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_201:; -if(!qbevent)break;evnt(23822,20779,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20781,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_QU= 0 ; -if(!qbevent)break;evnt(23822,20779,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20781,"ide_methods.bas");}while(r); } } -S_60925:; +S_60927:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||is_error_pending()){ -if(qbevent){evnt(23822,20781,"ide_methods.bas");if(r)goto S_60925;} +if(qbevent){evnt(23822,20783,"ide_methods.bas");if(r)goto S_60927;} 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(23822,20781,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20783,"ide_methods.bas");}while(r); } sc_ec_441_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60928:; +S_60930:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 36 )))||is_error_pending()){ -if(qbevent){evnt(23822,20782,"ide_methods.bas");if(r)goto S_60928;} -S_60929:; +if(qbevent){evnt(23822,20784,"ide_methods.bas");if(r)goto S_60930;} +S_60931:; if ((*_SUB_EXPORTCODEAS_INTEGER_NL|*_SUB_EXPORTCODEAS_INTEGER_LE)||is_error_pending()){ -if(qbevent){evnt(23822,20783,"ide_methods.bas");if(r)goto S_60929;} +if(qbevent){evnt(23822,20785,"ide_methods.bas");if(r)goto S_60931;} do{ *_SUB_EXPORTCODEAS_INTEGER_ML= -1 ; -if(!qbevent)break;evnt(23822,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20785,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= -1 ; -if(!qbevent)break;evnt(23822,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20785,"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(23822,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20785,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20783,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20785,"ide_methods.bas");}while(r); } sc_ec_442_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60935:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||is_error_pending()){ -if(qbevent){evnt(23822,20784,"ide_methods.bas");if(r)goto S_60935;} -S_60936:; -if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ -if(qbevent){evnt(23822,20785,"ide_methods.bas");if(r)goto S_60936;} S_60937:; -if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||is_error_pending()){ if(qbevent){evnt(23822,20786,"ide_methods.bas");if(r)goto S_60937;} S_60938:; -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 )))||is_error_pending()){ +if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ if(qbevent){evnt(23822,20787,"ide_methods.bas");if(r)goto S_60938;} +S_60939:; +if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if(qbevent){evnt(23822,20788,"ide_methods.bas");if(r)goto S_60939;} +S_60940:; +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 )))||is_error_pending()){ +if(qbevent){evnt(23822,20789,"ide_methods.bas");if(r)goto S_60940;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(23822,20788,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20790,"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(23822,20788,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20790,"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(23822,20788,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20790,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20788,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20790,"ide_methods.bas");}while(r); } } } -S_60946:; +S_60948:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_KW)))||is_error_pending()){ -if(qbevent){evnt(23822,20792,"ide_methods.bas");if(r)goto S_60946;} +if(qbevent){evnt(23822,20794,"ide_methods.bas");if(r)goto S_60948;} do{ return_point[next_return_point++]=204; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_204:; -if(!qbevent)break;evnt(23822,20792,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20794,"ide_methods.bas");}while(r); } sc_ec_443_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60949:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 39 )))||is_error_pending()){ -if(qbevent){evnt(23822,20793,"ide_methods.bas");if(r)goto S_60949;} -S_60950:; -if ((*_SUB_EXPORTCODEAS_INTEGER_NL)||is_error_pending()){ -if(qbevent){evnt(23822,20794,"ide_methods.bas");if(r)goto S_60950;} S_60951:; -if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 39 )))||is_error_pending()){ if(qbevent){evnt(23822,20795,"ide_methods.bas");if(r)goto S_60951;} S_60952:; -if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )== 36 )))||is_error_pending()){ +if ((*_SUB_EXPORTCODEAS_INTEGER_NL)||is_error_pending()){ if(qbevent){evnt(23822,20796,"ide_methods.bas");if(r)goto S_60952;} +S_60953:; +if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if(qbevent){evnt(23822,20797,"ide_methods.bas");if(r)goto S_60953;} +S_60954:; +if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )== 36 )))||is_error_pending()){ +if(qbevent){evnt(23822,20798,"ide_methods.bas");if(r)goto S_60954;} do{ *_SUB_EXPORTCODEAS_INTEGER_LE= -1 ; -if(!qbevent)break;evnt(23822,20796,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20798,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20796,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20798,"ide_methods.bas");}while(r); } } } -S_60958:; +S_60960:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ -if(qbevent){evnt(23822,20799,"ide_methods.bas");if(r)goto S_60958;} +if(qbevent){evnt(23822,20801,"ide_methods.bas");if(r)goto S_60960;} do{ *_SUB_EXPORTCODEAS_INTEGER_CO= -1 ; -if(!qbevent)break;evnt(23822,20799,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20801,"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(23822,20799,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20801,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=205; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_205:; -if(!qbevent)break;evnt(23822,20799,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20801,"ide_methods.bas");}while(r); } sc_ec_444_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60963:; +S_60965:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 40 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 41 )))||is_error_pending()){ -if(qbevent){evnt(23822,20800,"ide_methods.bas");if(r)goto S_60963;} -S_60964:; +if(qbevent){evnt(23822,20802,"ide_methods.bas");if(r)goto S_60965;} +S_60966:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20801,"ide_methods.bas");if(r)goto S_60964;} -S_60965:; +if(qbevent){evnt(23822,20803,"ide_methods.bas");if(r)goto S_60966;} +S_60967:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ -if(qbevent){evnt(23822,20802,"ide_methods.bas");if(r)goto S_60965;} +if(qbevent){evnt(23822,20804,"ide_methods.bas");if(r)goto S_60967;} do{ return_point[next_return_point++]=206; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_206:; -if(!qbevent)break;evnt(23822,20802,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20804,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=207; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_207:; -if(!qbevent)break;evnt(23822,20802,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20804,"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(23822,20802,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20804,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20802,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20804,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20803,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20805,"ide_methods.bas");}while(r); } -S_60974:; +S_60976:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||is_error_pending()){ -if(qbevent){evnt(23822,20805,"ide_methods.bas");if(r)goto S_60974;} +if(qbevent){evnt(23822,20807,"ide_methods.bas");if(r)goto S_60976;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20807,"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(23822,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20807,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=208; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_208:; -if(!qbevent)break;evnt(23822,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20807,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20805,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20807,"ide_methods.bas");}while(r); } -S_60980:; +S_60982:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ -if(qbevent){evnt(23822,20806,"ide_methods.bas");if(r)goto S_60980;} -S_60981:; +if(qbevent){evnt(23822,20808,"ide_methods.bas");if(r)goto S_60982;} +S_60983:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 40 ))||is_error_pending()){ -if(qbevent){evnt(23822,20807,"ide_methods.bas");if(r)goto S_60981;} +if(qbevent){evnt(23822,20809,"ide_methods.bas");if(r)goto S_60983;} do{ *_SUB_EXPORTCODEAS_INTEGER_NC=*_SUB_EXPORTCODEAS_INTEGER_NC+ 1 ; -if(!qbevent)break;evnt(23822,20807,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20809,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_NC=*_SUB_EXPORTCODEAS_INTEGER_NC- 1 ; -if(!qbevent)break;evnt(23822,20807,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20809,"ide_methods.bas");}while(r); } } -S_60987:; +S_60989:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU|(-(*_SUB_EXPORTCODEAS_INTEGER_FU< -1 ))|*_SUB_EXPORTCODEAS_INTEGER_BO)))||is_error_pending()){ -if(qbevent){evnt(23822,20809,"ide_methods.bas");if(r)goto S_60987;} -S_60988:; +if(qbevent){evnt(23822,20811,"ide_methods.bas");if(r)goto S_60989;} +S_60990:; if ((-(*_SUB_EXPORTCODEAS_INTEGER_NC> 0 ))||is_error_pending()){ -if(qbevent){evnt(23822,20810,"ide_methods.bas");if(r)goto S_60988;} +if(qbevent){evnt(23822,20812,"ide_methods.bas");if(r)goto S_60990;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20812,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(23822,20810,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20812,"ide_methods.bas");}while(r); } } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20812,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20814,"ide_methods.bas");}while(r); sc_ec_445_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_60995:; +S_60997:; 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 )))||is_error_pending()){ -if(qbevent){evnt(23822,20813,"ide_methods.bas");if(r)goto S_60995;} -S_60996:; +if(qbevent){evnt(23822,20815,"ide_methods.bas");if(r)goto S_60997;} +S_60998:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20814,"ide_methods.bas");if(r)goto S_60996;} -S_60997:; +if(qbevent){evnt(23822,20816,"ide_methods.bas");if(r)goto S_60998;} +S_60999:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ -if(qbevent){evnt(23822,20815,"ide_methods.bas");if(r)goto S_60997;} +if(qbevent){evnt(23822,20817,"ide_methods.bas");if(r)goto S_60999;} do{ return_point[next_return_point++]=209; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_209:; -if(!qbevent)break;evnt(23822,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20817,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=210; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_210:; -if(!qbevent)break;evnt(23822,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20817,"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(23822,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20817,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20815,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20817,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20816,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20818,"ide_methods.bas");}while(r); } -S_61006:; +S_61008:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||is_error_pending()){ -if(qbevent){evnt(23822,20818,"ide_methods.bas");if(r)goto S_61006;} +if(qbevent){evnt(23822,20820,"ide_methods.bas");if(r)goto S_61008;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20820,"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(23822,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20820,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=211; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_211:; -if(!qbevent)break;evnt(23822,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20820,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20818,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20820,"ide_methods.bas");}while(r); } -S_61012:; +S_61014:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 61 ))&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU|(-(*_SUB_EXPORTCODEAS_INTEGER_FU< -1 ))|*_SUB_EXPORTCODEAS_INTEGER_BO))))||is_error_pending()){ -if(qbevent){evnt(23822,20819,"ide_methods.bas");if(r)goto S_61012;} +if(qbevent){evnt(23822,20821,"ide_methods.bas");if(r)goto S_61014;} do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -3 ; -if(!qbevent)break;evnt(23822,20819,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20821,"ide_methods.bas");}while(r); } -S_61015:; +S_61017:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 60 ))|(-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 62 ))|(-(*_SUB_EXPORTCODEAS_INTEGER_CURR== 92 )))||is_error_pending()){ -if(qbevent){evnt(23822,20820,"ide_methods.bas");if(r)goto S_61015;} +if(qbevent){evnt(23822,20822,"ide_methods.bas");if(r)goto S_61017;} do{ return_point[next_return_point++]=212; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_212:; -if(!qbevent)break;evnt(23822,20820,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20822,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20821,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20823,"ide_methods.bas");}while(r); sc_ec_446_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61019:; +S_61021:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 45 )))||is_error_pending()){ -if(qbevent){evnt(23822,20822,"ide_methods.bas");if(r)goto S_61019;} -S_61020:; +if(qbevent){evnt(23822,20824,"ide_methods.bas");if(r)goto S_61021;} +S_61022:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20823,"ide_methods.bas");if(r)goto S_61020;} -S_61021:; +if(qbevent){evnt(23822,20825,"ide_methods.bas");if(r)goto S_61022;} +S_61023:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ -if(qbevent){evnt(23822,20824,"ide_methods.bas");if(r)goto S_61021;} +if(qbevent){evnt(23822,20826,"ide_methods.bas");if(r)goto S_61023;} do{ return_point[next_return_point++]=213; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_213:; -if(!qbevent)break;evnt(23822,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20826,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=214; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_214:; -if(!qbevent)break;evnt(23822,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20826,"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(23822,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20826,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20824,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20826,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20825,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20827,"ide_methods.bas");}while(r); } -S_61030:; +S_61032:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||is_error_pending()){ -if(qbevent){evnt(23822,20827,"ide_methods.bas");if(r)goto S_61030;} +if(qbevent){evnt(23822,20829,"ide_methods.bas");if(r)goto S_61032;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20827,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20829,"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(23822,20827,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20829,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=215; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_215:; -if(!qbevent)break;evnt(23822,20827,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20829,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20827,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20829,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20828,"ide_methods.bas");}while(r); -S_61037:; -if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ -if(qbevent){evnt(23822,20829,"ide_methods.bas");if(r)goto S_61037;} -S_61038:; -sc_6951=qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 ); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20830,"ide_methods.bas");if(r)goto S_61038;} +if(!qbevent)break;evnt(23822,20830,"ide_methods.bas");}while(r); S_61039:; -if (((sc_6951==( 9 ))||(sc_6951==( 32 ))||(sc_6951==( 40 ))||((sc_6951>=( 42 ))&&(sc_6951<=( 45 )))||(sc_6951==( 47 ))||((sc_6951>=( 59 ))&&(sc_6951<=( 63 )))||(sc_6951==( 92 ))||(sc_6951==( 94 )))||is_error_pending()){ +if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ if(qbevent){evnt(23822,20831,"ide_methods.bas");if(r)goto S_61039;} S_61040:; -if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +sc_6952=qbs_asc(_SUB_EXPORTCODEAS_STRING_STXT,*_SUB_EXPORTCODEAS_LONG_SPOS- 1 ); +qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23822,20832,"ide_methods.bas");if(r)goto S_61040;} S_61041:; -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 )))||is_error_pending()){ +if (((sc_6952==( 9 ))||(sc_6952==( 32 ))||(sc_6952==( 40 ))||((sc_6952>=( 42 ))&&(sc_6952<=( 45 )))||(sc_6952==( 47 ))||((sc_6952>=( 59 ))&&(sc_6952<=( 63 )))||(sc_6952==( 92 ))||(sc_6952==( 94 )))||is_error_pending()){ if(qbevent){evnt(23822,20833,"ide_methods.bas");if(r)goto S_61041;} +S_61042:; +if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if(qbevent){evnt(23822,20834,"ide_methods.bas");if(r)goto S_61042;} +S_61043:; +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 )))||is_error_pending()){ +if(qbevent){evnt(23822,20835,"ide_methods.bas");if(r)goto S_61043;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(23822,20834,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20836,"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(23822,20834,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20836,"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(23822,20834,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20836,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20834,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20836,"ide_methods.bas");}while(r); } } sc_ec_447_end:; -goto sc_6951_end; +goto sc_6952_end; } -sc_6951_end:; +sc_6952_end:; } sc_ec_448_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61050:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 46 )))||is_error_pending()){ -if(qbevent){evnt(23822,20839,"ide_methods.bas");if(r)goto S_61050;} -S_61051:; -if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ -if(qbevent){evnt(23822,20840,"ide_methods.bas");if(r)goto S_61051;} S_61052:; -if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 46 )))||is_error_pending()){ if(qbevent){evnt(23822,20841,"ide_methods.bas");if(r)goto S_61052;} S_61053:; -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 )))||is_error_pending()){ +if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ if(qbevent){evnt(23822,20842,"ide_methods.bas");if(r)goto S_61053;} +S_61054:; +if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if(qbevent){evnt(23822,20843,"ide_methods.bas");if(r)goto S_61054;} +S_61055:; +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 )))||is_error_pending()){ +if(qbevent){evnt(23822,20844,"ide_methods.bas");if(r)goto S_61055;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(23822,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20845,"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(23822,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20845,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=217; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_217:; -if(!qbevent)break;evnt(23822,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20845,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20843,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20845,"ide_methods.bas");}while(r); } } } sc_ec_449_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61061:; +S_61063:; if ((((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 48 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 57 ))))||is_error_pending()){ -if(qbevent){evnt(23822,20847,"ide_methods.bas");if(r)goto S_61061;} -S_61062:; +if(qbevent){evnt(23822,20849,"ide_methods.bas");if(r)goto S_61063;} +S_61064:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ -if(qbevent){evnt(23822,20848,"ide_methods.bas");if(r)goto S_61062;} +if(qbevent){evnt(23822,20850,"ide_methods.bas");if(r)goto S_61064;} do{ *_SUB_EXPORTCODEAS_INTEGER_NU= -1 ; -if(!qbevent)break;evnt(23822,20848,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20850,"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(23822,20848,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20850,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=218; if (next_return_point>=return_points) more_return_points(); goto LABEL_OPENTEXT; RETURN_218:; -if(!qbevent)break;evnt(23822,20848,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20850,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20848,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20850,"ide_methods.bas");}while(r); } sc_ec_450_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61068:; +S_61070:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 58 )))||is_error_pending()){ -if(qbevent){evnt(23822,20849,"ide_methods.bas");if(r)goto S_61068;} -S_61069:; +if(qbevent){evnt(23822,20851,"ide_methods.bas");if(r)goto S_61070;} +S_61071:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ -if(qbevent){evnt(23822,20850,"ide_methods.bas");if(r)goto S_61069;} +if(qbevent){evnt(23822,20852,"ide_methods.bas");if(r)goto S_61071;} 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(23822,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20852,"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(23822,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20852,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_ME= 0 ; -if(!qbevent)break;evnt(23822,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20852,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_LE= 0 ; -if(!qbevent)break;evnt(23822,20850,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20852,"ide_methods.bas");}while(r); } -S_61075:; +S_61077:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20851,"ide_methods.bas");if(r)goto S_61075;} -S_61076:; +if(qbevent){evnt(23822,20853,"ide_methods.bas");if(r)goto S_61077;} +S_61078:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_IN))||is_error_pending()){ -if(qbevent){evnt(23822,20852,"ide_methods.bas");if(r)goto S_61076;} +if(qbevent){evnt(23822,20854,"ide_methods.bas");if(r)goto S_61078;} do{ return_point[next_return_point++]=221; if (next_return_point>=return_points) more_return_points(); goto LABEL_VERIFYKEYWORD; RETURN_221:; -if(!qbevent)break;evnt(23822,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20854,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=222; if (next_return_point>=return_points) more_return_points(); goto LABEL_WRITELINK; RETURN_222:; -if(!qbevent)break;evnt(23822,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20854,"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(23822,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20854,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= 0 ; -if(!qbevent)break;evnt(23822,20852,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20854,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_KW= 0 ; -if(!qbevent)break;evnt(23822,20853,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20855,"ide_methods.bas");}while(r); } -S_61085:; +S_61087:; if ((*_SUB_EXPORTCODEAS_INTEGER_NU)||is_error_pending()){ -if(qbevent){evnt(23822,20855,"ide_methods.bas");if(r)goto S_61085;} +if(qbevent){evnt(23822,20857,"ide_methods.bas");if(r)goto S_61087;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,20855,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20857,"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(23822,20855,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20857,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=223; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_223:; -if(!qbevent)break;evnt(23822,20855,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20857,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NU= 0 ; -if(!qbevent)break;evnt(23822,20855,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20857,"ide_methods.bas");}while(r); } -S_61091:; +S_61093:; if ((~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU)))||is_error_pending()){ -if(qbevent){evnt(23822,20856,"ide_methods.bas");if(r)goto S_61091;} +if(qbevent){evnt(23822,20858,"ide_methods.bas");if(r)goto S_61093;} do{ *_SUB_EXPORTCODEAS_INTEGER_OP= 0 ; -if(!qbevent)break;evnt(23822,20856,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20858,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= 0 ; -if(!qbevent)break;evnt(23822,20856,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20858,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= 0 ; -if(!qbevent)break;evnt(23822,20856,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20858,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= -1 ; -if(!qbevent)break;evnt(23822,20857,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20859,"ide_methods.bas");}while(r); sc_ec_451_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61097:; +S_61099:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||is_error_pending()){ -if(qbevent){evnt(23822,20858,"ide_methods.bas");if(r)goto S_61097;} +if(qbevent){evnt(23822,20860,"ide_methods.bas");if(r)goto S_61099;} do{ return_point[next_return_point++]=224; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_224:; -if(!qbevent)break;evnt(23822,20859,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20861,"ide_methods.bas");}while(r); sc_ec_452_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61099:; +S_61101:; if ((((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 65 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 90 )))||((*_SUB_EXPORTCODEAS_INTEGER_CURR>=( 97 ))&&(*_SUB_EXPORTCODEAS_INTEGER_CURR<=( 122 ))))||is_error_pending()){ -if(qbevent){evnt(23822,20860,"ide_methods.bas");if(r)goto S_61099;} -S_61100:; +if(qbevent){evnt(23822,20862,"ide_methods.bas");if(r)goto S_61101;} +S_61102:; if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ -if(qbevent){evnt(23822,20861,"ide_methods.bas");if(r)goto S_61100;} +if(qbevent){evnt(23822,20863,"ide_methods.bas");if(r)goto S_61102;} do{ *_SUB_EXPORTCODEAS_INTEGER_KW= -1 ; -if(!qbevent)break;evnt(23822,20861,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20863,"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(23822,20861,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20863,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20861,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20863,"ide_methods.bas");}while(r); } -S_61105:; +S_61107:; 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)))))||is_error_pending()){ -if(qbevent){evnt(23822,20862,"ide_methods.bas");if(r)goto S_61105;} +if(qbevent){evnt(23822,20864,"ide_methods.bas");if(r)goto S_61107;} do{ *_SUB_EXPORTCODEAS_INTEGER_LE= -1 ; -if(!qbevent)break;evnt(23822,20862,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20864,"ide_methods.bas");}while(r); } sc_ec_453_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61108:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 95 )))||is_error_pending()){ -if(qbevent){evnt(23822,20863,"ide_methods.bas");if(r)goto S_61108;} -S_61109:; -if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ -if(qbevent){evnt(23822,20864,"ide_methods.bas");if(r)goto S_61109;} S_61110:; -if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 95 )))||is_error_pending()){ if(qbevent){evnt(23822,20865,"ide_methods.bas");if(r)goto S_61110;} S_61111:; -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 ))))||is_error_pending()){ +if ((*_SUB_EXPORTCODEAS_INTEGER_NT&(~((*_SUB_EXPORTCODEAS_INTEGER_CO|*_SUB_EXPORTCODEAS_INTEGER_QU))))||is_error_pending()){ if(qbevent){evnt(23822,20866,"ide_methods.bas");if(r)goto S_61111;} +S_61112:; +if ((-((*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 )<=*_SUB_EXPORTCODEAS_LONG_SLEN))||is_error_pending()){ +if(qbevent){evnt(23822,20867,"ide_methods.bas");if(r)goto S_61112;} +S_61113:; +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 ))))||is_error_pending()){ +if(qbevent){evnt(23822,20868,"ide_methods.bas");if(r)goto S_61113;} do{ *_SUB_EXPORTCODEAS_INTEGER_KW= -1 ; -if(!qbevent)break;evnt(23822,20867,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20869,"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(23822,20867,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20869,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20867,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20869,"ide_methods.bas");}while(r); } } } sc_ec_454_end:; -goto sc_6946_end; +goto sc_6947_end; } -S_61118:; +S_61120:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||is_error_pending()){ -if(qbevent){evnt(23822,20871,"ide_methods.bas");if(r)goto S_61118;} +if(qbevent){evnt(23822,20873,"ide_methods.bas");if(r)goto S_61120;} 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(23822,20872,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20874,"ide_methods.bas");}while(r); sc_ec_455_end:; -goto sc_6946_end; +goto sc_6947_end; } do{ *_SUB_EXPORTCODEAS_INTEGER_NT= 0 ; -if(!qbevent)break;evnt(23822,20874,"ide_methods.bas");}while(r); -sc_6946_end:; -S_61123:; -if(qbevent){evnt(23822,20876,"ide_methods.bas");if(r)goto S_61123;} -S_61124:; -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 )))||is_error_pending()){ -if(qbevent){evnt(23822,20877,"ide_methods.bas");if(r)goto S_61124;} +if(!qbevent)break;evnt(23822,20876,"ide_methods.bas");}while(r); +sc_6947_end:; S_61125:; -if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ if(qbevent){evnt(23822,20878,"ide_methods.bas");if(r)goto S_61125;} +S_61126:; +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 )))||is_error_pending()){ +if(qbevent){evnt(23822,20879,"ide_methods.bas");if(r)goto S_61126;} +S_61127:; +if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ +if(qbevent){evnt(23822,20880,"ide_methods.bas");if(r)goto S_61127;} 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(23822,20878,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20880,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,20878,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20880,"ide_methods.bas");}while(r); } -S_61129:; +S_61131:; if ((*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,20879,"ide_methods.bas");if(r)goto S_61129;} +if(qbevent){evnt(23822,20881,"ide_methods.bas");if(r)goto S_61131;} 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(23822,20879,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20881,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,20879,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20881,"ide_methods.bas");}while(r); } sc_ec_456_end:; -goto sc_6952_end; +goto sc_6953_end; } -sc_6952_end:; -S_61134:; +sc_6953_end:; +S_61136:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 9 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 10 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 32 )))||is_error_pending()){ -if(qbevent){evnt(23822,20881,"ide_methods.bas");if(r)goto S_61134;} +if(qbevent){evnt(23822,20883,"ide_methods.bas");if(r)goto S_61136;} do{ *_SUB_EXPORTCODEAS_INTEGER_NL= 0 ; -if(!qbevent)break;evnt(23822,20881,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20883,"ide_methods.bas");}while(r); } -S_61137:; +S_61139:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||is_error_pending()){ -if(qbevent){evnt(23822,20882,"ide_methods.bas");if(r)goto S_61137;} +if(qbevent){evnt(23822,20884,"ide_methods.bas");if(r)goto S_61139;} do{ tqbs=_SUB_EXPORTCODEAS_STRING_ETXT; if (!is_error_pending()){ tmp_fileno=*_SUB_EXPORTCODEAS_LONG_EPOS; if (!is_error_pending()){ tmp_long=*_SUB_EXPORTCODEAS_INTEGER_CURR; if (!is_error_pending()){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} -if(!qbevent)break;evnt(23822,20882,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20884,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+ 1 ; -if(!qbevent)break;evnt(23822,20882,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20884,"ide_methods.bas");}while(r); } do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(23822,20883,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20885,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_SPOS=*_SUB_EXPORTCODEAS_LONG_SPOS+ 1 ; -if(!qbevent)break;evnt(23822,20883,"ide_methods.bas");}while(r); -S_61143:; +if(!qbevent)break;evnt(23822,20885,"ide_methods.bas");}while(r); +S_61145:; if ((qbs_cleanup(qbs_tmp_base,-(*_SUB_EXPORTCODEAS_LONG_EPOS>(_SUB_EXPORTCODEAS_STRING_ETXT->len- 10000 ))))||is_error_pending()){ -if(qbevent){evnt(23822,20885,"ide_methods.bas");if(r)goto S_61143;} +if(qbevent){evnt(23822,20887,"ide_methods.bas");if(r)goto S_61145;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ETXT,qbs_add(_SUB_EXPORTCODEAS_STRING_ETXT,func_space( 1000000 ))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20885,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20887,"ide_methods.bas");}while(r); } -ww_continue_6943:; +ww_continue_6944:; } -ww_exit_6943:; +ww_exit_6944:; do{ return_point[next_return_point++]=226; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSECODEBLOCK; RETURN_226:; -if(!qbevent)break;evnt(23822,20887,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20889,"ide_methods.bas");}while(r); do{ sub_pcopy( 2 , 3 ); -if(!qbevent)break;evnt(23822,20889,"ide_methods.bas");}while(r); -S_61149:; -qbs_set(sc_6954,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(!qbevent)break;evnt(23822,20891,"ide_methods.bas");}while(r); +S_61151:; +qbs_set(sc_6955,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20890,"ide_methods.bas");if(r)goto S_61149;} -S_61150:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6954,qbs_new_txt_len("html",4))||qbs_equal(sc_6954,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20891,"ide_methods.bas");if(r)goto S_61150;} +if(qbevent){evnt(23822,20892,"ide_methods.bas");if(r)goto S_61151;} +S_61152:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6955,qbs_new_txt_len("html",4))||qbs_equal(sc_6955,qbs_new_txt_len("rich",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20893,"ide_methods.bas");if(r)goto S_61152;} do{ *__LONG_IDEERROR= 7 ; -if(!qbevent)break;evnt(23822,20892,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20894,"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(23822,20893,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20895,"ide_methods.bas");}while(r); do{ *__LONG_IDEERROR= 1 ; -if(!qbevent)break;evnt(23822,20894,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20896,"ide_methods.bas");}while(r); do{ tab_spc_cr_size=2; tab_fileno=tmp_fileno= 151 ; -if (is_error_pending()) goto skip6955; +if (is_error_pending()) goto skip6956; sub_file_print(tmp_fileno,qbs_left(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS- 1 ), 0, 0, 0); -if (is_error_pending()) goto skip6955; -skip6955: +if (is_error_pending()) goto skip6956; +skip6956: qbs_cleanup(qbs_tmp_base,0); tab_spc_cr_size=1; -if(!qbevent)break;evnt(23822,20895,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20897,"ide_methods.bas");}while(r); do{ sub_close( 151 ,1); -if(!qbevent)break;evnt(23822,20896,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20898,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_OK=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Export As...",12),qbs_add(qbs_add(qbs_add(qbs_new_txt_len("Export to ",10),_SUB_EXPORTCODEAS_STRING_PNAM),_SUB_EXPORTCODEAS_STRING_EXT),qbs_new_txt_len(" completed.",11)),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20897,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20899,"ide_methods.bas");}while(r); sc_ec_457_end:; -goto sc_6954_end; +goto sc_6955_end; } -S_61157:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6954,qbs_new_txt_len("foru",4))||qbs_equal(sc_6954,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20898,"ide_methods.bas");if(r)goto S_61157;} +S_61159:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6955,qbs_new_txt_len("foru",4))||qbs_equal(sc_6955,qbs_new_txt_len("wiki",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20900,"ide_methods.bas");if(r)goto S_61159;} do{ sub__clipboard(qbs_left(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS- 1 )); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20899,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20901,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_OK=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Export As...",12),qbs_new_txt_len("Forum/Wiki export to Clipboard completed.",41),qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20900,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20902,"ide_methods.bas");}while(r); sc_ec_458_end:; -goto sc_6954_end; +goto sc_6955_end; } -sc_6954_end:; +sc_6955_end:; do{ goto exit_subfunc; -if(!qbevent)break;evnt(23822,20902,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20904,"ide_methods.bas");}while(r); LABEL_OPENCODEBLOCK:; -if(qbevent){evnt(23822,20904,"ide_methods.bas");r=0;} -S_61162:; -qbs_set(sc_6956,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(qbevent){evnt(23822,20906,"ide_methods.bas");r=0;} +S_61164:; +qbs_set(sc_6957,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20905,"ide_methods.bas");if(r)goto S_61162;} -S_61163:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6956,qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20906,"ide_methods.bas");if(r)goto S_61163;} +if(qbevent){evnt(23822,20907,"ide_methods.bas");if(r)goto S_61164;} +S_61165:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6957,qbs_new_txt_len("html",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20908,"ide_methods.bas");if(r)goto S_61165;} 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(23822,20906,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20908,"ide_methods.bas");}while(r);
 sc_ec_459_end:;
-goto sc_6956_end;
+goto sc_6957_end;
 }
-S_61165:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6956,qbs_new_txt_len("rich",4))))||is_error_pending()){
-if(qbevent){evnt(23822,20907,"ide_methods.bas");if(r)goto S_61165;}
+S_61167:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6957,qbs_new_txt_len("rich",4))))||is_error_pending()){
+if(qbevent){evnt(23822,20909,"ide_methods.bas");if(r)goto S_61167;}
 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(23822,20907,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20909,"ide_methods.bas");}while(r);
 sc_ec_460_end:;
-goto sc_6956_end;
+goto sc_6957_end;
 }
-S_61167:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6956,qbs_new_txt_len("foru",4))))||is_error_pending()){
-if(qbevent){evnt(23822,20908,"ide_methods.bas");if(r)goto S_61167;}
+S_61169:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6957,qbs_new_txt_len("foru",4))))||is_error_pending()){
+if(qbevent){evnt(23822,20910,"ide_methods.bas");if(r)goto S_61169;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[qb=export]",11));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(23822,20908,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20910,"ide_methods.bas");}while(r);
 sc_ec_461_end:;
-goto sc_6956_end;
+goto sc_6957_end;
 }
-S_61169:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6956,qbs_new_txt_len("wiki",4))))||is_error_pending()){
-if(qbevent){evnt(23822,20909,"ide_methods.bas");if(r)goto S_61169;}
+S_61171:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6957,qbs_new_txt_len("wiki",4))))||is_error_pending()){
+if(qbevent){evnt(23822,20911,"ide_methods.bas");if(r)goto S_61171;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{CodeStart}}",13));
 qbs_cleanup(qbs_tmp_base,0);
-if(!qbevent)break;evnt(23822,20909,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20911,"ide_methods.bas");}while(r);
 sc_ec_462_end:;
-goto sc_6956_end;
+goto sc_6957_end;
 }
 do{
 #include "ret340.txt"
-if(!qbevent)break;evnt(23822,20910,"ide_methods.bas");}while(r);
-sc_6956_end:;
+if(!qbevent)break;evnt(23822,20912,"ide_methods.bas");}while(r);
+sc_6957_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(23822,20912,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20914,"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(23822,20912,"ide_methods.bas");}while(r);
-S_61176:;
+if(!qbevent)break;evnt(23822,20914,"ide_methods.bas");}while(r);
+S_61178:;
 if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT),qbs_new_txt_len("foru",4))))||is_error_pending()){
-if(qbevent){evnt(23822,20913,"ide_methods.bas");if(r)goto S_61176;}
+if(qbevent){evnt(23822,20915,"ide_methods.bas");if(r)goto S_61178;}
 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(23822,20913,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20915,"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(23822,20913,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20915,"ide_methods.bas");}while(r);
 }
 do{
 #include "ret340.txt"
-if(!qbevent)break;evnt(23822,20914,"ide_methods.bas");}while(r);
+if(!qbevent)break;evnt(23822,20916,"ide_methods.bas");}while(r);
 LABEL_CLOSECODEBLOCK:;
-if(qbevent){evnt(23822,20916,"ide_methods.bas");r=0;}
-S_61181:;
-qbs_set(sc_6961,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT));
+if(qbevent){evnt(23822,20918,"ide_methods.bas");r=0;}
+S_61183:;
+qbs_set(sc_6962,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT));
 qbs_cleanup(qbs_tmp_base,0);
-if(qbevent){evnt(23822,20917,"ide_methods.bas");if(r)goto S_61181;}
-S_61182:;
-if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6961,qbs_new_txt_len("html",4))))||is_error_pending()){
-if(qbevent){evnt(23822,20918,"ide_methods.bas");if(r)goto S_61182;}
+if(qbevent){evnt(23822,20919,"ide_methods.bas");if(r)goto S_61183;}
+S_61184:;
+if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6962,qbs_new_txt_len("html",4))))||is_error_pending()){
+if(qbevent){evnt(23822,20920,"ide_methods.bas");if(r)goto S_61184;}
 do{
 qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("
",20)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20918,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20920,"ide_methods.bas");}while(r); sc_ec_463_end:; -goto sc_6961_end; +goto sc_6962_end; } -S_61184:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6961,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20919,"ide_methods.bas");if(r)goto S_61184;} +S_61186:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6962,qbs_new_txt_len("rich",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20921,"ide_methods.bas");if(r)goto S_61186;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("}",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20919,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20921,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS- 4 ; -if(!qbevent)break;evnt(23822,20919,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20921,"ide_methods.bas");}while(r); sc_ec_464_end:; -goto sc_6961_end; +goto sc_6962_end; } -S_61187:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6961,qbs_new_txt_len("foru",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20920,"ide_methods.bas");if(r)goto S_61187;} +S_61189:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6962,qbs_new_txt_len("foru",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20922,"ide_methods.bas");if(r)goto S_61189;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[/qb]",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20920,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20922,"ide_methods.bas");}while(r); sc_ec_465_end:; -goto sc_6961_end; +goto sc_6962_end; } -S_61189:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6961,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20921,"ide_methods.bas");if(r)goto S_61189;} +S_61191:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6962,qbs_new_txt_len("wiki",4))))||is_error_pending()){ +if(qbevent){evnt(23822,20923,"ide_methods.bas");if(r)goto S_61191;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{CodeEnd}}",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20921,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20923,"ide_methods.bas");}while(r); sc_ec_466_end:; -goto sc_6961_end; +goto sc_6962_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20922,"ide_methods.bas");}while(r); -sc_6961_end:; +if(!qbevent)break;evnt(23822,20924,"ide_methods.bas");}while(r); +sc_6962_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(23822,20924,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20926,"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(23822,20925,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20927,"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(23822,20925,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20927,"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(23822,20926,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20928,"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(23822,20926,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20928,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20927,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20929,"ide_methods.bas");}while(r); LABEL_OPENTEXT:; -if(qbevent){evnt(23822,20929,"ide_methods.bas");r=0;} -S_61200:; +if(qbevent){evnt(23822,20931,"ide_methods.bas");r=0;} +S_61202:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_EXPORTCODEAS_INTEGER_ML< -1 ))&(~(*_SUB_EXPORTCODEAS_INTEGER_PC))&(qbs_notequal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT),qbs_new_txt_len("co",2)))))||is_error_pending()){ -if(qbevent){evnt(23822,20930,"ide_methods.bas");if(r)goto S_61200;} +if(qbevent){evnt(23822,20932,"ide_methods.bas");if(r)goto S_61202;} do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20930,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20932,"ide_methods.bas");}while(r); } -S_61203:; -qbs_set(sc_6967,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20931,"ide_methods.bas");if(r)goto S_61203;} -S_61204:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6967,qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20932,"ide_methods.bas");if(r)goto S_61204;} S_61205:; -qbs_set(sc_6968,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_set(sc_6968,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23822,20933,"ide_methods.bas");if(r)goto S_61205;} S_61206:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("co",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("html",4))))||is_error_pending()){ if(qbevent){evnt(23822,20934,"ide_methods.bas");if(r)goto S_61206;} +S_61207:; +qbs_set(sc_6969,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20935,"ide_methods.bas");if(r)goto S_61207;} +S_61208:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6969,qbs_new_txt_len("co",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20936,"ide_methods.bas");if(r)goto S_61208;} 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(23822,20934,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20936,"ide_methods.bas");}while(r); sc_ec_467_end:; -goto sc_6968_end; +goto sc_6969_end; } -S_61208:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("nu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20935,"ide_methods.bas");if(r)goto S_61208;} +S_61210:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6969,qbs_new_txt_len("nu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20937,"ide_methods.bas");if(r)goto S_61210;} 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(23822,20935,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20937,"ide_methods.bas");}while(r); sc_ec_468_end:; -goto sc_6968_end; +goto sc_6969_end; } -S_61210:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("qu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20936,"ide_methods.bas");if(r)goto S_61210;} +S_61212:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6969,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20938,"ide_methods.bas");if(r)goto S_61212;} 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(23822,20936,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20938,"ide_methods.bas");}while(r); sc_ec_469_end:; -goto sc_6968_end; +goto sc_6969_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20937,"ide_methods.bas");}while(r); -sc_6968_end:; +if(!qbevent)break;evnt(23822,20939,"ide_methods.bas");}while(r); +sc_6969_end:; sc_ec_470_end:; -goto sc_6967_end; +goto sc_6968_end; } -S_61215:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6967,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20939,"ide_methods.bas");if(r)goto S_61215;} -S_61216:; -qbs_set(sc_6969,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20940,"ide_methods.bas");if(r)goto S_61216;} S_61217:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6969,qbs_new_txt_len("co",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("rich",4))))||is_error_pending()){ if(qbevent){evnt(23822,20941,"ide_methods.bas");if(r)goto S_61217;} +S_61218:; +qbs_set(sc_6970,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20942,"ide_methods.bas");if(r)goto S_61218;} +S_61219:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6970,qbs_new_txt_len("co",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20943,"ide_methods.bas");if(r)goto S_61219;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf1 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20941,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20943,"ide_methods.bas");}while(r); sc_ec_471_end:; -goto sc_6969_end; +goto sc_6970_end; } -S_61219:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6969,qbs_new_txt_len("nu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20942,"ide_methods.bas");if(r)goto S_61219;} +S_61221:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6970,qbs_new_txt_len("nu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20944,"ide_methods.bas");if(r)goto S_61221;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf4 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20942,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20944,"ide_methods.bas");}while(r); sc_ec_472_end:; -goto sc_6969_end; +goto sc_6970_end; } -S_61221:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6969,qbs_new_txt_len("qu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20943,"ide_methods.bas");if(r)goto S_61221;} +S_61223:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6970,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20945,"ide_methods.bas");if(r)goto S_61223;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf5 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20943,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20945,"ide_methods.bas");}while(r); sc_ec_473_end:; -goto sc_6969_end; +goto sc_6970_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20944,"ide_methods.bas");}while(r); -sc_6969_end:; +if(!qbevent)break;evnt(23822,20946,"ide_methods.bas");}while(r); +sc_6970_end:; sc_ec_474_end:; -goto sc_6967_end; +goto sc_6968_end; } -S_61226:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6967,qbs_new_txt_len("foru",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20946,"ide_methods.bas");if(r)goto S_61226;} -S_61227:; -qbs_set(sc_6970,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20947,"ide_methods.bas");if(r)goto S_61227;} S_61228:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6970,qbs_new_txt_len("co",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("foru",4))))||is_error_pending()){ if(qbevent){evnt(23822,20948,"ide_methods.bas");if(r)goto S_61228;} +S_61229:; +qbs_set(sc_6971,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20949,"ide_methods.bas");if(r)goto S_61229;} +S_61230:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6971,qbs_new_txt_len("co",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20950,"ide_methods.bas");if(r)goto S_61230;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[color=#919191]",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20948,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20950,"ide_methods.bas");}while(r); sc_ec_475_end:; -goto sc_6970_end; +goto sc_6971_end; } -S_61230:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6970,qbs_new_txt_len("nu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20949,"ide_methods.bas");if(r)goto S_61230;} +S_61232:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6971,qbs_new_txt_len("nu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20951,"ide_methods.bas");if(r)goto S_61232;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[color=#F580B1]",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20949,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20951,"ide_methods.bas");}while(r); sc_ec_476_end:; -goto sc_6970_end; +goto sc_6971_end; } -S_61232:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6970,qbs_new_txt_len("qu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20950,"ide_methods.bas");if(r)goto S_61232;} +S_61234:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6971,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20952,"ide_methods.bas");if(r)goto S_61234;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[color=#FFB100]",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20950,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20952,"ide_methods.bas");}while(r); sc_ec_477_end:; -goto sc_6970_end; +goto sc_6971_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20951,"ide_methods.bas");}while(r); -sc_6970_end:; +if(!qbevent)break;evnt(23822,20953,"ide_methods.bas");}while(r); +sc_6971_end:; sc_ec_478_end:; -goto sc_6967_end; +goto sc_6968_end; } -S_61237:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6967,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20953,"ide_methods.bas");if(r)goto S_61237;} -S_61238:; -qbs_set(sc_6971,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20954,"ide_methods.bas");if(r)goto S_61238;} S_61239:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6971,qbs_new_txt_len("co",2))||qbs_equal(sc_6971,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6968,qbs_new_txt_len("wiki",4))))||is_error_pending()){ if(qbevent){evnt(23822,20955,"ide_methods.bas");if(r)goto S_61239;} +S_61240:; +qbs_set(sc_6972,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20956,"ide_methods.bas");if(r)goto S_61240;} +S_61241:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6972,qbs_new_txt_len("co",2))||qbs_equal(sc_6972,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20957,"ide_methods.bas");if(r)goto S_61241;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",15)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20955,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20957,"ide_methods.bas");}while(r); sc_ec_479_end:; -goto sc_6971_end; +goto sc_6972_end; } -S_61241:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6971,qbs_new_txt_len("nu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20956,"ide_methods.bas");if(r)goto S_61241;} +S_61243:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6972,qbs_new_txt_len("nu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20958,"ide_methods.bas");if(r)goto S_61243;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("{{Text|",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20956,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20958,"ide_methods.bas");}while(r); sc_ec_480_end:; -goto sc_6971_end; +goto sc_6972_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20957,"ide_methods.bas");}while(r); -sc_6971_end:; +if(!qbevent)break;evnt(23822,20959,"ide_methods.bas");}while(r); +sc_6972_end:; sc_ec_481_end:; -goto sc_6967_end; +goto sc_6968_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20959,"ide_methods.bas");}while(r); -sc_6967_end:; +if(!qbevent)break;evnt(23822,20961,"ide_methods.bas");}while(r); +sc_6968_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(23822,20961,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20963,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+_SUB_EXPORTCODEAS_STRING_TMP->len; qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20961,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20963,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20962,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20964,"ide_methods.bas");}while(r); LABEL_CLOSETEXT:; -if(qbevent){evnt(23822,20964,"ide_methods.bas");r=0;} -S_61252:; +if(qbevent){evnt(23822,20966,"ide_methods.bas");r=0;} +S_61254:; if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_EXPORTCODEAS_INTEGER_ML< -1 ))&(~(*_SUB_EXPORTCODEAS_INTEGER_PC))&(qbs_notequal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT),qbs_new_txt_len("co",2)))))||is_error_pending()){ -if(qbevent){evnt(23822,20965,"ide_methods.bas");if(r)goto S_61252;} +if(qbevent){evnt(23822,20967,"ide_methods.bas");if(r)goto S_61254;} do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20965,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20967,"ide_methods.bas");}while(r); } -S_61255:; -qbs_set(sc_6974,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20966,"ide_methods.bas");if(r)goto S_61255;} -S_61256:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6974,qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20967,"ide_methods.bas");if(r)goto S_61256;} S_61257:; -qbs_set(sc_6975,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_set(sc_6975,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23822,20968,"ide_methods.bas");if(r)goto S_61257;} S_61258:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6975,qbs_new_txt_len("co",2))||qbs_equal(sc_6975,qbs_new_txt_len("nu",2))||qbs_equal(sc_6975,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6975,qbs_new_txt_len("html",4))))||is_error_pending()){ if(qbevent){evnt(23822,20969,"ide_methods.bas");if(r)goto S_61258;} +S_61259:; +qbs_set(sc_6976,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20970,"ide_methods.bas");if(r)goto S_61259;} +S_61260:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6976,qbs_new_txt_len("co",2))||qbs_equal(sc_6976,qbs_new_txt_len("nu",2))||qbs_equal(sc_6976,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20971,"ide_methods.bas");if(r)goto S_61260;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20969,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20971,"ide_methods.bas");}while(r); sc_ec_482_end:; -goto sc_6975_end; +goto sc_6976_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20970,"ide_methods.bas");}while(r); -sc_6975_end:; +if(!qbevent)break;evnt(23822,20972,"ide_methods.bas");}while(r); +sc_6976_end:; sc_ec_483_end:; -goto sc_6974_end; +goto sc_6975_end; } -S_61263:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6974,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20972,"ide_methods.bas");if(r)goto S_61263;} -S_61264:; -qbs_set(sc_6976,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20973,"ide_methods.bas");if(r)goto S_61264;} S_61265:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6976,qbs_new_txt_len("co",2))||qbs_equal(sc_6976,qbs_new_txt_len("nu",2))||qbs_equal(sc_6976,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6975,qbs_new_txt_len("rich",4))))||is_error_pending()){ if(qbevent){evnt(23822,20974,"ide_methods.bas");if(r)goto S_61265;} +S_61266:; +qbs_set(sc_6977,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20975,"ide_methods.bas");if(r)goto S_61266;} +S_61267:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6977,qbs_new_txt_len("co",2))||qbs_equal(sc_6977,qbs_new_txt_len("nu",2))||qbs_equal(sc_6977,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20976,"ide_methods.bas");if(r)goto S_61267;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\cf0 ",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20974,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20976,"ide_methods.bas");}while(r); sc_ec_484_end:; -goto sc_6976_end; +goto sc_6977_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20975,"ide_methods.bas");}while(r); -sc_6976_end:; +if(!qbevent)break;evnt(23822,20977,"ide_methods.bas");}while(r); +sc_6977_end:; sc_ec_485_end:; -goto sc_6974_end; +goto sc_6975_end; } -S_61270:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6974,qbs_new_txt_len("foru",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20977,"ide_methods.bas");if(r)goto S_61270;} -S_61271:; -qbs_set(sc_6977,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20978,"ide_methods.bas");if(r)goto S_61271;} S_61272:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6977,qbs_new_txt_len("co",2))||qbs_equal(sc_6977,qbs_new_txt_len("nu",2))||qbs_equal(sc_6977,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6975,qbs_new_txt_len("foru",4))))||is_error_pending()){ if(qbevent){evnt(23822,20979,"ide_methods.bas");if(r)goto S_61272;} +S_61273:; +qbs_set(sc_6978,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20980,"ide_methods.bas");if(r)goto S_61273;} +S_61274:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6978,qbs_new_txt_len("co",2))||qbs_equal(sc_6978,qbs_new_txt_len("nu",2))||qbs_equal(sc_6978,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20981,"ide_methods.bas");if(r)goto S_61274;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("[/color]",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20979,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20981,"ide_methods.bas");}while(r); sc_ec_486_end:; -goto sc_6977_end; +goto sc_6978_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20980,"ide_methods.bas");}while(r); -sc_6977_end:; +if(!qbevent)break;evnt(23822,20982,"ide_methods.bas");}while(r); +sc_6978_end:; sc_ec_487_end:; -goto sc_6974_end; +goto sc_6975_end; } -S_61277:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6974,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,20982,"ide_methods.bas");if(r)goto S_61277;} -S_61278:; -qbs_set(sc_6978,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,20983,"ide_methods.bas");if(r)goto S_61278;} S_61279:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6978,qbs_new_txt_len("co",2))))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6975,qbs_new_txt_len("wiki",4))))||is_error_pending()){ if(qbevent){evnt(23822,20984,"ide_methods.bas");if(r)goto S_61279;} +S_61280:; +qbs_set(sc_6979,qbs_lcase(_SUB_EXPORTCODEAS_STRING_WHAT)); +qbs_cleanup(qbs_tmp_base,0); +if(qbevent){evnt(23822,20985,"ide_methods.bas");if(r)goto S_61280;} +S_61281:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6979,qbs_new_txt_len("co",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20986,"ide_methods.bas");if(r)goto S_61281;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#919191}}",19)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20984,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20986,"ide_methods.bas");}while(r); sc_ec_488_end:; -goto sc_6978_end; +goto sc_6979_end; } -S_61281:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6978,qbs_new_txt_len("nu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20985,"ide_methods.bas");if(r)goto S_61281;} +S_61283:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6979,qbs_new_txt_len("nu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20987,"ide_methods.bas");if(r)goto S_61283;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#F580B1}}",10)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20985,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20987,"ide_methods.bas");}while(r); sc_ec_489_end:; -goto sc_6978_end; +goto sc_6979_end; } -S_61283:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6978,qbs_new_txt_len("qu",2))))||is_error_pending()){ -if(qbevent){evnt(23822,20986,"ide_methods.bas");if(r)goto S_61283;} +S_61285:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6979,qbs_new_txt_len("qu",2))))||is_error_pending()){ +if(qbevent){evnt(23822,20988,"ide_methods.bas");if(r)goto S_61285;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("|#FFB100}}",19)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20986,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20988,"ide_methods.bas");}while(r); sc_ec_490_end:; -goto sc_6978_end; +goto sc_6979_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20987,"ide_methods.bas");}while(r); -sc_6978_end:; +if(!qbevent)break;evnt(23822,20989,"ide_methods.bas");}while(r); +sc_6979_end:; sc_ec_491_end:; -goto sc_6974_end; +goto sc_6975_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20989,"ide_methods.bas");}while(r); -sc_6974_end:; -S_61291:; +if(!qbevent)break;evnt(23822,20991,"ide_methods.bas");}while(r); +sc_6975_end:; +S_61293:; if ((*_SUB_EXPORTCODEAS_INTEGER_POST)||is_error_pending()){ -if(qbevent){evnt(23822,20991,"ide_methods.bas");if(r)goto S_61291;} +if(qbevent){evnt(23822,20993,"ide_methods.bas");if(r)goto S_61293;} do{ *_SUB_EXPORTCODEAS_INTEGER_SK= 0 ; -if(!qbevent)break;evnt(23822,20992,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20994,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=227; if (next_return_point>=return_points) more_return_points(); goto LABEL_ESCAPECHAR; RETURN_227:; -if(!qbevent)break;evnt(23822,20992,"ide_methods.bas");}while(r); -S_61294:; +if(!qbevent)break;evnt(23822,20994,"ide_methods.bas");}while(r); +S_61296:; if ((~(*_SUB_EXPORTCODEAS_INTEGER_SK))||is_error_pending()){ -if(qbevent){evnt(23822,20993,"ide_methods.bas");if(r)goto S_61294;} +if(qbevent){evnt(23822,20995,"ide_methods.bas");if(r)goto S_61296;} do{ tqbs=_SUB_EXPORTCODEAS_STRING_ETXT; if (!is_error_pending()){ tmp_fileno=*_SUB_EXPORTCODEAS_LONG_EPOS; if (!is_error_pending()){ tmp_long=*_SUB_EXPORTCODEAS_INTEGER_CURR; if (!is_error_pending()){ if ((tmp_fileno>0)&&(tmp_fileno<=tqbs->len)){tqbs->chr[tmp_fileno-1]=tmp_long;}else{error(5);} }}} -if(!qbevent)break;evnt(23822,20993,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20995,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+ 1 ; -if(!qbevent)break;evnt(23822,20993,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20995,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,20993,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20995,"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(23822,20995,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20997,"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(23822,20995,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20997,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,20996,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,20998,"ide_methods.bas");}while(r); LABEL_VERIFYKEYWORD:; -if(qbevent){evnt(23822,20998,"ide_methods.bas");r=0;} -S_61303:; +if(qbevent){evnt(23822,21000,"ide_methods.bas");r=0;} +S_61305:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ -if(qbevent){evnt(23822,20999,"ide_methods.bas");if(r)goto S_61303;} +if(qbevent){evnt(23822,21001,"ide_methods.bas");if(r)goto S_61305;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_VERI,_SUB_EXPORTCODEAS_STRING_ME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,20999,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21001,"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(23822,20999,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21001,"ide_methods.bas");}while(r); } -S_61308:; +S_61310:; if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_SUB_EXPORTCODEAS_STRING_VERI, 1 )!= 95 )))||is_error_pending()){ -if(qbevent){evnt(23822,21000,"ide_methods.bas");if(r)goto S_61308;} +if(qbevent){evnt(23822,21002,"ide_methods.bas");if(r)goto S_61310;} do{ *_SUB_EXPORTCODEAS_INTEGER_FLP= 1 ; -if(!qbevent)break;evnt(23822,21000,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21002,"ide_methods.bas");}while(r); }else{ do{ *_SUB_EXPORTCODEAS_INTEGER_FLP= 2 ; -if(!qbevent)break;evnt(23822,21000,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21002,"ide_methods.bas");}while(r); } -S_61313:; +S_61315:; 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 ))|((*_SUB_EXPORTCODEAS_INTEGER_NP&(-(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 )))))))||is_error_pending()){ -if(qbevent){evnt(23822,21001,"ide_methods.bas");if(r)goto S_61313;} -S_61314:; +if(qbevent){evnt(23822,21003,"ide_methods.bas");if(r)goto S_61315;} +S_61316:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME&*_SUB_EXPORTCODEAS_INTEGER_LE)||is_error_pending()){ -if(qbevent){evnt(23822,21002,"ide_methods.bas");if(r)goto S_61314;} -S_61315:; +if(qbevent){evnt(23822,21004,"ide_methods.bas");if(r)goto S_61316;} +S_61317:; 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 )))||is_error_pending()){ -if(qbevent){evnt(23822,21003,"ide_methods.bas");if(r)goto S_61315;} +if(qbevent){evnt(23822,21005,"ide_methods.bas");if(r)goto S_61317;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21003,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21005,"ide_methods.bas");}while(r); } -S_61318:; +S_61320:; }else{ if (*_SUB_EXPORTCODEAS_INTEGER_ME&(~(*_SUB_EXPORTCODEAS_INTEGER_LE))){ -if(qbevent){evnt(23822,21004,"ide_methods.bas");if(r)goto S_61318;} -S_61319:; +if(qbevent){evnt(23822,21006,"ide_methods.bas");if(r)goto S_61320;} +S_61321:; 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 )))||is_error_pending()){ -if(qbevent){evnt(23822,21005,"ide_methods.bas");if(r)goto S_61319;} +if(qbevent){evnt(23822,21007,"ide_methods.bas");if(r)goto S_61321;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21005,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21007,"ide_methods.bas");}while(r); } } } -S_61323:; +S_61325:; if (((((-(*_SUB_EXPORTCODEAS_INTEGER_ML< -1 ))&(~(*_SUB_EXPORTCODEAS_INTEGER_PC)))|*_SUB_EXPORTCODEAS_INTEGER_DL)&*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ -if(qbevent){evnt(23822,21007,"ide_methods.bas");if(r)goto S_61323;} +if(qbevent){evnt(23822,21009,"ide_methods.bas");if(r)goto S_61325;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21007,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21009,"ide_methods.bas");}while(r); } -S_61326:; +S_61328:; if (((((-(*_SUB_EXPORTCODEAS_INTEGER_ML< -1 ))&(~(*_SUB_EXPORTCODEAS_INTEGER_PC)))|*_SUB_EXPORTCODEAS_INTEGER_DL)&*_SUB_EXPORTCODEAS_INTEGER_KW)||is_error_pending()){ -if(qbevent){evnt(23822,21008,"ide_methods.bas");if(r)goto S_61326;} +if(qbevent){evnt(23822,21010,"ide_methods.bas");if(r)goto S_61328;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_KW,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21008,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21010,"ide_methods.bas");}while(r); } -S_61329:; +S_61331:; if ((*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ -if(qbevent){evnt(23822,21009,"ide_methods.bas");if(r)goto S_61329;} +if(qbevent){evnt(23822,21011,"ide_methods.bas");if(r)goto S_61331;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,_SUB_EXPORTCODEAS_STRING_VERI); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21009,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21011,"ide_methods.bas");}while(r); } -S_61332:; +S_61334:; }else{ if (qbs_cleanup(qbs_tmp_base,(~(((-(*_SUB_EXPORTCODEAS_INTEGER_ML< 0 ))|*_SUB_EXPORTCODEAS_INTEGER_DL)))&(-(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(23822,21010,"ide_methods.bas");if(r)goto S_61332;} +if(qbevent){evnt(23822,21012,"ide_methods.bas");if(r)goto S_61334;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= -1 ; -if(!qbevent)break;evnt(23822,21011,"ide_methods.bas");}while(r); -S_61334:; +if(!qbevent)break;evnt(23822,21013,"ide_methods.bas");}while(r); +S_61336:; }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(23822,21012,"ide_methods.bas");if(r)goto S_61334;} +if(qbevent){evnt(23822,21014,"ide_methods.bas");if(r)goto S_61336;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= -1 ; -if(!qbevent)break;evnt(23822,21013,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21015,"ide_methods.bas");}while(r); }else{ -S_61337:; +S_61339:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ -if(qbevent){evnt(23822,21015,"ide_methods.bas");if(r)goto S_61337;} +if(qbevent){evnt(23822,21017,"ide_methods.bas");if(r)goto S_61339;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ME,qbs_new_txt_len("",0)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21015,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21017,"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(23822,21015,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21017,"ide_methods.bas");}while(r); } } } } -S_61343:; +S_61345:; if (((-(*_SUB_EXPORTCODEAS_INTEGER_ML< 0 ))&(-(*_SUB_EXPORTCODEAS_INTEGER_CURR!= 58 )))||is_error_pending()){ -if(qbevent){evnt(23822,21017,"ide_methods.bas");if(r)goto S_61343;} +if(qbevent){evnt(23822,21019,"ide_methods.bas");if(r)goto S_61345;} do{ *_SUB_EXPORTCODEAS_INTEGER_ML= -2 ; -if(!qbevent)break;evnt(23822,21017,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21019,"ide_methods.bas");}while(r); } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21018,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21020,"ide_methods.bas");}while(r); LABEL_FINDWIKIPAGE:; -if(qbevent){evnt(23822,21020,"ide_methods.bas");r=0;} -S_61347:; +if(qbevent){evnt(23822,21022,"ide_methods.bas");r=0;} +S_61349:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME)||is_error_pending()){ -if(qbevent){evnt(23822,21021,"ide_methods.bas");if(r)goto S_61347;} +if(qbevent){evnt(23822,21023,"ide_methods.bas");if(r)goto S_61349;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_ucase(_SUB_EXPORTCODEAS_STRING_ME)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21021,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21023,"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(23822,21021,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21023,"ide_methods.bas");}while(r); } -S_61352:; -if ((*_SUB_EXPORTCODEAS_INTEGER_OP)||is_error_pending()){ -if(qbevent){evnt(23822,21022,"ide_methods.bas");if(r)goto S_61352;} -S_61353:; -if(qbevent){evnt(23822,21023,"ide_methods.bas");if(r)goto S_61353;} S_61354:; -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))))||is_error_pending()){ +if ((*_SUB_EXPORTCODEAS_INTEGER_OP)||is_error_pending()){ if(qbevent){evnt(23822,21024,"ide_methods.bas");if(r)goto S_61354;} +S_61355:; +if(qbevent){evnt(23822,21025,"ide_methods.bas");if(r)goto S_61355;} +S_61356:; +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))))||is_error_pending()){ +if(qbevent){evnt(23822,21026,"ide_methods.bas");if(r)goto S_61356;} 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(23822,21024,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21026,"ide_methods.bas");}while(r); sc_ec_492_end:; -goto sc_6981_end; +goto sc_6982_end; } -S_61356:; +S_61358:; 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))))||is_error_pending()){ -if(qbevent){evnt(23822,21025,"ide_methods.bas");if(r)goto S_61356;} +if(qbevent){evnt(23822,21027,"ide_methods.bas");if(r)goto S_61358;} 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(23822,21025,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21027,"ide_methods.bas");}while(r); sc_ec_493_end:; -goto sc_6981_end; +goto sc_6982_end; } do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPEN",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21026,"ide_methods.bas");}while(r); -sc_6981_end:; -S_61361:; +if(!qbevent)break;evnt(23822,21028,"ide_methods.bas");}while(r); +sc_6982_end:; +S_61363:; }else{ if (qbs_cleanup(qbs_tmp_base,(-(*_SUB_EXPORTCODEAS_INTEGER_FU< 0 ))&((-(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(23822,21028,"ide_methods.bas");if(r)goto S_61361;} +if(qbevent){evnt(23822,21030,"ide_methods.bas");if(r)goto S_61363;} 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(23822,21029,"ide_methods.bas");}while(r); -S_61363:; +if(!qbevent)break;evnt(23822,21031,"ide_methods.bas");}while(r); +S_61365:; }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(23822,21030,"ide_methods.bas");if(r)goto S_61363;} +if(qbevent){evnt(23822,21032,"ide_methods.bas");if(r)goto S_61365;} 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(23822,21031,"ide_methods.bas");}while(r); -S_61365:; +if(!qbevent)break;evnt(23822,21033,"ide_methods.bas");}while(r); +S_61367:; }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(23822,21032,"ide_methods.bas");if(r)goto S_61365;} +if(qbevent){evnt(23822,21034,"ide_methods.bas");if(r)goto S_61367;} 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(23822,21033,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21035,"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(23822,21035,"ide_methods.bas");}while(r); -S_61369:; -sc_6982_var=0; -if(qbevent){evnt(23822,21036,"ide_methods.bas");if(r)goto S_61369;} -S_61370:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("$END",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21037,"ide_methods.bas");if(r)goto S_61370;} +if(!qbevent)break;evnt(23822,21037,"ide_methods.bas");}while(r); S_61371:; +sc_6983_var=0; +if(qbevent){evnt(23822,21038,"ide_methods.bas");if(r)goto S_61371;} +S_61372:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("$END",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21039,"ide_methods.bas");if(r)goto S_61372;} +S_61373:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 )),qbs_new_txt_len("IF",2))))||is_error_pending()){ -if(qbevent){evnt(23822,21037,"ide_methods.bas");if(r)goto S_61371;} +if(qbevent){evnt(23822,21039,"ide_methods.bas");if(r)goto S_61373;} 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(23822,21037,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21039,"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(23822,21037,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21039,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21037,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21039,"ide_methods.bas");}while(r); } sc_ec_494_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61376:; +S_61378:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("CALL",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21038,"ide_methods.bas");if(r)goto S_61376;} -S_61377:; +if(qbevent){evnt(23822,21040,"ide_methods.bas");if(r)goto S_61378;} +S_61379:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 )),qbs_new_txt_len("ABSOLUTE",8))))||is_error_pending()){ -if(qbevent){evnt(23822,21038,"ide_methods.bas");if(r)goto S_61377;} +if(qbevent){evnt(23822,21040,"ide_methods.bas");if(r)goto S_61379;} 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(23822,21038,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21040,"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(23822,21038,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21040,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21038,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21040,"ide_methods.bas");}while(r); } sc_ec_495_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61382:; +S_61384:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DECLARE",7))))||is_error_pending()){ -if(qbevent){evnt(23822,21039,"ide_methods.bas");if(r)goto S_61382;} -S_61383:; +if(qbevent){evnt(23822,21041,"ide_methods.bas");if(r)goto S_61384;} +S_61385:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 7 )),qbs_new_txt_len("LIBRARY",7))))||is_error_pending()){ -if(qbevent){evnt(23822,21039,"ide_methods.bas");if(r)goto S_61383;} +if(qbevent){evnt(23822,21041,"ide_methods.bas");if(r)goto S_61385;} 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(23822,21039,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21041,"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(23822,21039,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21041,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21039,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21041,"ide_methods.bas");}while(r); } sc_ec_496_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61388:; +S_61390:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DEF",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21040,"ide_methods.bas");if(r)goto S_61388;} -S_61389:; +if(qbevent){evnt(23822,21042,"ide_methods.bas");if(r)goto S_61390;} +S_61391:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("SEG",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21040,"ide_methods.bas");if(r)goto S_61389;} +if(qbevent){evnt(23822,21042,"ide_methods.bas");if(r)goto S_61391;} 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(23822,21040,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21042,"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(23822,21040,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21042,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21040,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21042,"ide_methods.bas");}while(r); } sc_ec_497_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61394:; +S_61396:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("DO",2))))||is_error_pending()){ -if(qbevent){evnt(23822,21041,"ide_methods.bas");if(r)goto S_61394;} -S_61395:; +if(qbevent){evnt(23822,21043,"ide_methods.bas");if(r)goto S_61396;} +S_61397:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("WHILE",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21042,"ide_methods.bas");if(r)goto S_61395;} +if(qbevent){evnt(23822,21044,"ide_methods.bas");if(r)goto S_61397;} 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(23822,21042,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21044,"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(23822,21042,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21044,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,21042,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21044,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,21042,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21044,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21042,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21044,"ide_methods.bas");}while(r); } -S_61402:; +S_61404:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("UNTIL",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21043,"ide_methods.bas");if(r)goto S_61402;} +if(qbevent){evnt(23822,21045,"ide_methods.bas");if(r)goto S_61404;} 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(23822,21043,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21045,"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(23822,21043,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21045,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,21043,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21045,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,21043,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21045,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21043,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21045,"ide_methods.bas");}while(r); } sc_ec_498_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61409:; +S_61411:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21044,"ide_methods.bas");if(r)goto S_61409;} -S_61410:; +if(qbevent){evnt(23822,21046,"ide_methods.bas");if(r)goto S_61411;} +S_61412:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 7 )),qbs_new_txt_len("DECLARE",7))))||is_error_pending()){ -if(qbevent){evnt(23822,21045,"ide_methods.bas");if(r)goto S_61410;} +if(qbevent){evnt(23822,21047,"ide_methods.bas");if(r)goto S_61412;} 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(23822,21045,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21047,"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(23822,21045,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21047,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21045,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21047,"ide_methods.bas");}while(r); } -S_61415:; +S_61417:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 )),qbs_new_txt_len("FUNCTION",8))))||is_error_pending()){ -if(qbevent){evnt(23822,21046,"ide_methods.bas");if(r)goto S_61415;} +if(qbevent){evnt(23822,21048,"ide_methods.bas");if(r)goto S_61417;} 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(23822,21046,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21048,"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(23822,21046,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21048,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21046,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21048,"ide_methods.bas");}while(r); } -S_61420:; +S_61422:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 )),qbs_new_txt_len("IF",2))))||is_error_pending()){ -if(qbevent){evnt(23822,21047,"ide_methods.bas");if(r)goto S_61420;} +if(qbevent){evnt(23822,21049,"ide_methods.bas");if(r)goto S_61422;} 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(23822,21047,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21049,"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(23822,21047,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21049,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21047,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21049,"ide_methods.bas");}while(r); } -S_61425:; +S_61427:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 6 )),qbs_new_txt_len("SELECT",6))))||is_error_pending()){ -if(qbevent){evnt(23822,21048,"ide_methods.bas");if(r)goto S_61425;} +if(qbevent){evnt(23822,21050,"ide_methods.bas");if(r)goto S_61427;} 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(23822,21048,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21050,"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(23822,21048,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21050,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21048,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21050,"ide_methods.bas");}while(r); } -S_61430:; +S_61432:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("SUB",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21049,"ide_methods.bas");if(r)goto S_61430;} +if(qbevent){evnt(23822,21051,"ide_methods.bas");if(r)goto S_61432;} 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(23822,21049,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21051,"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(23822,21049,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21051,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21049,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21051,"ide_methods.bas");}while(r); } -S_61435:; +S_61437:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("TYPE",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21050,"ide_methods.bas");if(r)goto S_61435;} +if(qbevent){evnt(23822,21052,"ide_methods.bas");if(r)goto S_61437;} 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(23822,21050,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21052,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("END TYPE",8)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21050,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21052,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21050,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21052,"ide_methods.bas");}while(r); } sc_ec_499_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61440:; +S_61442:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("EXIT",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21051,"ide_methods.bas");if(r)goto S_61440;} -S_61441:; +if(qbevent){evnt(23822,21053,"ide_methods.bas");if(r)goto S_61442;} +S_61443:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("CASE",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21052,"ide_methods.bas");if(r)goto S_61441;} +if(qbevent){evnt(23822,21054,"ide_methods.bas");if(r)goto S_61443;} 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(23822,21052,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21054,"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(23822,21052,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21054,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21052,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21054,"ide_methods.bas");}while(r); } -S_61446:; +S_61448:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 2 )),qbs_new_txt_len("DO",2))))||is_error_pending()){ -if(qbevent){evnt(23822,21053,"ide_methods.bas");if(r)goto S_61446;} +if(qbevent){evnt(23822,21055,"ide_methods.bas");if(r)goto S_61448;} 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(23822,21053,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21055,"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(23822,21053,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21055,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21053,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21055,"ide_methods.bas");}while(r); } -S_61451:; +S_61453:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("FOR",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21054,"ide_methods.bas");if(r)goto S_61451;} +if(qbevent){evnt(23822,21056,"ide_methods.bas");if(r)goto S_61453;} 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(23822,21054,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21056,"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(23822,21054,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21056,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21054,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21056,"ide_methods.bas");}while(r); } -S_61456:; +S_61458:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 8 )),qbs_new_txt_len("FUNCTION",8))))||is_error_pending()){ -if(qbevent){evnt(23822,21055,"ide_methods.bas");if(r)goto S_61456;} +if(qbevent){evnt(23822,21057,"ide_methods.bas");if(r)goto S_61458;} 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(23822,21055,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21057,"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(23822,21055,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21057,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21055,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21057,"ide_methods.bas");}while(r); } -S_61461:; +S_61463:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 6 )),qbs_new_txt_len("SELECT",6))))||is_error_pending()){ -if(qbevent){evnt(23822,21056,"ide_methods.bas");if(r)goto S_61461;} +if(qbevent){evnt(23822,21058,"ide_methods.bas");if(r)goto S_61463;} 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(23822,21056,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21058,"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(23822,21056,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21058,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21056,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21058,"ide_methods.bas");}while(r); } -S_61466:; +S_61468:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("SUB",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21057,"ide_methods.bas");if(r)goto S_61466;} +if(qbevent){evnt(23822,21059,"ide_methods.bas");if(r)goto S_61468;} 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(23822,21057,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21059,"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(23822,21057,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21059,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21057,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21059,"ide_methods.bas");}while(r); } -S_61471:; +S_61473:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("WHILE",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21058,"ide_methods.bas");if(r)goto S_61471;} +if(qbevent){evnt(23822,21060,"ide_methods.bas");if(r)goto S_61473;} 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(23822,21058,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21060,"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(23822,21058,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21060,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21058,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21060,"ide_methods.bas");}while(r); } sc_ec_500_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61476:; +S_61478:; 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))))||is_error_pending()){ -if(qbevent){evnt(23822,21059,"ide_methods.bas");if(r)goto S_61476;} -S_61477:; +if(qbevent){evnt(23822,21061,"ide_methods.bas");if(r)goto S_61478;} +S_61479:; if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 1 ),qbs_new_txt_len("#",1))))||is_error_pending()){ -if(qbevent){evnt(23822,21059,"ide_methods.bas");if(r)goto S_61477;} +if(qbevent){evnt(23822,21061,"ide_methods.bas");if(r)goto S_61479;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_add(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len(" (general)",10))); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21059,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21061,"ide_methods.bas");}while(r); } sc_ec_501_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61480:; +S_61482:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("KEY",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21060,"ide_methods.bas");if(r)goto S_61480;} -S_61481:; +if(qbevent){evnt(23822,21062,"ide_methods.bas");if(r)goto S_61482;} +S_61483:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("LIST",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21060,"ide_methods.bas");if(r)goto S_61481;} +if(qbevent){evnt(23822,21062,"ide_methods.bas");if(r)goto S_61483;} 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(23822,21060,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21062,"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(23822,21060,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21062,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21060,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21062,"ide_methods.bas");}while(r); } sc_ec_502_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61486:; +S_61488:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LPRINT",6))))||is_error_pending()){ -if(qbevent){evnt(23822,21061,"ide_methods.bas");if(r)goto S_61486;} -S_61487:; +if(qbevent){evnt(23822,21063,"ide_methods.bas");if(r)goto S_61488;} +S_61489:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21061,"ide_methods.bas");if(r)goto S_61487;} +if(qbevent){evnt(23822,21063,"ide_methods.bas");if(r)goto S_61489;} 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(23822,21061,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21063,"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(23822,21061,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21063,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21061,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21063,"ide_methods.bas");}while(r); } sc_ec_503_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61492:; +S_61494:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LINE",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21062,"ide_methods.bas");if(r)goto S_61492;} -S_61493:; +if(qbevent){evnt(23822,21064,"ide_methods.bas");if(r)goto S_61494;} +S_61495:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("INPUT",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21063,"ide_methods.bas");if(r)goto S_61493;} +if(qbevent){evnt(23822,21065,"ide_methods.bas");if(r)goto S_61495;} 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(23822,21064,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21066,"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(23822,21064,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21066,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21064,"ide_methods.bas");}while(r); -S_61497:; +if(!qbevent)break;evnt(23822,21066,"ide_methods.bas");}while(r); +S_61499:; 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))))||is_error_pending()){ -if(qbevent){evnt(23822,21065,"ide_methods.bas");if(r)goto S_61497;} +if(qbevent){evnt(23822,21067,"ide_methods.bas");if(r)goto S_61499;} 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(23822,21065,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21067,"ide_methods.bas");}while(r); } } sc_ec_504_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61501:; +S_61503:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("LOOP",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21067,"ide_methods.bas");if(r)goto S_61501;} -S_61502:; +if(qbevent){evnt(23822,21069,"ide_methods.bas");if(r)goto S_61503;} +S_61504:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("WHILE",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21068,"ide_methods.bas");if(r)goto S_61502;} +if(qbevent){evnt(23822,21070,"ide_methods.bas");if(r)goto S_61504;} 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(23822,21068,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21070,"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(23822,21068,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21070,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,21068,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21070,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,21068,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21070,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21068,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21070,"ide_methods.bas");}while(r); } -S_61509:; +S_61511:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("UNTIL",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21069,"ide_methods.bas");if(r)goto S_61509;} +if(qbevent){evnt(23822,21071,"ide_methods.bas");if(r)goto S_61511;} 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(23822,21069,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21071,"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(23822,21069,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21071,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,21069,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21071,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,21069,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21071,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21069,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21071,"ide_methods.bas");}while(r); } sc_ec_505_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61516:; +S_61518:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON",2))))||is_error_pending()){ -if(qbevent){evnt(23822,21070,"ide_methods.bas");if(r)goto S_61516;} -S_61517:; +if(qbevent){evnt(23822,21072,"ide_methods.bas");if(r)goto S_61518;} +S_61519:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("ERROR",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21071,"ide_methods.bas");if(r)goto S_61517;} +if(qbevent){evnt(23822,21073,"ide_methods.bas");if(r)goto S_61519;} 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(23822,21071,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21073,"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(23822,21071,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21073,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21071,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21073,"ide_methods.bas");}while(r); } -S_61522:; +S_61524:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 3 )),qbs_new_txt_len("KEY",3))))||is_error_pending()){ -if(qbevent){evnt(23822,21072,"ide_methods.bas");if(r)goto S_61522;} +if(qbevent){evnt(23822,21074,"ide_methods.bas");if(r)goto S_61524;} 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(23822,21072,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21074,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON KEY(n)",9)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21072,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21074,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21072,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21074,"ide_methods.bas");}while(r); } -S_61527:; +S_61529:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("STRIG",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21073,"ide_methods.bas");if(r)goto S_61527;} +if(qbevent){evnt(23822,21075,"ide_methods.bas");if(r)goto S_61529;} 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(23822,21073,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21075,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON STRIG(n)",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21073,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21075,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21073,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21075,"ide_methods.bas");}while(r); } -S_61532:; +S_61534:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("TIMER",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21074,"ide_methods.bas");if(r)goto S_61532;} +if(qbevent){evnt(23822,21076,"ide_methods.bas");if(r)goto S_61534;} 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(23822,21074,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21076,"ide_methods.bas");}while(r); do{ qbs_set(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("ON TIMER(n)",11)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21074,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21076,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21074,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21076,"ide_methods.bas");}while(r); } sc_ec_506_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61537:; +S_61539:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("OPTION",6))))||is_error_pending()){ -if(qbevent){evnt(23822,21075,"ide_methods.bas");if(r)goto S_61537;} -S_61538:; +if(qbevent){evnt(23822,21077,"ide_methods.bas");if(r)goto S_61539;} +S_61540:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("BASE",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21075,"ide_methods.bas");if(r)goto S_61538;} +if(qbevent){evnt(23822,21077,"ide_methods.bas");if(r)goto S_61540;} 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(23822,21075,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21077,"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(23822,21075,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21077,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21075,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21077,"ide_methods.bas");}while(r); } sc_ec_507_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61543:; +S_61545:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PALETTE",7))))||is_error_pending()){ -if(qbevent){evnt(23822,21076,"ide_methods.bas");if(r)goto S_61543;} -S_61544:; +if(qbevent){evnt(23822,21078,"ide_methods.bas");if(r)goto S_61545;} +S_61546:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21076,"ide_methods.bas");if(r)goto S_61544;} +if(qbevent){evnt(23822,21078,"ide_methods.bas");if(r)goto S_61546;} 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(23822,21076,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21078,"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(23822,21076,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21078,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21076,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21078,"ide_methods.bas");}while(r); } sc_ec_508_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61549:; +S_61551:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("PRINT",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21077,"ide_methods.bas");if(r)goto S_61549;} -S_61550:; +if(qbevent){evnt(23822,21079,"ide_methods.bas");if(r)goto S_61551;} +S_61552:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21078,"ide_methods.bas");if(r)goto S_61550;} +if(qbevent){evnt(23822,21080,"ide_methods.bas");if(r)goto S_61552;} 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(23822,21079,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21081,"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(23822,21079,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21081,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21079,"ide_methods.bas");}while(r); -S_61554:; +if(!qbevent)break;evnt(23822,21081,"ide_methods.bas");}while(r); +S_61556:; 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))))||is_error_pending()){ -if(qbevent){evnt(23822,21080,"ide_methods.bas");if(r)goto S_61554;} +if(qbevent){evnt(23822,21082,"ide_methods.bas");if(r)goto S_61556;} 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(23822,21080,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21082,"ide_methods.bas");}while(r); } } sc_ec_509_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61558:; +S_61560:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("RANDOMIZE",9))))||is_error_pending()){ -if(qbevent){evnt(23822,21082,"ide_methods.bas");if(r)goto S_61558;} -S_61559:; +if(qbevent){evnt(23822,21084,"ide_methods.bas");if(r)goto S_61560;} +S_61561:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("USING",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21082,"ide_methods.bas");if(r)goto S_61559;} +if(qbevent){evnt(23822,21084,"ide_methods.bas");if(r)goto S_61561;} 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(23822,21082,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21084,"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(23822,21082,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21084,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21082,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21084,"ide_methods.bas");}while(r); } sc_ec_510_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61564:; +S_61566:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("SELECT",6))))||is_error_pending()){ -if(qbevent){evnt(23822,21083,"ide_methods.bas");if(r)goto S_61564;} -S_61565:; +if(qbevent){evnt(23822,21085,"ide_methods.bas");if(r)goto S_61566;} +S_61567:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 4 )),qbs_new_txt_len("CASE",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21084,"ide_methods.bas");if(r)goto S_61565;} +if(qbevent){evnt(23822,21086,"ide_methods.bas");if(r)goto S_61567;} 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(23822,21084,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21086,"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(23822,21084,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21086,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,21084,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21086,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,21084,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21086,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21084,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21086,"ide_methods.bas");}while(r); } -S_61572:; +S_61574:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 9 )),qbs_new_txt_len("EVERYCASE",9))))||is_error_pending()){ -if(qbevent){evnt(23822,21085,"ide_methods.bas");if(r)goto S_61572;} +if(qbevent){evnt(23822,21087,"ide_methods.bas");if(r)goto S_61574;} 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(23822,21085,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21087,"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(23822,21085,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21087,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_FU= -1 ; -if(!qbevent)break;evnt(23822,21085,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21087,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_BO= -1 ; -if(!qbevent)break;evnt(23822,21085,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21087,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21085,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21087,"ide_methods.bas");}while(r); } sc_ec_511_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61579:; +S_61581:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_EXPORTCODEAS_STRING_PAGE,qbs_new_txt_len("VIEW",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21086,"ide_methods.bas");if(r)goto S_61579;} -S_61580:; +if(qbevent){evnt(23822,21088,"ide_methods.bas");if(r)goto S_61581;} +S_61582:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 5 )),qbs_new_txt_len("PRINT",5))))||is_error_pending()){ -if(qbevent){evnt(23822,21086,"ide_methods.bas");if(r)goto S_61580;} +if(qbevent){evnt(23822,21088,"ide_methods.bas");if(r)goto S_61582;} 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(23822,21086,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21088,"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(23822,21086,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21088,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_IN= -1 ; -if(!qbevent)break;evnt(23822,21086,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21088,"ide_methods.bas");}while(r); } sc_ec_512_end:; -sc_6982_var=-1; +sc_6983_var=-1; } -S_61585:; +S_61587:; 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))))||is_error_pending()){ -if(qbevent){evnt(23822,21087,"ide_methods.bas");if(r)goto S_61585;} -S_61586:; +if(qbevent){evnt(23822,21089,"ide_methods.bas");if(r)goto S_61587;} +S_61588:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_EXPORTCODEAS_STRING_LA, 1 ),qbs_new_txt_len("#",1))))||is_error_pending()){ -if(qbevent){evnt(23822,21087,"ide_methods.bas");if(r)goto S_61586;} +if(qbevent){evnt(23822,21089,"ide_methods.bas");if(r)goto S_61588;} 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(23822,21087,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21089,"ide_methods.bas");}while(r); } sc_ec_513_end:; } -sc_6982_end:; +sc_6983_end:; } } } } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21090,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21092,"ide_methods.bas");}while(r); LABEL_WRITELINK:; -if(qbevent){evnt(23822,21092,"ide_methods.bas");r=0;} -S_61592:; +if(qbevent){evnt(23822,21094,"ide_methods.bas");r=0;} +S_61594:; 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))))))||is_error_pending()){ -if(qbevent){evnt(23822,21093,"ide_methods.bas");if(r)goto S_61592;} +if(qbevent){evnt(23822,21095,"ide_methods.bas");if(r)goto S_61594;} do{ goto LABEL_UNKNOWNNOLINKNOCOLOR; -if(!qbevent)break;evnt(23822,21093,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21095,"ide_methods.bas");}while(r); } -S_61595:; +S_61597:; if ((*_SUB_EXPORTCODEAS_INTEGER_CU)||is_error_pending()){ -if(qbevent){evnt(23822,21094,"ide_methods.bas");if(r)goto S_61595;} +if(qbevent){evnt(23822,21096,"ide_methods.bas");if(r)goto S_61597;} do{ goto LABEL_CUSTOMNOLINK; -if(!qbevent)break;evnt(23822,21094,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21096,"ide_methods.bas");}while(r); } do{ return_point[next_return_point++]=228; if (next_return_point>=return_points) more_return_points(); goto LABEL_FINDWIKIPAGE; RETURN_228:; -if(!qbevent)break;evnt(23822,21095,"ide_methods.bas");}while(r); -S_61599:; +if(!qbevent)break;evnt(23822,21097,"ide_methods.bas");}while(r); +S_61601:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME&*_SUB_EXPORTCODEAS_INTEGER_LE&*_SUB_EXPORTCODEAS_INTEGER_CO)||is_error_pending()){ -if(qbevent){evnt(23822,21096,"ide_methods.bas");if(r)goto S_61599;} +if(qbevent){evnt(23822,21098,"ide_methods.bas");if(r)goto S_61601;} do{ *_SUB_EXPORTCODEAS_INTEGER_POST= 0 ; -if(!qbevent)break;evnt(23822,21096,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21098,"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(23822,21096,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21098,"ide_methods.bas");}while(r); do{ return_point[next_return_point++]=229; if (next_return_point>=return_points) more_return_points(); goto LABEL_CLOSETEXT; RETURN_229:; -if(!qbevent)break;evnt(23822,21096,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21098,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_CO= 0 ; -if(!qbevent)break;evnt(23822,21096,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21098,"ide_methods.bas");}while(r); } -S_61605:; +S_61607:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ -if(qbevent){evnt(23822,21097,"ide_methods.bas");if(r)goto S_61605;} +if(qbevent){evnt(23822,21099,"ide_methods.bas");if(r)goto S_61607;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LNK,_SUB_EXPORTCODEAS_STRING_ME); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21097,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21099,"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(23822,21097,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21099,"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(23822,21098,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21100,"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(23822,21098,"ide_methods.bas");}while(r); -S_61612:; -qbs_set(sc_6985,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,21099,"ide_methods.bas");if(r)goto S_61612;} -S_61613:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6985,qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21100,"ide_methods.bas");if(r)goto S_61613;} +if(!qbevent)break;evnt(23822,21100,"ide_methods.bas");}while(r); S_61614:; -if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ +qbs_set(sc_6986,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23822,21101,"ide_methods.bas");if(r)goto S_61614;} +S_61615:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6986,qbs_new_txt_len("html",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21102,"ide_methods.bas");if(r)goto S_61615;} +S_61616:; +if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ +if(qbevent){evnt(23822,21103,"ide_methods.bas");if(r)goto S_61616;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_MEC); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21101,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21103,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_KWC); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21101,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21103,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,( 2 **_SUB_EXPORTCODEAS_INTEGER_PAL)+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 120 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("",4)),1); -if(!qbevent)break;evnt(23822,21102,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21104,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+( 2 **_SUB_EXPORTCODEAS_INTEGER_PAL)+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 120 ; -if(!qbevent)break;evnt(23822,21103,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21105,"ide_methods.bas");}while(r); sc_ec_514_end:; -goto sc_6985_end; +goto sc_6986_end; } -S_61621:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6985,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21104,"ide_methods.bas");if(r)goto S_61621;} -S_61622:; +S_61623:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6986,qbs_new_txt_len("rich",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21106,"ide_methods.bas");if(r)goto S_61623;} +S_61624:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ -if(qbevent){evnt(23822,21105,"ide_methods.bas");if(r)goto S_61622;} +if(qbevent){evnt(23822,21107,"ide_methods.bas");if(r)goto S_61624;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("\\cf2",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21105,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21107,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("\\cf3",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21105,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21107,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 108 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("{\\field{\\*\\fldinst HYPERLINK ",29),func_chr( 34 )),qbs_new_txt_len("https://qb64phoenix.com/qb64wiki/index.php?title=",49)),_SUB_EXPORTCODEAS_STRING_PAGE),func_chr( 34 )),qbs_new_txt_len("}{\\fldrslt{",11)),_SUB_EXPORTCODEAS_STRING_LKC),qbs_new_txt_len("\\ul0 ",5)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}}\\cf0 ",8)),1); -if(!qbevent)break;evnt(23822,21106,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21108,"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(23822,21107,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21109,"ide_methods.bas");}while(r); sc_ec_515_end:; -goto sc_6985_end; +goto sc_6986_end; } -S_61629:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6985,qbs_new_txt_len("foru",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21108,"ide_methods.bas");if(r)goto S_61629;} -S_61630:; +S_61631:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6986,qbs_new_txt_len("foru",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21110,"ide_methods.bas");if(r)goto S_61631;} +S_61632:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ -if(qbevent){evnt(23822,21109,"ide_methods.bas");if(r)goto S_61630;} +if(qbevent){evnt(23822,21111,"ide_methods.bas");if(r)goto S_61632;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("#55FF55",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21109,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21111,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("#4593D8",7)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21109,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21111,"ide_methods.bas");}while(r); } do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 84 ,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("[url=https://qb64phoenix.com/qb64wiki/index.php?title=",54),_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("][color=",8)),_SUB_EXPORTCODEAS_STRING_LKC),qbs_new_txt_len("]",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("[/color][/url]",14)),1); -if(!qbevent)break;evnt(23822,21110,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21112,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 84 ; -if(!qbevent)break;evnt(23822,21111,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21113,"ide_methods.bas");}while(r); sc_ec_516_end:; -goto sc_6985_end; +goto sc_6986_end; } -S_61637:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6985,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21112,"ide_methods.bas");if(r)goto S_61637;} -S_61638:; +S_61639:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6986,qbs_new_txt_len("wiki",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21114,"ide_methods.bas");if(r)goto S_61639;} +S_61640:; if ((*_SUB_EXPORTCODEAS_INTEGER_ME|*_SUB_EXPORTCODEAS_INTEGER_PC)||is_error_pending()){ -if(qbevent){evnt(23822,21113,"ide_methods.bas");if(r)goto S_61638;} +if(qbevent){evnt(23822,21115,"ide_methods.bas");if(r)goto S_61640;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("{{Cm|",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21113,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21115,"ide_methods.bas");}while(r); }else{ do{ qbs_set(_SUB_EXPORTCODEAS_STRING_LKC,qbs_new_txt_len("{{Cl|",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21113,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21115,"ide_methods.bas");}while(r); } -S_61643:; +S_61645:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(_SUB_EXPORTCODEAS_STRING_PAGE),qbs_ucase(_SUB_EXPORTCODEAS_STRING_LNK))))||is_error_pending()){ -if(qbevent){evnt(23822,21114,"ide_methods.bas");if(r)goto S_61643;} +if(qbevent){evnt(23822,21116,"ide_methods.bas");if(r)goto S_61645;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_LKL+ 7 ,qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}",2)),1); -if(!qbevent)break;evnt(23822,21115,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21117,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 7 ; -if(!qbevent)break;evnt(23822,21116,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21118,"ide_methods.bas");}while(r); }else{ do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_PAL+*_SUB_EXPORTCODEAS_INTEGER_LKL+ 8 ,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_EXPORTCODEAS_STRING_LKC,_SUB_EXPORTCODEAS_STRING_PAGE),qbs_new_txt_len("|",1)),_SUB_EXPORTCODEAS_STRING_LNK),qbs_new_txt_len("}}",2)),1); -if(!qbevent)break;evnt(23822,21118,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21120,"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(23822,21119,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21121,"ide_methods.bas");}while(r); } sc_ec_517_end:; -goto sc_6985_end; +goto sc_6986_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21121,"ide_methods.bas");}while(r); -sc_6985_end:; +if(!qbevent)break;evnt(23822,21123,"ide_methods.bas");}while(r); +sc_6986_end:; do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21123,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21125,"ide_methods.bas");}while(r); LABEL_CUSTOMNOLINK:; -if(qbevent){evnt(23822,21125,"ide_methods.bas");r=0;} +if(qbevent){evnt(23822,21127,"ide_methods.bas");r=0;} do{ *_SUB_EXPORTCODEAS_INTEGER_CU= 0 ; -if(!qbevent)break;evnt(23822,21126,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21128,"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(23822,21126,"ide_methods.bas");}while(r); -S_61656:; -qbs_set(sc_6987,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(!qbevent)break;evnt(23822,21128,"ide_methods.bas");}while(r); +S_61658:; +qbs_set(sc_6988,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,21127,"ide_methods.bas");if(r)goto S_61656;} -S_61657:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6987,qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21128,"ide_methods.bas");if(r)goto S_61657;} +if(qbevent){evnt(23822,21129,"ide_methods.bas");if(r)goto S_61658;} +S_61659:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6988,qbs_new_txt_len("html",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21130,"ide_methods.bas");if(r)goto S_61659;} 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(23822,21129,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21131,"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(23822,21129,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21131,"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(23822,21130,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21132,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 37 ; -if(!qbevent)break;evnt(23822,21131,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21133,"ide_methods.bas");}while(r); sc_ec_518_end:; -goto sc_6987_end; +goto sc_6988_end; } -S_61662:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6987,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21132,"ide_methods.bas");if(r)goto S_61662;} +S_61664:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6988,qbs_new_txt_len("rich",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21134,"ide_methods.bas");if(r)goto S_61664;} 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(23822,21133,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21135,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 10 ; -if(!qbevent)break;evnt(23822,21134,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21136,"ide_methods.bas");}while(r); sc_ec_519_end:; -goto sc_6987_end; +goto sc_6988_end; } -S_61665:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6987,qbs_new_txt_len("foru",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21135,"ide_methods.bas");if(r)goto S_61665;} +S_61667:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6988,qbs_new_txt_len("foru",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21137,"ide_methods.bas");if(r)goto S_61667;} do{ sub_mid(_SUB_EXPORTCODEAS_STRING_ETXT,*_SUB_EXPORTCODEAS_LONG_EPOS,*_SUB_EXPORTCODEAS_INTEGER_KWL+ 23 ,qbs_add(qbs_add(qbs_new_txt_len("[color=#55FF55]",15),_SUB_EXPORTCODEAS_STRING_KW),qbs_new_txt_len("[/color]",8)),1); -if(!qbevent)break;evnt(23822,21136,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21138,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 23 ; -if(!qbevent)break;evnt(23822,21137,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21139,"ide_methods.bas");}while(r); sc_ec_520_end:; -goto sc_6987_end; +goto sc_6988_end; } -S_61668:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6987,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21138,"ide_methods.bas");if(r)goto S_61668;} +S_61670:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6988,qbs_new_txt_len("wiki",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21140,"ide_methods.bas");if(r)goto S_61670;} 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(23822,21139,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21141,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_LONG_EPOS=*_SUB_EXPORTCODEAS_LONG_EPOS+*_SUB_EXPORTCODEAS_INTEGER_KWL+ 17 ; -if(!qbevent)break;evnt(23822,21140,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21142,"ide_methods.bas");}while(r); sc_ec_521_end:; -goto sc_6987_end; +goto sc_6988_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21141,"ide_methods.bas");}while(r); -sc_6987_end:; +if(!qbevent)break;evnt(23822,21143,"ide_methods.bas");}while(r); +sc_6988_end:; do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21143,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21145,"ide_methods.bas");}while(r); LABEL_UNKNOWNNOLINKNOCOLOR:; -if(qbevent){evnt(23822,21145,"ide_methods.bas");r=0;} -S_61675:; +if(qbevent){evnt(23822,21147,"ide_methods.bas");r=0;} +S_61677:; if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT),qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21146,"ide_methods.bas");if(r)goto S_61675;} +if(qbevent){evnt(23822,21148,"ide_methods.bas");if(r)goto S_61677;} 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(23822,21146,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21148,"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(23822,21147,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21149,"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(23822,21147,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21149,"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(23822,21147,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21149,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21148,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21150,"ide_methods.bas");}while(r); LABEL_ESCAPECHAR:; -if(qbevent){evnt(23822,21150,"ide_methods.bas");r=0;} -S_61682:; -qbs_set(sc_6991,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); -qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,21151,"ide_methods.bas");if(r)goto S_61682;} -S_61683:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6991,qbs_new_txt_len("html",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21152,"ide_methods.bas");if(r)goto S_61683;} +if(qbevent){evnt(23822,21152,"ide_methods.bas");r=0;} S_61684:; +qbs_set(sc_6992,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +qbs_cleanup(qbs_tmp_base,0); if(qbevent){evnt(23822,21153,"ide_methods.bas");if(r)goto S_61684;} S_61685:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6992,qbs_new_txt_len("html",4))))||is_error_pending()){ if(qbevent){evnt(23822,21154,"ide_methods.bas");if(r)goto S_61685;} +S_61686:; +if(qbevent){evnt(23822,21155,"ide_methods.bas");if(r)goto S_61686;} +S_61687:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 34 )))||is_error_pending()){ +if(qbevent){evnt(23822,21156,"ide_methods.bas");if(r)goto S_61687;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(""",6)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21154,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21156,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21154,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21156,"ide_methods.bas");}while(r); sc_ec_522_end:; -goto sc_6992_end; +goto sc_6993_end; } -S_61688:; +S_61690:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 38 )))||is_error_pending()){ -if(qbevent){evnt(23822,21155,"ide_methods.bas");if(r)goto S_61688;} +if(qbevent){evnt(23822,21157,"ide_methods.bas");if(r)goto S_61690;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("&",5)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21155,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21157,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21155,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21157,"ide_methods.bas");}while(r); sc_ec_523_end:; -goto sc_6992_end; +goto sc_6993_end; } -S_61691:; +S_61693:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 60 )))||is_error_pending()){ -if(qbevent){evnt(23822,21156,"ide_methods.bas");if(r)goto S_61691;} +if(qbevent){evnt(23822,21158,"ide_methods.bas");if(r)goto S_61693;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("<",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21156,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21158,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21156,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21158,"ide_methods.bas");}while(r); sc_ec_524_end:; -goto sc_6992_end; +goto sc_6993_end; } -S_61694:; +S_61696:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 62 )))||is_error_pending()){ -if(qbevent){evnt(23822,21157,"ide_methods.bas");if(r)goto S_61694;} +if(qbevent){evnt(23822,21159,"ide_methods.bas");if(r)goto S_61696;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len(">",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21157,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21159,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21157,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21159,"ide_methods.bas");}while(r); sc_ec_525_end:; -goto sc_6992_end; +goto sc_6993_end; } -S_61697:; +S_61699:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||is_error_pending()){ -if(qbevent){evnt(23822,21158,"ide_methods.bas");if(r)goto S_61697;} +if(qbevent){evnt(23822,21160,"ide_methods.bas");if(r)goto S_61699;} do{ *_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); -if(!qbevent)break;evnt(23822,21159,"ide_methods.bas");}while(r); -S_61699:; +if(!qbevent)break;evnt(23822,21161,"ide_methods.bas");}while(r); +S_61701:; if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||is_error_pending()){ -if(qbevent){evnt(23822,21160,"ide_methods.bas");if(r)goto S_61699;} +if(qbevent){evnt(23822,21162,"ide_methods.bas");if(r)goto S_61701;} do{ *_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; -if(!qbevent)break;evnt(23822,21160,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21162,"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(23822,21161,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21163,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21161,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21163,"ide_methods.bas");}while(r); sc_ec_526_end:; -goto sc_6992_end; +goto sc_6993_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21162,"ide_methods.bas");}while(r); -sc_6992_end:; +if(!qbevent)break;evnt(23822,21164,"ide_methods.bas");}while(r); +sc_6993_end:; sc_ec_527_end:; -goto sc_6991_end; +goto sc_6992_end; } -S_61707:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6991,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21164,"ide_methods.bas");if(r)goto S_61707;} -S_61708:; -if(qbevent){evnt(23822,21165,"ide_methods.bas");if(r)goto S_61708;} S_61709:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 92 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6992,qbs_new_txt_len("rich",4))))||is_error_pending()){ if(qbevent){evnt(23822,21166,"ide_methods.bas");if(r)goto S_61709;} +S_61710:; +if(qbevent){evnt(23822,21167,"ide_methods.bas");if(r)goto S_61710;} +S_61711:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR==( 92 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 123 ))||(*_SUB_EXPORTCODEAS_INTEGER_CURR==( 125 )))||is_error_pending()){ +if(qbevent){evnt(23822,21168,"ide_methods.bas");if(r)goto S_61711;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_ECH,qbs_new_txt_len("\\",1)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21166,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21168,"ide_methods.bas");}while(r); sc_ec_528_end:; -goto sc_6993_end; +goto sc_6994_end; } -S_61711:; +S_61713:; if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||is_error_pending()){ -if(qbevent){evnt(23822,21167,"ide_methods.bas");if(r)goto S_61711;} +if(qbevent){evnt(23822,21169,"ide_methods.bas");if(r)goto S_61713;} do{ *_SUB_EXPORTCODEAS_LONG_UNI=func__mapunicode(*_SUB_EXPORTCODEAS_INTEGER_CURR); -if(!qbevent)break;evnt(23822,21168,"ide_methods.bas");}while(r); -S_61713:; +if(!qbevent)break;evnt(23822,21170,"ide_methods.bas");}while(r); +S_61715:; if ((-(*_SUB_EXPORTCODEAS_LONG_UNI== 0 ))||is_error_pending()){ -if(qbevent){evnt(23822,21169,"ide_methods.bas");if(r)goto S_61713;} +if(qbevent){evnt(23822,21171,"ide_methods.bas");if(r)goto S_61715;} do{ *_SUB_EXPORTCODEAS_LONG_UNI= 65533 ; -if(!qbevent)break;evnt(23822,21169,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21171,"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(23822,21170,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21172,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21170,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21172,"ide_methods.bas");}while(r); sc_ec_529_end:; -goto sc_6993_end; +goto sc_6994_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21171,"ide_methods.bas");}while(r); -sc_6993_end:; +if(!qbevent)break;evnt(23822,21173,"ide_methods.bas");}while(r); +sc_6994_end:; sc_ec_530_end:; -goto sc_6991_end; +goto sc_6992_end; } -S_61721:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6991,qbs_new_txt_len("foru",4))||qbs_equal(sc_6991,qbs_new_txt_len("wiki",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21173,"ide_methods.bas");if(r)goto S_61721;} -S_61722:; -if(qbevent){evnt(23822,21174,"ide_methods.bas");if(r)goto S_61722;} S_61723:; -if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||is_error_pending()){ +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6992,qbs_new_txt_len("foru",4))||qbs_equal(sc_6992,qbs_new_txt_len("wiki",4))))||is_error_pending()){ if(qbevent){evnt(23822,21175,"ide_methods.bas");if(r)goto S_61723;} +S_61724:; +if(qbevent){evnt(23822,21176,"ide_methods.bas");if(r)goto S_61724;} +S_61725:; +if (((*_SUB_EXPORTCODEAS_INTEGER_CURR>( 127 )))||is_error_pending()){ +if(qbevent){evnt(23822,21177,"ide_methods.bas");if(r)goto S_61725;} 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(23822,21175,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21177,"ide_methods.bas");}while(r); do{ *_SUB_EXPORTCODEAS_INTEGER_SK= -1 ; -if(!qbevent)break;evnt(23822,21175,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21177,"ide_methods.bas");}while(r); sc_ec_531_end:; -goto sc_6994_end; +goto sc_6995_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21176,"ide_methods.bas");}while(r); -sc_6994_end:; +if(!qbevent)break;evnt(23822,21178,"ide_methods.bas");}while(r); +sc_6995_end:; sc_ec_532_end:; -goto sc_6991_end; +goto sc_6992_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21178,"ide_methods.bas");}while(r); -sc_6991_end:; +if(!qbevent)break;evnt(23822,21180,"ide_methods.bas");}while(r); +sc_6992_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(23822,21180,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21182,"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(23822,21180,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21182,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21181,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21183,"ide_methods.bas");}while(r); LABEL_ENDLINEOPS:; -if(qbevent){evnt(23822,21183,"ide_methods.bas");r=0;} -S_61735:; -qbs_set(sc_6997,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); +if(qbevent){evnt(23822,21185,"ide_methods.bas");r=0;} +S_61737:; +qbs_set(sc_6998,qbs_lcase(_SUB_EXPORTCODEAS_STRING_DOCFORMAT)); qbs_cleanup(qbs_tmp_base,0); -if(qbevent){evnt(23822,21184,"ide_methods.bas");if(r)goto S_61735;} -S_61736:; -if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6997,qbs_new_txt_len("rich",4))))||is_error_pending()){ -if(qbevent){evnt(23822,21185,"ide_methods.bas");if(r)goto S_61736;} +if(qbevent){evnt(23822,21186,"ide_methods.bas");if(r)goto S_61737;} +S_61738:; +if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6998,qbs_new_txt_len("rich",4))))||is_error_pending()){ +if(qbevent){evnt(23822,21187,"ide_methods.bas");if(r)goto S_61738;} do{ qbs_set(_SUB_EXPORTCODEAS_STRING_TMP,qbs_new_txt_len("\\par",4)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21185,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21187,"ide_methods.bas");}while(r); sc_ec_533_end:; -goto sc_6997_end; +goto sc_6998_end; } do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21186,"ide_methods.bas");}while(r); -sc_6997_end:; +if(!qbevent)break;evnt(23822,21188,"ide_methods.bas");}while(r); +sc_6998_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(23822,21188,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21190,"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(23822,21188,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21190,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21189,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21191,"ide_methods.bas");}while(r); LABEL_GETTHEMECOLORS:; -if(qbevent){evnt(23822,21191,"ide_methods.bas");r=0;} +if(qbevent){evnt(23822,21193,"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(23822,21192,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21194,"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(23822,21193,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21195,"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(23822,21194,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21196,"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(23822,21195,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21197,"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(23822,21196,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21198,"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(23822,21197,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21199,"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(23822,21198,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21200,"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(23822,21199,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21201,"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(23822,21200,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21202,"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(23822,21201,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21203,"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(23822,21202,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21204,"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(23822,21203,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21205,"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(23822,21204,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21206,"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(23822,21205,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21207,"ide_methods.bas");}while(r); do{ #include "ret340.txt" -if(!qbevent)break;evnt(23822,21206,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21208,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free340.txt" @@ -210071,65 +210075,65 @@ new_mem_lock(); sf_mem_lock=mem_lock_tmp; sf_mem_lock->type=3; if (is_error_pending()) goto exit_subfunc; -S_61759:; +S_61761:; if ((-(*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE< 128 ))||is_error_pending()){ -if(qbevent){evnt(23822,21211,"ide_methods.bas");if(r)goto S_61759;} +if(qbevent){evnt(23822,21213,"ide_methods.bas");if(r)goto S_61761;} do{ qbs_set(_FUNC_UNICODETOUTF8CHAR_STRING_UNICODETOUTF8CHAR,func_chr(*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE)); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21213,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21215,"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(23822,21216,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21218,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC=*_FUNC_UNICODETOUTF8CHAR_LONG_UNICODE; -if(!qbevent)break;evnt(23822,21216,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21218,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST= 128 ; -if(!qbevent)break;evnt(23822,21217,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21219,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN= 63 ; -if(!qbevent)break;evnt(23822,21217,"ide_methods.bas");}while(r); -S_61766:; +if(!qbevent)break;evnt(23822,21219,"ide_methods.bas");}while(r); +S_61768:; do{ -if(qbevent){evnt(23822,21218,"ide_methods.bas");if(r)goto S_61766;} +if(qbevent){evnt(23822,21220,"ide_methods.bas");if(r)goto S_61768;} do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST= 128 |(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST/ 2 ); -if(!qbevent)break;evnt(23822,21219,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21221,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN=(*_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN/ 2 ); -if(!qbevent)break;evnt(23822,21219,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21221,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_CONTI= 128 |(*_FUNC_UNICODETOUTF8CHAR_LONG_UC& 63 ); -if(!qbevent)break;evnt(23822,21220,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21222,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC=*_FUNC_UNICODETOUTF8CHAR_LONG_UC/ 64 ; -if(!qbevent)break;evnt(23822,21220,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21222,"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(23822,21221,"ide_methods.bas");}while(r); -S_61772:; +if(!qbevent)break;evnt(23822,21223,"ide_methods.bas");}while(r); +S_61774:; if ((-(*_FUNC_UNICODETOUTF8CHAR_LONG_UC<=*_FUNC_UNICODETOUTF8CHAR_INTEGER_REMAIN))||is_error_pending()){ -if(qbevent){evnt(23822,21222,"ide_methods.bas");if(r)goto S_61772;} +if(qbevent){evnt(23822,21224,"ide_methods.bas");if(r)goto S_61774;} do{ *_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST=(*_FUNC_UNICODETOUTF8CHAR_INTEGER_FIRST|*_FUNC_UNICODETOUTF8CHAR_LONG_UC); -if(!qbevent)break;evnt(23822,21223,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21225,"ide_methods.bas");}while(r); do{ *_FUNC_UNICODETOUTF8CHAR_LONG_UC= 0 ; -if(!qbevent)break;evnt(23822,21223,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21225,"ide_methods.bas");}while(r); } -S_61776:; -dl_continue_7000:; +S_61778:; +dl_continue_7001:; }while((!(-(*_FUNC_UNICODETOUTF8CHAR_LONG_UC== 0 )))&&(!is_error_pending())); -dl_exit_7000:; -if(qbevent){evnt(23822,21225,"ide_methods.bas");if(r)goto S_61776;} +dl_exit_7001:; +if(qbevent){evnt(23822,21227,"ide_methods.bas");if(r)goto S_61778;} 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(23822,21226,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21228,"ide_methods.bas");}while(r); } exit_subfunc:; free_mem_lock(sf_mem_lock); @@ -210154,60 +210158,60 @@ if (is_error_pending()) 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(23822,21231,"ide_methods.bas");}while(r); -S_61780:; -fornext_value7003= 1 ; -fornext_finalvalue7003=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->len; -fornext_step7003= 1 ; -if (fornext_step7003<0) fornext_step_negative7003=1; else fornext_step_negative7003=0; -if (is_error_pending()) goto fornext_error7003; -goto fornext_entrylabel7003; +if(!qbevent)break;evnt(23822,21233,"ide_methods.bas");}while(r); +S_61782:; +fornext_value7004= 1 ; +fornext_finalvalue7004=_FUNC_ANSITEXTTOUTF8TEXT_STRING_TEXT->len; +fornext_step7004= 1 ; +if (fornext_step7004<0) fornext_step_negative7004=1; else fornext_step_negative7004=0; +if (is_error_pending()) goto fornext_error7004; +goto fornext_entrylabel7004; while(1){ -fornext_value7003=fornext_step7003+(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI); -fornext_entrylabel7003: -*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI=fornext_value7003; +fornext_value7004=fornext_step7004+(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI); +fornext_entrylabel7004: +*_FUNC_ANSITEXTTOUTF8TEXT_LONG_CHI=fornext_value7004; qbs_cleanup(qbs_tmp_base,0); -if (fornext_step_negative7003){ -if (fornext_value7003fornext_finalvalue7003) break; +if (fornext_value7004>fornext_finalvalue7004) break; } -fornext_error7003:; -if(qbevent){evnt(23822,21232,"ide_methods.bas");if(r)goto S_61780;} +fornext_error7004:; +if(qbevent){evnt(23822,21234,"ide_methods.bas");if(r)goto S_61782;} 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(23822,21234,"ide_methods.bas");}while(r); -S_61782:; +if(!qbevent)break;evnt(23822,21236,"ide_methods.bas");}while(r); +S_61784:; if ((-(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII> 127 ))||is_error_pending()){ -if(qbevent){evnt(23822,21235,"ide_methods.bas");if(r)goto S_61782;} +if(qbevent){evnt(23822,21237,"ide_methods.bas");if(r)goto S_61784;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE=func__mapunicode(*_FUNC_ANSITEXTTOUTF8TEXT_INTEGER_ASCII); -if(!qbevent)break;evnt(23822,21237,"ide_methods.bas");}while(r); -S_61784:; +if(!qbevent)break;evnt(23822,21239,"ide_methods.bas");}while(r); +S_61786:; if ((-(*_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE== 0 ))||is_error_pending()){ -if(qbevent){evnt(23822,21239,"ide_methods.bas");if(r)goto S_61784;} +if(qbevent){evnt(23822,21241,"ide_methods.bas");if(r)goto S_61786;} do{ *_FUNC_ANSITEXTTOUTF8TEXT_LONG_UNICODE= 65533 ; -if(!qbevent)break;evnt(23822,21239,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21241,"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(23822,21240,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21242,"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(23822,21243,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21245,"ide_methods.bas");}while(r); } -fornext_continue_7002:; +fornext_continue_7003:; } -fornext_exit_7002:; +fornext_exit_7003:; do{ qbs_set(_FUNC_ANSITEXTTOUTF8TEXT_STRING_ANSITEXTTOUTF8TEXT,_FUNC_ANSITEXTTOUTF8TEXT_STRING_UTF); qbs_cleanup(qbs_tmp_base,0); -if(!qbevent)break;evnt(23822,21246,"ide_methods.bas");}while(r); +if(!qbevent)break;evnt(23822,21248,"ide_methods.bas");}while(r); exit_subfunc:; free_mem_lock(sf_mem_lock); #include "free342.txt"