qbs* FUNC_WIKI(qbs*_FUNC_WIKI_STRING_PAGENAME){
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 "data385.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (is_error_pending()) goto exit_subfunc;
S_63068:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_left(_FUNC_WIKI_STRING_PAGENAME, 9 ),qbs_new_txt_len("Template:",9))))||is_error_pending()){
if(qbevent){evnt(25769,28,"wiki_methods.bas");if(r)goto S_63068;}
do{
qbs_set(__STRING_HELP_PAGELOADED,_FUNC_WIKI_STRING_PAGENAME);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,28,"wiki_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,31,"wiki_methods.bas");}while(r);
S_63072:;
fornext_value7090= 1 ;
fornext_finalvalue7090=_FUNC_WIKI_STRING_PAGENAME->len;
fornext_step7090= 1 ;
if (fornext_step7090<0) fornext_step_negative7090=1; else fornext_step_negative7090=0;
if (is_error_pending()) goto fornext_error7090;
goto fornext_entrylabel7090;
while(1){
fornext_value7090=fornext_step7090+(*_FUNC_WIKI_LONG_I);
fornext_entrylabel7090:
*_FUNC_WIKI_LONG_I=fornext_value7090;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative7090){
if (fornext_value7090<fornext_finalvalue7090) break;
}else{
if (fornext_value7090>fornext_finalvalue7090) break;
}
fornext_error7090:;
if(qbevent){evnt(25769,32,"wiki_methods.bas");if(r)goto S_63072;}
do{
*_FUNC_WIKI_LONG_C=qbs_asc(_FUNC_WIKI_STRING_PAGENAME,*_FUNC_WIKI_LONG_I);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,33,"wiki_methods.bas");}while(r);
S_63074:;
if(qbevent){evnt(25769,34,"wiki_methods.bas");if(r)goto S_63074;}
S_63075:;
if (((*_FUNC_WIKI_LONG_C==( 32 )))||is_error_pending()){
if(qbevent){evnt(25769,35,"wiki_methods.bas");if(r)goto S_63075;}
do{
qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("_",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,36,"wiki_methods.bas");}while(r);
sc_ec_474_end:;
goto sc_7092_end;
}
S_63077:;
if (((*_FUNC_WIKI_LONG_C==( 34 ))||(*_FUNC_WIKI_LONG_C==( 36 ))||(*_FUNC_WIKI_LONG_C==( 38 ))||(*_FUNC_WIKI_LONG_C==( 42 ))||(*_FUNC_WIKI_LONG_C==( 43 ))||(*_FUNC_WIKI_LONG_C==( 47 ))||(*_FUNC_WIKI_LONG_C==( 58 ))||(*_FUNC_WIKI_LONG_C==( 60 ))||(*_FUNC_WIKI_LONG_C==( 62 ))||(*_FUNC_WIKI_LONG_C==( 63 ))||(*_FUNC_WIKI_LONG_C==( 92 ))||(*_FUNC_WIKI_LONG_C==( 124 )))||is_error_pending()){
if(qbevent){evnt(25769,37,"wiki_methods.bas");if(r)goto S_63077;}
do{
qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(qbs_add(_FUNC_WIKI_STRING_PAGENAME2,qbs_new_txt_len("%",1)),func_hex(*_FUNC_WIKI_LONG_C,8)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,38,"wiki_methods.bas");}while(r);
sc_ec_475_end:;
goto sc_7092_end;
}
do{
qbs_set(_FUNC_WIKI_STRING_PAGENAME2,qbs_add(_FUNC_WIKI_STRING_PAGENAME2,func_chr(*_FUNC_WIKI_LONG_C)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,40,"wiki_methods.bas");}while(r);
sc_7092_end:;
fornext_continue_7089:;
}
fornext_exit_7089:;
do{
qbs_set(_FUNC_WIKI_STRING_PAGENAME3,FUNC_WIKISAFENAME(_FUNC_WIKI_STRING_PAGENAME2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,43,"wiki_methods.bas");}while(r);
S_63084:;
if ((-(*__LONG_HELP_IGNORECACHE== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,46,"wiki_methods.bas");if(r)goto S_63084;}
S_63085:;
if ((qbs_cleanup(qbs_tmp_base,func__fileexists(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME3),qbs_new_txt_len(".txt",4)))))||is_error_pending()){
if(qbevent){evnt(25769,47,"wiki_methods.bas");if(r)goto S_63085;}
do{
qbs_set(_FUNC_WIKI_STRING_A,func__readfile(qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME3),qbs_new_txt_len(".txt",4))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,48,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_WIKI,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(func_chr( 13 ),func_chr( 10 )),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,49,"wiki_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,50,"wiki_methods.bas");}while(r);
}
}
S_63091:;
if ((-(*__LONG_HELP_RECACHING== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,55,"wiki_methods.bas");if(r)goto S_63091;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_new_txt_len("Downloading '",13),_FUNC_WIKI_STRING_PAGENAME),qbs_new_txt_len("' page...",9)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,56,"wiki_methods.bas");}while(r);
S_63093:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_WIKI_STRING_A->len> 60 )))||is_error_pending()){
if(qbevent){evnt(25769,57,"wiki_methods.bas");if(r)goto S_63093;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_left(_FUNC_WIKI_STRING_A, 57 ),func_string( 3 , 250 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,57,"wiki_methods.bas");}while(r);
}
S_63096:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_WIKI_STRING_A->len< 60 )))||is_error_pending()){
if(qbevent){evnt(25769,58,"wiki_methods.bas");if(r)goto S_63096;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,func_space( 60 -_FUNC_WIKI_STRING_A->len)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,58,"wiki_methods.bas");}while(r);
}
do{
qbg_sub_color( 0 , 3 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,60,"wiki_methods.bas");}while(r);
do{
qbg_sub_locate(*__LONG_IDEWY+*__LONG_IDESUBWINDOW, 2 ,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(25769,60,"wiki_methods.bas");}while(r);
do{
tqbs=qbs_new(0,0);
qbs_set(tqbs,_FUNC_WIKI_STRING_A);
if (is_error_pending()) goto skip7096;
makefit(tqbs);
qbs_print(tqbs,0);
skip7096:
qbs_free(tqbs);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,61,"wiki_methods.bas");}while(r);
do{
sub_pcopy( 3 , 0 );
if(!qbevent)break;evnt(25769,63,"wiki_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_WIKI_STRING_URL,qbs_add(qbs_add(qbs_add(__STRING_WIKIBASEADDRESS,qbs_new_txt_len("/index.php?title=",17)),_FUNC_WIKI_STRING_PAGENAME2),qbs_new_txt_len("&qbide=1&action=edit",20)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,70,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_OUTPUTFILE,qbs_add(qbs_add(qbs_add(__STRING_CACHE_FOLDER,qbs_new_txt_len("/",1)),_FUNC_WIKI_STRING_PAGENAME3),qbs_new_txt_len(".txt",4)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,71,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_S1,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("name=",5),func_chr( 34 )),qbs_new_txt_len("wpTextbox1",10)),func_chr( 34 )),qbs_new_txt_len(">",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,73,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_S2,qbs_new_txt_len("</textarea>",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,74,"wiki_methods.bas");}while(r);
S_63108:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_FUNC_WIKI_STRING_PAGENAME,qbs_new_txt_len("Initialize",10)))|(qbs_equal(_FUNC_WIKI_STRING_PAGENAME,qbs_new_txt_len("Update All",10)))))||is_error_pending()){
if(qbevent){evnt(25769,77,"wiki_methods.bas");if(r)goto S_63108;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,78,"wiki_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_WIKIDLPAGE(_FUNC_WIKI_STRING_URL,&(pass7097= 15 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,80,"wiki_methods.bas");}while(r);
S_63112:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_WIKI_STRING_A,qbs_new_txt_len("Login required",14),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,81,"wiki_methods.bas");if(r)goto S_63112;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_S1,_FUNC_WIKI_STRING_S2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,81,"wiki_methods.bas");}while(r);
}
}
do{
*_FUNC_WIKI_LONG_S1=func_instr(NULL,_FUNC_WIKI_STRING_A,_FUNC_WIKI_STRING_S1,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,85,"wiki_methods.bas");}while(r);
S_63117:;
if ((-(*_FUNC_WIKI_LONG_S1> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,86,"wiki_methods.bas");if(r)goto S_63117;}
do{
qbs_set(_FUNC_WIKI_STRING_A,func_mid(_FUNC_WIKI_STRING_A,*_FUNC_WIKI_LONG_S1+_FUNC_WIKI_STRING_S1->len,NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,86,"wiki_methods.bas");}while(r);
do{
*_FUNC_WIKI_LONG_S2=func_instr(NULL,_FUNC_WIKI_STRING_A,_FUNC_WIKI_STRING_S2,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,86,"wiki_methods.bas");}while(r);
}else{
do{
*_FUNC_WIKI_LONG_S2= 0 ;
if(!qbevent)break;evnt(25769,86,"wiki_methods.bas");}while(r);
}
S_63123:;
if ((-(*_FUNC_WIKI_LONG_S2> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,87,"wiki_methods.bas");if(r)goto S_63123;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_left(_FUNC_WIKI_STRING_A,*_FUNC_WIKI_LONG_S2- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,87,"wiki_methods.bas");}while(r);
}
S_63126:;
if (((-(*_FUNC_WIKI_LONG_S1> 0 ))&(-(*_FUNC_WIKI_LONG_S2> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,88,"wiki_methods.bas");if(r)goto S_63126;}
S_63127:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_FUNC_WIKI_STRING_A,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,89,"wiki_methods.bas");if(r)goto S_63127;}
S_63128:;
while((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_WIKI_STRING_A,qbs_new_txt_len("&amp;",5),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,92,"wiki_methods.bas");if(r)goto S_63128;}
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("&amp;",5),qbs_new_txt_len("&",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,93,"wiki_methods.bas");}while(r);
ww_continue_7099:;
}
ww_exit_7099:;
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("&lt;",4),qbs_new_txt_len("<",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,95,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("&gt;",4),qbs_new_txt_len(">",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,96,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("&quot;",6),func_chr( 34 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,97,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_new_txt_len("#REDIRECT",9),qbs_new_txt_len("See page",8)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,99,"wiki_methods.bas");}while(r);
do{
qbs_set(_FUNC_WIKI_STRING_A,FUNC_STRREPLACE(_FUNC_WIKI_STRING_A,qbs_add(func_chr( 13 ),func_chr( 10 )),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,100,"wiki_methods.bas");}while(r);
S_63136:;
while((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_WIKI_STRING_A, 1 ),func_chr( 10 ))))||is_error_pending()){
if(qbevent){evnt(25769,101,"wiki_methods.bas");if(r)goto S_63136;}
do{
qbs_set(_FUNC_WIKI_STRING_A,func_mid(_FUNC_WIKI_STRING_A, 2 ,NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,101,"wiki_methods.bas");}while(r);
ww_continue_7100:;
}
ww_exit_7100:;
S_63139:;
if ((qbs_cleanup(qbs_tmp_base,(-(_FUNC_WIKI_STRING_A->len> 0 ))&(qbs_notequal(qbs_right(_FUNC_WIKI_STRING_A, 1 ),func_chr( 10 )))))||is_error_pending()){
if(qbevent){evnt(25769,102,"wiki_methods.bas");if(r)goto S_63139;}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(_FUNC_WIKI_STRING_A,func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,102,"wiki_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("{{QBDLDATE:",11),func_date()),qbs_new_txt_len("}}",2)),func_chr( 10 )),qbs_new_txt_len("{{QBDLTIME:",11)),func_time()),qbs_new_txt_len("}}",2)),func_chr( 10 )),_FUNC_WIKI_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,104,"wiki_methods.bas");}while(r);
do{
*_FUNC_WIKI_LONG_FH=func_freefile();
if(!qbevent)break;evnt(25769,106,"wiki_methods.bas");}while(r);
do{
sub_open(_FUNC_WIKI_STRING_OUTPUTFILE, 4 ,NULL,NULL,*_FUNC_WIKI_LONG_FH,NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,107,"wiki_methods.bas");}while(r);
do{
tab_spc_cr_size=2;
tab_fileno=tmp_fileno=*_FUNC_WIKI_LONG_FH;
if (is_error_pending()) goto skip7102;
sub_file_print(tmp_fileno,_FUNC_WIKI_STRING_A, 0, 0, 0);
if (is_error_pending()) goto skip7102;
skip7102:
qbs_cleanup(qbs_tmp_base,0);
tab_spc_cr_size=1;
if(!qbevent)break;evnt(25769,108,"wiki_methods.bas");}while(r);
do{
sub_close(*_FUNC_WIKI_LONG_FH,1);
if(!qbevent)break;evnt(25769,109,"wiki_methods.bas");}while(r);
}else{
S_63148:;
if ((qbs_cleanup(qbs_tmp_base,func__fileexists(_FUNC_WIKI_STRING_OUTPUTFILE)))||is_error_pending()){
if(qbevent){evnt(25769,112,"wiki_methods.bas");if(r)goto S_63148;}
do{
sub_kill(_FUNC_WIKI_STRING_OUTPUTFILE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,113,"wiki_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 10 ),qbs_new_txt_len("{{PageInternalError}}",21)),func_chr( 10 )),qbs_new_txt_len("* The requested page is not yet available in the Wiki.",54)),func_chr( 10 )),qbs_new_txt_len("** If this is a new keyword, which was recently added to the language, then ",76)),qbs_new_txt_len("please allow some time for the developers to add it and recheck later.",70)),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,119,"wiki_methods.bas");}while(r);
}
}
}else{
do{
qbs_set(_FUNC_WIKI_STRING_A,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(func_chr( 10 ),qbs_new_txt_len("{{PageInternalError}}",21)),func_chr( 10 )),qbs_new_txt_len("* For some unknown reason the download of the requested page failed.",68)),func_chr( 10 )),qbs_new_txt_len("** You may try ''Update Current Page'' from the ''Help'' menu.",62)),func_chr( 10 )),qbs_new_txt_len(";Note:This may also just be a temporary server issue. If the problem persists ",78)),qbs_new_txt_len("after waiting some time, then please feel free to leave us a message.",69)),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,128,"wiki_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_WIKI_STRING_WIKI,_FUNC_WIKI_STRING_A);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,131,"wiki_methods.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free385.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_WIKI_STRING_WIKI);return _FUNC_WIKI_STRING_WIKI;
}
