1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-06 00:00:22 +00:00
QB64-PE/internal/source/data11.txt

254 lines
10 KiB
Plaintext
Raw Normal View History

int32 *_FUNC_DIM2_LONG_DIM2=NULL;
if(_FUNC_DIM2_LONG_DIM2==NULL){
_FUNC_DIM2_LONG_DIM2=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_DIM2=0;
}
2020-12-18 05:20:16 +00:00
qbs*oldstr2196=NULL;
if(_FUNC_DIM2_STRING_VARNAME->tmp||_FUNC_DIM2_STRING_VARNAME->fixed||_FUNC_DIM2_STRING_VARNAME->readonly){
2020-12-18 05:20:16 +00:00
oldstr2196=_FUNC_DIM2_STRING_VARNAME;
if (oldstr2196->cmem_descriptor){
_FUNC_DIM2_STRING_VARNAME=qbs_new_cmem(oldstr2196->len,0);
}else{
2020-12-18 05:20:16 +00:00
_FUNC_DIM2_STRING_VARNAME=qbs_new(oldstr2196->len,0);
}
2020-12-18 05:20:16 +00:00
memcpy(_FUNC_DIM2_STRING_VARNAME->chr,oldstr2196->chr,oldstr2196->len);
}
2020-12-18 05:20:16 +00:00
qbs*oldstr2197=NULL;
if(_FUNC_DIM2_STRING_TYP2->tmp||_FUNC_DIM2_STRING_TYP2->fixed||_FUNC_DIM2_STRING_TYP2->readonly){
2020-12-18 05:20:16 +00:00
oldstr2197=_FUNC_DIM2_STRING_TYP2;
if (oldstr2197->cmem_descriptor){
_FUNC_DIM2_STRING_TYP2=qbs_new_cmem(oldstr2197->len,0);
}else{
2020-12-18 05:20:16 +00:00
_FUNC_DIM2_STRING_TYP2=qbs_new(oldstr2197->len,0);
}
2020-12-18 05:20:16 +00:00
memcpy(_FUNC_DIM2_STRING_TYP2->chr,oldstr2197->chr,oldstr2197->len);
}
2020-12-18 05:20:16 +00:00
qbs*oldstr2198=NULL;
if(_FUNC_DIM2_STRING_ELEMENTS->tmp||_FUNC_DIM2_STRING_ELEMENTS->fixed||_FUNC_DIM2_STRING_ELEMENTS->readonly){
2020-12-18 05:20:16 +00:00
oldstr2198=_FUNC_DIM2_STRING_ELEMENTS;
if (oldstr2198->cmem_descriptor){
_FUNC_DIM2_STRING_ELEMENTS=qbs_new_cmem(oldstr2198->len,0);
}else{
2020-12-18 05:20:16 +00:00
_FUNC_DIM2_STRING_ELEMENTS=qbs_new(oldstr2198->len,0);
}
2020-12-18 05:20:16 +00:00
memcpy(_FUNC_DIM2_STRING_ELEMENTS->chr,oldstr2198->chr,oldstr2198->len);
}
qbs *_FUNC_DIM2_STRING_TYP=NULL;
if (!_FUNC_DIM2_STRING_TYP)_FUNC_DIM2_STRING_TYP=qbs_new(0,0);
qbs *_FUNC_DIM2_STRING_CVARNAME=NULL;
if (!_FUNC_DIM2_STRING_CVARNAME)_FUNC_DIM2_STRING_CVARNAME=qbs_new(0,0);
qbs *_FUNC_DIM2_STRING_L=NULL;
if (!_FUNC_DIM2_STRING_L)_FUNC_DIM2_STRING_L=qbs_new(0,0);
int32 *_FUNC_DIM2_LONG_F=NULL;
if(_FUNC_DIM2_LONG_F==NULL){
_FUNC_DIM2_LONG_F=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_F=0;
}
qbs *_FUNC_DIM2_STRING_SCOPE2=NULL;
if (!_FUNC_DIM2_STRING_SCOPE2)_FUNC_DIM2_STRING_SCOPE2=qbs_new(0,0);
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2200=NULL;
if (!byte_element_2200){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2200=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2200=(byte_element_struct*)mem_static_malloc(12);
}
int32 *_FUNC_DIM2_LONG_I=NULL;
if(_FUNC_DIM2_LONG_I==NULL){
_FUNC_DIM2_LONG_I=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_I=0;
}
2020-12-18 05:20:16 +00:00
int64 fornext_value2202;
int64 fornext_finalvalue2202;
int64 fornext_step2202;
uint8 fornext_step_negative2202;
qbs *_FUNC_DIM2_STRING_N=NULL;
if (!_FUNC_DIM2_STRING_N)_FUNC_DIM2_STRING_N=qbs_new(0,0);
int32 *_FUNC_DIM2_LONG_TRY=NULL;
if(_FUNC_DIM2_LONG_TRY==NULL){
_FUNC_DIM2_LONG_TRY=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_TRY=0;
}
int32 *_FUNC_DIM2_LONG_BITS=NULL;
if(_FUNC_DIM2_LONG_BITS==NULL){
_FUNC_DIM2_LONG_BITS=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_BITS=0;
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2204=NULL;
if (!byte_element_2204){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2204=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2204=(byte_element_struct*)mem_static_malloc(12);
}
int32 *_FUNC_DIM2_LONG_NUME=NULL;
if(_FUNC_DIM2_LONG_NUME==NULL){
_FUNC_DIM2_LONG_NUME=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_NUME=0;
}
2020-12-18 05:20:16 +00:00
int32 pass2205;
int32 *_FUNC_DIM2_LONG_BYTES=NULL;
if(_FUNC_DIM2_LONG_BYTES==NULL){
_FUNC_DIM2_LONG_BYTES=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_BYTES=0;
}
2020-12-18 05:20:16 +00:00
int32 pass2216;
int32 pass2217;
int32 pass2218;
int32 pass2219;
int32 *_FUNC_DIM2_LONG_UNSGN=NULL;
if(_FUNC_DIM2_LONG_UNSGN==NULL){
_FUNC_DIM2_LONG_UNSGN=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_UNSGN=0;
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2221=NULL;
if (!byte_element_2221){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2221=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2221=(byte_element_struct*)mem_static_malloc(12);
2019-03-31 23:29:05 +00:00
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2222=NULL;
if (!byte_element_2222){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2222=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2222=(byte_element_struct*)mem_static_malloc(12);
Pushed changes to enhance the Windows Console Experience Window's CONSOLE support has been extended so that: CSRLIN support added. POS(0) support added. LOCATE support added. (Works with optional parameters.) COLOR support added. SCREEN support added to get both character and color information of any point on the console. tab() glitch fixed. (Which could cause an endless loop when printing with comma spaced text/numbers.) _WIDTH support added. _HEIGHT support added. WIDTH support added, with 2 new parameters added so we can set the buffer width and buffer height also. CLS support semi-added. (Doesn't accept colored backgrounds; it clears the screen black. I'm getting tired of working up console stuff which I probably won't ever use myself...) SLEEP support added. END support added so we now end with any keypress and not just enter. _CONSOLEINPUT added, so we can tell the difference in mouse and keyboard input. _CINP(toggle) support added, which allows us to get single character keystrokes from the console. _CONSOLEFONT FontName, FontSize support added, which allows us to change the font and font size we use for the console. _CONSOLECURSOR _SHOW|_HIDE, cursorsize support added, which allows us to show or hide the cursor in the console, and to change its size (from 0 to 100), as desired. New keyboard commands added: _CAPSLOCK -- returns 1 if caps lock is on, 0 if it isn't. _NUMLOCK -- as above, but for num lock _SCROLLOCK -- as above, but for scroll lock _TOGGLE_CAPSLOCK -- toggles the caps lock state for us. _TOGGLE_NUMLOCK -- same, but for num lock _TOGGLE_SCROLLOCK -- same, but for scroll lock
2019-08-27 23:52:02 +00:00
}
2020-11-04 12:46:52 +00:00
qbs *_FUNC_DIM2_STRING_C=NULL;
if (!_FUNC_DIM2_STRING_C)_FUNC_DIM2_STRING_C=qbs_new(0,0);
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2223=NULL;
if (!byte_element_2223){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2223=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2223=(byte_element_struct*)mem_static_malloc(12);
2020-11-04 12:46:52 +00:00
}
int32 *_FUNC_DIM2_LONG_HASHFOUND=NULL;
if(_FUNC_DIM2_LONG_HASHFOUND==NULL){
_FUNC_DIM2_LONG_HASHFOUND=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHFOUND=0;
}
qbs *_FUNC_DIM2_STRING_HASHNAME=NULL;
if (!_FUNC_DIM2_STRING_HASHNAME)_FUNC_DIM2_STRING_HASHNAME=qbs_new(0,0);
int32 *_FUNC_DIM2_LONG_HASHCHKFLAGS=NULL;
if(_FUNC_DIM2_LONG_HASHCHKFLAGS==NULL){
_FUNC_DIM2_LONG_HASHCHKFLAGS=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHCHKFLAGS=0;
}
int32 *_FUNC_DIM2_LONG_HASHRES=NULL;
if(_FUNC_DIM2_LONG_HASHRES==NULL){
_FUNC_DIM2_LONG_HASHRES=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHRES=0;
}
int32 *_FUNC_DIM2_LONG_HASHRESFLAGS=NULL;
if(_FUNC_DIM2_LONG_HASHRESFLAGS==NULL){
_FUNC_DIM2_LONG_HASHRESFLAGS=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHRESFLAGS=0;
}
int32 *_FUNC_DIM2_LONG_HASHRESREF=NULL;
if(_FUNC_DIM2_LONG_HASHRESREF==NULL){
_FUNC_DIM2_LONG_HASHRESREF=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHRESREF=0;
}
int32 *_FUNC_DIM2_LONG_I2=NULL;
if(_FUNC_DIM2_LONG_I2==NULL){
_FUNC_DIM2_LONG_I2=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_I2=0;
}
int32 *_FUNC_DIM2_LONG_T=NULL;
if(_FUNC_DIM2_LONG_T==NULL){
_FUNC_DIM2_LONG_T=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_T=0;
}
long double *_FUNC_DIM2_FLOAT_V=NULL;
if(_FUNC_DIM2_FLOAT_V==NULL){
_FUNC_DIM2_FLOAT_V=(long double*)mem_static_malloc(32);
*_FUNC_DIM2_FLOAT_V=0;
}
int64 *_FUNC_DIM2_INTEGER64_V=NULL;
if(_FUNC_DIM2_INTEGER64_V==NULL){
_FUNC_DIM2_INTEGER64_V=(int64*)mem_static_malloc(8);
*_FUNC_DIM2_INTEGER64_V=0;
}
uint64 *_FUNC_DIM2_UINTEGER64_V=NULL;
if(_FUNC_DIM2_UINTEGER64_V==NULL){
_FUNC_DIM2_UINTEGER64_V=(uint64*)mem_static_malloc(8);
*_FUNC_DIM2_UINTEGER64_V=0;
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2225=NULL;
if (!byte_element_2225){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2225=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2225=(byte_element_struct*)mem_static_malloc(12);
2018-12-31 04:22:26 +00:00
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2227=NULL;
if (!byte_element_2227){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2227=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2227=(byte_element_struct*)mem_static_malloc(12);
2020-07-15 11:34:33 +00:00
}
2020-12-18 05:20:16 +00:00
int32 pass2228;
qbs *_FUNC_DIM2_STRING_O=NULL;
if (!_FUNC_DIM2_STRING_O)_FUNC_DIM2_STRING_O=qbs_new(0,0);
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2242=NULL;
if (!byte_element_2242){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2242=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2242=(byte_element_struct*)mem_static_malloc(12);
2019-03-31 23:29:05 +00:00
}
2020-12-18 05:20:16 +00:00
int32 pass2243;
int32 pass2244;
byte_element_struct *byte_element_2250=NULL;
if (!byte_element_2250){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2250=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2250=(byte_element_struct*)mem_static_malloc(12);
2020-07-15 11:34:33 +00:00
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2251=NULL;
if (!byte_element_2251){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2251=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2251=(byte_element_struct*)mem_static_malloc(12);
2020-01-22 16:07:41 +00:00
}
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2252=NULL;
if (!byte_element_2252){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2252=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2252=(byte_element_struct*)mem_static_malloc(12);
2020-11-04 12:46:52 +00:00
}
2020-07-15 11:34:33 +00:00
qbs *_FUNC_DIM2_STRING_CT=NULL;
if (!_FUNC_DIM2_STRING_CT)_FUNC_DIM2_STRING_CT=qbs_new(0,0);
qbs *_FUNC_DIM2_STRING_CMPS=NULL;
if (!_FUNC_DIM2_STRING_CMPS)_FUNC_DIM2_STRING_CMPS=qbs_new(0,0);
2020-12-18 05:20:16 +00:00
byte_element_struct *byte_element_2254=NULL;
if (!byte_element_2254){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2254=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2254=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2255;
int32 pass2256;
byte_element_struct *byte_element_2265=NULL;
if (!byte_element_2265){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2265=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2265=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2266;
int32 pass2267;
byte_element_struct *byte_element_2277=NULL;
if (!byte_element_2277){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2277=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2277=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2278;
int32 pass2279;
byte_element_struct *byte_element_2289=NULL;
if (!byte_element_2289){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2289=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2289=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2290;
int32 pass2291;
int32 pass2295;
int32 pass2299;
byte_element_struct *byte_element_2303=NULL;
if (!byte_element_2303){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2303=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2303=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2304;
int32 pass2305;
byte_element_struct *byte_element_2315=NULL;
if (!byte_element_2315){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2315=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2315=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2316;
int32 pass2317;
byte_element_struct *byte_element_2327=NULL;
if (!byte_element_2327){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2327=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2327=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2328;
int32 pass2329;
byte_element_struct *byte_element_2339=NULL;
if (!byte_element_2339){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2339=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2339=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2340;
int32 pass2341;
byte_element_struct *byte_element_2351=NULL;
if (!byte_element_2351){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2351=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2351=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2352;
int32 pass2353;
int8 pass2362;