home *** CD-ROM | disk | FTP | other *** search
/ Chip 2011 November / CHIP_2011_11.iso / Programy / Inne / Gry / Carnage_Contest / scripts / CC Original / tools / Digger.lua < prev    next >
Encoding:
Text File  |  2009-08-29  |  2.1 KB  |  60 lines
  1. --------------------------------------------------------------------------------
  2. -- Weapon Digger
  3. -- Original Carnage Contest Weapon
  4. -- Script by DC, August 2009, www.UnrealSoftware.de
  5. --------------------------------------------------------------------------------
  6.  
  7. -- Setup Tables
  8. if cc==nil then cc={} end
  9. cc.digger={}
  10.  
  11. -- Load & Prepare Ressources
  12. cc.digger.gfx_wpn=loadgfx("weapons/digger.bmp")                            -- Weapon Image
  13. setmidhandle(cc.digger.gfx_wpn)
  14. cc.digger.sfx_attack=loadsfx("digger.wav")                                -- Attack Sound
  15.  
  16. --------------------------------------------------------------------------------
  17. -- Weapon: Digger
  18. --------------------------------------------------------------------------------
  19.  
  20. cc.digger.id=addweapon("cc.digger","Digger",cc.digger.gfx_wpn,2)        -- Add Weapon (2 uses)
  21. cc.digger.ammo=10                                                        -- 10 Digs
  22.  
  23. function cc.digger.draw()                                                -- Draw
  24.     setblend(blend_alpha)
  25.     setalpha(1)
  26.     setcolor(255,255,255)
  27.     drawinhand(cc.digger.gfx_wpn,7,0)
  28.     -- HUD ammobar
  29.     if cc.digger.ammo-weapon_shots>0 then
  30.         hudammobar(cc.digger.ammo-weapon_shots,cc.digger.ammo)
  31.     end
  32.     -- HUD Crosshair
  33.     if cc.digger.ammo-weapon_shots>0 then
  34.         hudcrosshair(7,3)
  35.     end
  36. end
  37.  
  38. function cc.digger.attack(attack)                                        -- Attack
  39.     -- Timer
  40.     if weapon_timer>0 then
  41.         weapon_timer=weapon_timer-1
  42.     end
  43.     if (weapon_shots<cc.digger.ammo) and (weapon_timer<=0) then
  44.         if (attack==1) then
  45.             -- No more weapon switching!
  46.             useweapon(0)
  47.             playsound(cc.digger.sfx_attack)
  48.             weapon_shots=weapon_shots+1
  49.             weapon_timer=20
  50.             -- Free Terrain
  51.             terrainexplosion(getplayerx(0)+getplayerdirection(0)*7+math.sin(math.rad(getplayerrotation(0)))*1,getplayery(0)-1-math.cos(math.rad(getplayerrotation(0)))*3,15,2)
  52.             terrainexplosion(getplayerx(0)+getplayerdirection(0)*7+math.sin(math.rad(getplayerrotation(0)))*10,getplayery(0)-1-math.cos(math.rad(getplayerrotation(0)))*10,15,2)
  53.             particle(p_muzzle,getplayerx(0)+getplayerdirection(0)*7+math.sin(math.rad(getplayerrotation(0)))*10,getplayery(0)-1-math.cos(math.rad(getplayerrotation(0)))*10)
  54.             -- End Turn
  55.             if weapon_shots>=cc.digger.ammo then
  56.                 endturn()
  57.             end
  58.         end
  59.     end
  60. end