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>
65 lines
2.5 KiB
C++
65 lines
2.5 KiB
C++
// BDE - (C) Copyright 1995 by Borland International
|
|
|
|
#include "snipit.h"
|
|
|
|
// General global data
|
|
HINSTANCE hInst;
|
|
pCHAR GlobBuf;
|
|
RECT DeskRect;
|
|
HWND hMainWnd, hViewEdit, hDescEdit;
|
|
INT16 MinHeight, MinWidth, DialogHeightUnits, DialogWidthUnits;
|
|
WNDPROC fpStdEditBoxProc = NULL, fnTabEditBox[2] = {NULL, };
|
|
SrchStruct Search;
|
|
|
|
// Directory in which the tables exist. Full path name will be generated
|
|
// by the application.
|
|
char far szTblDirectory[DBIMAXPATHLEN+1];
|
|
char far szPrivDirectory[DBIMAXPATHLEN+1];
|
|
|
|
// IDAPI specific data.
|
|
hDBIDb SnipItDb;
|
|
|
|
ResStruct MainRes[NUM_RESOURCES] =
|
|
{
|
|
{resBUTTON, IDB_VIEW_CODE, "&View", 6, 22, 50, 12,
|
|
WS_CHILD | BS_DEFPUSHBUTTON | WS_VISIBLE | WS_GROUP | WS_TABSTOP},
|
|
|
|
{resBUTTON, IDB_RUN_CODE, "&Run", 6, 37, 50, 12,
|
|
WS_CHILD | WS_VISIBLE | WS_TABSTOP},
|
|
|
|
{resBUTTON, IDB_COPY, "&Copy", 6, 52, 50, 12,
|
|
WS_CHILD | WS_VISIBLE | WS_TABSTOP},
|
|
|
|
{resLISTBOX, IDL_SELECT_CODE, "", 59, 23, 140, 58,
|
|
WS_CHILD | LBS_STANDARD | WS_VISIBLE | WS_GROUP | WS_TABSTOP},
|
|
|
|
{resEDIT, IDE_DESCRIBE_CODE, "", 202, 23, 100, 45,
|
|
WS_CHILD | WS_VISIBLE | WS_BORDER | WS_GROUP | WS_TABSTOP | ES_READONLY |
|
|
WS_VSCROLL | ES_MULTILINE},
|
|
|
|
{resEDIT64, IDE_VIEWER_OUTPUT, "", 3, 96, 310, 105,
|
|
WS_CHILD | ES_MULTILINE | WS_BORDER | WS_VSCROLL | ES_READONLY |
|
|
WS_HSCROLL | WS_GROUP | WS_VISIBLE | WS_TABSTOP},
|
|
|
|
{resSTATIC, -1, "Sample Code", 59, 14, 140, 8,
|
|
WS_CHILD | SS_CENTER | WS_VISIBLE | WS_GROUP},
|
|
|
|
{resSTATIC, IDT_HEADER_1, "Description", 202, 14, 100, 8,
|
|
WS_CHILD | SS_CENTER | WS_VISIBLE | WS_GROUP},
|
|
|
|
{resSTATIC, -1, "File:", 202, 71, 16, 8,
|
|
WS_CHILD | SS_RIGHT | WS_VISIBLE | WS_GROUP},
|
|
|
|
{resSTATIC, IDT_FILE_NAME, "", 221, 70, 148, 10,
|
|
WS_CHILD | SS_CENTER | WS_BORDER | WS_VISIBLE | WS_GROUP},
|
|
|
|
{resSTATIC, IDT_HEADER_2, "Sample Code Selection",
|
|
3, 3, 310, 10, WS_CHILD | SS_CENTER | WS_BORDER | WS_VISIBLE | WS_GROUP},
|
|
|
|
{resSTATIC, IDT_OUTPUT_HEADER, "Sample Code Viewer", 3, 86, 310, 10,
|
|
WS_CHILD | SS_CENTER | WS_BORDER | WS_VISIBLE | WS_GROUP},
|
|
|
|
{resSTATIC, IDS_SHADE, "", 3, 13, 311, 71,
|
|
SS_BLACKFRAME | WS_CHILD | WS_VISIBLE}
|
|
};
|