summaryrefslogtreecommitdiff
path: root/olb/dumpav.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'olb/dumpav.cpp')
-rw-r--r--olb/dumpav.cpp29
1 files changed, 29 insertions, 0 deletions
diff --git a/olb/dumpav.cpp b/olb/dumpav.cpp
new file mode 100644
index 0000000..a6f7a97
--- /dev/null
+++ b/olb/dumpav.cpp
@@ -0,0 +1,29 @@
+extern "C" {
+#include "online.dcl"
+}
+
+void main(int argc, char **argv)
+{
+ CHAR found, passage[64], *p;
+ int i, j;
+ INT word;
+ short verse_list[MAX_LIST];
+ short versedata[MAX_VERSE];
+ char data[MAX_DATA];
+ extern struct zonline online;
+ int versenum = 0;
+
+
+ if (argc > 1)
+ call DOINIT(argv[1]); /* initialise system */
+ else call DOINIT("g:\\bible\\av"); /* initialise system */
+
+ for (versenum = 23146; versenum <= 23147 /*31102*/; versenum++) {
+ call GETEXT(versenum, versedata, 1, 1, 1, 1);
+ call BLDVERSE(versedata, data);
+ printf("%s\n", VRSTOREF(versenum, 1));
+// printf("%s\n", data);
+ }
+
+ DOEND();
+} \ No newline at end of file