Initial commit: server + serverfiles

serverfiles/share/locale/english/quest/object/20015/chat/mining.start.0.arg

@@ -0,0 +1 @@
+gameforge.fisher._10_npcChat

serverfiles/share/locale/english/quest/object/20015/chat/mining.start.0.script

@@ -0,0 +1,2 @@
+setskin ( NOWINDOW ) 
+npc . open_shop ( ) 

serverfiles/share/locale/english/quest/object/20015/chat/npc_talk.start.0.arg

@@ -0,0 +1 @@
+gameforge.npc_talk._110_npcChat

serverfiles/share/locale/english/quest/object/20015/chat/npc_talk.start.0.script

@@ -0,0 +1,2 @@
+say_npc ( ) 
+say ( gameforge . npc_talk . _120_say ) 

serverfiles/share/locale/english/quest/object/20015/chat/subquest_22.hunt_for_goldaxe.0.arg

@@ -0,0 +1 @@
+gameforge.subquest_22._160_npcChat

serverfiles/share/locale/english/quest/object/20015/chat/subquest_22.hunt_for_goldaxe.0.script

@@ -0,0 +1,10 @@
+target . delete ( "__TARGET__" ) 
+say_title ( gameforge . subquest_22 . _170_sayTitle ) 
+say ( gameforge . subquest_22 . _180_say ) 
+pc . remove_item ( "30102" , 1 ) 
+say_reward ( gameforge . subquest_22 . _190_sayReward ) 
+pc . give_exp2 ( 400000 ) 
+say_reward ( gameforge . subquest_22 . _200_sayReward ) 
+pc . change_money ( 30000 ) 
+set_state ( "__COMPLETE__" ) 
+clear_letter ( ) 

serverfiles/share/locale/english/quest/object/20015/chat/subquest_22.hunt_for_goldaxe.0.when

@@ -0,0 +1 @@
+return pc . count_item ( "30102" ) >= 1

serverfiles/share/locale/english/quest/object/20015/chat/subquest_22.information.0.arg

@@ -0,0 +1 @@
+gameforge.subquest_22._20_npcChat

serverfiles/share/locale/english/quest/object/20015/chat/subquest_22.information.0.script

@@ -0,0 +1,23 @@
+target . delete ( "__TARGET__" ) 
+say_title ( gameforge . subquest_22 . _30_sayTitle ) 
+say ( gameforge . subquest_22 . _40_say ) 
+wait ( ) 
+say_title ( gameforge . subquest_22 . _30_sayTitle ) 
+say ( gameforge . subquest_22 . _50_say ) 
+local s = select ( gameforge . subquest_01 . _50_select , gameforge . subquest_22 . _60_select ) 
+if 2 == s then 
+say ( gameforge . subquest_22 . _70_say ) 
+local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no ) 
+if 2 == a then 
+say_title ( gameforge . subquest_22 . _30_sayTitle ) 
+say ( gameforge . subquest_22 . _80_say ) 
+return 
+end 
+say_title ( gameforge . subquest_22 . _30_sayTitle ) 
+say ( gameforge . subquest_22 . _90_say ) 
+set_state ( "__GIVEUP__" ) 
+return 
+end 
+say_title ( gameforge . subquest_22 . _30_sayTitle ) 
+say ( gameforge . subquest_22 . _100_say ) 
+set_state ( "hunt_for_goldaxe" ) 

serverfiles/share/locale/english/quest/object/20015/chat/subquest_4.deliver_letter.0.arg

@@ -0,0 +1 @@
+gameforge.subquest_04._140_npcChat

serverfiles/share/locale/english/quest/object/20015/chat/subquest_4.deliver_letter.0.script

@@ -0,0 +1,31 @@
+if pc . count_item ( 30131 ) >= 1 then 
+target . delete ( "__TARGET__" ) 
+say_title ( gameforge . subquest_04 . _150_sayTitle ) 
+say ( gameforge . subquest_04 . _160_say ) 
+wait ( ) 
+say_title ( gameforge . subquest_04 . _150_sayTitle ) 
+say ( gameforge . subquest_04 . _170_say ) 
+pc . remove_item ( "30131" , 1 ) 
+set_state ( "return_to" ) 
+else 
+say_title ( gameforge . subquest_04 . _150_sayTitle ) 
+say ( gameforge . subquest_04 . _180_say ) 
+local s = select ( gameforge . subquest_04 . _190_select , gameforge . subquest_04 . _200_select ) 
+if 2 == s then 
+say ( gameforge . subquest_04 . _210_say ) 
+local a = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no ) 
+if 2 == a then 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . subquest_04 . _220_say ) 
+return 
+end 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . subquest_04 . _230_say ) 
+clear_letter ( ) 
+set_state ( "__GIVEUP__" ) 
+return 
+end 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . subquest_04 . _240_say ) 
+set_state ( "information" ) 
+end 

serverfiles/share/locale/english/quest/object/20015/take/cube_opener_list.start

@@ -0,0 +1 @@
+command ( "cube open" ) 

serverfiles/share/locale/english/quest/object/20015/take/mining.start

@@ -0,0 +1,29 @@
+if item . vnum >= 29101 and item . vnum < 29110 and item . get_socket ( 0 ) ~= item . get_value ( 2 ) then say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . mining . _20_say ) 
+ return end if item . vnum >= 29101 and item . vnum < 29110 and item . get_socket ( 0 ) == item . get_value ( 2 ) then say_title ( gameforge . mining . _10_sayTitle ) 
+say ( string . format ( gameforge . mining . _30_say , item . get_level ( ) ) ) 
+if item . get_value ( 3 ) == 100 then 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . mining . _40_say ) 
+else 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( string . format ( gameforge . mining . _50_say , 100 - item . get_value ( 3 ) ) ) 
+end 
+local s = select ( gameforge . locale . guild . yes , gameforge . locale . guild . no ) 
+if s == 2 then 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . mining . _55_say ) 
+return 
+end 
+local f = __refine_pick ( item . get_cell ( ) ) 
+if f == 2 then 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . mining . _60_say ) 
+elseif f == 1 then 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . mining . _70_say ) 
+else 
+say_title ( gameforge . mining . _10_sayTitle ) 
+say ( gameforge . mining . _80_say ) 
+end 
+ return end