[SERVICE] Die Questkontrolle

Page 274 of 845 « First 174224264272273 274 275276284324374774 Last »
11/22/2011 19:03 xTheSoulutionxx3#4096
PHP Code:
quest perlen_tausch begin
    state start begin
        when 20095.chat."Perlen Tausch" begin
        say_title("Perlen Tausch")
        say("Hey willst du deine Diamanten")
        say("gegen Perlen tauschen du brauchst")
        say("aber eine bestimmte anzahl von ihnen")
        say("nun gut wähle bitte aus welche du willst")
        say_reward("Welche Perle willst du?")
        local main_set = select("Weiße Perle (10stk)","Blaue Perle (20stk)","Rote Perle (30stk)","abbrechen")
        if main_set 4 == then
        return
        end
        if main_set 3 == then
        say_title("Rote Perle")
        say("ohhh du willst also eine Rote")
        say("Perle nun gut bist du dir auch sicher?")
        local main_set = select("Ja bin ich mir!","Nein lieber nicht!")
        if main_set 1 then
        if pc.count_item(diamant) >= 30 then
        pc.give_item2(27993, 1)
        pc.remove_item(diaman, 30)
        end
    end
        else
        say("Du hast nicht genug hole bitte")
        say("noch welche und komm dann wieder!")
        end
        if main_set 2 then
        return
        end
        if main_set 2 then
        say_title("Blaue Perle")
        say("ohhh du willst also eine Blaue")
        say("Perle nun gut bist du dir auch sicher?")
        local main_set = select("ja bin ich mir!","Nein lieber nicht!")
        if main_set 1 then
        if pc.count_item(diaman) >= 20 then
        pc.give_item2(27992, 1)
        pc.remove_item(diamant, 20)
        end
    end
        else
        say("Du hast nicht genug hole bitte")
        say("noch welche und komm dann wieder!")
        if main_set 2 then
        return
        end
        if main_set 1 then
        say_title("Weiße Perle")
        say("ohhh du willst also eine Weiße")
        say("Perle nun gut bist du dir auch sicher?")
        local main_set = select("ja bin ich mir!","Nein lieber nicht!")
        if main_set 1 then
        if pc.count_item(diamn) >= 10 then
        pc.give_item2(27991, 1)
        pc.remove_item(diamant, 10)
        end
    end
        else
        say("Du hast nicht genug hole bitte")
        say("noch welche und komm dann wieder!")
        if main_set 2 then
        return
        end
        end
    end
end 
11/22/2011 20:50 hut#4097
[Spoiler]quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end

state information begin
when letter begin
send_letter("Kill")
end

when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end

when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)

end
end
end

state __COMPLETE__ begin
end
end
[Spoiler]


quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end

state information begin
when letter begin
send_letter("Kill")
end

when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end

when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)

end
end
end

state __COMPLETE__ begin
end
end


Meine Quest geht irgendwie nicht könnt ihr mir pls helfen?

[Spoiler]quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end

state information begin
when letter begin
send_letter("Kill")
end

when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end

when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)

end
end
end

state __COMPLETE__ begin
end
end
[Spoiler]


quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end

state information begin
when letter begin
send_letter("Kill")
end

when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end

when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)

end
end
end

state __COMPLETE__ begin
end
end


Meine Quest geht irgendwie nicht könnt ihr mir pls helfen?

quest Kill begin
state start begin
when login with pc.level >= begin
set_state(information)
end
end

state information begin
when letter begin
send_letter("Kill")
end

when info or button begin
say("Besiege 30 Wildhunde")
say_reward("Tch,Mein/e Herr/Dame")
say("Wenn du sehr Mutig bist,dann wirst du diese")
say("Herrausvorderung schaffen Viel Glück")
pc.setqf("state", 30)
q.set_counter("Wildhund", 30)
end

when 101.kill begin
local count = pc.getqf("state") - 1
if count <= 30 then
pc.setqf("state", count)
q.set_counter("Wildhund", count)
end
if count == 0 then
say_title("Kill")
pc.give_item2(71120, 100)
clear_letter()
set_state(__COMPLETE__)

end
end
end

state __COMPLETE__ begin
end
end

Habs gedunden hab bei when login with pc.level >= begin 1 vergessen also when login with pc.level >= 1 begin
11/22/2011 21:13 DavidMatth#4098
Hallo zusammen

kann mir vill einer eine Teleporter quest schreiben, womit man nur in eine map kommt

also:

-ab level 80
-in 8888 8888
-für 10kk yang
-beim npc 20095

und vill eine:

-ab level 80
-in 8888 8888
-für 0 yang
-beim npc 20095
-wenn man item xxx hat

also insgesammt 2 quests!

jetzt schon mal danke und wenn es so einen service noch gibt, der quests schreibt, dann sorry das ich das hier poste

MFG DavidMatth
11/22/2011 21:55 hut#4099
@DavidMatth

