sheepy-clone: comparison hedgewars/uTypes.pas

equal deleted inserted replaced

-:0135e64c6c66
+:c4fd2813b127
 // Possible states of the game
 TGameState = (gsLandGen, gsStart, gsGame, gsConfirm, gsExit, gsSuspend);
 // Game types that help determining what the engine is actually supposed to do
-TGameType = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview, gmtSyntax, gmtRecord);
+TGameType = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview, gmtBadSyntax, gmtRecord, gmtSyntaxHelp);
 // Different files are stored in different folders, this enumeration is used to tell which folder to use
 TPathType = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptConfig, ptTeams, ptMaps,
 ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts, ptLocale,
 ptAmmoMenu, ptHedgehog, ptVoices, ptHats, ptFlags, ptMissionMaps,
-ptSuddenDeath, ptButtons, ptShaders);
+ptSuddenDeath, ptButtons, ptShaders, ptDefaultVoice, ptMisc);
 // Available sprites for displaying stuff
 TSprite = (sprWater, sprCloud, sprBomb, sprBigDigit, sprBigDigitGray, sprBigDigitGreen,
 sprBigDigitRed, sprFrame, sprLag, sprArrow, sprBazookaShell, sprTargetP, sprBee,
 sprSmokeTrace, sprRopeHook, sprExplosion50, sprMineOff,
 sprHHTelepMask, sprSwitch, sprParachute, sprTarget, sprRopeNode,
 sprQuestion, sprPowerBar, sprWindBar, sprWindL, sprWindR,
 {$IFDEF USE_TOUCH_INTERFACE}
 sprFireButton, sprArrowUp, sprArrowDown, sprArrowLeft, sprArrowRight,
 sprJumpWidget, sprAMWidget, sprPauseButton, sprTimerButton, sprTargetButton,
-sprSwitchButton,
+sprSwitchButton, sprBounceButton,
 {$ENDIF}
 sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun,
 sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer,
 sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath,
 sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft,
 sprHandResurrector, sprCross, sprAirDrill, sprNapalmBomb,
 sprBulletHit, sprSnowball, sprHandSnowball, sprSnow,
 sprSDFlake, sprSDWater, sprSDCloud, sprSDSplash, sprSDDroplet, sprTardis,
 sprSlider, sprBotlevels, sprHandKnife, sprKnife, sprStar, sprIceTexture, sprIceGun,
 sprFrozenHog, sprAmRubber, sprBoing, sprCustom1, sprCustom2, sprCustom3, sprCustom4,
-sprCustom5, sprCustom6, sprCustom7, sprCustom8, sprAirMine, sprHandAirMine,
+sprCustom5, sprCustom6, sprCustom7, sprCustom8, sprFrozenAirMine, sprAirMine, sprHandAirMine,
-sprFlakeL, sprSDFlakeL, sprCloudL, sprSDCloudL, sprDuck, sprHandDuck, sprMinigun
+sprFlakeL, sprSDFlakeL, sprCloudL, sprSDCloudL, sprCreeper, sprHandCreeper, sprMinigun,
+sprSliderInverted, sprFingerBack, sprFingerBackInv, sprTargetPBack, sprTargetPBackInv,
+sprHealthHud, sprHealthPoisonHud, sprVampHud, sprKarmaHud, sprMedicHud, sprMedicPoisonHud,
+sprHaloHud, sprInvulnHUD, sprAmPiano, sprHandLandGun, sprFirePunch, sprThroughWrap
 );
 // Gears that interact with other Gears and/or Land
 // first row of gears (<gtExplosives) should be avoided when searching a spawn place
 TGearType = (gtFlame, gtHedgehog, gtMine, gtCase, gtAirMine, gtExplosives,
 gtWhip, gtKamikaze, gtCake, gtSeduction, gtWatermelon, gtMelonPiece, // 35
 gtHellishBomb, gtWaterUp, gtDrill, gtBallGun, gtBall, gtRCPlane, // 41
 gtSniperRifleShot, gtJetpack, gtMolotov, gtBirdy, // 45
 gtEgg, gtPortal, gtPiano, gtGasBomb, gtSineGunShot, gtFlamethrower, // 51
 gtSMine, gtPoisonCloud, gtHammer, gtHammerHit, gtResurrector, // 56
-gtNapalmBomb, gtSnowball, gtFlake, {gtStructure,} gtLandGun, gtTardis, // 61
+gtNapalmBomb, gtSnowball, gtFlake, gtLandGun, gtTardis, // 61
-gtIceGun, gtAddAmmo, gtGenericFaller, gtKnife, gtDuck, gtMinigun, gtMinigunBullet); // 68
+gtIceGun, gtAddAmmo, gtGenericFaller, gtKnife, gtCreeper, gtMinigun, gtMinigunBullet); // 68
 // Gears that are _only_ of visual nature (e.g. background stuff, visual effects, speechbubbles, etc.)
 TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
 vgtSmallDamageTag, vgtTeamHealthSorter, vgtSpeechBubble, vgtBubble,
 vgtSteam, vgtAmmo, vgtSmoke, vgtSmokeWhite, vgtShell,
 vgtFeather, vgtHealthTag, vgtSmokeTrace, vgtEvilTrace, vgtExplosion,
 vgtBigExplosion, vgtChunk, vgtNote, vgtLineTrail, vgtBulletHit, vgtCircle,
 vgtSmoothWindBar, vgtStraightShot, vgtNoPlaceWarn);
 // Damage can be caused by different sources
