mod_pass = "123"
parse([[mp_dispenser_money 5]])
parse([[mp_infammo 0]])
parse([[sv_friendlyfire 1]])
parse([[sv_gm 2]])
parse([[mp_antispeeder 0]])
parse([[mp_idlekick 0]])
parse([[mp_wpndmg elite 10000]])
parse([[mp_wpndmg m4a1 10000]])
parse([[mp_teamkillpenalty 10000]])

function Array(size,value)
local array = {}
for i = 1, size do
array[i]=value
end
return array
end

rp_ct = Array(32,false)
rp_t = Array(32,false)
rp_license = Array(32,false)
rp_money = Array(32,2000)
rp_arrest = Array(32,false)
rp_criminal = Array(32,false)
rp_drop_item = Array(32,false)
rp_build_m = Array(32,1)
tsb = Array(32,0)
player_have_pos = Array(32,false)
tele_x = Array(32,0)
tele_y = Array(32,0)
arrest_x = Array(32,0)
arrest_y = Array(32,0)


-- Carmod Values
car_img = Array(32,0)
car_img_pos = Array(32,0)
car_tx = Array(32,0)
car_ty = Array(32,0)
car_x = Array(32,0)
car_y = Array(32,0)
currentcar = Array(32,0)
pic = Array(32,0)
pl_speed = Array(32,0)
pl_have_car = Array(32,0)
car_pl = Array(32,0)



addhook([[team]],[[rp_team]])
function rp_team(id,t)
if player(id,[[ip]])==[[127.0.0.1]] then
if not player(id,[[bot]]) then
rp_license[id]=true
rp_ct[id]=true
end
end
if t == 2 and rp_ct[id]==true then
rp_license[id]=true
return 0
elseif t == 2 and rp_ct[id]==false then
parse([[maket ]]..id)
return 1
end


addhook([[leave]],[[rp_leave]])
function rp_leave(id)
rp_license[id]=false
rp_ct[id]=false
rp_arrest[id]=false
rp_criminal[id]=false
rp_drop_item[id]=false
rp_build_m[id]=1
player_have_pos[id]=false
tele_x[id]=0
tele_y[id]=0
rp_money[id]=2000
arrest_x[id]=0
arrest_y[id]=0
car_tx[id]=0
car_ty[id]=0
car_x[id]=0
car_y[id]=0
currentcar[id]=0
pic[id]=0
pl_speed[id]=0
pl_have_car[id]=0
car_pl[id]=0

end
end

function updatehud(id)
if id ~= nil then
if player(id,[[exists]]) then
parse('hudtxt2 '..id..' 49 "©000255100PARAN: '..rp_money[id]..'" 450 385')
end
end
end

function totable(t,match)
local cmd = {}
if not match then match = "[^%s]+" end
for word in string.gmatch(t, match) do
table.insert(cmd, word)
end
return cmd
end

function rp_msg(clr,txt)
msg([[©]]..clr..[[]]..txt)
end

function rp_msg2(id,clr,txt)
msg2(id,[[©]]..clr..[[]]..txt)
end

addhook([[attack]],[[rp_attack]])
function rp_attack(id)
if rp_ct[id] == true then
local w = player(id,[[weapontype]])
if w > 0 then
parse([[equip ]]..id..[[ ]]..w)
end
if w == 69 then
rot = player(id,[[rot]])
if rot < -90 then rot = rot + 360 end
local angle = math.rad(math.abs(rot + 90)) - math.pi
local x = player(id,[[x]]) + math.cos(angle) * itemtype(w,[[dmg]]) / 2
local y = player(id,[[y]]) + math.sin(angle) * itemtype(w,[[dmg]]) / 2
if x > 0 and y > 0 and x < map([[xsize]]) * 32 and y < map([[ysize]]) * 32 then
parse([[explosion ]]..x..[[ ]]..y..[[ 32 10000000 ]]..id)
end
end
end
end

