void SUB_IDESHOWTEXT(){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data316.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (is_error_pending()) goto exit_subfunc;
S_53838:;
if ((~(*__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE))||is_error_pending()){
if(qbevent){evnt(25769,12809,"ide_methods.bas");if(r)goto S_53838;}
do{
sub__palettecolor( 1 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12810,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 2 ,func__rgb32( 84 , 84 , 84 ), 0 ,1);
if(!qbevent)break;evnt(25769,12811,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 4 ,*__ULONG_IDEERRORCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12812,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 5 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12813,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1);
if(!qbevent)break;evnt(25769,12814,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 7 ,*__ULONG_IDECHROMACOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12815,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 8 ,*__ULONG_IDENUMBERSCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12816,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 10 ,*__ULONG_IDEMETACOMMANDCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12817,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 11 ,*__ULONG_IDECOMMENTCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12818,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 12 ,*__ULONG_IDEKEYWORDCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12819,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 13 ,*__ULONG_IDETEXTCOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12820,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 14 ,*__ULONG_IDEQUOTECOLOR, 0 ,1);
if(!qbevent)break;evnt(25769,12821,"ide_methods.bas");}while(r);
}
do{
*__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE= 0ll ;
if(!qbevent)break;evnt(25769,12823,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,qbs_add(func_chr( 34 ),qbs_new_txt_len(" =<>+-/\\^:;,*()'",16)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12825,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_INITIALNUM__ASCII_CHR_046__CHAR,qbs_new_txt_len("0123456789-.&",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12826,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_NUM__ASCII_CHR_046__CHAR,qbs_new_txt_len("0123456789EDed+-.`%&!#~HBOhboACFacf",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12827,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,12829,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,12831,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_DOUBLE_STARTTIME=func_timer( 0.001E+0 ,0|1);
if(!qbevent)break;evnt(25769,12833,"ide_methods.bas");}while(r);
S_53859:;
if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||is_error_pending()){
if(qbevent){evnt(25769,12835,"ide_methods.bas");if(r)goto S_53859;}
S_53860:;
if ((-(*__LONG_IDEFOCUSLINE!= 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12836,"ide_methods.bas");if(r)goto S_53860;}
S_53861:;
if ((*__INTEGER_IDECHANGEMADE)||is_error_pending()){
if(qbevent){evnt(25769,12840,"ide_methods.bas");if(r)goto S_53861;}
do{
*_SUB_IDESHOWTEXT_BYTE_MANUALLIST= 0 ;
if(!qbevent)break;evnt(25769,12840,"ide_methods.bas");}while(r);
}
S_53864:;
if ((-(*_SUB_IDESHOWTEXT_BYTE_MANUALLIST== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12841,"ide_methods.bas");if(r)goto S_53864;}
do{
*_SUB_IDESHOWTEXT_BYTE_MANUALLIST= -1 ;
if(!qbevent)break;evnt(25769,12842,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*__LONG_CUSTOMKEYWORDSLENGTH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12843,"ide_methods.bas");}while(r);
S_53867:;
fornext_value6211= 1 ;
fornext_finalvalue6211=*__LONG_IDEN;
fornext_step6211= 1 ;
if (fornext_step6211<0) fornext_step_negative6211=1; else fornext_step_negative6211=0;
if (is_error_pending()) goto fornext_error6211;
goto fornext_entrylabel6211;
while(1){
fornext_value6211=fornext_step6211+(*_SUB_IDESHOWTEXT_LONG_Y);
fornext_entrylabel6211:
*_SUB_IDESHOWTEXT_LONG_Y=fornext_value6211;
if (fornext_step_negative6211){
if (fornext_value6211<fornext_finalvalue6211) break;
}else{
if (fornext_value6211>fornext_finalvalue6211) break;
}
fornext_error6211:;
if(qbevent){evnt(25769,12844,"ide_methods.bas");if(r)goto S_53867;}
S_53868:;
while((!(-(*_SUB_IDESHOWTEXT_LONG_Y<func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1))))||is_error_pending()){
if(qbevent){evnt(25769,12845,"ide_methods.bas");if(r)goto S_53868;}
do{
if (__ARRAY_BYTE_INVALIDLINE[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_BYTE_INVALIDLINE)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_BYTE_INVALIDLINE[2]&1){
preserve_old_ptr=__ARRAY_BYTE_INVALIDLINE[0];
preserve_old_flags=__ARRAY_BYTE_INVALIDLINE[2];
preserve_old_total=__ARRAY_BYTE_INVALIDLINE[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1)+ 1000 )-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(1);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (__ARRAY_BYTE_INVALIDLINE[2]&4){
if (preserve_old_total){
preserve_new_ptr=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
memset((void*)(preserve_new_ptr),0,(size_t)alloc_req_bytes);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_INVALIDLINE[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!__ARRAY_BYTE_INVALIDLINE[0]) error(257);
memset((void*)(__ARRAY_BYTE_INVALIDLINE[0]),0,(size_t)alloc_req_bytes);
}
}else{
if (preserve_old_total){
preserve_new_ptr=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!preserve_new_ptr) error(257);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_INVALIDLINE[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!__ARRAY_BYTE_INVALIDLINE[0]) error(257);
}
}
__ARRAY_BYTE_INVALIDLINE[2]|=1;
__ARRAY_BYTE_INVALIDLINE[4]=alloc_new_desc[4];
__ARRAY_BYTE_INVALIDLINE[5]=alloc_new_desc[5];
__ARRAY_BYTE_INVALIDLINE[6]=alloc_new_desc[6];
__ARRAY_BYTE_INVALIDLINE[7]=alloc_new_desc[7];
}
if(!qbevent)break;evnt(25769,12846,"ide_methods.bas");}while(r);
dl_continue_6212:;
}
dl_exit_6212:;
S_53871:;
if ((-(((int8*)(__ARRAY_BYTE_INVALIDLINE[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_Y)-__ARRAY_BYTE_INVALIDLINE[4],__ARRAY_BYTE_INVALIDLINE[5])]!= 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12849,"ide_methods.bas");if(r)goto S_53871;}
do{
goto fornext_continue_6210;
if(!qbevent)break;evnt(25769,12849,"ide_methods.bas");}while(r);
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_ucase(qbs__trim(FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_Y))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12850,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SF= 0 ;
if(!qbevent)break;evnt(25769,12851,"ide_methods.bas");}while(r);
S_53876:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_A, 4 ),qbs_new_txt_len("SUB ",4))))||is_error_pending()){
if(qbevent){evnt(25769,12852,"ide_methods.bas");if(r)goto S_53876;}
do{
*_SUB_IDESHOWTEXT_LONG_SF= 1 ;
if(!qbevent)break;evnt(25769,12852,"ide_methods.bas");}while(r);
}
S_53879:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_A, 9 ),qbs_new_txt_len("FUNCTION ",9))))||is_error_pending()){
if(qbevent){evnt(25769,12853,"ide_methods.bas");if(r)goto S_53879;}
do{
*_SUB_IDESHOWTEXT_LONG_SF= 2 ;
if(!qbevent)break;evnt(25769,12853,"ide_methods.bas");}while(r);
}
S_53882:;
if ((*_SUB_IDESHOWTEXT_LONG_SF)||is_error_pending()){
if(qbevent){evnt(25769,12854,"ide_methods.bas");if(r)goto S_53882;}
S_53883:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A, 7 ),qbs_new_txt_len(" STATIC",7))))||is_error_pending()){
if(qbevent){evnt(25769,12855,"ide_methods.bas");if(r)goto S_53883;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_rtrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,_SUB_IDESHOWTEXT_STRING_A->len- 7 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12856,"ide_methods.bas");}while(r);
}
S_53886:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SF== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,12859,"ide_methods.bas");if(r)goto S_53886;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,func_mid(_SUB_IDESHOWTEXT_STRING_A, 5 ,NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12860,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,func_mid(_SUB_IDESHOWTEXT_STRING_A, 10 ,NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12862,"ide_methods.bas");}while(r);
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_ltrim(qbs_rtrim(_SUB_IDESHOWTEXT_STRING_A)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12865,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_X=func_instr(NULL,_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len("(",1),0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12866,"ide_methods.bas");}while(r);
S_53893:;
if ((*_SUB_IDESHOWTEXT_LONG_X)||is_error_pending()){
if(qbevent){evnt(25769,12867,"ide_methods.bas");if(r)goto S_53893;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_rtrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_X- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12868,"ide_methods.bas");}while(r);
}else{
do{
SUB_CLEANSUBNAME(_SUB_IDESHOWTEXT_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12870,"ide_methods.bas");}while(r);
}
S_53898:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_SUB_IDESHOWTEXT_STRING_A, 5 ),qbs_new_txt_len("_IKW_",5))))||is_error_pending()){
if(qbevent){evnt(25769,12872,"ide_methods.bas");if(r)goto S_53898;}
do{
qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_add(__STRING_LISTOFCUSTOMKEYWORDS,qbs_new_txt_len("@",1)),FUNC_REMOVESYMBOL2(_SUB_IDESHOWTEXT_STRING_A)),qbs_new_txt_len("@",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12873,"ide_methods.bas");}while(r);
}
}
fornext_continue_6210:;
}
fornext_exit_6210:;
}
}else{
do{
*_SUB_IDESHOWTEXT_BYTE_MANUALLIST= 0 ;
if(!qbevent)break;evnt(25769,12879,"ide_methods.bas");}while(r);
}
S_53907:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDESHOWTEXT_STRING_PREVLISTOFCUSTOMWORDS,__STRING_LISTOFCUSTOMKEYWORDS)))||is_error_pending()){
if(qbevent){evnt(25769,12882,"ide_methods.bas");if(r)goto S_53907;}
S_53908:;
if ((-(*_SUB_IDESHOWTEXT_BYTE_MANUALLIST== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12883,"ide_methods.bas");if(r)goto S_53908;}
S_53909:;
do{
if(qbevent){evnt(25769,12884,"ide_methods.bas");if(r)goto S_53909;}
do{
*_SUB_IDESHOWTEXT_LONG_ATSIGN=func_instr(*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,__STRING_LISTOFCUSTOMKEYWORDS,qbs_new_txt_len("@",1),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12885,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_NEXTAT=func_instr(*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,__STRING_LISTOFCUSTOMKEYWORDS,qbs_new_txt_len("@",1),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12886,"ide_methods.bas");}while(r);
S_53912:;
if ((-(*_SUB_IDESHOWTEXT_LONG_NEXTAT== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12887,"ide_methods.bas");if(r)goto S_53912;}
do{
goto dl_exit_6214;
if(!qbevent)break;evnt(25769,12887,"ide_methods.bas");}while(r);
}
S_53915:;
if ((-(*_SUB_IDESHOWTEXT_LONG_ATSIGN>*__LONG_CUSTOMKEYWORDSLENGTH))||is_error_pending()){
if(qbevent){evnt(25769,12888,"ide_methods.bas");if(r)goto S_53915;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,FUNC_REMOVESYMBOL2(func_mid(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,(*_SUB_IDESHOWTEXT_LONG_NEXTAT-*_SUB_IDESHOWTEXT_LONG_ATSIGN)- 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12889,"ide_methods.bas");}while(r);
S_53917:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len))||is_error_pending()){
if(qbevent){evnt(25769,12890,"ide_methods.bas");if(r)goto S_53917;}
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS= 8ll + 1024ll ;
if(!qbevent)break;evnt(25769,12891,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS=*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS+ 128ll ;
if(!qbevent)break;evnt(25769,12892,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_HASHRES1=FUNC_HASHFIND(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESREF);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12893,"ide_methods.bas");}while(r);
S_53921:;
if ((-(*_SUB_IDESHOWTEXT_LONG_HASHRES1!= 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12894,"ide_methods.bas");if(r)goto S_53921;}
do{
*_SUB_IDESHOWTEXT_LONG_HASHRES1= 1 ;
if(!qbevent)break;evnt(25769,12894,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS= 8ll + 1024ll ;
if(!qbevent)break;evnt(25769,12895,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS=*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS+ 64ll ;
if(!qbevent)break;evnt(25769,12896,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_HASHRES2=FUNC_HASHFIND(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESFLAGS,_SUB_IDESHOWTEXT_LONG_HASHRESREF);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12897,"ide_methods.bas");}while(r);
S_53927:;
if ((-(*_SUB_IDESHOWTEXT_LONG_HASHRES2!= 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12898,"ide_methods.bas");if(r)goto S_53927;}
do{
*_SUB_IDESHOWTEXT_LONG_HASHRES2= 1 ;
if(!qbevent)break;evnt(25769,12898,"ide_methods.bas");}while(r);
}
S_53930:;
if ((-((*_SUB_IDESHOWTEXT_LONG_HASHRES1+*_SUB_IDESHOWTEXT_LONG_HASHRES2)==( 0 )))||is_error_pending()){
if(qbevent){evnt(25769,12899,"ide_methods.bas");if(r)goto S_53930;}
do{
sub_mid(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_ATSIGN+ 1 ,(*_SUB_IDESHOWTEXT_LONG_NEXTAT-*_SUB_IDESHOWTEXT_LONG_ATSIGN)- 1 ,func_string(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len,(qbs_new_txt_len("@",1)->chr[0])),1);
if(!qbevent)break;evnt(25769,12901,"ide_methods.bas");}while(r);
}
}
}
dl_continue_6214:;
}while(1);
dl_exit_6214:;
}
S_53937:;
fornext_value6218= 1 ;
fornext_finalvalue6218=__STRING_LISTOFCUSTOMKEYWORDS->len;
fornext_step6218= 1 ;
if (fornext_step6218<0) fornext_step_negative6218=1; else fornext_step_negative6218=0;
if (is_error_pending()) goto fornext_error6218;
goto fornext_entrylabel6218;
while(1){
fornext_value6218=fornext_step6218+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6218:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6218;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6218){
if (fornext_value6218<fornext_finalvalue6218) break;
}else{
if (fornext_value6218>fornext_finalvalue6218) break;
}
fornext_error6218:;
if(qbevent){evnt(25769,12908,"ide_methods.bas");if(r)goto S_53937;}
do{
*_SUB_IDESHOWTEXT_LONG_CHECKCHAR=qbs_asc(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_I);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12909,"ide_methods.bas");}while(r);
S_53939:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CHECKCHAR== 64 ))||is_error_pending()){
if(qbevent){evnt(25769,12910,"ide_methods.bas");if(r)goto S_53939;}
S_53940:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_TEMPLIST, 1 ),qbs_new_txt_len("@",1))))||is_error_pending()){
if(qbevent){evnt(25769,12911,"ide_methods.bas");if(r)goto S_53940;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_TEMPLIST,qbs_add(_SUB_IDESHOWTEXT_STRING_TEMPLIST,qbs_new_txt_len("@",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12911,"ide_methods.bas");}while(r);
}
}else{
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_TEMPLIST,qbs_add(_SUB_IDESHOWTEXT_STRING_TEMPLIST,func_chr(*_SUB_IDESHOWTEXT_LONG_CHECKCHAR)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12913,"ide_methods.bas");}while(r);
}
fornext_continue_6217:;
}
fornext_exit_6217:;
do{
qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,_SUB_IDESHOWTEXT_STRING_TEMPLIST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12916,"ide_methods.bas");}while(r);
S_53948:;
while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,__STRING_FIX046,0)))||is_error_pending()){
if(qbevent){evnt(25769,12918,"ide_methods.bas");if(r)goto S_53948;}
do{
*_SUB_IDESHOWTEXT_LONG_X=func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,__STRING_FIX046,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12919,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_left(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_X- 1 ),qbs_new_txt_len(".",1)),qbs_right(__STRING_LISTOFCUSTOMKEYWORDS,__STRING_LISTOFCUSTOMKEYWORDS->len-*_SUB_IDESHOWTEXT_LONG_X+ 1 -__STRING_FIX046->len)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12920,"ide_methods.bas");}while(r);
dl_continue_6220:;
}
dl_exit_6220:;
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_PREVLISTOFCUSTOMWORDS,__STRING_LISTOFCUSTOMKEYWORDS);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12923,"ide_methods.bas");}while(r);
}
}
do{
*_SUB_IDESHOWTEXT_LONG_CC= -1 ;
if(!qbevent)break;evnt(25769,12928,"ide_methods.bas");}while(r);
S_53956:;
if ((-(*__LONG_IDECX<*__LONG_IDESX))||is_error_pending()){
if(qbevent){evnt(25769,12930,"ide_methods.bas");if(r)goto S_53956;}
do{
*__LONG_IDESX=*__LONG_IDECX;
if(!qbevent)break;evnt(25769,12930,"ide_methods.bas");}while(r);
}
S_53959:;
if ((-(*__LONG_IDECY<*__LONG_IDESY))||is_error_pending()){
if(qbevent){evnt(25769,12931,"ide_methods.bas");if(r)goto S_53959;}
do{
*__LONG_IDESY=*__LONG_IDECY;
if(!qbevent)break;evnt(25769,12931,"ide_methods.bas");}while(r);
}
S_53962:;
if ((-(((*__LONG_IDECX+*__LONG_MAXLINENUMBERLENGTH)-*__LONG_IDESX)>=((*__LONG_IDEWX- 2 ))))||is_error_pending()){
if(qbevent){evnt(25769,12932,"ide_methods.bas");if(r)goto S_53962;}
do{
*__LONG_IDESX=(*__LONG_IDECX+*__LONG_MAXLINENUMBERLENGTH)-(*__LONG_IDEWX- 3 );
if(!qbevent)break;evnt(25769,12932,"ide_methods.bas");}while(r);
}
S_53965:;
if ((-((*__LONG_IDECY-*__LONG_IDESY)>=((*__LONG_IDEWY- 8 ))))||is_error_pending()){
if(qbevent){evnt(25769,12933,"ide_methods.bas");if(r)goto S_53965;}
do{
*__LONG_IDESY=*__LONG_IDECY-(*__LONG_IDEWY- 9 );
if(!qbevent)break;evnt(25769,12933,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_SY1=*__LONG_IDESELECTY1;
if(!qbevent)break;evnt(25769,12935,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SY2=*__LONG_IDECY;
if(!qbevent)break;evnt(25769,12936,"ide_methods.bas");}while(r);
S_53970:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SY1>*_SUB_IDESHOWTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(25769,12937,"ide_methods.bas");if(r)goto S_53970;}
do{
swap_32(&*_SUB_IDESHOWTEXT_LONG_SY1,&*_SUB_IDESHOWTEXT_LONG_SY2);
if(!qbevent)break;evnt(25769,12937,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_SX1=*__LONG_IDESELECTX1;
if(!qbevent)break;evnt(25769,12938,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SX2=*__LONG_IDECX;
if(!qbevent)break;evnt(25769,12939,"ide_methods.bas");}while(r);
S_53975:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SX1>*_SUB_IDESHOWTEXT_LONG_SX2))||is_error_pending()){
if(qbevent){evnt(25769,12940,"ide_methods.bas");if(r)goto S_53975;}
do{
swap_32(&*_SUB_IDESHOWTEXT_LONG_SX1,&*_SUB_IDESHOWTEXT_LONG_SX2);
if(!qbevent)break;evnt(25769,12940,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY;
if(!qbevent)break;evnt(25769,12942,"ide_methods.bas");}while(r);
do{
*__BYTE_ENTERINGRGB= 0 ;
if(!qbevent)break;evnt(25769,12943,"ide_methods.bas");}while(r);
S_53980:;
if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||is_error_pending()){
if(qbevent){evnt(25769,12945,"ide_methods.bas");if(r)goto S_53980;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 0 ;
if(!qbevent)break;evnt(25769,12946,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND= 0 ;
if(!qbevent)break;evnt(25769,12947,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(__LONG_IDECY));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12948,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_A,&(pass6224=_SUB_IDESHOWTEXT_STRING_A->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12949,"ide_methods.bas");}while(r);
S_53985:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A, 1 ),qbs_new_txt_len("_",1)))&(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,12950,"ide_methods.bas");if(r)goto S_53985;}
S_53986:;
fornext_value6226=*__LONG_IDECY- 1 ;
fornext_finalvalue6226= 1 ;
fornext_step6226= -1 ;
if (fornext_step6226<0) fornext_step_negative6226=1; else fornext_step_negative6226=0;
if (is_error_pending()) goto fornext_error6226;
goto fornext_entrylabel6226;
while(1){
fornext_value6226=fornext_step6226+(*_SUB_IDESHOWTEXT_LONG_IDECY_I);
fornext_entrylabel6226:
*_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value6226;
if (fornext_step_negative6226){
if (fornext_value6226<fornext_finalvalue6226) break;
}else{
if (fornext_value6226>fornext_finalvalue6226) break;
}
fornext_error6226:;
if(qbevent){evnt(25769,12952,"ide_methods.bas");if(r)goto S_53986;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12953,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6228=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12954,"ide_methods.bas");}while(r);
S_53989:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))|(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== -1 ))))||is_error_pending()){
if(qbevent){evnt(25769,12955,"ide_methods.bas");if(r)goto S_53989;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*_SUB_IDESHOWTEXT_LONG_IDECY_I+ 1 ;
if(!qbevent)break;evnt(25769,12955,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6225;
if(!qbevent)break;evnt(25769,12955,"ide_methods.bas");}while(r);
}
fornext_continue_6225:;
}
fornext_exit_6225:;
S_53994:;
if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12957,"ide_methods.bas");if(r)goto S_53994;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 1 ;
if(!qbevent)break;evnt(25769,12957,"ide_methods.bas");}while(r);
}
S_53997:;
fornext_value6230=*__LONG_IDECY+ 1 ;
fornext_finalvalue6230=*__LONG_IDEN;
fornext_step6230= 1 ;
if (fornext_step6230<0) fornext_step_negative6230=1; else fornext_step_negative6230=0;
if (is_error_pending()) goto fornext_error6230;
goto fornext_entrylabel6230;
while(1){
fornext_value6230=fornext_step6230+(*_SUB_IDESHOWTEXT_LONG_IDECY_I);
fornext_entrylabel6230:
*_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value6230;
if (fornext_step_negative6230){
if (fornext_value6230<fornext_finalvalue6230) break;
}else{
if (fornext_value6230>fornext_finalvalue6230) break;
}
fornext_error6230:;
if(qbevent){evnt(25769,12960,"ide_methods.bas");if(r)goto S_53997;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12961,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6232=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12962,"ide_methods.bas");}while(r);
S_54000:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))|(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== -1 ))))||is_error_pending()){
if(qbevent){evnt(25769,12963,"ide_methods.bas");if(r)goto S_54000;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND=*_SUB_IDESHOWTEXT_LONG_IDECY_I;
if(!qbevent)break;evnt(25769,12963,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6229;
if(!qbevent)break;evnt(25769,12963,"ide_methods.bas");}while(r);
}
fornext_continue_6229:;
}
fornext_exit_6229:;
S_54005:;
if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12965,"ide_methods.bas");if(r)goto S_54005;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*__LONG_IDEN;
if(!qbevent)break;evnt(25769,12965,"ide_methods.bas");}while(r);
}
}else{
S_54009:;
if ((-(*__LONG_IDECY> 1 ))||is_error_pending()){
if(qbevent){evnt(25769,12967,"ide_methods.bas");if(r)goto S_54009;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(&(pass6233=*__LONG_IDECY- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12967,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12967,"ide_methods.bas");}while(r);
}
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6235=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12968,"ide_methods.bas");}while(r);
S_54015:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))&(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,12969,"ide_methods.bas");if(r)goto S_54015;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND=*__LONG_IDECY;
if(!qbevent)break;evnt(25769,12970,"ide_methods.bas");}while(r);
S_54017:;
fornext_value6237=*__LONG_IDECY- 1 ;
fornext_finalvalue6237= 1 ;
fornext_step6237= -1 ;
if (fornext_step6237<0) fornext_step_negative6237=1; else fornext_step_negative6237=0;
if (is_error_pending()) goto fornext_error6237;
goto fornext_entrylabel6237;
while(1){
fornext_value6237=fornext_step6237+(*_SUB_IDESHOWTEXT_LONG_IDECY_I);
fornext_entrylabel6237:
*_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value6237;
if (fornext_step_negative6237){
if (fornext_value6237<fornext_finalvalue6237) break;
}else{
if (fornext_value6237>fornext_finalvalue6237) break;
}
fornext_error6237:;
if(qbevent){evnt(25769,12973,"ide_methods.bas");if(r)goto S_54017;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12974,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6239=_SUB_IDESHOWTEXT_STRING_B->len),_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12975,"ide_methods.bas");}while(r);
S_54020:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(qbs_right(_SUB_IDESHOWTEXT_STRING_B, 1 ),qbs_new_txt_len("_",1)))|(-(*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT== -1 ))))||is_error_pending()){
if(qbevent){evnt(25769,12976,"ide_methods.bas");if(r)goto S_54020;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*_SUB_IDESHOWTEXT_LONG_IDECY_I+ 1 ;
if(!qbevent)break;evnt(25769,12976,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6236;
if(!qbevent)break;evnt(25769,12976,"ide_methods.bas");}while(r);
}
fornext_continue_6236:;
}
fornext_exit_6236:;
S_54025:;
if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12978,"ide_methods.bas");if(r)goto S_54025;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 1 ;
if(!qbevent)break;evnt(25769,12978,"ide_methods.bas");}while(r);
}
}
}
S_54030:;
if ((-(*__LONG_IDECY> 1 ))||is_error_pending()){
if(qbevent){evnt(25769,12982,"ide_methods.bas");if(r)goto S_54030;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(&(pass6240=*__LONG_IDECY- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12982,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12982,"ide_methods.bas");}while(r);
}
do{
*__LONG_ACTIVEINCLUDELINK= 0 ;
if(!qbevent)break;evnt(25769,12984,"ide_methods.bas");}while(r);
S_54036:;
if ((*__INTEGER_IDECHANGEMADE)||is_error_pending()){
if(qbevent){evnt(25769,12985,"ide_methods.bas");if(r)goto S_54036;}
do{
*__LONG_IDEFOCUSLINE= 0 ;
if(!qbevent)break;evnt(25769,12985,"ide_methods.bas");}while(r);
}
S_54039:;
fornext_value6242= 0 ;
fornext_finalvalue6242=(*__LONG_IDEWY- 9 );
fornext_step6242= 1 ;
if (fornext_step6242<0) fornext_step_negative6242=1; else fornext_step_negative6242=0;
if (is_error_pending()) goto fornext_error6242;
goto fornext_entrylabel6242;
while(1){
fornext_value6242=fornext_step6242+(*_SUB_IDESHOWTEXT_LONG_Y);
fornext_entrylabel6242:
*_SUB_IDESHOWTEXT_LONG_Y=fornext_value6242;
if (fornext_step_negative6242){
if (fornext_value6242<fornext_finalvalue6242) break;
}else{
if (fornext_value6242>fornext_finalvalue6242) break;
}
fornext_error6242:;
if(qbevent){evnt(25769,12987,"ide_methods.bas");if(r)goto S_54039;}
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,12988,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 179 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12989,"ide_methods.bas");}while(r);
do{
return_point[next_return_point++]=171;
if (next_return_point>=return_points) more_return_points();
goto LABEL_SHOWLINENUMBER;
RETURN_171:;
if(!qbevent)break;evnt(25769,12991,"ide_methods.bas");}while(r);
S_54043:;
if ((((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY!=*_SUB_IDESHOWTEXT_LONG_L))&(-(*__LONG_IDEDEBUGMODE== 0 )))|((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY==*_SUB_IDESHOWTEXT_LONG_L))&(-(*__LONG_IDEDEBUGMODE!= 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,12993,"ide_methods.bas");if(r)goto S_54043;}
do{
qbg_sub_color( 7 , 4 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,12994,"ide_methods.bas");}while(r);
S_54045:;
}else{
if ((-(*__LONG_IDECY==*_SUB_IDESHOWTEXT_LONG_L))|(((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND))))){
if(qbevent){evnt(25769,12995,"ide_methods.bas");if(r)goto S_54045;}
S_54046:;
if (((-(*__BYTE_HIDECURRENTLINEHIGHLIGHT== 0 ))&(-(*__LONG_IDESYSTEM== 1 )))||is_error_pending()){
if(qbevent){evnt(25769,12996,"ide_methods.bas");if(r)goto S_54046;}
do{
qbg_sub_color( 7 , 6 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,12996,"ide_methods.bas");}while(r);
}
}else{
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,12998,"ide_methods.bas");}while(r);
}
}
S_54052:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(25769,13001,"ide_methods.bas");if(r)goto S_54052;}
S_54053:;
while((!(-(*_SUB_IDESHOWTEXT_LONG_L<func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1))))||is_error_pending()){
if(qbevent){evnt(25769,13002,"ide_methods.bas");if(r)goto S_54053;}
do{
if (__ARRAY_BYTE_INVALIDLINE[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_BYTE_INVALIDLINE)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_BYTE_INVALIDLINE[2]&1){
preserve_old_ptr=__ARRAY_BYTE_INVALIDLINE[0];
preserve_old_flags=__ARRAY_BYTE_INVALIDLINE[2];
preserve_old_total=__ARRAY_BYTE_INVALIDLINE[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1)+ 1000 )-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(1);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (__ARRAY_BYTE_INVALIDLINE[2]&4){
if (preserve_old_total){
preserve_new_ptr=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
memset((void*)(preserve_new_ptr),0,(size_t)alloc_req_bytes);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_INVALIDLINE[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!__ARRAY_BYTE_INVALIDLINE[0]) error(257);
memset((void*)(__ARRAY_BYTE_INVALIDLINE[0]),0,(size_t)alloc_req_bytes);
}
}else{
if (preserve_old_total){
preserve_new_ptr=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!preserve_new_ptr) error(257);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_INVALIDLINE[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_INVALIDLINE[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!__ARRAY_BYTE_INVALIDLINE[0]) error(257);
}
}
__ARRAY_BYTE_INVALIDLINE[2]|=1;
__ARRAY_BYTE_INVALIDLINE[4]=alloc_new_desc[4];
__ARRAY_BYTE_INVALIDLINE[5]=alloc_new_desc[5];
__ARRAY_BYTE_INVALIDLINE[6]=alloc_new_desc[6];
__ARRAY_BYTE_INVALIDLINE[7]=alloc_new_desc[7];
}
if(!qbevent)break;evnt(25769,13003,"ide_methods.bas");}while(r);
dl_continue_6243:;
}
dl_exit_6243:;
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13006,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_LINK_IDECX= 0 ;
if(!qbevent)break;evnt(25769,13007,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX= 0 ;
if(!qbevent)break;evnt(25769,13008,"ide_methods.bas");}while(r);
S_54059:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||is_error_pending()){
if(qbevent){evnt(25769,13009,"ide_methods.bas");if(r)goto S_54059;}
S_54060:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX<=_SUB_IDESHOWTEXT_STRING_A->len))&(-(*__LONG_IDECX>= 1 ))))||is_error_pending()){
if(qbevent){evnt(25769,13010,"ide_methods.bas");if(r)goto S_54060;}
do{
*_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13011,"ide_methods.bas");}while(r);
S_54062:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||is_error_pending()){
if(qbevent){evnt(25769,13012,"ide_methods.bas");if(r)goto S_54062;}
S_54063:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ltrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX)),qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,13013,"ide_methods.bas");if(r)goto S_54063;}
do{
*_SUB_IDESHOWTEXT_LONG_CC= -1 ;
if(!qbevent)break;evnt(25769,13013,"ide_methods.bas");}while(r);
}
}
}
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_A,__LONG_IDECX,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT,_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13019,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT=*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT;
if(!qbevent)break;evnt(25769,13020,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE=*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE;
if(!qbevent)break;evnt(25769,13021,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 0 ;
if(!qbevent)break;evnt(25769,13024,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1= 0 ;
if(!qbevent)break;evnt(25769,13025,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2= 0 ;
if(!qbevent)break;evnt(25769,13026,"ide_methods.bas");}while(r);
S_54074:;
if (((-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 )))&*__BYTE_BRACKETHIGHLIGHT)||is_error_pending()){
if(qbevent){evnt(25769,13027,"ide_methods.bas");if(r)goto S_54074;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE= 0 ;
if(!qbevent)break;evnt(25769,13028,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= 0 ;
if(!qbevent)break;evnt(25769,13029,"ide_methods.bas");}while(r);
S_54077:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,0|1),qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(25769,13030,"ide_methods.bas");if(r)goto S_54077;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(25769,13031,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1=*__LONG_IDECX;
if(!qbevent)break;evnt(25769,13032,"ide_methods.bas");}while(r);
LABEL_SCANBRACKET2:;
if(qbevent){evnt(25769,13033,"ide_methods.bas");r=0;}
S_54080:;
fornext_value6246=*_SUB_IDESHOWTEXT_LONG_BRACKET1+ 1 ;
fornext_finalvalue6246=_SUB_IDESHOWTEXT_STRING_A->len;
fornext_step6246= 1 ;
if (fornext_step6246<0) fornext_step_negative6246=1; else fornext_step_negative6246=0;
if (is_error_pending()) goto fornext_error6246;
goto fornext_entrylabel6246;
while(1){
fornext_value6246=fornext_step6246+(*_SUB_IDESHOWTEXT_LONG_K);
fornext_entrylabel6246:
*_SUB_IDESHOWTEXT_LONG_K=fornext_value6246;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6246){
if (fornext_value6246<fornext_finalvalue6246) break;
}else{
if (fornext_value6246>fornext_finalvalue6246) break;
}
fornext_error6246:;
if(qbevent){evnt(25769,13034,"ide_methods.bas");if(r)goto S_54080;}
S_54081:;
qbs_set(sc_6248,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(qbevent){evnt(25769,13035,"ide_methods.bas");if(r)goto S_54081;}
S_54082:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6248,func_chr( 34 ))))||is_error_pending()){
if(qbevent){evnt(25769,13036,"ide_methods.bas");if(r)goto S_54082;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE);
if(!qbevent)break;evnt(25769,13037,"ide_methods.bas");}while(r);
sc_ec_377_end:;
goto sc_6248_end;
}
S_54084:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6248,qbs_new_txt_len("'",1))))||is_error_pending()){
if(qbevent){evnt(25769,13038,"ide_methods.bas");if(r)goto S_54084;}
S_54085:;
if ((-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13039,"ide_methods.bas");if(r)goto S_54085;}
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ;
if(!qbevent)break;evnt(25769,13039,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6245;
if(!qbevent)break;evnt(25769,13039,"ide_methods.bas");}while(r);
}
sc_ec_378_end:;
goto sc_6248_end;
}
sc_6248_end:;
S_54090:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1),qbs_new_txt_len(")",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,13041,"ide_methods.bas");if(r)goto S_54090;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS- 1 ;
if(!qbevent)break;evnt(25769,13042,"ide_methods.bas");}while(r);
S_54092:;
if ((-(*_SUB_IDESHOWTEXT_LONG_BRACKETS== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13043,"ide_methods.bas");if(r)goto S_54092;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2=*_SUB_IDESHOWTEXT_LONG_K;
if(!qbevent)break;evnt(25769,13043,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6245;
if(!qbevent)break;evnt(25769,13043,"ide_methods.bas");}while(r);
}
S_54096:;
}else{
if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1),qbs_new_txt_len("(",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 )))){
if(qbevent){evnt(25769,13044,"ide_methods.bas");if(r)goto S_54096;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS+ 1 ;
if(!qbevent)break;evnt(25769,13045,"ide_methods.bas");}while(r);
}
}
fornext_continue_6245:;
}
fornext_exit_6245:;
S_54100:;
}else{
if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX- 1 , 1 ,0|1),qbs_new_txt_len("(",1)))&(qbs_notequal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,0|1),func_chr( 34 ))))){
if(qbevent){evnt(25769,13048,"ide_methods.bas");if(r)goto S_54100;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(25769,13049,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1=*__LONG_IDECX- 1 ;
if(!qbevent)break;evnt(25769,13050,"ide_methods.bas");}while(r);
do{
goto LABEL_SCANBRACKET2;
if(!qbevent)break;evnt(25769,13051,"ide_methods.bas");}while(r);
S_54104:;
}else{
if (qbs_cleanup(qbs_tmp_base,qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,0|1),qbs_new_txt_len(")",1)))){
if(qbevent){evnt(25769,13052,"ide_methods.bas");if(r)goto S_54104;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(25769,13053,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2=*__LONG_IDECX;
if(!qbevent)break;evnt(25769,13054,"ide_methods.bas");}while(r);
LABEL_SCANBRACKET1:;
if(qbevent){evnt(25769,13055,"ide_methods.bas");r=0;}
S_54107:;
fornext_value6250=*_SUB_IDESHOWTEXT_LONG_BRACKET2- 1 ;
fornext_finalvalue6250= 1 ;
fornext_step6250= -1 ;
if (fornext_step6250<0) fornext_step_negative6250=1; else fornext_step_negative6250=0;
if (is_error_pending()) goto fornext_error6250;
goto fornext_entrylabel6250;
while(1){
fornext_value6250=fornext_step6250+(*_SUB_IDESHOWTEXT_LONG_K);
fornext_entrylabel6250:
*_SUB_IDESHOWTEXT_LONG_K=fornext_value6250;
if (fornext_step_negative6250){
if (fornext_value6250<fornext_finalvalue6250) break;
}else{
if (fornext_value6250>fornext_finalvalue6250) break;
}
fornext_error6250:;
if(qbevent){evnt(25769,13056,"ide_methods.bas");if(r)goto S_54107;}
S_54108:;
qbs_set(sc_6251,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(qbevent){evnt(25769,13057,"ide_methods.bas");if(r)goto S_54108;}
S_54109:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6251,func_chr( 34 ))))||is_error_pending()){
if(qbevent){evnt(25769,13058,"ide_methods.bas");if(r)goto S_54109;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE);
if(!qbevent)break;evnt(25769,13059,"ide_methods.bas");}while(r);
sc_ec_379_end:;
goto sc_6251_end;
}
sc_6251_end:;
S_54112:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1),qbs_new_txt_len("(",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,13061,"ide_methods.bas");if(r)goto S_54112;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS- 1 ;
if(!qbevent)break;evnt(25769,13062,"ide_methods.bas");}while(r);
S_54114:;
if ((-(*_SUB_IDESHOWTEXT_LONG_BRACKETS== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13063,"ide_methods.bas");if(r)goto S_54114;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1=*_SUB_IDESHOWTEXT_LONG_K;
if(!qbevent)break;evnt(25769,13063,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6249;
if(!qbevent)break;evnt(25769,13063,"ide_methods.bas");}while(r);
}
S_54118:;
}else{
if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1),qbs_new_txt_len(")",1)))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 )))){
if(qbevent){evnt(25769,13064,"ide_methods.bas");if(r)goto S_54118;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS+ 1 ;
if(!qbevent)break;evnt(25769,13065,"ide_methods.bas");}while(r);
}
}
fornext_continue_6249:;
}
fornext_exit_6249:;
S_54122:;
}else{
if (qbs_cleanup(qbs_tmp_base,(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX- 1 , 1 ,0|1),qbs_new_txt_len(")",1)))&(qbs_notequal(func_mid(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX, 1 ,0|1),func_chr( 34 ))))){
if(qbevent){evnt(25769,13068,"ide_methods.bas");if(r)goto S_54122;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(25769,13069,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2=*__LONG_IDECX- 1 ;
if(!qbevent)break;evnt(25769,13070,"ide_methods.bas");}while(r);
do{
goto LABEL_SCANBRACKET1;
if(!qbevent)break;evnt(25769,13071,"ide_methods.bas");}while(r);
}
}
}
}
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A2,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13078,"ide_methods.bas");}while(r);
S_54129:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX==(_SUB_IDESHOWTEXT_STRING_A->len+ 1 )))&(-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 )))))||is_error_pending()){
if(qbevent){evnt(25769,13080,"ide_methods.bas");if(r)goto S_54129;}
S_54130:;
if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 5 ),qbs_new_txt_len("_RGB(",5)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 7 ),qbs_new_txt_len("_RGB32(",7)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 6 ),qbs_new_txt_len("_RGBA(",6)))|(qbs_equal(qbs_right(_SUB_IDESHOWTEXT_STRING_A2, 8 ),qbs_new_txt_len("_RGBA32(",8))))))||is_error_pending()){
if(qbevent){evnt(25769,13084,"ide_methods.bas");if(r)goto S_54130;}
do{
*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX=_SUB_IDESHOWTEXT_STRING_A->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13085,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_add(_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len(" --> Shift+ENTER to open the RGB mixer",38)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13086,"ide_methods.bas");}while(r);
do{
*__BYTE_ENTERINGRGB= -1 ;
if(!qbevent)break;evnt(25769,13087,"ide_methods.bas");}while(r);
}
S_54135:;
}else{
if (-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 ))){
if(qbevent){evnt(25769,13089,"ide_methods.bas");if(r)goto S_54135;}
S_54136:;
if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 5 , 5 ,0|1),qbs_new_txt_len("_RGB(",5)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 7 , 7 ,0|1),qbs_new_txt_len("_RGB32(",7)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 6 , 6 ,0|1),qbs_new_txt_len("_RGBA(",6)))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX- 8 , 8 ,0|1),qbs_new_txt_len("_RGBA32(",8))))))||is_error_pending()){
if(qbevent){evnt(25769,13093,"ide_methods.bas");if(r)goto S_54136;}
S_54137:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,qbs_new_txt_len("0123456789",10),func_mid(_SUB_IDESHOWTEXT_STRING_A2,*__LONG_IDECX, 1 ,0|1),0)== 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13094,"ide_methods.bas");if(r)goto S_54137;}
do{
*__BYTE_ENTERINGRGB= -1 ;
if(!qbevent)break;evnt(25769,13094,"ide_methods.bas");}while(r);
}
}
}
}
do{
*_SUB_IDESHOWTEXT_LONG_FINDINCLUDE=func__instrrev(NULL,_SUB_IDESHOWTEXT_STRING_A2,qbs_new_txt_len("$INCLUDE",8),0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13098,"ide_methods.bas");}while(r);
S_54143:;
if ((-(*_SUB_IDESHOWTEXT_LONG_FINDINCLUDE> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13099,"ide_methods.bas");if(r)goto S_54143;}
do{
*_SUB_IDESHOWTEXT_LONG_LINK_IDECX=_SUB_IDESHOWTEXT_STRING_A->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13100,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1=func_instr(*_SUB_IDESHOWTEXT_LONG_FINDINCLUDE+ 8 ,_SUB_IDESHOWTEXT_STRING_A2,qbs_new_txt_len("'",1),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13101,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE2=func_instr(*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1+ 1 ,_SUB_IDESHOWTEXT_STRING_A2,qbs_new_txt_len("'",1),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13102,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_ACTIVEINCLUDELINKFILE,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1+ 1 ,*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE2-*_SUB_IDESHOWTEXT_LONG_FINDAPOSTROPHE1- 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13103,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_P,qbs_add(__STRING_IDEPATH,__STRING1_PATHSEP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13104,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_F,qbs_add(_SUB_IDESHOWTEXT_STRING_P,__STRING_ACTIVEINCLUDELINKFILE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13105,"ide_methods.bas");}while(r);
S_54150:;
if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_SUB_IDESHOWTEXT_STRING_F)|func__fileexists(__STRING_ACTIVEINCLUDELINKFILE)))||is_error_pending()){
if(qbevent){evnt(25769,13106,"ide_methods.bas");if(r)goto S_54150;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,qbs_add(_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len(" --> Double-click to open",25)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13107,"ide_methods.bas");}while(r);
do{
*__LONG_ACTIVEINCLUDELINK=*__LONG_IDECY;
if(!qbevent)break;evnt(25769,13107,"ide_methods.bas");}while(r);
}
}
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space(*__LONG_IDESX+(*__LONG_IDEWX- 3 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13112,"ide_methods.bas");}while(r);
do{
sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0);
if(!qbevent)break;evnt(25769,13113,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space((*__LONG_IDEWX- 2 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13115,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE= 0 ;
if(!qbevent)break;evnt(25769,13119,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= 0 ;
if(!qbevent)break;evnt(25769,13120,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= 0 ;
if(!qbevent)break;evnt(25769,13121,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD= 0 ;
if(!qbevent)break;evnt(25769,13122,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13122,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= 0 ;
if(!qbevent)break;evnt(25769,13123,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH= 0 ;
if(!qbevent)break;evnt(25769,13124,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_INTEGER_PREVBG=func__backgroundcolor(NULL,0);
if(!qbevent)break;evnt(25769,13125,"ide_methods.bas");}while(r);
S_54169:;
fornext_value6256= 1 ;
fornext_finalvalue6256=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6256= 1 ;
if (fornext_step6256<0) fornext_step_negative6256=1; else fornext_step_negative6256=0;
if (is_error_pending()) goto fornext_error6256;
goto fornext_entrylabel6256;
while(1){
fornext_value6256=fornext_step6256+(*_SUB_IDESHOWTEXT_LONG_M);
fornext_entrylabel6256:
*_SUB_IDESHOWTEXT_LONG_M=fornext_value6256;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6256){
if (fornext_value6256<fornext_finalvalue6256) break;
}else{
if (fornext_value6256>fornext_finalvalue6256) break;
}
fornext_error6256:;
if(qbevent){evnt(25769,13127,"ide_methods.bas");if(r)goto S_54169;}
S_54170:;
if ((-(((double)(FUNC_TIMEELAPSEDSINCE(_SUB_IDESHOWTEXT_DOUBLE_STARTTIME)))>((double)( 1.0E+0 ))))||is_error_pending()){
if(qbevent){evnt(25769,13128,"ide_methods.bas");if(r)goto S_54170;}
do{
*_SUB_IDESHOWTEXT_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Syntax Highlighter Disabled",27),qbs_new_txt_len("Syntax Highlighter has been disabled to avoid slowing down the IDE.\\nYou can reenable the Highlighter in the 'Options' menu.",124),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13129,"ide_methods.bas");}while(r);
do{
*__BYTE_DISABLESYNTAXHIGHLIGHTER= -1ll ;
if(!qbevent)break;evnt(25769,13130,"ide_methods.bas");}while(r);
do{
SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DisableSyntaxHighlighter",24),qbs_new_txt_len("True",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13131,"ide_methods.bas");}while(r);
do{
tmp_long=array_check((*__INTEGER_OPTIONSMENUID)-__ARRAY_STRING_MENU[8],__ARRAY_STRING_MENU[9])+array_check((*__INTEGER_OPTIONSMENUDISABLESYNTAX)-__ARRAY_STRING_MENU[4],__ARRAY_STRING_MENU[5])*__ARRAY_STRING_MENU[6];
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_MENU[0]))[tmp_long])),qbs_new_txt_len("Syntax #Highlighter",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13132,"ide_methods.bas");}while(r);
do{
goto LABEL_NOSYNTAXHIGHLIGHTING;
if(!qbevent)break;evnt(25769,13133,"ide_methods.bas");}while(r);
}
S_54177:;
if ((-(*_SUB_IDESHOWTEXT_LONG_M>(*__LONG_IDESX+*__LONG_IDEWX- 2 )))||is_error_pending()){
if(qbevent){evnt(25769,13135,"ide_methods.bas");if(r)goto S_54177;}
do{
goto fornext_exit_6255;
if(!qbevent)break;evnt(25769,13135,"ide_methods.bas");}while(r);
}
S_54180:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDESELECT== 1 ))&(-(__STRING_IDECURRENTSINGLELINESELECTION->len> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH== 0 ))&*__BYTE_MULTIHIGHLIGHT))||is_error_pending()){
if(qbevent){evnt(25769,13136,"ide_methods.bas");if(r)goto S_54180;}
S_54181:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_lcase(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M,__STRING_IDECURRENTSINGLELINESELECTION->len,0|1)),qbs_lcase(__STRING_IDECURRENTSINGLELINESELECTION))))||is_error_pending()){
if(qbevent){evnt(25769,13137,"ide_methods.bas");if(r)goto S_54181;}
S_54182:;
if ((-(*_SUB_IDESHOWTEXT_LONG_M> 1 ))||is_error_pending()){
if(qbevent){evnt(25769,13139,"ide_methods.bas");if(r)goto S_54182;}
S_54183:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M- 1 , 1 ,0|1),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13140,"ide_methods.bas");if(r)goto S_54183;}
S_54184:;
if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)<(_SUB_IDESHOWTEXT_STRING_A2->len)))&(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,0|1),0)> 0 ))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,0|1),qbs_new_txt_len(".",1)))))))||is_error_pending()){
if(qbevent){evnt(25769,13143,"ide_methods.bas");if(r)goto S_54184;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13144,"ide_methods.bas");}while(r);
S_54186:;
}else{
if (qbs_cleanup(qbs_tmp_base,-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)>=(_SUB_IDESHOWTEXT_STRING_A2->len)))){
if(qbevent){evnt(25769,13145,"ide_methods.bas");if(r)goto S_54186;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13146,"ide_methods.bas");}while(r);
}
}
}
}else{
S_54191:;
if ((qbs_cleanup(qbs_tmp_base,(-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)<(_SUB_IDESHOWTEXT_STRING_A2->len)))&(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,0|1),0)> 0 ))|(qbs_equal(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len, 1 ,0|1),qbs_new_txt_len(".",1)))))))||is_error_pending()){
if(qbevent){evnt(25769,13152,"ide_methods.bas");if(r)goto S_54191;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13153,"ide_methods.bas");}while(r);
S_54193:;
}else{
if (qbs_cleanup(qbs_tmp_base,-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)>=(_SUB_IDESHOWTEXT_STRING_A2->len)))){
if(qbevent){evnt(25769,13154,"ide_methods.bas");if(r)goto S_54193;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13155,"ide_methods.bas");}while(r);
}
}
}
}
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13161,"ide_methods.bas");}while(r);
S_54200:;
if ((-(*_SUB_IDESHOWTEXT_LONG_COMMENT== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13163,"ide_methods.bas");if(r)goto S_54200;}
S_54201:;
if(qbevent){evnt(25769,13164,"ide_methods.bas");if(r)goto S_54201;}
S_54202:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_chr( 34 ))))||is_error_pending()){
if(qbevent){evnt(25769,13165,"ide_methods.bas");if(r)goto S_54202;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE);
if(!qbevent)break;evnt(25769,13165,"ide_methods.bas");}while(r);
sc_ec_380_end:;
goto sc_6276_end;
}
S_54204:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,qbs_new_txt_len("'",1))))||is_error_pending()){
if(qbevent){evnt(25769,13166,"ide_methods.bas");if(r)goto S_54204;}
S_54205:;
if ((-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13166,"ide_methods.bas");if(r)goto S_54205;}
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ;
if(!qbevent)break;evnt(25769,13166,"ide_methods.bas");}while(r);
}
sc_ec_381_end:;
goto sc_6276_end;
}
sc_6276_end:;
}
do{
qbg_sub_color( 13 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13170,"ide_methods.bas");}while(r);
S_54211:;
if ((-((-(*_SUB_IDESHOWTEXT_LONG_L>*__LONG_IDEN))||((int8*)(__ARRAY_BYTE_INVALIDLINE[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_INVALIDLINE[4],__ARRAY_BYTE_INVALIDLINE[5])]))||is_error_pending()){
if(qbevent){evnt(25769,13172,"ide_methods.bas");if(r)goto S_54211;}
do{
qbg_sub_color( 7 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13172,"ide_methods.bas");}while(r);
do{
goto LABEL_SKIPSYNTAXHIGHLIGHTER;
if(!qbevent)break;evnt(25769,13172,"ide_methods.bas");}while(r);
}
S_54215:;
if ((qbs_cleanup(qbs_tmp_base,(((-(_SUB_IDESHOWTEXT_STRING_OLDCHAR->len> 0 ))|(-(*_SUB_IDESHOWTEXT_LONG_M== 1 ))))&(-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,13174,"ide_methods.bas");if(r)goto S_54215;}
S_54216:;
if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_INITIALNUM__ASCII_CHR_046__CHAR,_SUB_IDESHOWTEXT_STRING_THISCHAR,0)> 0 ))&(qbs_notequal(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len(")",1)))&(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,_SUB_IDESHOWTEXT_STRING_OLDCHAR,0)> 0 ))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len("?",1)))))))||is_error_pending()){
if(qbevent){evnt(25769,13175,"ide_methods.bas");if(r)goto S_54216;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13177,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IS_NUMBER= 0 ;
if(!qbevent)break;evnt(25769,13178,"ide_methods.bas");}while(r);
S_54219:;
fornext_value6279=*_SUB_IDESHOWTEXT_LONG_M;
fornext_finalvalue6279=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6279= 1 ;
if (fornext_step6279<0) fornext_step_negative6279=1; else fornext_step_negative6279=0;
if (is_error_pending()) goto fornext_error6279;
goto fornext_entrylabel6279;
while(1){
fornext_value6279=fornext_step6279+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6279:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6279;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6279){
if (fornext_value6279<fornext_finalvalue6279) break;
}else{
if (fornext_value6279>fornext_finalvalue6279) break;
}
fornext_error6279:;
if(qbevent){evnt(25769,13180,"ide_methods.bas");if(r)goto S_54219;}
S_54220:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_NUM__ASCII_CHR_046__CHAR,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1),0)== 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13181,"ide_methods.bas");if(r)goto S_54220;}
do{
goto fornext_exit_6278;
if(!qbevent)break;evnt(25769,13181,"ide_methods.bas");}while(r);
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_add(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13182,"ide_methods.bas");}while(r);
fornext_continue_6278:;
}
fornext_exit_6278:;
S_54225:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("-",1)))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len(".",1)))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("&",1)))))||is_error_pending()){
if(qbevent){evnt(25769,13185,"ide_methods.bas");if(r)goto S_54225;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13186,"ide_methods.bas");}while(r);
}else{
S_54228:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_ISNUMBER(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)))||is_error_pending()){
if(qbevent){evnt(25769,13188,"ide_methods.bas");if(r)goto S_54228;}
do{
*_SUB_IDESHOWTEXT_LONG_IS_NUMBER= -1 ;
if(!qbevent)break;evnt(25769,13189,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13190,"ide_methods.bas");}while(r);
S_54231:;
}else{
if (qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_USERDEFINELIST,qbs_add(qbs_new_txt_len("@",1),qbs_ucase(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)),0)> 0 ))){
if(qbevent){evnt(25769,13191,"ide_methods.bas");if(r)goto S_54231;}
S_54232:;
fornext_value6283=*_SUB_IDESHOWTEXT_LONG_I;
fornext_finalvalue6283=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6283= 1 ;
if (fornext_step6283<0) fornext_step_negative6283=1; else fornext_step_negative6283=0;
if (is_error_pending()) goto fornext_error6283;
goto fornext_entrylabel6283;
while(1){
fornext_value6283=fornext_step6283+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6283:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6283;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6283){
if (fornext_value6283<fornext_finalvalue6283) break;
}else{
if (fornext_value6283>fornext_finalvalue6283) break;
}
fornext_error6283:;
if(qbevent){evnt(25769,13193,"ide_methods.bas");if(r)goto S_54232;}
S_54233:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13194,"ide_methods.bas");if(r)goto S_54233;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_RIGHT__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13194,"ide_methods.bas");}while(r);
do{
goto LABEL_KEYWORDACQUIRED;
if(!qbevent)break;evnt(25769,13194,"ide_methods.bas");}while(r);
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_add(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13195,"ide_methods.bas");}while(r);
fornext_continue_6282:;
}
fornext_exit_6282:;
do{
goto LABEL_KEYWORDACQUIRED;
if(!qbevent)break;evnt(25769,13197,"ide_methods.bas");}while(r);
}
}
}
do{
goto LABEL_SETOLDCHAR;
if(!qbevent)break;evnt(25769,13200,"ide_methods.bas");}while(r);
}
S_54244:;
if ((qbs_cleanup(qbs_tmp_base,(((-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,_SUB_IDESHOWTEXT_STRING_OLDCHAR,0)> 0 ))|(qbs_equal(_SUB_IDESHOWTEXT_STRING_OLDCHAR,qbs_new_txt_len("?",1)))))&(-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,_SUB_IDESHOWTEXT_STRING_THISCHAR,0)== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,13203,"ide_methods.bas");if(r)goto S_54244;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13205,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_RIGHT__ASCII_CHR_046__SEP,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13206,"ide_methods.bas");}while(r);
S_54247:;
fornext_value6286=*_SUB_IDESHOWTEXT_LONG_M;
fornext_finalvalue6286=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6286= 1 ;
if (fornext_step6286<0) fornext_step_negative6286=1; else fornext_step_negative6286=0;
if (is_error_pending()) goto fornext_error6286;
goto fornext_entrylabel6286;
while(1){
fornext_value6286=fornext_step6286+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6286:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6286;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6286){
if (fornext_value6286<fornext_finalvalue6286) break;
}else{
if (fornext_value6286>fornext_finalvalue6286) break;
}
fornext_error6286:;
if(qbevent){evnt(25769,13207,"ide_methods.bas");if(r)goto S_54247;}
S_54248:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_SUB_IDESHOWTEXT_STRING_CHAR__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13208,"ide_methods.bas");if(r)goto S_54248;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_RIGHT__ASCII_CHR_046__SEP,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13208,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6285;
if(!qbevent)break;evnt(25769,13208,"ide_methods.bas");}while(r);
}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_add(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_I, 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13209,"ide_methods.bas");}while(r);
fornext_continue_6285:;
}
fornext_exit_6285:;
S_54254:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDESHOWTEXT_LONG_COMMENT== 0 ))&(qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD, 1 ),qbs_new_txt_len("?",1)))))||is_error_pending()){
if(qbevent){evnt(25769,13211,"ide_methods.bas");if(r)goto S_54254;}
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD= 1 ;
if(!qbevent)break;evnt(25769,13211,"ide_methods.bas");}while(r);
do{
goto LABEL_SETOLDCHAR;
if(!qbevent)break;evnt(25769,13211,"ide_methods.bas");}while(r);
}
LABEL_KEYWORDACQUIRED:;
if(qbevent){evnt(25769,13212,"ide_methods.bas");r=0;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_ucase(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13213,"ide_methods.bas");}while(r);
S_54259:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_LISTOFKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD),qbs_new_txt_len("@",1)),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13214,"ide_methods.bas");if(r)goto S_54259;}
S_54260:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$END",4))))||is_error_pending()){
if(qbevent){evnt(25769,13216,"ide_methods.bas");if(r)goto S_54260;}
S_54261:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_M, 7 ,0|1)),qbs_new_txt_len("$END IF",7))))||is_error_pending()){
if(qbevent){evnt(25769,13217,"ide_methods.bas");if(r)goto S_54261;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$END IF",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13217,"ide_methods.bas");}while(r);
}
S_54264:;
}else{
if (qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("THEN",4)))&(((qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 3 )),qbs_new_txt_len("$IF",3)))|(qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 7 )),qbs_new_txt_len("$ELSEIF",7))))))){
if(qbevent){evnt(25769,13220,"ide_methods.bas");if(r)goto S_54264;}
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= -1 ;
if(!qbevent)break;evnt(25769,13221,"ide_methods.bas");}while(r);
}
}
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13223,"ide_methods.bas");}while(r);
S_54268:;
}else{
if (qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,qbs_add(qbs_add(qbs_new_txt_len("@",1),FUNC_REMOVESYMBOL2(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)),qbs_new_txt_len("@",1)),0)> 0 ))){
if(qbevent){evnt(25769,13224,"ide_methods.bas");if(r)goto S_54268;}
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= -1 ;
if(!qbevent)break;evnt(25769,13225,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13226,"ide_methods.bas");}while(r);
S_54271:;
}else{
if (qbs_cleanup(qbs_tmp_base,(-(func_instr(NULL,__STRING_USERDEFINELIST,qbs_add(qbs_add(qbs_new_txt_len("@",1),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD),qbs_new_txt_len("@",1)),0)> 0 ))&(((qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 3 )),qbs_new_txt_len("$IF",3)))|(qbs_equal(qbs_ucase(qbs_left(qbs_ltrim(_SUB_IDESHOWTEXT_STRING_A2), 7 )),qbs_new_txt_len("$ELSEIF",7))))))){
if(qbevent){evnt(25769,13229,"ide_methods.bas");if(r)goto S_54271;}
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= -1 ;
if(!qbevent)break;evnt(25769,13230,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD=_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13231,"ide_methods.bas");}while(r);
}
}
}
}
}
LABEL_SETOLDCHAR:;
if(qbevent){evnt(25769,13235,"ide_methods.bas");r=0;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_OLDCHAR,_SUB_IDESHOWTEXT_STRING_THISCHAR);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13236,"ide_methods.bas");}while(r);
S_54278:;
if (((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD> 0 ))&*__BYTE_KEYWORDHIGHLIGHT)||is_error_pending()){
if(qbevent){evnt(25769,13238,"ide_methods.bas");if(r)goto S_54278;}
S_54279:;
if ((*_SUB_IDESHOWTEXT_LONG_IS_NUMBER)||is_error_pending()){
if(qbevent){evnt(25769,13239,"ide_methods.bas");if(r)goto S_54279;}
do{
qbg_sub_color( 8 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13240,"ide_methods.bas");}while(r);
S_54281:;
}else{
if (*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD){
if(qbevent){evnt(25769,13241,"ide_methods.bas");if(r)goto S_54281;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13242,"ide_methods.bas");}while(r);
}else{
do{
qbg_sub_color( 12 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13244,"ide_methods.bas");}while(r);
}
}
S_54286:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD, 1 ),qbs_new_txt_len("$",1))))||is_error_pending()){
if(qbevent){evnt(25769,13246,"ide_methods.bas");if(r)goto S_54286;}
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= -1 ;
if(!qbevent)break;evnt(25769,13246,"ide_methods.bas");}while(r);
}
}
S_54290:;
if ((*_SUB_IDESHOWTEXT_LONG_COMMENT)||is_error_pending()){
if(qbevent){evnt(25769,13249,"ide_methods.bas");if(r)goto S_54290;}
do{
qbg_sub_color( 11 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13250,"ide_methods.bas");}while(r);
S_54292:;
if ((*_SUB_IDESHOWTEXT_LONG_METACOMMAND)||is_error_pending()){
if(qbevent){evnt(25769,13251,"ide_methods.bas");if(r)goto S_54292;}
S_54293:;
if(qbevent){evnt(25769,13252,"ide_methods.bas");if(r)goto S_54293;}
S_54294:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$INCLUDE",8))))||is_error_pending()){
if(qbevent){evnt(25769,13253,"ide_methods.bas");if(r)goto S_54294;}
S_54295:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,0|1)== 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13254,"ide_methods.bas");if(r)goto S_54295;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13254,"ide_methods.bas");}while(r);
}
sc_ec_382_end:;
goto sc_6291_end;
}
S_54298:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$DYNAMIC",8))||qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$STATIC",7))))||is_error_pending()){
if(qbevent){evnt(25769,13255,"ide_methods.bas");if(r)goto S_54298;}
S_54299:;
if ((qbs_cleanup(qbs_tmp_base,(-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$DYNAMIC",8),0|1)== 0 ))&(-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$STATIC",7),0|1)== 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,13256,"ide_methods.bas");if(r)goto S_54299;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13256,"ide_methods.bas");}while(r);
}
sc_ec_383_end:;
goto sc_6291_end;
}
S_54302:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$FORMAT",7))))||is_error_pending()){
if(qbevent){evnt(25769,13257,"ide_methods.bas");if(r)goto S_54302;}
S_54303:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(*_SUB_IDESHOWTEXT_LONG_M+ 1 ,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$FORMAT",7),0|1)== 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13258,"ide_methods.bas");if(r)goto S_54303;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13258,"ide_methods.bas");}while(r);
}
sc_ec_384_end:;
goto sc_6291_end;
}
sc_6291_end:;
}else{
S_54308:;
if(qbevent){evnt(25769,13261,"ide_methods.bas");if(r)goto S_54308;}
S_54309:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("OFF",3))))||is_error_pending()){
if(qbevent){evnt(25769,13262,"ide_methods.bas");if(r)goto S_54309;}
do{
*_SUB_IDESHOWTEXT_LONG_FMT=func__instrrev(*_SUB_IDESHOWTEXT_LONG_M,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$FORMAT:",8),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13263,"ide_methods.bas");}while(r);
S_54311:;
if ((-(-((-(*_SUB_IDESHOWTEXT_LONG_FMT> 0 ))&&(-((*_SUB_IDESHOWTEXT_LONG_M-*_SUB_IDESHOWTEXT_LONG_FMT)>=( 8 ))))&&(-((*_SUB_IDESHOWTEXT_LONG_M-*_SUB_IDESHOWTEXT_LONG_FMT)<=( 10 )))))||is_error_pending()){
if(qbevent){evnt(25769,13264,"ide_methods.bas");if(r)goto S_54311;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13264,"ide_methods.bas");}while(r);
}
sc_ec_385_end:;
goto sc_6292_end;
}
S_54314:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("ON",2))))||is_error_pending()){
if(qbevent){evnt(25769,13265,"ide_methods.bas");if(r)goto S_54314;}
do{
*_SUB_IDESHOWTEXT_LONG_FMT=func__instrrev(*_SUB_IDESHOWTEXT_LONG_M,qbs_ucase(_SUB_IDESHOWTEXT_STRING_A2),qbs_new_txt_len("$FORMAT:",8),0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13266,"ide_methods.bas");}while(r);
S_54316:;
if ((-(-((-(*_SUB_IDESHOWTEXT_LONG_FMT> 0 ))&&(-((*_SUB_IDESHOWTEXT_LONG_M-*_SUB_IDESHOWTEXT_LONG_FMT)>=( 8 ))))&&(-((*_SUB_IDESHOWTEXT_LONG_M-*_SUB_IDESHOWTEXT_LONG_FMT)<=( 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,13267,"ide_methods.bas");if(r)goto S_54316;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13267,"ide_methods.bas");}while(r);
}
sc_ec_386_end:;
goto sc_6292_end;
}
sc_6292_end:;
}
S_54321:;
}else{
if (*_SUB_IDESHOWTEXT_LONG_METACOMMAND){
if(qbevent){evnt(25769,13270,"ide_methods.bas");if(r)goto S_54321;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13271,"ide_methods.bas");}while(r);
S_54323:;
}else{
if (qbs_cleanup(qbs_tmp_base,*_SUB_IDESHOWTEXT_LONG_INQUOTE|(qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_chr( 34 ))))){
if(qbevent){evnt(25769,13272,"ide_methods.bas");if(r)goto S_54323;}
do{
qbg_sub_color( 14 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13273,"ide_methods.bas");}while(r);
}
}
}
LABEL_SKIPSYNTAXHIGHLIGHTER:;
if(qbevent){evnt(25769,13276,"ide_methods.bas");r=0;}
S_54326:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))&(((-(*_SUB_IDESHOWTEXT_LONG_LINK_IDECX> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_M>*_SUB_IDESHOWTEXT_LONG_LINK_IDECX)))))||is_error_pending()){
if(qbevent){evnt(25769,13278,"ide_methods.bas");if(r)goto S_54326;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13278,"ide_methods.bas");}while(r);
}
S_54329:;
if ((((-(*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_M>*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX))))||is_error_pending()){
if(qbevent){evnt(25769,13279,"ide_methods.bas");if(r)goto S_54329;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13279,"ide_methods.bas");}while(r);
}
S_54332:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))&(((-(*_SUB_IDESHOWTEXT_LONG_M==*_SUB_IDESHOWTEXT_LONG_BRACKET1))|(-(*_SUB_IDESHOWTEXT_LONG_M==*_SUB_IDESHOWTEXT_LONG_BRACKET2)))))||is_error_pending()){
if(qbevent){evnt(25769,13281,"ide_methods.bas");if(r)goto S_54332;}
do{
qbg_sub_color(NULL, 5 ,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13282,"ide_methods.bas");}while(r);
S_54334:;
}else{
if ((-(*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH> 0 ))&*__BYTE_MULTIHIGHLIGHT){
if(qbevent){evnt(25769,13283,"ide_methods.bas");if(r)goto S_54334;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH- 1 ;
if(!qbevent)break;evnt(25769,13284,"ide_methods.bas");}while(r);
do{
qbg_sub_color(NULL, 5 ,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13285,"ide_methods.bas");}while(r);
}else{
do{
qbg_sub_color(NULL,*_SUB_IDESHOWTEXT_INTEGER_PREVBG,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13287,"ide_methods.bas");}while(r);
}
}
S_54340:;
if ((*__BYTE_SHOWLINENUMBERS)||is_error_pending()){
if(qbevent){evnt(25769,13290,"ide_methods.bas");if(r)goto S_54340;}
S_54341:;
if (((-((( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)+*__LONG_MAXLINENUMBERLENGTH)>=( 2 +*__LONG_MAXLINENUMBERLENGTH)))&(-((( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)+*__LONG_MAXLINENUMBERLENGTH)<*__LONG_IDEWX)))||is_error_pending()){
if(qbevent){evnt(25769,13291,"ide_methods.bas");if(r)goto S_54341;}
do{
sub__printstring(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)+*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_THISCHAR,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13292,"ide_methods.bas");}while(r);
}
}else{
S_54345:;
if (((-(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)>=( 2 )))&(-(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)<*__LONG_IDEWX)))||is_error_pending()){
if(qbevent){evnt(25769,13295,"ide_methods.bas");if(r)goto S_54345;}
do{
sub__printstring( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_THISCHAR,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13296,"ide_methods.bas");}while(r);
}
}
S_54349:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||is_error_pending()){
if(qbevent){evnt(25769,13301,"ide_methods.bas");if(r)goto S_54349;}
do{
qbg_sub_color(NULL, 6 ,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13301,"ide_methods.bas");}while(r);
}
S_54352:;
if ((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13302,"ide_methods.bas");if(r)goto S_54352;}
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD=*_SUB_IDESHOWTEXT_LONG_ISKEYWORD- 1 ;
if(!qbevent)break;evnt(25769,13302,"ide_methods.bas");}while(r);
}
S_54355:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))&(qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("REM",3)))))||is_error_pending()){
if(qbevent){evnt(25769,13303,"ide_methods.bas");if(r)goto S_54355;}
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ;
if(!qbevent)break;evnt(25769,13303,"ide_methods.bas");}while(r);
}
S_54358:;
if ((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13304,"ide_methods.bas");if(r)goto S_54358;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13304,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= 0 ;
if(!qbevent)break;evnt(25769,13304,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IS_NUMBER= 0 ;
if(!qbevent)break;evnt(25769,13304,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= 0 ;
if(!qbevent)break;evnt(25769,13304,"ide_methods.bas");}while(r);
}
fornext_continue_6255:;
}
fornext_exit_6255:;
S_54365:;
if (((((-(*__LONG_IDESYSTEM== 1 ))|(-(*__LONG_IDESYSTEM== 2 ))))&(-(*__LONG_IDESELECT!= 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13308,"ide_methods.bas");if(r)goto S_54365;}
S_54366:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||is_error_pending()){
if(qbevent){evnt(25769,13309,"ide_methods.bas");if(r)goto S_54366;}
S_54367:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(25769,13310,"ide_methods.bas");if(r)goto S_54367;}
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13311,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX;
if(!qbevent)break;evnt(25769,13312,"ide_methods.bas");}while(r);
S_54370:;
fornext_value6294= 2 +*__LONG_MAXLINENUMBERLENGTH;
fornext_finalvalue6294=(*__LONG_IDEWX- 1 );
fornext_step6294= 1 ;
if (fornext_step6294<0) fornext_step_negative6294=1; else fornext_step_negative6294=0;
if (is_error_pending()) goto fornext_error6294;
goto fornext_entrylabel6294;
while(1){
fornext_value6294=fornext_step6294+(*_SUB_IDESHOWTEXT_LONG_X);
fornext_entrylabel6294:
*_SUB_IDESHOWTEXT_LONG_X=fornext_value6294;
if (fornext_step_negative6294){
if (fornext_value6294<fornext_finalvalue6294) break;
}else{
if (fornext_value6294>fornext_finalvalue6294) break;
}
fornext_error6294:;
if(qbevent){evnt(25769,13313,"ide_methods.bas");if(r)goto S_54370;}
S_54371:;
if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||is_error_pending()){
if(qbevent){evnt(25769,13314,"ide_methods.bas");if(r)goto S_54371;}
do{
*_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0);
if(!qbevent)break;evnt(25769,13315,"ide_methods.bas");}while(r);
S_54373:;
if ((-(*_SUB_IDESHOWTEXT_LONG_A== 63 ))||is_error_pending()){
if(qbevent){evnt(25769,13317,"ide_methods.bas");if(r)goto S_54373;}
do{
*_SUB_IDESHOWTEXT_LONG_C=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X, 1 ,0|1);
if(!qbevent)break;evnt(25769,13318,"ide_methods.bas");}while(r);
}else{
do{
*_SUB_IDESHOWTEXT_LONG_C= 1 ;
if(!qbevent)break;evnt(25769,13320,"ide_methods.bas");}while(r);
}
S_54378:;
if ((-((*_SUB_IDESHOWTEXT_LONG_C& 15 )== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13322,"ide_methods.bas");if(r)goto S_54378;}
do{
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13323,"ide_methods.bas");}while(r);
do{
sub__printstring(*_SUB_IDESHOWTEXT_LONG_X,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,qbs_new_txt_len("?",1),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13324,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13325,"ide_methods.bas");}while(r);
}else{
do{
sub__printstring(*_SUB_IDESHOWTEXT_LONG_X,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr(*_SUB_IDESHOWTEXT_LONG_A),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13327,"ide_methods.bas");}while(r);
}
}
do{
*_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ;
if(!qbevent)break;evnt(25769,13332,"ide_methods.bas");}while(r);
fornext_continue_6293:;
}
fornext_exit_6293:;
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13334,"ide_methods.bas");}while(r);
}else{
S_54390:;
if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||is_error_pending()){
if(qbevent){evnt(25769,13336,"ide_methods.bas");if(r)goto S_54390;}
do{
goto LABEL_NOFINALSELECT;
if(!qbevent)break;evnt(25769,13336,"ide_methods.bas");}while(r);
}
do{
qbg_sub_locate(*_SUB_IDESHOWTEXT_LONG_Y+ 3 , 2 +*__LONG_MAXLINENUMBERLENGTH,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13337,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13338,"ide_methods.bas");}while(r);
S_54395:;
fornext_value6296=*__LONG_IDESX;
fornext_finalvalue6296=*__LONG_IDESX+*__LONG_IDEWX-( 2 +*__LONG_MAXLINENUMBERLENGTH);
fornext_step6296= 1 ;
if (fornext_step6296<0) fornext_step_negative6296=1; else fornext_step_negative6296=0;
if (is_error_pending()) goto fornext_error6296;
goto fornext_entrylabel6296;
while(1){
fornext_value6296=fornext_step6296+(*_SUB_IDESHOWTEXT_LONG_X);
fornext_entrylabel6296:
*_SUB_IDESHOWTEXT_LONG_X=fornext_value6296;
if (fornext_step_negative6296){
if (fornext_value6296<fornext_finalvalue6296) break;
}else{
if (fornext_value6296>fornext_finalvalue6296) break;
}
fornext_error6296:;
if(qbevent){evnt(25769,13340,"ide_methods.bas");if(r)goto S_54395;}
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,func_mid(_SUB_IDESHOWTEXT_STRING_A2,*_SUB_IDESHOWTEXT_LONG_X, 1 ,0|1));
if (is_error_pending()) goto skip6297;
makefit(tqbs);
qbs_print(tqbs,0);
skip6297:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13341,"ide_methods.bas");}while(r);
fornext_continue_6295:;
}
fornext_exit_6295:;
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13344,"ide_methods.bas");}while(r);
LABEL_NOFINALSELECT:;
if(qbevent){evnt(25769,13345,"ide_methods.bas");r=0;}
}
}
}
do{
*_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ;
if(!qbevent)break;evnt(25769,13350,"ide_methods.bas");}while(r);
fornext_continue_6241:;
}
fornext_exit_6241:;
}else{
LABEL_NOSYNTAXHIGHLIGHTING:;
if(qbevent){evnt(25769,13353,"ide_methods.bas");r=0;}
S_54405:;
if ((*__INTEGER_IDECHANGEMADE)||is_error_pending()){
if(qbevent){evnt(25769,13355,"ide_methods.bas");if(r)goto S_54405;}
do{
*__LONG_IDEFOCUSLINE= 0 ;
if(!qbevent)break;evnt(25769,13355,"ide_methods.bas");}while(r);
}
do{
qbg_sub_color( 13 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13356,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY;
if(!qbevent)break;evnt(25769,13357,"ide_methods.bas");}while(r);
S_54410:;
fornext_value6299= 0 ;
fornext_finalvalue6299=(*__LONG_IDEWY- 9 );
fornext_step6299= 1 ;
if (fornext_step6299<0) fornext_step_negative6299=1; else fornext_step_negative6299=0;
if (is_error_pending()) goto fornext_error6299;
goto fornext_entrylabel6299;
while(1){
fornext_value6299=fornext_step6299+(*_SUB_IDESHOWTEXT_LONG_Y);
fornext_entrylabel6299:
*_SUB_IDESHOWTEXT_LONG_Y=fornext_value6299;
if (fornext_step_negative6299){
if (fornext_value6299<fornext_finalvalue6299) break;
}else{
if (fornext_value6299>fornext_finalvalue6299) break;
}
fornext_error6299:;
if(qbevent){evnt(25769,13358,"ide_methods.bas");if(r)goto S_54410;}
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13359,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 179 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13360,"ide_methods.bas");}while(r);
do{
return_point[next_return_point++]=172;
if (next_return_point>=return_points) more_return_points();
goto LABEL_SHOWLINENUMBER;
RETURN_172:;
if(!qbevent)break;evnt(25769,13362,"ide_methods.bas");}while(r);
S_54414:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY!=*_SUB_IDESHOWTEXT_LONG_L)))||is_error_pending()){
if(qbevent){evnt(25769,13364,"ide_methods.bas");if(r)goto S_54414;}
do{
qbg_sub_color( 13 , 4 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13364,"ide_methods.bas");}while(r);
}else{
do{
qbg_sub_color( 13 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13364,"ide_methods.bas");}while(r);
}
S_54419:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(25769,13366,"ide_methods.bas");if(r)goto S_54419;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13367,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space(*__LONG_IDESX+(*__LONG_IDEWX- 3 )-*__LONG_MAXLINENUMBERLENGTH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13368,"ide_methods.bas");}while(r);
do{
sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0);
if(!qbevent)break;evnt(25769,13369,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A2,qbs_right(_SUB_IDESHOWTEXT_STRING_A2,(*__LONG_IDEWX- 2 )-*__LONG_MAXLINENUMBERLENGTH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13370,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A2,func_space((*__LONG_IDEWX- 2 )-*__LONG_MAXLINENUMBERLENGTH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13372,"ide_methods.bas");}while(r);
}
do{
sub__printstring( 2 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_A2,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13374,"ide_methods.bas");}while(r);
S_54428:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||is_error_pending()){
if(qbevent){evnt(25769,13376,"ide_methods.bas");if(r)goto S_54428;}
S_54429:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX<=_SUB_IDESHOWTEXT_STRING_A->len))&(-(*__LONG_IDECX>= 1 ))))||is_error_pending()){
if(qbevent){evnt(25769,13377,"ide_methods.bas");if(r)goto S_54429;}
do{
*_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13378,"ide_methods.bas");}while(r);
S_54431:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||is_error_pending()){
if(qbevent){evnt(25769,13379,"ide_methods.bas");if(r)goto S_54431;}
S_54432:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ltrim(qbs_left(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX)),qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,13380,"ide_methods.bas");if(r)goto S_54432;}
do{
*_SUB_IDESHOWTEXT_LONG_CC= -1 ;
if(!qbevent)break;evnt(25769,13380,"ide_methods.bas");}while(r);
}
}
}
}
S_54438:;
if ((*__LONG_IDESELECT)||is_error_pending()){
if(qbevent){evnt(25769,13386,"ide_methods.bas");if(r)goto S_54438;}
S_54439:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||is_error_pending()){
if(qbevent){evnt(25769,13387,"ide_methods.bas");if(r)goto S_54439;}
S_54440:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(25769,13388,"ide_methods.bas");if(r)goto S_54440;}
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13389,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX;
if(!qbevent)break;evnt(25769,13390,"ide_methods.bas");}while(r);
S_54443:;
fornext_value6302= 2 +*__LONG_MAXLINENUMBERLENGTH;
fornext_finalvalue6302=(*__LONG_IDEWX- 1 );
fornext_step6302= 1 ;
if (fornext_step6302<0) fornext_step_negative6302=1; else fornext_step_negative6302=0;
if (is_error_pending()) goto fornext_error6302;
goto fornext_entrylabel6302;
while(1){
fornext_value6302=fornext_step6302+(*_SUB_IDESHOWTEXT_LONG_X);
fornext_entrylabel6302:
*_SUB_IDESHOWTEXT_LONG_X=fornext_value6302;
if (fornext_step_negative6302){
if (fornext_value6302<fornext_finalvalue6302) break;
}else{
if (fornext_value6302>fornext_finalvalue6302) break;
}
fornext_error6302:;
if(qbevent){evnt(25769,13391,"ide_methods.bas");if(r)goto S_54443;}
S_54444:;
if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||is_error_pending()){
if(qbevent){evnt(25769,13392,"ide_methods.bas");if(r)goto S_54444;}
do{
*_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0);
if(!qbevent)break;evnt(25769,13393,"ide_methods.bas");}while(r);
do{
sub__printstring(*_SUB_IDESHOWTEXT_LONG_X,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr(*_SUB_IDESHOWTEXT_LONG_A),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13393,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ;
if(!qbevent)break;evnt(25769,13395,"ide_methods.bas");}while(r);
fornext_continue_6301:;
}
fornext_exit_6301:;
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13397,"ide_methods.bas");}while(r);
}else{
S_54452:;
if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||is_error_pending()){
if(qbevent){evnt(25769,13399,"ide_methods.bas");if(r)goto S_54452;}
do{
goto LABEL_NOFINALSELECT0;
if(!qbevent)break;evnt(25769,13399,"ide_methods.bas");}while(r);
}
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13400,"ide_methods.bas");}while(r);
do{
sub__printstring( 2 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_A2,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13400,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13401,"ide_methods.bas");}while(r);
LABEL_NOFINALSELECT0:;
if(qbevent){evnt(25769,13402,"ide_methods.bas");r=0;}
}
}
}
do{
*_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ;
if(!qbevent)break;evnt(25769,13407,"ide_methods.bas");}while(r);
fornext_continue_6298:;
}
fornext_exit_6298:;
}
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13411,"ide_methods.bas");}while(r);
S_54465:;
fornext_value6304= 1 ;
fornext_finalvalue6304=*__LONG_IDEBMKN;
fornext_step6304= 1 ;
if (fornext_step6304<0) fornext_step_negative6304=1; else fornext_step_negative6304=0;
if (is_error_pending()) goto fornext_error6304;
goto fornext_entrylabel6304;
while(1){
fornext_value6304=fornext_step6304+(*_SUB_IDESHOWTEXT_LONG_B);
fornext_entrylabel6304:
*_SUB_IDESHOWTEXT_LONG_B=fornext_value6304;
if (fornext_step_negative6304){
if (fornext_value6304<fornext_finalvalue6304) break;
}else{
if (fornext_value6304>fornext_finalvalue6304) break;
}
fornext_error6304:;
if(qbevent){evnt(25769,13412,"ide_methods.bas");if(r)goto S_54465;}
do{
*_SUB_IDESHOWTEXT_LONG_Y=*(int32*)(((char*)__ARRAY_UDT_IDEBMK[0])+(((array_check((*_SUB_IDESHOWTEXT_LONG_B)-__ARRAY_UDT_IDEBMK[4],__ARRAY_UDT_IDEBMK[5]))*16+0)));
if(!qbevent)break;evnt(25769,13413,"ide_methods.bas");}while(r);
S_54467:;
if (((-(*_SUB_IDESHOWTEXT_LONG_Y>=*__LONG_IDESY))&(-(*_SUB_IDESHOWTEXT_LONG_Y<=(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,13414,"ide_methods.bas");if(r)goto S_54467;}
do{
sub__printstring( 1 , 3 +*_SUB_IDESHOWTEXT_LONG_Y-*__LONG_IDESY,func_chr( 197 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13415,"ide_methods.bas");}while(r);
}
fornext_continue_6303:;
}
fornext_exit_6303:;
do{
*_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass6305= 3 ),&(pass6306=(*__LONG_IDEWY- 8 )),__LONG_IDECY,__LONG_IDEN);
if(!qbevent)break;evnt(25769,13419,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEHBAR(&(pass6307= 2 ),&(pass6308=(*__LONG_IDEWY- 5 )),&(pass6309=(*__LONG_IDEWX- 2 )),__LONG_IDESX,&(pass6310= 608 ));
if(!qbevent)break;evnt(25769,13420,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 0 , 3 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13423,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,func_space( 10 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13424,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13425,"ide_methods.bas");}while(r);
do{
sub_rset(_SUB_IDESHOWTEXT_STRING_A,qbs__tostr((int32)(*__LONG_IDECY),NULL,0));
if(!qbevent)break;evnt(25769,13426,"ide_methods.bas");}while(r);
S_54477:;
if ((-(*__LONG_IDECX< 100000 ))||is_error_pending()){
if(qbevent){evnt(25769,13427,"ide_methods.bas");if(r)goto S_54477;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,func_space( 10 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13428,"ide_methods.bas");}while(r);
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_C,qbs__tostr((int32)(*__LONG_IDECX),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13429,"ide_methods.bas");}while(r);
S_54480:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CC!= -1 ))||is_error_pending()){
if(qbevent){evnt(25769,13430,"ide_methods.bas");if(r)goto S_54480;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_C,qbs_add(qbs_add(qbs_add(_SUB_IDESHOWTEXT_STRING_C,qbs_new_txt_len("(",1)),qbs__tostr((int32)(*_SUB_IDESHOWTEXT_LONG_CC),NULL,0)),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13430,"ide_methods.bas");}while(r);
}
do{
sub_lset(_SUB_IDESHOWTEXT_STRING_B,_SUB_IDESHOWTEXT_STRING_C);
if(!qbevent)break;evnt(25769,13431,"ide_methods.bas");}while(r);
}
do{
qbs_set(__STRING_LINENUMBERSTATUS,qbs_add(qbs_add(_SUB_IDESHOWTEXT_STRING_A,qbs_new_txt_len(":",1)),_SUB_IDESHOWTEXT_STRING_B));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13433,"ide_methods.bas");}while(r);
do{
sub__printstring(*__LONG_IDEWX- 20 ,*__LONG_IDEWY+*__LONG_IDESUBWINDOW,__STRING_LINENUMBERSTATUS,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13435,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,13437,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*__LONG_IDECY-*__LONG_IDESY+ 3 ,*__LONG_MAXLINENUMBERLENGTH+*__LONG_IDECX-*__LONG_IDESX+ 2 ,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13437,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 3 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,13437,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,13439,"ide_methods.bas");}while(r);
LABEL_SHOWLINENUMBER:;
if(qbevent){evnt(25769,13440,"ide_methods.bas");r=0;}
S_54491:;
while((-(*_SUB_IDESHOWTEXT_LONG_L>func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)))||is_error_pending()){
if(qbevent){evnt(25769,13441,"ide_methods.bas");if(r)goto S_54491;}
do{
if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDEBREAKPOINTS)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&1){
preserve_old_ptr=__ARRAY_BYTE_IDEBREAKPOINTS[0];
preserve_old_flags=__ARRAY_BYTE_IDEBREAKPOINTS[2];
preserve_old_total=__ARRAY_BYTE_IDEBREAKPOINTS[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)+ 100 )-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(1);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (__ARRAY_BYTE_IDEBREAKPOINTS[2]&4){
if (preserve_old_total){
preserve_new_ptr=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
memset((void*)(preserve_new_ptr),0,(size_t)alloc_req_bytes);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_IDEBREAKPOINTS[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257);
memset((void*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]),0,(size_t)alloc_req_bytes);
}
}else{
if (preserve_old_total){
preserve_new_ptr=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!preserve_new_ptr) error(257);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_IDEBREAKPOINTS[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_IDEBREAKPOINTS[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!__ARRAY_BYTE_IDEBREAKPOINTS[0]) error(257);
}
}
__ARRAY_BYTE_IDEBREAKPOINTS[2]|=1;
__ARRAY_BYTE_IDEBREAKPOINTS[4]=alloc_new_desc[4];
__ARRAY_BYTE_IDEBREAKPOINTS[5]=alloc_new_desc[5];
__ARRAY_BYTE_IDEBREAKPOINTS[6]=alloc_new_desc[6];
__ARRAY_BYTE_IDEBREAKPOINTS[7]=alloc_new_desc[7];
}
if(!qbevent)break;evnt(25769,13442,"ide_methods.bas");}while(r);
dl_continue_6311:;
}
dl_exit_6311:;
S_54494:;
while((-(*_SUB_IDESHOWTEXT_LONG_L>func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1)))||is_error_pending()){
if(qbevent){evnt(25769,13445,"ide_methods.bas");if(r)goto S_54494;}
do{
if (__ARRAY_BYTE_IDESKIPLINES[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_BYTE_IDESKIPLINES)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_BYTE_IDESKIPLINES[2]&1){
preserve_old_ptr=__ARRAY_BYTE_IDESKIPLINES[0];
preserve_old_flags=__ARRAY_BYTE_IDESKIPLINES[2];
preserve_old_total=__ARRAY_BYTE_IDESKIPLINES[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1)+ 100 )-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(1);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (__ARRAY_BYTE_IDESKIPLINES[2]&4){
if (preserve_old_total){
preserve_new_ptr=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
memset((void*)(preserve_new_ptr),0,(size_t)alloc_req_bytes);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_IDESKIPLINES[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257);
memset((void*)(__ARRAY_BYTE_IDESKIPLINES[0]),0,(size_t)alloc_req_bytes);
}
}else{
if (preserve_old_total){
preserve_new_ptr=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!preserve_new_ptr) error(257);
if (preserve_copy_count) memcpy((void*)(preserve_new_ptr),(void*)(preserve_old_ptr),preserve_copy_count*1);
if (preserve_old_flags&4){
cmem_dynamic_free((uint8*)(preserve_old_ptr));
}else{
free((void*)(preserve_old_ptr));
}
__ARRAY_BYTE_IDESKIPLINES[0]=preserve_new_ptr;
}else{
__ARRAY_BYTE_IDESKIPLINES[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!__ARRAY_BYTE_IDESKIPLINES[0]) error(257);
}
}
__ARRAY_BYTE_IDESKIPLINES[2]|=1;
__ARRAY_BYTE_IDESKIPLINES[4]=alloc_new_desc[4];
__ARRAY_BYTE_IDESKIPLINES[5]=alloc_new_desc[5];
__ARRAY_BYTE_IDESKIPLINES[6]=alloc_new_desc[6];
__ARRAY_BYTE_IDESKIPLINES[7]=alloc_new_desc[7];
}
if(!qbevent)break;evnt(25769,13446,"ide_methods.bas");}while(r);
dl_continue_6312:;
}
dl_exit_6312:;
S_54497:;
if ((*__BYTE_SHOWLINENUMBERS)||is_error_pending()){
if(qbevent){evnt(25769,13449,"ide_methods.bas");if(r)goto S_54497;}
S_54498:;
if ((*__BYTE_SHOWLINENUMBERSUSEBG)||is_error_pending()){
if(qbevent){evnt(25769,13450,"ide_methods.bas");if(r)goto S_54498;}
do{
qbg_sub_color(NULL, 6 ,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13450,"ide_methods.bas");}while(r);
}
S_54501:;
if ((((-(*__LONG_SEARCHSTRINGFOUNDON> 0 ))&(-(*__LONG_SEARCHSTRINGFOUNDON==*_SUB_IDESHOWTEXT_LONG_L)))|((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))&(-(FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) ))== 1 ))))||is_error_pending()){
if(qbevent){evnt(25769,13451,"ide_methods.bas");if(r)goto S_54501;}
do{
qbg_sub_color( 13 , 5 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13452,"ide_methods.bas");}while(r);
S_54503:;
if (((-(*__LONG_SEARCHSTRINGFOUNDON> 0 ))&(-(*__LONG_SEARCHSTRINGFOUNDON==*_SUB_IDESHOWTEXT_LONG_L)))||is_error_pending()){
if(qbevent){evnt(25769,13453,"ide_methods.bas");if(r)goto S_54503;}
do{
*__LONG_SEARCHSTRINGFOUNDON= 0 ;
if(!qbevent)break;evnt(25769,13453,"ide_methods.bas");}while(r);
}
}
S_54507:;
if (((-(FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) ))== 1 ))&(-(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]!= 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13455,"ide_methods.bas");if(r)goto S_54507;}
do{
qbg_sub_color(NULL, 4 ,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13455,"ide_methods.bas");}while(r);
}
S_54510:;
if (((-(FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) ))== 1 ))&(-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )))||is_error_pending()){
if(qbevent){evnt(25769,13456,"ide_methods.bas");if(r)goto S_54510;}
do{
qbg_sub_color( 14 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13456,"ide_methods.bas");}while(r);
}
do{
sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_space(*__LONG_MAXLINENUMBERLENGTH),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13457,"ide_methods.bas");}while(r);
S_54514:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(25769,13458,"ide_methods.bas");if(r)goto S_54514;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_L2,qbs_str((int32)(*_SUB_IDESHOWTEXT_LONG_L)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13459,"ide_methods.bas");}while(r);
S_54516:;
if ((qbs_cleanup(qbs_tmp_base,-(( 2 +*__LONG_MAXLINENUMBERLENGTH-(_SUB_IDESHOWTEXT_STRING_L2->len+ 1 ))>=( 2 ))))||is_error_pending()){
if(qbevent){evnt(25769,13460,"ide_methods.bas");if(r)goto S_54516;}
do{
sub__printstring( 2 +*__LONG_MAXLINENUMBERLENGTH-(_SUB_IDESHOWTEXT_STRING_L2->len+ 1 ),*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,_SUB_IDESHOWTEXT_STRING_L2,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13461,"ide_methods.bas");}while(r);
S_54518:;
if ((FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) )))||is_error_pending()){
if(qbevent){evnt(25769,13462,"ide_methods.bas");if(r)goto S_54518;}
S_54519:;
if ((-(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]!= 0 ))||is_error_pending()){
if(qbevent){evnt(25769,13463,"ide_methods.bas");if(r)goto S_54519;}
do{
sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 7 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13464,"ide_methods.bas");}while(r);
S_54521:;
}else{
if (-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )){
if(qbevent){evnt(25769,13465,"ide_methods.bas");if(r)goto S_54521;}
do{
sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,qbs_new_txt_len("!",1),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13466,"ide_methods.bas");}while(r);
}
}
}
}
}
S_54527:;
if ((*__BYTE_SHOWLINENUMBERSSEPARATOR)||is_error_pending()){
if(qbevent){evnt(25769,13471,"ide_methods.bas");if(r)goto S_54527;}
S_54528:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||is_error_pending()){
if(qbevent){evnt(25769,13472,"ide_methods.bas");if(r)goto S_54528;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13473,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13474,"ide_methods.bas");}while(r);
}else{
do{
sub__printstring( 1 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 179 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13476,"ide_methods.bas");}while(r);
}
}else{
S_54535:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||is_error_pending()){
if(qbevent){evnt(25769,13479,"ide_methods.bas");if(r)goto S_54535;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13480,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 +*__LONG_MAXLINENUMBERLENGTH,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13481,"ide_methods.bas");}while(r);
}
}
do{
qbg_sub_color(NULL, 1 ,NULL,NULL,2);
if(!qbevent)break;evnt(25769,13484,"ide_methods.bas");}while(r);
}else{
S_54542:;
if (((-(FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) ))== 1 ))&(((-(((int8*)(__ARRAY_BYTE_IDEBREAKPOINTS[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDEBREAKPOINTS[4],__ARRAY_BYTE_IDEBREAKPOINTS[5])]!= 0 ))|(-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )))))||is_error_pending()){
if(qbevent){evnt(25769,13486,"ide_methods.bas");if(r)goto S_54542;}
do{
qbg_sub_color( 7 , 4 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13487,"ide_methods.bas");}while(r);
S_54544:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||is_error_pending()){
if(qbevent){evnt(25769,13488,"ide_methods.bas");if(r)goto S_54544;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13489,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13490,"ide_methods.bas");}while(r);
S_54547:;
}else{
if (-(((int8*)(__ARRAY_BYTE_IDESKIPLINES[0]))[array_check((*_SUB_IDESHOWTEXT_LONG_L)-__ARRAY_BYTE_IDESKIPLINES[4],__ARRAY_BYTE_IDESKIPLINES[5])]!= 0 )){
if(qbevent){evnt(25769,13491,"ide_methods.bas");if(r)goto S_54547;}
do{
qbg_sub_color( 14 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,13492,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,qbs_new_txt_len("!",1),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13493,"ide_methods.bas");}while(r);
}else{
do{
sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 7 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13495,"ide_methods.bas");}while(r);
}
}
S_54553:;
}else{
if ((-(FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) ))== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))){
if(qbevent){evnt(25769,13497,"ide_methods.bas");if(r)goto S_54553;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(25769,13498,"ide_methods.bas");}while(r);
do{
sub__printstring( 1 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 16 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,13499,"ide_methods.bas");}while(r);
}
}
}
do{
#include "ret316.txt"
if(!qbevent)break;evnt(25769,13502,"ide_methods.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free316.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
}