-TDamageSource = (dsUnknown, dsFall, dsBullet, dsExplosion, dsShove, dsPoison);
+TDamageSource = (dsUnknown, dsFall, dsBullet, dsExplosion, dsShove, dsPoison, dsHammer);
 // Available sounds
 TSound = (sndNone,
 sndGrenadeImpact, sndExplosion, sndThrowPowerUp, sndThrowRelease,
 sndSplash, sndShotgunReload, sndShotgunFire, sndGraveImpact,
 sndPiano8, sndSkip, sndSineGun, sndOoff1, sndOoff2, sndOoff3, sndWhack,
 sndComeonthen, sndParachute, sndBump, sndResurrector, sndPlane, sndTardis, sndFrozenHogImpact,
 sndIceBeam, sndHogFreeze, sndAirMineImpact, sndKnifeImpact, sndExtraTime, sndLaserSight,
 sndInvulnerable, sndJetpackLaunch, sndJetpackBoost, sndPortalShot, sndPortalSwitch,
 sndPortalOpen, sndBlowTorch, sndCountdown1, sndCountdown2, sndCountdown3, sndCountdown4,
-sndDuckDrop, sndDuckWater, sndDuckDie, sndCustom1, sndCustom2, sndCustom3, sndCustom4,
+sndCreeperDrop, sndCreeperWater, sndCreeperDie, sndCustom1, sndCustom2, sndCustom3, sndCustom4,
-sndCustom5, sndCustom6, sndCustom7, sndCustom8, sndMinigun);
+sndCustom5, sndCustom6, sndCustom7, sndCustom8, sndMinigun, sndFlamethrower, sndIceBeamIdle,
+sndLandGun, sndCaseImpact, sndExtraDamage, sndFirePunchHit, sndGrenade, sndThisOneIsMine,
+sndWhatThe, sndSoLong, sndOhDear, sndGonnaGetYou, sndDrat, sndBugger, sndAmazing,
+sndBrilliant, sndExcellent, sndFire, sndWatchThis, sndRunAway, sndRevenge, sndCutItOut,
+sndLeaveMeAlone, sndOuch, sndHmm, sndKiss, sndFlyAway, sndPlaneWater);
 // Available ammo types to be used by hedgehogs
 TAmmoType  = (amNothing, amGrenade, amClusterBomb, amBazooka, amBee, amShotgun, amPickHammer, // 6
 amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip, // 13
 amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch, // 18
 amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake, // 24
 amSeduction, amWatermelon, amHellishBomb, amNapalm, amDrill, amBallgun, // 30
 amRCPlane, amLowGravity, amExtraDamage, amInvulnerable, amExtraTime, // 35
 amLaserSight, amVampiric, amSniperRifle, amJetpack, amMolotov, amBirdy, amPortalGun, // 42
 amPiano, amGasBomb, amSineGun, amFlamethrower, amSMine, amHammer, // 48
-amResurrector, amDrillStrike, amSnowball, amTardis, {amStructure,} amLandGun, // 53
+amResurrector, amDrillStrike, amSnowball, amTardis, amLandGun, // 53
-amIceGun, amKnife, amRubber, amAirMine, amDuck, amMinigun); // 59
+amIceGun, amKnife, amRubber, amAirMine, amCreeper, amMinigun); // 59
+// NOTE: If we ever reach 126 ammo types, make sure to skip ammo type number 126 because it's
+// reserved as synonym for amNothing. See also chSetWeapon.
 // Different kind of crates that e.g. hedgehogs can pick up
 TCrateType = (HealthCrate, AmmoCrate, UtilityCrate);
 THWFont = (fnt16, fntBig, fntSmall, fntChat {$IFNDEF MOBILE}, CJKfnt16, CJKfntBig, CJKfntSmall, CJKfntChat{$ENDIF});
 capgrpMessage, capgrpMessage2, capgrpAmmostate);
 TStatInfoType = (siGameResult, siMaxStepDamage, siMaxStepKills, siKilledHHs,
 siClanHealth, siTeamStats, siPlayerKills, siMaxTeamDamage,
 siMaxTeamKills, siMaxTurnSkips, siCustomAchievement, siGraphTitle,
-siPointType);
+siPointType, siTeamRank, siEverAfter);
 // Various 'emote' animations a hedgehog can do
 TWave = (waveRollup, waveSad, waveWave, waveHurrah, waveLemonade, waveShrug, waveJuggle);
 TRenderMode = (rmDefault, rmLeftEye, rmRightEye);
 Active: Boolean;            // Is gear Active (running step code)
 Kind: TGearType;
 doStep: TGearStepProcedure; // Code the gear is running
 AmmoType : TAmmoType;       // Ammo type associated with this kind of gear
 RenderTimer: Boolean;       // Will visually display Timer if true
