Other Country Player Kill Ranking[First 3 Kill By RealFreak Quest]

09/23/2011 18:34 TheDestroyer™#1
Hello ,
My friend make it ;
[BY REALFREAK QUEST]
PHP Code:
quest koep begin
    state start begin
        when login begin
            
if global.getvarchar("rank1") == pc.get_name then
                chat
("You're first in kill other empire player's ranklist")
            elseif global.
getvarchar("rank2") == pc.get_name then
                chat
("You're second in kill other empire player's ranklist")
            elseif global.
getvarchar("rank3") == pc.get_name then
                chat
("You're third in kill other empire player's ranklist")
        
end
    end
        when kill with npc
.is_pc() begin
            
if npc.empire != pc.empire then
              pc
.setqf("yourkills"pc.getqf("yourkills")+1)
                if 
pc.getqf("yourkills")>game.get_event_flag("rank1lvl"then
                    
if global_getvarchar("rank1") != "" then 
                        global_setvarchar
("rank3"global_getvarchar("rank2")) 
                        
game.set_event_flag("rank3"game.get_event_flag("rank2")) 
                        
game.set_event_flag("rank3empire"game.get_event_flag("rank2empire")
                        
global_setvarchar("rank2"global_getvarchar("rank1")) 
                        
game.set_event_flag("rank2"game.get_event_flag("rank1")) 
                        
game.set_event_flag("rank2empire"game.get_event_flag("rank1empire")
                        
notice_all(pc.get_name()..">>>"..global_getvarchar("rank1").."")
                    
end
                        game
.set_event_flag("rank1lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank1",pc.get_name())
                        
game.set_event_flag("rank1empire"pc.get_empire())
            elseif 
npc.empire != pc.empire then
              pc
.setqf("yourkills"pc.getqf("yourkills")+1)
                if 
pc.getqf("yourkills")>game.get_event_flag("rank2lvl"then
                    
if global_getvarchar("rank2") != "" then 
                        global_setvarchar
("rank3"global_getvarchar("rank2")) 
                        
game.set_event_flag("rank3"game.get_event_flag("rank2")) 
                        
game.set_event_flag("rank3empire"game.get_event_flag("rank2empire")
                        
notice_all(pc.get_name()..">>>"..global_getvarchar("rank2").."")
                    
end
                        game
.set_event_flag("rank2lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank2",pc.get_name())
                        
game.set_event_flag("rank2empire"pc.get_empire())
            elseif 
npc.empire != pc.empire then
              pc
.setqf("yourkills"pc.getqf("yourkills")+1)
                if 
pc.getqf("yourkills")>game.get_event_flag("rank3lvl"then
                    
if global_getvarchar("rank3") != "" then 
                        game
.set_event_flag("rank3lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank3",pc.get_name())
                        
game.set_event_flag("rank3empire"pc.get_empire())
                        
notice_all(pc.get_name()..">>>"..global_getvarchar("rank3").."")
                    
end
                        game
.set_event_flag("rank3lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank3",pc.get_name())
                        
game.set_event_flag("rank3empire"pc.get_empire())
                    
end
                end
        when 20354.chat
."Other Empire Kill Player Rank" begin 
            say_title
("Ranking List:"
            
say("Its 2000000 gold!")
            
say("Do you want see it ?")
            
local select select("Yes","No")
            if 
select == 1 then
            local gold 
2000000
            pc
.changegold(-gold)
            
say("Rank : "..global.getvarchar("rank1").." Level : "..game.set_event_flag("rank1lvl").." Empire : "..game.set_event_flag("rank1empire").."")
            
say("Rank : "..global.getvarchar("rank2").." Level : "..game.set_event_flag("rank2lvl").." Empire : "..game.set_event_flag("rank2empire").."")
            
say("Rank : "..global.getvarchar("rank3").." Level : "..game.set_event_flag("rank3lvl").." Empire : "..game.set_event_flag("rank3empire").."")
            
wait()
            if global.
getvarchar("rank1") == pc.get_name() then
                say
("Congratulations")
                
say("You are first killer!")
            elseif global.
getvarchar("rank2") == pc.get_name() then    
                say
("You are second killer,good job!")
                
say("Take courage..!")
            elseif global.
getvarchar("rank3") == pc.get_name() then    
                say
("You are third killer, have a long way to first grade!")
                
say("You must not discourage!Good job..")
            else
                
say("No,Problem bye")        
            
end
        end
    end
end 
German :
PHP Code:
quest koep begin
    state start begin
        when login begin
            
if global.getvarchar("rank1") == pc.get_name then
                chat
("Du bist auf Rank1")
            elseif global.
getvarchar("rank2") == pc.get_name then
                chat
("Du bist auf Rank1")
            elseif global.
getvarchar("rank3") == pc.get_name then
                chat
("Du bist auf Rank1")
        
end
    end
        when kill with npc
.is_pc() begin
            
if npc.empire != pc.empire then
              pc
.setqf("yourkills"pc.getqf("yourkills")+1)
                if 
pc.getqf("yourkills")>game.get_event_flag("rank1lvl"then
                    
if global_getvarchar("rank1") != "" then 
                        global_setvarchar
("rank3"global_getvarchar("rank2")) 
                        
game.set_event_flag("rank3"game.get_event_flag("rank2")) 
                        
game.set_event_flag("rank3empire"game.get_event_flag("rank2empire")
                        
global_setvarchar("rank2"global_getvarchar("rank1")) 
                        
game.set_event_flag("rank2"game.get_event_flag("rank1")) 
                        
game.set_event_flag("rank2empire"game.get_event_flag("rank1empire")
                        
notice_all(pc.get_name()..">>>"..global_getvarchar("rank1").."")
                    
end
                        game
.set_event_flag("rank1lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank1",pc.get_name())
                        
game.set_event_flag("rank1empire"pc.get_empire())
            elseif 
npc.empire != pc.empire then
              pc
.setqf("yourkills"pc.getqf("yourkills")+1)
                if 
pc.getqf("yourkills")>game.get_event_flag("rank2lvl"then
                    
if global_getvarchar("rank2") != "" then 
                        global_setvarchar
("rank3"global_getvarchar("rank2")) 
                        
game.set_event_flag("rank3"game.get_event_flag("rank2")) 
                        
game.set_event_flag("rank3empire"game.get_event_flag("rank2empire")
                        
notice_all(pc.get_name()..">>>"..global_getvarchar("rank2").."")
                    
end
                        game
.set_event_flag("rank2lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank2",pc.get_name())
                        
game.set_event_flag("rank2empire"pc.get_empire())
            elseif 
npc.empire != pc.empire then
              pc
.setqf("yourkills"pc.getqf("yourkills")+1)
                if 
pc.getqf("yourkills")>game.get_event_flag("rank3lvl"then
                    
if global_getvarchar("rank3") != "" then 
                        game
.set_event_flag("rank3lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank3",pc.get_name())
                        
game.set_event_flag("rank3empire"pc.get_empire())
                        
notice_all(pc.get_name()..">>>"..global_getvarchar("rank3").."")
                    
end
                        game
.set_event_flag("rank3lvl"pc.getqf("yourkills"))
                        
global_setvarchar("rank3",pc.get_name())
                        
game.set_event_flag("rank3empire"pc.get_empire())
                    
end
                end
        when 20354.chat
."Spieler aus einem andren Reich töten Ranking" begin 
            say_title
("Rangliste:"
            
say("Es kostet 200k diese,")
            
say("Liste anzuschauen")
            
say("möchtes du dies wirklich tun ?")
            
local select select("Ja","Nein")
            if 
select == 1 then
            local gold 
2000000
            pc
.changegold(-gold)
            
say("Rank : "..global.getvarchar("rank1").." Level : "..game.set_event_flag("rank1lvl").." Empire : "..game.set_event_flag("rank1empire").."")
            
say("Rank : "..global.getvarchar("rank2").." Level : "..game.set_event_flag("rank2lvl").." Empire : "..game.set_event_flag("rank2empire").."")
            
say("Rank : "..global.getvarchar("rank3").." Level : "..game.set_event_flag("rank3lvl").." Empire : "..game.set_event_flag("rank3empire").."")
            
wait()
            if global.
getvarchar("rank1") == pc.get_name() then
                say
("Herzlichen Glückwunsch du bist auf Platz 1")
            elseif global.
getvarchar("rank2") == pc.get_name() then    
                say
("Du bist auf Rang 2 gut gemacht ")
            elseif global.
getvarchar("rank3") == pc.get_name() then    
                say
("Du bist auf Platz 3 den rest wirst du auch noch schaffen")
            else
                
say("Kein Problem bis zum nächstens mal...")        
            
end
        end
    end
end 
Thanks to ".SunShine" for German quest

Turkish info :

Safacm ananı sikiyim!!!!
VPSER Ananı sikiyim!!!!
Dün gece anan bizdeydi süper bi şekilde siktim haha :D:D
09/23/2011 18:51 Howaner#2
Thanks for the quest
09/23/2011 18:56 ZyoX#3
It looks nice. ;)
Did you test it?
09/23/2011 18:56 TheDestroyer™#4
yes , i tested
09/23/2011 19:02 .Awesoome#5
Thanks Very Nice.
09/23/2011 19:17 TheDestroyer™#6
no problem guy
09/23/2011 19:36 √π.#7
Poor, just c&p some parts from realfreak. Nothing special
09/23/2011 19:37 .Restince#8
Nice :)

I translated it, in to German :)

Sorry for my Bad English

€dit:
HTML Code:
quest koep begin
    state start begin
        when login begin
            if global.setvarchar("rank1") == pc.get_name then
                chat("Du bist auf Rank1")
            elseif global.setvarchar("rank2") == pc.get_name then
                chat("Du bist auf Rank1")
            elseif global.setvarchar("rank3") == pc.get_name then
                chat("Du bist auf Rank1")
        end
    end
        when kill with npc.is_pc() begin
            if npc.empire != pc.empire then
              pc.setqf("yourkills", pc.getqf("yourkills")+1)
                if pc.getqf("yourkills")>game.get_event_flag("rank1lvl") then
                    if global_getvarchar("rank1") != "" then 
                        global_setvarchar("rank3", global_getvarchar("rank2")) 
                        game.set_event_flag("rank3", game.get_event_flag("rank2")) 
                        game.set_event_flag("rank3empire", game.get_event_flag("rank2empire")
                        global_setvarchar("rank2", global_getvarchar("rank1")) 
                        game.set_event_flag("rank2", game.get_event_flag("rank1")) 
                        game.set_event_flag("rank2empire", game.get_event_flag("rank1empire")
                        notice_all(pc.get_name()..">>>"..global_getvarchar("rank1").."")
                    end
                        game.set_event_flag("rank1lvl", pc.getqf("yourkills"))
                        global_setvarchar("rank1",pc.get_name())
                        game.set_event_flag("rank1empire", pc.get_empire())
            elseif npc.empire != pc.empire then
              pc.setqf("yourkills", pc.getqf("yourkills")+1)
                if pc.getqf("yourkills")>game.get_event_flag("rank2lvl") then
                    if global_getvarchar("rank2") != "" then 
                        global_setvarchar("rank3", global_getvarchar("rank2")) 
                        game.set_event_flag("rank3", game.get_event_flag("rank2")) 
                        game.set_event_flag("rank3empire", game.get_event_flag("rank2empire")
                        notice_all(pc.get_name()..">>>"..global_getvarchar("rank2").."")
                    end
                        game.set_event_flag("rank2lvl", pc.getqf("yourkills"))
                        global_setvarchar("rank2",pc.get_name())
                        game.set_event_flag("rank2empire", pc.get_empire())
            elseif npc.empire != pc.empire then
              pc.setqf("yourkills", pc.getqf("yourkills")+1)
                if pc.getqf("yourkills")>game.get_event_flag("rank3lvl") then
                    if global_getvarchar("rank3") != "" then 
                        game.set_event_flag("rank3lvl", pc.getqf("yourkills"))
                        global_setvarchar("rank3",pc.get_name())
                        game.set_event_flag("rank3empire", pc.get_empire())
                        notice_all(pc.get_name()..">>>"..global_getvarchar("rank3").."")
                    end
                        game.set_event_flag("rank3lvl", pc.getqf("yourkills"))
                        global_setvarchar("rank3",pc.get_name())
                        game.set_event_flag("rank3empire", pc.get_empire())
                    end
                end
        when 20354.chat."Spieler aus einem andren Reich töten Ranking" begin 
            say_title("Rangliste:") 
            say("Es kostet 200k diese,")
            say("Liste anzuschauen")
			say("möchtes du dies wirklich tun ?")
            local select = select("Ja","Nein")
            if select == 1 then
            local gold = 2000000
            pc.changegold(-gold)
            say("Rank : "..global.getvarchar("rank1").." Level : "..game.set_event_flag("rank1lvl").." Empire : "..game.set_event_flag("rank1empire").." ")
            say("Rank : "..global.getvarchar("rank2").." Level : "..game.set_event_flag("rank2lvl").." Empire : "..game.set_event_flag("rank2empire").." ")
            say("Rank : "..global.getvarchar("rank3").." Level : "..game.set_event_flag("rank3lvl").." Empire : "..game.set_event_flag("rank3empire").." ")
            wait()
            if global.getvarchar("rank1") == pc.get_name() then
                say("Herzlichen Glückwunsch du bist auf Platz 1")
            elseif global.getvarchar("rank2") == pc.get_name() then    
                say("Du bist auf Rang 2 gut gemacht ")
            elseif global.getvarchar("rank3") == pc.get_name() then    
                say("Du bist auf Platz 3 den rest wirst du auch noch schaffen")
            else
                say("Kein Problem bis zum nächstens mal...")        
            end
        end
    end
end  
Übersetzen sollte nicht schwer sein :)
09/23/2011 19:41 RealFreak#9
when login begin
if global.setvarchar("rank1") == pc.get_name then
chat("You're first in kill other empire player's ranklist")
elseif global.setvarchar("rank2") == pc.get_name then
chat("You're second in kill other empire player's ranklist")
elseif global.setvarchar("rank3") == pc.get_name then
chat("You're third in kill other empire player's ranklist")
end


you set a varchar, you have to read it so:
global_getvarchar("rank1")


and also something like this won't work:
Level : "..game.set_event_flag("rank3lvl").." Empire : "..game.set_event_flag("rank3empire").." ")

you SET flags, but you want to read it...
09/23/2011 19:43 √π.#10
killevent fail, too
09/23/2011 20:10 TheDestroyer™#11
Quote:
Originally Posted by √π. View Post
Poor, just c&p some parts from realfreak. Nothing special
i wrote already!
you're .....

Quote:
Originally Posted by RealFreak View Post
when login begin
if global.setvarchar("rank1") == pc.get_name then
chat("You're first in kill other empire player's ranklist")
elseif global.setvarchar("rank2") == pc.get_name then
chat("You're second in kill other empire player's ranklist")
elseif global.setvarchar("rank3") == pc.get_name then
chat("You're third in kill other empire player's ranklist")
end


you set a varchar, you have to read it so:
global_getvarchar("rank1")


and also something like this won't work:
Level : "..game.set_event_flag("rank3lvl").." Empire : "..game.set_event_flag("rank3empire").." ")

you SET flags, but you want to read it...
oh , thanks for warning
but I write it myself not look your ranking quest its memorization
i write false :D:D:D:D
i discern now
thanks
#Fixxed
09/23/2011 20:17 FbFunnY#12
very nice. thx
09/23/2011 20:20 TheDestroyer™#13
no problem bro.^^
09/23/2011 20:21 √π.#14
Quote:
Originally Posted by TheDestroyer™ View Post
i wrote already!
[...]
but I write it myself not look your ranking quest its memorization
aaaaha.
and yout tested it ir read?
its such an fail
09/23/2011 20:27 Killermen123#15
wenn man die quest ankuckt ist sie bisschen fail...

wenn man keine 200k hat wird sie iwie tzm abgezogen..
also fail kein if dirnnen..