sangpronhat
03-07-10, 10:09 PM
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
Head_lvlup_250.lua
---------------
--JxOnline SPN
--Date : 1/2/10
--Check up lev 200 > 250
---------------
Task_EXP = 85
Prop = 5 --Diem Tiem Nang Duoc Cong
Magic = 1 --Diem Ky Nang Duoc Cong
EXP = {
{ 201 , 10000000 } ,
{ 202 , 20000000 } ,
{ 203 , 30000000 } ,
{ 204 , 40000000 } ,
{ 205 , 50000000 } ,
{ 206 , 60000000 } ,
{ 207 , 70000000 } ,
{ 208 , 80000000 } ,
{ 209 , 90000000 } ,
{ 210 , 100000000 } ,
{ 211 , 110000000 } ,
{ 212 , 120000000 } ,
{ 213 , 130000000 } ,
{ 214 , 140000000 } ,
{ 215 , 150000000 } ,
{ 216 , 160000000 } ,
{ 217 , 170000000 } ,
{ 218 , 180000000 } ,
{ 219 , 190000000 } ,
{ 220 , 200000000 } ,
{ 221 , 210000000 } ,
{ 222 , 220000000 } ,
{ 223 , 230000000 } ,
{ 224 , 240000000 } ,
{ 225 , 250000000 } ,
{ 226 , 260000000 } ,
{ 227 , 270000000 } ,
{ 228 , 280000000 } ,
{ 229 , 290000000 } ,
{ 230 , 300000000 } ,
{ 231 , 310000000 } ,
{ 232 , 320000000 } ,
{ 233 , 330000000 } ,
{ 234 , 340000000 } ,
{ 235 , 350000000 } ,
{ 236 , 360000000 } ,
{ 237 , 370000000 } ,
{ 238 , 380000000 } ,
{ 239 , 390000000 } ,
{ 240 , 400000000 } ,
{ 241 , 410000000 } ,
{ 242 , 420000000 } ,
{ 243 , 430000000 } ,
{ 244 , 440000000 } ,
{ 245 , 450000000 } ,
{ 246 , 460000000 } ,
{ 247 , 470000000 } ,
{ 248 , 480000000 } ,
{ 249 , 490000000 } ,
{ 250 , 500000000 }
}
function Check_UP_Lvl()
nLevel = GetLevel()
nExp = GetTask(Task_EXP)
if nLevel < 200 then
Msg2Player("Level cua ban hien tai la "..GetLevel())
return
end
if nLevel==250 then
Msg2Player("Ban Da la nguoi Max server khong the len cap duoc nua !!!")
return
end
for i=1,getn(EXP) do
if (nExp == EXP[Search()][2]) then
AddProp(Prop)
AddMagicPoint(Magic)
SetLevel(nLevel+1)
if GetExp() < 0 then
AddOwnExp(-1)
end
Msg2Player("Chuc mung ban vua len cap !! Cap do cua ban hien tai la"..(nLevel+1).."Level")
AddGlobalCountNews("Nhan vat"..GetName().."vua thang cap"..(nLevel+1),1)
KickOutSelf()
elseif (nExp < EXP[Search()][2]) then
Msg2Player("Ban dang luyen tap tai map danh cho 200 > 250 !!!")
break
end
end
end
function Search()
nLevel = GetLevel()
for i=1,getn(EXP) do
if (EXP[i][1] == nLevel+1) then
return i
end
end
end
function Add_210x()
if GetLevel() >= 200 then
Rate = random(50,500)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_210x()
end
function Add_220x()
if GetLevel() >= 200 then
Rate = random(100,1000)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,150)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_220x()
end
function Add_230x()
if GetLevel() >= 200 then
Rate = random(150,1500)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_230x()
end
function Add_240x()
if GetLevel() >= 200 then
Rate = random(200,2000)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_240x()
end
function Add_250x()
if GetLevel() >= 200 then
Rate = random(1,2000)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_250x()
end
-Monster thì dùng tool hay add tay tuỳ thix ^^ ! Gáng vào những script này ngar >''<
Include("\\script\\global\\level_up_250\\head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_210x()
Drop_210x()
end
monter_21x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_220x()
Drop_220x()
end
monter_22x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_230x()
Drop_230x()
end
monter_23x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_230x()
Drop_230x()
end
monter_24x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_240x()
Drop_240x()
end
monter_25x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_250x()
Drop_250x()
end
Tới cấp 250 choa trùng sinh 250 hay rỳ đoá :))
Hình như cái nỳ tui send chOa ei gÙi thì phải đOá her her
- Sem Lady GaGa nak` :))
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b> (<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b> watch%3Fv%3DEVBsypHzF3U)
^:)^^:)^^:)^
Head_lvlup_250.lua
---------------
--JxOnline SPN
--Date : 1/2/10
--Check up lev 200 > 250
---------------
Task_EXP = 85
Prop = 5 --Diem Tiem Nang Duoc Cong
Magic = 1 --Diem Ky Nang Duoc Cong
EXP = {
{ 201 , 10000000 } ,
{ 202 , 20000000 } ,
{ 203 , 30000000 } ,
{ 204 , 40000000 } ,
{ 205 , 50000000 } ,
{ 206 , 60000000 } ,
{ 207 , 70000000 } ,
{ 208 , 80000000 } ,
{ 209 , 90000000 } ,
{ 210 , 100000000 } ,
{ 211 , 110000000 } ,
{ 212 , 120000000 } ,
{ 213 , 130000000 } ,
{ 214 , 140000000 } ,
{ 215 , 150000000 } ,
{ 216 , 160000000 } ,
{ 217 , 170000000 } ,
{ 218 , 180000000 } ,
{ 219 , 190000000 } ,
{ 220 , 200000000 } ,
{ 221 , 210000000 } ,
{ 222 , 220000000 } ,
{ 223 , 230000000 } ,
{ 224 , 240000000 } ,
{ 225 , 250000000 } ,
{ 226 , 260000000 } ,
{ 227 , 270000000 } ,
{ 228 , 280000000 } ,
{ 229 , 290000000 } ,
{ 230 , 300000000 } ,
{ 231 , 310000000 } ,
{ 232 , 320000000 } ,
{ 233 , 330000000 } ,
{ 234 , 340000000 } ,
{ 235 , 350000000 } ,
{ 236 , 360000000 } ,
{ 237 , 370000000 } ,
{ 238 , 380000000 } ,
{ 239 , 390000000 } ,
{ 240 , 400000000 } ,
{ 241 , 410000000 } ,
{ 242 , 420000000 } ,
{ 243 , 430000000 } ,
{ 244 , 440000000 } ,
{ 245 , 450000000 } ,
{ 246 , 460000000 } ,
{ 247 , 470000000 } ,
{ 248 , 480000000 } ,
{ 249 , 490000000 } ,
{ 250 , 500000000 }
}
function Check_UP_Lvl()
nLevel = GetLevel()
nExp = GetTask(Task_EXP)
if nLevel < 200 then
Msg2Player("Level cua ban hien tai la "..GetLevel())
return
end
if nLevel==250 then
Msg2Player("Ban Da la nguoi Max server khong the len cap duoc nua !!!")
return
end
for i=1,getn(EXP) do
if (nExp == EXP[Search()][2]) then
AddProp(Prop)
AddMagicPoint(Magic)
SetLevel(nLevel+1)
if GetExp() < 0 then
AddOwnExp(-1)
end
Msg2Player("Chuc mung ban vua len cap !! Cap do cua ban hien tai la"..(nLevel+1).."Level")
AddGlobalCountNews("Nhan vat"..GetName().."vua thang cap"..(nLevel+1),1)
KickOutSelf()
elseif (nExp < EXP[Search()][2]) then
Msg2Player("Ban dang luyen tap tai map danh cho 200 > 250 !!!")
break
end
end
end
function Search()
nLevel = GetLevel()
for i=1,getn(EXP) do
if (EXP[i][1] == nLevel+1) then
return i
end
end
end
function Add_210x()
if GetLevel() >= 200 then
Rate = random(50,500)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_210x()
end
function Add_220x()
if GetLevel() >= 200 then
Rate = random(100,1000)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,150)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_220x()
end
function Add_230x()
if GetLevel() >= 200 then
Rate = random(150,1500)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_230x()
end
function Add_240x()
if GetLevel() >= 200 then
Rate = random(200,2000)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_240x()
end
function Add_250x()
if GetLevel() >= 200 then
Rate = random(1,2000)
nLevel = GetLevel()
SetTask(Task_EXP,GetTask(Task_EXP)+nLevel*Rate)
nExp = GetTask(Task_EXP)
Msg2Player("Ban vua nhan duoc "..(nLevel*Rate).." diem kinh nghiem !!")
Msg2Player("Kinh nghiem cua ban hien nay la "..nExp.." de thang cap "..(nLevel+1).." ban can co "..EXP[Search()][2].." diem kinh nghiem")
else
KN = random(50,100)*GetLevel()
AddOwnExp(KN)
Msg2Player("Ban dang o Map luyen cong 2xx !! Level ban hien gio nho hon 200 Tuy nhien ban van nhan duoc "..KN.." EXP")
end
end
function Drop_250x()
end
-Monster thì dùng tool hay add tay tuỳ thix ^^ ! Gáng vào những script này ngar >''<
Include("\\script\\global\\level_up_250\\head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_210x()
Drop_210x()
end
monter_21x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_220x()
Drop_220x()
end
monter_22x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_230x()
Drop_230x()
end
monter_23x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_230x()
Drop_230x()
end
monter_24x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_240x()
Drop_240x()
end
monter_25x.lua
Include("\\script\\Global\\level_up_250\\Head_lvlup_250.lua")
function OnDeath()
Check_UP_Lvl()
Add_250x()
Drop_250x()
end
Tới cấp 250 choa trùng sinh 250 hay rỳ đoá :))
Hình như cái nỳ tui send chOa ei gÙi thì phải đOá her her
- Sem Lady GaGa nak` :))
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b> (<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b> watch%3Fv%3DEVBsypHzF3U)
^:)^^:)^^:)^