+RenderHealth: Boolean;      // Will visually display Health if true
 Target : TPoint;            // Gear target. Will render in uGearsRender unless a special case is added
 AIHints: LongWord;          // hints for ai.
 LastDamage: PHedgehog;      // Used to track damage source for stats
 CollisionIndex: LongInt;    // Position in collision array
 Message: LongWord;          // Game messages are stored here. See gm bitmasks in uConsts
 PortalCounter: LongWord; // Necessary to interrupt portal loops.  Not possible to avoid infinite loops without it.
 // Don't use these if you're using generic movement like doStepFallingGear and explosion shoves. Generally recommended not to use.
 Radius: LongInt;     // Radius. If not using uCollisions, is usually used to indicate area of effect
 CollisionMask: Word; // Masking off Land impact  FF7F for example ignores current hog and crates
 AdvBounce: Longword; // Triggers 45 bounces. Is a counter to avoid edge cases
+Sticky: Boolean;     // True if gear is *normally* able to stick to landscape on impact
 Elasticity: hwFloat;
 Friction  : hwFloat;
 Density   : hwFloat; // Density is kind of a mix of size and density. Impacts distance thrown, wind.
 ImpactSound: TSound; // first sound, others have to be after it in the sounds def.
 nImpactSounds: Word; // count of ImpactSounds.
 uid: Longword;
 Layer: byte;
 end;
 TStatistics = record
-DamageRecv,
+DamageRecv,              // total damage received
-DamageGiven: Longword;
+DamageGiven: Longword;   // total damage dealt
-StepDamageRecv,
+StepDamageRecvInRow,     // number of enemy turns in row this hog received any damage
-StepDamageGiven,
+StepDamageRecv,          // damage received in this turn
-StepKills: Longword;
+StepDamageGiven,         // damage dealt in this turn
-StepPoisoned,
+StepKills: Longword;     // kills in this turn
-StepDied,
+StepPoisoned,            // whether hog got poisoned this turn
-Sacrificed: boolean;
+StepDied,                // whether hog died this turn
-MaxStepDamageRecv,
+Sacrificed,              // whether hog was sacrificed in suicide attack (kamikaze, piano)
-MaxStepDamageGiven,
+GotRevenge: boolean;     // whether hog got revenge in this turn
-MaxStepKills: Longword;
+StepRevenge: boolean;    // whether hog's revenge mode was activated in this turn
+MaxStepDamageRecv,       // most damage received in one turn
+MaxStepDamageGiven,      // most damage dealt in one turn
+MaxStepKills: Longword;  // most kills in one turn
 FinishedTurns: Longword;
 end;
 TTeamStats = record
 Kills : Longword;
 TeamKills : Longword;
 TurnSkips : Longword;
 TeamDamage : Longword;
 end;
+PClanDeathLogEntry = ^TClanDeathLogEntry;
+TClanDeathLogEntry = record
+Turn : Longword; // turn in which the clans were killed
+KilledClans : array[0..Pred(cMaxTeams)] of PClan; // array of clans that have died
+KilledClansCount: Longword; // number of clans that died
+NextEntry : PClanDeathLogEntry; // linked list
+end;
 TBinds = record
 indices: array[0..cKbdMaxIndex] of byte;
 // zeroth element is reserved, indices[i] == 0 means no binding
 binds: array[0..255] of shortstring;
 lastIndex: byte;
 end;
 TVoice = record
 snd: TSound;
 voicepack: PVoicePack;
+isFallback: boolean;
 end;
 THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;
 PHHAmmo = ^THHAmmo;
 stats: TStatistics;
 Hat: shortstring;
 InitialHealth: LongInt; // used for gfResetHealth
 King: boolean;  // Flag for a bunch of hedgehog attributes
 Unplaced: boolean;  // Flag for hog placing mode
+UnplacedKing: boolean;  // Flag for king placing phase in King Mode
 Timer: Longword;
 HealthBarHealth: LongInt;
 Effects: array[THogEffect] of LongInt;
