[SERVICE] Die Questkontrolle

Page 74 of 845 « First 24647273 74 757684124174574 Last »
12/18/2010 22:26 CauTaRt#1096
Quote:
Originally Posted by RealFreak View Post
der quest von casi ist vollkommen in Ordnung, den hatte ich anfangs ebenfalls drinnen, dein Problem wird sein, dass du in der Datenbank den type auf 18 stellen musst(für questfenster)

MfG RealFreak

Meine Probs:
PHP Code:
quest labyrinthwarp begin
    state start begin
    when 20364.click begin begin
            say_title("Nakajima:")
            say("Soll es losgehen?")
            local s=select("Ja!", "Nein Danke!")
            if s == 2 then
                return
            end
            say_title("Nakajima:")
            say("Halt dich gut fest!")
            pc.warp(60, 60)
            end
        end
    end
end 
Joa, will mich nur AUF der Map bewegen zum Punkt 60,60....
und:
PHP Code:
quest pferderuf begin
    state start begin
        when 30182.use begin 
          command("horse.summon")
        end
    end
end 
Jops Pferd rufen zu 100%, aber wie OHNE Rechte, also für die ganz normalen User?
Problem 1.
Die Quest sollte nun gehen.

Problem 2.

Ich hoffe ich habe geholfen.

MFG CauTaRt
12/19/2010 00:18 Lore7#1097
Hallo habe gerade mal versucht den regenbogenstein zu entbuggen,
aber er beinhaltet auch noch andere dinge wie Ritterlich Mg usw
Habe es dort eingefügt bei COmputerkranks serverfiles /usr/rain/channel/share_data/locale/hongkong/quest
Habe im Vpc das so gemacht cd /usr/rain/channel/share_data/locale/hongkong/quest
dann make.sh
dann sh.make.sh
dann cd /root/

12/19/2010 01:05 CauTaRt#1098
Quote:
Originally Posted by Lore7 View Post
Hallo habe gerade mal versucht den regenbogenstein zu entbuggen,
aber er beinhaltet auch noch andere dinge wie Ritterlich Mg usw
Habe es dort eingefügt bei COmputerkranks serverfiles /usr/rain/channel/share_data/locale/hongkong/quest
Habe im Vpc das so gemacht cd /usr/rain/channel/share_data/locale/hongkong/quest
dann make.sh
dann sh.make.sh
dann cd /root/
Das liegt an der Quest.
Schreib mir ne PN, und ich geb dir meine Regenbogen Quest!


MFG CauTaRt
12/19/2010 15:36 Endless.#1099
Hier eine Quest..die funktioniert wiedermal nicht..<.< look^^