also ich weis nicht obs 100 % mit dem lvl da klappt aber ansonsten soll der quest richtig geschrieben sein. Wenn nicht dann Entschuldigung Lerne grad
also die quest
HTML Code:
quest Name begin
    state start begin 
    when login with pc.level<= 80 begin
        when 20095.use begin
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
        
        local s = select("Ja", "Nein")
            if 1 == s then
                pc.warp(8888, 8888)
            else
                return
            end
        end 
    end 
end
Wenn es falsch ist soll ein Experte Ändern pls Danke

Mfg.
11/22/2011 22:02 DavidMatth#4100
danke erstmal, ander wie ich das sehe, ist da nicht für 10kk drin oder? und zudem habe ich es gerade getestet und wenn ich die quest mit der make.py draufspiele, dann kommt ein fehler, aber danke, dass du es versucht hast
11/22/2011 22:03 hut#4101
Und gings DavidMatth

also das mit der 10kk hab ich nicht drauf gemacht aber was für fehler ist das
bei mmir kams auch bei einer anderen kanns villeicht da auch weg machen hab schon 2 quests geschrieben und sie gingen

Mfg.
11/22/2011 22:19 DavidMatth#4102
syntax error : [string "startpc . level <= 80"]1: unexpected symbol near 'when'

releport.quest:18:Error occured on compile teleport.quest

oder so :D
11/23/2011 08:49 He3o Sippel#4103
Quote:
Originally Posted by hut View Post
@DavidMatth

also ich weis nicht obs 100 % mit dem lvl da klappt aber ansonsten soll der quest richtig geschrieben sein. Wenn nicht dann Entschuldigung Lerne grad
also die quest
HTML Code:
quest Name begin
    state start begin 
    when pc.get_level<= 80 begin
        when 20095.use begin
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
        
        local s = select("Ja", "Nein")
            if 1 == s then
                pc.warp(8888, 8888)
            else
                return
            end
        end 
    end 
end
Wenn es falsch ist soll ein Experte Ändern pls Danke

Mfg.
so solte es stimmen
11/23/2011 16:27 hut#4104
Ok, danke war nicht für mich aber nicht schlimm :D
11/23/2011 18:08 He3o Sippel#4105
aso :D stimmt habe ich nicht gemerkt aber er wird es ja lesen
11/23/2011 18:13 DavidMatth#4106

kann da noch einer ein yang - 10kk rein machen?
danke
11/23/2011 18:49 He3o Sippel#4107
Quote:
Originally Posted by DavidMatth View Post

kann da noch einer ein yang - 10kk rein machen?
danke
PHP Code:
quest Name begin
    state start begin 
    when pc.get_level<= 80 begin
        when 20095.use begin
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
        
        local s = select("Ja", "Nein")
            if 1 == s then
                pc.warp(8888, 8888)
                pc.changegold(-10000000)
            else
                return
            end
        end 
    end 
end 
sollte passen bin mir aber nicht sicher ;)
11/23/2011 20:09 Jakomo'#4108
Quote:
Originally Posted by .Sippel View Post
PHP Code:
quest Name begin
    state start begin 
    when pc.get_level<= 80 begin
        when 20095.use begin
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
        
        local s = select("Ja", "Nein")
            if 1 == s then
                pc.warp(8888, 8888)
                pc.changegold(-10000000)
            else
                return
            end
        end 
    end 
end 
sollte passen bin mir aber nicht sicher ;)
Eine Abfrage, ob man überhaupt 10kk hat, wäre auch nicht verkehrt.

PHP Code:
quest Name begin
    state start begin 
    when pc.get_level<= 80 begin
        when 20095.use begin
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
        
        local s = select("Ja", "Nein")
            if 1 == s with pc.getmoney >=10000000
                pc.warp(8888, 8888)
                pc.changegold(-10000000)
            else
                say("Du hast nicht genug Yang")
                return
            end
        end 
    end 
end 
11/23/2011 20:58 DerToT2010#4109
:bandit: schlimm mit euch

PHP Code:
quest Name begin
    state start begin 
    when pc.level >= 80 begin        -----heist soviel wie bis lvl 80dan gehts nimmer wen ab lvl 80 sein sollte dan so (>= 80)
        set_state(port)
    end
    state port begin
        when 20095.chat."Telepotieren1" begin            ---mit yang
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
            local s = select("Ja", "Nein")
            if s == 1 with pc.get_gold >=10000000 then
                pc.warp(8888, 8888)
                pc.changegold(-10000000)
            end
            if s == 2 then
            say("Dein Text")
            end
        end 
        when 20095.chat."telepotieren2" begin            ---mit item
            say_title("Teleportieren")
            say("Dein Text")
            say("Dein Text")
            say("Dein Text")
            say_reward("Dein Text")
            local s = select("Ja", "Nein")
            if s == 1 with pc.count_item(xxxxx) then ---bitte stat xx die itemvenum eintragen
                pc.warp(8888, 8888)
                pc.remove_item (xxxxx, 1)     ---- stat xxx wieder die venum
            end
            if s == 2 then
            say("Dein Text")
            end
        end 
    end