+RevengeHog: PHedgehog;   // For which hog this hog wants revenge most. For sndRevenge taunt
+FlownOffMap: boolean; // When hedgehog has flown far away off the map left or right
 end;
 TTeam = record
 Clan: PClan;
 TeamName: shortstring;
 AttackBar: LongWord;
 HedgehogsNumber: Longword;
 voicepack: PVoicepack;
 PlayerHash: shortstring;   // md5 hash of player name. For temporary enabling of hats as thank you. Hashed for privacy of players
 stats: TTeamStats;
+Passive: boolean; // if true, team will not participate in game. It is treated as if all its hedgehogs are frozen.
+// updating this value requires updating Passive in TClan as well!
+hasKing: boolean; // true if team has a living king
 hasGone: boolean;
 skippedTurns: Longword;
 isGoneFlagPendingToBeSet, isGoneFlagPendingToBeUnset: boolean;
 luaTeamValue: ansistring;
 hasLuaTeamValue: boolean;
 TagTeamIndex: Longword;
 CurrTeam: LongWord;
 ClanHealth: LongInt;
 ClanIndex: LongInt;
 TurnNumber: LongWord;
+DeathLogged: boolean; // true if clan is dead and its latest death has been logged in the clan death log
+StatsHandled : boolean; // true if clan's rank has been handled for stats screen
 Flawless: boolean;
+Passive: boolean; // informational. Must be set to true if all of the teams are passive
+LocalOrAlly: boolean; // true if at least 1 team in the clan is a local team. A local team is a non-extdriven team controlled by a human
 end;
 cdeclPtr = procedure; cdecl;
 cdeclIntPtr = procedure(num: LongInt); cdecl;
 funcDoublePtr = function: Double;
 sidLowGravity, sidExtraDamage, sidInvulnerable, sidExtraTime,
 sidLaserSight, sidVampiric, sidSniperRifle, sidJetpack,
 sidMolotov, sidBirdy, sidPortalGun, sidPiano, sidGasBomb,
 sidSineGun, sidFlamethrower,sidSMine, sidHammer, sidResurrector,
 sidDrillStrike, sidSnowball, sidNothing, sidTardis,
-{sidStructure,} sidLandGun, sidIceGun, sidKnife, sidRubber, sidAirMine,
+sidLandGun, sidIceGun, sidKnife, sidRubber, sidAirMine,
-sidDuck, sidMinigun);
+sidCreeper, sidMinigun);
 TMsgStrId = (sidLoading, sidDraw, sidWinner, sidVolume, sidPaused,
 sidConfirm, sidSuddenDeath, sidRemaining, sidFuel, sidSync,
 sidNoEndTurn, sidNotYetAvailable, sidRoundSD, sidRoundsSD, sidReady,
 sidBounce1, sidBounce2, sidBounce3, sidBounce4, sidBounce5, sidBounce,
 sidMute, sidAFK, sidAutoCameraOff, sidAutoCameraOn, sidPressTarget,
 sidNotAvailableInSD, sidHealthGain, sidEmptyCrate, sidUnknownKey,
 sidWinner2, sidWinner3, sidWinner4, sidWinner5, sidWinner6,
 sidWinner7, sidWinnerAll, sidTeamGone, sidTeamBack, sidAutoSkip,
-sidFPS);
+sidFPS, sidLuaParsingOff, sidLuaParsingOn, sidLuaParsingDenied,
+sidAmmoCount, sidChat, sidChatTeam, sidChatHog, sidUnknownGearValue);
+TCmdHelpStrId = (
+sidCmdHeaderBasic, sidCmdTogglechat, sidCmdTeam, sidCmdMe,
+sidCmdPause, sidCmdPauseNet, sidCmdFullscreen, sidCmdQuit,
+sidCmdHelp, sidCmdHelpTaunts, sidCmdHistory, sidLua,
+sidCmdHeaderTaunts, sidCmdSpeech, sidCmdThink, sidCmdYell,
+sidCmdSpeechNumberHint, sidCmdHsa, sidCmdHta, sidCmdHya,
+sidCmdHurrah, sidCmdIlovelotsoflemonade, sidCmdJuggle,
+sidCmdRollup, sidCmdShrug, sidCmdWave, sidCmdUnknown,
+sidCmdHelpRoom, sidCmdHelpRoomFail);
 // Events that are important for the course of the game or at least interesting for other reasons
 TEventId = (eidDied, eidDrowned, eidRoundStart, eidRoundWin, eidRoundDraw,
 eidNewHealthPack, eidNewAmmoPack, eidNewUtilityPack, eidTurnSkipped,
 eidHurtSelf, eidHomerun, eidGone, eidPoisoned, eidResurrected,

branch	ui-scaling
changeset 15288	c4fd2813b127
parent 13390	ec1491bb5acc
parent 15235	4576e41c0692