summaryrefslogtreecommitdiff
path: root/olb/Getvrsn.c
diff options
context:
space:
mode:
Diffstat (limited to 'olb/Getvrsn.c')
-rw-r--r--olb/Getvrsn.c50
1 files changed, 0 insertions, 50 deletions
diff --git a/olb/Getvrsn.c b/olb/Getvrsn.c
deleted file mode 100644
index 1990733..0000000
--- a/olb/Getvrsn.c
+++ /dev/null
@@ -1,50 +0,0 @@
-#include <online.dcl>
-
-/*
- Get version id for display
-
- If triple verse A_B_C then
-
- Inputs:
- 1 - returns "A"
- 2 - returns "B"
- 3 - returns "A_B"
- 4 - returns "C"
- 5 - returns "A_C"
- 6 - returns "B_C"
- 7 - returns "A_B_C"
-*/
-
-CHAR *GETVRSN(int version)
-{
- extern struct zonline online;
- static CHAR versionid[16];
-
- X("Getvrsn");
- if (version < 1 || version > 7) then
- call ERROR("Version Id Invalid");
- versionid[0] = 0;
- if (version & 1) then
- {
- strcat(versionid, "_");
- STRCAT(versionid, &online.versions[0][0], 16, "Getrsn-1");
- }
- if (version & 2) then
- {
- if (online.versions[1][0] != 0) then
- {
- strcat(versionid, "_");
- STRCAT(versionid, &online.versions[1][0], 16, "Getrsn-2");
- }
- }
- if (version & 4) then
- {
- if (online.versions[2][0] != 0) then
- {
- strcat(versionid, "_");
- STRCAT(versionid, &online.versions[2][0], 16, "Getrsn-3");
- }
- }
- Y();
- return(&versionid[1]);
-}