qbs* FUNC_IDEASCIIBOX(int32*_FUNC_IDEASCIIBOX_LONG_RELAUNCH){
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 "data359.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (is_error_pending()) goto exit_subfunc;
do{
sub_pcopy( 0 , 2 );
if(!qbevent)break;evnt(25769,19710,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(25769,19711,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,19712,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,19713,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,19714,"ide_methods.bas");}while(r);
do{
if (_FUNC_IDEASCIIBOX_ARRAY_UDT_O[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;
if (_FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]&1){
if (!error_occurred) error(10);
}else{
alloc_new_desc[4]= 1 ;
alloc_new_desc[5]=( 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)(101);
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);
if (_FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]) error(257);
memset((void*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]),0,(size_t)alloc_req_bytes);
}else{
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[2]|=1;
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4]=alloc_new_desc[4];
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]=alloc_new_desc[5];
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[6]=alloc_new_desc[6];
_FUNC_IDEASCIIBOX_ARRAY_UDT_O[7]=alloc_new_desc[7];
}
}
if(!qbevent)break;evnt(25769,19715,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,19716,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEASCIIBOX_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19717,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,19721,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_RELAUNCH= 0 ;
if(!qbevent)break;evnt(25769,19722,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_I= 0 ;
if(!qbevent)break;evnt(25769,19724,"ide_methods.bas");}while(r);
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEASCIIBOX_UDT_P)) + ((0+0)) ),&(pass6966= 56 ),&(pass6967= 21 ),qbs_new_txt_len("ASCII Chart",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19725,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_I=*_FUNC_IDEASCIIBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,19727,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+36)))= 1 ;
if(!qbevent)break;evnt(25769,19728,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+24)))= 3 ;
if(!qbevent)break;evnt(25769,19729,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+20)))= 5 ;
if(!qbevent)break;evnt(25769,19730,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+28)))= 5 ;
if(!qbevent)break;evnt(25769,19731,"ide_methods.bas");}while(r);
do{
if (_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[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;
if (_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[2]&1){
if (!error_occurred) error(10);
}else{
alloc_new_desc[4]= 1 ;
alloc_new_desc[5]=( 255 )-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)(12);
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);
_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]) error(257);
_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
ZeroMemory((uint8*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]),tmp_long*12);
while(tmp_long--){

*(qbs**)(_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]+12*tmp_long+ 4)=qbs_new(0,0);}
_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4]=alloc_new_desc[4];
_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]=alloc_new_desc[5];
_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[6]=alloc_new_desc[6];
_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[7]=alloc_new_desc[7];
}
}
if(!qbevent)break;evnt(25769,19738,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_A= 0 ;
if(!qbevent)break;evnt(25769,19740,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_X= 5 ;
if(!qbevent)break;evnt(25769,19741,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_Y= 2 ;
if(!qbevent)break;evnt(25769,19742,"ide_methods.bas");}while(r);
S_61704:;
fornext_value6969= 0 ;
fornext_finalvalue6969= 15 ;
fornext_step6969= 1 ;
if (fornext_step6969<0) fornext_step_negative6969=1; else fornext_step_negative6969=0;
if (is_error_pending()) goto fornext_error6969;
goto fornext_entrylabel6969;
while(1){
fornext_value6969=fornext_step6969+(*_FUNC_IDEASCIIBOX_LONG_I);
fornext_entrylabel6969:
*_FUNC_IDEASCIIBOX_LONG_I=fornext_value6969;
if (fornext_step_negative6969){
if (fornext_value6969<fornext_finalvalue6969) break;
}else{
if (fornext_value6969>fornext_finalvalue6969) break;
}
fornext_error6969:;
if(qbevent){evnt(25769,19743,"ide_methods.bas");if(r)goto S_61704;}
S_61705:;
fornext_value6971= 0 ;
fornext_finalvalue6971= 15 ;
fornext_step6971= 1 ;
if (fornext_step6971<0) fornext_step_negative6971=1; else fornext_step_negative6971=0;
if (is_error_pending()) goto fornext_error6971;
goto fornext_entrylabel6971;
while(1){
fornext_value6971=fornext_step6971+(*_FUNC_IDEASCIIBOX_LONG_J);
fornext_entrylabel6971:
*_FUNC_IDEASCIIBOX_LONG_J=fornext_value6971;
if (fornext_step_negative6971){
if (fornext_value6971<fornext_finalvalue6971) break;
}else{
if (fornext_value6971>fornext_finalvalue6971) break;
}
fornext_error6971:;
if(qbevent){evnt(25769,19744,"ide_methods.bas");if(r)goto S_61705;}
do{
*_FUNC_IDEASCIIBOX_LONG_A=*_FUNC_IDEASCIIBOX_LONG_A+ 1 ;
if(!qbevent)break;evnt(25769,19745,"ide_methods.bas");}while(r);
S_61707:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_A> 255 ))||is_error_pending()){
if(qbevent){evnt(25769,19746,"ide_methods.bas");if(r)goto S_61707;}
do{
goto fornext_exit_6970;
if(!qbevent)break;evnt(25769,19746,"ide_methods.bas");}while(r);
}
do{
*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_A)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+0)))=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0)))+*_FUNC_IDEASCIIBOX_LONG_X;
if(!qbevent)break;evnt(25769,19747,"ide_methods.bas");}while(r);
do{
*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_A)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2)))=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+4)))+*_FUNC_IDEASCIIBOX_LONG_Y;
if(!qbevent)break;evnt(25769,19748,"ide_methods.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_A)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+4)))),qbs_add(qbs_add(qbs_new_txt_len(" ",1),func_chr(*_FUNC_IDEASCIIBOX_LONG_A)),qbs_new_txt_len(" ",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19749,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_X=*_FUNC_IDEASCIIBOX_LONG_X+ 3 ;
if(!qbevent)break;evnt(25769,19750,"ide_methods.bas");}while(r);
fornext_continue_6970:;
}
fornext_exit_6970:;
S_61715:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_A> 255 ))||is_error_pending()){
if(qbevent){evnt(25769,19752,"ide_methods.bas");if(r)goto S_61715;}
do{
goto fornext_exit_6968;
if(!qbevent)break;evnt(25769,19752,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_LONG_X= 5 ;
if(!qbevent)break;evnt(25769,19753,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_Y=*_FUNC_IDEASCIIBOX_LONG_Y+ 1 ;
if(!qbevent)break;evnt(25769,19754,"ide_methods.bas");}while(r);
fornext_continue_6968:;
}
fornext_exit_6968:;
do{
*_FUNC_IDEASCIIBOX_LONG_I=*_FUNC_IDEASCIIBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,19757,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+36)))= 3 ;
if(!qbevent)break;evnt(25769,19758,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+24)))= 21 ;
if(!qbevent)break;evnt(25769,19759,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Insert character",17),_FUNC_IDEASCIIBOX_STRING1_SEP),qbs_new_txt_len("Insert C#HR$",12)),_FUNC_IDEASCIIBOX_STRING1_SEP),qbs_new_txt_len("#Close",6)));
if(!qbevent)break;evnt(25769,19760,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+60)))= 1 ;
if(!qbevent)break;evnt(25769,19761,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ;
if(!qbevent)break;evnt(25769,19763,"ide_methods.bas");}while(r);
S_61727:;
fornext_value6973= 1 ;
fornext_finalvalue6973= 100 ;
fornext_step6973= 1 ;
if (fornext_step6973<0) fornext_step_negative6973=1; else fornext_step_negative6973=0;
if (is_error_pending()) goto fornext_error6973;
goto fornext_entrylabel6973;
while(1){
fornext_value6973=fornext_step6973+(*_FUNC_IDEASCIIBOX_LONG_I);
fornext_entrylabel6973:
*_FUNC_IDEASCIIBOX_LONG_I=fornext_value6973;
if (fornext_step_negative6973){
if (fornext_value6973<fornext_finalvalue6973) break;
}else{
if (fornext_value6973>fornext_finalvalue6973) break;
}
fornext_error6973:;
if(qbevent){evnt(25769,19768,"ide_methods.bas");if(r)goto S_61727;}
do{
memcpy(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+0))+ 0,((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0))+ 0, 20);
if(!qbevent)break;evnt(25769,19768,"ide_methods.bas");}while(r);
fornext_continue_6972:;
}
fornext_exit_6972:;
S_61730:;
do{
if(qbevent){evnt(25769,19771,"ide_methods.bas");if(r)goto S_61730;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEASCIIBOX_UDT_P)) + ((0+0)) ));
if(!qbevent)break;evnt(25769,19773,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,19774,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(25769,19774,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(25769,19774,"ide_methods.bas");}while(r);
S_61735:;
fornext_value6976= 1 ;
fornext_finalvalue6976= 100 ;
fornext_step6976= 1 ;
if (fornext_step6976<0) fornext_step_negative6976=1; else fornext_step_negative6976=0;
if (is_error_pending()) goto fornext_error6976;
goto fornext_entrylabel6976;
while(1){
fornext_value6976=fornext_step6976+(*_FUNC_IDEASCIIBOX_LONG_I);
fornext_entrylabel6976:
*_FUNC_IDEASCIIBOX_LONG_I=fornext_value6976;
if (fornext_step_negative6976){
if (fornext_value6976<fornext_finalvalue6976) break;
}else{
if (fornext_value6976>fornext_finalvalue6976) break;
}
fornext_error6976:;
if(qbevent){evnt(25769,19775,"ide_methods.bas");if(r)goto S_61735;}
S_61736:;
if ((*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
if(qbevent){evnt(25769,19776,"ide_methods.bas");if(r)goto S_61736;}
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+72)))=*_FUNC_IDEASCIIBOX_LONG_FOCUS-*_FUNC_IDEASCIIBOX_LONG_F;
if(!qbevent)break;evnt(25769,19778,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+64)))= 0 ;
if(!qbevent)break;evnt(25769,19779,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+68)))= 0 ;
if(!qbevent)break;evnt(25769,19779,"ide_methods.bas");}while(r);
do{
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEASCIIBOX_LONG_F);
if(!qbevent)break;evnt(25769,19780,"ide_methods.bas");}while(r);
S_61741:;
if ((*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+64))))||is_error_pending()){
if(qbevent){evnt(25769,19781,"ide_methods.bas");if(r)goto S_61741;}
do{
*_FUNC_IDEASCIIBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+64)));
if(!qbevent)break;evnt(25769,19781,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+68)));
if(!qbevent)break;evnt(25769,19781,"ide_methods.bas");}while(r);
}
}
fornext_continue_6975:;
}
fornext_exit_6975:;
do{
*_FUNC_IDEASCIIBOX_LONG_LASTFOCUS=*_FUNC_IDEASCIIBOX_LONG_F- 1 ;
if(!qbevent)break;evnt(25769,19784,"ide_methods.bas");}while(r);
S_61748:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,19788,"ide_methods.bas");if(r)goto S_61748;}
do{
SUB_IDEBOX(&(pass6977=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0)))+ 4 ),&(pass6978=*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+4)))+ 1 ),&(pass6979= 50 ),&(pass6980= 18 ));
if(!qbevent)break;evnt(25769,19789,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_LONG_HOVER= 0 ;
if(!qbevent)break;evnt(25769,19792,"ide_methods.bas");}while(r);
S_61752:;
fornext_value6982= 1 ;
fornext_finalvalue6982= 255 ;
fornext_step6982= 1 ;
if (fornext_step6982<0) fornext_step_negative6982=1; else fornext_step_negative6982=0;
if (is_error_pending()) goto fornext_error6982;
goto fornext_entrylabel6982;
while(1){
fornext_value6982=fornext_step6982+(*_FUNC_IDEASCIIBOX_LONG_I);
fornext_entrylabel6982:
*_FUNC_IDEASCIIBOX_LONG_I=fornext_value6982;
if (fornext_step_negative6982){
if (fornext_value6982<fornext_finalvalue6982) break;
}else{
if (fornext_value6982>fornext_finalvalue6982) break;
}
fornext_error6982:;
if(qbevent){evnt(25769,19793,"ide_methods.bas");if(r)goto S_61752;}
S_61753:;
if (((-(*__LONG_MX>=*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+0)))))&(-(*__LONG_MX<=(*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+0)))+ 2 )))&(-(*__LONG_MY==*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2))))))||is_error_pending()){
if(qbevent){evnt(25769,19794,"ide_methods.bas");if(r)goto S_61753;}
S_61754:;
if ((*_FUNC_IDEASCIIBOX_LONG_MOUSEMOVED)||is_error_pending()){
if(qbevent){evnt(25769,19795,"ide_methods.bas");if(r)goto S_61754;}
do{
*_FUNC_IDEASCIIBOX_LONG_HOVER=*_FUNC_IDEASCIIBOX_LONG_I;
if(!qbevent)break;evnt(25769,19795,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 7 , 0 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,19795,"ide_methods.bas");}while(r);
}
S_61758:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(25769,19796,"ide_methods.bas");if(r)goto S_61758;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_I;
if(!qbevent)break;evnt(25769,19797,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,19798,"ide_methods.bas");}while(r);
S_61761:;
if (((-(((double)(FUNC_TIMEELAPSEDSINCE(_FUNC_IDEASCIIBOX_DOUBLE_LASTCLICK)))<=((double)( 0.3E+0 ))))&(-(*_FUNC_IDEASCIIBOX_LONG_LASTCLICKON==*_FUNC_IDEASCIIBOX_LONG_I)))||is_error_pending()){
if(qbevent){evnt(25769,19799,"ide_methods.bas");if(r)goto S_61761;}
do{
*_FUNC_IDEASCIIBOX_LONG_RELAUNCH= -1 ;
if(!qbevent)break;evnt(25769,19801,"ide_methods.bas");}while(r);
do{
goto LABEL_INSERTCHAR;
if(!qbevent)break;evnt(25769,19802,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_DOUBLE_LASTCLICK=func_timer( 0.001E+0 ,0|1);
if(!qbevent)break;evnt(25769,19804,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_LASTCLICKON=*_FUNC_IDEASCIIBOX_LONG_I;
if(!qbevent)break;evnt(25769,19805,"ide_methods.bas");}while(r);
}
}else{
do{
qbg_sub_color( 2 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,19808,"ide_methods.bas");}while(r);
}
S_61771:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED==*_FUNC_IDEASCIIBOX_LONG_I))||is_error_pending()){
if(qbevent){evnt(25769,19810,"ide_methods.bas");if(r)goto S_61771;}
do{
qbg_sub_color( 15 , 0 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,19810,"ide_methods.bas");}while(r);
}
do{
sub__printstring(*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+0))),*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2))),*((qbs**)((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0]+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+4)))),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19811,"ide_methods.bas");}while(r);
fornext_continue_6981:;
}
fornext_exit_6981:;
do{
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,19814,"ide_methods.bas");}while(r);
S_61777:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,19815,"ide_methods.bas");if(r)goto S_61777;}
do{
sub__printstring(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0)))+ 5 ,*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+4)))+ 19 ,qbs_add(qbs_new_txt_len("Selected:",9),qbs_str((int32)(*_FUNC_IDEASCIIBOX_LONG_SELECTED))),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19816,"ide_methods.bas");}while(r);
}
do{
qbg_sub_color( 2 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,19819,"ide_methods.bas");}while(r);
S_61781:;
if (((-(*_FUNC_IDEASCIIBOX_LONG_HOVER> 0 ))&(-(*_FUNC_IDEASCIIBOX_LONG_HOVER!=*_FUNC_IDEASCIIBOX_LONG_SELECTED)))||is_error_pending()){
if(qbevent){evnt(25769,19820,"ide_methods.bas");if(r)goto S_61781;}
do{
sub__printstring(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0)))+ 5 ,*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+4)))+ 20 ,qbs_add(qbs_new_txt_len("Hovered: ",9),qbs_str((int32)(*_FUNC_IDEASCIIBOX_LONG_HOVER))),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19821,"ide_methods.bas");}while(r);
}
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(25769,19827,"ide_methods.bas");}while(r);
S_61785:;
if ((*_FUNC_IDEASCIIBOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(25769,19828,"ide_methods.bas");if(r)goto S_61785;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,19829,"ide_methods.bas");}while(r);
S_61787:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,19830,"ide_methods.bas");if(r)goto S_61787;}
S_61788:;
if ((*_FUNC_IDEASCIIBOX_LONG_SELECTED)||is_error_pending()){
if(qbevent){evnt(25769,19831,"ide_methods.bas");if(r)goto S_61788;}
do{
qbg_sub_locate(*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_SELECTED)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+2))),*(int16*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_SELECTED)-_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_ASCIITABLE[5]))*12+0)))+ 1 , 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(25769,19832,"ide_methods.bas");}while(r);
}
}else{
do{
qbg_sub_locate(*_FUNC_IDEASCIIBOX_LONG_CY,*_FUNC_IDEASCIIBOX_LONG_CX, 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(25769,19835,"ide_methods.bas");}while(r);
}
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,19837,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(25769,19841,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_MOUSEMOVED= 0 ;
if(!qbevent)break;evnt(25769,19842,"ide_methods.bas");}while(r);
S_61798:;
do{
if(qbevent){evnt(25769,19843,"ide_methods.bas");if(r)goto S_61798;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(25769,19844,"ide_methods.bas");}while(r);
S_61800:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(25769,19845,"ide_methods.bas");if(r)goto S_61800;}
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19845,"ide_methods.bas");}while(r);
}
S_61803:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(25769,19846,"ide_methods.bas");if(r)goto S_61803;}
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19846,"ide_methods.bas");}while(r);
}
S_61806:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(25769,19847,"ide_methods.bas");if(r)goto S_61806;}
do{
*_FUNC_IDEASCIIBOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(25769,19847,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19847,"ide_methods.bas");}while(r);
}
S_61810:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(25769,19848,"ide_methods.bas");if(r)goto S_61810;}
do{
*_FUNC_IDEASCIIBOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(25769,19848,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19848,"ide_methods.bas");}while(r);
}
S_61814:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(25769,19849,"ide_methods.bas");if(r)goto S_61814;}
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19849,"ide_methods.bas");}while(r);
}
S_61817:;
if (((-(*__LONG_MX!=*_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MX))|(-(*__LONG_MY!=*_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MY)))||is_error_pending()){
if(qbevent){evnt(25769,19850,"ide_methods.bas");if(r)goto S_61817;}
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19850,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MX=*__LONG_MX;
if(!qbevent)break;evnt(25769,19850,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_PREV__ASCII_CHR_046__MY=*__LONG_MY;
if(!qbevent)break;evnt(25769,19850,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_MOUSEMOVED= -1 ;
if(!qbevent)break;evnt(25769,19850,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(25769,19851,"ide_methods.bas");}while(r);
S_61824:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_ALT!=*_FUNC_IDEASCIIBOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(25769,19851,"ide_methods.bas");if(r)goto S_61824;}
do{
*_FUNC_IDEASCIIBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,19851,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_LONG_OLDALT=*_FUNC_IDEASCIIBOX_LONG_ALT;
if(!qbevent)break;evnt(25769,19852,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(25769,19853,"ide_methods.bas");}while(r);
S_61829:;
dl_continue_6983:;
}while((!(*_FUNC_IDEASCIIBOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_6983:;
if(qbevent){evnt(25769,19854,"ide_methods.bas");if(r)goto S_61829;}
S_61830:;
if ((*_FUNC_IDEASCIIBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,19855,"ide_methods.bas");if(r)goto S_61830;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(25769,19855,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(25769,19855,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDEASCIIBOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19857,"ide_methods.bas");}while(r);
S_61836:;
if ((*_FUNC_IDEASCIIBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,19858,"ide_methods.bas");if(r)goto S_61836;}
S_61837:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(25769,19859,"ide_methods.bas");if(r)goto S_61837;}
do{
*_FUNC_IDEASCIIBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19860,"ide_methods.bas");}while(r);
S_61839:;
if (((-(*_FUNC_IDEASCIIBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEASCIIBOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(25769,19861,"ide_methods.bas");if(r)goto S_61839;}
do{
qbs_set(_FUNC_IDEASCIIBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEASCIIBOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19861,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,19864,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(25769,19864,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,19864,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(25769,19868,"ide_methods.bas");}while(r);
S_61848:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,19869,"ide_methods.bas");if(r)goto S_61848;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19869,"ide_methods.bas");}while(r);
}
S_61851:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,19870,"ide_methods.bas");if(r)goto S_61851;}
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS=*_FUNC_IDEASCIIBOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(25769,19870,"ide_methods.bas");}while(r);
}
S_61854:;
if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||is_error_pending()){
if(qbevent){evnt(25769,19871,"ide_methods.bas");if(r)goto S_61854;}
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS=*_FUNC_IDEASCIIBOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(25769,19871,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_K,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19871,"ide_methods.bas");}while(r);
}
S_61858:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,19872,"ide_methods.bas");if(r)goto S_61858;}
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS=*_FUNC_IDEASCIIBOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(25769,19872,"ide_methods.bas");}while(r);
}
S_61861:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS>*_FUNC_IDEASCIIBOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(25769,19873,"ide_methods.bas");if(r)goto S_61861;}
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,19873,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEASCIIBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,19874,"ide_methods.bas");}while(r);
S_61865:;
fornext_value6986= 1 ;
fornext_finalvalue6986= 100 ;
fornext_step6986= 1 ;
if (fornext_step6986<0) fornext_step_negative6986=1; else fornext_step_negative6986=0;
if (is_error_pending()) goto fornext_error6986;
goto fornext_entrylabel6986;
while(1){
fornext_value6986=fornext_step6986+(*_FUNC_IDEASCIIBOX_LONG_I);
fornext_entrylabel6986:
*_FUNC_IDEASCIIBOX_LONG_I=fornext_value6986;
if (fornext_step_negative6986){
if (fornext_value6986<fornext_finalvalue6986) break;
}else{
if (fornext_value6986>fornext_finalvalue6986) break;
}
fornext_error6986:;
if(qbevent){evnt(25769,19875,"ide_methods.bas");if(r)goto S_61865;}
do{
*_FUNC_IDEASCIIBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+36)));
if(!qbevent)break;evnt(25769,19876,"ide_methods.bas");}while(r);
S_61867:;
if ((*_FUNC_IDEASCIIBOX_LONG_T)||is_error_pending()){
if(qbevent){evnt(25769,19877,"ide_methods.bas");if(r)goto S_61867;}
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUSOFFSET=*_FUNC_IDEASCIIBOX_LONG_FOCUS-*_FUNC_IDEASCIIBOX_LONG_F;
if(!qbevent)break;evnt(25769,19878,"ide_methods.bas");}while(r);
do{
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEASCIIBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEASCIIBOX_LONG_I)-_FUNC_IDEASCIIBOX_ARRAY_UDT_O[4],_FUNC_IDEASCIIBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEASCIIBOX_LONG_FOCUS,_FUNC_IDEASCIIBOX_LONG_F,_FUNC_IDEASCIIBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEASCIIBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEASCIIBOX_LONG_MOUSEDOWN,_FUNC_IDEASCIIBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEASCIIBOX_LONG_INFO,__LONG_MWHEEL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19879,"ide_methods.bas");}while(r);
}
fornext_continue_6985:;
}
fornext_exit_6985:;
S_61872:;
if (((-(*__LONG_MY>*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+4)))))&(-(*__LONG_MY<(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+4)))+*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+12))))))&(-(*__LONG_MX>*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0)))))&(-(*__LONG_MX<(*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+0)))+*(int32*)(((char*)_FUNC_IDEASCIIBOX_UDT_P)+((0+8)))))))||is_error_pending()){
if(qbevent){evnt(25769,19884,"ide_methods.bas");if(r)goto S_61872;}
S_61873:;
if (((-(*_FUNC_IDEASCIIBOX_LONG_HOVER== 0 ))&*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(25769,19885,"ide_methods.bas");if(r)goto S_61873;}
do{
*_FUNC_IDEASCIIBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,19885,"ide_methods.bas");}while(r);
}
}
S_61877:;
if ((qbs_cleanup(qbs_tmp_base,((qbs_equal(__STRING_K,func_chr( 13 )))&(-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 )))))||is_error_pending()){
if(qbevent){evnt(25769,19888,"ide_methods.bas");if(r)goto S_61877;}
do{
goto LABEL_INSERTCHAR;
if(!qbevent)break;evnt(25769,19889,"ide_methods.bas");}while(r);
}
S_61880:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 2 ))&(((qbs_equal(__STRING_K,func_chr( 13 )))|(-(*_FUNC_IDEASCIIBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,19892,"ide_methods.bas");if(r)goto S_61880;}
LABEL_INSERTCHAR:;
if(qbevent){evnt(25769,19893,"ide_methods.bas");r=0;}
S_61881:;
if (((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED< 32 ))&(-(*_FUNC_IDEASCIIBOX_LONG_ASCIIWARNINGSHOWN== 0 )))||is_error_pending()){
if(qbevent){evnt(25769,19894,"ide_methods.bas");if(r)goto S_61881;}
do{
*_FUNC_IDEASCIIBOX_LONG_ASCIIWARNINGSHOWN= -1 ;
if(!qbevent)break;evnt(25769,19895,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_RESULT=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Control Characters",18),qbs_new_txt_len("Inserting ASCII control characters (1-32) may cause\\nunexpected IDE behavior. Consider inserting CHR$ instead.\\nProceed anyway?",127),qbs_new_txt_len("#Yes;#No;#Cancel",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19896,"ide_methods.bas");}while(r);
S_61884:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_RESULT== 2 ))||is_error_pending()){
if(qbevent){evnt(25769,19897,"ide_methods.bas");if(r)goto S_61884;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,19897,"ide_methods.bas");}while(r);
}
S_61887:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_RESULT== 3 ))||is_error_pending()){
if(qbevent){evnt(25769,19898,"ide_methods.bas");if(r)goto S_61887;}
do{
goto LABEL_DLGLOOP;
if(!qbevent)break;evnt(25769,19898,"ide_methods.bas");}while(r);
}
}
do{
qbs_set(_FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX,func_chr(*_FUNC_IDEASCIIBOX_LONG_SELECTED));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19900,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,19901,"ide_methods.bas");}while(r);
}
S_61894:;
if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 3 ))&(((-(*_FUNC_IDEASCIIBOX_LONG_INFO!= 0 ))|(qbs_equal(__STRING_K,func_chr( 13 ))))))))||is_error_pending()){
if(qbevent){evnt(25769,19904,"ide_methods.bas");if(r)goto S_61894;}
do{
qbs_set(_FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX,qbs_add(qbs_add(qbs_new_txt_len("CHR$(",5),qbs__tostr((int32)(*_FUNC_IDEASCIIBOX_LONG_SELECTED),NULL,0)),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,19905,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,19906,"ide_methods.bas");}while(r);
}
S_61898:;
if ((qbs_cleanup(qbs_tmp_base,(((-(*_FUNC_IDEASCIIBOX_LONG_INFO!= 0 ))|(qbs_equal(__STRING_K,func_chr( 13 )))))&(-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 4 ))))||is_error_pending()){
if(qbevent){evnt(25769,19910,"ide_methods.bas");if(r)goto S_61898;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,19910,"ide_methods.bas");}while(r);
}
S_61901:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||is_error_pending()){
if(qbevent){evnt(25769,19912,"ide_methods.bas");if(r)goto S_61901;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,19912,"ide_methods.bas");}while(r);
}
S_61904:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_FOCUS== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,19914,"ide_methods.bas");if(r)goto S_61904;}
do{
*__LONG_KCTRL=func__keydown( 100305 )|func__keydown( 100306 );
if(!qbevent)break;evnt(25769,19915,"ide_methods.bas");}while(r);
S_61906:;
if(qbevent){evnt(25769,19916,"ide_methods.bas");if(r)goto S_61906;}
S_61907:;
if (((*__LONG_KB==( 18176 )))||is_error_pending()){
if(qbevent){evnt(25769,19917,"ide_methods.bas");if(r)goto S_61907;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ;
if(!qbevent)break;evnt(25769,19917,"ide_methods.bas");}while(r);
sc_ec_445_end:;
goto sc_6987_end;
}
S_61909:;
if (((*__LONG_KB==( 20224 )))||is_error_pending()){
if(qbevent){evnt(25769,19918,"ide_methods.bas");if(r)goto S_61909;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ;
if(!qbevent)break;evnt(25769,19918,"ide_methods.bas");}while(r);
sc_ec_446_end:;
goto sc_6987_end;
}
S_61911:;
if (((*__LONG_KB==( 19712 )))||is_error_pending()){
if(qbevent){evnt(25769,19919,"ide_methods.bas");if(r)goto S_61911;}
S_61912:;
if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,19920,"ide_methods.bas");if(r)goto S_61912;}
S_61913:;
while((!((-((*_FUNC_IDEASCIIBOX_LONG_SELECTED% 16 )==( 0 )))|(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 255 ))))||is_error_pending()){
if(qbevent){evnt(25769,19921,"ide_methods.bas");if(r)goto S_61913;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 1 ;
if(!qbevent)break;evnt(25769,19922,"ide_methods.bas");}while(r);
dl_continue_6988:;
}
dl_exit_6988:;
}else{
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 1 ;
if(!qbevent)break;evnt(25769,19925,"ide_methods.bas");}while(r);
}
S_61919:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 255 ))||is_error_pending()){
if(qbevent){evnt(25769,19927,"ide_methods.bas");if(r)goto S_61919;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ;
if(!qbevent)break;evnt(25769,19927,"ide_methods.bas");}while(r);
}
sc_ec_447_end:;
goto sc_6987_end;
}
S_61922:;
if (((*__LONG_KB==( 19200 )))||is_error_pending()){
if(qbevent){evnt(25769,19928,"ide_methods.bas");if(r)goto S_61922;}
S_61923:;
if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,19929,"ide_methods.bas");if(r)goto S_61923;}
S_61924:;
while((!(-((*_FUNC_IDEASCIIBOX_LONG_SELECTED% 16 )==( 1 ))))||is_error_pending()){
if(qbevent){evnt(25769,19930,"ide_methods.bas");if(r)goto S_61924;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 1 ;
if(!qbevent)break;evnt(25769,19931,"ide_methods.bas");}while(r);
dl_continue_6989:;
}
dl_exit_6989:;
}else{
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 1 ;
if(!qbevent)break;evnt(25769,19934,"ide_methods.bas");}while(r);
}
S_61930:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,19936,"ide_methods.bas");if(r)goto S_61930;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ;
if(!qbevent)break;evnt(25769,19936,"ide_methods.bas");}while(r);
}
sc_ec_448_end:;
goto sc_6987_end;
}
S_61933:;
if (((*__LONG_KB==( 20480 )))||is_error_pending()){
if(qbevent){evnt(25769,19937,"ide_methods.bas");if(r)goto S_61933;}
S_61934:;
if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,19938,"ide_methods.bas");if(r)goto S_61934;}
S_61935:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 240 ))||is_error_pending()){
if(qbevent){evnt(25769,19939,"ide_methods.bas");if(r)goto S_61935;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ;
if(!qbevent)break;evnt(25769,19940,"ide_methods.bas");}while(r);
}else{
S_61938:;
while((!(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED>= 240 )))||is_error_pending()){
if(qbevent){evnt(25769,19942,"ide_methods.bas");if(r)goto S_61938;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 ;
if(!qbevent)break;evnt(25769,19943,"ide_methods.bas");}while(r);
dl_continue_6990:;
}
dl_exit_6990:;
}
S_61942:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 255 ))||is_error_pending()){
if(qbevent){evnt(25769,19946,"ide_methods.bas");if(r)goto S_61942;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ;
if(!qbevent)break;evnt(25769,19946,"ide_methods.bas");}while(r);
}
}else{
S_61946:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 240 ))||is_error_pending()){
if(qbevent){evnt(25769,19948,"ide_methods.bas");if(r)goto S_61946;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 255 ;
if(!qbevent)break;evnt(25769,19950,"ide_methods.bas");}while(r);
S_61948:;
}else{
if (-((*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 )<=( 255 ))){
if(qbevent){evnt(25769,19951,"ide_methods.bas");if(r)goto S_61948;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 ;
if(!qbevent)break;evnt(25769,19952,"ide_methods.bas");}while(r);
}else{
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED+ 16 - 256 ;
if(!qbevent)break;evnt(25769,19954,"ide_methods.bas");}while(r);
}
}
}
sc_ec_449_end:;
goto sc_6987_end;
}
S_61954:;
if (((*__LONG_KB==( 18432 )))||is_error_pending()){
if(qbevent){evnt(25769,19957,"ide_methods.bas");if(r)goto S_61954;}
S_61955:;
if ((*__LONG_KCTRL&(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,19958,"ide_methods.bas");if(r)goto S_61955;}
S_61956:;
while((!(-(*_FUNC_IDEASCIIBOX_LONG_SELECTED<= 16 )))||is_error_pending()){
if(qbevent){evnt(25769,19959,"ide_methods.bas");if(r)goto S_61956;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 ;
if(!qbevent)break;evnt(25769,19960,"ide_methods.bas");}while(r);
dl_continue_6991:;
}
dl_exit_6991:;
S_61959:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,19962,"ide_methods.bas");if(r)goto S_61959;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 1 ;
if(!qbevent)break;evnt(25769,19962,"ide_methods.bas");}while(r);
}
}else{
S_61963:;
if ((-(*_FUNC_IDEASCIIBOX_LONG_SELECTED== 16 ))||is_error_pending()){
if(qbevent){evnt(25769,19964,"ide_methods.bas");if(r)goto S_61963;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED= 240 ;
if(!qbevent)break;evnt(25769,19966,"ide_methods.bas");}while(r);
S_61965:;
}else{
if (-((*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 )>=( 1 ))){
if(qbevent){evnt(25769,19967,"ide_methods.bas");if(r)goto S_61965;}
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 ;
if(!qbevent)break;evnt(25769,19968,"ide_methods.bas");}while(r);
}else{
do{
*_FUNC_IDEASCIIBOX_LONG_SELECTED=*_FUNC_IDEASCIIBOX_LONG_SELECTED- 16 + 256 ;
if(!qbevent)break;evnt(25769,19970,"ide_methods.bas");}while(r);
}
}
}
sc_ec_450_end:;
goto sc_6987_end;
}
sc_6987_end:;
}
do{
*_FUNC_IDEASCIIBOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(25769,19977,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEASCIIBOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(25769,19978,"ide_methods.bas");}while(r);
LABEL_DLGLOOP:;
if(qbevent){evnt(25769,19980,"ide_methods.bas");r=0;}
dl_continue_6974:;
}while(1);
dl_exit_6974:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free359.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;
qbs_maketmp(_FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX);return _FUNC_IDEASCIIBOX_STRING_IDEASCIIBOX;
}
