Spoiler 
addhook("menu","lottomenu")
function lottomenu(id,menu,sel)
if (menu=="Mennyit akarsz ellottózni?") then
if (sel<=1) then
local checkmon
checkmon=player(id,"money")
if checkmon>=500 then
parse("setmoney "..id.." "..(checkmon-500).."")
lottomoney=lottomoney+500
msg2(id,"Feltettél 500-at. A lottón most "..lottomoney.." Ft van")
else
msg2(id,"Nincs elég pénzed.")
end
elseif (sel==2) then
local checkmon
checkmon=player(id,"money")
if checkmon>=1000 then
parse("setmoney "..id.." "..(checkmon-1000).."")
lottomoney=lottomoney+1000
msg2(id,"Feltettél 1000-et. A lottón most "..lottomoney.." Ft van")
else
msg2(id,"Nincs elég pénzed.")
end
elseif (sel==3) then
local checkmon
checkmon=player(id,"money")
if checkmon>=2000 then
parse("setmoney "..id.." "..(checkmon-2000).."")
lottomoney=lottomoney+2000
msg2(id,"Feltettél 2000-et. A lottón most "..lottomoney.." Ft van")
else
msg2(id,"Nincs elég pénzed.")
end
elseif (sel==4) then
local checkmon
checkmon=player(id,"money")
if checkmon>=5000 then
parse("setmoney "..id.." "..(checkmon-5000).."")
lottomoney=lottomoney+5000
msg2(id,"Feltettél 5000-et. A lottón most "..lottomoney.." Ft van")
else
msg2(id,"Nincs elég pénzed.")
end
end
elseif (menu=="Milyen csoport?") then
if (sel<=1) then
yourclass[id]="civil"
freeimage(imageid[id])
parse("spawnplayer "..id.." 140 2125")
parse("speedmod "..id.." 0")
imageid[id]=image("gfx/Rs_D_Town/semmi.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==2) then
yourclass[id]="bunozo1"
freeimage(imageid[id])
parse("spawnplayer "..id.." 2803 1936")
parse("equip "..id.." 5")
parse("equip "..id.." 30")
parse("speedmod "..id.." 0")
imageid[id]=image("gfx/Rs_D_Town/gengszter.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==3) then
yourclass[id]="bunozo2"
freeimage(imageid[id])
parse("spawnplayer "..id.." 2803 1936")
parse("equip "..id.." 5")
parse("equip "..id.." 50")
parse("speedmod "..id.." 0")
msg2(id,"Késsel támadás = Drog adása a célpontnak")
imageid[id]=image("gfx/Rs_D_Town/drogdiler.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==4) then
yourclass[id]="bunozo3"
freeimage(imageid[id])
parse("spawnplayer "..id.." 2803 1936")
parse("equip "..id.." 84")
parse("equip "..id.." 69")
parse("speedmod "..id.." 10")
imageid[id]=image("gfx/Rs_D_Town/semmi.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==5) then
yourclass[id]="rendor1"
freeimage(imageid[id])
parse("spawnplayer "..id.." 3264 3520")
parse("equip "..id.." 3")
parse("equip "..id.." 32")
parse("equip "..id.." 50")
parse("speedmod "..id.." 0")
msg2(id,"Késsel támadás = börtönbe zárod a célpontot")
msg2(id,"Pisztollyal támadás = lelassítod a célpontot")
imageid[id]=image("gfx/Rs_D_Town/rendor.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==6) then
yourclass[id]="rendor2"
freeimage(imageid[id])
parse("spawnplayer "..id.." 3264 3520")
parse("equip "..id.." 3")
parse("equip "..id.." 20")
parse("equip "..id.." 50")
parse("equip "..id.." 80")
parse("speedmod "..id.." -10")
msg2(id,"Késsel támadás = börtönbe zárod a célpontot")
msg2(id,"Pisztollyal támadás = lebénítod a célpontot")
imageid[id]=image("gfx/Rs_D_Town/FBI.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==7) then
yourclass[id]="gyogyito"
freeimage(imageid[id])
parse("spawnplayer "..id.." 2208 3264")
parse("equip "..id.." 50")
parse("speedmod "..id.." 0")
msg2(id,"Késsel támadás = gyógyítod a célpontot")
imageid[id]=image("gfx/Rs_D_Town/gyogyito.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
elseif (sel==8) then
yourclass[id]="zombi"
freeimage(imageid[id])
parse("spawnplayer "..id.." 5248 2048")
parse("equip "..id.." 50")
parse("speedmod "..id.." 10")
parse("setmaxhealth "..id.." 250")
msg2(id,"Késsel támadás = zombit hívsz")
imageid[id]=image("gfx/Rs_D_Town/zombi.png",1,1,200+id)
imagescale(imageid[id],1,1)
imageblend(imageid[id],0)
imagealpha(imageid[id],1.0)
end
elseif (menu=="Eszköztár") then
if (sel==1) then
if (inv1[id]=="Varázsital") then
menu(id,"Varázsital,Használ,Eldob",sel) --Here's the first menu inside a menu
elseif (inv1[id]=="Telerúna") then
menu(id,"Telerúna,Használ,Eldob",sel)
else
msg2(id,"Nincs ott semmi!")
end
elseif (sel==2) then
if (inv1[id]=="Varázsital") then
menu(id,"Varázsital,Használ,Eldob",sel)
elseif (inv1[id]=="Telerúna") then
menu(id,"Telerúna,Használ,Eldob",sel)
else
msg2(id,"Nincs ott semmi!")
end
elseif (sel==3) then
if (inv1[id]=="Varázsital") then
menu(id,"Varázsital,Használ,Eldob",sel)
elseif (inv1[id]=="Telerúna") then
menu(id,"Telerúna,Használ,Eldob",sel)
else
msg2(id,"Nincs ott semmi!")
end
end
end
if (menu=="Varázsital") then
if (sel==1) then
parse("sethealth "..id.." 50")
if (inv1[id]=="Varázsital") then
inv1[id]=""
inv1des[id]=""
elseif (inv2[id]=="Varázsital") then
inv2[id]=""
inv2des[id]=""
elseif (inv3[id]=="Varázsital") then
inv3[id]=""
inv3des[id]=""
end
elseif (sel==2) then
if (inv1[id]=="Varázsital") then
inv1[id]=""
inv1des[id]=""
elseif (inv2[id]=="Varázsital") then
inv2[id]=""
inv2des[id]=""
elseif (inv3[id]=="Varázsital") then
inv3[id]=""
inv3des[id]=""
end
end
elseif (menu=="Telerúna") then
if (sel==1) then
parse("setpos "..id.." 2368 5888")
if (inv1[id]=="Telerúna") then
inv1[id]=""
inv1des[id]=""
elseif (inv2[id]=="Telerúna") then
inv2[id]=""
inv2des[id]=""
elseif (inv3[id]=="Telerúna") then
inv3[id]=""
inv3des[id]=""
end
elseif (sel==2) then
if (inv1[id]=="Telerúna") then
inv1[id]=""
inv1des[id]=""
elseif (inv2[id]=="Telerúna") then
inv2[id]=""
inv2des[id]=""
elseif (inv3=="Telerúna") then
inv3[id]=""
inv3des[id]=""
end
end
end
end
CS2D 
LUA question - Menu inside a menu
1 
Offline