[SERVICE] Die Questkontrolle

07/09/2011 17:55 RedKing2#2746
Irgendwas stimmt da drin nicht, help bitte.

PHP Code:
quest sensenmann begin
    state start begin
        when 20094.chat
."Sensenmänner jagen?" with pc.level >= 70 and pc.count_item(70044) == 0 begin
        
        say_title
("Hong-Hae")
        
say("Sensenmänner sind die Abgeordneten")
        
say("für die verlorenen Seelen. Doch anstatt")
        
say("ihren Job richtig zu machen, nutzen sie dieses")
        
say("Amt total aus. Sie nehmen verlorene Seelen und")
        
say("versklaven sie für ihre eigenen Zwecke. Das")
        
say("grauen dieser Welt ist einfach grenzenlos!")
        
say("")
        
        
wait()
        
say_title("Hong-Hae")
        
say("Es gibt nur wenige die Sensenmänner")
        
say("bezwingen können und die die es können")
        
say("haben selten Gelegenheit dazu. Diese feigen")
        
say("Monster verschanzen sich in den obersten")
        
say("Etagen des Dämonenturms und lassen sich")
        
say("von tausenden ihrer versklavten Anhängern")
        
say("beschützen! Ich habe ein Horn entdeckt")
        
say("das die Sensenmänner aus ihren verstecken")
        
say("raus lockt und direkt zu dir führt. Wenn")
        
say("du möchtest überlasse ich dir eines dieser")
        
say("Hörner.")
             
local s select("Ja, ich möchte gerne eines!""Nein, ich bin zu schwach für sowas")
                if 
== 1 then
                    
if pc.money >= 80000000 then
                        say_reward
("Hong-Hae")
                        
say("Welches Schild überlässt du mir?")
                        
local b select("Falkenschild+9","Tigerschild+9","Löwenkantenschild+9","Drachenschuppenschild+9")
                            if 
== 1 then
                                
if pc.count_item(13069) >= 1 then
                                    say_reward
("Hong-Hae")
                                    
say("Okay, der Deal gilt!")
                                    
say("Ich nehme dir die Sachen ab und übergebe")
                                    
say("dir das Horn. Doch ich sollte dich")
                                    
say("vor warnen. Du kannst dieses Horn nicht")
                                    
say("ohne meine Hilfe verwenden. Das heißt, wenn")
                                    
say("du ein Sensenmann herlocken willst musst")
                                    
say("du zu mir kommen.")
                                    
say("")
                                    
pc.change_money(-80000000)
                                    
pc.remove_item(130691)
                                    
pc.give_item2(70044)
                            elseif 
== 2 then
                                
if pc.count_item(13089) >= 1 then
                                    say_reward
("Hong-Hae")
                                    
say("Okay, der Deal gilt!")
                                    
say("Ich nehme dir die Sachen ab und übergebe")
                                    
say("dir das Horn. Doch ich sollte dich")
                                    
say("vor warnen. Du kannst dieses Horn nicht")
                                    
say("ohne meine Hilfe verwenden. Das heißt, wenn")
                                    
say("du ein Sensenmann herlocken willst musst")
                                    
say("du zu mir kommen.")
                                    
say("")
                                    
pc.change_money(-80000000)
                                    
pc.remove_item(130891)
                                    
pc.give_item2(70044)
                            elseif 
== 3 then
                                
if pc.count_item(13109) >= 1 then
                                    say_reward
("Hong-Hae")
                                    
say("Okay, der Deal gilt!")
                                    
say("Ich nehme dir die Sachen ab und übergebe")
                                    
say("dir das Horn. Doch ich sollte dich")
                                    
say("vor warnen. Du kannst dieses Horn nicht")
                                    
say("ohne meine Hilfe verwenden. Das heißt, wenn")
                                    
say("du ein Sensenmann herlocken willst musst")
                                    
say("du zu mir kommen.")
                                    
say("")
                                    
pc.change_money(-80000000)
                                    
pc.remove_item(131091)
                                    
pc.give_item2(70044)
                            elseif 
== 4 then
                                
if pc.count_item(13129) >= 1 then
                                    say_reward
("Hong-Hae")
                                    
say("Okay, der Deal gilt!")
                                    
say("Ich nehme dir die Sachen ab und übergebe")
                                    
say("dir das Horn. Doch ich sollte dich")
                                    
say("vor warnen. Du kannst dieses Horn nicht")
                                    
say("ohne meine Hilfe verwenden. Das heißt, wenn")
                                    
say("du ein Sensenmann herlocken willst musst")
                                    
