CydandClaude Fable 5
63312e07f9
- BORLAND/: Borland C++ 4.52 (chosen over 4.5 by byte-match: CODE/RP/CW32.LIB
is identical to 4.52's install lib). BCC32/TLINK32/TLIB/MAKE run natively on
Win11; CODE/BT/OPT.MAK is the shipped BTL4OPT.EXE's exact flag recipe
(extender = Borland PowerPack DPMI32, not Phar Lap TNT).
- restoration/source410/: the literal 1995-form reconstruction of the missing
BT game source (never mixed into CODE/). Round 1-3 state:
* 6 of 10 surviving original TUs COMPILE CLEAN under the period toolchain
(BTMSSN, BTCNSL, BTSCNRL, BTTEAM, BTL4MODE, BTL4ARND) - first builds
since 1996.
* BT_L4/BTL4APP.CPP pilot reconstruction: 12/12 functions, Fail() lands on
its binary-recorded line 400 exactly.
* BT/BTCNSL.HPP: console wire IDs recovered from the binary's ctors
(Killed=9, Damaged=10, ScoreUpdate=13, DeathWithoutHonor=15 [T1];
TeamScore=12 flagged [T4]).
* MUNGA/: 8 engine-header backfills back-dated from the BT412 WinTesla tree
(VDATA numbering decomp-verified; AUDREND's OpenAL-era virtual removed -
the period compiler is the drift detector).
* Tooling: backdate.py (WinTesla->1995 header transform), compile410.sh
(per-TU verification sweep under authentic OPT.MAK flags).
* README: corrected roadmap - MECH.HPP is the capstone grown with the mech
TU reconstructions; BTREG.CPP green = the header-family milestone.
Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
125 lines
3.6 KiB
Plaintext
125 lines
3.6 KiB
Plaintext
<<[CPP]
|
|
##QUERY_CLASS_NAME [[ClassName]]
|
|
##QUERY_BASE_NAME [[BaseClass]]
|
|
##(BaseClass == "TDocument") || (BaseClass == "TFileDocument")
|
|
##: %\\"[[ClassName]] does not support a response table. "
|
|
##*
|
|
##QUERY_SNP_FUNC_NAME [[FunctionName]]
|
|
##QUERY_SNP_FUNC_RESULT [[FunctionResult]]
|
|
##QUERY_SNP_FUNC_DEFPARAM [[FunctionDefParam]]
|
|
##QUERY_SNP_FUNC_CALLPARAM [[FunctionCallParam]]
|
|
##QUERY_SNP_MACRO_NAME [[MacroName]]
|
|
##QUERY_SNP_MACRO_CALLPARAM [[MCallParam]]
|
|
##QUERY_SNP_RES_CONSTANT [[Constant]]
|
|
##QUERY_SNP_VBXEVENT [[VBXEvent]]
|
|
##--BEGIN-- QUERY_CLASS_NAME [[ClassName]]
|
|
##"//{{[[ClassName]]RSP_TBL_END}}" [[ClassTMarker]]
|
|
##\\ClassTMarker [[ClassMarker]]
|
|
##^BOF
|
|
##(VBXEvent != "") [[VBXMIXIN]]
|
|
##--BEGIN-- ? ClassMarker [[Search]]
|
|
##Search == FALSE
|
|
##: {CAddRsp.SNP}
|
|
##: ^BOF
|
|
##: ? ClassMarker [[Search]]
|
|
##*
|
|
##--END-- ? ClassMarker [[Search]]
|
|
##^BOL
|
|
##\\MCallParam [[MacroCallParam]]
|
|
[[MacroName]][[MacroCallParam]],
|
|
##\\"[[ClassName]]::[[FunctionName]]" [[FindFunction]]
|
|
##^BOF
|
|
##FALSE [[Search]]
|
|
##0 [[YPosition]]
|
|
##0 [[YScrollLine]]
|
|
## --BEGIN-- TRUE
|
|
## {FindFunc.SNP}
|
|
## --BEGIN-- Search != 1
|
|
## :^EOF
|
|
## :(YPos() + 2) YPosition
|
|
|
|
|
|
[[FunctionResult]] [[ClassName]]::[[FunctionName]] [[FunctionDefParam]]
|
|
{
|
|
## --BEGIN-- Constant == ""
|
|
## --BEGIN-- QUERY_BASE_NAME [[BaseClass]]
|
|
## --BEGIN-- FunctionResult != "void"
|
|
[[FunctionResult]] result;
|
|
|
|
##((BaseClass != "TApplication") && (BaseClass != "TModule") && (BaseClass != "TView"))
|
|
result = [[BaseClass]]::[[FunctionName]][[FunctionCallParam]];
|
|
## --END-- FunctionResult != "void"
|
|
##FunctionResult == "void"
|
|
##((BaseClass != "TApplication") && (BaseClass != "TModule") && (BaseClass != "TView"))
|
|
[[BaseClass]]::[[FunctionName]][[FunctionCallParam]];
|
|
|
|
// INSERT>> Your code here.
|
|
## :YPos() YScrollLine
|
|
|
|
##FunctionResult != "void"
|
|
return result;
|
|
## --END-- QUERY_BASE_NAME [[BaseClass]]
|
|
## --END-- Constant == ""
|
|
## --BEGIN-- Constant != ""
|
|
// INSERT>> Your code here.
|
|
## :YPos() YScrollLine
|
|
|
|
## --END-- Constant != ""
|
|
}
|
|
## --END-- Search != 1
|
|
##^@YPosition
|
|
##^SCROLL
|
|
##YScrollLine != 0
|
|
## :^@YScrollLine
|
|
## :^EOL
|
|
##*
|
|
##YScrollLine == 0
|
|
## :^BOL
|
|
##*
|
|
##^^
|
|
## --END-- TRUE
|
|
##--END-- QUERY_CLASS_NAME [[ClassName]]
|
|
>>[CPP]
|
|
|
|
|
|
<<[H]
|
|
##QUERY_SNP_FUNC_NAME [[FunctionName]]
|
|
##QUERY_SNP_FUNC_RESULT [[FunctionResult]]
|
|
##QUERY_SNP_FUNC_DEFPARAM [[FunctionDefParam]]
|
|
##FALSE [[FunctionFound]]
|
|
##--BEGIN-- QUERY_CLASS_NAME [[ClassName]]
|
|
##\\"//{{[[ClassName]]RSP_TBL_BEGIN}}" [[ClassT1Marker]]
|
|
##^BOF
|
|
##--BEGIN-- ? ClassT1Marker
|
|
##FALSE [[Search]]
|
|
##: ^BOL
|
|
##: \\"[[FunctionResult]] [[FunctionName]]" [[FindFunction]]
|
|
##: 0 [[YPosition]]
|
|
## --BEGIN-- TRUE
|
|
##: {FindFunc.SNP}
|
|
## --BEGIN-- Search == 1
|
|
##: ^@YPosition
|
|
##: ^BOL
|
|
##: \\"//{{[[ClassName]]RSP_TBL_END}}" [[ClassT2Marker]]
|
|
##: ? ClassT2Marker FunctionFound
|
|
## --END-- Search == 1
|
|
## --END-- TRUE
|
|
##--END-- ? ClassT1Marker
|
|
##FunctionFound == TRUE
|
|
##: Exit()
|
|
##*
|
|
##"//{{[[ClassName]]RSP_TBL_END}}" [[ClassTMarker]]
|
|
##\\ClassTMarker [[ClassMarker]]
|
|
##^BOF
|
|
##--BEGIN-- ? ClassMarker [[Search]]
|
|
##Search == FALSE
|
|
##: {HAddRsp.SNP}
|
|
##: ^BOF
|
|
##: ? ClassMarker [[Search]]
|
|
##*
|
|
##--END-- ? ClassMarker [[Search]]
|
|
##^BOL
|
|
[[FunctionResult]] [[FunctionName]] [[FunctionDefParam]];
|
|
##--END-- QUERY_CLASS_NAME [[ClassName]]
|
|
>>[H]
|