[SERVICE] Die Questkontrolle

Page 543 of 845 « First 43443493533541542 543 544545553593643 Last »
05/25/2013 17:16 He3o Sippel#8131
Quote:
Originally Posted by Sogma View Post
Hi, meine Quest will so nicht klappen :/

Code:
quest lv9 begin
	state start begin
		when pc.get_exp(50) begin
			set_level_to_an_other_level(9)
		end
	end
end
Fehlermeldung:
Code:
when doesn't have begin-end clause. (()
PHP Code:
quest lv9 begin
    state start begin
        when pc.get_exp() >= 50 begin
            set_level_to_an_other_level(9)
        end
    end
end 
Bitte sehr
05/25/2013 22:39 Vali2222#8132
Code:
quest farmback begin 
    state start begin 
        when letter with pc.get_map_index()==200 begin 
            set_state(map) 
        end 
        when letter with pc.get_map_index()==114 begin 
            set_state(map)
        end 
	end
	state map begin
		when letter begin
			send_letter("Nach Hause") 
        end
		
		when button or info begin 
            say_title("Nach Hause") 
            say("Ich kann dich nach Hause bringen, aber ich werde") 
            say("zuerst alle Rufrollen, die du gekauft hast entfernen!") 
            say("Willst du nach Hause?") 
            local s = ("Ja", "Nein") 
            if s=2 then
                send letter ("Nach Hause") 
                return 
            end 
            wait() 
            if pc.count_item(71036)>0 then 
                pc.remove_item(71036, pc.count_item(71036)) 
            end 
            if pc.count_item(71037)>0 then 
                pc.remove_item(71038, pc.count_item(71038)) 
            end 
            if pc.count_item(71039)>0 then 
                pc.remove_item(71039, pc.count_item(71039)) 
            end 
            if pc.count_item(71039)>0 then 
                pc.remove_item(71039, pc.count_item(71039)) 
            end 
            if pc.count_item(71040)>0 then 
                pc.remove_item(71040, pc.count_item(71040)) 
            end 
            if pc.count_item(71041)>0 then 
                pc.remove_item(71041, pc.count_item(71041)) 
            end 
            if pc.count_item(71042)>0 then 
                pc.remove_item(71042, pc.count_item(71042)) 
            end 
            if pc.count_item(71043)>0 then 
                pc.remove_item(71043, pc.count_item(71043)) 
            end 
            if pc.count_item(71080)>0 then 
                pc.remove_item(71080, pc.count_item(71080)) 
            end 
            if pc.count_item(71081)>0 then 
                pc.remove_item(71081, pc.count_item(71081)) 
            end 
            if pc.count_item(71082)>0 then 
                pc.remove_item(71082, pc.count_item(71082)) 
            end 
            say_title("Nach Hause") 
            say("Ich habe alles gelöscht!") 
            say("Du wirst teleportiert!") 
            clear_letter() 
            local empire == pc.get_empire() 
            if empire = 1 then 
                pc.warp(469300, 964200) 
                return 
            end 
            if  empire = 2 then   
                pc.warp(55700, 157900) 
                return 
            end 
            if  empire = 3 then  
                pc.warp(969600, 278400) 
                return 
            end 
			set_state(start)
        end 
    end 
end
Fehler:

