[Release]Couple ring quest with a little edit Eng*

12/28/2011 20:35 umy360#1
Hi guys I translated the couple rings quest and made a little modification to it i made it so that you must kill only 2 Jin-Hee and once you complete it you will recive 2x couple ring, 1x tuxedo and 1x wedding dress. (I don't think anyone else has ever done this before so i decided to release it.)

PHP Code:
quest couple_ring begin
    state start begin
    when 9006.chat
."Revenge for the ring Dealer." with pc.get_level()>=25 begin

        say
("Hi")
        
say("Your looking for the ring dealer?")
        
say("Well im afraid he got banged the Fuck out.")
        
say("You must avenge him and i will reward you")
        
say("With a Couple's Ring!")
        
say("")
        
say("")
        
say("")
        
say("")

        
local s=select(
        
"Ok, I will Avenge him",
        
"I don't give a fuck!")

        if 
1==s then
        say
("Tank You!")
        
say("I know i can trust in you")
        
say("Good Luck!")
        
set_state(kill)
        elseif 
2==s then
        say
("Oh ...")
        
say("OK then")
        
say("")
        
say("Good Luck!")
        
end
    end
    end
    state kill begin
    when enter begin
        pc
.setqf("kill_count"0)
    
end
    when leave begin
        pc
.setqf("kill_count"0)
        
q.done()
    
end
    when letter begin
        q
.set_counter("Defeat the Jin-Hee's"couple_ring.get_rest_count());
    
end
    when 394.kill begin
        local kill_count
=pc.getqf("kill_count")+1
        pc
.setqf("kill_count"kill_count)    
        
q.set_counter("Defeat the Jin Hee's"couple_ring.get_rest_count());

        if 
couple_ring.is_completed() then
        say_title
("Done!")
        
say("You have killed enough Jin-Hee's now")
        
say("Go back to the old Lady And tell her")
        
say("To claim you'r reward.")
        
say("")
        
say("")
        
set_state(report)
        
end
    end
    
function get_rest_count()
        return 
2-pc.getqf("kill_count")
    
end
    
function is_completed()
        return 
pc.getqf("kill_count")>=2
    end

    when letter begin
        send_letter
("Kill Jin-Hee's ")
    
end
    when button 
or info begin
        say_title
("Defeat The Jin-Hee's")
        
say("Avenge the ring dealer")
        
say("by killing Jin-Hee's")
        
say("")
        
say_reward(string.format("Number of Jin-Hee's remaining : %d"couple_ring.get_rest_count()))
        
say("")
    
end
    when 9006.chat
."Finished!" begin
        say
("Go see the old lady!")
        
say("")
        
say("")
        
say("")
        
say("")
        
local s=select("")
        if 
1==s then
        say
("Go see the old lady!")
        
say("")
        
say("")
        
say("")
        
say("")
        
local s=select("")
        if 
1==s then
            say
("Go see the old Lady")
            
say("")
            
say("")
            
say("")
        elseif 
2==s then
            say
("Finaly you've finishedthe hunt!")
            
say("")
            
say("")
            
say("")
            
set_state(start)
            
q.done()
        
end
        end
    end
    end
    state report begin
    when letter begin
        send_letter
("Quest Complete!")
    
end
    when button 
or info begin
        say_title
("")
        
say("Cheese?")
        
say("")
        
say("")
    
end
    when 9006.chat
."I've killed 2 Jin-Hee's" begin
        say
("Thank You for helping!")
        
say("")
        
say("")
        
say("I will now reward you as i promissed.")
        
say("")
        
say("")
        
say_reward("You get 2x Rings, Tux and a Dress")
        
say_item("Couple's Ring"70301"")
        
say_item("Tuxedo"11901"")
        
say_item("Wedding Dress"11903"")
        
pc.give_item2(70301)
                
pc.give_item2(70301)
                
pc.give_item2(11901)
                
pc.give_item2(11903)
        
set_state(complete)
        
q.done()
    
end
    end
    state complete begin
    end
    state failure begin
    end
end 
This is a little different to the quest i have in my server i just did a last minuet change to this script if this one doesn't work right just use mine. If you use the one from my server search "snowy" and remove it from the quest script just change it to "Mission Complete" :P

This is the one from my server
PHP Code:
quest couple_ring begin
    state start begin
    when 9006.chat
."Revenge for the ring Dealer." with pc.get_level()>=25 begin

        say
("Hi")
        
say("Your looking for the ring dealer?")
        
say("Well im afraid he got banged the Fuck out.")
        
say("You must avenge him and i will reward you")
        
say("With a Couple's Ring!")
        
say("")
        
say("")
        
say("")
        
say("")

        
local s=select(
        
"Ok, I will Avenge him",
        
"I don't give a fuck!")

        if 
1==s then
        say
("Tank You!")
        
say("I know i can trust in you")
        
say("Good Luck!")
        
set_state(kill)
        elseif 
2==s then
        say
("Oh ...")
        
say("OK then")
        
say("")
        
say("Good Luck!")
        
end
    end
    end
    state kill begin
    when enter begin
        pc
.setqf("kill_count"0)
    
end
    when leave begin
        pc
.setqf("kill_count"0)
        
q.done()
    
end
    when letter begin
        q
.set_counter("Defeat the Jin-Hee's"couple_ring.get_rest_count());
    
end
    when 394.kill begin
        local kill_count
=pc.getqf("kill_count")+1
        pc
.setqf("kill_count"kill_count)    
        
q.set_counter("Defeat the Jin Hee's"couple_ring.get_rest_count());

        if 
couple_ring.is_completed() then
        say_title
("Done!")
        
say("You have killed enough Jin-Hee's now")
        
say("Go back to the old Lady And tell her")
        
say("To claim you'r reward.")
        
say("")
        
say("")
        
set_state(report)
        
end
    end
    
function get_rest_count()
        return 
2-pc.getqf("kill_count")
    
end
    
function is_completed()
        return 
pc.getqf("kill_count")>=2
    end

    when letter begin
        send_letter
("Kill Jin-Hee's ")
    
end
    when button 
or info begin
        say_title
("Defeat The Jin-Hee's")
        
say("Avenge the ring dealer")
        
say("by killing Jin-Hee's")
        
say("")
        
say_reward(string.format("Number of Jin-Hee's remaining : %d"couple_ring.get_rest_count()))
        
say("")
    
end
    when 9006.chat
."SNOWY!" begin
        say
("Bored")
        
say("")
        
say("")
        
say("")
        
say("")
        
local s=select("")
        if 
1==s then
        say
("Still bored")
        
say("")
        
say("")
        
say("")
        else
        
say("")
        
say("")
        
say("")
        
wait()
        
say("More bored")
        
say("")
        
say("")
        
say("")
        
say("")
        
say("")
        
say("(nom nom nom)")
        
say("Dam I love chating shit!")
        
local s=select("")
        if 
1==s then
            say
("Blah Blah")
            
say("")
            
say("")
            
say("")
        elseif 
2==s then
            say
("Blah Blah Blah")
            
say("")
            
say("")
            
say("")
            
set_state(start)
            
q.done()
        
end
        end
    end
    end
    state report begin
    when letter begin
        send_letter
("Quest Complete!")
    
end
    when button 
or info begin
        say_title
("")
        
say("Cheese?")
        
say("")
        
say("")
    
end
    when 9006.chat
."I've killed 2 Jin-Hee's" begin
        say
("Thank You for helping!")
        
say("")
        
say("")
        
say("I will now reward you as i promissed.")
        
say("")
        
say("")
        
say_reward("You get a Ring")
        
say_item("Couple's Ring"70301"")
        
pc.give_item2(70301)
                
pc.give_item2(70301)
                
pc.give_item2(11901)
                
pc.give_item2(11903)
        
set_state(complete)
        
q.done()
    
end
    end
    state complete begin
    end
    state failure begin
    end
end 
hope you like it say thanks if it helped i have allot more quest files that i have translated to english which i may release in the future depending on if people like my work.
12/28/2011 20:44 #SoNiice#2
These Quests are unnecessary, but thanks for sharing ;-)
12/28/2011 20:46 umy360#3
I know you can just add the rings and stuff in a shop but my server is old school so i like my players to work for the items. ^^