PHP Code:
 quest code begin
    state start begin
        when 20016.chat."Der Code" begin
            say ("Sei gegrüsst "..pc.get_name().." :D ")
            say ("Heute morgen habe ich dummerweise mein")
            say ("Lagerpasswort zu oft falsch eingegeben")
            say ("und der Lagerverwalter sagte zu mir, dass")
            say ("ich den Entsperrcode brauche um wieder ans Lager")
            say ("kann und es wieder benutzen darf und ein neues")
            say ("Passwort bekomme. Nur jetzt habe ich ein Problem..")
            say ("Ich habe mein Zettel verloren wo ich es aufgeschrieben")
            say ("habe, es müsste irgentwo im Experten Affendungeon sein.")
            say_reward ("Töte den Affenboss im Exp. Affendungeon")
            say_reward ("um den Code zu bekommen")
            say_reward ("Wenn du den Code weisst , gib ihn dem Schmied")
            local s = select ("Ich weiss den Code", "Hab ihn vergessen")
            if s == 1 then
                local s = input()
                if s = "1527846" then
                    say ("Danke "..pc.get_name().."!!")
                    say ("Der wirds wohl sein. Ich werde")
                    say ("endlich wieder lagern können.")
                    say ("Hier deine Belohnung!")
                    pc.give_exp2(10000000)
                    pc.give_item2(50512)
                    pc.change_money(50000000)
                    pc.give_item2(25040
                end
                if s == 2 then
                    return
                end
            end
        end
    end
end 


Fehlermeldung..:

synthax error : [string "start"]:16: ´then´ expected near `=´
code quest:33 Abort trap (Core dumped)
12/19/2010 19:03 .Alessa#1100
Schau mal in Zeile 19... Sollte das nicht == heißen?

Zumal ergibt die Quest keinen Sinn... Der sagt dir, du sollst den Zettel vom Experten-AD holen und dann den Code vorlesen... Und gleich im Anschluss kommt eine Auswahl, ob man den Code hat???
12/19/2010 19:33 Endless.#1101
Wenn man den richtig eingibt.. bekommt man halt eine Belohnung..
nur ich will die Quest so bauen..das man die nur 1x machen kann..
sonst kann man jedem ja verraten..
wenn man den Code hat..gibt man den ein..amsonsten
ersmal AD Boss killen und dann den Code eingeben..weil man ihn ja
jetz hat^^

dieses input..sollte sein das der den eingibt.. ich weiss leider nicht
wie ich diese Quest richtig mache :s
12/19/2010 20:44 .Alessa#1102
PHP Code:
 quest code begin 
    state start begin 
        when 20016.chat."Das Lagerpasswort" begin 
            say ("Sei gegrüsst "..pc.get_name().." :D ") 
            say ("Heute morgen habe ich dummerweise mein") 
            say ("Lagerpasswort zu oft falsch eingegeben") 
            say ("und der Lagerverwalter sagte zu mir, dass") 
            say ("ich den Entsperrcode brauche um wieder ans Lager") 
            say ("kann und es wieder benutzen darf und ein neues") 
            say ("Passwort bekomme. Nur jetzt habe ich ein Problem..") 
            say ("Möchtest du mir helfen?")
            local a = select("Helfen", "Abbrechen")
            if a == 2 then
                return
            end
            say ("Ich habe mein Zettel verloren wo ich es aufgeschrieben") 
            say ("habe, es müsste irgentwo im Experten Affendungeon sein.") 
            say_reward ("Töte den Affenboss im Exp. Affendungeon") 
            say_reward ("um den Code zu bekommen") 
            say_reward ("Wenn du den Code weisst , gib ihn dem Schmied") 
            pc.setqf("code", 1)
            setstate(weiter)
        end
    state weiter begin
        when 20016.chat."Der Code" with pc.getqf("code") == 1 begin
            say("Weißt du etwa meinen Code?")
            local s = select ("Ich weiss den Code", "Hab ihn vergessen") 
            if s == 1 then 
                local s = input() 
                if s != "1527846" then 
                    return
                end
                say ("Danke "..pc.get_name().."!!") 
                say ("Der wirds wohl sein. Ich werde") 
                say ("endlich wieder lagern können.") 
                say ("Hier deine Belohnung!") 
                pc.give_exp2(10000000) 
                pc.give_item2(50512) 
                pc.change_money(50000000) 
                pc.give_item2(25040 
                pc.setqf("code", 2)
            else
                say ("Ich habe mein Zettel verloren wo ich es aufgeschrieben") 
                say ("habe, es müsste irgentwo im Experten Affendungeon sein.") 
                say_reward ("Töte den Affenboss im Exp. Affendungeon") 
                say_reward ("um den Code zu bekommen") 
                say_reward ("Wenn du den Code weisst , gib ihn dem Schmied") 
                return
            end 
        end 
    end 
end 
So viel mache ich mit Input-Dingern normal nicht. Probier's ;-) Rechtschreibfehler habe ich dir nicht korrigiert.
12/19/2010 21:01 Endless.#1103
Danke dir^^ aber die Quest wurde gedumped..:s

da steht:

expectering ´when´ or ´function´
code.quest:24 Abort trap (Core dumped) :s
12/20/2010 18:49 »Xc3llênT#1104
Kein Wunder :)
Probier mal nach "locale a = select .... "
Nicht nur "if a == 2 then"
sondern auch "if a == 1 then"

Das sollte erstmal genug Hilfe sein :)
12/20/2010 19:13 Endless.#1105
verstehe ich jetzt doch nicht... ;(

wie soll ich nach local a = select vorgehen?
12/20/2010 20:34 Lore7#1106
Habe Probleme mit der Regenbogenstein Quest,
wenn ich auf den regenbogenstein klicke passiert nix
12/20/2010 20:45 .Delta#1107
Quote:
Originally Posted by Lore7 View Post
Habe Probleme mit der Regenbogenstein Quest,
wenn ich auf den regenbogenstein klicke passiert nix
hm leichteste Lösung zuerst: hast du den type von dem Regenbogenstein in der item_proto auf 18 gestellt?
wenn nicht dann mach das
12/20/2010 21:22 Lore7#1108
Quote:
Originally Posted by Delta619 View Post
hm leichteste Lösung zuerst: hast du den type von dem Regenbogenstein in der item_proto auf 18 gestellt?
wenn nicht dann mach das
Jap ist auf 18
12/20/2010 21:58 CauTaRt#1109
Deine Hongkong List lies es nicht...
Aber hier ich glaube habe einen fehler gemacht...
Sorry habe nebst dem Quest schreiben noch anderweilig zu tun

Ausserdem ein Rechtschreibefehler wie peinich :o
PHP Code:
----------------------------------
-- Regenbogenstein Item v2.
-- Macht alle Zauber auf P + Zusatz Zauber + Rang Ritterlich
-- Copyright ©by CauTaRt 
----------------------------------
quest regenbogen begin
state start begin
when 50512.use begin
say_title("Regenbogenstein:")
say("Du möchtest also deine Skills auf")
say("den Perfekter Meister setzen?")
say("Zusätzlich erhältst du viele Rangpunkte!")
local y = select("Ja","Nein!")
if y == 2 then
return
end
if y == 1 then
pc.remove_item(50512, 1)
if pc.job ==0 then
say("Wähle deine Lehre aus")

local s=select("Körper","Mental")

if s==1 then
pc.set_skill_group(1)
pc.set_skill_level(1 ,59)
pc.set_skill_level(2 ,59)
pc.set_skill_level(3 ,59)
pc.set_skill_level(4 ,59)
pc.set_skill_level(5 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

if s==2 then
pc.set_skill_group(2)
pc.set_skill_level(16 ,59)
pc.set_skill_level(17 ,59)
pc.set_skill_level(18 ,59)
pc.set_skill_level(19 ,59)
pc.set_skill_level(20 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

elseif pc.job ==1 then
say("Wähle deine Lehre aus")

local s=select("Nahkampf","Bogen")

if s==1 then
pc.set_skill_group(3)
pc.set_skill_level(31 ,59)
pc.set_skill_level(32 ,59)
pc.set_skill_level(33 ,59)
pc.set_skill_level(34 ,59)
pc.set_skill_level(35 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

if s==2 then
pc.set_skill_group(4)
pc.set_skill_level(46 ,59)
pc.set_skill_level(47 ,59)
pc.set_skill_level(48 ,59)
pc.set_skill_level(49 ,59)
pc.set_skill_level(50 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

elseif pc.job ==2 then
say("Wähle deine Lehre aus")
local s=select("Magie","Waffe")

if s==1 then
pc.set_skill_group(5)
pc.set_skill_level(76 ,59)
pc.set_skill_level(77 ,59)
pc.set_skill_level(78 ,59)
pc.set_skill_level(79 ,59)
pc.set_skill_level(80 ,59)
pc.set_skill_level(81, 59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

if s==2 then
pc.set_skill_group(6)
pc.set_skill_level(61 ,59)
pc.set_skill_level(62 ,59)
pc.set_skill_level(63 ,59)
pc.set_skill_level(64 ,59)
pc.set_skill_level(65 ,59)
pc.set_skill_level(66 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

elseif pc.job ==3 then
say("Wähle deine Lehre aus")
local s=select("Heil","Drachen")

if s==1 then
pc.set_skill_group(7)
pc.set_skill_level(106 ,59)
pc.set_skill_level(107 ,59)
pc.set_skill_level(108 ,59)
pc.set_skill_level(109 ,59)
pc.set_skill_level(110 ,59)
pc.set_skill_level(111 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
end

if s==2 then
pc.set_skill_group(8)
pc.set_skill_level(91 ,59)
pc.set_skill_level(92 ,59)
pc.set_skill_level(93 ,59)
pc.set_skill_level(94 ,59)
pc.set_skill_level(95 ,59)
pc.set_skill_level(96 ,59)
pc.set_skill_level(124 ,50)
pc.set_skill_level(131 ,50)
pc.set_skill_level(121 ,50)
pc.set_skill_level(129 ,50)
pc.set_skill_level(126 ,50)
pc.set_skill_level(127 ,50)
pc.set_skill_level(128 ,50)
pc.change_alignment(14000)
say("Deine Skills sind auf den Perfekter Meister")
say("Und deine Rangpunkte wurden erhöt")
local l = select("Spielen")
if l == 1 then
return
end
end
end
end
end
end
end 
MFG CauTaRt
12/20/2010 22:43 .Alessa#1110
PHP Code:
---------------------------------- 
-- Regenbogenstein Item v2. 
-- Macht alle Zauber auf P + Zusatz Zauber + Rang Ritterlich 
-- Copyright ©by CauTaRt  
---------------------------------- 
quest regenbogen begin 
    state start begin 
        when 50512.use begin 
            say_title("Regenbogenstein:") 
            say("Du möchtest also deine Skills auf") 
            say("den Perfekter Meister setzen?") 
            say("Zusätzlich erhältst du viele Rangpunkte!") 
            local y = select("Ja","Nein!") 
            if y == 2 then 
                return 
            end 
            if y == 1 then 
                pc.remove_item(50512, 1) 
            end
            if pc.job ==0 then 
                say("Wähle deine Lehre aus") 
                local s=select("Körper","Mental") 
                if s==1 then 
                    pc.set_skill_group(1) 
                    pc.set_skill_level(1 ,59) 
                    pc.set_skill_level(2 ,59) 
                    pc.set_skill_level(3 ,59) 
                    pc.set_skill_level(4 ,59) 
                    pc.set_skill_level(5 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                else 
                    pc.set_skill_group(2) 
                    pc.set_skill_level(16 ,59) 
                    pc.set_skill_level(17 ,59) 
                    pc.set_skill_level(18 ,59) 
                    pc.set_skill_level(19 ,59) 
                    pc.set_skill_level(20 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                end 
            elseif pc.job ==1 then 
                say("Wähle deine Lehre aus") 
                local s=select("Nahkampf","Bogen") 
                if s==1 then 
                    pc.set_skill_group(3) 
                    pc.set_skill_level(31 ,59) 
                    pc.set_skill_level(32 ,59) 
                    pc.set_skill_level(33 ,59) 
                    pc.set_skill_level(34 ,59) 
                    pc.set_skill_level(35 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                else
                    pc.set_skill_group(4) 
                    pc.set_skill_level(46 ,59) 
                    pc.set_skill_level(47 ,59) 
                    pc.set_skill_level(48 ,59) 
                    pc.set_skill_level(49 ,59) 
                    pc.set_skill_level(50 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                end 
            elseif pc.job ==2 then 
                say("Wähle deine Lehre aus") 
                local s=select("Magie","Waffe") 
                if s==1 then 
                    pc.set_skill_group(5) 
                    pc.set_skill_level(76 ,59) 
                    pc.set_skill_level(77 ,59) 
                    pc.set_skill_level(78 ,59) 
                    pc.set_skill_level(79 ,59) 
                    pc.set_skill_level(80 ,59) 
                    pc.set_skill_level(81, 59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                else
                    pc.set_skill_group(6) 
                    pc.set_skill_level(61 ,59) 
                    pc.set_skill_level(62 ,59) 
                    pc.set_skill_level(63 ,59) 
                    pc.set_skill_level(64 ,59) 
                    pc.set_skill_level(65 ,59) 
                    pc.set_skill_level(66 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                end 
            elseif pc.job ==3 then 
                say("Wähle deine Lehre aus") 
                local s=select("Heil","Drachen") 
                if s==1 then 
                    pc.set_skill_group(7) 
                    pc.set_skill_level(106 ,59) 
                    pc.set_skill_level(107 ,59) 
                    pc.set_skill_level(108 ,59) 
                    pc.set_skill_level(109 ,59) 
                    pc.set_skill_level(110 ,59) 
                    pc.set_skill_level(111 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                    say("Deine Skills sind auf den Perfekter Meister") 
                    say("Und deine Rangpunkte wurden erhöt") 
                else 
                    pc.set_skill_group(8) 
                    pc.set_skill_level(91 ,59) 
                    pc.set_skill_level(92 ,59) 
                    pc.set_skill_level(93 ,59) 
                    pc.set_skill_level(94 ,59) 
                    pc.set_skill_level(95 ,59) 
                    pc.set_skill_level(96 ,59) 
                    pc.set_skill_level(124 ,50) 
                    pc.set_skill_level(131 ,50) 
                    pc.set_skill_level(121 ,50) 
                    pc.set_skill_level(129 ,50) 
                    pc.set_skill_level(126 ,50) 
                    pc.set_skill_level(127 ,50) 
                    pc.set_skill_level(128 ,50) 
                    pc.change_alignment(14000) 
                end
            else
                say("Du hast keine Lehre gewählt!!!!")
                return
            end
            say("Deine Skills sind auf den Perfekter Meister") 
            say("Und deine Rangpunkte wurden erhöt") 
            local l = select("Spielen") 
            if l == 1 then 
                return 
            end 
        end 
    end 
end 
Es lebe die Tea-Time!
Page 74 of 845 « First 24647273 74 757684124174574 Last »