/usr/share/games/adanaxisgpl/ruby/AdanaxisPiece.rb is in adanaxisgpl-data 1.2.5.dfsg.1-6.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | #%Header {
##############################################################################
#
# File data-adanaxis/ruby/AdanaxisPiece.rb
#
# Copyright Andy Southgate 2006-2007
#
# This file may be used and distributed under the terms of the Mushware
# Software Licence version 1.4, under the terms for 'Proprietary original
# source files'. If not supplied with this software, a copy of the licence
# can be obtained from Mushware Limited via http://www.mushware.com/.
# One of your options under that licence is to use and distribute this file
# under the terms of the GNU General Public Licence version 2.
#
# This software carries NO WARRANTY of any kind.
#
##############################################################################
#%Header } mE5mYbipztvHtBPce3UZow
# $Id: AdanaxisPiece.rb,v 1.8 2007/06/27 13:18:54 southa Exp $
# $Log: AdanaxisPiece.rb,v $
# Revision 1.8 2007/06/27 13:18:54 southa
# Debian packaging
#
# Revision 1.7 2007/06/27 12:58:11 southa
# Debian packaging
#
# Revision 1.6 2007/04/18 09:21:53 southa
# Header and level fixes
#
# Revision 1.5 2007/03/24 18:07:22 southa
# Level 3 work
#
# Revision 1.4 2007/03/13 21:45:08 southa
# Release process
#
# Revision 1.3 2006/11/01 10:07:13 southa
# Shield handling
#
# Revision 1.2 2006/10/30 19:36:38 southa
# Item collection
#
# Revision 1.1 2006/10/30 17:03:49 southa
# Remnants creation
#
class AdanaxisPiece < MushPiece
def initialize(inParams)
super
end
def mRemnantCreate
case @m_remnant
when NilClass
# No action
when Symbol
$currentLogic.mRemnant.mCreate(
:item_type => @m_remnant,
:post => mPost
)
when Hash
$currentLogic.mRemnant.mCreate(@m_remnant.merge(
:post => mPost
)
)
else
raise(RuntimeError, "Unknown remnant type #{@m_remnant.inspect}")
end
end
def mLimitedHealthAdd(inProportion)
newValue = mHitPoints + inProportion * mOriginalHitPoints
newValue = [mOriginalHitPoints, newValue].min
newValue = [mHitPoints, newValue].max
mHitPointsSet(newValue)
end
def mLimitedShieldAdd(inProportion)
newValue = mShield + inProportion * mOriginalShield
newValue = [mOriginalShield, newValue].min
newValue = [mShield, newValue].max
mShieldSet(newValue)
end
def mUnlimitedHealthAdd(inProportion)
newValue = mHitPoints + inProportion * mOriginalHitPoints
newValue = [mOriginalHitPoints, newValue].min
mHitPointsSet(newValue)
end
def mUnlimitedShieldAdd(inProportion)
newValue = mShield + inProportion * mOriginalShield
newValue = [mOriginalShield, newValue].min
mShieldSet(newValue)
end
end
|