Code:
syntax error : [string "map"]:5: `)' expected near `,'
farmback.quest:77:Error occured on compile farmback.quest
Klingt einfach, finds aba nicht :/
05/26/2013 01:22 Silver™#8133
Wenn ich den Namen angebe passiert Leider nichts mehr.
PHP Code:
quest guild_manage begin
    state start begin    
        when 11000.chat."Gilde verlassen" or 11002.chat."Gilde verlassen" or 11004.chat."Gilde verlassen" with pc.hasguild() and not pc.isguildmaster() and npc.get_empire() == pc.get_empire() begin
           say_title("Wächter des Dorfplatzes")
            say("Möchtest du deine Gilde wirklich")
            say("verlassen? Ich denke deine Member")
            say("werden enttäuscht von dir sein..")
            local s = select("Ja", "Nein")
            if s==1 then
                say_title("Wächter des Dorfplatzes")
                say("Du bist nun wieder Gildenlos!")
                pc.remove_from_guild()
                pc.setqf("new_withdraw_time",get_global_time())
            end
        end
        when 11000.chat."Gilde auflösen" or 11002.chat."Gilde auflösen" or 11004.chat."Gilde auflösen" with pc.hasguild() and pc.isguildmaster() and npc.get_empire() == pc.get_empire() begin
            say_title("Wächter des Dorfplatzes")
            say("Möchtest du deine Gilde wirklich")
            say("auflösen? Ich denke deine Member")
            say("werden enttäuscht von dir sein..")
            local s = select("Ja", "Nein")
            if s==1 then
                say_title("Wächter des Dorfplatzes")
                say("Deine Gilde ist nun aufgelöst!")
                pc.destroy_guild()
                pc.setqf("new_disband_time",get_global_time())
                pc.setqf("new_withdraw_time",get_global_time())
            end
        end

        when 11000.chat."Gilde gründen" or 11002.chat."Gilde gründen" or 11004.chat."Gilde gründen" with not pc.hasguild() and not pc.isguildmaster() and npc.get_empire() == pc.get_empire() begin        
            if game.get_event_flag("guild_withdraw_delay")*86400 > 
            get_global_time() - pc.getqf("new_withdraw_time") or
            game.get_event_flag("guild_disband_delay")*86400 > 
            get_global_time() - pc.getqf("new_disband_time")    then
                say_title("Wächter des Dorfplatzes")
                say("Du kannst jetzt noch keine neue Gilde gründen!")
                say("Warte noch eine Weile!")
                return
            end
            say_title("Wächter des Dorfplatzes")
            say("Möchtest du eine Gilde gründen?")
            if select("Ja","Nein") == 2 then return
            else
            game.request_make_guild()
            end
        end
    end
