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.arena_manager._10_npcChat
@@ -0,0 +1,89 @@
if game . get_event_flag ( "arena_close" ) > 0 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _30_say )
return
end
if not npc . lock ( ) then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _40_say )
return
end
local useMinLevel = game . get_event_flag ( "arena_use_min_level" )
if useMinLevel == 0 then
useMinLevel = 25 ;
end
if pc . get_level ( ) < useMinLevel then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _50_say , useMinLevel ) )
npc . unlock ( )
return
else
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _60_say )
local sname = input ( )
if sname == "" then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _70_say )
npc . unlock ( )
return
else
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _80_say , pc . name , sname ) )
wait ( "" )
local opp_vid = find_pc_by_name ( sname )
if opp_vid == 0 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _90_say , sname ) )
npc . unlock ( )
return
elseif opp_vid == pc . get_vid ( ) then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _100_say )
npc . unlock ( )
return
end
local old = pc . select ( opp_vid , opp_vid )
local opp_level = pc . get_level ( )
pc . select ( old , old )
if opp_level < useMinLevel then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _110_say , useMinLevel ) )
npc . unlock ( )
return
end
if not npc . is_near_vid ( opp_vid , 10 ) then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _120_say , sname ) )
npc . unlock ( )
return ;
end
local a = arena . is_in_arena ( opp_vid )
if a == 0 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _130_say , sname ) )
npc . unlock ( )
return ;
end
say_title ( gameforge . arena_manager . _140_sayTitle )
say ( string . format ( gameforge . arena_manager . _85_say , pc . name , sname ) )
local agree = confirm ( opp_vid , string . format ( gameforge . arena_manager . _87_say , sname , pc . name ) , 30 )
if agree ~= CONFIRM_OK then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _150_say , sname ) )
npc . unlock ( )
return
end
s = arena . start_duel ( sname , 3 )
if s == 0 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _160_say )
elseif s == 2 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _170_say )
elseif s == 3 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _180_say )
end
end
end
npc . unlock ( )
@@ -0,0 +1 @@
gameforge.arena_manager._190_npcChat
@@ -0,0 +1,30 @@
local g = arena . get_duel_list ( )
local arena_name = { }
local arena_observer = { }
table . foreachi ( g ,
function ( n , p )
arena_name [ n ] = string . format ( gameforge . arena_manager . _195_say , p [ 1 ] , p [ 2 ] )
arena_observer [ n ] = { p [ 3 ] , p [ 4 ] , p [ 5 ] }
end
)
table . insert ( arena_name , gameforge . arena_manager . _200_tableInsert )
table . insert ( arena_observer , 0 )
local count = table . getn ( g )
if count == 0 then
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . arena_manager . _210_say )
return ;
else
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( string . format ( gameforge . arena_manager . _220_say , count ) )
wait ( )
end
if table . getn ( g ) ~= 0 then
local s = select_table ( arena_name )
if table . getn ( arena_observer ) == s then
return ;
end
if table . getn ( arena_observer ) >= s then
arena . add_observer ( arena_observer [ s ] [ 1 ] , arena_observer [ s ] [ 2 ] , arena_observer [ s ] [ 3 ] )
end
end
@@ -0,0 +1 @@
gameforge.collect_herb_lv15._20_npcChat
@@ -0,0 +1,5 @@
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . cube . _20_say )
wait ( )
setskin ( NOWINDOW )
command ( "cube open" )
@@ -0,0 +1 @@
return pc . level >= 30
@@ -0,0 +1 @@
gameforge.cube._060_npcChat
@@ -0,0 +1,2 @@
setskin ( NOWINDOW )
command ( "cube make all" )
@@ -0,0 +1 @@
return pc . level >= 30
@@ -0,0 +1 @@
gameforge.main_quest_flame_lv102._350_sendLetter
@@ -0,0 +1,18 @@
if pc . count_item ( 50819 ) >= 50 and pc . count_item ( 51001 ) >= 100 then
pc . remove_item ( 50819 , 50 )
pc . remove_item ( 51001 , 100 )
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _440_say )
wait ( )
say_reward ( string . format ( gameforge . main_quest_lv60 . _190_sayReward , 4.8584e+07 ) )
pc . give_exp2 ( 4.8584e+07 )
say_reward ( string . format ( gameforge . main_quest_lv60 . _200_sayReward , 160000 ) )
pc . change_money ( 160000 )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 50708 ) , 10 ) )
pc . give_item2 ( 50708 , 10 )
say ( )
set_state ( "state4_1" )
else
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _450_say )
end
@@ -0,0 +1 @@
gameforge.main_quest_flame_lv102._350_sendLetter
@@ -0,0 +1,20 @@
if pc . count_item ( 50819 ) >= 50 and pc . count_item ( 51001 ) >= 100 then
pc . remove_item ( 50819 , 50 )
pc . remove_item ( 51001 , 100 )
target . delete ( "__TARGET__" )
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _440_say )
wait ( )
say_reward ( string . format ( gameforge . main_quest_lv60 . _190_sayReward , 4.8584e+07 ) )
pc . give_exp2 ( 4.8584e+07 )
say_reward ( string . format ( gameforge . main_quest_lv60 . _200_sayReward , 160000 ) )
pc . change_money ( 160000 )
say_reward ( string . format ( gameforge . main_quest_lv60 . _210_sayReward , item_name ( 50708 ) , 10 ) )
pc . give_item2 ( 50708 , 10 )
say ( )
set_state ( "state4_1" )
else
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _450_say )
set_state ( "state3_2" )
end
@@ -0,0 +1 @@
gameforge.main_quest_flame_lv102._480_sendLetter
@@ -0,0 +1,16 @@
target . delete ( "__TARGET__" )
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _500_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_flame_lv102 . _510_say )
wait ( )
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _520_say )
wait ( )
say_title ( pc . getname ( ) )
say ( gameforge . main_quest_flame_lv102 . _050_say )
wait ( )
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _530_say )
set_state ( "state4_2" )
@@ -0,0 +1 @@
gameforge.main_quest_flame_lv102._480_sendLetter
@@ -0,0 +1,2 @@
say_title ( mob_name ( 20017 ) )
say ( gameforge . main_quest_flame_lv102 . _550_say )
@@ -0,0 +1 @@
gameforge.main_quest_lv47._270_npcChat
@@ -0,0 +1,10 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . main_quest_lv47 . _280_say )
wait ( )
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . main_quest_lv47 . _290_say )
wait ( )
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . main_quest_lv47 . _300_say )
set_state ( "his_advice" )
@@ -0,0 +1 @@
gameforge.new_quest_lv28._015_npcChat
@@ -0,0 +1,22 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . new_quest_lv28 . _020_say_title )
say ( gameforge . new_quest_lv28 . _021_say )
q . done ( )
local doquest = select ( gameforge . new_quest_lv28 . _018_select , gameforge . subquest_12 . _50_select , gameforge . new_quest_lv75 . _290_2_select )
if doquest == 1 then
set_state ( "ask_ahyu" )
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_lv28 . _020_say_title )
say ( gameforge . subquest_11 . _80_say )
return
end
else
say_title ( gameforge . new_quest_lv28 . _020_say_title )
say ( gameforge . subquest_11 . _80_say )
return
end
@@ -0,0 +1 @@
gameforge.new_quest_lv52._030_set_title
@@ -0,0 +1,6 @@
target . delete ( "__TARGET2__" )
say_title ( gameforge . new_quest_lv52 . _049_say_title )
say ( gameforge . new_quest_lv52 . _052_say )
say ( gameforge . new_quest_lv52 . _053_say )
q . done ( )
set_state ( "gotoboss" )
@@ -0,0 +1 @@
gameforge.npc_talk._130_npcChat
@@ -0,0 +1,2 @@
say_title ( gameforge . npc_talk . _140_sayTitle )
say ( gameforge . npc_talk . _150_say )
@@ -0,0 +1 @@
gameforge.subquest_11._110_npcChat
@@ -0,0 +1,4 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . subquest_11 . _120_say )
set_state ( "ask_to_hunter" )
@@ -0,0 +1 @@
gameforge.subquest_16._80_sayTitle
@@ -0,0 +1,10 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . subquest_16 . _120_say )
wait ( )
say_title ( gameforge . subquest_16 . _130_sayTitle )
say ( gameforge . subquest_16 . _140_say )
wait ( )
say_title ( gameforge . subquest_16 . _130_sayTitle )
say ( gameforge . subquest_16 . _150_say )
set_state ( "ask_to_hengsang" )
@@ -0,0 +1 @@
gameforge.subquest_23._130_npcChat
@@ -0,0 +1,4 @@
target . delete ( "__TARGET__" )
say_title ( gameforge . arena_manager . _20_sayTitle )
say ( gameforge . subquest_23 . _140_say )
set_state ( "to_hunter" )
@@ -0,0 +1 @@
command ( "cube open" )