say("du zu mir kommen.")
                                    
say("")
                                    
pc.change_money(-80000000)
                                    
pc.remove_item(131291)
                                    
pc.give_item2(70044)
                                else
                                    
say_title("Hong-Hae")
                                    
say("Dieses Schild besitzt du nicht +9!")
                                    
say("")
                                
end
                            end
                    
else
                        
say_title("Hong-Hae")
                        
say("Tut mir leid, das Horn überlasse")
                        
say("ich dir nur wenn du mir 80.000.000 Yang")
                        
say("zahlst und mir eines der folgenden Schilde")
                        
say("mit der Stufe 9 bringst :")
                        
say_reward("Falkenschild, Tigerschild, Löwenkantenschild oder Drachenschuppenschild")
                        
say("Dann werde ich dir das Horn überlassen!")
                        
say("")
                    
end
                
elseif == 2 then
                    
if pc.money >= 80000000 then
                        say_title
("Hong-Hae")
                        
say("Komme zu mir, wenn du dich")
                        
say("anders entschieden hast.")
                        
say("")
                    else
                        
say_title("Hong-Hae")
                        
say("Komme zu mir, wenn du dich")
                        
say("anders entschieden hast.")
                        
say("")
                    
end
                end
        end
    end
end 
Server Ansage :

qc in malloc(): error : allocation failed
Aport trap (core dumped)
Error occured on compile sensenmann.quest
07/09/2011 18:41 .ReDDoX™#2747
@ acme256:

07/09/2011 18:48 patrickstaar7x#2748
PHP Code:
quest Biologe begin
state start begin
when 1058.chat
."Finde die goldene Kiste" begin // ID vom biologen
when login or levelup with pc.get_level() >= 90 begin

say_title
("Biologe")
say("Du, tapferer Krieger, ich hätte da eine Bitte.")
say("Und zwar könntest Du mir helfen meine goldene Truhe,")
say("die mir mein Opa geschenkt hat, wiederzufinden?")
say("Es ist mir bei meiner Forschung im gefährlichen Dreikaisertal")
say("verloren gegangen.")
say("Könntest du mir helfen?")
local s=select("Ja""Nein")
        if 
s==1 then
say_title
("Biologe")
say("Du bist aber sehr nett, nun begib dich bitte")
say("zum Dreikaisertal und bringe mir die goldene Truhe.")
say("Es erwartet dich eine schöne Belohnung")
        if 
s==2 then
say_title
("Biologe")
say("Das ist ja wohl eine Unverschämtheit, mir nicht zu helfen,")
say("obwohl ich schon so viele Sachen für Dich tapferer Krieger")
say("getan habe.")
say("Hast du deine Entscheidung geändert?")
local s=select ("Ja""Nein")
        if 
s==1 then
say_title
("Biologe")
say("Gut, dass Du dich umentschieden hast,")
say("Nun, gehen auf und bringe mir die Truhe.")
        if 
s==2 then
say_title
("Biologe")
say("Wie ich sehe bist du sehr faul und willst mir dennoch nicht helfen.")
say("Nun gut, ich werde dich gehen lassen, aber das nächste Mal kommst")
say("du mir nicht so leicht davon."
local s=select ("JaJa, Bye Nuubi<3""Mowl halten & Blumen sammel'n")

        if 
pc.count_item(13069) >= 1 then
say_title 
("Biologe")
say ("Super, du hast die goldene Kiste gefunden")
say ("Nun bekommst du deine Belohnung")
        
pc.remove_item(99991)
        
pc.give_item2 (11299)
            
end

        end
    end
end 
Bräuchte Hilfe, irgendwas funktioniert nicht!
07/10/2011 12:56 Ðαrkbøζζ#2749
Die Quest soll folgende Funktion haben:
Man klickt einen Npc an, dieser sagt was und dann kann man seine gewünschte exp anzahl eingeben und bei klick auf Okay bekommen.
Leider gibt es einen Core fehler wenn ich die Quest einfüge !!! Bitte also um hilfe.

quest expgive begin
state start begin
when ID.chat."EXP" begin
say("Gib hier die Zahl ein")
local exp_give = tonumber(input(""))
wait()
pc.give_exp2(exp_give)
say_reward("Du hast " ..exp_give.. " erhalten")
end
end
end
07/10/2011 14:20 Equality'#2750
Hey , ich woltle dieses starterset einfügen

PHP Code:
quest give_basic_weapon begin
    state start begin
        when login with pc
.get_level() == 1 begin
            
if pc.getqf("basic_weapon") == 0 then
            say_title 
"Willkommen" )
            
