94 WriteLn(stdout, ' --altdmg'); |
94 WriteLn(stdout, ' --altdmg'); |
95 WriteLn(stdout, ' --no-teamtag'); |
95 WriteLn(stdout, ' --no-teamtag'); |
96 WriteLn(stdout, ' --no-hogtag'); |
96 WriteLn(stdout, ' --no-hogtag'); |
97 WriteLn(stdout, ' --no-healthtag'); |
97 WriteLn(stdout, ' --no-healthtag'); |
98 WriteLn(stdout, ' --translucent-tags'); |
98 WriteLn(stdout, ' --translucent-tags'); |
|
99 WriteLn(stdout, ' --chat-size [default chat size in percent]'); |
99 WriteLn(stdout, ' --stats-only'); |
100 WriteLn(stdout, ' --stats-only'); |
100 WriteLn(stdout, ' --help'); |
101 WriteLn(stdout, ' --help'); |
101 WriteLn(stdout, ''); |
102 WriteLn(stdout, ''); |
102 WriteLn(stdout, 'For more detailed help and examples go to:'); |
103 WriteLn(stdout, 'For more detailed help and examples go to:'); |
103 WriteLn(stdout, 'http://hedgewars.org/kb/CommandLineOptions'); |
104 WriteLn(stdout, 'http://hedgewars.org/kb/CommandLineOptions'); |
213 const videoarray: array [0..4] of string = ('--fullscreen-width','--fullscreen-height', '--width', '--height', '--depth'); |
214 const videoarray: array [0..4] of string = ('--fullscreen-width','--fullscreen-height', '--width', '--height', '--depth'); |
214 audioarray: array [0..2] of string = ('--volume','--nomusic','--nosound'); |
215 audioarray: array [0..2] of string = ('--volume','--nomusic','--nosound'); |
215 otherarray: array [0..2] of string = ('--locale','--fullscreen','--showfps'); |
216 otherarray: array [0..2] of string = ('--locale','--fullscreen','--showfps'); |
216 mediaarray: array [0..9] of string = ('--fullscreen-width', '--fullscreen-height', '--width', '--height', '--depth', '--volume','--nomusic','--nosound','--locale','--fullscreen'); |
217 mediaarray: array [0..9] of string = ('--fullscreen-width', '--fullscreen-height', '--width', '--height', '--depth', '--volume','--nomusic','--nosound','--locale','--fullscreen'); |
217 allarray: array [0..17] of string = ('--fullscreen-width','--fullscreen-height', '--width', '--height', '--depth','--volume','--nomusic','--nosound','--locale','--fullscreen','--showfps','--altdmg','--frame-interval','--low-quality','--no-teamtag','--no-hogtag','--no-healthtag','--translucent-tags'); |
218 allarray: array [0..17] of string = ('--fullscreen-width','--fullscreen-height', '--width', '--height', '--depth','--volume','--nomusic','--nosound','--locale','--fullscreen','--showfps','--altdmg','--frame-interval','--low-quality','--no-teamtag','--no-hogtag','--no-healthtag','--translucent-tags'); |
218 reallyAll: array[0..35] of shortstring = ( |
219 reallyAll: array[0..36] of shortstring = ( |
219 '--prefix', '--user-prefix', '--locale', '--fullscreen-width', '--fullscreen-height', '--width', |
220 '--prefix', '--user-prefix', '--locale', '--fullscreen-width', '--fullscreen-height', '--width', |
220 '--height', '--frame-interval', '--volume','--nomusic', '--nosound', |
221 '--height', '--frame-interval', '--volume','--nomusic', '--nosound', |
221 '--fullscreen', '--showfps', '--altdmg', '--low-quality', '--raw-quality', '--stereo', '--nick', |
222 '--fullscreen', '--showfps', '--altdmg', '--low-quality', '--raw-quality', '--stereo', '--nick', |
222 {deprecated} '--depth', '--set-video', '--set-audio', '--set-other', '--set-multimedia', '--set-everything', |
223 {deprecated} '--depth', '--set-video', '--set-audio', '--set-other', '--set-multimedia', '--set-everything', |
223 {internal} '--internal', '--port', '--recorder', '--landpreview', |
224 {internal} '--internal', '--port', '--recorder', '--landpreview', |
224 {misc} '--stats-only', '--gci', '--help','--no-teamtag','--no-hogtag','--no-healthtag','--translucent-tags','--lua-test'); |
225 {misc} '--stats-only', '--gci', '--help','--no-teamtag','--no-hogtag','--no-healthtag','--translucent-tags','--lua-test','--chat-size'); |
225 var cmdIndex: byte; |
226 var cmdIndex: byte; |
226 begin |
227 begin |
227 parseParameter:= false; |
228 parseParameter:= false; |
228 cmdIndex:= 0; |
229 cmdIndex:= 0; |
229 |
230 |
269 {--no-teamtag} 31 : cTagsMask := cTagsMask and (not htTeamName); |
270 {--no-teamtag} 31 : cTagsMask := cTagsMask and (not htTeamName); |
270 {--no-hogtag} 32 : cTagsMask := cTagsMask and (not htName); |
271 {--no-hogtag} 32 : cTagsMask := cTagsMask and (not htName); |
271 {--no-healthtag} 33 : cTagsMask := cTagsMask and (not htHealth); |
272 {--no-healthtag} 33 : cTagsMask := cTagsMask and (not htHealth); |
272 {--translucent-tags} 34 : cTagsMask := cTagsMask or htTransparent; |
273 {--translucent-tags} 34 : cTagsMask := cTagsMask or htTransparent; |
273 {--lua-test} 35 : begin cTestLua := true; SetSound(false); cScriptName := getstringParameter(arg, paramIndex, parseParameter); WriteLn(stdout, 'Lua test file specified: ' + cScriptName);end; |
274 {--lua-test} 35 : begin cTestLua := true; SetSound(false); cScriptName := getstringParameter(arg, paramIndex, parseParameter); WriteLn(stdout, 'Lua test file specified: ' + cScriptName);end; |
|
275 {--chat-size} 36 : cDefaultChatScale := 1.0 * getLongIntParameter(arg, paramIndex, parseParameter) / 100; |
274 else |
276 else |
275 begin |
277 begin |
276 //Assume the first "non parameter" is the replay file, anything else is invalid |
278 //Assume the first "non parameter" is the replay file, anything else is invalid |
277 if (recordFileName = '') and (Copy(cmd,1,2) <> '--') then |
279 if (recordFileName = '') and (Copy(cmd,1,2) <> '--') then |
278 recordFileName := cmd |
280 recordFileName := cmd |