QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-12 20:25:14 +00:00
Code Issues Releases Wiki Activity

Manual update _LOADFONT for extended syntax

Browse source
This commit is contained in:
Samuel Gomes 2023-04-21 10:26:34 +05:30
parent bdd9cb1256
commit e5c4c173b4
1 changed files with 197026 additions and 197026 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
internal/source/main.txt
View file

@ -85340,21 +85340,21 @@ qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1),qbs_new_txt_len("func__l
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21266,1327,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+(809))= 3 ;
*(int16*)(((char*)__UDT_ID)+(809))= 4 ;
if(!qbevent)break;evnt(21266,1328,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(813)),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21266,1329,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+(1613)),256,1),qbs_new_txt_len("?,?[,[?][,[?]]]",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21266,1330,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+(2381))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(21266,1331,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_LOADFONT(fileName$, size%[, ",29),func_chr( 34 )),qbs_new_txt_len("{MONOSPACE|, BOLD|, ITALIC|, UNDERLINE|, UNICODE|, DONTBLEND}",61)),func_chr( 34 )),qbs_new_txt_len("])",2)));
qbs_set(*((qbs**)((char*)(__UDT_ID)+(2861))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_LOADFONT(fileName$, size&[, ",29),func_chr( 34 )),qbs_new_txt_len("{MONOSPACE|, UNICODE|, DONTBLEND|, MEMORY}",42)),func_chr( 34 )),qbs_new_txt_len("][, fontIndex])",15)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21266,1332,"subs_functions.bas");}while(r);
do{
@ -121969,9 +121969,9 @@ do{
*__LONG_INICODE= 1 ;
if(!qbevent)break;evnt(26064,488,"ini.bm");}while(r);
do{
qbs_set(__STRING_INILF,func_chr( 10 ));
qbs_set(__STRING_INILF,qbs_add(func_chr( 13 ),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(26064,493,"ini.bm");}while(r);
if(!qbevent)break;evnt(26064,491,"ini.bm");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(26064,495,"ini.bm");}while(r);
@ -124127,7 +124127,7 @@ S_36666:;
if ((*__LONG_IDECUSTOMFONT)||new_error){
if(qbevent){evnt(26070,270,"ide_methods.bas");if(r)goto S_36666;}
do{
*__LONG_IDECUSTOMFONTHANDLE=func__loadfont(__STRING_IDECUSTOMFONTFILE,*__LONG_IDECUSTOMFONTHEIGHT,qbs_new_txt_len("MONOSPACE",9),0|1);
*__LONG_IDECUSTOMFONTHANDLE=func__loadfont(__STRING_IDECUSTOMFONTFILE,*__LONG_IDECUSTOMFONTHEIGHT,qbs_new_txt_len("MONOSPACE",9),NULL,0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(26070,271,"ide_methods.bas");}while(r);
S_36668:;
@ -180957,7 +180957,7 @@ do{
*_FUNC_IDEDISPLAYBOX_LONG_OLDHANDLE=*__LONG_IDECUSTOMFONTHANDLE;
if(!qbevent)break;evnt(26070,16271,"ide_methods.bas");}while(r);
do{
*__LONG_IDECUSTOMFONTHANDLE=func__loadfont(_FUNC_IDEDISPLAYBOX_STRING_V,*_FUNC_IDEDISPLAYBOX_INTEGER_V,qbs_new_txt_len("MONOSPACE",9),0|1);
*__LONG_IDECUSTOMFONTHANDLE=func__loadfont(_FUNC_IDEDISPLAYBOX_STRING_V,*_FUNC_IDEDISPLAYBOX_INTEGER_V,qbs_new_txt_len("MONOSPACE",9),NULL,0|1);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(26070,16272,"ide_methods.bas");}while(r);
S_53703:;