addhook([[say]],[[rp_say]])
function rp_say(id,txt)
local p = totable(txt)
local cmd = tostring(p[1])
if txt:sub(1,1)==[[!]] then
if cmd == [[!rp_admin]] then
local pass = tostring(p[2])
if pass ~= nil then
if pass == mod_pass then
rp_ct[id]=true
rp_msg2(id,[[000255000]],[[Dogru bir Password!]])
rp_msg2(id,[[000255000]],[[Suan CT'ye geçiyorsunuz!]])
if player(id,[[team]])==1 then
parse([[makect ]]..id)
end
else
rp_t[id]=true
rp_msg2(id,[[255000000]],[[Yanlis Password!]])
rp_msg2(id,[[255000000]],[[Senin CT'ye gecmen 100de 0!]])
if player(id,[[team]])==2 then
parse([[maket ]]..id)
end
end
end
elseif cmd ==[[!rp_arrest]] then
if rp_ct[id]==true then
local pl = tonumber(p[2])
if pl ~= nil then
if player(pl,[[exists]]) then
rp_arrest[pl]=true
end
end
else
rp_msg2(id,[[255000000]],[[Bu komutu kullanmaya yetkin yok!]])
end
elseif cmd ==[[!rp_free]] then
if rp_ct[id]==true then
local pl = tonumber(p[2])
if pl ~= nil then
if player(pl,[[exists]]) then
rp_arrest[pl]=false
end
end
else
rp_msg2(id,[[255000000]],[[Bu komutu kullanmak icin ct ol!]])
end
elseif cmd ==[[!rp_give_money]] then
if rp_ct[id]==true then
local pl = tonumber(p[2])
local money = tonumber(p[3])
if pl ~= nil and money ~= nil then
if player(pl,[[exists]]) then
rp_money[pl]=rp_money[pl]+money
rp_msg2(pl,[[000255000]],player(id,[[name]])..[[ Gave you ]]..money..[[ of money!@C]])
rp_msg2(id,[[000255000]],[[You gave ]]..money..[[ to ]]..player(pl,[[name]])..[[!@C]])
updatehud(pl)
end
end
else
rp_msg2(id,[[255000000]],[[Bu komutu admin kullanabilir!]])
end
elseif cmd ==[[!bring]] then
if rp_ct[id]==true then
local pl = tonumber(p[2])
if pl ~= nil then
if player(pl,[[exists]]) then
parse([[setpos ]]..pl..[[ ]]..player(id,[[x]])..[[ ]]..player(id,[[y]]))
else
rp_msg2(id,[[255000000]],[[Bu player bulunamadi!]])
end
end
else
rp_msg2(id,[[255000000]],[[Bu komudu kulanamassin!]])
end
elseif cmd == [[!goto]] then
if rp_ct[id]==true then
local pl = tonumber(p[2])
if pl ~= nil then
if player(pl,[[exists]]) then
parse([[setpos ]]..id..[[ ]]..player(pl,[[x]])..[[ ]]..player(pl,[[y]]))
else
rp_msg2(id,[[255000000]],[[bu blayer yoq!]])
end
end
else
rp_msg2(id,[[255000000]],[[Kullanamassin!]])
end
elseif cmd == [[!sv_map]] then
if rp_ct[id]==true then
local map = tostring(p[2])
if map ~= nil then
parse([[changemap ]]..map)
end
else
rp_msg2(id,[[255000000]],[[Senin bu komuya kullanmaya yetkin yoq!]])
end
else
rp_msg2(id,[[255000000]],[[[RP] Yanlis command !]])
end
return 1
end
if rp_ct[id] == true then
rp_msg([[255128000]],player(id,[[name]])..[[: ]]..txt)
return 1
end
end

addhook([[kill]],[[rp_kill]])
function rp_kill(killer,victim,wpn)
if rp_criminal[victim]==true then
rp_criminal[killer]=false
rp_money[killer]=rp_money[killer]+2000
rp_money[victim]=rp_money[victim]-2000
rp_msg2(killer,[[000255000]],[[aferim lan iyi bir kavat öldürdün!@C]])
else
rp_criminal[killer]=true
rp_money[killer]=rp_money[killer]-0
rp_money[victim]=rp_money[victim]+0
rp_msg2(killer,[[255000000]],[[Aferim lan bi kavat oldurdun!@C]])
end
end

addhook([[always]],[[rp_always]])
function rp_always()
for id = 1,32 do
if player(id,[[exists]]) then
if player(id,[[health]])>0 then
if player(id,[[money]]) > 0 then
rp_money[id]=rp_money[id]+player(id,[[money]])
parse([[setmoney ]]..id..[[ ]]..player(id,[[money]])-player(id,[[money]]))
updatehud(id)
end
-- Carmod Auto Walk
local rot = player(id,[[rot]])
if rot < -90 then rot = rot + 360 end
local angle = math.rad(math.abs( rot + 90 )) - math.pi
local x = player(id,[[x]]) + math.cos(angle) * 5
local y = player(id,[[y]]) + math.sin(angle) * 5
if x > 0 and y > 0 and x < map([[xsize]]) * 32 and y < map([[ysize]]) * 32 then
if tile(math.ceil(x / 32)-1,math.ceil(y / 32)-1,[[walkable]]) then
if pic[id]>0 then
parse([[setpos ]]..id..[[ ]]..x..[[ ]]..y)
car_tx[id]=player(id,[[tilex]])
car_ty[id]=player(id,[[tiley]])
car_x[id]=x
car_y[id]=y
end
end
end
end
end
end
end

addhook([[die]],[[rp_die]])
function rp_die(id)
if rp_arrest[id]==true then
parse([[spawnplayer ]]..id..[[ ]]..player(id,[[x]])..[[ ]]..player(id,[[y]]))
parse([[setdeaths ]]..id..[[ ]]..player(id,[[deaths]])-1)
return 1
end
if pl_have_car[id]==1 then
if pic[id]>0 then
parse([[customkill ]]..id..[[ Eject ]]..id)
parse([[explosion ]]..car_x[id]..[[ ]]..car_y[id]..[[ 100 200 ]]..id)
car_tx[id]=0
car_ty[id]=0
car_x[id]=0
car_y[id]=0
freeimage(car_img[id])
else
parse([[explosion ]]..car_x[id]..[[ ]]..car_y[id]..[[ 100 200 ]]..id)
car_tx[id]=0
car_ty[id]=0
car_x[id]=0
car_y[id]=0
freeimage(gfx_car[id])
end
pl_have_car[id]=0
end
end

drop_system_m = 1
addhook([[serveraction]],[[rp_action]])
function rp_action(id,a)
if a == 1 then
if drop_system_m == 1 then
menu(id,[[Drop System,$100,$500,$1000,$5000,$10000,$50000,$100000,itemiyere atince hicgitmez|license only]])
else
rp_msg2(id,[[255000000]],[[Drop sistemi Kapandi!@C]])
end
elseif a == 2 then
if rp_ct[id]==true then
menu(id,[[CT Menu,Buy Menu,Ayarlar,ct normal insaat,tarafsiz insaat,Teleport menu,lisans menu,Commands,Prop Menu]])
else
menu(id,[[T Menu,Buy Menu,Set Spawn Menu,Yardim]])
end
elseif a == 3 then
if rp_ct[id]==true then
local rot = player(id,[[rot]])
if rot < -90 then rot = rot + 360 end
local angle = math.rad(math.abs( rot + 90 )) - math.pi
local x = player(id,[[x]]) + math.cos(angle) * 10
local y = player(id,[[y]]) + math.sin(angle) * 10
if x > 0 and y > 0 and x < map([[xsize]]) * 32 and y < map([[ysize]]) * 32 then
parse([[setpos ]]..id..[[ ]]..x..[[ ]]..y)
end
else
rp_msg2(id,[[255000000]],[[CT'de duvar hack var]])
end
end
end

function nmn(id)
rp_msg2(id,[[255000000]],[[Malasef paran yetmiyor!@C]])
end

addhook([[drop]],[[rp_drop]])
function rp_drop(id,iid,type,ain,a,mode,x,y)
if rp_drop_item[id]==true then
parse([[strip ]]..id..[[ ]]..type)
parse([[spawnitem ]]..type..[[ ]]..x..[[ ]]..y)
rp_drop_item[id]=false
return 1
end
end


pl_names = Array(32,"")
function b_names()
for i = 1,32 do
if player(i,[[exists]]) then
pl_names[i]=player(i,[[name]])
else
pl_names[i]=""
end
end
end

function ls_1(id)
b_names()
menu(id,[[License System Page 1@b,]]..pl_names[1]..[[,]]..pl_names[2]..[[,]]..pl_names[3]..[[,]]..pl_names[4]..[[,]]..pl_names[5]..[[,]]..pl_names[6]..[[,]]..pl_names[7]..[[,Back,Next]])
end

function ls_2(id)
b_names()
menu(id,[[License System Page 2@b,]]..pl_names[8]..[[,]]..pl_names[9]..[[,]]..pl_names[10]..[[,]]..pl_names[11]..[[,]]..pl_names[12]..[[,]]..pl_names[13]..[[,]]..pl_names[14]..[[,Back,Next]])
end

function ls_3(id)
b_names()
menu(id,[[License System Page 3@b,]]..pl_names[15]..[[,]]..pl_names[16]..[[,]]..pl_names[17]..[[,]]..pl_names[18]..[[,]]..pl_names[19]..[[,]]..pl_names[20]..[[,]]..pl_names[21]..[[,Back,Next]])
end

function ls_4(id)
b_names()
menu(id,[[License System Page 4@b,]]..pl_names[22]..[[,]]..pl_names[23]..[[,]]..pl_names[24]..[[,]]..pl_names[25]..[[,]]..pl_names[26]..[[,]]..pl_names[27]..[[,]]..pl_names[28]..[[,Back,Next]])
end

function ls_5(id)
b_names()
menu(id,[[License System Page 5@b,]]..pl_names[29]..[[,]]..pl_names[30]..[[,]]..pl_names[31]..[[,]]..pl_names[32]..[[,,,,Back]])
end

function gv_ls(id,pl,page)
if rp_license[pl]==true then
rp_license[pl]=false
rp_msg2(pl,[[255000000]],player(id,[[name]])..[[ lisansin alindi,!]])
rp_msg2(id,[[255000000]],[[lisansin alindi essek ]]..player(pl,[[name]])..[[!]])
else
rp_license[pl]=true
rp_msg2(pl,[[000255000]],player(id,[[name]])..[[ lisans verildi beya sanslisin!]])
rp_msg2(id,[[000255000]],[[lisans verildi beya sanslisin]]..player(pl,[[name]])..[[!]])
end
if page == 1 then
ls_1(id)
elseif page == 2 then
ls_2(id)
elseif page == 3 then
ls_3(id)
elseif page == 4 then
ls_4(id)
elseif page == 5 then
ls_5(id)
end
end

tele_sys = 1
function set_men(id)
menu(id,[[CT Menu Settings,Drop System|(]]..drop_system_m..[[),Teleport System & Arrest|(]]..tele_sys..[[)]])
end

ct_57_b = [[]]
function rp_ct_arrest_button(id)
if rp_ct[id]==true then
ct_57_b = [[Set arrest Point|Five-Seven (FN-57)]]
else
ct_57_b = [[]]
end
end

s_car_b = [[]]
function udp_scar(id)
if pl_have_car[id]==1 then
s_car_b = [[Eject your car]]
elseif pl_have_car[id]==0 then
s_car_b = [[Create a car]]
end
end

addhook([[menu]],[[rp_menu]])
function rp_menu(id,men,sel)
x = player(id,[[tilex]])
y = player(id,[[tiley]])
if men == [[License System Page 5]] then
if sel == 1 then
gv_ls(id,29,5)
elseif sel == 2 then
gv_ls(id,30,5)
elseif sel == 3 then
gv_ls(id,31,5)
elseif sel == 4 then
gv_ls(id,32,5)
elseif sel == 7 then
ls_4(id)
end
end
if men == [[License System Page 4]] then
if sel == 1 then
gv_ls(id,22,4)
elseif sel == 2 then
gv_ls(id,23,4)
elseif sel == 3 then
gv_ls(id,24,4)
elseif sel == 4 then
gv_ls(id,25,4)
elseif sel == 5 then
gv_ls(id,26,4)
elseif sel == 6 then
gv_ls(id,27,4)
elseif sel == 7 then
gv_ls(id,28,4)
elseif sel == 8 then
ls_3(id)
elseif sel == 9 then
ls_5(id)
end
end
if men == [[License System Page 3]] then
if sel == 1 then
gv_ls(id,15,3)
elseif sel == 2 then
gv_ls(id,16,3)
elseif sel == 3 then
gv_ls(id,17,3)
elseif sel == 4 then
gv_ls(id,18,3)
elseif sel == 5 then
gv_ls(id,19,3)
elseif sel == 6 then
gv_ls(id,20,3)
elseif sel == 7 then
gv_ls(id,21,3)
elseif sel == 8 then
ls_2(id)
elseif sel == 9 then
ls_4(id)
end
end
if men == [[License System Page 2]] then
if sel == 1 then
gv_ls(id,8,2)
elseif sel == 2 then
gv_ls(id,9,2)
elseif sel == 3 then
gv_ls(id,10,2)
elseif sel == 4 then
gv_ls(id,11,2)
elseif sel == 5 then
gv_ls(id,12,2)
elseif sel == 6 then
gv_ls(id,13,2)
elseif sel == 7 then
gv_ls(id,14,2)
elseif sel == 8 then
ls_1(id)
elseif sel == 9 then
ls_3(id)
end
end
if men == [[License System Page 1]] then
if sel == 1 then
gv_ls(id,1,1)
elseif sel == 2 then
gv_ls(id,2,1)
elseif sel == 3 then
gv_ls(id,3,1)
elseif sel == 4 then
gv_ls(id,4,1)
elseif sel == 5 then
gv_ls(id,5,1)
elseif sel == 6 then
gv_ls(id,6,1)
elseif sel == 7 then
gv_ls(id,7,1)
elseif sel == 8 then
menu(id,[[CT Menu,Buy menu,ayarlar,Normal insaat,Tarafsin insaat,Setspawn menu,Lisans verme menu,Help]])
elseif sel == 9 then
ls_2(id)
end
end
if men == [[CT Menu]] then
if sel == 1 then
menu(id,[[CT Insta Equip Menu,Laser|$0TL,Super armor|$0TL,Speed|$0TL,Deagle|$0TL,Five-Seven (FN57)|$0TL,Machete|$0TL]])
elseif sel == 2 then
set_men(id)
elseif sel == 3 then
rp_build_m[id]=1
rp_msg2(id,[[000255000]],[[Normal insaat yapablirsin!]])
elseif sel == 4 then
rp_build_m[id]=2
rp_msg2(id,[[000255000]],[[Tarafsiz insaat yapabilirsin!]])
elseif sel == 5 then
rp_ct_arrest_button(id)
if tele_sys == 1 then
menu(id,[[Teleport Menu@b,Set spawn'nina getirir|$5000,Set spawn yap,Toggle Spawn Behavior (]]..tsb[id]..[[),]]..ct_57_b)
else
rp_msg2(id,[[255000000]],[[[RP] Teleport Sistemi Engellendi!]])
end
elseif sel == 6 then
ls_1(id)
elseif sel == 7 then
rp_msg2(id,[[000255000]],[[[RP] Command: !bring <player>]])
rp_msg2(id,[[000255000]],[[[RP] Command: !goto <player>]])
rp_msg2(id,[[000255000]],[[[RP] Command: !rp_arrest <player>]])
rp_msg2(id,[[000255000]],[[[RP] Command: !rp_free <player>]])
rp_msg2(id,[[000255000]],[[[RP] Command: !rp_give_money <player> <money>]])
rp_msg2(id,[[000255000]],[[[RP] Command: !rp_admin <password>]])
elseif sel == 8 then
udp_scar(id)
menu(id,[[CT Menu Props,]]..s_car_b..[[]])
end
end
if men == [[CT Menu Props]] then
if sel == 1 then
if pl_have_car[id]==0 then
car_img_pos[id]=image([[gfx/gfx/CF_cars/rage.bmp]],1,1,1)
imagepos(car_img_pos[id],player(id,[[x]]),player(id,[[y]]),player(id,[[rot]]))
car_tx[id]=player(id,[[tilex]])
car_ty[id]=player(id,[[tiley]])
car_x[id]=player(id,[[x]])
car_y[id]=player(id,[[y]])
pl_have_car[id]=1
elseif pl_have_car[id]==1 then
if pic[id]>0 then
parse([[customkill ]]..id..[[ Eject ]]..id)
parse([[explosion ]]..car_x[id]..[[ ]]..car_y[id]..[[ 100 200 ]]..id)
car_tx[id]=0
car_ty[id]=0
car_x[id]=0
car_y[id]=0
freeimage(car_img[id])
else
parse([[explosion ]]..car_x[id]..[[ ]]..car_y[id]..[[ 100 200 ]]..id)
car_tx[id]=0
car_ty[id]=0
car_x[id]=0
car_y[id]=0
freeimage(car_img_pos[id])
end
pl_have_car[id]=0
end
end
end
if men == [[T Menu]] then
if sel == 1 then
menu(id,[[T Menu Insta Equip,Laser|$30TL,Light Armor|$70TL,Glock|$20TL,Flashbang|$30 TL,Flare|20000TL]])
elseif sel == 2 then
rp_ct_arrest_button(id)
if tele_sys == 1 then
if rp_license[id]==true then
menu(id,[[Teleport Menu@b,Oraya git|$5000Tl,Set Current Position,Toggle Spawn Behavior (]]..tsb[id]..[[),]]..ct_57_b)
else
rp_msg2(id,[[255000000]],[[[RP] Lisans .....!]])
end
else
rp_msg2(id,[[255000000]],[[[RP] Teleport sistemi engellendi !]])
end
elseif sel == 3 then
rp_msg2(id,[[000255000]],[[[f1e basarak yardim al]])
end
end
if men == [[T Menu Insta Equip]] then
if sel == 1 then
if rp_money[id]>=30000 then
parse([[equip ]]..id..[[ 45]])
rp_money[id]=rp_money[id]-30000
else
nmn(id)
end
elseif sel == 2 then
if rp_money[id]>=70000 then
parse([[equip ]]..id..[[ 79]])
rp_money[id]=rp_money[id]-70000
else
nmn(id)
end
elseif sel == 3 then
if rp_money[id]>=20000 then
parse([[equip ]]..id..[[ 2]])
rp_money[id]=rp_money[id]-20000
else
nmn(id)
end
elseif sel == 4 then
if rp_money[id]>=30000 then
parse([[equip ]]..id..[[ 52]])
rp_money[id]=rp_money[id]-30000
else
nmn(id)
end
elseif sel == 5 then
if rp_money[id]>=20000 then
parse([[equip ]]..id..[[ 54]])
rp_money[id]=rp_money[id]-20000
else
nmn(id)
end
end
end
if men == [[Teleport Menu]] then
if sel == 1 then
if player_have_pos[id]==true then
if rp_money[id]>=5000 then
parse([[setpos ]]..id..[[ ]]..tele_x[id]..[[ ]]..tele_y[id])
rp_money[id]=rp_money[id]-5000
updatehud(id)
else
nmn(id)
end
else
rp_msg2(id,[[255000000]],[[hayir yapma!]])
end
elseif sel == 2 then
rp_msg2(id,[[000255000]],[[Position stored succesfully!]])
rp_msg2(id,[[000255000]],[[X: ]]..player(id,[[x]])..[[ Y: ]]..player(id,[[y]]))
tele_x[id] = player(id,[[x]])
tele_y[id] = player(id,[[y]])
player_have_pos[id]=true
elseif sel == 3 then
if player_have_pos[id]==true then
if tsb[id]==0 then
rp_msg2(id,[[000255000]],[[TELEPORT Sistemi ENGELLEndi!@C]])
tsb[id]=1
elseif tsb[id]==1 then
rp_msg2(id,[[000255000]],[[normal bisi yap !@C]])
tsb[id]=0
end
else
rp_msg2(id,[[255000000]],[[Not position stored!@C]])
end
elseif sel == 4 then
rp_msg2(id,[[000255000]],[[Five-siven le birine vur !]])
arrest_x[id]=player(id,[[x]])
arrest_y[id]=player(id,[[y]])
end
end
if men == [[CT Menu Settings]] then
if sel == 1 then
if drop_system_m == 1 then
drop_system_m = 0
rp_msg([[255000000]],[[Drop sistemi engellendi]]..player(id,[[name]])..[[@C]])
elseif drop_system_m == 0 then
drop_system_m = 1
rp_msg([[000255000]],[[Drop sistemi engellendi ]]..player(id,[[name]])..[[@C]])
end
set_men(id)
elseif sel == 2 then
if tele_sys == 1 then
tele_sys = 0
rp_msg([[255000000]],[[Teleport sistemi engellendi. Called by ]]..player(id,[[name]])..[[@C]])
elseif tele_sys == 0 then
tele_sys = 1
rp_msg([[000255000]],[[Drop sistemi engellendi. Called by ]]..player(id,[[name]])..[[@C]])
end
end
end
if men == [[CT Insta Equip Menu]] then
if sel == 1 then
if rp_money[id]>=0 then
parse([[equip ]]..id..[[ 45]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
elseif sel == 2 then
if rp_money[id]>=0 then
parse([[equip ]]..id..[[ 83]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
elseif sel == 3 then
if rp_money[id]>=0 then
parse([[speedmod ]]..id..[[ 250]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
elseif sel == 4 then
if rp_money[id]>=0 then
parse([[equip ]]..id..[[ 3]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
elseif sel == 5 then
if rp_money[id]>=0 then
parse([[equip ]]..id..[[ 6]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
elseif sel == 6 then
if rp_money[id]>=0 then
parse([[equip ]]..id..[[ 69]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
elseif sel == 7 then
if rp_money[id]>=0 then
parse([[equip ]]..id..[[ 82]])
rp_money[id]=rp_money[id]-0
else
nmn(id)
end
end
end
if men == [[Drop System]] then
if sel == 1 then
if rp_money[id]>= 100 then
parse([[spawnitem 66 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-100
else
nmn(id)
end
elseif sel == 2 then
if rp_money[id]>= 500 then
parse([[spawnitem 67 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-500
else
nmn(id)
end
elseif sel == 3 then
if rp_money[id]>= 1000 then
parse([[spawnitem 68 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-1000
else
nmn(id)
end
elseif sel == 4 then
if rp_money[id]>= 5000 then
for i = 1,5 do
parse([[spawnitem 68 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-1000
end
else
nmn(id)
end
elseif sel == 5 then
if rp_money[id]>= 10000 then
for i = 1,10 do
parse([[spawnitem 68 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-1000
end
else
mnm(id)
end
elseif sel == 6 then
if rp_money[id]>= 50000 then
for i = 1,50 do
parse([[spawnitem 68 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-1000
end
else
nmn(id)
end
elseif sel == 7 then
if rp_money[id]>= 100000 then
for i = 1,100 do
parse([[spawnitem 68 ]]..x..[[ ]]..y)
rp_money[id]=rp_money[id]-1000
end
else
nmn(id)
end
elseif sel == 8 then
if rp_license[id]==true then
rp_msg2(id,[[000255000]],[[Ýtemi yere atinca hic gitmiyecek!@C]])
rp_drop_item[id]=true
else
rp_msg2(id,[[255000000]],[[lan okumadinmi lisans gerekiyor kizdirma beni!]])
end
end
end
updatehud(id)
end

function mlicense(id)
bf4_msg2(id,[[255000000]],[[Lan okumadinmi lisans gerekiyor kizdirma beni!@C]])
end

addhook([[buildattempt]],[[rp_build]])
function rp_build(id,type,x,y)
if rp_ct[id]==true then
if rp_build_m[id]==1 then
if type == 8 then
if not entity(x,y,[[exists]]) then
parse([[spawnobject 12 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
return 1
end
elseif type == 21 then
return 0
else
if not entity(x,y,[[exists]]) then
parse([[spawnobject ]]..type..[[ ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
return 1
end
end
elseif rp_build_m[id]==2 then
if type == 8 then
if not entity(x,y,[[exists]]) then
parse([[spawnobject 12 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 0 ]]..id)
return 1
end
elseif type == 21 then
return 0
else
if not entity(x,y,[[exists]]) then
parse([[spawnobject ]]..type..[[ ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 0 ]]..id)
return 1
end
end
end
else
if type == 6 then
if rp_license[id]==true then
if rp_money[id]>= 1500 then
parse([[spawnobject 6 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-1500
else
nmn(id)
end
else
mlicense(id)
end
elseif type == 7 then
if rp_license[id]==true then
if rp_money[id]>= 50000 then
parse([[spawnobject 7 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-50000
else
nmn(id)
end
else
mlicense(id)
end
elseif type == 8 then
if rp_license[id]==true then
if rp_money[id]>=50000 then
parse([[spawnobject 8 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-50000
else
nmn(id)
end
else
mlicense(id)
end
elseif type == 9 then
if rp_license[id]==true then
if rp_money[id]>=50000 then
parse([[spawnobject 9 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-50000
else
nmn(id)
end
else
mlicense(id)
end
elseif type == 13 then
if rp_license[id]==true then
if rp_money[id]>=3000 then
parse([[spawnobject 13 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-3000
else
nmn(id)
end
else
mlicense(id)
end
elseif type == 14 then
if rp_license[id]==true then
if rp_money[id]>=3000 then
parse([[spawnobject 14 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-3000
else
nmn(id)
end
else
mlicense(id)
end
elseif type == 1 then
if rp_money[id]>=300 then
parse([[spawnobject 1 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-300
else
nmn(id)
end
elseif type == 2 then
if rp_money[id]>=500 then
parse([[spawnobject 2 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-500
else
nmn(id)
end
elseif type == 3 then
if rp_money[id]>=1000 then
parse([[spawnobject 3 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-1000
else
nmn(id)
end
elseif type == 4 then
if rp_money[id]>=2000 then
parse([[spawnobject 4 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-2000
else
nmn(id)
end
elseif type == 5 then
if rp_money[id]>=3000 then
parse([[spawnobject 5 ]]..x..[[ ]]..y..[[ ]]..player(id,[[rot]])..[[ 0 ]]..player(id,[[team]])..[[ ]]..id)
rp_money[id]=rp_money[id]-3000
else
nmn(id)
end
end
end
updatehud(id)
end

addhook([[spawn]],[[rp_spawn]])
function rp_spawn(id)
if rp_arrest[id]==false then
if tsb[id]==1 then
parse([[setpos ]]..id..[[ ]]..tele_x[id]..[[ ]]..tele_y[id])
end
else
return "50,74"
end
parse([[equip ]]..id..[[ 74]])
parse([[equip ]]..id..[[ 75]])
end

addhook([[hit]],[[rp_hit]])
function rp_hit(id,source,wpn,hpdmg)
if wpn == 45 then
rp_msg2(source,[[255000000]],[[Laserle bok vurursun sen yasak!]])
return 1
elseif wpn == 5 then
rp_money[source]=rp_money[source]+100
rp_money[id]=rp_money[id]-100
updatehud(source)
updatehud(id)
return 1
elseif wpn == 6 then
if rp_ct[source]==true then
if arrest_x[source]>0 and arrest_y[source]>0 then
parse([[setpos ]]..id..[[ ]]..arrest_x[source]..[[ ]]..arrest_y[source])
else
rp_msg2(source,[[255000000]],[[Not position stored!]])
end
else
rp_msg2(source,[[255000000]],[[You cant arrest, you aren't CT]])
end
return 1
elseif wpn == 3 then
parse([[sethealth ]]..id..[[ ]]..player(id,[[health]])+math.random(10,20))
rp_msg2(id,[[255255000]],[[You have been healed by ]]..player(source,[[name]]))
return 1
elseif wpn == 46 then
parse([[sethealth ]]..id..[[ ]]..player(id,[[health]])+1)
return 1
elseif wpn == 86 then
parse([[sethealth ]]..id..[[ ]]..player(id,[[health]])+math.random(10,20))
return 1
elseif wpn == 31 then
if rp_ct[source]==true then
parse([[explosion ]]..player(id,[[x]])..[[ ]]..player(id,[[y]])..[[ 10 1000000 ]]..source)
return 1
end
elseif wpn == 75 then
if rp_money[source]>=100 then
rp_money[source]=rp_money[source]-100
rp_money[id]=rp_money[id]+100
return 1
else
nmn(source)
return 1
end
end
updatehud(id)
if source ~= nil then
if player(source,[[exists]]) then
updatehud(source)
end
end
end

addhook([[projectile]],[[rp_projectile]])
function rp_projectile(id,wpn,x,y)
if wpn == 54 then
parse([[flasposition ]]..x..[[ ]]..y..[[ 500]])
elseif wpn == 53 then
parse([[setpos ]]..id..[[ ]]..x..[[ ]]..y)
end
if rp_ct[id]==true then
parse([[equip ]]..id..[[ ]]..wpn)
parse([[setweapon ]]..id..[[ ]]..wpn)
end
end

addhook([[use]],[[carmod_use]])
function carmod_use(id,event,data,x,y)
if event == 0 then
if pic[id] == 0 then
if player(id,[[tilex]])==car_tx[id] and player(id,[[tiley]])==car_ty[id] then
freeimage(car_img_pos[id])
pl_speed[id]=player(id,[[speedmod]])
car_img[id]=image([[gfx/car.bmp]],1,1,200+id) -- 423 Coloque onde esta o img do carro
parse([[speedmod ]]..id..[[ 75 ]])
pic[id]=1
end
elseif pic[id]==1 then
freeimage(car_img[id])
parse([[speedmod ]]..id..[[ 75 ]]..pl_speed[id])
car_tx[currentcar[id]]=player(id,[[tilex]])
car_ty[currentcar[id]]=player(id,[[tiley]])
car_img_pos[id]=image([[gfx/car.bmp]],1,1,1) -- 423 Coloque onde esta o img do carro
imagepos(car_img_pos[id],player(id,[[x]]),player(id,[[y]]),player(id,[[rot]]))
pic[id]=0
end
end
end
addhook("hit","build")
function build(id,build,wpn)
x=player(id,"tilex")
y=player(id,"tiley")
if wpn==34 then
parse ("spawnobject 5 "..(x-1).." "..(y-1))
parse ("spawnobject 5 "..(x).." "..(y-1))
parse ("spawnobject 5 "..(x+1).." "..(y-1))
parse ("spawnobject 5 "..(x-1).." "..(y))
parse ("spawnobject 5 "..(x+1).." "..(y))
parse ("spawnobject 5 "..(x-1).." "..(y+1))
parse ("spawnobject 5 "..(x).." "..(y+1))
parse ("spawnobject 5 "..(x+1).." "..(y+1))
parse ("spawnobject 5 "..(x).." "..(y))
end
end
[/code]
please help me..