📄 sctpred.h
字号:
/*-- xFirst_SDL_Octet_String ----------------------------------------*/
#define xFirst_SDL_Octet_String(B) xFirst_SDL_Bit_String(B)
/*-- xLast_SDL_Octet_String -----------------------------------------*/
#define xLast_SDL_Octet_String(B) xLast_SDL_Bit_String(B)
/*-- xConcat_SDL_Octet_String ---------------------------------------*/
#define xConcat_SDL_Octet_String(B1,B2) xConcat_SDL_Bit_String(B1,B2)
/*-- xSubString_SDL_Octet_String ------------------------------------*/
#define xSubString_SDL_Octet_String(B1,B2,B3) xSubString_SDL_Bit_String(B1,B2,B3)
/*-- xBitStr_SDL_Octet_String ---------------------------------------*/
extern SDL_Bit_String xBitStr_SDL_Octet_String XPP((
SDL_Charstring ));
/*-- xHexStr_SDL_Octet_String ---------------------------------------*/
extern SDL_Bit_String xHexStr_SDL_Octet_String XPP((
SDL_Charstring ));
/*-- xBit_String_SDL_Octet_String -----------------------------------*/
extern SDL_Bit_String xBit_String_SDL_Octet_String XPP((
SDL_Octet_String ));
/*-- xOctet_String_SDL_Octet_String ---------------------------------*/
extern SDL_Octet_String xOctet_String_SDL_Octet_String XPP((
SDL_Bit_String ));
#ifndef ANY_SDL_Octet_String
#define ANY_SDL_Octet_String \
xConcat_SDL_Octet_String \
(xMkString_SDL_Octet_String( ((unsigned char)(GETINTRAND%256)) ), \
xMkString_SDL_Octet_String( ((unsigned char)(GETINTRAND%256)) ) \
)
#endif
#endif
/* XNOUSEOFOCTETBITSTRING */
/*---+---------------------------------------------------------------
Character
-------------------------------------------------------------------*/
#define xLT_SDL_Character(C1,C2) ((C1)<(C2))
#define xLE_SDL_Character(C1,C2) ((C1)<=(C2))
#define xGT_SDL_Character(C1,C2) ((C1)>(C2))
#define xGE_SDL_Character(C1,C2) ((C1)>=(C2))
#define xChr_SDL_Character(I) ((SDL_Character)xMod_SDL_Integer(I,128))
#define xNum_SDL_Character(C) ((SDL_Integer)C)
#define ANY_SDL_Character xChr_SDL_Character(GETINTRAND)
/*---+---------------------------------------------------------------
Charstring
-------------------------------------------------------------------*/
#ifndef XNOUSEOFCHARSTRING
#if defined(XSCT_CADVANCED) || defined(XSCT_CBASIC)
/*-- yFree_SDL_Charstring -----------------------------------------*/
#define yFree_SDL_Charstring(P) xFree_SDL_Charstring(P)
/* function in sctos.c */
/*-- xAss_SDL_Charstring ------------------------------------------*/
extern void xAss_SDL_Charstring XPP((
SDL_Charstring *,
SDL_Charstring,
int ));
/*-- xEq_SDL_Charstring -------------------------------------------*/
extern SDL_Boolean xEq_SDL_Charstring XPP((
SDL_Charstring,
SDL_Charstring ));
/*-- xMod_SDL_Charstring ------------------------------------------*/
/* No longer used by generated code */
extern SDL_Charstring xMod_SDL_Charstring XPP((
SDL_Charstring,
SDL_Integer,
SDL_Character ));
/*-- yAddr_SDL_Charstring ------------------------------------------*/
extern SDL_Character * yAddr_SDL_Charstring XPP((
SDL_Charstring *,
SDL_Integer ));
/*-- xExtr_SDL_Charstring -----------------------------------------*/
extern SDL_Character xExtr_SDL_Charstring XPP((
SDL_Charstring,
SDL_Integer ));
/*-- xMkString_SDL_Charstring -------------------------------------*/
extern SDL_Charstring xMkString_SDL_Charstring XPP((
SDL_Character ));
/*-- xLength_SDL_Charstring ---------------------------------------*/
extern SDL_Integer xLength_SDL_Charstring XPP((
SDL_Charstring ));
/*-- xFirst_SDL_Charstring ----------------------------------------*/
extern SDL_Character xFirst_SDL_Charstring XPP((
SDL_Charstring ));
/*-- xLast_SDL_Charstring -----------------------------------------*/
extern SDL_Character xLast_SDL_Charstring XPP((
SDL_Charstring ));
/*-- xConcat_SDL_Charstring ---------------------------------------*/
extern SDL_Charstring xConcat_SDL_Charstring XPP((
SDL_Charstring,
SDL_Charstring ));
/*-- xSubString_SDL_Charstring ------------------------------------*/
extern SDL_Charstring xSubString_SDL_Charstring XPP((
SDL_Charstring,
SDL_Integer,
SDL_Integer ));
#define ANY_SDL_Charstring \
xConcat_SDL_Charstring \
(xMkString_SDL_Charstring( ((SDL_Character)(1+GETINTRAND%127)) ), \
xMkString_SDL_Charstring( ((SDL_Character)(1+GETINTRAND%127)) ) \
)
#else /* then XSCT_CMICRO */
#ifdef XRESTUSEOFCHARSTRING
/*
** Restricted use of charstrings - Cmicro only
*/
#define yFree_SDL_Charstring(P)
#define xFree_SDL_Charstring(P)
#ifdef XMK_STRINGS_IN_WRITE_MEM
/*-- yAddr_SDL_Charstring ------------------------------------------*/
extern SDL_Character * yAddr_SDL_Charstring XPP((
SDL_Charstring *C,
SDL_Integer Index ));
#endif /* ... XMK_STRINGS_IN_WRITE_MEM */
/*-- xFirst_SDL_Charstring ----------------------------------------*/
extern SDL_Character xFirst_SDL_Charstring XPP((
SDL_Charstring C ));
/*-- xLast_SDL_Charstring -----------------------------------------*/
extern SDL_Character xLast_SDL_Charstring XPP((
SDL_Charstring C ));
#else
/* then ! XRESTUSEOFCHARSTRING */
/*-- yFree_SDL_Charstring -----------------------------------------*/
#define yFree_SDL_Charstring(P) xFree_SDL_Charstring(P)
/* function in sctos.c */
/*-- xAss_SDL_Charstring ------------------------------------------*/
extern void xAss_SDL_Charstring XPP((
SDL_Charstring *CVar,
SDL_Charstring CExpr,
int AssType ));
/*-- xEq_SDL_Charstring -------------------------------------------*/
extern SDL_Boolean xEq_SDL_Charstring XPP((
SDL_Charstring C1,
SDL_Charstring C2 ));
/*-- xMod_SDL_Charstring ------------------------------------------*/
/* No longer used by generated code */
extern SDL_Charstring xMod_SDL_Charstring XPP((
SDL_Charstring C,
SDL_Integer Index,
SDL_Character Value ));
/*-- yAddr_SDL_Charstring ------------------------------------------*/
extern SDL_Character * yAddr_SDL_Charstring XPP((
SDL_Charstring *C,
SDL_Integer Index ));
/*-- xExtr_SDL_Charstring -----------------------------------------*/
extern SDL_Character xExtr_SDL_Charstring XPP((
SDL_Charstring C,
SDL_Integer Index ));
/*-- xMkString_SDL_Charstring -------------------------------------*/
extern SDL_Charstring xMkString_SDL_Charstring XPP((
SDL_Character C ));
/*-- xLength_SDL_Charstring ---------------------------------------*/
extern SDL_Integer xLength_SDL_Charstring XPP((
SDL_Charstring C ));
/*-- xFirst_SDL_Charstring ----------------------------------------*/
extern SDL_Character xFirst_SDL_Charstring XPP((
SDL_Charstring C ));
/*-- xLast_SDL_Charstring -----------------------------------------*/
extern SDL_Character xLast_SDL_Charstring XPP((
SDL_Charstring C ));
/*-- xConcat_SDL_Charstring ---------------------------------------*/
extern SDL_Charstring xConcat_SDL_Charstring XPP((
SDL_Charstring C1,
SDL_Charstring C2 ));
/*-- xSubString_SDL_Charstring ------------------------------------*/
extern SDL_Charstring xSubString_SDL_Charstring XPP((
SDL_Charstring C,
SDL_Integer Start,
SDL_Integer SubLength ));
#endif /* ... XRESTUSEOFCHARSTRING */
#endif /* ... defined(XSCT_CADVANCED) || defined(XSCT_CBASIC) */
#endif
/* XNOUSEOFCHARSTRING */
/*---+---------------------------------------------------------------
IA5String
-------------------------------------------------------------------*/
#define ANY_SDL_IA5String ANY_SDL_Charstring
/*---+---------------------------------------------------------------
NumericString
-------------------------------------------------------------------*/
#ifndef XNOUSEOFOCTETBITSTRING
/*-- xTest_SDL_NumericString --------------------------------------*/
#ifdef XTESTF
extern xbool xTest_SDL_NumericString XPP((
void * ));
#endif
/*-- xTstA_SDL_NumericString --------------------------------------*/
#ifdef XERANGE
extern SDL_NumericString xTstA_SDL_NumericString XPP(( SDL_NumericString ));
#define yTstA_SDL_NumericString(N) xTstA_SDL_NumericString(N)
#else
#define xTstA_SDL_NumericString(N) N
#define yTstA_SDL_NumericString(N) N
#endif
/*-- xTstI_SDL_NumericString --------------------------------------*/
#ifdef XEINDEX
extern SDL_NumericString xTstI_SDL_NumericString XPP(( SDL_NumericString ));
#define yTstI_SDL_NumericString(N) xTstI_SDL_NumericString(N)
#else
#define xTstI_SDL_NumericString(N) N
#define yTstI_SDL_NumericString(N) N
#endif
#define ANY_SDL_NumericString ANY_SDL_Charstring
#endif /* ... XNOUSEOFOCTETBITSTRING */
/*---+---------------------------------------------------------------
PrintableString
-------------------------------------------------------------------*/
#ifndef XNOUSEOFOCTETBITSTRING
/*-- xTest_SDL_PrintableString ------------------------------------*/
#ifdef XTESTF
extern xbool xTest_SDL_PrintableString XPP((
void * ));
#endif
/*-- xTstA_SDL_PrintableString ------------------------------------*/
#ifdef XERANGE
extern SDL_PrintableString xTstA_SDL_PrintableString XPP(( SDL_PrintableString ));
#define yTstA_SDL_PrintableString(N) xTstA_SDL_PrintableString(N)
#else
#define xTstA_SDL_PrintableString(N) N
#define yTstA_SDL_PrintableString(N) N
#endif
/*-- xTstI_SDL_PrintableString -----------------------------------*/
#ifdef XEINDEX
extern SDL_PrintableString xTstI_SDL_PrintableString XPP(( SDL_PrintableString ));
#define yTstI_SDL_PrintableString(N) xTstI_SDL_PrintableString(N)
#else
#define xTstI_SDL_PrintableString(N) N
#define yTstI_SDL_PrintableString(N) N
#endif
#define ANY_SDL_PrintableString ANY_SDL_Charstring
#endif /* ... XNOUSEOFOCTETBITSTRING */
/*---+---------------------------------------------------------------
VisibleString
-------------------------------------------------------------------*/
/*-- xTest_SDL_VisibleString --------------------------------------*/
#ifdef XTESTF
#define xTest_SDL_VisibleString(N) xTest_SDL_PrintableString(N)
#endif
/*-- xTstA_SDL_VisibleString --------------------------------------*/
#define xTstA_SDL_VisibleString(N) xTstA_SDL_PrintableString(N)
#define yTstA_SDL_VisibleString(N) yTstA_SDL_PrintableString(N)
/*-- xTstI_SDL_VisibleString --------------------------------------*/
#define xTstI_SDL_VisibleString(N) xTstI_SDL_PrintableString(N)
#define yTstI_SDL_VisibleString(N) yTstI_SDL_PrintableString(N)
#define ANY_SDL_VisibleString ANY_SDL_Charstring
/*---+---------------------------------------------------------------
Duration
-------------------------------------------------------------------*/
#if defined(XSCT_CADVANCED) || defined(XSCT_CBASIC)
/*-- xPlus_SDL_Duration -------------------------------------------*/
extern SDL_Duration xPlus_SDL_Duration XPP((
SDL_Duration,
SDL_Duration ));
/*-- xMinus_SDL_Duration ------------------------------------------*/
#define xMinus_SDL_Duration(P1, P2) \
xPlus_SDL_Duration(P1, xMonMinus_SDL_Duration(P2))
/*-- xMonMinus_SDL_Duration ---------------------------------------*/
extern SDL_Duration xMonMinus_SDL_Duration XPP((
SDL_Duration ));
/*-- xMult_SDL_Duration -------------------------------------------*/
#ifndef XNOUSEOFREAL
extern SDL_Duration xMult_SDL_Duration XPP((
SDL_Duration,
SDL_Real ));
#endif
/*-- xMultRD_SDL_Duration -----------------------------------------*/
#define xMultRD_SDL_Duration(R,D) xMult_SDL_Duration(D, R)
/*-- xDiv_SDL_Duration --------------------------------------------*/
#ifndef XNOUSEOFREAL
extern SDL_Duration xDiv_SDL_Duration XPP((
SDL_Duration,
SDL_Real ));
#endif
#define xGT_SDL_Duration(P1, P2) xLT_SDL_Time(P2, P1)
#define xGE_SDL_Duration(P1, P2) xLE_SDL_Time(P2, P1)
#define xLT_SDL_Duration(P1, P2) xLT_SDL_Time(P1, P2)
#define xLE_SDL_Duration(P1, P2) xLE_SDL_Time(P1, P2)
/*-- xEq_SDL_Duration ---------------------------------------------*/
extern SDL_Boolean xEq_SDL_Duration XPP((
SDL_Duration,
SDL_Duration ));
#define ANY_SDL_Duration \
SDL_Duration_Lit(GETINTRAND, GETINTRAND % 1000000000)
#else /* then XSCT_CMICRO */
#ifndef XMK_USE_STANDARD_DURATION
#define xPlus_SDL_Duration(a,b) ((long) a + (long) b)
#define xMinus_SDL_Duration(a,b) ((long) a - (long) b)
#define xMult_SDL_Duration(a,b) (a*b)
#define xGT_SDL_Duration(P1, P2) (P1 > P2)
#define xGE_SDL_Duration(P1, P2) (P1 >= P2)
#define xLT_SDL_Duration(P1, P2) (P1 < P2)
#define xLE_SDL_Duration(P1, P2) (P1 <= P2)
#define xEq_SDL_Duration(P1, P2) (P1 == P2)
#define xMonMinus_SDL_Duration(a) (-(long)a)
#define xMultRD_SDL_Duration(a,b) xMult_SDL_Duration(b,a)
#define xDiv_SDL_Duration(a,b) (a/b)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -