Imported Upstream version 1.5.3

12 files changed, 318 insertions, 0 deletions

diff --git a/apps/windoze/CBuilder1/mainform.cpp b/apps/windoze/CBuilder1/mainform.cpp
new file mode 100644
index 0000000..0118d7b
--- /dev/null
+++ b/apps/windoze/CBuilder1/mainform.cpp
@@ -0,0 +1,31 @@
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "mainform.h"
+//---------------------------------------------------------------------------
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+		   webster->SetKey(Edit1->Text.c_str());
+           Memo1->Text = webster->operator char*();
+
+}
+//---------------------------------------------------------------------
+void __fastcall TForm1::FormCreate(TObject *Sender)
+{
+	webster = new RawText("../../../modules/texts/rawtext/orthjbc/", "Webster", "Webster Text");
+}
+//---------------------------------------------------------------------
+void __fastcall TForm1::FormDestroy(TObject *Sender)
+{
+	delete webster;
+}
+//---------------------------------------------------------------------
\ No newline at end of file
diff --git a/apps/windoze/CBuilder1/mainform.dfm b/apps/windoze/CBuilder1/mainform.dfm
new file mode 100644
index 0000000..f2964cf
--- /dev/null
+++ b/apps/windoze/CBuilder1/mainform.dfm
diff --git a/apps/windoze/CBuilder1/mainform.h b/apps/windoze/CBuilder1/mainform.h
new file mode 100644
index 0000000..ed791c5
--- /dev/null
+++ b/apps/windoze/CBuilder1/mainform.h
@@ -0,0 +1,28 @@
+//---------------------------------------------------------------------------
+#ifndef mainformH
+#define mainformH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <rawtext.h>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components 
+	TEdit *Edit1;
+	TButton *Button1;
+	TMemo *Memo1;
+	void __fastcall Button1Click(TObject *Sender);
+	void __fastcall FormCreate(TObject *Sender);
+	void __fastcall FormDestroy(TObject *Sender);
+private:	// User declarations
+	RawText *webster;
+public:		// User declarations
+	virtual __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif
diff --git a/apps/windoze/CBuilder1/sword.cpp b/apps/windoze/CBuilder1/sword.cpp
new file mode 100644
index 0000000..6263492
--- /dev/null
+++ b/apps/windoze/CBuilder1/sword.cpp
@@ -0,0 +1,35 @@
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("mainform.cpp", Form1);
+USERES("sword.res");
+USEUNIT("\usr\troy\src\sword\keys\versekey.cpp");
+USEUNIT("\usr\troy\src\sword\keys\swkey.cpp");
+USEUNIT("\usr\troy\src\sword\keys\listkey.cpp");
+USEUNIT("\usr\troy\src\sword\keys\strkey.cpp");
+USEUNIT("\usr\troy\src\sword\modules\swmodule.cpp");
+USEUNIT("\usr\troy\src\sword\modules\texts\swtext.cpp");
+USEUNIT("\usr\troy\src\sword\modules\texts\rawtext\rawtext.cpp");
+USEUNIT("\usr\troy\src\sword\modules\comments\swcom.cpp");
+USEUNIT("\usr\troy\src\sword\modules\comments\rawcom\rawcom.cpp");
+USEUNIT("\usr\troy\src\sword\modules\common\zverse.cpp");
+USEUNIT("\usr\troy\src\sword\modules\common\rawstr.cpp");
+USEUNIT("\usr\troy\src\sword\modules\common\rawverse.cpp");
+USEUNIT("\usr\troy\src\sword\modules\common\swcomprs.cpp");
+USEUNIT("\usr\troy\src\sword\modules\lexdict\swld.cpp");
+USEUNIT("\usr\troy\src\sword\modules\lexdict\rawld\rawld.cpp");
+USEUNIT("\usr\troy\src\sword\utilfuns\utilstr.cpp");
+USEUNIT("\usr\troy\src\sword\utilfuns\utilconf.cpp");
+USEUNIT("\usr\troy\src\sword\frontend\swdisp.cpp");
+//---------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+	Application->Initialize();
+	Application->Title = "The SWORD Project";
+	Application->CreateForm(__classid(TForm1), &Form1);
+	Application->Run();
+
+	return 0;
+}
+//---------------------------------------------------------------------------
diff --git a/apps/windoze/CBuilder1/sword.mak b/apps/windoze/CBuilder1/sword.mak
new file mode 100644
index 0000000..36c1bdf
--- /dev/null
+++ b/apps/windoze/CBuilder1/sword.mak
@@ -0,0 +1,73 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.01
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = sword.exe
+OBJFILES = sword.obj mainform.obj \usr\troy\src\sword\keys\versekey.obj \
+   \usr\troy\src\sword\keys\swkey.obj \usr\troy\src\sword\keys\listkey.obj \
+   \usr\troy\src\sword\keys\strkey.obj \usr\troy\src\sword\modules\swmodule.obj \
+   \usr\troy\src\sword\modules\texts\swtext.obj \
+   \usr\troy\src\sword\modules\texts\rawtext\rawtext.obj \
+   \usr\troy\src\sword\modules\comments\swcom.obj \
+   \usr\troy\src\sword\modules\comments\rawcom\rawcom.obj \
+   \usr\troy\src\sword\modules\common\zverse.obj \
+   \usr\troy\src\sword\modules\common\rawstr.obj \
+   \usr\troy\src\sword\modules\common\rawverse.obj \
+   \usr\troy\src\sword\modules\common\swcomprs.obj \
+   \usr\troy\src\sword\modules\lexdict\swld.obj \
+   \usr\troy\src\sword\modules\lexdict\rawld\rawld.obj \
+   \usr\troy\src\sword\utilfuns\utilstr.obj \
+   \usr\troy\src\sword\utilfuns\utilconf.obj \
+   \usr\troy\src\sword\frontend\swdisp.obj
+RESFILES = sword.res
+RESDEPEN = $(RESFILES) mainform.dfm
+LIBFILES = 
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -k -r- -y -v -vi- -c -a4 -b- -w-par -w-inl -Vx -Ve -x    \
+   -WE 
+CFLAG2 = -Ic:\usr\troy\src\sword\frontend\windoze;c:\usr\troy\src\sword\frontend;c:\usr\troy\src\sword\utilfuns;c:\usr\troy\src\sword\modules\lexdict\rawld;c:\usr\troy\src\sword\modules\lexdict;c:\usr\troy\src\sword\modules\common;c:\usr\troy\src\sword\modules\comments\rawcom;c:\usr\troy\src\sword\modules\comments;c:\usr\troy\src\sword\modules\texts\rawtext;c:\usr\troy\src\sword\modules\texts;c:\usr\troy\src\sword\modules;c:\usr\troy\src\sword\keys;c:\usr\troy\src\sword\include;c:\usr\troy\src\sword\frontend\windoze\cbuilder;$(BCB)\lib\obj;$(BCB)\include;$(BCB)\include\vcl \
+   -H=$(BCB)\lib\vcld.csm      
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+   -Uc:\usr\troy\src\sword\frontend;c:\usr\troy\src\sword\utilfuns;c:\usr\troy\src\sword\modules\lexdict\rawld;c:\usr\troy\src\sword\modules\lexdict;c:\usr\troy\src\sword\modules\common;c:\usr\troy\src\sword\modules\comments\rawcom;c:\usr\troy\src\sword\modules\comments;c:\usr\troy\src\sword\modules\texts\rawtext;c:\usr\troy\src\sword\modules\texts;c:\usr\troy\src\sword\modules;c:\usr\troy\src\sword\keys;c:\usr\troy\src\sword\frontend\windoze\cbuilder;$(BCB)\lib\obj;$(BCB)\lib \
+   -Ic:\usr\troy\src\sword\frontend\windoze;c:\usr\troy\src\sword\frontend;c:\usr\troy\src\sword\utilfuns;c:\usr\troy\src\sword\modules\lexdict\rawld;c:\usr\troy\src\sword\modules\lexdict;c:\usr\troy\src\sword\modules\common;c:\usr\troy\src\sword\modules\comments\rawcom;c:\usr\troy\src\sword\modules\comments;c:\usr\troy\src\sword\modules\texts\rawtext;c:\usr\troy\src\sword\modules\texts;c:\usr\troy\src\sword\modules;c:\usr\troy\src\sword\keys;c:\usr\troy\src\sword\include;c:\usr\troy\src\sword\frontend\windoze\cbuilder;$(BCB)\lib\obj;$(BCB)\include;$(BCB)\include\vcl \
+   -v -$Y -$W -$O-                          -JPHNV -M        
+RFLAGS = -ic:\usr\troy\src\sword\frontend\windoze;c:\usr\troy\src\sword\frontend;c:\usr\troy\src\sword\utilfuns;c:\usr\troy\src\sword\modules\lexdict\rawld;c:\usr\troy\src\sword\modules\lexdict;c:\usr\troy\src\sword\modules\common;c:\usr\troy\src\sword\modules\comments\rawcom;c:\usr\troy\src\sword\modules\comments;c:\usr\troy\src\sword\modules\texts\rawtext;c:\usr\troy\src\sword\modules\texts;c:\usr\troy\src\sword\modules;c:\usr\troy\src\sword\keys;c:\usr\troy\src\sword\include;c:\usr\troy\src\sword\frontend\windoze\cbuilder;$(BCB)\lib\obj;$(BCB)\include;$(BCB)\include\vcl 
+LFLAGS = -jc:\usr\troy\src\sword\frontend;c:\usr\troy\src\sword\utilfuns;c:\usr\troy\src\sword\modules\lexdict\rawld;c:\usr\troy\src\sword\modules\lexdict;c:\usr\troy\src\sword\modules\common;c:\usr\troy\src\sword\modules\comments\rawcom;c:\usr\troy\src\sword\modules\comments;c:\usr\troy\src\sword\modules\texts\rawtext;c:\usr\troy\src\sword\modules\texts;c:\usr\troy\src\sword\modules;c:\usr\troy\src\sword\keys;c:\usr\troy\src\sword\frontend\windoze\cbuilder;$(BCB)\lib\obj;$(BCB)\lib \
+   -Lc:\usr\troy\src\sword\frontend;c:\usr\troy\src\sword\utilfuns;c:\usr\troy\src\sword\modules\lexdict\rawld;c:\usr\troy\src\sword\modules\lexdict;c:\usr\troy\src\sword\modules\common;c:\usr\troy\src\sword\modules\comments\rawcom;c:\usr\troy\src\sword\modules\comments;c:\usr\troy\src\sword\modules\texts\rawtext;c:\usr\troy\src\sword\modules\texts;c:\usr\troy\src\sword\modules;c:\usr\troy\src\sword\keys;c:\usr\troy\src\sword\frontend\windoze\cbuilder;$(BCB)\lib\obj;$(BCB)\lib \
+   -aa -Tpe -x -v              -V4.0    
+IFLAGS = 
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) vcl.lib import32.lib cp32mt.lib 
+# ---------------------------------------------------------------------------
+.autodepend
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB),, +
+    $(ALLRES) 
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $* 
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------
diff --git a/apps/windoze/CBuilder1/swordvcl/Unit1.cpp b/apps/windoze/CBuilder1/swordvcl/Unit1.cpp
new file mode 100644
index 0000000..9909cdf
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/Unit1.cpp
@@ -0,0 +1,14 @@
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "Unit1.h"
+//---------------------------------------------------------------------------
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+//--------------------------------------------------------------------------- 
\ No newline at end of file
diff --git a/apps/windoze/CBuilder1/swordvcl/Unit1.dfm b/apps/windoze/CBuilder1/swordvcl/Unit1.dfm
new file mode 100644
index 0000000..01b0653
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/Unit1.dfm
diff --git a/apps/windoze/CBuilder1/swordvcl/Unit1.h b/apps/windoze/CBuilder1/swordvcl/Unit1.h
new file mode 100644
index 0000000..fdc1574
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/Unit1.h
@@ -0,0 +1,21 @@
+//---------------------------------------------------------------------------
+#ifndef Unit1H
+#define Unit1H
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components 
+private:	// User declarations
+public:		// User declarations
+	virtual __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif
+ 
\ No newline at end of file
diff --git a/apps/windoze/CBuilder1/swordvcl/swordcomp.cpp b/apps/windoze/CBuilder1/swordvcl/swordcomp.cpp
new file mode 100644
index 0000000..e768ced
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/swordcomp.cpp
@@ -0,0 +1,20 @@
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "swordcomp.h"
+//---------------------------------------------------------------------------
+__fastcall TSWModule::TSWModule(TComponent* Owner)
+	: TComponent(Owner)
+{
+}
+//---------------------------------------------------------------------------
+namespace Swordcomp 
+{
+	void __fastcall Register()
+	{
+		TComponentClass classes[1] = {__classid(TSWModule)};
+		RegisterComponents("SWORD", classes, 0);
+	}
+}
+//---------------------------------------------------------------------------
diff --git a/apps/windoze/CBuilder1/swordvcl/swordcomp.h b/apps/windoze/CBuilder1/swordvcl/swordcomp.h
new file mode 100644
index 0000000..d9680bb
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/swordcomp.h
@@ -0,0 +1,19 @@
+//---------------------------------------------------------------------------
+#ifndef swordcompH
+#define swordcompH
+//---------------------------------------------------------------------------
+#include <vcl\sysutils.hpp>
+#include <vcl\controls.hpp>
+#include <vcl\classes.hpp>
+#include <vcl\forms.hpp>
+//---------------------------------------------------------------------------
+class TSWModule : public TComponent
+{
+private:
+protected:
+public:
+	virtual __fastcall TSWModule(TComponent* Owner);
+__published:
+};
+//---------------------------------------------------------------------------
+#endif
diff --git a/apps/windoze/CBuilder1/swordvcl/swordvcl.cpp b/apps/windoze/CBuilder1/swordvcl/swordvcl.cpp
new file mode 100644
index 0000000..c713f08
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/swordvcl.cpp
@@ -0,0 +1,17 @@
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("Unit1.cpp", Form1);
+USERES("swordvcl.res");
+USEUNIT("swordcomp.cpp");
+//---------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+	Application->Initialize();
+	Application->CreateForm(__classid(TForm1), &Form1);
+	Application->Run();
+
+	return 0;
+}
+//---------------------------------------------------------------------------
diff --git a/apps/windoze/CBuilder1/swordvcl/swordvcl.mak b/apps/windoze/CBuilder1/swordvcl/swordvcl.mak
new file mode 100644
index 0000000..f5b5871
--- /dev/null
+++ b/apps/windoze/CBuilder1/swordvcl/swordvcl.mak
@@ -0,0 +1,60 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.01
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = swordvcl.exe
+OBJFILES = swordvcl.obj unit1.obj swordcomp.obj
+RESFILES = swordvcl.res
+RESDEPEN = $(RESFILES) unit1.dfm
+LIBFILES = 
+# ---------------------------------------------------------------------------
+CFLAG1 = -w -Od -Hc -k -r- -y -v -vi- -c -a4 -b- -w-par -w-inl -Vx -Ve -x    \
+    -WE 
+CFLAG2 = -Id:\bordev\cbuilder\projects;c:\usr\troy\src\sword\frontend\windoze\cbuilder\swordvcl;$(BCB)\lib\obj;$(BCB)\include;$(BCB)\include\vcl \
+    -H=$(BCB)\lib\vcld.csm 
+PFLAGS = -Ud:\bordev\cbuilder\projects;c:\usr\troy\src\sword\frontend\windoze\cbuilder\swordvcl;$(BCB)\lib\obj;$(BCB)\lib \
+    \
+   -Id:\bordev\cbuilder\projects;c:\usr\troy\src\sword\frontend\windoze\cbuilder\swordvcl;$(BCB)\lib\obj;$(BCB)\include;$(BCB)\include\vcl \
+    -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE  \
+   -v -$Y -$W -$O- -JPHNV -M        
+RFLAGS = -id:\bordev\cbuilder\projects;c:\usr\troy\src\sword\frontend\windoze\cbuilder\swordvcl;$(BCB)\lib\obj;$(BCB)\include;$(BCB)\include\vcl 
+LFLAGS = -jd:\bordev\cbuilder\projects;c:\usr\troy\src\sword\frontend\windoze\cbuilder\swordvcl;$(BCB)\lib\obj;$(BCB)\lib \
+    \
+   -Ld:\bordev\cbuilder\projects;c:\usr\troy\src\sword\frontend\windoze\cbuilder\swordvcl;$(BCB)\lib\obj;$(BCB)\lib \
+    -aa -Tpe -x -v -V4.0    
+IFLAGS = 
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) vcl.lib import32.lib cp32mt.lib 
+# ---------------------------------------------------------------------------
+.autodepend
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB),, +
+    $(ALLRES) 
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $* 
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------