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 "data379.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
S_58160:;
if ((~(*__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE))||is_error_pending()){
if(qbevent){evnt(28182,13004,"ide_methods.bas");if(r)goto S_58160;}
do{
sub__palettecolor( 1 ,*__ULONG_IDEBACKGROUNDCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13005,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 2 ,func__rgb32( 84 , 84 , 84 ), 0 ,1);
if(!qbevent)break;evnt(28182,13006,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 4 ,*__ULONG_IDEERRORCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13007,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 5 ,*__ULONG_IDEBRACKETHIGHLIGHTCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13008,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 6 ,*__ULONG_IDEBACKGROUNDCOLOR2, 0 ,1);
if(!qbevent)break;evnt(28182,13009,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 7 ,*__ULONG_IDECHROMACOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13010,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 8 ,*__ULONG_IDENUMBERSCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13011,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 10 ,*__ULONG_IDEMETACOMMANDCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13012,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 11 ,*__ULONG_IDECOMMENTCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13013,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 12 ,*__ULONG_IDEKEYWORDCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13014,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 13 ,*__ULONG_IDETEXTCOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13015,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 14 ,*__ULONG_IDEQUOTECOLOR, 0 ,1);
if(!qbevent)break;evnt(28182,13016,"ide_methods.bas");}while(r);
}
do{
*__BYTE_IDESHOWTEXTBYPASSCOLORRESTORE= 0ll ;
if(!qbevent)break;evnt(28182,13018,"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(28182,13020,"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(28182,13021,"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(28182,13022,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(28182,13024,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(28182,13026,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_DOUBLE_STARTTIME=func_timer( 0.001E+0 ,0|1);
if(!qbevent)break;evnt(28182,13028,"ide_methods.bas");}while(r);
S_58181:;
if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||is_error_pending()){
if(qbevent){evnt(28182,13030,"ide_methods.bas");if(r)goto S_58181;}
S_58182:;
if ((-(*__LONG_IDEFOCUSLINE!= 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13031,"ide_methods.bas");if(r)goto S_58182;}
S_58183:;
if ((*__INTEGER_IDECHANGEMADE)||is_error_pending()){
if(qbevent){evnt(28182,13035,"ide_methods.bas");if(r)goto S_58183;}
do{
*_SUB_IDESHOWTEXT_BYTE_MANUALLIST= 0 ;
if(!qbevent)break;evnt(28182,13035,"ide_methods.bas");}while(r);
}
S_58186:;
if ((-(*_SUB_IDESHOWTEXT_BYTE_MANUALLIST== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13036,"ide_methods.bas");if(r)goto S_58186;}
do{
*_SUB_IDESHOWTEXT_BYTE_MANUALLIST= -1 ;
if(!qbevent)break;evnt(28182,13037,"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(28182,13038,"ide_methods.bas");}while(r);
S_58189:;
fornext_value6863= 1 ;
fornext_finalvalue6863=*__LONG_IDEN;
fornext_step6863= 1 ;
if (fornext_step6863<0) fornext_step_negative6863=1; else fornext_step_negative6863=0;
if (is_error_pending()) goto fornext_error6863;
goto fornext_entrylabel6863;
while(1){
fornext_value6863=fornext_step6863+(*_SUB_IDESHOWTEXT_LONG_Y);
fornext_entrylabel6863:
*_SUB_IDESHOWTEXT_LONG_Y=fornext_value6863;
if (fornext_step_negative6863){
if (fornext_value6863<fornext_finalvalue6863) break;
}else{
if (fornext_value6863>fornext_finalvalue6863) break;
}
fornext_error6863:;
if(qbevent){evnt(28182,13039,"ide_methods.bas");if(r)goto S_58189;}
S_58190:;
while((!(-(*_SUB_IDESHOWTEXT_LONG_Y<func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1))))||is_error_pending()){
if(qbevent){evnt(28182,13040,"ide_methods.bas");if(r)goto S_58190;}
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(28182,13041,"ide_methods.bas");}while(r);
dl_continue_6864:;
}
dl_exit_6864:;
S_58193:;
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(28182,13044,"ide_methods.bas");if(r)goto S_58193;}
do{
goto fornext_continue_6862;
if(!qbevent)break;evnt(28182,13044,"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(28182,13045,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SF= 0 ;
if(!qbevent)break;evnt(28182,13046,"ide_methods.bas");}while(r);
S_58198:;
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(28182,13047,"ide_methods.bas");if(r)goto S_58198;}
do{
*_SUB_IDESHOWTEXT_LONG_SF= 1 ;
if(!qbevent)break;evnt(28182,13047,"ide_methods.bas");}while(r);
}
S_58201:;
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(28182,13048,"ide_methods.bas");if(r)goto S_58201;}
do{
*_SUB_IDESHOWTEXT_LONG_SF= 2 ;
if(!qbevent)break;evnt(28182,13048,"ide_methods.bas");}while(r);
}
S_58204:;
if ((*_SUB_IDESHOWTEXT_LONG_SF)||is_error_pending()){
if(qbevent){evnt(28182,13049,"ide_methods.bas");if(r)goto S_58204;}
S_58205:;
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(28182,13050,"ide_methods.bas");if(r)goto S_58205;}
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(28182,13051,"ide_methods.bas");}while(r);
}
S_58208:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SF== 1 ))||is_error_pending()){
if(qbevent){evnt(28182,13054,"ide_methods.bas");if(r)goto S_58208;}
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(28182,13055,"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(28182,13057,"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(28182,13060,"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(28182,13061,"ide_methods.bas");}while(r);
S_58215:;
if ((*_SUB_IDESHOWTEXT_LONG_X)||is_error_pending()){
if(qbevent){evnt(28182,13062,"ide_methods.bas");if(r)goto S_58215;}
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(28182,13063,"ide_methods.bas");}while(r);
}else{
do{
SUB_CLEANSUBNAME(_SUB_IDESHOWTEXT_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13065,"ide_methods.bas");}while(r);
}
S_58220:;
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(28182,13067,"ide_methods.bas");if(r)goto S_58220;}
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(28182,13068,"ide_methods.bas");}while(r);
}
}
fornext_continue_6862:;
}
fornext_exit_6862:;
}
}else{
do{
*_SUB_IDESHOWTEXT_BYTE_MANUALLIST= 0 ;
if(!qbevent)break;evnt(28182,13074,"ide_methods.bas");}while(r);
}
S_58229:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_IDESHOWTEXT_STRING_PREVLISTOFCUSTOMWORDS,__STRING_LISTOFCUSTOMKEYWORDS)))||is_error_pending()){
if(qbevent){evnt(28182,13077,"ide_methods.bas");if(r)goto S_58229;}
S_58230:;
if ((-(*_SUB_IDESHOWTEXT_BYTE_MANUALLIST== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13078,"ide_methods.bas");if(r)goto S_58230;}
S_58231:;
do{
if(qbevent){evnt(28182,13079,"ide_methods.bas");if(r)goto S_58231;}
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(28182,13080,"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(28182,13081,"ide_methods.bas");}while(r);
S_58234:;
if ((-(*_SUB_IDESHOWTEXT_LONG_NEXTAT== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13082,"ide_methods.bas");if(r)goto S_58234;}
do{
goto dl_exit_6866;
if(!qbevent)break;evnt(28182,13082,"ide_methods.bas");}while(r);
}
S_58237:;
if ((-(*_SUB_IDESHOWTEXT_LONG_ATSIGN>*__LONG_CUSTOMKEYWORDSLENGTH))||is_error_pending()){
if(qbevent){evnt(28182,13083,"ide_methods.bas");if(r)goto S_58237;}
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(28182,13084,"ide_methods.bas");}while(r);
S_58239:;
if ((qbs_cleanup(qbs_tmp_base,_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD->len))||is_error_pending()){
if(qbevent){evnt(28182,13085,"ide_methods.bas");if(r)goto S_58239;}
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS= 8ll + 1024ll ;
if(!qbevent)break;evnt(28182,13086,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS=*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS+ 128ll ;
if(!qbevent)break;evnt(28182,13087,"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(28182,13088,"ide_methods.bas");}while(r);
S_58243:;
if ((-(*_SUB_IDESHOWTEXT_LONG_HASHRES1!= 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13089,"ide_methods.bas");if(r)goto S_58243;}
do{
*_SUB_IDESHOWTEXT_LONG_HASHRES1= 1 ;
if(!qbevent)break;evnt(28182,13089,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS= 8ll + 1024ll ;
if(!qbevent)break;evnt(28182,13090,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS=*_SUB_IDESHOWTEXT_LONG_HASHCHKFLAGS+ 64ll ;
if(!qbevent)break;evnt(28182,13091,"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(28182,13092,"ide_methods.bas");}while(r);
S_58249:;
if ((-(*_SUB_IDESHOWTEXT_LONG_HASHRES2!= 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13093,"ide_methods.bas");if(r)goto S_58249;}
do{
*_SUB_IDESHOWTEXT_LONG_HASHRES2= 1 ;
if(!qbevent)break;evnt(28182,13093,"ide_methods.bas");}while(r);
}
S_58252:;
if ((-((*_SUB_IDESHOWTEXT_LONG_HASHRES1+*_SUB_IDESHOWTEXT_LONG_HASHRES2)==( 0 )))||is_error_pending()){
if(qbevent){evnt(28182,13094,"ide_methods.bas");if(r)goto S_58252;}
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(28182,13096,"ide_methods.bas");}while(r);
}
}
}
dl_continue_6866:;
}while(1);
dl_exit_6866:;
}
S_58259:;
fornext_value6870= 1 ;
fornext_finalvalue6870=__STRING_LISTOFCUSTOMKEYWORDS->len;
fornext_step6870= 1 ;
if (fornext_step6870<0) fornext_step_negative6870=1; else fornext_step_negative6870=0;
if (is_error_pending()) goto fornext_error6870;
goto fornext_entrylabel6870;
while(1){
fornext_value6870=fornext_step6870+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6870:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6870;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6870){
if (fornext_value6870<fornext_finalvalue6870) break;
}else{
if (fornext_value6870>fornext_finalvalue6870) break;
}
fornext_error6870:;
if(qbevent){evnt(28182,13103,"ide_methods.bas");if(r)goto S_58259;}
do{
*_SUB_IDESHOWTEXT_LONG_CHECKCHAR=qbs_asc(__STRING_LISTOFCUSTOMKEYWORDS,*_SUB_IDESHOWTEXT_LONG_I);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13104,"ide_methods.bas");}while(r);
S_58261:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CHECKCHAR== 64 ))||is_error_pending()){
if(qbevent){evnt(28182,13105,"ide_methods.bas");if(r)goto S_58261;}
S_58262:;
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(28182,13106,"ide_methods.bas");if(r)goto S_58262;}
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(28182,13106,"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(28182,13108,"ide_methods.bas");}while(r);
}
fornext_continue_6869:;
}
fornext_exit_6869:;
do{
qbs_set(__STRING_LISTOFCUSTOMKEYWORDS,_SUB_IDESHOWTEXT_STRING_TEMPLIST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13111,"ide_methods.bas");}while(r);
S_58270:;
while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,__STRING_FIX046,0)))||is_error_pending()){
if(qbevent){evnt(28182,13113,"ide_methods.bas");if(r)goto S_58270;}
do{
*_SUB_IDESHOWTEXT_LONG_X=func_instr(NULL,__STRING_LISTOFCUSTOMKEYWORDS,__STRING_FIX046,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13114,"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(28182,13115,"ide_methods.bas");}while(r);
dl_continue_6872:;
}
dl_exit_6872:;
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_PREVLISTOFCUSTOMWORDS,__STRING_LISTOFCUSTOMKEYWORDS);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13118,"ide_methods.bas");}while(r);
}
}
do{
*_SUB_IDESHOWTEXT_LONG_CC= -1 ;
if(!qbevent)break;evnt(28182,13123,"ide_methods.bas");}while(r);
S_58278:;
if ((-(*__LONG_IDECX<*__LONG_IDESX))||is_error_pending()){
if(qbevent){evnt(28182,13125,"ide_methods.bas");if(r)goto S_58278;}
do{
*__LONG_IDESX=*__LONG_IDECX;
if(!qbevent)break;evnt(28182,13125,"ide_methods.bas");}while(r);
}
S_58281:;
if ((-(*__LONG_IDECY<*__LONG_IDESY))||is_error_pending()){
if(qbevent){evnt(28182,13126,"ide_methods.bas");if(r)goto S_58281;}
do{
*__LONG_IDESY=*__LONG_IDECY;
if(!qbevent)break;evnt(28182,13126,"ide_methods.bas");}while(r);
}
S_58284:;
if ((-(((*__LONG_IDECX+*__LONG_MAXLINENUMBERLENGTH)-*__LONG_IDESX)>=((*__LONG_IDEWX- 2 ))))||is_error_pending()){
if(qbevent){evnt(28182,13127,"ide_methods.bas");if(r)goto S_58284;}
do{
*__LONG_IDESX=(*__LONG_IDECX+*__LONG_MAXLINENUMBERLENGTH)-(*__LONG_IDEWX- 3 );
if(!qbevent)break;evnt(28182,13127,"ide_methods.bas");}while(r);
}
S_58287:;
if ((-((*__LONG_IDECY-*__LONG_IDESY)>=((*__LONG_IDEWY- 8 ))))||is_error_pending()){
if(qbevent){evnt(28182,13128,"ide_methods.bas");if(r)goto S_58287;}
do{
*__LONG_IDESY=*__LONG_IDECY-(*__LONG_IDEWY- 9 );
if(!qbevent)break;evnt(28182,13128,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_SY1=*__LONG_IDESELECTY1;
if(!qbevent)break;evnt(28182,13130,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SY2=*__LONG_IDECY;
if(!qbevent)break;evnt(28182,13131,"ide_methods.bas");}while(r);
S_58292:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SY1>*_SUB_IDESHOWTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(28182,13132,"ide_methods.bas");if(r)goto S_58292;}
do{
swap_32(&*_SUB_IDESHOWTEXT_LONG_SY1,&*_SUB_IDESHOWTEXT_LONG_SY2);
if(!qbevent)break;evnt(28182,13132,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_SX1=*__LONG_IDESELECTX1;
if(!qbevent)break;evnt(28182,13133,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SX2=*__LONG_IDECX;
if(!qbevent)break;evnt(28182,13134,"ide_methods.bas");}while(r);
S_58297:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SX1>*_SUB_IDESHOWTEXT_LONG_SX2))||is_error_pending()){
if(qbevent){evnt(28182,13135,"ide_methods.bas");if(r)goto S_58297;}
do{
swap_32(&*_SUB_IDESHOWTEXT_LONG_SX1,&*_SUB_IDESHOWTEXT_LONG_SX2);
if(!qbevent)break;evnt(28182,13135,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY;
if(!qbevent)break;evnt(28182,13137,"ide_methods.bas");}while(r);
do{
*__BYTE_ENTERINGRGB= 0 ;
if(!qbevent)break;evnt(28182,13138,"ide_methods.bas");}while(r);
S_58302:;
if ((~(*__BYTE_DISABLESYNTAXHIGHLIGHTER))||is_error_pending()){
if(qbevent){evnt(28182,13140,"ide_methods.bas");if(r)goto S_58302;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 0 ;
if(!qbevent)break;evnt(28182,13141,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND= 0 ;
if(!qbevent)break;evnt(28182,13142,"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(28182,13143,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_A,&(pass6876=_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(28182,13144,"ide_methods.bas");}while(r);
S_58307:;
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(28182,13145,"ide_methods.bas");if(r)goto S_58307;}
S_58308:;
fornext_value6878=*__LONG_IDECY- 1 ;
fornext_finalvalue6878= 1 ;
fornext_step6878= -1 ;
if (fornext_step6878<0) fornext_step_negative6878=1; else fornext_step_negative6878=0;
if (is_error_pending()) goto fornext_error6878;
goto fornext_entrylabel6878;
while(1){
fornext_value6878=fornext_step6878+(*_SUB_IDESHOWTEXT_LONG_IDECY_I);
fornext_entrylabel6878:
*_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value6878;
if (fornext_step_negative6878){
if (fornext_value6878<fornext_finalvalue6878) break;
}else{
if (fornext_value6878>fornext_finalvalue6878) break;
}
fornext_error6878:;
if(qbevent){evnt(28182,13147,"ide_methods.bas");if(r)goto S_58308;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13148,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6880=_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(28182,13149,"ide_methods.bas");}while(r);
S_58311:;
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(28182,13150,"ide_methods.bas");if(r)goto S_58311;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*_SUB_IDESHOWTEXT_LONG_IDECY_I+ 1 ;
if(!qbevent)break;evnt(28182,13150,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6877;
if(!qbevent)break;evnt(28182,13150,"ide_methods.bas");}while(r);
}
fornext_continue_6877:;
}
fornext_exit_6877:;
S_58316:;
if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13152,"ide_methods.bas");if(r)goto S_58316;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 1 ;
if(!qbevent)break;evnt(28182,13152,"ide_methods.bas");}while(r);
}
S_58319:;
fornext_value6882=*__LONG_IDECY+ 1 ;
fornext_finalvalue6882=*__LONG_IDEN;
fornext_step6882= 1 ;
if (fornext_step6882<0) fornext_step_negative6882=1; else fornext_step_negative6882=0;
if (is_error_pending()) goto fornext_error6882;
goto fornext_entrylabel6882;
while(1){
fornext_value6882=fornext_step6882+(*_SUB_IDESHOWTEXT_LONG_IDECY_I);
fornext_entrylabel6882:
*_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value6882;
if (fornext_step_negative6882){
if (fornext_value6882<fornext_finalvalue6882) break;
}else{
if (fornext_value6882>fornext_finalvalue6882) break;
}
fornext_error6882:;
if(qbevent){evnt(28182,13155,"ide_methods.bas");if(r)goto S_58319;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13156,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6884=_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(28182,13157,"ide_methods.bas");}while(r);
S_58322:;
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(28182,13158,"ide_methods.bas");if(r)goto S_58322;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND=*_SUB_IDESHOWTEXT_LONG_IDECY_I;
if(!qbevent)break;evnt(28182,13158,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6881;
if(!qbevent)break;evnt(28182,13158,"ide_methods.bas");}while(r);
}
fornext_continue_6881:;
}
fornext_exit_6881:;
S_58327:;
if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13160,"ide_methods.bas");if(r)goto S_58327;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*__LONG_IDEN;
if(!qbevent)break;evnt(28182,13160,"ide_methods.bas");}while(r);
}
}else{
S_58331:;
if ((-(*__LONG_IDECY> 1 ))||is_error_pending()){
if(qbevent){evnt(28182,13162,"ide_methods.bas");if(r)goto S_58331;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(&(pass6885=*__LONG_IDECY- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13162,"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(28182,13162,"ide_methods.bas");}while(r);
}
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6887=_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(28182,13163,"ide_methods.bas");}while(r);
S_58337:;
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(28182,13164,"ide_methods.bas");if(r)goto S_58337;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINEEND=*__LONG_IDECY;
if(!qbevent)break;evnt(28182,13165,"ide_methods.bas");}while(r);
S_58339:;
fornext_value6889=*__LONG_IDECY- 1 ;
fornext_finalvalue6889= 1 ;
fornext_step6889= -1 ;
if (fornext_step6889<0) fornext_step_negative6889=1; else fornext_step_negative6889=0;
if (is_error_pending()) goto fornext_error6889;
goto fornext_entrylabel6889;
while(1){
fornext_value6889=fornext_step6889+(*_SUB_IDESHOWTEXT_LONG_IDECY_I);
fornext_entrylabel6889:
*_SUB_IDESHOWTEXT_LONG_IDECY_I=fornext_value6889;
if (fornext_step_negative6889){
if (fornext_value6889<fornext_finalvalue6889) break;
}else{
if (fornext_value6889>fornext_finalvalue6889) break;
}
fornext_error6889:;
if(qbevent){evnt(28182,13168,"ide_methods.bas");if(r)goto S_58339;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_IDECY_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13169,"ide_methods.bas");}while(r);
do{
SUB_FINDQUOTECOMMENT(_SUB_IDESHOWTEXT_STRING_B,&(pass6891=_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(28182,13170,"ide_methods.bas");}while(r);
S_58342:;
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(28182,13171,"ide_methods.bas");if(r)goto S_58342;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART=*_SUB_IDESHOWTEXT_LONG_IDECY_I+ 1 ;
if(!qbevent)break;evnt(28182,13171,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6888;
if(!qbevent)break;evnt(28182,13171,"ide_methods.bas");}while(r);
}
fornext_continue_6888:;
}
fornext_exit_6888:;
S_58347:;
if ((-(*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13173,"ide_methods.bas");if(r)goto S_58347;}
do{
*_SUB_IDESHOWTEXT_LONG_IDECY_MULTILINESTART= 1 ;
if(!qbevent)break;evnt(28182,13173,"ide_methods.bas");}while(r);
}
}
}
S_58352:;
if ((-(*__LONG_IDECY> 1 ))||is_error_pending()){
if(qbevent){evnt(28182,13177,"ide_methods.bas");if(r)goto S_58352;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,FUNC_IDEGETLINE(&(pass6892=*__LONG_IDECY- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13177,"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(28182,13177,"ide_methods.bas");}while(r);
}
do{
*__LONG_ACTIVEINCLUDELINK= 0 ;
if(!qbevent)break;evnt(28182,13179,"ide_methods.bas");}while(r);
S_58358:;
if ((*__INTEGER_IDECHANGEMADE)||is_error_pending()){
if(qbevent){evnt(28182,13180,"ide_methods.bas");if(r)goto S_58358;}
do{
*__LONG_IDEFOCUSLINE= 0 ;
if(!qbevent)break;evnt(28182,13180,"ide_methods.bas");}while(r);
}
S_58361:;
fornext_value6894= 0 ;
fornext_finalvalue6894=(*__LONG_IDEWY- 9 );
fornext_step6894= 1 ;
if (fornext_step6894<0) fornext_step_negative6894=1; else fornext_step_negative6894=0;
if (is_error_pending()) goto fornext_error6894;
goto fornext_entrylabel6894;
while(1){
fornext_value6894=fornext_step6894+(*_SUB_IDESHOWTEXT_LONG_Y);
fornext_entrylabel6894:
*_SUB_IDESHOWTEXT_LONG_Y=fornext_value6894;
if (fornext_step_negative6894){
if (fornext_value6894<fornext_finalvalue6894) break;
}else{
if (fornext_value6894>fornext_finalvalue6894) break;
}
fornext_error6894:;
if(qbevent){evnt(28182,13182,"ide_methods.bas");if(r)goto S_58361;}
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13183,"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(28182,13184,"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(28182,13186,"ide_methods.bas");}while(r);
S_58365:;
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(28182,13188,"ide_methods.bas");if(r)goto S_58365;}
do{
qbg_sub_color( 7 , 4 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13189,"ide_methods.bas");}while(r);
S_58367:;
}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(28182,13190,"ide_methods.bas");if(r)goto S_58367;}
S_58368:;
if (((-(*__BYTE_HIDECURRENTLINEHIGHLIGHT== 0 ))&(-(*__LONG_IDESYSTEM== 1 )))||is_error_pending()){
if(qbevent){evnt(28182,13191,"ide_methods.bas");if(r)goto S_58368;}
do{
qbg_sub_color( 7 , 6 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13191,"ide_methods.bas");}while(r);
}
}else{
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13193,"ide_methods.bas");}while(r);
}
}
S_58374:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(28182,13196,"ide_methods.bas");if(r)goto S_58374;}
S_58375:;
while((!(-(*_SUB_IDESHOWTEXT_LONG_L<func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1))))||is_error_pending()){
if(qbevent){evnt(28182,13197,"ide_methods.bas");if(r)goto S_58375;}
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(28182,13198,"ide_methods.bas");}while(r);
dl_continue_6895:;
}
dl_exit_6895:;
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13201,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_LINK_IDECX= 0 ;
if(!qbevent)break;evnt(28182,13202,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX= 0 ;
if(!qbevent)break;evnt(28182,13203,"ide_methods.bas");}while(r);
S_58381:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||is_error_pending()){
if(qbevent){evnt(28182,13204,"ide_methods.bas");if(r)goto S_58381;}
S_58382:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX<=_SUB_IDESHOWTEXT_STRING_A->len))&(-(*__LONG_IDECX>= 1 ))))||is_error_pending()){
if(qbevent){evnt(28182,13205,"ide_methods.bas");if(r)goto S_58382;}
do{
*_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13206,"ide_methods.bas");}while(r);
S_58384:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||is_error_pending()){
if(qbevent){evnt(28182,13207,"ide_methods.bas");if(r)goto S_58384;}
S_58385:;
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(28182,13208,"ide_methods.bas");if(r)goto S_58385;}
do{
*_SUB_IDESHOWTEXT_LONG_CC= -1 ;
if(!qbevent)break;evnt(28182,13208,"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(28182,13214,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT=*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_COMMENT;
if(!qbevent)break;evnt(28182,13215,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE=*_SUB_IDESHOWTEXT_BYTE_IDESHOWTEXT_QUOTE;
if(!qbevent)break;evnt(28182,13216,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 0 ;
if(!qbevent)break;evnt(28182,13219,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1= 0 ;
if(!qbevent)break;evnt(28182,13220,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2= 0 ;
if(!qbevent)break;evnt(28182,13221,"ide_methods.bas");}while(r);
S_58396:;
if (((-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 )))&*__BYTE_BRACKETHIGHLIGHT)||is_error_pending()){
if(qbevent){evnt(28182,13222,"ide_methods.bas");if(r)goto S_58396;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE= 0 ;
if(!qbevent)break;evnt(28182,13223,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= 0 ;
if(!qbevent)break;evnt(28182,13224,"ide_methods.bas");}while(r);
S_58399:;
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(28182,13225,"ide_methods.bas");if(r)goto S_58399;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(28182,13226,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1=*__LONG_IDECX;
if(!qbevent)break;evnt(28182,13227,"ide_methods.bas");}while(r);
LABEL_SCANBRACKET2:;
if(qbevent){evnt(28182,13228,"ide_methods.bas");r=0;}
S_58402:;
fornext_value6898=*_SUB_IDESHOWTEXT_LONG_BRACKET1+ 1 ;
fornext_finalvalue6898=_SUB_IDESHOWTEXT_STRING_A->len;
fornext_step6898= 1 ;
if (fornext_step6898<0) fornext_step_negative6898=1; else fornext_step_negative6898=0;
if (is_error_pending()) goto fornext_error6898;
goto fornext_entrylabel6898;
while(1){
fornext_value6898=fornext_step6898+(*_SUB_IDESHOWTEXT_LONG_K);
fornext_entrylabel6898:
*_SUB_IDESHOWTEXT_LONG_K=fornext_value6898;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6898){
if (fornext_value6898<fornext_finalvalue6898) break;
}else{
if (fornext_value6898>fornext_finalvalue6898) break;
}
fornext_error6898:;
if(qbevent){evnt(28182,13229,"ide_methods.bas");if(r)goto S_58402;}
S_58403:;
qbs_set(sc_6900,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(qbevent){evnt(28182,13230,"ide_methods.bas");if(r)goto S_58403;}
S_58404:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6900,func_chr( 34 ))))||is_error_pending()){
if(qbevent){evnt(28182,13231,"ide_methods.bas");if(r)goto S_58404;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE);
if(!qbevent)break;evnt(28182,13232,"ide_methods.bas");}while(r);
sc_ec_385_end:;
goto sc_6900_end;
}
S_58406:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6900,qbs_new_txt_len("'",1))))||is_error_pending()){
if(qbevent){evnt(28182,13233,"ide_methods.bas");if(r)goto S_58406;}
S_58407:;
if ((-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13234,"ide_methods.bas");if(r)goto S_58407;}
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ;
if(!qbevent)break;evnt(28182,13234,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6897;
if(!qbevent)break;evnt(28182,13234,"ide_methods.bas");}while(r);
}
sc_ec_386_end:;
goto sc_6900_end;
}
sc_6900_end:;
S_58412:;
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(28182,13236,"ide_methods.bas");if(r)goto S_58412;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS- 1 ;
if(!qbevent)break;evnt(28182,13237,"ide_methods.bas");}while(r);
S_58414:;
if ((-(*_SUB_IDESHOWTEXT_LONG_BRACKETS== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13238,"ide_methods.bas");if(r)goto S_58414;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2=*_SUB_IDESHOWTEXT_LONG_K;
if(!qbevent)break;evnt(28182,13238,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6897;
if(!qbevent)break;evnt(28182,13238,"ide_methods.bas");}while(r);
}
S_58418:;
}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(28182,13239,"ide_methods.bas");if(r)goto S_58418;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS+ 1 ;
if(!qbevent)break;evnt(28182,13240,"ide_methods.bas");}while(r);
}
}
fornext_continue_6897:;
}
fornext_exit_6897:;
S_58422:;
}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(28182,13243,"ide_methods.bas");if(r)goto S_58422;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(28182,13244,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1=*__LONG_IDECX- 1 ;
if(!qbevent)break;evnt(28182,13245,"ide_methods.bas");}while(r);
do{
goto LABEL_SCANBRACKET2;
if(!qbevent)break;evnt(28182,13246,"ide_methods.bas");}while(r);
S_58426:;
}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(28182,13247,"ide_methods.bas");if(r)goto S_58426;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(28182,13248,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2=*__LONG_IDECX;
if(!qbevent)break;evnt(28182,13249,"ide_methods.bas");}while(r);
LABEL_SCANBRACKET1:;
if(qbevent){evnt(28182,13250,"ide_methods.bas");r=0;}
S_58429:;
fornext_value6902=*_SUB_IDESHOWTEXT_LONG_BRACKET2- 1 ;
fornext_finalvalue6902= 1 ;
fornext_step6902= -1 ;
if (fornext_step6902<0) fornext_step_negative6902=1; else fornext_step_negative6902=0;
if (is_error_pending()) goto fornext_error6902;
goto fornext_entrylabel6902;
while(1){
fornext_value6902=fornext_step6902+(*_SUB_IDESHOWTEXT_LONG_K);
fornext_entrylabel6902:
*_SUB_IDESHOWTEXT_LONG_K=fornext_value6902;
if (fornext_step_negative6902){
if (fornext_value6902<fornext_finalvalue6902) break;
}else{
if (fornext_value6902>fornext_finalvalue6902) break;
}
fornext_error6902:;
if(qbevent){evnt(28182,13251,"ide_methods.bas");if(r)goto S_58429;}
S_58430:;
qbs_set(sc_6903,func_mid(_SUB_IDESHOWTEXT_STRING_A,*_SUB_IDESHOWTEXT_LONG_K, 1 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(qbevent){evnt(28182,13252,"ide_methods.bas");if(r)goto S_58430;}
S_58431:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(sc_6903,func_chr( 34 ))))||is_error_pending()){
if(qbevent){evnt(28182,13253,"ide_methods.bas");if(r)goto S_58431;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE);
if(!qbevent)break;evnt(28182,13254,"ide_methods.bas");}while(r);
sc_ec_387_end:;
goto sc_6903_end;
}
sc_6903_end:;
S_58434:;
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(28182,13256,"ide_methods.bas");if(r)goto S_58434;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS- 1 ;
if(!qbevent)break;evnt(28182,13257,"ide_methods.bas");}while(r);
S_58436:;
if ((-(*_SUB_IDESHOWTEXT_LONG_BRACKETS== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13258,"ide_methods.bas");if(r)goto S_58436;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET1=*_SUB_IDESHOWTEXT_LONG_K;
if(!qbevent)break;evnt(28182,13258,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6901;
if(!qbevent)break;evnt(28182,13258,"ide_methods.bas");}while(r);
}
S_58440:;
}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(28182,13259,"ide_methods.bas");if(r)goto S_58440;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS=*_SUB_IDESHOWTEXT_LONG_BRACKETS+ 1 ;
if(!qbevent)break;evnt(28182,13260,"ide_methods.bas");}while(r);
}
}
fornext_continue_6901:;
}
fornext_exit_6901:;
S_58444:;
}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(28182,13263,"ide_methods.bas");if(r)goto S_58444;}
do{
*_SUB_IDESHOWTEXT_LONG_BRACKETS= 1 ;
if(!qbevent)break;evnt(28182,13264,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_BRACKET2=*__LONG_IDECX- 1 ;
if(!qbevent)break;evnt(28182,13265,"ide_methods.bas");}while(r);
do{
goto LABEL_SCANBRACKET1;
if(!qbevent)break;evnt(28182,13266,"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(28182,13273,"ide_methods.bas");}while(r);
S_58451:;
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(28182,13275,"ide_methods.bas");if(r)goto S_58451;}
S_58452:;
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(28182,13279,"ide_methods.bas");if(r)goto S_58452;}
do{
*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX=_SUB_IDESHOWTEXT_STRING_A->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13280,"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(28182,13281,"ide_methods.bas");}while(r);
do{
*__BYTE_ENTERINGRGB= -1 ;
if(!qbevent)break;evnt(28182,13282,"ide_methods.bas");}while(r);
}
S_58457:;
}else{
if (-((*_SUB_IDESHOWTEXT_LONG_IDECX_COMMENT+*_SUB_IDESHOWTEXT_LONG_IDECX_QUOTE)==( 0 ))){
if(qbevent){evnt(28182,13284,"ide_methods.bas");if(r)goto S_58457;}
S_58458:;
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(28182,13288,"ide_methods.bas");if(r)goto S_58458;}
S_58459:;
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(28182,13289,"ide_methods.bas");if(r)goto S_58459;}
do{
*__BYTE_ENTERINGRGB= -1 ;
if(!qbevent)break;evnt(28182,13289,"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(28182,13293,"ide_methods.bas");}while(r);
S_58465:;
if ((-(*_SUB_IDESHOWTEXT_LONG_FINDINCLUDE> 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13294,"ide_methods.bas");if(r)goto S_58465;}
do{
*_SUB_IDESHOWTEXT_LONG_LINK_IDECX=_SUB_IDESHOWTEXT_STRING_A->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13295,"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(28182,13296,"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(28182,13297,"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(28182,13298,"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(28182,13299,"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(28182,13300,"ide_methods.bas");}while(r);
S_58472:;
if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_SUB_IDESHOWTEXT_STRING_F)|func__fileexists(__STRING_ACTIVEINCLUDELINKFILE)))||is_error_pending()){
if(qbevent){evnt(28182,13301,"ide_methods.bas");if(r)goto S_58472;}
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(28182,13302,"ide_methods.bas");}while(r);
do{
*__LONG_ACTIVEINCLUDELINK=*__LONG_IDECY;
if(!qbevent)break;evnt(28182,13302,"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(28182,13307,"ide_methods.bas");}while(r);
do{
sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0);
if(!qbevent)break;evnt(28182,13308,"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(28182,13310,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE= 0 ;
if(!qbevent)break;evnt(28182,13314,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= 0 ;
if(!qbevent)break;evnt(28182,13315,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= 0 ;
if(!qbevent)break;evnt(28182,13316,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD= 0 ;
if(!qbevent)break;evnt(28182,13317,"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(28182,13317,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= 0 ;
if(!qbevent)break;evnt(28182,13318,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH= 0 ;
if(!qbevent)break;evnt(28182,13319,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_INTEGER_PREVBG=func__backgroundcolor(NULL,0);
if(!qbevent)break;evnt(28182,13320,"ide_methods.bas");}while(r);
S_58491:;
fornext_value6908= 1 ;
fornext_finalvalue6908=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6908= 1 ;
if (fornext_step6908<0) fornext_step_negative6908=1; else fornext_step_negative6908=0;
if (is_error_pending()) goto fornext_error6908;
goto fornext_entrylabel6908;
while(1){
fornext_value6908=fornext_step6908+(*_SUB_IDESHOWTEXT_LONG_M);
fornext_entrylabel6908:
*_SUB_IDESHOWTEXT_LONG_M=fornext_value6908;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6908){
if (fornext_value6908<fornext_finalvalue6908) break;
}else{
if (fornext_value6908>fornext_finalvalue6908) break;
}
fornext_error6908:;
if(qbevent){evnt(28182,13322,"ide_methods.bas");if(r)goto S_58491;}
S_58492:;
if ((-(((double)(FUNC_TIMEELAPSEDSINCE(_SUB_IDESHOWTEXT_DOUBLE_STARTTIME)))>((double)( 1.0E+0 ))))||is_error_pending()){
if(qbevent){evnt(28182,13323,"ide_methods.bas");if(r)goto S_58492;}
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(28182,13324,"ide_methods.bas");}while(r);
do{
*__BYTE_DISABLESYNTAXHIGHLIGHTER= -1ll ;
if(!qbevent)break;evnt(28182,13325,"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(28182,13326,"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(28182,13327,"ide_methods.bas");}while(r);
do{
goto LABEL_NOSYNTAXHIGHLIGHTING;
if(!qbevent)break;evnt(28182,13328,"ide_methods.bas");}while(r);
}
S_58499:;
if ((-(*_SUB_IDESHOWTEXT_LONG_M>(*__LONG_IDESX+*__LONG_IDEWX- 2 )))||is_error_pending()){
if(qbevent){evnt(28182,13330,"ide_methods.bas");if(r)goto S_58499;}
do{
goto fornext_exit_6907;
if(!qbevent)break;evnt(28182,13330,"ide_methods.bas");}while(r);
}
S_58502:;
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(28182,13331,"ide_methods.bas");if(r)goto S_58502;}
S_58503:;
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(28182,13332,"ide_methods.bas");if(r)goto S_58503;}
S_58504:;
if ((-(*_SUB_IDESHOWTEXT_LONG_M> 1 ))||is_error_pending()){
if(qbevent){evnt(28182,13334,"ide_methods.bas");if(r)goto S_58504;}
S_58505:;
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(28182,13335,"ide_methods.bas");if(r)goto S_58505;}
S_58506:;
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(28182,13338,"ide_methods.bas");if(r)goto S_58506;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13339,"ide_methods.bas");}while(r);
S_58508:;
}else{
if (qbs_cleanup(qbs_tmp_base,-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)>=(_SUB_IDESHOWTEXT_STRING_A2->len)))){
if(qbevent){evnt(28182,13340,"ide_methods.bas");if(r)goto S_58508;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13341,"ide_methods.bas");}while(r);
}
}
}
}else{
S_58513:;
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(28182,13347,"ide_methods.bas");if(r)goto S_58513;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13348,"ide_methods.bas");}while(r);
S_58515:;
}else{
if (qbs_cleanup(qbs_tmp_base,-((*_SUB_IDESHOWTEXT_LONG_M+__STRING_IDECURRENTSINGLELINESELECTION->len)>=(_SUB_IDESHOWTEXT_STRING_A2->len)))){
if(qbevent){evnt(28182,13349,"ide_methods.bas");if(r)goto S_58515;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=__STRING_IDECURRENTSINGLELINESELECTION->len;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13350,"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(28182,13356,"ide_methods.bas");}while(r);
S_58522:;
if ((-(*_SUB_IDESHOWTEXT_LONG_COMMENT== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13358,"ide_methods.bas");if(r)goto S_58522;}
S_58523:;
if(qbevent){evnt(28182,13359,"ide_methods.bas");if(r)goto S_58523;}
S_58524:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_chr( 34 ))))||is_error_pending()){
if(qbevent){evnt(28182,13360,"ide_methods.bas");if(r)goto S_58524;}
do{
*_SUB_IDESHOWTEXT_LONG_INQUOTE=~(*_SUB_IDESHOWTEXT_LONG_INQUOTE);
if(!qbevent)break;evnt(28182,13360,"ide_methods.bas");}while(r);
sc_ec_388_end:;
goto sc_6928_end;
}
S_58526:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,qbs_new_txt_len("'",1))))||is_error_pending()){
if(qbevent){evnt(28182,13361,"ide_methods.bas");if(r)goto S_58526;}
S_58527:;
if ((-(*_SUB_IDESHOWTEXT_LONG_INQUOTE== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13361,"ide_methods.bas");if(r)goto S_58527;}
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ;
if(!qbevent)break;evnt(28182,13361,"ide_methods.bas");}while(r);
}
sc_ec_389_end:;
goto sc_6928_end;
}
sc_6928_end:;
}
do{
qbg_sub_color( 13 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13365,"ide_methods.bas");}while(r);
S_58533:;
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(28182,13367,"ide_methods.bas");if(r)goto S_58533;}
do{
qbg_sub_color( 7 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13367,"ide_methods.bas");}while(r);
do{
goto LABEL_SKIPSYNTAXHIGHLIGHTER;
if(!qbevent)break;evnt(28182,13367,"ide_methods.bas");}while(r);
}
S_58537:;
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(28182,13369,"ide_methods.bas");if(r)goto S_58537;}
S_58538:;
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(28182,13370,"ide_methods.bas");if(r)goto S_58538;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13372,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IS_NUMBER= 0 ;
if(!qbevent)break;evnt(28182,13373,"ide_methods.bas");}while(r);
S_58541:;
fornext_value6931=*_SUB_IDESHOWTEXT_LONG_M;
fornext_finalvalue6931=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6931= 1 ;
if (fornext_step6931<0) fornext_step_negative6931=1; else fornext_step_negative6931=0;
if (is_error_pending()) goto fornext_error6931;
goto fornext_entrylabel6931;
while(1){
fornext_value6931=fornext_step6931+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6931:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6931;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6931){
if (fornext_value6931<fornext_finalvalue6931) break;
}else{
if (fornext_value6931>fornext_finalvalue6931) break;
}
fornext_error6931:;
if(qbevent){evnt(28182,13375,"ide_methods.bas");if(r)goto S_58541;}
S_58542:;
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(28182,13376,"ide_methods.bas");if(r)goto S_58542;}
do{
goto fornext_exit_6930;
if(!qbevent)break;evnt(28182,13376,"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(28182,13377,"ide_methods.bas");}while(r);
fornext_continue_6930:;
}
fornext_exit_6930:;
S_58547:;
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(28182,13380,"ide_methods.bas");if(r)goto S_58547;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13381,"ide_methods.bas");}while(r);
}else{
S_58550:;
if ((qbs_cleanup(qbs_tmp_base,FUNC_ISNUMBER(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD)))||is_error_pending()){
if(qbevent){evnt(28182,13383,"ide_methods.bas");if(r)goto S_58550;}
do{
*_SUB_IDESHOWTEXT_LONG_IS_NUMBER= -1 ;
if(!qbevent)break;evnt(28182,13384,"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(28182,13385,"ide_methods.bas");}while(r);
S_58553:;
}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(28182,13386,"ide_methods.bas");if(r)goto S_58553;}
S_58554:;
fornext_value6935=*_SUB_IDESHOWTEXT_LONG_I;
fornext_finalvalue6935=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6935= 1 ;
if (fornext_step6935<0) fornext_step_negative6935=1; else fornext_step_negative6935=0;
if (is_error_pending()) goto fornext_error6935;
goto fornext_entrylabel6935;
while(1){
fornext_value6935=fornext_step6935+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6935:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6935;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6935){
if (fornext_value6935<fornext_finalvalue6935) break;
}else{
if (fornext_value6935>fornext_finalvalue6935) break;
}
fornext_error6935:;
if(qbevent){evnt(28182,13388,"ide_methods.bas");if(r)goto S_58554;}
S_58555:;
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(28182,13389,"ide_methods.bas");if(r)goto S_58555;}
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(28182,13389,"ide_methods.bas");}while(r);
do{
goto LABEL_KEYWORDACQUIRED;
if(!qbevent)break;evnt(28182,13389,"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(28182,13390,"ide_methods.bas");}while(r);
fornext_continue_6934:;
}
fornext_exit_6934:;
do{
goto LABEL_KEYWORDACQUIRED;
if(!qbevent)break;evnt(28182,13392,"ide_methods.bas");}while(r);
}
}
}
do{
goto LABEL_SETOLDCHAR;
if(!qbevent)break;evnt(28182,13395,"ide_methods.bas");}while(r);
}
S_58566:;
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(28182,13398,"ide_methods.bas");if(r)goto S_58566;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13400,"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(28182,13401,"ide_methods.bas");}while(r);
S_58569:;
fornext_value6938=*_SUB_IDESHOWTEXT_LONG_M;
fornext_finalvalue6938=_SUB_IDESHOWTEXT_STRING_A2->len;
fornext_step6938= 1 ;
if (fornext_step6938<0) fornext_step_negative6938=1; else fornext_step_negative6938=0;
if (is_error_pending()) goto fornext_error6938;
goto fornext_entrylabel6938;
while(1){
fornext_value6938=fornext_step6938+(*_SUB_IDESHOWTEXT_LONG_I);
fornext_entrylabel6938:
*_SUB_IDESHOWTEXT_LONG_I=fornext_value6938;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6938){
if (fornext_value6938<fornext_finalvalue6938) break;
}else{
if (fornext_value6938>fornext_finalvalue6938) break;
}
fornext_error6938:;
if(qbevent){evnt(28182,13402,"ide_methods.bas");if(r)goto S_58569;}
S_58570:;
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(28182,13403,"ide_methods.bas");if(r)goto S_58570;}
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(28182,13403,"ide_methods.bas");}while(r);
do{
goto fornext_exit_6937;
if(!qbevent)break;evnt(28182,13403,"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(28182,13404,"ide_methods.bas");}while(r);
fornext_continue_6937:;
}
fornext_exit_6937:;
S_58576:;
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(28182,13406,"ide_methods.bas");if(r)goto S_58576;}
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD= 1 ;
if(!qbevent)break;evnt(28182,13406,"ide_methods.bas");}while(r);
do{
goto LABEL_SETOLDCHAR;
if(!qbevent)break;evnt(28182,13406,"ide_methods.bas");}while(r);
}
LABEL_KEYWORDACQUIRED:;
if(qbevent){evnt(28182,13407,"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(28182,13408,"ide_methods.bas");}while(r);
S_58581:;
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(28182,13409,"ide_methods.bas");if(r)goto S_58581;}
S_58582:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$END",4))))||is_error_pending()){
if(qbevent){evnt(28182,13411,"ide_methods.bas");if(r)goto S_58582;}
S_58583:;
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(28182,13412,"ide_methods.bas");if(r)goto S_58583;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$END IF",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13412,"ide_methods.bas");}while(r);
}
S_58586:;
}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(28182,13415,"ide_methods.bas");if(r)goto S_58586;}
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= -1 ;
if(!qbevent)break;evnt(28182,13416,"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(28182,13418,"ide_methods.bas");}while(r);
S_58590:;
}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(28182,13419,"ide_methods.bas");if(r)goto S_58590;}
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= -1 ;
if(!qbevent)break;evnt(28182,13420,"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(28182,13421,"ide_methods.bas");}while(r);
S_58593:;
}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(28182,13424,"ide_methods.bas");if(r)goto S_58593;}
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= -1 ;
if(!qbevent)break;evnt(28182,13425,"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(28182,13426,"ide_methods.bas");}while(r);
}
}
}
}
}
LABEL_SETOLDCHAR:;
if(qbevent){evnt(28182,13430,"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(28182,13431,"ide_methods.bas");}while(r);
S_58600:;
if (((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD> 0 ))&*__BYTE_KEYWORDHIGHLIGHT)||is_error_pending()){
if(qbevent){evnt(28182,13433,"ide_methods.bas");if(r)goto S_58600;}
S_58601:;
if ((*_SUB_IDESHOWTEXT_LONG_IS_NUMBER)||is_error_pending()){
if(qbevent){evnt(28182,13434,"ide_methods.bas");if(r)goto S_58601;}
do{
qbg_sub_color( 8 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13435,"ide_methods.bas");}while(r);
S_58603:;
}else{
if (*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD){
if(qbevent){evnt(28182,13436,"ide_methods.bas");if(r)goto S_58603;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13437,"ide_methods.bas");}while(r);
}else{
do{
qbg_sub_color( 12 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13439,"ide_methods.bas");}while(r);
}
}
S_58608:;
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(28182,13441,"ide_methods.bas");if(r)goto S_58608;}
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= -1 ;
if(!qbevent)break;evnt(28182,13441,"ide_methods.bas");}while(r);
}
}
S_58612:;
if ((*_SUB_IDESHOWTEXT_LONG_COMMENT)||is_error_pending()){
if(qbevent){evnt(28182,13444,"ide_methods.bas");if(r)goto S_58612;}
do{
qbg_sub_color( 11 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13445,"ide_methods.bas");}while(r);
S_58614:;
if ((*_SUB_IDESHOWTEXT_LONG_METACOMMAND)||is_error_pending()){
if(qbevent){evnt(28182,13446,"ide_methods.bas");if(r)goto S_58614;}
S_58615:;
if(qbevent){evnt(28182,13447,"ide_methods.bas");if(r)goto S_58615;}
S_58616:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$INCLUDE",8))))||is_error_pending()){
if(qbevent){evnt(28182,13448,"ide_methods.bas");if(r)goto S_58616;}
S_58617:;
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(28182,13449,"ide_methods.bas");if(r)goto S_58617;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13449,"ide_methods.bas");}while(r);
}
sc_ec_390_end:;
goto sc_6943_end;
}
S_58620:;
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(28182,13450,"ide_methods.bas");if(r)goto S_58620;}
S_58621:;
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(28182,13451,"ide_methods.bas");if(r)goto S_58621;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13451,"ide_methods.bas");}while(r);
}
sc_ec_391_end:;
goto sc_6943_end;
}
S_58624:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("$FORMAT",7))))||is_error_pending()){
if(qbevent){evnt(28182,13452,"ide_methods.bas");if(r)goto S_58624;}
S_58625:;
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(28182,13453,"ide_methods.bas");if(r)goto S_58625;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13453,"ide_methods.bas");}while(r);
}
sc_ec_392_end:;
goto sc_6943_end;
}
sc_6943_end:;
}else{
S_58630:;
if(qbevent){evnt(28182,13456,"ide_methods.bas");if(r)goto S_58630;}
S_58631:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("OFF",3))))||is_error_pending()){
if(qbevent){evnt(28182,13457,"ide_methods.bas");if(r)goto S_58631;}
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(28182,13458,"ide_methods.bas");}while(r);
S_58633:;
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(28182,13459,"ide_methods.bas");if(r)goto S_58633;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13459,"ide_methods.bas");}while(r);
}
sc_ec_393_end:;
goto sc_6944_end;
}
S_58636:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("ON",2))))||is_error_pending()){
if(qbevent){evnt(28182,13460,"ide_methods.bas");if(r)goto S_58636;}
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(28182,13461,"ide_methods.bas");}while(r);
S_58638:;
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(28182,13462,"ide_methods.bas");if(r)goto S_58638;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13462,"ide_methods.bas");}while(r);
}
sc_ec_394_end:;
goto sc_6944_end;
}
sc_6944_end:;
}
S_58643:;
}else{
if (*_SUB_IDESHOWTEXT_LONG_METACOMMAND){
if(qbevent){evnt(28182,13465,"ide_methods.bas");if(r)goto S_58643;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13466,"ide_methods.bas");}while(r);
S_58645:;
}else{
if (qbs_cleanup(qbs_tmp_base,*_SUB_IDESHOWTEXT_LONG_INQUOTE|(qbs_equal(_SUB_IDESHOWTEXT_STRING_THISCHAR,func_chr( 34 ))))){
if(qbevent){evnt(28182,13467,"ide_methods.bas");if(r)goto S_58645;}
do{
qbg_sub_color( 14 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13468,"ide_methods.bas");}while(r);
}
}
}
LABEL_SKIPSYNTAXHIGHLIGHTER:;
if(qbevent){evnt(28182,13471,"ide_methods.bas");r=0;}
S_58648:;
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(28182,13473,"ide_methods.bas");if(r)goto S_58648;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13473,"ide_methods.bas");}while(r);
}
S_58651:;
if ((((-(*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX> 0 ))&(-(*_SUB_IDESHOWTEXT_LONG_M>*_SUB_IDESHOWTEXT_LONG_SHIFTENTER_IDECX))))||is_error_pending()){
if(qbevent){evnt(28182,13474,"ide_methods.bas");if(r)goto S_58651;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13474,"ide_methods.bas");}while(r);
}
S_58654:;
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(28182,13476,"ide_methods.bas");if(r)goto S_58654;}
do{
qbg_sub_color(NULL, 5 ,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13477,"ide_methods.bas");}while(r);
S_58656:;
}else{
if ((-(*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH> 0 ))&*__BYTE_MULTIHIGHLIGHT){
if(qbevent){evnt(28182,13478,"ide_methods.bas");if(r)goto S_58656;}
do{
*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH=*_SUB_IDESHOWTEXT_LONG_MULTIHIGHLIGHTLENGTH- 1 ;
if(!qbevent)break;evnt(28182,13479,"ide_methods.bas");}while(r);
do{
qbg_sub_color(NULL, 5 ,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13480,"ide_methods.bas");}while(r);
}else{
do{
qbg_sub_color(NULL,*_SUB_IDESHOWTEXT_INTEGER_PREVBG,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13482,"ide_methods.bas");}while(r);
}
}
S_58662:;
if ((*__BYTE_SHOWLINENUMBERS)||is_error_pending()){
if(qbevent){evnt(28182,13485,"ide_methods.bas");if(r)goto S_58662;}
S_58663:;
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(28182,13486,"ide_methods.bas");if(r)goto S_58663;}
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(28182,13487,"ide_methods.bas");}while(r);
}
}else{
S_58667:;
if (((-(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)>=( 2 )))&(-(( 2 +*_SUB_IDESHOWTEXT_LONG_M-*__LONG_IDESX)<*__LONG_IDEWX)))||is_error_pending()){
if(qbevent){evnt(28182,13490,"ide_methods.bas");if(r)goto S_58667;}
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(28182,13491,"ide_methods.bas");}while(r);
}
}
S_58671:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||is_error_pending()){
if(qbevent){evnt(28182,13496,"ide_methods.bas");if(r)goto S_58671;}
do{
qbg_sub_color(NULL, 6 ,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13496,"ide_methods.bas");}while(r);
}
S_58674:;
if ((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD> 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13497,"ide_methods.bas");if(r)goto S_58674;}
do{
*_SUB_IDESHOWTEXT_LONG_ISKEYWORD=*_SUB_IDESHOWTEXT_LONG_ISKEYWORD- 1 ;
if(!qbevent)break;evnt(28182,13497,"ide_methods.bas");}while(r);
}
S_58677:;
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(28182,13498,"ide_methods.bas");if(r)goto S_58677;}
do{
*_SUB_IDESHOWTEXT_LONG_COMMENT= -1 ;
if(!qbevent)break;evnt(28182,13498,"ide_methods.bas");}while(r);
}
S_58680:;
if ((-(*_SUB_IDESHOWTEXT_LONG_ISKEYWORD== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13499,"ide_methods.bas");if(r)goto S_58680;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_CHECKKEYWORD,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13499,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_METACOMMAND= 0 ;
if(!qbevent)break;evnt(28182,13499,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_IS_NUMBER= 0 ;
if(!qbevent)break;evnt(28182,13499,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_ISCUSTOMKEYWORD= 0 ;
if(!qbevent)break;evnt(28182,13499,"ide_methods.bas");}while(r);
}
fornext_continue_6907:;
}
fornext_exit_6907:;
S_58687:;
if (((((-(*__LONG_IDESYSTEM== 1 ))|(-(*__LONG_IDESYSTEM== 2 ))))&(-(*__LONG_IDESELECT!= 0 )))||is_error_pending()){
if(qbevent){evnt(28182,13503,"ide_methods.bas");if(r)goto S_58687;}
S_58688:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||is_error_pending()){
if(qbevent){evnt(28182,13504,"ide_methods.bas");if(r)goto S_58688;}
S_58689:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(28182,13505,"ide_methods.bas");if(r)goto S_58689;}
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13506,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX;
if(!qbevent)break;evnt(28182,13507,"ide_methods.bas");}while(r);
S_58692:;
fornext_value6946= 2 +*__LONG_MAXLINENUMBERLENGTH;
fornext_finalvalue6946=(*__LONG_IDEWX- 1 );
fornext_step6946= 1 ;
if (fornext_step6946<0) fornext_step_negative6946=1; else fornext_step_negative6946=0;
if (is_error_pending()) goto fornext_error6946;
goto fornext_entrylabel6946;
while(1){
fornext_value6946=fornext_step6946+(*_SUB_IDESHOWTEXT_LONG_X);
fornext_entrylabel6946:
*_SUB_IDESHOWTEXT_LONG_X=fornext_value6946;
if (fornext_step_negative6946){
if (fornext_value6946<fornext_finalvalue6946) break;
}else{
if (fornext_value6946>fornext_finalvalue6946) break;
}
fornext_error6946:;
if(qbevent){evnt(28182,13508,"ide_methods.bas");if(r)goto S_58692;}
S_58693:;
if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||is_error_pending()){
if(qbevent){evnt(28182,13509,"ide_methods.bas");if(r)goto S_58693;}
do{
*_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0);
if(!qbevent)break;evnt(28182,13510,"ide_methods.bas");}while(r);
S_58695:;
if ((-(*_SUB_IDESHOWTEXT_LONG_A== 63 ))||is_error_pending()){
if(qbevent){evnt(28182,13512,"ide_methods.bas");if(r)goto S_58695;}
do{
*_SUB_IDESHOWTEXT_LONG_C=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X, 1 ,0|1);
if(!qbevent)break;evnt(28182,13513,"ide_methods.bas");}while(r);
}else{
do{
*_SUB_IDESHOWTEXT_LONG_C= 1 ;
if(!qbevent)break;evnt(28182,13515,"ide_methods.bas");}while(r);
}
S_58700:;
if ((-((*_SUB_IDESHOWTEXT_LONG_C& 15 )== 0 ))||is_error_pending()){
if(qbevent){evnt(28182,13517,"ide_methods.bas");if(r)goto S_58700;}
do{
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13518,"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(28182,13519,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13520,"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(28182,13522,"ide_methods.bas");}while(r);
}
}
do{
*_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ;
if(!qbevent)break;evnt(28182,13527,"ide_methods.bas");}while(r);
fornext_continue_6945:;
}
fornext_exit_6945:;
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13529,"ide_methods.bas");}while(r);
}else{
S_58712:;
if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||is_error_pending()){
if(qbevent){evnt(28182,13531,"ide_methods.bas");if(r)goto S_58712;}
do{
goto LABEL_NOFINALSELECT;
if(!qbevent)break;evnt(28182,13531,"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(28182,13532,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13533,"ide_methods.bas");}while(r);
S_58717:;
fornext_value6948=*__LONG_IDESX;
fornext_finalvalue6948=*__LONG_IDESX+*__LONG_IDEWX-( 2 +*__LONG_MAXLINENUMBERLENGTH);
fornext_step6948= 1 ;
if (fornext_step6948<0) fornext_step_negative6948=1; else fornext_step_negative6948=0;
if (is_error_pending()) goto fornext_error6948;
goto fornext_entrylabel6948;
while(1){
fornext_value6948=fornext_step6948+(*_SUB_IDESHOWTEXT_LONG_X);
fornext_entrylabel6948:
*_SUB_IDESHOWTEXT_LONG_X=fornext_value6948;
if (fornext_step_negative6948){
if (fornext_value6948<fornext_finalvalue6948) break;
}else{
if (fornext_value6948>fornext_finalvalue6948) break;
}
fornext_error6948:;
if(qbevent){evnt(28182,13535,"ide_methods.bas");if(r)goto S_58717;}
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 skip6949;
makefit(tqbs);
qbs_print(tqbs,0);
skip6949:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13536,"ide_methods.bas");}while(r);
fornext_continue_6947:;
}
fornext_exit_6947:;
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13539,"ide_methods.bas");}while(r);
LABEL_NOFINALSELECT:;
if(qbevent){evnt(28182,13540,"ide_methods.bas");r=0;}
}
}
}
do{
*_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ;
if(!qbevent)break;evnt(28182,13545,"ide_methods.bas");}while(r);
fornext_continue_6893:;
}
fornext_exit_6893:;
}else{
LABEL_NOSYNTAXHIGHLIGHTING:;
if(qbevent){evnt(28182,13548,"ide_methods.bas");r=0;}
S_58727:;
if ((*__INTEGER_IDECHANGEMADE)||is_error_pending()){
if(qbevent){evnt(28182,13550,"ide_methods.bas");if(r)goto S_58727;}
do{
*__LONG_IDEFOCUSLINE= 0 ;
if(!qbevent)break;evnt(28182,13550,"ide_methods.bas");}while(r);
}
do{
qbg_sub_color( 13 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13551,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_L=*__LONG_IDESY;
if(!qbevent)break;evnt(28182,13552,"ide_methods.bas");}while(r);
S_58732:;
fornext_value6951= 0 ;
fornext_finalvalue6951=(*__LONG_IDEWY- 9 );
fornext_step6951= 1 ;
if (fornext_step6951<0) fornext_step_negative6951=1; else fornext_step_negative6951=0;
if (is_error_pending()) goto fornext_error6951;
goto fornext_entrylabel6951;
while(1){
fornext_value6951=fornext_step6951+(*_SUB_IDESHOWTEXT_LONG_Y);
fornext_entrylabel6951:
*_SUB_IDESHOWTEXT_LONG_Y=fornext_value6951;
if (fornext_step_negative6951){
if (fornext_value6951<fornext_finalvalue6951) break;
}else{
if (fornext_value6951>fornext_finalvalue6951) break;
}
fornext_error6951:;
if(qbevent){evnt(28182,13553,"ide_methods.bas");if(r)goto S_58732;}
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13554,"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(28182,13555,"ide_methods.bas");}while(r);
do{
return_point[next_return_point++]=173;
if (next_return_point>=return_points) more_return_points();
goto LABEL_SHOWLINENUMBER;
RETURN_173:;
if(!qbevent)break;evnt(28182,13557,"ide_methods.bas");}while(r);
S_58736:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDEFOCUSLINE))&(-(*__LONG_IDECY!=*_SUB_IDESHOWTEXT_LONG_L)))||is_error_pending()){
if(qbevent){evnt(28182,13559,"ide_methods.bas");if(r)goto S_58736;}
do{
qbg_sub_color( 13 , 4 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13559,"ide_methods.bas");}while(r);
}else{
do{
qbg_sub_color( 13 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13559,"ide_methods.bas");}while(r);
}
S_58741:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(28182,13561,"ide_methods.bas");if(r)goto S_58741;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_A,FUNC_IDEGETLINE(_SUB_IDESHOWTEXT_LONG_L));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13562,"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(28182,13563,"ide_methods.bas");}while(r);
do{
sub_mid(_SUB_IDESHOWTEXT_STRING_A2, 1 ,0,_SUB_IDESHOWTEXT_STRING_A,0);
if(!qbevent)break;evnt(28182,13564,"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(28182,13565,"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(28182,13567,"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(28182,13569,"ide_methods.bas");}while(r);
S_58750:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_IDECY))||is_error_pending()){
if(qbevent){evnt(28182,13571,"ide_methods.bas");if(r)goto S_58750;}
S_58751:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDECX<=_SUB_IDESHOWTEXT_STRING_A->len))&(-(*__LONG_IDECX>= 1 ))))||is_error_pending()){
if(qbevent){evnt(28182,13572,"ide_methods.bas");if(r)goto S_58751;}
do{
*_SUB_IDESHOWTEXT_LONG_CC=qbs_asc(_SUB_IDESHOWTEXT_STRING_A,*__LONG_IDECX);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13573,"ide_methods.bas");}while(r);
S_58753:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CC== 32 ))||is_error_pending()){
if(qbevent){evnt(28182,13574,"ide_methods.bas");if(r)goto S_58753;}
S_58754:;
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(28182,13575,"ide_methods.bas");if(r)goto S_58754;}
do{
*_SUB_IDESHOWTEXT_LONG_CC= -1 ;
if(!qbevent)break;evnt(28182,13575,"ide_methods.bas");}while(r);
}
}
}
}
S_58760:;
if ((*__LONG_IDESELECT)||is_error_pending()){
if(qbevent){evnt(28182,13581,"ide_methods.bas");if(r)goto S_58760;}
S_58761:;
if (((-(*_SUB_IDESHOWTEXT_LONG_L>=*_SUB_IDESHOWTEXT_LONG_SY1))&(-(*_SUB_IDESHOWTEXT_LONG_L<=*_SUB_IDESHOWTEXT_LONG_SY2)))||is_error_pending()){
if(qbevent){evnt(28182,13582,"ide_methods.bas");if(r)goto S_58761;}
S_58762:;
if ((-(*_SUB_IDESHOWTEXT_LONG_SY1==*_SUB_IDESHOWTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(28182,13583,"ide_methods.bas");if(r)goto S_58762;}
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13584,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_X2=*__LONG_IDESX;
if(!qbevent)break;evnt(28182,13585,"ide_methods.bas");}while(r);
S_58765:;
fornext_value6954= 2 +*__LONG_MAXLINENUMBERLENGTH;
fornext_finalvalue6954=(*__LONG_IDEWX- 1 );
fornext_step6954= 1 ;
if (fornext_step6954<0) fornext_step_negative6954=1; else fornext_step_negative6954=0;
if (is_error_pending()) goto fornext_error6954;
goto fornext_entrylabel6954;
while(1){
fornext_value6954=fornext_step6954+(*_SUB_IDESHOWTEXT_LONG_X);
fornext_entrylabel6954:
*_SUB_IDESHOWTEXT_LONG_X=fornext_value6954;
if (fornext_step_negative6954){
if (fornext_value6954<fornext_finalvalue6954) break;
}else{
if (fornext_value6954>fornext_finalvalue6954) break;
}
fornext_error6954:;
if(qbevent){evnt(28182,13586,"ide_methods.bas");if(r)goto S_58765;}
S_58766:;
if (((-(*_SUB_IDESHOWTEXT_LONG_X2>=*_SUB_IDESHOWTEXT_LONG_SX1))&(-(*_SUB_IDESHOWTEXT_LONG_X2<*_SUB_IDESHOWTEXT_LONG_SX2)))||is_error_pending()){
if(qbevent){evnt(28182,13587,"ide_methods.bas");if(r)goto S_58766;}
do{
*_SUB_IDESHOWTEXT_LONG_A=func_screen(*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,*_SUB_IDESHOWTEXT_LONG_X,NULL,0);
if(!qbevent)break;evnt(28182,13588,"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(28182,13588,"ide_methods.bas");}while(r);
}
do{
*_SUB_IDESHOWTEXT_LONG_X2=*_SUB_IDESHOWTEXT_LONG_X2+ 1 ;
if(!qbevent)break;evnt(28182,13590,"ide_methods.bas");}while(r);
fornext_continue_6953:;
}
fornext_exit_6953:;
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13592,"ide_methods.bas");}while(r);
}else{
S_58774:;
if (((-(*__LONG_IDECX== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*_SUB_IDESHOWTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_SUB_IDESHOWTEXT_LONG_SY1)))||is_error_pending()){
if(qbevent){evnt(28182,13594,"ide_methods.bas");if(r)goto S_58774;}
do{
goto LABEL_NOFINALSELECT0;
if(!qbevent)break;evnt(28182,13594,"ide_methods.bas");}while(r);
}
do{
qbg_sub_color( 1 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13595,"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(28182,13595,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13596,"ide_methods.bas");}while(r);
LABEL_NOFINALSELECT0:;
if(qbevent){evnt(28182,13597,"ide_methods.bas");r=0;}
}
}
}
do{
*_SUB_IDESHOWTEXT_LONG_L=*_SUB_IDESHOWTEXT_LONG_L+ 1 ;
if(!qbevent)break;evnt(28182,13602,"ide_methods.bas");}while(r);
fornext_continue_6950:;
}
fornext_exit_6950:;
}
do{
qbg_sub_color( 7 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13606,"ide_methods.bas");}while(r);
S_58787:;
fornext_value6956= 1 ;
fornext_finalvalue6956=*__LONG_IDEBMKN;
fornext_step6956= 1 ;
if (fornext_step6956<0) fornext_step_negative6956=1; else fornext_step_negative6956=0;
if (is_error_pending()) goto fornext_error6956;
goto fornext_entrylabel6956;
while(1){
fornext_value6956=fornext_step6956+(*_SUB_IDESHOWTEXT_LONG_B);
fornext_entrylabel6956:
*_SUB_IDESHOWTEXT_LONG_B=fornext_value6956;
if (fornext_step_negative6956){
if (fornext_value6956<fornext_finalvalue6956) break;
}else{
if (fornext_value6956>fornext_finalvalue6956) break;
}
fornext_error6956:;
if(qbevent){evnt(28182,13607,"ide_methods.bas");if(r)goto S_58787;}
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(28182,13608,"ide_methods.bas");}while(r);
S_58789:;
if (((-(*_SUB_IDESHOWTEXT_LONG_Y>=*__LONG_IDESY))&(-(*_SUB_IDESHOWTEXT_LONG_Y<=(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||is_error_pending()){
if(qbevent){evnt(28182,13609,"ide_methods.bas");if(r)goto S_58789;}
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(28182,13610,"ide_methods.bas");}while(r);
}
fornext_continue_6955:;
}
fornext_exit_6955:;
do{
*_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEVBAR(__LONG_IDEWX,&(pass6957= 3 ),&(pass6958=(*__LONG_IDEWY- 8 )),__LONG_IDECY,__LONG_IDEN);
if(!qbevent)break;evnt(28182,13614,"ide_methods.bas");}while(r);
do{
*_SUB_IDESHOWTEXT_LONG_Q=FUNC_IDEHBAR(&(pass6959= 2 ),&(pass6960=(*__LONG_IDEWY- 5 )),&(pass6961=(*__LONG_IDEWX- 2 )),__LONG_IDESX,&(pass6962= 608 ));
if(!qbevent)break;evnt(28182,13615,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 0 , 3 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13618,"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(28182,13619,"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(28182,13620,"ide_methods.bas");}while(r);
do{
sub_rset(_SUB_IDESHOWTEXT_STRING_A,qbs__tostr((int32)(*__LONG_IDECY),NULL,0));
if(!qbevent)break;evnt(28182,13621,"ide_methods.bas");}while(r);
S_58799:;
if ((-(*__LONG_IDECX< 100000 ))||is_error_pending()){
if(qbevent){evnt(28182,13622,"ide_methods.bas");if(r)goto S_58799;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_B,func_space( 10 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13623,"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(28182,13624,"ide_methods.bas");}while(r);
S_58802:;
if ((-(*_SUB_IDESHOWTEXT_LONG_CC!= -1 ))||is_error_pending()){
if(qbevent){evnt(28182,13625,"ide_methods.bas");if(r)goto S_58802;}
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(28182,13625,"ide_methods.bas");}while(r);
}
do{
sub_lset(_SUB_IDESHOWTEXT_STRING_B,_SUB_IDESHOWTEXT_STRING_C);
if(!qbevent)break;evnt(28182,13626,"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(28182,13628,"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(28182,13630,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(28182,13632,"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(28182,13632,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 3 , 0 ,NULL,12);
if(!qbevent)break;evnt(28182,13632,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,13634,"ide_methods.bas");}while(r);
LABEL_SHOWLINENUMBER:;
if(qbevent){evnt(28182,13635,"ide_methods.bas");r=0;}
S_58813:;
while((-(*_SUB_IDESHOWTEXT_LONG_L>func_ubound(__ARRAY_BYTE_IDEBREAKPOINTS,1,1)))||is_error_pending()){
if(qbevent){evnt(28182,13636,"ide_methods.bas");if(r)goto S_58813;}
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(28182,13637,"ide_methods.bas");}while(r);
dl_continue_6963:;
}
dl_exit_6963:;
S_58816:;
while((-(*_SUB_IDESHOWTEXT_LONG_L>func_ubound(__ARRAY_BYTE_IDESKIPLINES,1,1)))||is_error_pending()){
if(qbevent){evnt(28182,13640,"ide_methods.bas");if(r)goto S_58816;}
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(28182,13641,"ide_methods.bas");}while(r);
dl_continue_6964:;
}
dl_exit_6964:;
S_58819:;
if ((*__BYTE_SHOWLINENUMBERS)||is_error_pending()){
if(qbevent){evnt(28182,13644,"ide_methods.bas");if(r)goto S_58819;}
S_58820:;
if ((*__BYTE_SHOWLINENUMBERSUSEBG)||is_error_pending()){
if(qbevent){evnt(28182,13645,"ide_methods.bas");if(r)goto S_58820;}
do{
qbg_sub_color(NULL, 6 ,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13645,"ide_methods.bas");}while(r);
}
S_58823:;
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(28182,13646,"ide_methods.bas");if(r)goto S_58823;}
do{
qbg_sub_color( 13 , 5 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13647,"ide_methods.bas");}while(r);
S_58825:;
if (((-(*__LONG_SEARCHSTRINGFOUNDON> 0 ))&(-(*__LONG_SEARCHSTRINGFOUNDON==*_SUB_IDESHOWTEXT_LONG_L)))||is_error_pending()){
if(qbevent){evnt(28182,13648,"ide_methods.bas");if(r)goto S_58825;}
do{
*__LONG_SEARCHSTRINGFOUNDON= 0 ;
if(!qbevent)break;evnt(28182,13648,"ide_methods.bas");}while(r);
}
}
S_58829:;
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(28182,13650,"ide_methods.bas");if(r)goto S_58829;}
do{
qbg_sub_color(NULL, 4 ,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13650,"ide_methods.bas");}while(r);
}
S_58832:;
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(28182,13651,"ide_methods.bas");if(r)goto S_58832;}
do{
qbg_sub_color( 14 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13651,"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(28182,13652,"ide_methods.bas");}while(r);
S_58836:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(28182,13653,"ide_methods.bas");if(r)goto S_58836;}
do{
qbs_set(_SUB_IDESHOWTEXT_STRING_L2,qbs_str((int32)(*_SUB_IDESHOWTEXT_LONG_L)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13654,"ide_methods.bas");}while(r);
S_58838:;
if ((qbs_cleanup(qbs_tmp_base,-(( 2 +*__LONG_MAXLINENUMBERLENGTH-(_SUB_IDESHOWTEXT_STRING_L2->len+ 1 ))>=( 2 ))))||is_error_pending()){
if(qbevent){evnt(28182,13655,"ide_methods.bas");if(r)goto S_58838;}
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(28182,13656,"ide_methods.bas");}while(r);
S_58840:;
if ((FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) )))||is_error_pending()){
if(qbevent){evnt(28182,13657,"ide_methods.bas");if(r)goto S_58840;}
S_58841:;
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(28182,13658,"ide_methods.bas");if(r)goto S_58841;}
do{
sub__printstring( 2 ,*_SUB_IDESHOWTEXT_LONG_Y+ 3 ,func_chr( 7 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,13659,"ide_methods.bas");}while(r);
S_58843:;
}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(28182,13660,"ide_methods.bas");if(r)goto S_58843;}
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(28182,13661,"ide_methods.bas");}while(r);
}
}
}
}
}
S_58849:;
if ((*__BYTE_SHOWLINENUMBERSSEPARATOR)||is_error_pending()){
if(qbevent){evnt(28182,13666,"ide_methods.bas");if(r)goto S_58849;}
S_58850:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||is_error_pending()){
if(qbevent){evnt(28182,13667,"ide_methods.bas");if(r)goto S_58850;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13668,"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(28182,13669,"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(28182,13671,"ide_methods.bas");}while(r);
}
}else{
S_58857:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||is_error_pending()){
if(qbevent){evnt(28182,13674,"ide_methods.bas");if(r)goto S_58857;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13675,"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(28182,13676,"ide_methods.bas");}while(r);
}
}
do{
qbg_sub_color(NULL, 1 ,NULL,NULL,2);
if(!qbevent)break;evnt(28182,13679,"ide_methods.bas");}while(r);
}else{
S_58864:;
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(28182,13681,"ide_methods.bas");if(r)goto S_58864;}
do{
qbg_sub_color( 7 , 4 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13682,"ide_methods.bas");}while(r);
S_58866:;
if ((-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))||is_error_pending()){
if(qbevent){evnt(28182,13683,"ide_methods.bas");if(r)goto S_58866;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13684,"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(28182,13685,"ide_methods.bas");}while(r);
S_58869:;
}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(28182,13686,"ide_methods.bas");if(r)goto S_58869;}
do{
qbg_sub_color( 14 , 1 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,13687,"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(28182,13688,"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(28182,13690,"ide_methods.bas");}while(r);
}
}
S_58875:;
}else{
if ((-(FUNC_GETRCSTATEVAR((void*)( ((char*)(__UDT_VWATCHON)) + ((0+0)) ))== 1 ))&(-(*_SUB_IDESHOWTEXT_LONG_L==*__LONG_DEBUGNEXTLINE))){
if(qbevent){evnt(28182,13692,"ide_methods.bas");if(r)goto S_58875;}
do{
qbg_sub_color( 10 ,NULL,NULL,NULL,1);
if(!qbevent)break;evnt(28182,13693,"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(28182,13694,"ide_methods.bas");}while(r);
}
}
}
do{
#include "ret379.txt"
if(!qbevent)break;evnt(28182,13697,"ide_methods.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free379.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;
}
