2012-04-07 20:10:03 +00:00
|
|
|
-- Use this file like
|
|
|
|
-- require("lpeg")
|
|
|
|
-- con_keyword = dofile("con_lang.lua")
|
|
|
|
|
2012-04-22 19:10:46 +00:00
|
|
|
-- NOTE: These MUST be in reverse lexicographical order!
|
|
|
|
-- Per CON syntax, valid identifiers names are disjunct from keywords,
|
|
|
|
-- so that a rule like
|
|
|
|
-- t_identifier = -con_keyword * (sp1 + "[") * t_identifier_all
|
|
|
|
-- (from the final grammar in lunacon.lua) must match the longest
|
|
|
|
-- possible keyword name, else the negation might wrongly not fail.
|
|
|
|
|
2012-04-07 20:10:03 +00:00
|
|
|
return
|
|
|
|
|
|
|
|
lpeg.P(false) +
|
|
|
|
"}" +
|
2012-04-22 19:10:46 +00:00
|
|
|
"{" +
|
2012-04-07 20:10:03 +00:00
|
|
|
"zshootvar" +
|
2012-04-22 19:10:46 +00:00
|
|
|
"zshoot" +
|
|
|
|
"xorvarvar" +
|
|
|
|
"xorvar" +
|
|
|
|
"writearraytofile" +
|
|
|
|
"whilevarvarn" +
|
|
|
|
"whilevarn" +
|
|
|
|
"wackplayer" +
|
|
|
|
"userquote" +
|
|
|
|
"useractor" +
|
|
|
|
"updatesectorz" +
|
|
|
|
"updatesector" +
|
|
|
|
"tossweapon" +
|
|
|
|
"tip" +
|
|
|
|
"time" +
|
|
|
|
"switch" +
|
|
|
|
"subvarvar" +
|
|
|
|
"subvar" +
|
|
|
|
"strength" +
|
|
|
|
"stopsoundvar" +
|
|
|
|
"stopsound" +
|
|
|
|
"stopallsounds" +
|
|
|
|
"stopactorsound" +
|
|
|
|
"state" +
|
|
|
|
"starttrackvar" +
|
|
|
|
"starttrack" +
|
|
|
|
"startlevel" +
|
|
|
|
"ssp" +
|
|
|
|
"sqrt" +
|
|
|
|
"spriteshadow" +
|
|
|
|
"spritepal" +
|
|
|
|
"spritenvg" +
|
|
|
|
"spritenoshade" +
|
|
|
|
"spritenopal" +
|
|
|
|
"spriteflags" +
|
|
|
|
"spgetlotag" +
|
|
|
|
"spgethitag" +
|
|
|
|
"spawn" +
|
|
|
|
"soundvar" +
|
|
|
|
"soundoncevar" +
|
|
|
|
"soundonce" +
|
|
|
|
"sound" +
|
|
|
|
"smaxammo" +
|
|
|
|
"sleeptime" +
|
|
|
|
"sizeto" +
|
|
|
|
"sizeat" +
|
|
|
|
"sin" +
|
|
|
|
"showviewunbiased" +
|
|
|
|
"showview" +
|
|
|
|
"shootvar" +
|
|
|
|
"shoot" +
|
|
|
|
"shiftvarr" +
|
|
|
|
"shiftvarl" +
|
|
|
|
"setwall" +
|
|
|
|
"setvarvar" +
|
|
|
|
"setvar" +
|
|
|
|
"setuserdef" +
|
|
|
|
"settspr" +
|
|
|
|
"setthisprojectile" +
|
|
|
|
"setsprite" +
|
|
|
|
"setsector" +
|
|
|
|
"setprojectile" +
|
|
|
|
"setplayervar" +
|
|
|
|
"setplayerangle" +
|
|
|
|
"setplayer" +
|
|
|
|
"setinput" +
|
|
|
|
"setgamepalette" +
|
|
|
|
"setgamename" +
|
|
|
|
"setdefname" +
|
|
|
|
"setcfgname" +
|
|
|
|
"setaspect" +
|
|
|
|
"setarray" +
|
|
|
|
"setactorvar" +
|
|
|
|
"setactorsoundpitch" +
|
|
|
|
"setactorangle" +
|
|
|
|
"setactor" +
|
|
|
|
"sectsetinterpolation" +
|
|
|
|
"sectorofwall" +
|
|
|
|
"sectgetlotag" +
|
|
|
|
"sectgethitag" +
|
|
|
|
"sectclearinterpolation" +
|
|
|
|
"scriptsize" +
|
|
|
|
"savenn" +
|
|
|
|
"savemapstate" +
|
|
|
|
"savegamevar" +
|
|
|
|
"save" +
|
|
|
|
"rotatesprite16" +
|
|
|
|
"rotatesprite" +
|
|
|
|
"rotatepoint" +
|
|
|
|
"return" +
|
|
|
|
"respawnhitag" +
|
|
|
|
"resizearray" +
|
|
|
|
"resetplayer" +
|
|
|
|
"resetcount" +
|
|
|
|
"resetactioncount" +
|
|
|
|
"redefinequote" +
|
|
|
|
"readgamevar" +
|
|
|
|
"readarrayfromfile" +
|
|
|
|
"rayintersect" +
|
|
|
|
"randvarvar" +
|
|
|
|
"randvar" +
|
|
|
|
"quote" +
|
|
|
|
"quake" +
|
|
|
|
"qsubstr" +
|
|
|
|
"qstrncat" +
|
|
|
|
"qstrlen" +
|
|
|
|
"qstrcpy" +
|
|
|
|
"qstrcat" +
|
|
|
|
"qsprintf" +
|
|
|
|
"qspawnvar" +
|
|
|
|
"qspawn" +
|
|
|
|
"qgetsysstr" +
|
|
|
|
"pstomp" +
|
|
|
|
"prevspritestat" +
|
|
|
|
"prevspritesect" +
|
|
|
|
"precache" +
|
|
|
|
"pkick" +
|
|
|
|
"paper" +
|
|
|
|
"palfrom" +
|
|
|
|
"orvarvar" +
|
|
|
|
"orvar" +
|
|
|
|
"operatesectors" +
|
|
|
|
"operaterespawns" +
|
|
|
|
"operatemasterswitches" +
|
|
|
|
"operateactivators" +
|
|
|
|
"operate" +
|
|
|
|
"onevent" +
|
|
|
|
"nullop" +
|
|
|
|
"nextspritestat" +
|
|
|
|
"nextspritesect" +
|
|
|
|
"neartag" +
|
|
|
|
"myosx" +
|
|
|
|
"myospalx" +
|
|
|
|
"myospal" +
|
|
|
|
"myos" +
|
|
|
|
"music" +
|
|
|
|
"mulvarvar" +
|
|
|
|
"mulvar" +
|
|
|
|
"mulscale" +
|
|
|
|
"movesprite" +
|
|
|
|
"move" +
|
|
|
|
"money" +
|
|
|
|
"modvarvar" +
|
|
|
|
"modvar" +
|
|
|
|
"minitext" +
|
|
|
|
"mikesnd" +
|
|
|
|
"mail" +
|
|
|
|
"lotsofglass" +
|
|
|
|
"lockplayer" +
|
|
|
|
"loadmapstate" +
|
|
|
|
"lineintersect" +
|
|
|
|
"ldist" +
|
|
|
|
"killit" +
|
|
|
|
"jump" +
|
|
|
|
"insertspriteq" +
|
|
|
|
"inittimer" +
|
|
|
|
"includedefault" +
|
|
|
|
"include" +
|
|
|
|
"ifwasweapon" +
|
|
|
|
"ifvarxor" +
|
|
|
|
"ifvarvarxor" +
|
|
|
|
"ifvarvaror" +
|
|
|
|
"ifvarvarn" +
|
|
|
|
"ifvarvarl" +
|
|
|
|
"ifvarvarg" +
|
|
|
|
"ifvarvareither" +
|
|
|
|
"ifvarvare" +
|
|
|
|
"ifvarvarand" +
|
|
|
|
"ifvaror" +
|
|
|
|
"ifvarn" +
|
|
|
|
"ifvarl" +
|
|
|
|
"ifvarg" +
|
|
|
|
"ifvareither" +
|
|
|
|
"ifvare" +
|
|
|
|
"ifvarand" +
|
|
|
|
"ifstrength" +
|
|
|
|
"ifsquished" +
|
|
|
|
"ifspritepal" +
|
|
|
|
"ifspawnedby" +
|
|
|
|
"ifsound" +
|
|
|
|
"ifserver" +
|
|
|
|
"ifrnd" +
|
|
|
|
"ifrespawn" +
|
|
|
|
"ifpinventory" +
|
|
|
|
"ifphealthl" +
|
|
|
|
"ifpdistl" +
|
|
|
|
"ifpdistg" +
|
|
|
|
"ifp" +
|
|
|
|
"ifoutside" +
|
|
|
|
"ifonwater" +
|
|
|
|
"ifnotmoving" +
|
|
|
|
"ifnosounds" +
|
|
|
|
"ifmultiplayer" +
|
|
|
|
"ifmove" +
|
|
|
|
"ifinwater" +
|
|
|
|
"ifinspace" +
|
|
|
|
"ifinouterspace" +
|
|
|
|
"ifhitweapon" +
|
|
|
|
"ifhitspace" +
|
|
|
|
"ifgotweaponce" +
|
|
|
|
"ifgapzl" +
|
|
|
|
"iffloordistl" +
|
|
|
|
"ifdead" +
|
|
|
|
"ifcount" +
|
|
|
|
"ifclient" +
|
|
|
|
"ifceilingdistl" +
|
|
|
|
"ifcanshoottarget" +
|
|
|
|
"ifcanseetarget" +
|
|
|
|
"ifcansee" +
|
|
|
|
"ifbulletnear" +
|
|
|
|
"ifawayfromwall" +
|
|
|
|
"ifangdiffl" +
|
|
|
|
"ifai" +
|
|
|
|
"ifactorsound" +
|
|
|
|
"ifactornotstayput" +
|
|
|
|
"ifactor" +
|
|
|
|
"ifactioncount" +
|
|
|
|
"ifaction" +
|
|
|
|
"hitscan" +
|
|
|
|
"hitradiusvar" +
|
|
|
|
"hitradius" +
|
|
|
|
"headspritestat" +
|
|
|
|
"headspritesect" +
|
|
|
|
"guts" +
|
|
|
|
"guniqhudid" +
|
|
|
|
"gmaxammo" +
|
|
|
|
"globalsoundvar" +
|
|
|
|
"globalsound" +
|
|
|
|
"getzrange" +
|
|
|
|
"getwall" +
|
|
|
|
"getuserdef" +
|
|
|
|
"gettspr" +
|
|
|
|
"gettimedate" +
|
|
|
|
"getticks" +
|
|
|
|
"getthisprojectile" +
|
|
|
|
"gettexturefloor" +
|
|
|
|
"gettextureceiling" +
|
|
|
|
"getsector" +
|
|
|
|
"getprojectile" +
|
|
|
|
"getpname" +
|
|
|
|
"getplayervar" +
|
|
|
|
"getplayerangle" +
|
|
|
|
"getplayer" +
|
|
|
|
"getlastpal" +
|
|
|
|
"getkeyname" +
|
|
|
|
"getinput" +
|
|
|
|
"getincangle" +
|
|
|
|
"getflorzofslope" +
|
|
|
|
"getcurraddress" +
|
|
|
|
"getceilzofslope" +
|
|
|
|
"getarraysize" +
|
|
|
|
"getangletotarget" +
|
|
|
|
"getangle" +
|
|
|
|
"getactorvar" +
|
|
|
|
"getactorangle" +
|
|
|
|
"getactor" +
|
|
|
|
"gamevar" +
|
|
|
|
"gametextz" +
|
|
|
|
"gametext" +
|
|
|
|
"gamestartup" +
|
|
|
|
"gamearray" +
|
|
|
|
"flash" +
|
|
|
|
"findplayer" +
|
|
|
|
"findotherplayer" +
|
|
|
|
"findnearspritezvar" +
|
|
|
|
"findnearspritez" +
|
|
|
|
"findnearspritevar" +
|
|
|
|
"findnearsprite3dvar" +
|
|
|
|
"findnearsprite3d" +
|
|
|
|
"findnearsprite" +
|
|
|
|
"findnearactorzvar" +
|
|
|
|
"findnearactorz" +
|
|
|
|
"findnearactorvar" +
|
|
|
|
"findnearactor3dvar" +
|
|
|
|
"findnearactor3d" +
|
|
|
|
"findnearactor" +
|
|
|
|
"fall" +
|
|
|
|
"ezshootvar" +
|
|
|
|
"ezshoot" +
|
|
|
|
"eventloadactor" +
|
|
|
|
"espawnvar" +
|
|
|
|
"espawn" +
|
|
|
|
"eshootvar" +
|
|
|
|
"eshoot" +
|
|
|
|
"eqspawnvar" +
|
|
|
|
"eqspawn" +
|
|
|
|
"enhanced" +
|
|
|
|
"endswitch" +
|
|
|
|
"ends" +
|
|
|
|
"endofgame" +
|
|
|
|
"endevent" +
|
|
|
|
"enda" +
|
|
|
|
"else" +
|
|
|
|
"echo" +
|
|
|
|
"dynamicremap" +
|
|
|
|
"dragpoint" +
|
|
|
|
"divvarvar" +
|
|
|
|
"divvar" +
|
|
|
|
"dist" +
|
|
|
|
"displayrandvarvar" +
|
|
|
|
"displayrandvar" +
|
|
|
|
"displayrand" +
|
|
|
|
"digitalnumberz" +
|
|
|
|
"digitalnumber" +
|
|
|
|
"definevolumename" +
|
|
|
|
"definesound" +
|
|
|
|
"defineskillname" +
|
|
|
|
"definequote" +
|
|
|
|
"defineprojectile" +
|
|
|
|
"definelevelname" +
|
|
|
|
"definegametype" +
|
|
|
|
"definegamefuncname" +
|
|
|
|
"definecheat" +
|
|
|
|
"define" +
|
|
|
|
"default" +
|
|
|
|
"debug" +
|
|
|
|
"debris" +
|
|
|
|
"cstator" +
|
|
|
|
"cstat" +
|
|
|
|
"count" +
|
|
|
|
"cos" +
|
|
|
|
"copy" +
|
|
|
|
"cmenu" +
|
|
|
|
"clipmovenoslide" +
|
|
|
|
"clipmove" +
|
|
|
|
"clipdist" +
|
|
|
|
"clearmapstate" +
|
|
|
|
"checkavailweapon" +
|
|
|
|
"checkavailinven" +
|
|
|
|
"checkactivatormotion" +
|
|
|
|
"cheatkeys" +
|
|
|
|
"changespritestat" +
|
|
|
|
"changespritesect" +
|
|
|
|
"case" +
|
|
|
|
"canseespr" +
|
|
|
|
"cansee" +
|
|
|
|
"calchypotenuse" +
|
|
|
|
"cactor" +
|
|
|
|
"break" +
|
|
|
|
"betaname" +
|
|
|
|
"angoffvar" +
|
|
|
|
"angoff" +
|
|
|
|
"andvarvar" +
|
|
|
|
"andvar" +
|
|
|
|
"ai" +
|
|
|
|
"addweaponvar" +
|
|
|
|
"addweapon" +
|
|
|
|
"addvarvar" +
|
|
|
|
"addvar" +
|
|
|
|
"addstrength" +
|
|
|
|
"addphealth" +
|
|
|
|
"addlogvar" +
|
|
|
|
"addlog" +
|
|
|
|
"addkills" +
|
|
|
|
"addinventory" +
|
|
|
|
"addammo" +
|
|
|
|
"actor" +
|
|
|
|
"activatecheat" +
|
|
|
|
"activatebysector" +
|
|
|
|
"action" +
|
2012-04-07 20:10:03 +00:00
|
|
|
lpeg.P(false)
|