Initial commit: server + serverfiles

This commit is contained in:
Game
2026-08-17 17:31:44 +00:00
commit ff1237686b
17389 changed files with 868929 additions and 0 deletions
@@ -0,0 +1 @@
gameforge.main_quest_lv93._250_sendLetter
@@ -0,0 +1,30 @@
target . delete ( "__TARGET__" )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _330_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _340_say )
wait ( )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _350_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _360_say )
wait ( )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _370_say )
wait ( )
say_title ( locale . reward )
say_reward ( string . format ( gameforge . main_quest_lv60 . _190_sayReward , 1.79046e+07 ) )
say_reward ( string . format ( gameforge . main_quest_lv60 . _200_sayReward , 30000 ) )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 71094 ) , 1 , locale . count_postfix ) )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 72024 ) , 1 , locale . count_postfix ) )
say ( "" )
pc . give_exp2 ( 1.79046e+07 )
pc . change_money ( 30000 )
pc . give_item2 ( 71094 , 1 )
pc . give_item2_select ( 72024 )
set_state ( "state3_3" )
clear_letter ( )
local cur_t = get_global_time ( )
pc . setf ( "main_quest_lv93" , "ockgu_access_time" , cur_t )
@@ -0,0 +1 @@
gameforge.main_quest_lv93._400_npcChat
@@ -0,0 +1,6 @@
if get_global_time ( ) - pc . getf ( "main_quest_lv93" , "ockgu_access_time" ) >= 24 * 60 * 60 then
set_state ( "state4_1" )
else
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _390_say )
end
@@ -0,0 +1 @@
gameforge.main_quest_lv93._400_npcChat
@@ -0,0 +1,22 @@
target . delete ( "__TARGET__" )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _420_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _430_say )
wait ( )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _440_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _450_say )
wait ( )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _460_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _470_say )
wait ( )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _480_say )
set_state ( "state4_2" )
@@ -0,0 +1 @@
gameforge.main_quest_lv93._400_npcChat
@@ -0,0 +1,17 @@
if pc . count_item ( 50724 ) >= 200 and pc . count_item ( 50726 ) >= 200 and pc . count_item ( 50707 ) >= 200 then
pc . remove_item ( 50724 , 200 )
pc . remove_item ( 50726 , 200 )
pc . remove_item ( 50707 , 200 )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _520_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _530_say )
set_state ( "state4_3" )
clear_letter ( )
local cur_t = get_global_time ( )
pc . setf ( "main_quest_lv93" , "item4_make_start_time" , cur_t )
else
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _640_say )
end
@@ -0,0 +1 @@
gameforge.main_quest_lv93._400_npcChat
@@ -0,0 +1,2 @@
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _540_say )
@@ -0,0 +1 @@
gameforge.main_quest_lv93._400_npcChat
@@ -0,0 +1,22 @@
target . delete ( "__TARGET__" )
say_title ( mob_name ( 20008 ) )
say ( gameforge . main_quest_lv93 . _560_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_lv93 . _570_say )
wait ( )
say_title ( locale . reward )
say_reward ( string . format ( gameforge . main_quest_lv60 . _190_sayReward , 3.1374e+07 ) )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 31031 ) , 1 , locale . count_postfix ) )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 50706 ) , 20 , locale . count_postfix ) )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 72301 ) , 5 , locale . count_postfix ) )
say ( "" )
pc . give_exp2 ( 3.1374e+07 )
pc . give_item2 ( 31031 , 1 )
pc . give_item2 ( 50706 , 20 )
pc . give_item2 ( 72301 , 1 )
pc . give_item2 ( 72301 , 1 )
pc . give_item2 ( 72301 , 1 )
pc . give_item2 ( 72301 , 1 )
pc . give_item2 ( 72301 , 1 )
set_state ( "state5_1" )
@@ -0,0 +1 @@
gameforge.new_quest_lv42._010_send_letter
@@ -0,0 +1,23 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . new_quest_lv42 . _022_say_title )
say ( gameforge . new_quest_lv42 . _023_say )
say ( gameforge . new_quest_lv42 . _024_say )
local doquest = select ( gameforge . new_quest_lv42 . _026_select , gameforge . subquest_12 . _50_select , gameforge . new_quest_lv75 . _290_2_select )
if doquest == 1 then
q . done ( )
set_state ( "ask_fisher" )
elseif doquest == 3 then
say ( gameforge . subquest_06 . _60_say )
local abortquest = select ( gameforge . subquest_06 . _70_select , gameforge . subquest_06 . _80_select )
if abortquest == 1 then
set_state ( "__GIVEUP__" )
else
say_title ( gameforge . new_quest_lv42 . _022_say_title )
say ( gameforge . subquest_11 . _80_say )
return
end
else
say_title ( gameforge . new_quest_lv42 . _022_say_title )
say ( gameforge . subquest_11 . _80_say )
return
end
@@ -0,0 +1 @@
gameforge.new_quest_lv7._020_say_title
@@ -0,0 +1,108 @@
target . delete ( "__TARGET5__" )
say_title ( gameforge . new_quest_lv7 . _020_say_title )
if npc . get_empire ( ) == pc . get_empire ( ) then
if soup then
say ( gameforge . new_quest_lv7 . _150_say )
end
say ( gameforge . new_quest_lv7 . _151_say )
say ( gameforge . new_quest_lv7 . _152_say )
local reward = new_quest_lv7 . reward ( )
local reward_exp = new_quest_lv7 . reward_exp ( )
say_reward ( string . format ( gameforge . new_quest_lv7 . _154_say_reward , reward_exp ) )
say_reward ( string . format ( gameforge . new_quest_lv7 . _155_say_reward , reward ) )
pc . give_exp2 ( reward_exp )
pc . change_money ( reward )
local reward_item = "0"
if pc . job == 0 then
local r = number ( 1 , 10 )
if r == 1 then
reward_item = "00013"
elseif r == 2 then
reward_item = "00023"
elseif r == 3 then
reward_item = "00033"
elseif r == 4 then
reward_item = "00043"
elseif r == 5 then
reward_item = "00053"
elseif r == 6 then
reward_item = "03003"
elseif r == 7 then
reward_item = "03013"
elseif r == 8 then
reward_item = "03023"
elseif r == 9 then
reward_item = "03033"
elseif r == 10 then
reward_item = "03043"
end
elseif pc . job == 1 then
local r = number ( 1 , 10 )
if r == 1 then
reward_item = "01003"
elseif r == 2 then
reward_item = "04003"
elseif r == 3 then
reward_item = "01013"
elseif r == 4 then
reward_item = "04013"
elseif r == 5 then
reward_item = "01023"
elseif r == 6 then
reward_item = "02003"
elseif r == 7 then
reward_item = "02013"
elseif r == 8 then
reward_item = "02023"
elseif r == 9 then
reward_item = "02033"
elseif r == 10 then
reward_item = "2043"
end
elseif pc . job == 2 then
local r = number ( 1 , 6 )
if r == 1 then
reward_item = "00013"
elseif r == 2 then
reward_item = "00023"
elseif r == 3 then
reward_item = "00033"
elseif r == 4 then
reward_item = "00043"
elseif r == 5 then
reward_item = "00053"
elseif r == 6 then
reward_item = "00053"
end
elseif pc . job == 3 then
local r = number ( 1 , 8 )
if r == 1 then
reward_item = "05003"
elseif r == 2 then
reward_item = "05013"
elseif r == 3 then
reward_item = "05023"
elseif r == 4 then
reward_item = "07003"
elseif r == 5 then
reward_item = "07013"
elseif r == 6 then
reward_item = "07023"
elseif r == 7 then
reward_item = "07033"
elseif r == 8 then
reward_item = "07043"
end
end
if reward_item ~= "0" then
wait ( )
say_reward ( gameforge . new_quest_lv7 . _153_say_reward )
say_item_vnum ( reward_item )
pc . give_item2 ( reward_item , 1 )
end
set_state ( "__COMPLETE__" )
else
say ( gameforge . new_quest_lv7 . _160_say )
say ( gameforge . new_quest_lv7 . _165_say )
soup = true
end
@@ -0,0 +1 @@
gameforge.new_quest_lv7._020_say_title
@@ -0,0 +1,35 @@
target . delete ( "__TARGET__" )
local empire = pc . get_empire ( )
say_title ( gameforge . new_quest_lv7 . _011_say_title )
say ( gameforge . new_quest_lv7 . _021_say )
if empire == 1 then
say ( gameforge . new_quest_lv7 . _022_say )
end
if empire == 2 then
say ( gameforge . new_quest_lv7 . _023_say )
end
if empire == 3 then
say ( gameforge . new_quest_lv7 . _024_say )
end
wait ( )
say_title ( gameforge . new_quest_lv7 . _011_say_title )
say ( gameforge . new_quest_lv7 . _030_say )
say ( gameforge . new_quest_lv7 . _031_say )
local doquest = select ( gameforge . subquest_06 . _40_select , gameforge . subquest_12 . _50_select , gameforge . new_quest_lv75 . _290_2_select )
if doquest == 1 then
set_state ( "ask_oldwoman" )
elseif doquest == 3 then
say ( gameforge . subquest_06 . _60_say )
local abortquest = select ( gameforge . subquest_06 . _70_select , gameforge . subquest_06 . _80_select )
if abortquest == 1 then
set_state ( "__GIVEUP__" )
else
say_title ( gameforge . new_quest_lv7 . _011_say_title )
say ( gameforge . subquest_11 . _80_say )
return
end
else
say_title ( gameforge . new_quest_lv7 . _011_say_title )
say ( gameforge . subquest_11 . _80_say )
return
end
@@ -0,0 +1 @@
gameforge.npc_talk._20_npcChat
@@ -0,0 +1,7 @@
say_title ( gameforge . npc_talk . _30_sayTitle )
say ( gameforge . npc_talk . _40_say )
if math . random ( 2 ) == 1 then
wait ( )
say ( pc . get_name ( ) .. ":" )
say ( gameforge . npc_talk . _50_say )
end
@@ -0,0 +1 @@
gameforge.subquest_26._310_npcChat
@@ -0,0 +1,18 @@
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _320_say )
local s = select ( gameforge . subquest_26 . _330_select , gameforge . find_brother_article . _170_select )
if 2 == s then
say ( gameforge . subquest_26 . _80_say )
local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no )
if 2 == a then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _340_say )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _350_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _360_say )
@@ -0,0 +1 @@
return pc . getqf ( "frog_done" ) == 1
@@ -0,0 +1 @@
gameforge.subquest_26._250_sendLetter
@@ -0,0 +1,13 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _380_say )
wait ( )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _390_say )
pc . remove_item ( 30116 , 1 )
say_reward ( gameforge . subquest_26 . _400_sayReward )
pc . change_money ( 50000 )
say_reward ( gameforge . subquest_26 . _410_sayReward )
pc . give_exp2 ( 5e+06 )
clear_letter ( )
set_state ( "COMPLETE" )
@@ -0,0 +1 @@
return pc . count_item ( 30116 ) >= 1
@@ -0,0 +1 @@
gameforge.subquest_26._160_npcChat
@@ -0,0 +1,23 @@
target . delete ( "__TARGET1__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _170_say )
wait ( "" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _180_say )
local s = select ( gameforge . subquest_26 . _190_select , gameforge . subquest_26 . _200_select )
if 2 == s then
say ( gameforge . subquest_26 . _210_say )
local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no )
if 2 == a then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _220_say )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _230_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_26 . _240_say )
set_state ( "accept" )
@@ -0,0 +1 @@
gameforge.subquest_41._140_npcChat
@@ -0,0 +1,29 @@
target . delete ( "__TARGET__" )
if pc . count_item ( "30162" ) >= 100 then
say_title ( gameforge . subquest_41 . _150_sayTitle )
say ( gameforge . subquest_41 . _160_say )
wait ( )
say_title ( gameforge . subquest_41 . _150_sayTitle )
say ( gameforge . subquest_41 . _170_say )
pc . remove_item ( "30162" , 100 )
say_reward ( gameforge . subquest_41 . _180_sayReward )
pc . give_exp2 ( 2.1e+06 )
set_quest_state ( "levelup" , "run" )
say_reward ( gameforge . subquest_30 . _270_sayReward )
pc . change_money ( 20000 )
clear_letter ( )
set_state ( "COMPLETE" )
return
else
say_title ( gameforge . subquest_41 . _150_sayTitle )
say ( gameforge . subquest_41 . _190_say )
local s = select ( gameforge . subquest_26 . _330_select , gameforge . find_brother_article . _170_select )
if 2 == s then
say_title ( gameforge . subquest_41 . _150_sayTitle )
say ( gameforge . subquest_41 . _200_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_41 . _150_sayTitle )
say ( gameforge . subquest_41 . _210_say )
end
@@ -0,0 +1 @@
gameforge._015_npcChat
@@ -0,0 +1,27 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_41 . _20_say )
wait ( )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_41 . _30_say )
wait ( )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_41 . _40_say )
say_item_vnum ( "30162" )
local s = select ( gameforge . subquest_01 . _50_select , gameforge . subquest_30 . _50_select )
if 2 == s then
say ( gameforge . subquest_41 . _50_say )
local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no )
if 2 == a then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_41 . _60_say )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_41 . _70_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_41 . _80_say )
set_state ( "hunt_for_oku" )
@@ -0,0 +1 @@
return pc . level >= 49
@@ -0,0 +1 @@
gameforge.subquest_49._180_npcChat
@@ -0,0 +1,26 @@
target . delete ( "__TARGET1__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _190_say )
wait ( )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _200_say )
wait ( )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _210_say )
local s = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no )
if 2 == s then
say ( gameforge . subquest_49 . _220_say )
local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no )
if 2 == a then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _230_say )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _240_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _250_say )
set_state ( "gain_ice" )
@@ -0,0 +1 @@
gameforge.subquest_49._290_npcChat
@@ -0,0 +1,21 @@
target . delete ( "__TARGET__" )
if pc . count_item ( "30146" ) >= 50 then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _300_say )
say_item_vnum ( 30149 )
pc . give_item2 ( 30149 )
set_state ( "back_to_boy" )
pc . remove_item ( 30146 , 50 )
return
else
say ( gameforge . subquest_49 . _310_say )
local s = select ( gameforge . subquest_49 . _320_select , gameforge . find_brother_article . _170_select )
if 2 == s then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _330_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_49 . _340_say )
end
@@ -0,0 +1 @@
gameforge.subquest_06._310_npcChat
@@ -0,0 +1,16 @@
target . delete ( "__TARGET1__" )
if pc . count_item ( 60001 ) >= 1 then
pc . setqf ( "leather_done" , 1 )
pc . setqf ( "asked_20008" , 0 )
pc . remove_item ( "60001" , 1 )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_06 . _330_say )
if pc . getqf ( "ironore_done" ) == 1 and pc . getqf ( "leather_done" ) == 1 and pc . getqf ( "coal_done" ) == 1 then
set_state ( "back_to_blacksmith" )
end
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_06 . _340_say )
say_item_vnum ( "60001" )
pc . setqf ( "asked_20008" , 1 )
@@ -0,0 +1 @@
return pc . getf ( "subquest_6" , "leather_done" ) == 0
@@ -0,0 +1 @@
gameforge.subquest_06._350_npcChat
@@ -0,0 +1,3 @@
target . delete ( "__TARGET1__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_06 . _360_say )
@@ -0,0 +1 @@
return pc . getqf ( "leather_done" ) == 1
@@ -0,0 +1 @@
gameforge.subquest_07._90_npcChat
@@ -0,0 +1,7 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_07 . _100_say )
wait ( )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_07 . _110_say )
set_state ( "hunt_for_oku" )
@@ -0,0 +1 @@
gameforge.subquest_07._130_npcChat
@@ -0,0 +1,16 @@
target . delete ( "__TARGET__" )
if pc . count_item ( "30026" ) >= 1 then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_07 . _140_say )
pc . remove_item ( "30026" )
pc . give_exp2 ( 12000 )
set_quest_state ( "levelup" , "run" )
pc . change_money ( 5000 )
pc . give_item2 ( "30028" , 1 )
say_title ( gameforge . collect_herb_lv4 . _130_sayTitle )
say_reward ( gameforge . subquest_07 . _150_sayReward )
set_state ( "__COMPLETE__" )
else
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_07 . _160_say )
end
@@ -0,0 +1 @@
gameforge.subquest_07._20_npcChat
@@ -0,0 +1,4 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_07 . _30_say )
set_state ( "ask_to_sunyugil" )
@@ -0,0 +1 @@
return pc . level >= 12
@@ -0,0 +1 @@
gameforge.subquest_08._110_npcChat
@@ -0,0 +1,20 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_08 . _160_say )
local s = select ( gameforge . subquest_05 . _70_select , gameforge . subquest_08 . _170_select )
if 2 == s then
say ( gameforge . subquest_01 . _360_say )
local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no )
if 2 == a then
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_08 . _180_say )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_08 . _190_say )
set_state ( "__GIVEUP__" )
return
end
say_title ( gameforge . subquest_06 . _320_sayTitle )
say ( gameforge . subquest_08 . _200_say )
set_state ( "ask_for_ricecake3" )