Die idee des Ammo Refillers

[MrFaul]

Hallo erst mal.

Ich bin MrFaul und das mein erster Eintrag also bombardiert mich nich mit Kritik wenn ich was falsch mache:

Nun folgendes ich hatte die Idee ein SWEP zu erstellen das in der Lage ist Ammo Armor Health in Ammo Armor Health umzuwandeln bin auch so weit gekommen das ich die groben Skript Fehler ausgemerzt habe und ich das ding Spawnen kann es funktioniert auch wunderbar wenn ich die ammo/was auch immer, Typen einzeln im Skript festlege was aller dings nicht wirklich hilfreich ist das es ja alle arten von Ammo..... umwandeln soll.

Habs also mit Tabeln versucht wollte er auch nicht,
Hab dann direkt in die Funktionen die die Art der "was auch immer" bestimmen die einzelnen arten gesetzt.
Also im großen und ganzen bin ich einfach zu dumm/unaufmerksam Parameter zu übergeben.

Wär nett wenn mir einer helfen könnte danke





if ( SERVER ) then

AddCSLuaFile( "shared.lua" )

SWEP.HoldType = "phys"

end

if CLIENT then
SWEP.PrintName = "Ammo refiller"
SWEP.Author = "Mr.Faul"
SWEP.Contact = "[email protected]"
SWEP.Purpose = "Ammo refiller alpha"
SWEP.Instructions = "Converts energy ammo or health in everything you need"
SWEP.Slot = 2
SWEP.SlotPos = 6
SWEP.ViewModelFlip = false
SWEP.ViewModelFOV = 60
end

SWEP.Spawnable = true
SWEP.AdminSpawnable = true
SWEP.ViewModel = "models/weapons/v_superphyscannon.mdl"
SWEP.WorldModel = "models/weapons/w_physics.mdl"
SWEP.Weight = 5
SWEP.AutoSwitchTo = false
SWEP.AutoSwitchFrom = false

SWEP.Primary.ClipSize = -1
SWEP.Primary.DefaultClip = -1
SWEP.Primary.Automatic = true
SWEP.Primary.Ammo = ammol_primary

SWEP.Secondary.ClipSize = -1
SWEP.Secondary.DefaultClip = -1
SWEP.Secondary.Automatic = false
SWEP.Secondary.Ammo = ammol_secondary

function primary(p)
if !SERVER then return end
local ammol_primary = {}
local ammol_primary_count = {}
if(p == 1) then ammol_primary = "AR2"; ammol_primary_count = 60;
elseif(p == 2) then ammol_primary = "AlyxGun"; ammol_primary_count = 150;
elseif(p == 3) then ammol_primary = "Pistol"; ammol_primary_count = 150;
elseif(p == 4) then ammol_primary = "SMG1"; ammol_primary_count = 225;
elseif(p == 5) then ammol_primary = "357"; ammol_primary_count = 12;
elseif(p == 6) then ammol_primary = "XBowBolt"; ammol_primary_count = 10;
elseif(p == 7) then ammol_primary = "Buckshot"; ammol_primary_count = 30;
elseif(p == 8) then ammol_primary = "RPG_Round"; ammol_primary_count = 3;
elseif(p == 9) then ammol_primary = "SMG1_Grenade"; ammol_primary_count = 3;
elseif(p == 10) then ammol_primary = "SniperRound"; ammol_primary_count = 20;
elseif(p == 11) then ammol_primary = "SniperPenetratedRound"; ammol_primary_count = 20;
elseif(p == 12) then ammol_primary = "AR2AltFire"; ammol_primary_count = 3;
end
return ammol_primary_count, ammol_primary;
end

function secondary(s)
if !SERVER then return end
local ammol_secondary = {}
local ammol_secondary_count = {}
if(s == 1) then ammol_secondary = "AR2"; ammol_secondary_count = 60;
elseif(s == 2) then ammol_secondary = "AlyxGun"; ammol_secondary_count = 150;
elseif(s == 3) then ammol_secondary = "Pistol"; ammol_secondary_count = 150;
elseif(s == 4) then ammol_secondary = "SMG1"; ammol_secondary_count = 225;
elseif(s == 5) then ammol_secondary = "357"; ammol_secondary_count = 12;
elseif(s == 6) then ammol_secondary = "XBowBolt"; ammol_secondary_count = 10;
elseif(s == 7) then ammol_secondary = "Buckshot"; ammol_secondary_count = 30;
elseif(s == 8) then ammol_secondary = "RPG_Round"; ammol_secondary_count = 3;
elseif(s == 9) then ammol_secondary = "SMG1_Grenade"; ammol_secondary_count = 3;
elseif(s == 10) then ammol_secondary = "SniperRound"; ammol_secondary_count = 20;
elseif(s == 11) then ammol_secondary = "SniperPenetratedRound"; ammol_secondary_count = 20;
elseif(s == 12) then ammol_secondary = "AR2AltFire"; ammol_secondary_count = 3;
end
return ammol_secondary, ammol.secondary_count;
end

function SWEP:Reload()
if !SERVER then return end
if(primary(p) > 12 or primary(p) <= 0) then primary(p=1) else
primary(p + 1) end
return primary(p)
end



function SWEP:PrimaryAttack( )
self.Weapon:SetNextPrimaryFire( CurTime( ) + .2 )
if !SERVER then return end
local pc = ammol_primary_count
local sc = ammol_secondary_count
local r = 0
local g = 0
if(pc > sc) then
r = math.ceil(pc/sc)
g = 1
else
g = math.floor(sc/pc)
r = 1
end
if(ammo.primary() > r) then
self.Owner:RemoveAmmo (r, ammol_primary)
self.Owner:GiveAmmo(g, ammol_secondary);
else return end

end

function SWEP:SecondaryAttack( )
if !SERVER then return end
if (secondary() > 12 or secondary() <= 0) then secondary(1) else
secondary(secondary() + 1) end
return secondary()
end

local weaponl = {"AR2",
"AlyxGun",
"Pistol",
"SMG1",
"357",
"XBowBolt",
"Buckshot",
"RPG_Round",
"SMG1_Grenade",
"SniperRound",
"SniperPenetratedRound",
"AR2AltFire"}
--[[
# AR2 :60- Ammunition of the AR2/Pulse Rifle
# AlyxGun:?
# Pistol :150- Ammunition of the 9MM Pistol
# SMG1:225 - Ammunition of the SMG/MP7
# 357:12- Ammunition of the .357 Magnum
# XBowBolt:10 - Ammunition of the Crossbow
# Buckshot :30- Ammunition of the Shotgun
# RPG_Round:3 - Ammunition of the RPG/Rocket Launcher
# SMG1_Grenade:3 - Ammunition for the SMG/MP7 grenade launcher (secondary fire)
# SniperRound:20
# SniperPenetratedRound:20
# Grenade - Note you must be given the grenade weapon (e.g. pl:Give ("weapon_grenade")) before you can throw any grenades
# Thumper - Ammunition cannot exceed 2
# Gravity
# Battery
# GaussEnergy
# CombineCannon
# AirboatGun
# StriderMinigun
# HelicopterGun
# AR2AltFire:3 - Ammunition of the AR2/Pulse Rifle 'combine ball' (secondary fire)
# slam - See Grenade ]]--



Danke schon mal im voraus für gute ratschläge
Doppelpost-Edit:
Was ich noch hinzufügen wollte das is ne sehr frühe Version die Benutzerfreundlichkeit kommt später ;) wenn die grund funktionen stehen!