-
Notifications
You must be signed in to change notification settings - Fork 0
/
H.BAT
124 lines (105 loc) · 2.17 KB
/
H.BAT
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
@echo off
if "%1x"=="x" goto badargs
if "%2x"=="x" goto badargs
set hticargs=-noartiskip -warp %1 %2
set hticwads=-file
set hticnplay=
:parseloop
if "%3x"=="x" goto doneparse
if "%3"=="m" goto nomonsters
if "%3"=="M" goto nomonsters
if "%3"=="s1" goto skill1
if "%3"=="S1" goto skill1
if "%3"=="s2" goto skill2
if "%3"=="S2" goto skill2
if "%3"=="s3" goto skill3
if "%3"=="S3" goto skill3
if "%3"=="s4" goto skill4
if "%3"=="S4" goto skill4
if "%3"=="s5" goto skill5
if "%3"=="S5" goto skill5
if "%3"=="n1" goto nplay1
if "%3"=="N1" goto nplay1
if "%3"=="n2" goto nplay2
if "%3"=="N2" goto nplay2
if "%3"=="n3" goto nplay3
if "%3"=="N3" goto nplay3
if "%3"=="n4" goto nplay4
if "%3"=="N4" goto nplay4
if "%3"=="p" goto altport
if "%3"=="P" goto altport
goto addwad
:nomonsters
set hticargs=%hticargs% -nomonsters
shift
goto parseloop
:skill1
set hticargs=%hticargs% -skill 1
shift
goto parseloop
:skill2
set hticargs=%hticargs% -skill 2
shift
goto parseloop
:skill3
set hticargs=%hticargs% -skill 3
shift
goto parseloop
:skill4
set hticargs=%hticargs% -skill 4
shift
goto parseloop
:skill5
set hticargs=%hticargs% -skill 5
shift
goto parseloop
:nplay1
set hticnplay=1
shift
goto parseloop
:nplay2
set hticnplay=2
shift
goto parseloop
:nplay3
set hticnplay=3
shift
goto parseloop
:nplay4
set hticnplay=4
shift
goto parseloop
:altport
set hticargs=%hticargs% -port 3
shift
goto parseloop
:addwad
set hticwads=%hticwads% %3.wad
shift
goto parseloop
:badargs
echo Usage: H episode map [s?] [m] [n?] [p] [wadfile [wadfile ...] ]
echo.
echo [s?] = skill (1-5)
echo [m] = no monsters
echo [n?] = net play (1-4)
echo [p] = use alternate port setting
echo [wadfile] = add external wadfile (.WAD is implicit)
echo.
goto end
:doneparse
if"%hticwads%"=="-file" goto startgame
set hticargs=%hticargs% %hticwads%
:startgame
if"%hticnplay%x"=="x" goto normalplay
echo -nodes %hticnplay% -deathmatch %hticargs%
ipxsetup -nodes %hticnplay% -deathmatch %hticargs%
goto end
:normalplay
echo %hticargs%
heretic %hticargs%
goto end
:end
set hticargs=
set hticwads=
set hticnplay=