int32 FUNC_IDELANGUAGEBOX(){
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 "data318.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,14068,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(25769,14069,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,14070,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,14071,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,14072,"ide_methods.bas");}while(r);
do{
if (_FUNC_IDELANGUAGEBOX_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_IDELANGUAGEBOX_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_IDELANGUAGEBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]) error(257);
memset((void*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]),0,(size_t)alloc_req_bytes);
}else{
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[2]|=1;
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4]=alloc_new_desc[4];
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]=alloc_new_desc[5];
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[6]=alloc_new_desc[6];
_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[7]=alloc_new_desc[7];
}
}
if(!qbevent)break;evnt(25769,14073,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,14074,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDELANGUAGEBOX_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14075,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_I= 0 ;
if(!qbevent)break;evnt(25769,14079,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_H=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 8 ;
if(!qbevent)break;evnt(25769,14079,"ide_methods.bas");}while(r);
S_55124:;
if ((-(*_FUNC_IDELANGUAGEBOX_LONG_H> 31 ))||is_error_pending()){
if(qbevent){evnt(25769,14079,"ide_methods.bas");if(r)goto S_55124;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_H= 31 ;
if(!qbevent)break;evnt(25769,14079,"ide_methods.bas");}while(r);
}
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_UDT_P)) + ((0+0)) ),&(pass6376= 55 ),_FUNC_IDELANGUAGEBOX_LONG_H,qbs_new_txt_len("Language Settings",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14080,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_I=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,14082,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CPLST=*_FUNC_IDELANGUAGEBOX_LONG_I;
if(!qbevent)break;evnt(25769,14082,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+36)))= 2 ;
if(!qbevent)break;evnt(25769,14083,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+24)))= 2 ;
if(!qbevent)break;evnt(25769,14084,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+32)))=*_FUNC_IDELANGUAGEBOX_LONG_H- 4 ;
if(!qbevent)break;evnt(25769,14084,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+40)))=FUNC_IDENEWTXT(qbs_new_txt_len("Code Pages",10));
if(!qbevent)break;evnt(25769,14085,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDELANGUAGEBOX_STRING_A2,((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[array_check(( 1 )-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14085,"ide_methods.bas");}while(r);
S_55135:;
fornext_value6378= 2 ;
fornext_finalvalue6378= 27 ;
fornext_step6378= 1 ;
if (fornext_step6378<0) fornext_step_negative6378=1; else fornext_step_negative6378=0;
if (is_error_pending()) goto fornext_error6378;
goto fornext_entrylabel6378;
while(1){
fornext_value6378=fornext_step6378+(*_FUNC_IDELANGUAGEBOX_LONG_X);
fornext_entrylabel6378:
*_FUNC_IDELANGUAGEBOX_LONG_X=fornext_value6378;
if (fornext_step_negative6378){
if (fornext_value6378<fornext_finalvalue6378) break;
}else{
if (fornext_value6378>fornext_finalvalue6378) break;
}
fornext_error6378:;
if(qbevent){evnt(25769,14085,"ide_methods.bas");if(r)goto S_55135;}
do{
qbs_set(_FUNC_IDELANGUAGEBOX_STRING_A2,qbs_add(qbs_add(_FUNC_IDELANGUAGEBOX_STRING_A2,_FUNC_IDELANGUAGEBOX_STRING1_SEP),((qbs*)(((uint64*)(__ARRAY_STRING_IDECPNAME[0]))[array_check((*_FUNC_IDELANGUAGEBOX_LONG_X)-__ARRAY_STRING_IDECPNAME[4],__ARRAY_STRING_IDECPNAME[5])]))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14085,"ide_methods.bas");}while(r);
fornext_continue_6377:;
}
fornext_exit_6377:;
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(qbs_ucase(_FUNC_IDELANGUAGEBOX_STRING_A2));
if(!qbevent)break;evnt(25769,14086,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+76)))= 1 ;
if(!qbevent)break;evnt(25769,14087,"ide_methods.bas");}while(r);
S_55140:;
if ((*__LONG_IDECPINDEX)||is_error_pending()){
if(qbevent){evnt(25769,14087,"ide_methods.bas");if(r)goto S_55140;}
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+76)))=*__LONG_IDECPINDEX;
if(!qbevent)break;evnt(25769,14087,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_LONG_I=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,14089,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_OKBUT=*_FUNC_IDELANGUAGEBOX_LONG_I;
if(!qbevent)break;evnt(25769,14089,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CABUT=*_FUNC_IDELANGUAGEBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,14089,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+36)))= 3 ;
if(!qbevent)break;evnt(25769,14090,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+24)))=*_FUNC_IDELANGUAGEBOX_LONG_H;
if(!qbevent)break;evnt(25769,14091,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDELANGUAGEBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7)));
if(!qbevent)break;evnt(25769,14092,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+60)))= 1 ;
if(!qbevent)break;evnt(25769,14092,"ide_methods.bas");}while(r);
S_55150:;
fornext_value6380= 1 ;
fornext_finalvalue6380= 100 ;
fornext_step6380= 1 ;
if (fornext_step6380<0) fornext_step_negative6380=1; else fornext_step_negative6380=0;
if (is_error_pending()) goto fornext_error6380;
goto fornext_entrylabel6380;
while(1){
fornext_value6380=fornext_step6380+(*_FUNC_IDELANGUAGEBOX_LONG_I);
fornext_entrylabel6380:
*_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value6380;
if (fornext_step_negative6380){
if (fornext_value6380<fornext_finalvalue6380) break;
}else{
if (fornext_value6380>fornext_finalvalue6380) break;
}
fornext_error6380:;
if(qbevent){evnt(25769,14096,"ide_methods.bas");if(r)goto S_55150;}
do{
memcpy(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+0))+ 0,((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+((0+0))+ 0, 20);
if(!qbevent)break;evnt(25769,14096,"ide_methods.bas");}while(r);
fornext_continue_6379:;
}
fornext_exit_6379:;
S_55153:;
do{
if(qbevent){evnt(25769,14102,"ide_methods.bas");if(r)goto S_55153;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_UDT_P)) + ((0+0)) ));
if(!qbevent)break;evnt(25769,14105,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,14106,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(25769,14106,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(25769,14106,"ide_methods.bas");}while(r);
S_55158:;
fornext_value6383= 1 ;
fornext_finalvalue6383= 100 ;
fornext_step6383= 1 ;
if (fornext_step6383<0) fornext_step_negative6383=1; else fornext_step_negative6383=0;
if (is_error_pending()) goto fornext_error6383;
goto fornext_entrylabel6383;
while(1){
fornext_value6383=fornext_step6383+(*_FUNC_IDELANGUAGEBOX_LONG_I);
fornext_entrylabel6383:
*_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value6383;
if (fornext_step_negative6383){
if (fornext_value6383<fornext_finalvalue6383) break;
}else{
if (fornext_value6383>fornext_finalvalue6383) break;
}
fornext_error6383:;
if(qbevent){evnt(25769,14107,"ide_methods.bas");if(r)goto S_55158;}
S_55159:;
if ((*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
if(qbevent){evnt(25769,14108,"ide_methods.bas");if(r)goto S_55159;}
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+72)))=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS-*_FUNC_IDELANGUAGEBOX_LONG_F;
if(!qbevent)break;evnt(25769,14110,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+64)))= 0 ;
if(!qbevent)break;evnt(25769,14111,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+68)))= 0 ;
if(!qbevent)break;evnt(25769,14111,"ide_methods.bas");}while(r);
S_55163:;
if ((-((-(*_FUNC_IDELANGUAGEBOX_LONG_I==*_FUNC_IDELANGUAGEBOX_LONG_FOCUS))&&(-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS!=*_FUNC_IDELANGUAGEBOX_LONG_OLDFOCUS))))||is_error_pending()){
if(qbevent){evnt(25769,14112,"ide_methods.bas");if(r)goto S_55163;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_OLDFOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS;
if(!qbevent)break;evnt(25769,14113,"ide_methods.bas");}while(r);
S_55165:;
if ((-(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+36)))== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14114,"ide_methods.bas");if(r)goto S_55165;}
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+93)))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len;
if(!qbevent)break;evnt(25769,14116,"ide_methods.bas");}while(r);
S_55167:;
if ((-(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+93)))> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,14117,"ide_methods.bas");if(r)goto S_55167;}
do{
*(int8*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+88)))= -1 ;
if(!qbevent)break;evnt(25769,14117,"ide_methods.bas");}while(r);
}else{
do{
*(int8*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+88)))= 0 ;
if(!qbevent)break;evnt(25769,14117,"ide_methods.bas");}while(r);
}
do{
*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_FOCUS)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+89)))= 0 ;
if(!qbevent)break;evnt(25769,14118,"ide_methods.bas");}while(r);
}
}
do{
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDELANGUAGEBOX_LONG_F);
if(!qbevent)break;evnt(25769,14121,"ide_methods.bas");}while(r);
S_55176:;
if ((*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+64))))||is_error_pending()){
if(qbevent){evnt(25769,14122,"ide_methods.bas");if(r)goto S_55176;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+64)));
if(!qbevent)break;evnt(25769,14122,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+68)));
if(!qbevent)break;evnt(25769,14122,"ide_methods.bas");}while(r);
}
}
fornext_continue_6382:;
}
fornext_exit_6382:;
do{
*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS=*_FUNC_IDELANGUAGEBOX_LONG_F- 1 ;
if(!qbevent)break;evnt(25769,14125,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 2 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,14129,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+((0+4)))+ 1 ,*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_UDT_P)+((0+0)))+ 2 ,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(25769,14129,"ide_methods.bas");}while(r);
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,qbs_new_txt_len("Codepage for ASCII-UNICODE mapping (Default = CP437):",53));
if (is_error_pending()) goto skip6385;
makefit(tqbs);
qbs_print(tqbs,0);
skip6385:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14130,"ide_methods.bas");}while(r);
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(25769,14134,"ide_methods.bas");}while(r);
S_55187:;
if ((*_FUNC_IDELANGUAGEBOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(25769,14135,"ide_methods.bas");if(r)goto S_55187;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,14135,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_FUNC_IDELANGUAGEBOX_LONG_CY,*_FUNC_IDELANGUAGEBOX_LONG_CX, 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(25769,14135,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,14135,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(25769,14138,"ide_methods.bas");}while(r);
S_55193:;
do{
if(qbevent){evnt(25769,14139,"ide_methods.bas");if(r)goto S_55193;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(25769,14140,"ide_methods.bas");}while(r);
S_55195:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(25769,14141,"ide_methods.bas");if(r)goto S_55195;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,14141,"ide_methods.bas");}while(r);
}
S_55198:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(25769,14142,"ide_methods.bas");if(r)goto S_55198;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,14142,"ide_methods.bas");}while(r);
}
S_55201:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(25769,14143,"ide_methods.bas");if(r)goto S_55201;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(25769,14143,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,14143,"ide_methods.bas");}while(r);
}
S_55205:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(25769,14144,"ide_methods.bas");if(r)goto S_55205;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(25769,14144,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,14144,"ide_methods.bas");}while(r);
}
S_55209:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(25769,14145,"ide_methods.bas");if(r)goto S_55209;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,14145,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(25769,14146,"ide_methods.bas");}while(r);
S_55213:;
if ((-(*_FUNC_IDELANGUAGEBOX_LONG_ALT!=*_FUNC_IDELANGUAGEBOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(25769,14146,"ide_methods.bas");if(r)goto S_55213;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,14146,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_LONG_OLDALT=*_FUNC_IDELANGUAGEBOX_LONG_ALT;
if(!qbevent)break;evnt(25769,14147,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(25769,14148,"ide_methods.bas");}while(r);
S_55218:;
dl_continue_6386:;
}while((!(*_FUNC_IDELANGUAGEBOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_6386:;
if(qbevent){evnt(25769,14149,"ide_methods.bas");if(r)goto S_55218;}
S_55219:;
if ((*_FUNC_IDELANGUAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,14150,"ide_methods.bas");if(r)goto S_55219;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(25769,14150,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(25769,14150,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14152,"ide_methods.bas");}while(r);
S_55225:;
if ((*_FUNC_IDELANGUAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,14153,"ide_methods.bas");if(r)goto S_55225;}
S_55226:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(25769,14154,"ide_methods.bas");if(r)goto S_55226;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14155,"ide_methods.bas");}while(r);
S_55228:;
if (((-(*_FUNC_IDELANGUAGEBOX_LONG_K>= 65 ))&(-(*_FUNC_IDELANGUAGEBOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(25769,14156,"ide_methods.bas");if(r)goto S_55228;}
do{
qbs_set(_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDELANGUAGEBOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14156,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,14159,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(25769,14159,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,14159,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(25769,14163,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_INVDATA= 0 ;
if(!qbevent)break;evnt(25769,14163,"ide_methods.bas");}while(r);
S_55238:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,14164,"ide_methods.bas");if(r)goto S_55238;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14164,"ide_methods.bas");}while(r);
}
S_55241:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,14165,"ide_methods.bas");if(r)goto S_55241;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(25769,14165,"ide_methods.bas");}while(r);
}
S_55244:;
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,14166,"ide_methods.bas");if(r)goto S_55244;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(25769,14166,"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,14166,"ide_methods.bas");}while(r);
}
S_55248:;
if ((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14167,"ide_methods.bas");if(r)goto S_55248;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_FOCUS=*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(25769,14167,"ide_methods.bas");}while(r);
}
S_55251:;
if ((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS>*_FUNC_IDELANGUAGEBOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(25769,14168,"ide_methods.bas");if(r)goto S_55251;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,14168,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,14169,"ide_methods.bas");}while(r);
S_55255:;
fornext_value6389= 1 ;
fornext_finalvalue6389= 100 ;
fornext_step6389= 1 ;
if (fornext_step6389<0) fornext_step_negative6389=1; else fornext_step_negative6389=0;
if (is_error_pending()) goto fornext_error6389;
goto fornext_entrylabel6389;
while(1){
fornext_value6389=fornext_step6389+(*_FUNC_IDELANGUAGEBOX_LONG_I);
fornext_entrylabel6389:
*_FUNC_IDELANGUAGEBOX_LONG_I=fornext_value6389;
if (fornext_step_negative6389){
if (fornext_value6389<fornext_finalvalue6389) break;
}else{
if (fornext_value6389>fornext_finalvalue6389) break;
}
fornext_error6389:;
if(qbevent){evnt(25769,14170,"ide_methods.bas");if(r)goto S_55255;}
S_55256:;
if ((*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
if(qbevent){evnt(25769,14171,"ide_methods.bas");if(r)goto S_55256;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_FOCUSOFFSET=*_FUNC_IDELANGUAGEBOX_LONG_FOCUS-*_FUNC_IDELANGUAGEBOX_LONG_F;
if(!qbevent)break;evnt(25769,14172,"ide_methods.bas");}while(r);
do{
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDELANGUAGEBOX_LONG_I)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDELANGUAGEBOX_LONG_FOCUS,_FUNC_IDELANGUAGEBOX_LONG_F,_FUNC_IDELANGUAGEBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDELANGUAGEBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN,_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDELANGUAGEBOX_LONG_INFO,__LONG_MWHEEL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14173,"ide_methods.bas");}while(r);
}
fornext_continue_6388:;
}
fornext_exit_6388:;
S_55261:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS==*_FUNC_IDELANGUAGEBOX_LONG_CABUT))&(-(*_FUNC_IDELANGUAGEBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,14180,"ide_methods.bas");if(r)goto S_55261;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14180,"ide_methods.bas");}while(r);
}
S_55264:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS==*_FUNC_IDELANGUAGEBOX_LONG_OKBUT))&(-(*_FUNC_IDELANGUAGEBOX_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDELANGUAGEBOX_LONG_FOCUS==*_FUNC_IDELANGUAGEBOX_LONG_CPLST))&(-(*_FUNC_IDELANGUAGEBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,14181,"ide_methods.bas");if(r)goto S_55264;}
S_55265:;
if ((*_FUNC_IDELANGUAGEBOX_LONG_INVDATA)||is_error_pending()){
if(qbevent){evnt(25769,14183,"ide_methods.bas");if(r)goto S_55265;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_RETVAL=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Warning",7),qbs_new_txt_len("Confirmation has been blocked due to invalid settings.\\nPlease check your inputs, look for highlighted boxes.",109),qbs_new_txt_len("#OK",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14184,"ide_methods.bas");}while(r);
do{
sub_pcopy( 2 , 1 );
if(!qbevent)break;evnt(25769,14185,"ide_methods.bas");}while(r);
do{
goto dl_continue_6381;
if(!qbevent)break;evnt(25769,14185,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_INTEGER_OPTCHG= 0ll ;
if(!qbevent)break;evnt(25769,14188,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_INTEGER_V=func_abs((int32)(*(int32*)(((char*)_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDELANGUAGEBOX_LONG_CPLST)-_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[4],_FUNC_IDELANGUAGEBOX_ARRAY_UDT_O[5]))*101+76)))));
if(!qbevent)break;evnt(25769,14191,"ide_methods.bas");}while(r);
S_55272:;
if ((-(*__LONG_IDECPINDEX!=*_FUNC_IDELANGUAGEBOX_INTEGER_V))||is_error_pending()){
if(qbevent){evnt(25769,14192,"ide_methods.bas");if(r)goto S_55272;}
do{
*__LONG_IDECPINDEX=*_FUNC_IDELANGUAGEBOX_INTEGER_V;
if(!qbevent)break;evnt(25769,14192,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_INTEGER_OPTCHG= -1ll ;
if(!qbevent)break;evnt(25769,14192,"ide_methods.bas");}while(r);
}
S_55276:;
if ((*_FUNC_IDELANGUAGEBOX_INTEGER_OPTCHG)||is_error_pending()){
if(qbevent){evnt(25769,14194,"ide_methods.bas");if(r)goto S_55276;}
do{
SUB_WRITECONFIGSETTING(__STRING_DISPLAYSETTINGSSECTION,qbs_new_txt_len("IDE_CodePage",12),qbs__tostr((int32)(*__LONG_IDECPINDEX),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14196,"ide_methods.bas");}while(r);
S_55278:;
fornext_value6391= 128 ;
fornext_finalvalue6391= 255 ;
fornext_step6391= 1 ;
if (fornext_step6391<0) fornext_step_negative6391=1; else fornext_step_negative6391=0;
if (is_error_pending()) goto fornext_error6391;
goto fornext_entrylabel6391;
while(1){
fornext_value6391=fornext_step6391+(*_FUNC_IDELANGUAGEBOX_LONG_X);
fornext_entrylabel6391:
*_FUNC_IDELANGUAGEBOX_LONG_X=fornext_value6391;
if (fornext_step_negative6391){
if (fornext_value6391<fornext_finalvalue6391) break;
}else{
if (fornext_value6391>fornext_finalvalue6391) break;
}
fornext_error6391:;
if(qbevent){evnt(25769,14199,"ide_methods.bas");if(r)goto S_55278;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_U=qbr(qbs_val<long double>(qbs_add(qbs_add(qbs_new_txt_len("&H",2),func_mid(((qbs*)(((uint64*)(__ARRAY_STRING_IDECP[0]))[array_check((*__LONG_IDECPINDEX)-__ARRAY_STRING_IDECP[4],__ARRAY_STRING_IDECP[5])])),(*_FUNC_IDELANGUAGEBOX_LONG_X* 8 )+( 1 ), 8 ,0|1)),qbs_new_txt_len("&",1))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14200,"ide_methods.bas");}while(r);
S_55280:;
if ((-(*_FUNC_IDELANGUAGEBOX_LONG_U== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,14201,"ide_methods.bas");if(r)goto S_55280;}
do{
*_FUNC_IDELANGUAGEBOX_LONG_U= 9744 ;
if(!qbevent)break;evnt(25769,14201,"ide_methods.bas");}while(r);
}
do{
sub__mapunicode(*_FUNC_IDELANGUAGEBOX_LONG_U,*_FUNC_IDELANGUAGEBOX_LONG_X);
if(!qbevent)break;evnt(25769,14202,"ide_methods.bas");}while(r);
fornext_continue_6390:;
}
fornext_exit_6390:;
do{
*_FUNC_IDELANGUAGEBOX_LONG_IDELANGUAGEBOX= 1 ;
if(!qbevent)break;evnt(25769,14205,"ide_methods.bas");}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14207,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDELANGUAGEBOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(25769,14211,"ide_methods.bas");}while(r);
do{
*_FUNC_IDELANGUAGEBOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(25769,14212,"ide_methods.bas");}while(r);
dl_continue_6381:;
}while(1);
dl_exit_6381:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free318.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;
return *_FUNC_IDELANGUAGEBOX_LONG_IDELANGUAGEBOX;
}
