diff options
Diffstat (limited to 'src/3rdparty/squirrel/samples/delegation.nut')
-rw-r--r-- | src/3rdparty/squirrel/samples/delegation.nut | 52 |
1 files changed, 0 insertions, 52 deletions
diff --git a/src/3rdparty/squirrel/samples/delegation.nut b/src/3rdparty/squirrel/samples/delegation.nut deleted file mode 100644 index e9e86ca9a..000000000 --- a/src/3rdparty/squirrel/samples/delegation.nut +++ /dev/null @@ -1,52 +0,0 @@ - -PEntity <- { - name="noname" - pos={x=0,y=0,z=0} - type="entity" - //methamethod - _typeof=function() - { - return type; - } -} - -function PEntity::PrintPos() -{ - ::print("x="+pos.x+" y="+pos.y+" z="+pos.z+"\n"); -} - -function PEntity::new(name,pos) -{ - local newentity=clone ::PEntity; - if(name) - newentity.name=name; - if(pos) - newentity.pos=pos; - return newentity; -} - -PPlayer <- { - model="warrior.mdl" - weapon="fist" - health=100 - armor=0 - //overrides the parent type - type="player" -} - -function PPlayer::new(name,pos) -{ - local newplayer=delegate ::PEntity.new(name,pos) : clone ::PPlayer; - return newplayer; -} - -local player=PPlayer.new("godzilla",{x=10,y=20,z=30}); - -::print("PLAYER NAME"+player.name+"\n"); -::print("ENTITY TYPE"+typeof player+"\n"); - -player.PrintPos(); - -player.pos.x=123; - -player.PrintPos(); |