say "Willkommen auf dem Server Servername." )
            
say "Unsere Homepage ist http:/Homepage" )
            
say "Viel Spass auf unserem Server!" )
            
say "Euer ServerName Team." )
            
say "" )
            
pc give_exp2 100000 )
            
set_quest_state "levelup" "run" )
            
pc change_money 1000000 )
            
pc give_item2 "27003" 200 )
            
pc give_item2 "27003" 200 )
            
pc give_item2 "27003" 200 )
            
pc give_item2 "27003" 200 )
            
pc give_item2 "27003" 200 )
            
pc give_item2 "27006" 200 )
            
pc give_item2 "27006" 200 )
            
pc give_item2 "71050" 200 )
            
pc give_item2 "72702" )
            
pc give_item2 "50052" )
            
horse.set_level(11)
            
say_reward "Du wurdest level 33." )
            
say_reward "Du erhielst 1kk." )
            
say_reward "Du erhielst 1000 Rote(G)." )
            
say_reward "Du erhielst 400 Blaue(G)." )
            
say_reward "Du erhielst Items fur Laufgeschwindigkeit." )
            
say_reward "Du erhielst ein Kampfpferd." )
            if 
pc job == 0 then
                pc 
give_item2 "299" )
                
pc give_item2 "3219" )
                
pc give_item2 "11249" )
                
pc give_item2 "12229" )
                
pc give_item2 "13029" )
                
pc give_item2 "14009" )
                
pc give_item2 "15009" )
                
pc give_item2 "16009" )
                
pc give_item2 "17009" )
                
say_reward "Du erhielst das Kriegerset!" )
            elseif 
pc job == 1 then
                pc 
give_item2 "1179" )
                
pc give_item2 "2159" )
                
pc give_item2 "8009" 200 )
                
pc give_item2 "8008" 200 )
                
pc give_item2 "8007" 200 )
                
pc give_item2 "8006" 200 )
                
pc give_item2 "11449" )
                
pc give_item2 "12369" )
                
pc give_item2 "13029" )
                
pc give_item2 "14009" )
                
pc give_item2 "15009" )
                
pc give_item2 "16009" )
                
pc give_item2 "17009" )
                
say_reward "Du erhielst das Ninjaset!" )
            elseif 
pc job == 2 then
                pc 
give_item2 "299" )
                
pc give_item2 "11649" )
                
pc give_item2 "12509" )
                
pc give_item2 "13029" )
                
pc give_item2 "14009" )
                
pc give_item2 "15009" )
                
pc give_item2 "16009" )
                
pc give_item2 "17009" )
                
say_reward "Du erhielst das Suraset!" )
            elseif 
pc job == 3 then
                pc 
give_item2 "5119" )
                
pc give_item2 "7169" )
                
pc give_item2 "11849" )
                
pc give_item2 "12649" )
                
pc give_item2 "13029" )
                
pc give_item2 "14009" )
                
pc give_item2 "15009" )
                
pc give_item2 "16009" )
                
pc give_item2 "17009" )
                
say_reward "Du erhielst das Schamiset!" )
            
end
            pc
.setqf("basic_weapon"1)
            
set_state(__complete)
        
end
    end
    state __complete begin
    end
end 
das habe ich von hier iwo ausm thread.
wenn ich dann die make.py ausführe bei den daroo 2010 files , kommt dann
error occured on compile give_basic_weapon.quest


hier ein screen
[Only registered and activated users can see links. Click Here To Register...]
07/10/2011 14:30 .Delta#2751
PHP Code:
quest give_basic_weapon begin
    state start begin
        when login with pc
.get_level() == 1 begin
            
if pc.getqf("basic_weapon") == 0 then
                say_title 
"Willkommen" )
                
say "Willkommen auf dem Server Servername." )
                
say "Unsere Homepage ist http:/Homepage" )
                
say "Viel Spass auf unserem Server!" )
                
say "Euer ServerName Team." )
                
say "" )
                
pc give_exp2 100000 )
                
set_quest_state "levelup" "run" )
                
pc change_money 1000000 )
                
pc give_item2 "27003" 200 )
                
pc give_item2 "27003" 200 )
                
pc give_item2 "27003" 200 )
                
pc give_item2 "27003" 200 )
                
pc give_item2 "27003" 200 )
                
pc give_item2 "27006" 200 )
                
pc give_item2 "27006" 200 )
                
pc give_item2 "71050" 200 )
                
pc give_item2 "72702" )
                
pc give_item2 "50052" )
                
