Files
Leviathan/GameServer/AziaMafiaScriptsBackup/Other/New Text Document.txt
T
2026-06-01 12:46:52 +02:00

129 lines
3.9 KiB
Plaintext

function get_module_name ()
return "roaming_harris"
end
function roaming_special_npc ()
local name = get_value ("name")
dlg_title ("Wanderer Harris")
dlg_text ("hello" ..name .. ", are you sure you want to try your luck with me ?!")
dlg_menu ("What are you trying?!", "selected_question ()")
dlg_menu ("An attempt is worth", "selected_yes ()")
dlg_menu ("I do not think so ..", "selected_no ()")
dlg_show ()
end
function selected_question ()
local name = get_value ("name")
whisper (gv ("name"), "You can win a very special gift from Harris, but you can also experience your worst nightmare. The choice is yours ...")
end
function selected_yes ()
local name = get_value ("name")
local random = math.random (1,5)
if gv ("level")> 120 then
local flag = tonumber (get_flag ("harris_wanderer"))
if flag == nil then
flag = 0
set_flag ("harris_wanderer", "0")
end
if flag + 10800 <os.time (t) then
if by chance == 1 then
schenke_crap_item ()
set_flag ("harris_wanderer", os.time (t))
elseif coincidence == 2 then
schenke_gutes_item ()
set_flag ("harris_wanderer", os.time (t))
elseif coincidence == 3 then
schenke_debuff ()
set_flag ("harris_wanderer", os.time (t))
elseif coincidence == 4 then
schenke_guten_buff ()
set_flag ("harris_wanderer", os.time (t))
elseif coincidence == 5 then
sicherer_tod ()
set_flag ("harris_wanderer", os.time (t))
else
notice ("A high on" .. name .. ", he did not get anything from Harris; D")
set_flag ("harris_wanderer", os.time (t))
end
else
whisper (gv ("name"), os.date ("You can search for me on% d.% m.% Y at% H:% M. See you.", flag + 10800))
end
else
dlg_title ("Wanderer Harris")
dlg_text ("DO YOU BELIEVE YOU KNOW ME? Come back if you're at least level 120!")
dlg_menu ("Oh who do you need ..-.-", "")
end
end
crap_item = {2010218,2010217,2010216,2010215,2010219,2010220,2010222,2010223,2010224,2010225,2010242,
607115301,607115302,607115303,607115304,607115305,607115306,607115307,607115308,607115309,
607115310,607115311,5040025}
function schenke_crap_item ()
local num = math.random (1,23)
local number = math.random (1,3)
local ss_id = crap_item [num]
local id = get_item_name_by_code (ss_id)
insert_item (ss_id, number)
text = sconv ("<# D95310> You got" .. number .. "x # @ id @ # from Harris", "# @ id @ #", id)
whisper (gv ( "name"), text)
end
good_item = {920006,2010696,2010900,910077,910078,910079,2011573,2011571,2011572,2011573,305794,427209,437109,
2,011,308.710004}
function schenke_gutes_item ()
local num = math.random (1,15)
local number = math.random (1.5)
local ss_id = good_item [num]
local id = get_item_name_by_code (ss_id)
insert_item (ss_id, number)
text = sconv ("<# D95310> You got" .. number .. "x # @ id @ # from Harris", "# @ id @ #", id)
whisper (gv ( "name"), text)
end
debuff_add = {201051,6003,201055,201054,5003,5004,5005,5006,5010,5011,5014,5102,201005,5997,320005}
function give_debuff ()
local num = math.random (1,15)
local level = math.random (1,20)
local time = math.random (20000,720000)
local ss_id = debuff_add [num]
local id = get_item_name_by_code (ss_id)
add_state (ss_id, level, time)
text = sconv ("<# D95310> You have a level" ..level .. "Receive debuff from Harris")
whisper (gv ( "name"), text)
end
buff_add = {1302,1003,1005,1007,1009,1011,1012,1501,1502,1503,1504,1505,1506,1507,320006,13210}
function schenke_guten_buff ()
local num = math.random (1,14)
local level = math.random (1,20)
local time = math.random (20000,360000)
local ss_id = buff_add [num]
local state_name = get_item_name_by_code (ss_id)
add_state (ss_id, level, time)
text = sconv ("<# D95310> You have a level" ..level .. "Get buff from Harris")
whisper (gv ( "name"), text)
end
function safer_tod ()
local name = get_value ("name")
warp (184476.138539)
add_state (6006,1,6000)
add_state (145409,25,12000)
add_npc (184476,138539,185001,10)
announce ("Congratulations" ..name .. ", you have just been sent to certain death ...")
end