Initial commit: server + serverfiles

2026-08-17 17:31:44 +00:00
commit ff1237686b
17389 changed files with 868929 additions and 0 deletions
@@ -0,0 +1 @@
+gameforge.buy_fishrod._170_npcChat
@@ -0,0 +1,3 @@
+say_title ( gameforge . buy_fishrod . _20_sayTitle ) 
+say ( gameforge . buy_fishrod . _180_say ) 
+setstate ( "reward" ) 
@@ -0,0 +1 @@
+return pc . countitem ( "27833" ) >= 5
@@ -0,0 +1 @@
+gameforge.buy_fishrod._170_npcChat
@@ -0,0 +1,2 @@
+say_title ( gameforge . buy_fishrod . _20_sayTitle ) 
+say ( gameforge . buy_fishrod . _190_say ) 
@@ -0,0 +1 @@
+return pc . countitem ( "27833" ) < 5
@@ -0,0 +1 @@
+gameforge.buy_fishrod._10_npcChat
@@ -0,0 +1,20 @@
+say_title ( gameforge . buy_fishrod . _20_sayTitle ) 
+say ( gameforge . buy_fishrod . _30_say ) 
+local b = select ( gameforge . buy_fishrod . _40_select , gameforge . buy_fishrod . _50_select ) 
+if 1 == b then 
+if pc . money >= 3980 then 
+pc . changemoney ( - 3980 ) 
+say_title ( gameforge . buy_fishrod . _20_sayTitle ) 
+say ( gameforge . buy_fishrod . _60_say ) 
+pc . give_item2 ( "27400" , 1 ) 
+pc . give_item2 ( "27800" , 100 ) 
+pc . give_item2 ( "27801" , 20 ) 
+setstate ( "notify_event" ) 
+else 
+say_title ( gameforge . buy_fishrod . _20_sayTitle ) 
+say ( gameforge . buy_fishrod . _70_say ) 
+end 
+elseif 2 == b then 
+else 
+say ( string . format ( gameforge . buy_fishrod . _80_say , b ) ) 
+end 
@@ -0,0 +1 @@
+return pc . level >= 7 and pc . level <= 17
@@ -0,0 +1 @@
+gameforge.fisher._10_npcChat
@@ -0,0 +1,2 @@
+npc . open_shop ( ) 
+setskin ( NOWINDOW ) 
@@ -0,0 +1 @@
+gameforge.fisher._20_npcChat
@@ -0,0 +1,2 @@
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _40_say ) 
@@ -0,0 +1 @@
+gameforge.main_quest_lv7._110_npcChat
@@ -0,0 +1,10 @@
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . main_quest_lv7 . _120_say ) 
+wait ( ) 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . main_quest_lv7 . _130_say ) 
+wait ( ) 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . main_quest_lv7 . _140_say ) 
+say_item ( gameforge . main_quest_lv7 . _150_sayItem , 30001 , "" ) 
+set_state ( "gotosmith2" ) 
@@ -0,0 +1 @@
+"About the fish..."
@@ -0,0 +1,27 @@
+say_title ( "Fisherman's Event" ) 
+if pc . count_item ( game . get_event_flag ( "manwoo_fish" ) ) < game . get_event_flag ( "manwoo" ) then 
+say ( "You don't have enough fish!" ) 
+else 
+say ( "Hey! You actually managed to do it!" ) 
+say ( "Thank you!" ) 
+say ( "And now... for the reward" ) 
+wait ( ) 
+say_title ( "Fisherman's Event" ) 
+local current_amount = pc . getqf ( "reward" ) 
+local reward_vnum = game . get_event_flag ( "manwoo_reward_" .. current_amount ) 
+if reward_vnum == 0 or reward_vnum == "" then 
+local last_item_vnum = 150 
+say_item_vnum ( last_item_vnum ) 
+pc . give_item2 ( last_item_vnum ) 
+else 
+if pc . enough_inventory ( reward_vnum ) == true then 
+say_item_vnum ( reward_vnum ) 
+pc . remove_item ( game . get_event_flag ( "manwoo_fish" ) , game . get_event_flag ( "manwoo" ) ) 
+pc . give_item2 ( reward_vnum ) 
+pc . setqf ( "reward" , current_amount + 1 ) 
+else 
+say ( "You don't have enough space!" ) 
+say ( "Please, return when you have enough space!" ) 
+end 
+end 
+end 
@@ -0,0 +1 @@
+return game . get_event_flag ( "manwoo_start" ) > 0 and game . get_event_flag ( "manwoo_start" ) > 0 and game . get_event_flag ( "manwoo_time" ) >= get_global_time ( )
@@ -0,0 +1 @@
+"GM: Start Fishing Event"
@@ -0,0 +1,92 @@
+say_title ( "Manwoo Event" ) 
+say ( "Which fish should be accepted?" ) 
+say ( "Between 27802 and 27818" ) 
+local fish = input ( ) 
+if fish ~= "" then 
+fish = tonumber ( fish ) 
+end 
+if fish >= 27802 and fish <= 27818 then 
+game . set_event_flag ( "manwoo_fish" , fish ) 
+else 
+say ( "That number isn't accepted" ) 
+return 
+end 
+say_title ( "Manwoo Event" ) 
+say ( "How many fishes should we accept?" ) 
+local amount = input ( ) 
+if amount ~= "" then 
+amount = tonumber ( amount ) 
+end 
+if amount > 0 then 
+game . set_event_flag ( "manwoo" , amount ) 
+else 
+say ( "That isn't a valid number" ) 
+end 
+say_title ( "Manwoo Event" ) 
+say ( "How many different items should" ) 
+say ( "the player receive as a reward? Max = 4" ) 
+local reward_amount = select ( "1" , "2" , "3" , "4" , "cancel" ) 
+if s == 5 then 
+return 
+else 
+local i = 0 
+repeat 
+i = i + 1 
+game . set_event_flag ( "manwoo_reward_" .. i , 0 ) 
+until i == 4 
+local current_amount = 0 
+local again = 1 
+repeat 
+say_title ( "Manwoo Event" ) 
+say ( "Please input the item vnum that will be given (Reward " .. current_amount .. ")." ) 
+local reward_vnum = input ( ) 
+say_title ( "Manwoo Event" ) 
+if reward_vnum == "" or reward_vnum == 0 then 
+say ( "You did not put a vnum in there" ) 
+again = select ( "Again" , "no more items" , "cancel" ) 
+if again == 2 then 
+current_amount = reward_amount 
+elseif again == 3 then 
+return 
+end 
+else 
+if item_name ( reward_vnum ) == nil then 
+say ( "That vnum does not exist" ) 
+wait ( ) 
+else 
+say_item_vnum ( reward_vnum ) 
+say ( "" ) 
+local vnum_ok = select ( "ok" , "type again" , "cancel" ) 
+if vnum_ok == 1 then 
+current_amount = current_amount + 1 
+game . set_event_flag ( "manwoo_reward_" .. current_amount , reward_vnum ) 
+elseif vnum_ok == 3 then 
+return 
+end 
+end 
+end 
+until current_amount == reward_amount 
+end 
+say_title ( "Manwoo Event" ) 
+say ( "For how many hours should the event be on?" ) 
+local s = select ( "8 hours" , "16 hours" , "24 hours" , "unlimited" , "input" , "cancel" ) 
+local hours = 1 
+if s == 1 then 
+hours = 8 
+elseif s == 2 then 
+hours = 16 
+elseif s == 3 then 
+hours = 24 
+elseif s == 4 then 
+hours = 0 
+elseif s == 5 then 
+hours = tonumber ( input ( ) ) 
+if hours < 1 then 
+return 
+end 
+else 
+return 
+end 
+game . set_event_flag ( "manwoo_time" , get_global_time ( ) + hours * 60 ) 
+game . set_event_flag ( "manwoo_start" , 1 ) 
+return 
@@ -0,0 +1 @@
+return pc . get_gm_level ( ) == 5 and game . get_event_flag ( "manwoo_start" ) == 0
@@ -0,0 +1 @@
+"GM: Stop Fish event"
@@ -0,0 +1,7 @@
+say_title ( "Manwoo Event" ) 
+local s = select ( "stop the event" , "cancel" ) 
+if s == 1 then 
+game . set_event_flag ( "manwoo_start" , 0 ) 
+else 
+return 
+end 
@@ -0,0 +1 @@
+return pc . get_gm_level ( ) == 5 and game . get_event_flag ( "manwoo_start" ) > 0
@@ -0,0 +1 @@
+"Psst, want to help me out?"
@@ -0,0 +1,22 @@
+pc . setqf ( "reward" , 1 ) 
+pc . setqf ( "time" , game . get_event_flag ( "manwoo_time" ) ) 
+say_title ( "Fisherman's Event" ) 
+say ( "Hi, do you know Octavio in the village over there?" ) 
+say ( "He came to me one day with a very attractive business deal." ) 
+say ( "As you know, he is one of the most famous cooks in these regions," ) 
+say ( "and he strives to be the best there is in every cooking mastery." ) 
+say ( "He has put his attention to sushi," ) 
+say ( "and he claims he needs live fish to make the tastiest sushi." ) 
+wait ( ) 
+say_title ( "Fisherman's Event" ) 
+say ( "Of course he doesn't have any time to catch them himself," ) 
+say ( "so he asked me to do it for him, for some items he gets from his customers." ) 
+say ( "But I'm a bit stretched at the moment with the amount he needs from me," ) 
+say ( "I cannot possibly do it alone." ) 
+say ( "If you help me with Octavio's order," ) 
+say ( "I will give you a nice reward!" ) 
+say ( "Give me this fish: " ) 
+say ( game . get_event_flag ( "manwoo" ) .. "x: " ) 
+say_item_vnum ( game . get_event_flag ( "manwoo_fish" ) ) 
+wait ( ) 
+set_state ( "give_fish" ) 
@@ -0,0 +1 @@
+return game . get_event_flag ( "manwoo_start" ) > 0 and game . get_event_flag ( "manwoo_time" ) >= get_global_time ( )
@@ -0,0 +1 @@
+gameforge.new_quest_lv42._010_send_letter
@@ -0,0 +1,2 @@
+new_quest_lv42 . npc_chat ( ) 
+set_state ( "ask_yonah" ) 
@@ -0,0 +1 @@
+gameforge.new_quest_lv42._037_send_letter
@@ -0,0 +1,21 @@
+target . delete ( "__TARGET5__" ) 
+say_title ( gameforge . new_quest_lv42 . _034_say_title ) 
+if pc . count_item ( 30175 ) >= 2 then 
+pc . remove_item ( 30175 , 2 ) 
+say ( gameforge . new_quest_lv42 . _080_say ) 
+say_reward ( string . format ( gameforge . new_quest_lv42 . _081_say_reward , 500000 ) ) 
+say_item_vnum ( 27868 ) 
+say_reward ( gameforge . new_quest_lv42 . _082_say_reward ) 
+pc . setqf ( "reward_given" , 1 ) 
+pc . change_money ( 500000 ) 
+pc . give_exp2 ( 750000 ) 
+pc . give_item2 ( 27868 , 3 ) 
+q . done ( ) 
+set_state ( "__COMPLETE__" ) 
+return 
+else 
+say ( gameforge . new_quest_lv42 . _083_say ) 
+say_reward ( gameforge . new_quest_lv42 . _084_say_reward ) 
+q . done ( ) 
+set_state ( "goto_smith" ) 
+end 
@@ -0,0 +1 @@
+gameforge.subquest_48._140_npcChat
@@ -0,0 +1,22 @@
+target . delete ( "__TARGET__" ) 
+say_title ( gameforge . manwoo . _20_sayTitle ) 
+say ( gameforge . subquest_48 . _150_say ) 
+wait ( ) 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . subquest_48 . _160_say ) 
+wait ( ) 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . subquest_48 . _170_say ) 
+wait ( ) 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . subquest_48 . _180_say ) 
+wait ( ) 
+say_title ( gameforge . buy_fishrod . _210_sayTitle ) 
+say_reward ( gameforge . subquest_48 . _190_sayReward ) 
+wait ( "" ) 
+say_pc_name ( ) 
+say ( gameforge . subquest_48 . _200_say ) 
+say_item_vnum ( 27873 ) 
+say_reward ( gameforge . subquest_48 . _210_sayReward ) 
+pc . give_item2 ( 27873 , 3 ) 
+set_state ( "back_to_boss" ) 
@@ -0,0 +1 @@
+return subquest_48 . is_other_vil ( ) == 1
@@ -0,0 +1,29 @@
+if item . vnum < 27400 or item . vnum > 27590 then say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _50_say ) 
+ return end if item . vnum == 27590 then say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _60_say ) 
+ return end if item . vnum >= 27400 and item . vnum < 27590 and item . get_socket ( 0 ) ~= item . get_value ( 2 ) then say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _70_say ) 
+ return end if item . vnum >= 27400 and item . vnum < 27590 and item . get_socket ( 0 ) == item . get_value ( 2 ) then say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _80_say ) 
+say ( string . format ( gameforge . fisher . _90_say , item . get_value ( 0 ) / 10 ) ) 
+say ( gameforge . fisher . _100_say ) 
+say ( string . format ( gameforge . fisher . _110_say , 100 - item . get_value ( 3 ) ) ) 
+say ( gameforge . fisher . _120_say ) 
+local s = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no ) 
+if s == 1 then 
+local f = __fish_real_refine_rod ( item . get_cell ( ) ) 
+if f == 2 then 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _130_say ) 
+elseif f == 1 then 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _140_say ) 
+else 
+say ( gameforge . fisher . _150_say ) 
+end 
+else 
+say_title ( gameforge . fisher . _30_sayTitle ) 
+say ( gameforge . fisher . _160_say ) 
+end 
+ return end
				`@@ -0,0 +1 @@`
				`return pc . level >= 7 and pc . level <= 17`
				`@@ -0,0 +1 @@`
				`return game . get_event_flag ( "manwoo_start" ) > 0 and game . get_event_flag ( "manwoo_start" ) > 0 and game . get_event_flag ( "manwoo_time" ) >= get_global_time ( )`
				`@@ -0,0 +1 @@`
				`return pc . get_gm_level ( ) == 5 and game . get_event_flag ( "manwoo_start" ) == 0`