end 
fertig
11/23/2011 22:41 killa673#4110
Taag , hätte da ein problemchen mit ner quest und zwar: man sollte ja eigentlich 200 von den rollen brauchen aber man braucht nur eine .. hab den text zwar abgeändert das man nur eine braucht weil ich nimmer weiter weis .. deswegen brauch ich eure hilfe , das man 200 von den drachengottrollen da braucht

QUEST:

PHP Code:
---------------------------------------------------- 
--Made by SA Encore von BlackSourceMT2 
---------------------------------------------------- 
quest Premiumitem  begin 
    state start begin 
        when login or levelup with pc.get_level() >=150  begin 
            set_state(information) 
        end     
    end 

    state information begin 
        when letter begin 
            local v = find_npc_by_vnum(20011) 
            if v != 0 then 
                target.vid("__TARGET__", v, "Quest") 
            end 
            send_letter("Premiumitem") 
        end 

        when button or info begin 
            say_title("Premiumitem") 
            say("") 
            say("Hallo mutiger Krieger,") 
            say("Uriel hat eine Aufgabe für dich") 
            say("durch diese Aufgabe kannst du dir") 
            say("ein Mystisches Item holen") 
            say("durch welches du zum Premium User") 
            say("aufsteigen wirst.") 
            say_reward("GEHE ZU URIEL!") 
        end 

        when __TARGET__.target.click or 
            20011.chat."Premiumitem" begin 
            target.delete("__TARGET__") 
            say("Uriel:") 
            ---                                                   l 
            say("Hallo mein Freund,") 
            say("Du kennst doch sicherlich") 
            say("den Dämonengott, oder?") 
            say("Dieser Kreatur besitzt") 
            say("1 Teil einer uralten Mystischen Rolle") 
            say("bring mir dieses Teil der Drachengottrolle") 
            say("")     
            set_state(go_to_disciple) 
            pc.setqf("collect_count",0) 
            pc.setqf("drink_drug",0)  
        end 
    end 

    state go_to_disciple begin 
        when letter begin 
            send_letter("Auftrag von Uriel") 

        end 
        when button or info begin 
            say_title("Teil der Rolle") 
            ---                                                   l 
            say("") 
            say("Uriel gab euch den Auftrag") 
            say("Das Teil der Drachengottrolle zu sammeln!") 
            say("Das Item bekommt ihr von Dämonengott.") 
            say("Viel Glueck!") 
            say("") 
            say_item_vnum(90863) 
            say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!") 
            say("") 
        end 

        when 71035.use begin --°g´bÃĤô 
            if pc.getqf("drink_drug")==1 then 
                say("") 
                say("Bessere Droppchance!") 
                say("") 

                end 
            end 


        when 20210.kill begin 
            if pc.count_item(90863)<200-pc.getqf("collect_count") then 
                pc.give_item2(90863, 1) 
            end 
        end 

        when 20011.chat."Quest" with pc.count_item(90863) >0   begin 
                say("Einen Moment!") 
                ---                                                   l 
                say("Ich werde das Item") 
                say("schnell mal ueberpruefen.") 
                say("Hoffentlich klappt alles!") 
                say("") 
                pc.remove_item(90863, 1) 
                wait() 

                local pass_percent 
                if pc.getqf("drink_drug")==0 then 
                    pass_percent=90864 
                else         
                    pass_percent=90864 
                end 

                local s= number(1,100) 
            if s<= pass_percent  then 
               if pc.getqf("collect_count")< 199 then     --5*Ó¥H¤U  
                        local index =pc.getqf("collect_count")+1  
                        pc.setqf("collect_count",index)     --¨ú±o¤@*Ӯɠ+1 
                        say("Uriel:") 
                        say("Perfekt! Das Item ist in Ordnung") 
                        say("Du hast bis jetzt ".." "..200-pc.getqf("collect_count").. " abgegeben!") 
                        say("Bring mir die restlichen!") 
                        say("") 
                        pc.setqf("drink_drug",0)     --ÃĤôªì©l¤Æ 
                        end 
                    end 
                    say("Uriel:") 
                    say("Yuhu! Du hast mir") 
                    say("alles gebracht!") 
                    say("Dafür werde ich dich wie versprochen") 
                    say("belohnen!") 
                    say("") 
                    say_reward("Du bekommst ein Heilige Drachengottrolle!") 
                    pc.setqf("collect_count",0) 
                    pc.setqf("drink_drug",0) 
                    pc.give_item2(90864) 
                    clear_letter() 
                    end 
                end 
            end 
Page 274 of 845 « First 174224264272273 274 275276284324374774 Last »