end 
05/26/2013 12:46 Yiv#8134
@Vali2222:
Probiers mal so :)
MfG
05/26/2013 19:28 Vali2222#8135
Quote:
Originally Posted by DaJuBi View Post
@Vali2222:
Probiers mal so :)
MfG
Geht au net ;(
syntax error : [string "map"]:5: `)' expected near `,'
farmback.quest:76:Error occured on compile farmback.quest
05/27/2013 13:48 LiveOut#8136
PHP Code:
quest Userpanel begin
    state start begin
        when 70010.use begin
            say_title("User-Panel")
            say_reward("Wie kann ich helfen?")
            local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
            if a == 6 then
                return
            elseif a == 1 then
                game.open_safebox()
                chat("Dein Lager wurde geöffnet!")
            elseif a == 2 then
                game.open_mall()
                chat("Dein Itemshop-Lager wurde geöffnet!")
            elseif a == 3 then
                say_title("Teamliste:")
                say("")
                say("Hier die Aktuelle Teamliste:")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("Bitte vergesst die eckigen Klammern nicht,")
                say("falls ihr sie anschreiben wollt!")
                say("")
                wait()
                say("Sucht SERVERNAME zurzeit Teamler?:")
                say("Wenn wir Teamler suchen steht dies im Forum")
                say("FORUMLINK")
            elseif a == 4 then
                local actual_achievement_points = pc.getqf("achievement_points")
                local Reward = 0
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
            elseif a == 5 then
                say_title("FAQ:")
                say("Hier findest du Antworten auf die")
                say("wichtigsten Fragen, bitte wähle eine Kategorie:")
                local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
                if b == 6 then
                    return
                elseif b == 1 then
                    say_title("Wo droppt man was:")
                    say("Alle unnötigen Uppitems wurden entfernt.")
                    say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
                    say("")
                    say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
                    say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
                    say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
                    say("Kristalle: 250er Metins")
                    say("Sterne: 140er-170er Metins")
                    say("Diamanten: 250er Metins")
                    say("75er Waffen: 75er-170er Metins und Feuer der Macht")
                    say("Wenn etwas fehlt meldet dies uns")
                    say("")
                elseif b == 2 then
                    say_title("Farmmaps:")
                    say("Wir haben 3 Farmmaps:")
                    say("")
                    say("Auf der Farmmap ab Level 1 findet ihr:")
                    say("45er-90er Metins und Feuer der Macht")
                    say("")
                    say("Auf der 95er Farmmap findet ihr:")
                    say("90er-120er Metins, Feuer der Macht u. Sensis")
                    say("")
                    say("Auf der 130er Farmmap findet ihr:")
                    say("130er-250er Metins")
                elseif b == 3 then
                    say_title("Boniliste 1-5:")
                    say("")
                    say("Hier die Maximale 1-5 Bonis:")
                    say("Max_TP: 5000")
                    say("Max_MP: 1000")
                    say("Halbmenschen: 15")
                    say("STR,INT,VIT,DEX: 20")
                    say("Krit, DB: 15")
                    say("Schwert, Zweihand: 20")
                    say("Dolch, Pfeil: 20")
                    say("Fächer, Glocken: 20")
                    say("Magie, Feuer, Wind: 20")
                    say("Chance auf Exp Bonus: 30")
                    say("Doppelt Dropp: 25")
                    say("TP und MP Regi: 30")
                    say("TP und MP_Apsobieren: 15")
                    say("Angriffsgeschwindigkeit: 15")
                    say("")
                elseif b == 4 then
                    say_title("Boniliste 6-7:")
                    say("Hier die Maximale 6-7 Bonis:")
                    say("")
                    say("STR, INT, VIT, DEX: 5")
                    say("Max_TP: 2000")
                    say("Krit, DB: 10")
                    say("Stark gg Monster: 15")
                    say("")
                elseif b == 5 then
                    say_title("Das High-Eq:")
                    say("")
                    say("130er Waffen und 140er Rüstungen bekommt ihr")
                    say("aus der Balrog-Truhe!")
                    say("Diese könnt ihr dann bis zum 170er Eq uppen.")
                    say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
                    say("Es wird eventuell noch 250er End Eq eingefügt.")
                elseif b == 6 then
                    say_title("Achievementpunkte:")
                    say("")
                    say("Eure Achievementpunkte könnt ihr Map1")
                    say("bei dem Npc Tauschbörse jederzeit gegen")
                    say("wertvolle und vorallem nützliche Items eintauschen!")
                end
            end
        end 
Was ist da Falsch? Bitte verbessern
05/27/2013 15:58 CoTzRaiZ-PaiNx#8137
Quote:
Originally Posted by LiveOut View Post
PHP Code:
quest Userpanel begin
    state start begin
        when 70010.use begin
            say_title("User-Panel")
            say_reward("Wie kann ich helfen?")
            local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
            if a == 6 then
                return
            elseif a == 1 then
                game.open_safebox()
                chat("Dein Lager wurde geöffnet!")
            elseif a == 2 then
                game.open_mall()
                chat("Dein Itemshop-Lager wurde geöffnet!")
            elseif a == 3 then
                say_title("Teamliste:")
                say("")
                say("Hier die Aktuelle Teamliste:")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("Bitte vergesst die eckigen Klammern nicht,")
                say("falls ihr sie anschreiben wollt!")
                say("")
                wait()
                say("Sucht SERVERNAME zurzeit Teamler?:")
                say("Wenn wir Teamler suchen steht dies im Forum")
                say("FORUMLINK")
            elseif a == 4 then
                local actual_achievement_points = pc.getqf("achievement_points")
                local Reward = 0
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
            elseif a == 5 then
                say_title("FAQ:")
                say("Hier findest du Antworten auf die")
                say("wichtigsten Fragen, bitte wähle eine Kategorie:")
                local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
                if b == 6 then
                    return
                elseif b == 1 then
                    say_title("Wo droppt man was:")
                    say("Alle unnötigen Uppitems wurden entfernt.")
                    say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
                    say("")
                    say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
                    say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
                    say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
                    say("Kristalle: 250er Metins")
                    say("Sterne: 140er-170er Metins")
                    say("Diamanten: 250er Metins")
                    say("75er Waffen: 75er-170er Metins und Feuer der Macht")
                    say("Wenn etwas fehlt meldet dies uns")
                    say("")
                elseif b == 2 then
                    say_title("Farmmaps:")
                    say("Wir haben 3 Farmmaps:")
                    say("")
                    say("Auf der Farmmap ab Level 1 findet ihr:")
                    say("45er-90er Metins und Feuer der Macht")
                    say("")
                    say("Auf der 95er Farmmap findet ihr:")
                    say("90er-120er Metins, Feuer der Macht u. Sensis")
                    say("")
                    say("Auf der 130er Farmmap findet ihr:")
                    say("130er-250er Metins")
                elseif b == 3 then
                    say_title("Boniliste 1-5:")
                    say("")
                    say("Hier die Maximale 1-5 Bonis:")
                    say("Max_TP: 5000")
                    say("Max_MP: 1000")
                    say("Halbmenschen: 15")
                    say("STR,INT,VIT,DEX: 20")
                    say("Krit, DB: 15")
                    say("Schwert, Zweihand: 20")
                    say("Dolch, Pfeil: 20")
                    say("Fächer, Glocken: 20")
                    say("Magie, Feuer, Wind: 20")
                    say("Chance auf Exp Bonus: 30")
                    say("Doppelt Dropp: 25")
                    say("TP und MP Regi: 30")
                    say("TP und MP_Apsobieren: 15")
                    say("Angriffsgeschwindigkeit: 15")
                    say("")
                elseif b == 4 then
                    say_title("Boniliste 6-7:")
                    say("Hier die Maximale 6-7 Bonis:")
                    say("")
                    say("STR, INT, VIT, DEX: 5")
                    say("Max_TP: 2000")
                    say("Krit, DB: 10")
                    say("Stark gg Monster: 15")
                    say("")
                elseif b == 5 then
                    say_title("Das High-Eq:")
                    say("")
                    say("130er Waffen und 140er Rüstungen bekommt ihr")
                    say("aus der Balrog-Truhe!")
                    say("Diese könnt ihr dann bis zum 170er Eq uppen.")
                    say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
                    say("Es wird eventuell noch 250er End Eq eingefügt.")
                elseif b == 6 then
                    say_title("Achievementpunkte:")
                    say("")
                    say("Eure Achievementpunkte könnt ihr Map1")
                    say("bei dem Npc Tauschbörse jederzeit gegen")
                    say("wertvolle und vorallem nützliche Items eintauschen!")
                end
            end
        end 
Was ist da Falsch? Bitte verbessern
Um die Quest zu beenden musst du 4 mal end am Ende schreiben
05/27/2013 18:22 G.I Duke#8138
Quote:
Originally Posted by LiveOut View Post
PHP Code:
quest Userpanel begin
    state start begin
        when 70010.use begin
            say_title("User-Panel")
            say_reward("Wie kann ich helfen?")
            local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
            if a == 6 then
                return
            elseif a == 1 then
                game.open_safebox()
                chat("Dein Lager wurde geöffnet!")
            elseif a == 2 then
                game.open_mall()
                chat("Dein Itemshop-Lager wurde geöffnet!")
            elseif a == 3 then
                say_title("Teamliste:")
                say("")
                say("Hier die Aktuelle Teamliste:")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("Bitte vergesst die eckigen Klammern nicht,")
                say("falls ihr sie anschreiben wollt!")
                say("")
                wait()
                say("Sucht SERVERNAME zurzeit Teamler?:")
                say("Wenn wir Teamler suchen steht dies im Forum")
                say("FORUMLINK")
            elseif a == 4 then
                local actual_achievement_points = pc.getqf("achievement_points")
                local Reward = 0
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
            elseif a == 5 then
                say_title("FAQ:")
                say("Hier findest du Antworten auf die")
                say("wichtigsten Fragen, bitte wähle eine Kategorie:")
                local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
                if b == 6 then
                    return
                elseif b == 1 then
                    say_title("Wo droppt man was:")
                    say("Alle unnötigen Uppitems wurden entfernt.")
                    say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
                    say("")
                    say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
                    say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
                    say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
                    say("Kristalle: 250er Metins")
                    say("Sterne: 140er-170er Metins")
                    say("Diamanten: 250er Metins")
                    say("75er Waffen: 75er-170er Metins und Feuer der Macht")
                    say("Wenn etwas fehlt meldet dies uns")
                    say("")
                elseif b == 2 then
                    say_title("Farmmaps:")
                    say("Wir haben 3 Farmmaps:")
                    say("")
                    say("Auf der Farmmap ab Level 1 findet ihr:")
                    say("45er-90er Metins und Feuer der Macht")
                    say("")
                    say("Auf der 95er Farmmap findet ihr:")
                    say("90er-120er Metins, Feuer der Macht u. Sensis")
                    say("")
                    say("Auf der 130er Farmmap findet ihr:")
                    say("130er-250er Metins")
                elseif b == 3 then
                    say_title("Boniliste 1-5:")
                    say("")
                    say("Hier die Maximale 1-5 Bonis:")
                    say("Max_TP: 5000")
                    say("Max_MP: 1000")
                    say("Halbmenschen: 15")
                    say("STR,INT,VIT,DEX: 20")
                    say("Krit, DB: 15")
                    say("Schwert, Zweihand: 20")
                    say("Dolch, Pfeil: 20")
                    say("Fächer, Glocken: 20")
                    say("Magie, Feuer, Wind: 20")
                    say("Chance auf Exp Bonus: 30")
                    say("Doppelt Dropp: 25")
                    say("TP und MP Regi: 30")
                    say("TP und MP_Apsobieren: 15")
                    say("Angriffsgeschwindigkeit: 15")
                    say("")
                elseif b == 4 then
                    say_title("Boniliste 6-7:")
                    say("Hier die Maximale 6-7 Bonis:")
                    say("")
                    say("STR, INT, VIT, DEX: 5")
                    say("Max_TP: 2000")
                    say("Krit, DB: 10")
                    say("Stark gg Monster: 15")
                    say("")
                elseif b == 5 then
                    say_title("Das High-Eq:")
                    say("")
                    say("130er Waffen und 140er Rüstungen bekommt ihr")
                    say("aus der Balrog-Truhe!")
                    say("Diese könnt ihr dann bis zum 170er Eq uppen.")
                    say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
                    say("Es wird eventuell noch 250er End Eq eingefügt.")
                elseif b == 6 then
                    say_title("Achievementpunkte:")
                    say("")
                    say("Eure Achievementpunkte könnt ihr Map1")
                    say("bei dem Npc Tauschbörse jederzeit gegen")
                    say("wertvolle und vorallem nützliche Items eintauschen!")
                end
            end
        end 
Was ist da Falsch? Bitte verbessern
PHP Code:
quest Userpanel begin
    state start begin
        when 70010.use begin
            say_title("User-Panel")
            say_reward("Wie kann ich helfen?")
            local a = select("Lager öffnen", "Itemshop-Lager öffnen", "Team-Liste aufrufen", "Achievement-Punkte anzeigen", "FAQ", "Abbrechen")
            if a == 6 then
                return
            elseif a == 1 then
                game.open_safebox()
                chat("Dein Lager wurde geöffnet!")
            elseif a == 2 then
                game.open_mall()
                chat("Dein Itemshop-Lager wurde geöffnet!")
            elseif a == 3 then
                say_title("Teamliste:")
                say("")
                say("Hier die Aktuelle Teamliste:")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("")
                say("Bitte vergesst die eckigen Klammern nicht,")
                say("falls ihr sie anschreiben wollt!")
                say("")
                wait()
                say("Sucht SERVERNAME zurzeit Teamler?:")
                say("Wenn wir Teamler suchen steht dies im Forum")
                say("FORUMLINK")
            elseif a == 4 then
                local actual_achievement_points = pc.getqf("achievement_points")
                local Reward = 0
                pc.setqf("achievement_points", actual_achievement_points + Reward)
                say("Du hast: ".. actual_achievement_points + Reward .." Achievementpunkte!")
            elseif a == 5 then
                say_title("FAQ:")
                say("Hier findest du Antworten auf die")
                say("wichtigsten Fragen, bitte wähle eine Kategorie:")
                local b = select("Droppinfos", "Farmmaps", "Boni 1-5", "Boni 6-7", "Das High-Eq", "Achievementpunkte", "Abbrechen")
                if b == 6 then
                    return
                elseif b == 1 then
                    say_title("Wo droppt man was:")
                    say("Alle unnötigen Uppitems wurden entfernt.")
                    say("Ich zähle dir nun die wichtigsten Paar dinge auf:")
                    say("")
                    say("Weisse,Blaue,Rote Perlen: 75er-170er Metins")
                    say("Gegenangriffstrategie: 75er-170er Metins und in Grotte2")
                    say("Grüne, violette, gelbe, türkise, schwarze Perle: 75er-250er Metins")
                    say("Kristalle: 250er Metins")
                    say("Sterne: 140er-170er Metins")
                    say("Diamanten: 250er Metins")
                    say("75er Waffen: 75er-170er Metins und Feuer der Macht")
                    say("Wenn etwas fehlt meldet dies uns")
                    say("")
                elseif b == 2 then
                    say_title("Farmmaps:")
                    say("Wir haben 3 Farmmaps:")
                    say("")
                    say("Auf der Farmmap ab Level 1 findet ihr:")
                    say("45er-90er Metins und Feuer der Macht")
                    say("")
                    say("Auf der 95er Farmmap findet ihr:")
                    say("90er-120er Metins, Feuer der Macht u. Sensis")
                    say("")
                    say("Auf der 130er Farmmap findet ihr:")
                    say("130er-250er Metins")
                elseif b == 3 then
                    say_title("Boniliste 1-5:")
                    say("")
                    say("Hier die Maximale 1-5 Bonis:")
                    say("Max_TP: 5000")
                    say("Max_MP: 1000")
                    say("Halbmenschen: 15")
                    say("STR,INT,VIT,DEX: 20")
                    say("Krit, DB: 15")
                    say("Schwert, Zweihand: 20")
                    say("Dolch, Pfeil: 20")
                    say("Fächer, Glocken: 20")
                    say("Magie, Feuer, Wind: 20")
                    say("Chance auf Exp Bonus: 30")
                    say("Doppelt Dropp: 25")
                    say("TP und MP Regi: 30")
                    say("TP und MP_Apsobieren: 15")
                    say("Angriffsgeschwindigkeit: 15")
                    say("")
                elseif b == 4 then
                    say_title("Boniliste 6-7:")
                    say("Hier die Maximale 6-7 Bonis:")
                    say("")
                    say("STR, INT, VIT, DEX: 5")
                    say("Max_TP: 2000")
                    say("Krit, DB: 10")
                    say("Stark gg Monster: 15")
                    say("")
                elseif b == 5 then
                    say_title("Das High-Eq:")
                    say("")
                    say("130er Waffen und 140er Rüstungen bekommt ihr")
                    say("aus der Balrog-Truhe!")
                    say("Diese könnt ihr dann bis zum 170er Eq uppen.")
                    say("Das 170er Eq könnt ihr nicht mehr weiter uppen!")
                    say("Es wird eventuell noch 250er End Eq eingefügt.")
                elseif b == 6 then
                    say_title("Achievementpunkte:")
                    say("")
                    say("Eure Achievementpunkte könnt ihr Map1")
                    say("bei dem Npc Tauschbörse jederzeit gegen")
                    say("wertvolle und vorallem nützliche Items eintauschen!")
                 end
             end
         end 
    end
end 
05/27/2013 21:07 ☜☆☞~Razac~☜☆☞#8139
Hallo ich bin es mal wieder Razac und zwar habe ich eine quest geschrieben aber Rangpunkte erstellen und Normale skills gehen nicht ich weis echt nicht warum naja Points auszahlen funktioniert ich hoffe ihr könnt mir weiter helfen.

05/27/2013 22:57 Zryyy#8140
Ausschnitt aus quest, glaube das reicht..

Code:
        when info or button begin
            say_title("Angriff auf das Kaiser Reich")
            say("Staus:")
            say_reward("Du hast schon "..pc.getqf("state1").." von 1 x Sensenmann getötet.")
        end
        
        when 1093.kill begin
            local count1 = pc.getqf("state1") + 1
            if count1 <= 3 then
                pc.setqf("state1", count1)
                q.set_counter("Sensenmann", count1)
            end
            if count1 == 3 then
            set_state(fertig)
            end
        end
    end
            
    state fertig begin
        when letter begin
            send_letter("Aufgabe abgeschlossen!")
        end
Fehler bei putty gibt es kein, aber es wird einfach nicht gezählt wenn man den ingame tötet..
Warum?
05/28/2013 05:24 .Aecho.#8141
Beim Ccompilen sagt er mir

expecting 'when' or 'function'


Code:
quest reittiere begin  
    state start begin  
        when 71125.use begin  
            if pc.get_level() >= 1 then  
                chat("Du hast nun für 380 Stunden einen Keiler als Reittier!")  
                affect.remove_collect()   
                pc.mount(20110, 9999)  
                pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
            else  
                chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!") 
			end
			
			if horse.unride() then
				affect.remove_collect()			
			end
        end  
		
        when 71126.use begin  
            if pc.get_level() >= 1 then  
                chat("Du hast nun für 380 Stunden einen Wolf als Reittier!")  
                affect.remove_collect()   
                pc.mount(20111, 9999)  
                pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
            else  
                chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!") 
			end
			
			if horse.unride() then
				affect.remove_collect()			
			end
        end
		
        when 71127.use begin  
            if pc.get_level() >= 1 then  
                chat("Du hast nun für 380 Stunden einen Tiger als Reittier!")  
                affect.remove_collect()   
                pc.mount(20112, 9999)  
                pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
            else  
                chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!") 
			end
			
			if horse.unride() then
				affect.remove_collect()			
			end
        end
					if horse.unride() then
				affect.remove_collect()			
			end
        end
		
        when 20980.use begin  
            if pc.get_level() >= 1 then  
                chat("Du hast nun für 380 Stunden einen Weißen Loewen als Reittier!")  
                affect.remove_collect()   
                pc.mount(20114, 9999)  
                pc.mount_bonus(apply.ATT_GRADE_BONUS,200,300)
				pc.mount_bonus(apply.DEF_GRADE_BONUS,200,300)
            else  
                chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!") 
			end
			
			if horse.unride() then
				affect.remove_collect()			
			end
        end
		
        when 71128.use begin  
            if pc.get_level() >= 1 then  
                chat("Du hast nun für 380 Stunden einen Loewen als Reittier!")  
                affect.remove_collect()   
                pc.mount(20113, 9999)  
                pc.mount_bonus(apply.ATT_GRADE_BONUS,100,3800)
            else  
                chat("Du bist noch zu jung!Versuch es mit lvl 1 wieder!") 
			end
			
			if horse.unride() then
				affect.remove_collect()			
			end
        end
	end
end
05/28/2013 12:52 HenK™#8142
Wie muss ich genau hier das item.remove() ändern, so das das item nicht verschwindet sondern in itemshop sockel geht und man es da wieder raus nehmen kann? und halt nur eine gewisse zeit abläuft
PHP Code:
quest buffs begin
    state start begin
        when 71135.use begin
            cmdchat("buff1")
            item.remove()
        end
        when 71136.use begin
            cmdchat("buff2")
            item.remove()
        end
        when 71143.use begin
            cmdchat("buff3")
            item.remove()
        end
        when 71145.use begin
            cmdchat("buff4")
            item.remove()
        end
        when 71148.use begin
            cmdchat("buff5")
            item.remove()
        end
        when 71149.use begin
            cmdchat("buff6")
            item.remove()
        end
    end
end 
05/28/2013 16:13 PeloQ#8143
@ ☜☆☞~Razac~☜☆☞

PHP Code:
quest linguna2userpanel begin
    state start begin
        when 50512.use begin
        say("Hallo "..pc.get_name().." ")
        say("du moechtest also den Linguna2 Userpanel")
        say("benutzen habe ich recht...?")
        say("")
        say("OK Dann viel spas mit dem Userpanel")
        say_reward("Was moechtest du machen/benutzen?")
        local ausw = select("Points auszahlen","Rangpunke erstellen","Normale Skills","Schliesen")
        if ausw == 1 then
        local poin = select("500k Points geben", "Schliesen")
        if poin == 1 then
        pc.change_money(500000000)
        elseif poin == 2 then
        return
        end
        elseif ausw==2 then
        local rang = select("Player","Edel","Ritterlich","Goettlich","Kein Rang mehr","Schliesen")
        if rang == 1 then
        pc.change_alignment(2000)
        elseif rang == 2 then
        pc.change_alignment(5000)
        elseif rang == 3 then
        pc.change_alignment(8000)
        elseif rang == 4 then
        pc.change_alignment(100000)
        elseif rang == 5 then
        say_red("es geht nur wenn man Goettlich ist")
        pc.change_alignment(-20000)
        elseif rang == 6 then
        return
        end
        elseif ausw==3 then
        local skill = select("Was sind Normale Skills?","Normale Skills skillen,","Schliesen")
        if skill == 1 then
        say_yellow("Normale Skills sind -->")
        say_yellow("Bergbau")
        say_yellow("Pferde Rufen")
        say_yellow("Fuehrung")
        say_yellow("Verwandeln")
        say_yellow("Rot sprachen")
        say_yellow("Gelb sprachen")
        say_yellow("Blau sprachen")
        say_yellow("Kampf von Pferdrueckend")
        say_yellow("Pferdestampfer")
        say_yellow("Kraftwelle")
        say_yellow("Pfeilregen")
        say_yellow("Schmieden")
        say_yellow("Reiten")
        say_yellow("Combo")
        elseif skill == 2 then
        pc.set_skill_level(124 ,59)
        pc.set_skill_level(131 ,10)
        pc.set_skill_level(130 ,21)
        pc.set_skill_level(121 ,59)
        pc.set_skill_level(129 ,59)
        pc.set_skill_level(126 ,59)
        pc.set_skill_level(127 ,59)
        pc.set_skill_level(128 ,59)
        pc.set_skill_level(137 ,59)
        pc.set_skill_level(138 ,59)
        pc.set_skill_level(139 ,59)
        pc.set_skill_level(140 ,59)
        pc.set_skill_level(125 ,59)
        pc.set_skill_level(122 ,2)
        elseif skill == 3 then
        return
        end
        end
        end
    end
end 
05/28/2013 17:51 ☜☆☞~Razac~☜☆☞#8144
Quote:
Originally Posted by PeloQ View Post
@ ☜☆☞~Razac~☜☆☞

PHP Code:
quest linguna2userpanel begin
    state start begin
        when 50512.use begin
        say("Hallo "..pc.get_name().." ")
        say("du moechtest also den Linguna2 Userpanel")
        say("benutzen habe ich recht...?")
        say("")
        say("OK Dann viel spas mit dem Userpanel")
        say_reward("Was moechtest du machen/benutzen?")
        local ausw = select("Points auszahlen","Rangpunke erstellen","Normale Skills","Schliesen")
        if ausw == 1 then
        local poin = select("500k Points geben", "Schliesen")
        if poin == 1 then
        pc.change_money(500000000)
        elseif poin == 2 then
        return
        end
        elseif ausw==2 then
        local rang = select("Player","Edel","Ritterlich","Goettlich","Kein Rang mehr","Schliesen")
        if rang == 1 then
        pc.change_alignment(2000)
        elseif rang == 2 then
        pc.change_alignment(5000)
        elseif rang == 3 then
        pc.change_alignment(8000)
        elseif rang == 4 then
        pc.change_alignment(100000)
        elseif rang == 5 then
        say_red("es geht nur wenn man Goettlich ist")
        pc.change_alignment(-20000)
        elseif rang == 6 then
        return
        end
        elseif ausw==3 then
        local skill = select("Was sind Normale Skills?","Normale Skills skillen,","Schliesen")
        if skill == 1 then
        say_yellow("Normale Skills sind -->")
        say_yellow("Bergbau")
        say_yellow("Pferde Rufen")
        say_yellow("Fuehrung")
        say_yellow("Verwandeln")
        say_yellow("Rot sprachen")
        say_yellow("Gelb sprachen")
        say_yellow("Blau sprachen")
        say_yellow("Kampf von Pferdrueckend")
        say_yellow("Pferdestampfer")
        say_yellow("Kraftwelle")
        say_yellow("Pfeilregen")
        say_yellow("Schmieden")
        say_yellow("Reiten")
        say_yellow("Combo")
        elseif skill == 2 then
        pc.set_skill_level(124 ,59)
        pc.set_skill_level(131 ,10)
        pc.set_skill_level(130 ,21)
        pc.set_skill_level(121 ,59)
        pc.set_skill_level(129 ,59)
        pc.set_skill_level(126 ,59)
        pc.set_skill_level(127 ,59)
        pc.set_skill_level(128 ,59)
        pc.set_skill_level(137 ,59)
        pc.set_skill_level(138 ,59)
        pc.set_skill_level(139 ,59)
        pc.set_skill_level(140 ,59)
        pc.set_skill_level(125 ,59)
        pc.set_skill_level(122 ,2)
        elseif skill == 3 then
        return
        end
        end
        end
    end
end 
danke PeloQ
Quest funktioniert thx bekommst ein thx
05/28/2013 17:54 Beansmack#8145
Thanks man
Page 543 of 845 « First 43443493533541542 543 544545553593643 Last »