void SUB_HELP_SHOWTEXT(){
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 "data336.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{
if(!qbevent)break;evnt(24235,18406,"ide_methods.bas");}while(r);
S_58533:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_HELP_SHOWTEXT_LONG_SETUP== 0 ))&(-(func_ubound(__ARRAY_STRING_BACK,1,1)== 1 ))))||is_error_pending()){
if(qbevent){evnt(24235,18407,"ide_methods.bas");if(r)goto S_58533;}
do{
*_SUB_HELP_SHOWTEXT_LONG_SETUP= 1 ;
if(!qbevent)break;evnt(24235,18408,"ide_methods.bas");}while(r);
S_58535:;
if ((~(*__BYTE_IDECONTEXTHELPSF))||is_error_pending()){
if(qbevent){evnt(24235,18409,"ide_methods.bas");if(r)goto S_58535;}
do{
qbs_set(_SUB_HELP_SHOWTEXT_STRING_A,FUNC_WIKI(((qbs*)(((uint64*)(__ARRAY_STRING_BACK[0]))[array_check(( 1 )-__ARRAY_STRING_BACK[4],__ARRAY_STRING_BACK[5])]))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18410,"ide_methods.bas");}while(r);
do{
SUB_WIKIPARSE(_SUB_HELP_SHOWTEXT_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18411,"ide_methods.bas");}while(r);
}
}
do{

if (__ARRAY_LONG_HELP_LINELEN[2]&2){
error(10);
}else{
((mem_lock*)((ptrszint*)__ARRAY_LONG_HELP_LINELEN)[8])->id=(++mem_lock_id);
if (__ARRAY_LONG_HELP_LINELEN[2]&1){
if (__ARRAY_LONG_HELP_LINELEN[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_LONG_HELP_LINELEN[0]));
}else{
free((void*)(__ARRAY_LONG_HELP_LINELEN[0]));
}
}
__ARRAY_LONG_HELP_LINELEN[4]= 0 ;
__ARRAY_LONG_HELP_LINELEN[5]=(*__LONG_HELP_WH)-__ARRAY_LONG_HELP_LINELEN[4]+1;
__ARRAY_LONG_HELP_LINELEN[6]=1;
if (__ARRAY_LONG_HELP_LINELEN[2]&4){
__ARRAY_LONG_HELP_LINELEN[0]=(ptrszint)cmem_dynamic_malloc(__ARRAY_LONG_HELP_LINELEN[5]*4);
memset((void*)(__ARRAY_LONG_HELP_LINELEN[0]),0,__ARRAY_LONG_HELP_LINELEN[5]*4);
}else{
__ARRAY_LONG_HELP_LINELEN[0]=(ptrszint)calloc(__ARRAY_LONG_HELP_LINELEN[5]*4,1);
if (!__ARRAY_LONG_HELP_LINELEN[0]) error(257);
}
__ARRAY_LONG_HELP_LINELEN[2]|=1;
}
if(!qbevent)break;evnt(24235,18415,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_SY=*__LONG_HELP_WY1;
if(!qbevent)break;evnt(24235,18417,"ide_methods.bas");}while(r);
S_58542:;
fornext_value6561=*__LONG_HELP_SY;
fornext_finalvalue6561=*__LONG_HELP_SY+*__LONG_HELP_WH- 1 ;
fornext_step6561= 1 ;
if (fornext_step6561<0) fornext_step_negative6561=1; else fornext_step_negative6561=0;
if (is_error_pending()) goto fornext_error6561;
goto fornext_entrylabel6561;
while(1){
fornext_value6561=fornext_step6561+(*_SUB_HELP_SHOWTEXT_LONG_Y);
fornext_entrylabel6561:
*_SUB_HELP_SHOWTEXT_LONG_Y=fornext_value6561;
if (fornext_step_negative6561){
if (fornext_value6561<fornext_finalvalue6561) break;
}else{
if (fornext_value6561>fornext_finalvalue6561) break;
}
fornext_error6561:;
if(qbevent){evnt(24235,18418,"ide_methods.bas");if(r)goto S_58542;}
S_58543:;
if ((-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_H))||is_error_pending()){
if(qbevent){evnt(24235,18419,"ide_methods.bas");if(r)goto S_58543;}
do{
*_SUB_HELP_SHOWTEXT_LONG_L=string2l(func_mid(__STRING_HELP_LINE,((*_SUB_HELP_SHOWTEXT_LONG_Y- 1 )* 4 )+( 1 ), 4 ,0|1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18420,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_X=*_SUB_HELP_SHOWTEXT_LONG_L;
if(!qbevent)break;evnt(24235,18421,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_X3= 1 ;
if(!qbevent)break;evnt(24235,18422,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_SX=*__LONG_HELP_WX1;
if(!qbevent)break;evnt(24235,18424,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18425,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_COL=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X+ 1 );
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18425,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_SUB_HELP_SHOWTEXT_LONG_SY,*_SUB_HELP_SHOWTEXT_LONG_SX,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(24235,18426,"ide_methods.bas");}while(r);
S_58551:;
while((!(-(*_SUB_HELP_SHOWTEXT_LONG_COL> 127 )))||is_error_pending()){
if(qbevent){evnt(24235,18427,"ide_methods.bas");if(r)goto S_58551;}
do{
qbg_sub_color(*_SUB_HELP_SHOWTEXT_LONG_COL& 15 ,*_SUB_HELP_SHOWTEXT_LONG_COL/  16 ,NULL,3);
if(!qbevent)break;evnt(24235,18428,"ide_methods.bas");}while(r);
S_58553:;
if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||is_error_pending()){
if(qbevent){evnt(24235,18429,"ide_methods.bas");if(r)goto S_58553;}
S_58554:;
if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||is_error_pending()){
if(qbevent){evnt(24235,18430,"ide_methods.bas");if(r)goto S_58554;}
S_58555:;
if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||is_error_pending()){
if(qbevent){evnt(24235,18431,"ide_methods.bas");if(r)goto S_58555;}
do{
qbg_sub_color( 0 , 7 ,NULL,3);
if(!qbevent)break;evnt(24235,18432,"ide_methods.bas");}while(r);
}
}
}
S_58560:;
if ((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SX))||is_error_pending()){
if(qbevent){evnt(24235,18436,"ide_methods.bas");if(r)goto S_58560;}
S_58561:;
if ((-(*_SUB_HELP_SHOWTEXT_LONG_SX<=*__LONG_HELP_WX2))||is_error_pending()){
if(qbevent){evnt(24235,18437,"ide_methods.bas");if(r)goto S_58561;}
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,func_chr(*_SUB_HELP_SHOWTEXT_LONG_C));
if (is_error_pending()) goto skip6563;
makefit(tqbs);
qbs_print(tqbs,0);
skip6563:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18438,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_SX=*_SUB_HELP_SHOWTEXT_LONG_SX+ 1 ;
if(!qbevent)break;evnt(24235,18439,"ide_methods.bas");}while(r);
}
}
do{
*_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ;
if(!qbevent)break;evnt(24235,18442,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_X=*_SUB_HELP_SHOWTEXT_LONG_X+ 4 ;
if(!qbevent)break;evnt(24235,18442,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_C=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18442,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_COL=qbs_asc(__STRING_HELP_TXT,*_SUB_HELP_SHOWTEXT_LONG_X+ 1 );
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18442,"ide_methods.bas");}while(r);
dl_continue_6562:;
}
dl_exit_6562:;
do{
tmp_long=array_check((*_SUB_HELP_SHOWTEXT_LONG_Y-*__LONG_HELP_SY)-__ARRAY_LONG_HELP_LINELEN[4],__ARRAY_LONG_HELP_LINELEN[5]);
if (!is_error_pending()) ((int32*)(__ARRAY_LONG_HELP_LINELEN[0]))[tmp_long]=*_SUB_HELP_SHOWTEXT_LONG_X3- 1 ;
if(!qbevent)break;evnt(24235,18445,"ide_methods.bas");}while(r);
S_58572:;
fornext_value6565= 1 ;
fornext_finalvalue6565=*__LONG_HELP_WX2-func_pos( 0 )+ 1 ;
fornext_step6565= 1 ;
if (fornext_step6565<0) fornext_step_negative6565=1; else fornext_step_negative6565=0;
if (is_error_pending()) goto fornext_error6565;
goto fornext_entrylabel6565;
while(1){
fornext_value6565=fornext_step6565+(*_SUB_HELP_SHOWTEXT_LONG_X4);
fornext_entrylabel6565:
*_SUB_HELP_SHOWTEXT_LONG_X4=fornext_value6565;
if (fornext_step_negative6565){
if (fornext_value6565<fornext_finalvalue6565) break;
}else{
if (fornext_value6565>fornext_finalvalue6565) break;
}
fornext_error6565:;
if(qbevent){evnt(24235,18447,"ide_methods.bas");if(r)goto S_58572;}
do{
qbg_sub_color( 7 ,(*_SUB_HELP_SHOWTEXT_LONG_COL- 128 )/  16 ,NULL,3);
if(!qbevent)break;evnt(24235,18448,"ide_methods.bas");}while(r);
S_58574:;
if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||is_error_pending()){
if(qbevent){evnt(24235,18449,"ide_methods.bas");if(r)goto S_58574;}
S_58575:;
if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||is_error_pending()){
if(qbevent){evnt(24235,18450,"ide_methods.bas");if(r)goto S_58575;}
S_58576:;
if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||is_error_pending()){
if(qbevent){evnt(24235,18451,"ide_methods.bas");if(r)goto S_58576;}
do{
qbg_sub_color( 0 , 7 ,NULL,3);
if(!qbevent)break;evnt(24235,18452,"ide_methods.bas");}while(r);
}
}
}
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,qbs_new_txt_len(" ",1));
if (is_error_pending()) goto skip6566;
makefit(tqbs);
qbs_print(tqbs,0);
skip6566:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18456,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ;
if(!qbevent)break;evnt(24235,18457,"ide_methods.bas");}while(r);
fornext_continue_6564:;
}
fornext_exit_6564:;
}else{
do{
*_SUB_HELP_SHOWTEXT_LONG_SX=*__LONG_HELP_WX1;
if(!qbevent)break;evnt(24235,18462,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_SUB_HELP_SHOWTEXT_LONG_SY,*_SUB_HELP_SHOWTEXT_LONG_SX,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(24235,18463,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_X3=*__LONG_HELP_SX;
if(!qbevent)break;evnt(24235,18464,"ide_methods.bas");}while(r);
S_58588:;
fornext_value6568= 1 ;
fornext_finalvalue6568=*__LONG_HELP_WW;
fornext_step6568= 1 ;
if (fornext_step6568<0) fornext_step_negative6568=1; else fornext_step_negative6568=0;
if (is_error_pending()) goto fornext_error6568;
goto fornext_entrylabel6568;
while(1){
fornext_value6568=fornext_step6568+(*_SUB_HELP_SHOWTEXT_LONG_X4);
fornext_entrylabel6568:
*_SUB_HELP_SHOWTEXT_LONG_X4=fornext_value6568;
if (fornext_step_negative6568){
if (fornext_value6568<fornext_finalvalue6568) break;
}else{
if (fornext_value6568>fornext_finalvalue6568) break;
}
fornext_error6568:;
if(qbevent){evnt(24235,18465,"ide_methods.bas");if(r)goto S_58588;}
do{
qbg_sub_color( 7 , 0 ,NULL,3);
if(!qbevent)break;evnt(24235,18466,"ide_methods.bas");}while(r);
S_58590:;
if (((-(*__LONG_IDESYSTEM== 3 ))&(-(*__LONG_HELP_SELECT== 2 )))||is_error_pending()){
if(qbevent){evnt(24235,18467,"ide_methods.bas");if(r)goto S_58590;}
S_58591:;
if (((-(*_SUB_HELP_SHOWTEXT_LONG_Y>=*__LONG_HELP_SELY1))&(-(*_SUB_HELP_SHOWTEXT_LONG_Y<=*__LONG_HELP_SELY2)))||is_error_pending()){
if(qbevent){evnt(24235,18468,"ide_methods.bas");if(r)goto S_58591;}
S_58592:;
if (((-(*_SUB_HELP_SHOWTEXT_LONG_X3>=*__LONG_HELP_SELX1))&(-(*_SUB_HELP_SHOWTEXT_LONG_X3<=*__LONG_HELP_SELX2)))||is_error_pending()){
if(qbevent){evnt(24235,18469,"ide_methods.bas");if(r)goto S_58592;}
do{
qbg_sub_color( 0 , 7 ,NULL,3);
if(!qbevent)break;evnt(24235,18470,"ide_methods.bas");}while(r);
}
}
}
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,qbs_new_txt_len(" ",1));
if (is_error_pending()) goto skip6569;
makefit(tqbs);
qbs_print(tqbs,0);
skip6569:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,18474,"ide_methods.bas");}while(r);
do{
*_SUB_HELP_SHOWTEXT_LONG_X3=*_SUB_HELP_SHOWTEXT_LONG_X3+ 1 ;
if(!qbevent)break;evnt(24235,18475,"ide_methods.bas");}while(r);
fornext_continue_6567:;
}
fornext_exit_6567:;
do{
tmp_long=array_check((*_SUB_HELP_SHOWTEXT_LONG_Y-*__LONG_HELP_SY)-__ARRAY_LONG_HELP_LINELEN[4],__ARRAY_LONG_HELP_LINELEN[5]);
if (!is_error_pending()) ((int32*)(__ARRAY_LONG_HELP_LINELEN[0]))[tmp_long]= 0 ;
if(!qbevent)break;evnt(24235,18477,"ide_methods.bas");}while(r);
}
do{
*_SUB_HELP_SHOWTEXT_LONG_SY=*_SUB_HELP_SHOWTEXT_LONG_SY+ 1 ;
if(!qbevent)break;evnt(24235,18480,"ide_methods.bas");}while(r);
fornext_continue_6560:;
}
fornext_exit_6560:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free336.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;
}