horse.set_level(11)
                
say_reward "Du wurdest level 33." )
                
say_reward "Du erhielst 1kk." )
                
say_reward "Du erhielst 1000 Rote(G)." )
                
say_reward "Du erhielst 400 Blaue(G)." )
                
say_reward "Du erhielst Items fur Laufgeschwindigkeit." )
                
say_reward "Du erhielst ein Kampfpferd." )
                if 
pc job == 0 then
                    pc 
give_item2 "299" )
                    
pc give_item2 "3219" )
                    
pc give_item2 "11249" )
                    
pc give_item2 "12229" )
                    
pc give_item2 "13029" )
                    
pc give_item2 "14009" )
                    
pc give_item2 "15009" )
                    
pc give_item2 "16009" )
                    
pc give_item2 "17009" )
                    
say_reward "Du erhielst das Kriegerset!" )
                elseif 
pc job == 1 then
                    pc 
give_item2 "1179" )
                    
pc give_item2 "2159" )
                    
pc give_item2 "8009" 200 )
                    
pc give_item2 "8008" 200 )
                    
pc give_item2 "8007" 200 )
                    
pc give_item2 "8006" 200 )
                    
pc give_item2 "11449" )
                    
pc give_item2 "12369" )
                    
pc give_item2 "13029" )
                    
pc give_item2 "14009" )
                    
pc give_item2 "15009" )
                    
pc give_item2 "16009" )
                    
pc give_item2 "17009" )
                    
say_reward "Du erhielst das Ninjaset!" )
                elseif 
pc job == 2 then
                    pc 
give_item2 "299" )
                    
pc give_item2 "11649" )
                    
pc give_item2 "12509" )
                    
pc give_item2 "13029" )
                    
pc give_item2 "14009" )
                    
pc give_item2 "15009" )
                    
pc give_item2 "16009" )
                    
pc give_item2 "17009" )
                    
say_reward "Du erhielst das Suraset!" )
                elseif 
pc job == 3 then
                    pc 
give_item2 "5119" )
                    
pc give_item2 "7169" )
                    
pc give_item2 "11849" )
                    
pc give_item2 "12649" )
                    
pc give_item2 "13029" )
                    
pc give_item2 "14009" )
                    
pc give_item2 "15009" )
                    
pc give_item2 "16009" )
                    
pc give_item2 "17009" )
                    
say_reward "Du erhielst das Schamiset!" )
                
end
                pc
.setqf("basic_weapon"1)
                
set_state(__complete)
            
end
        end
    end
    state __complete begin
    end
end 
07/10/2011 14:35 Equality'#2752
Omg , ihr seit echt die besten.
07/10/2011 14:52 Ðαrkbøζζ#2753
Warte noch auf Hilfe ^^ pls <<<
07/10/2011 15:01 .Delta#2754
machs doch einfach so o.O
PHP Code:
quest expgive begin
    state start begin
        when ID
.chat."EXP" begin
            say
("Gib hier die Zahl ein")
            
local exp_give input()
            
pc.give_exp2(exp_give)
            
say_reward("Du hast " ..exp_give.. " erhalten")
        
end
    end
end 
07/10/2011 17:43 Ðαrkbøζζ#2755
Thx werde es gleich Testen und dann Editieren !
07/10/2011 18:03 patrickstaar7x#2756
PHP Code:
quest Biologe begin
state start begin
when 1058.chat
."Finde die goldene Kiste" begin // ID vom biologen
when login or levelup with pc.get_level() >= 90 begin

say_title
("Biologe")
say("Du, tapferer Krieger, ich hätte da eine Bitte.")
say("Und zwar könntest Du mir helfen meine goldene Truhe,")
say("die mir mein Opa geschenkt hat, wiederzufinden?")
say("Es ist mir bei meiner Forschung im gefährlichen Dreikaisertal")
say("verloren gegangen.")
say("Könntest du mir helfen?")
local s=select("Ja""Nein")
        if 
s==1 then
say_title
("Biologe")
say("Du bist aber sehr nett, nun begib dich bitte")
say("zum Dreikaisertal und bringe mir die goldene Truhe.")
say("Es erwartet dich eine schöne Belohnung")
        if 
s==2 then
say_title
("Biologe")
say("Das ist ja wohl eine Unverschämtheit, mir nicht zu helfen,")
say("obwohl ich schon so viele Sachen für Dich tapferer Krieger")
say("getan habe.")
say("Hast du deine Entscheidung geändert?")
local s=select ("Ja""Nein")
        if 
s==1 then
say_title
("Biologe")
say("Gut, dass Du dich umentschieden hast,")
say("Nun, gehen auf und bringe mir die Truhe.")
        if 
s==2 then
say_title
("Biologe")
say("Wie ich sehe bist du sehr faul und willst mir dennoch nicht helfen.")
say("Nun gut, ich werde dich gehen lassen, aber das nächste Mal kommst")
say("du mir nicht so leicht davon."
local s=select ("JaJa, Bye Nuubi<3""Mowl halten & Blumen sammel'n")

        if 
pc.count_item(13069) >= 1 then
say_title 
("Biologe")
say ("Super, du hast die goldene Kiste gefunden")
say ("Nun bekommst du deine Belohnung")
        
pc.remove_item(99991)
        
pc.give_item2 (11299)
            
end

        end
    end
end 
Bräuchte Hilfe, irgendwas funktioniert nicht!
07/10/2011 18:37 .Delta#2757
probiers mal so, ich hab dir mal states eingebaut und die vnum auf die vom bio geändert o.O
PHP Code:
quest Biologe begin
    state start begin
        when login 
or levelup with pc.get_level() >= 90 begin
            set_state
(information)
        
end
    end
    state information begin
        when 20084.chat
."Finde die goldene Kiste" begin
            say_title
("Biologe")
            
say("Du, tapferer Krieger, ich hätte da eine Bitte.")
            
say("Und zwar könntest Du mir helfen meine goldene Truhe,")
            
say("die mir mein Opa geschenkt hat, wiederzufinden?")
            
say("Es ist mir bei meiner Forschung im gefährlichen Dreikaisertal")
            
say("verloren gegangen.")
            
say("Könntest du mir helfen?")
            
local s=select("Ja""Nein")
            if 
s==1 then
                say_title
("Biologe")
                
say("Du bist aber sehr nett, nun begib dich bitte")
                
say("zum Dreikaisertal und bringe mir die goldene Truhe.")
                
say("Es erwartet dich eine schöne Belohnung")
                
set_state(sammeln)
            elseif 
s==2 then
                say_title
("Biologe")
                
say("Das ist ja wohl eine Unverschämtheit, mir nicht zu helfen,")
                
say("obwohl ich schon so viele Sachen für Dich tapferer Krieger")
                
say("getan habe.")
                
say("Hast du deine Entscheidung geändert?")
                
local d=select ("Ja""Nein")
                if 
d==1 then
                    say_title
("Biologe")
                    
say("Gut, dass Du dich umentschieden hast,")
                    
say("Nun, gehen auf und bringe mir die Truhe.")
                    
set_state(sammeln)
                elseif 
d==2 then
                    say_title
("Biologe")
                    
say("Wie ich sehe bist du sehr faul und willst mir dennoch nicht helfen.")
                    
say("Nun gut, ich werde dich gehen lassen, aber das nächste Mal kommst")
                    
say("du mir nicht so leicht davon."
                    
return
                
end
            end
        end
    end
    state sammeln begin
        when 20084.chat
"Ich habe die Kiste" with pc.count_item(13069) >= 1 begin
            say_title 
("Biologe")
            
say ("Super, du hast die goldene Kiste gefunden")
            
say ("Nun bekommst du deine Belohnung")
            
pc.remove_item(99991)
            
pc.give_item2 (11299)
            
set_state(__complete)
        
end
    end
    state __complete begin
    end
end 
07/11/2011 12:42 fiftyx#2758

in VPC kommt dieser Fehler:
expecting 'when' or 'function'
DasTalDerFinsternisquest.quest:52:Abort trap (core dumped)
07/11/2011 14:07 fgruy01#2759
[CENTER]Hallo Leute,

also bei mir ist Stadtwächter nicht anklickbar.
bzw man kann nicht mal Gilde gründen
(aber wenn ich mich als [GM] einlogge, dann kann man gilde gründen.)
ich weiß nicht warum....

habe serverfiles von:
-Computerkrank v1
-Client Fantasy - Server


Freunde von mir haben mir gesagt dass ich ein anderes client nehmen soll aber habe auch probiert hat mit client nicht zutun.

Vlt. ist Stadtwächter Quest beschädigt oder ist nicht mal drinne kann es sein?


Problem gelöst.
07/12/2011 01:36 hanswurst123456789#2760
also ich suche einen quest wenn ich ma off bin und weg bin für 1 tag und mein server noch on ist das es automatisch rebootet also ich such so eine quest

automatisch shutdown quest ich habe gesucht aber findes nicht

bitte hilft mir danke