[SERVICE] Die Questkontrolle

01/14/2014 20:55 .yorliK#9541
Quote:
Originally Posted by flampy1 View Post
das soll machen wenn man sich einloggt bekommt man an der seite eine quest und die frage dann hat willst du ein lvl kaufen und dann kannn man das kaufen und die soll auch nicht wieder verschwinden....
PHP Code:
quest Buylevels begin
    state start begin
        when letter begin
            send_letter
("Level kaufen!")
        
end
        when info 
or button begin
            local m
50000000 --HIER EINTRAGEN WIE VIEL ES KOSTET
            
if pc.get_money() >= m then
                local ep 
pc.get_next_exp()
                
say_title("Level kaufen")
                
say("")
                
say("Hier kannste dir n Level kaufen")
                
say("Das kostet dich "," Yang.")
                
say("")
                
say_reward("Möchtest du ein Level kaufen?")
                
local a select("Jap""Nope")
                if 
== 2 then
                    
return
                else
                       
pc.change_money(-m)
                    
pc.give_exp2(ep)
                
end
            end
            send_letter
("Level kaufen!")
        
end
    end
end 
01/14/2014 21:59 flampy1#9542
hallo Kilroy.

wenn ich die quest einfüge öffnet sie sich sofort das will ich ja nicht die soll ein der seite sein dass man sie dann öffnen kann und die soll nicht verschwinden....

PHP Code:
quest cash begin
    state start begin
        when login begin
            local ep 
pc.get_next_exp()
            if 
pc.get_money() >= 50000000 then
                say_title
("Level kaufen")
                
say("")
                
say("Du kannst dir jetzt ein Level up")
                
say("Kaufen weil wegen Yang.")
                
say("")
                
say_reward("Möchtest du ein Level kaufen?")
                
local a select("Jap""Nein")
                if 
== 2 then
                    
return
                else
                    
pc.change_money(-50000000)
                    
pc.give_exp2(999999999)
                
end
            end
        end
    end
end 
01/14/2014 22:05 mustelgar#9543
Quote:
Originally Posted by flampy1 View Post
hallo Kilroy.

wenn ich die quest einfüge öffnet sie sich sofort das will ich ja nicht die soll ein der seite sein dass man sie dann öffnen kann und die soll nicht verschwinden....
Code:
quest cash begin
    state start begin
         when letter begin
         send_letter("Level kaufen")
         end
         when info or button begin
            local ep = pc.get_next_exp()
            if pc.get_money() >= 50000000 then
                say_title("Level kaufen")
                say("")
                say("Du kannst dir jetzt ein Level up")
                say("Kaufen weil wegen Yang.")
                say("")
                say_reward("Möchtest du ein Level kaufen?")
                local a = select("Jap", "Nein")
                if a == 2 then
                    return
                else
                    pc.change_money(-50000000)
                    pc.give_exp2(999999999)
                end
            end
        end
    end
end
Ich hoffe ich konnte dir helfen.

Grüße mustelgar
01/14/2014 23:12 moldhenr#9544
Guten Abend, ich könnte Hilfe bei meiner Quest gebrauchen.
PHP Code:
quest teleportationsring begin
    state start begin
        when 30521.
use begin
            say_title
("Teleport")
            
say("Wo moechtest Du hin teleportiert werden?")
            
local s=select("Levelmap ab 90""Levelmap ab 100""Farmmap 1 ab 95""Farmmap 2 ab 105")
            if 
s==1 then
                
if pc.get_level()<90 then
                    say
("Dein Level ist zu niedrig..")
                    
say("Mindestlevel: 90")
                    return
                
end
                
return
            
end 
            pc
.warp(1024016640)
            if 
s==2 then
                
if pc.get_level()<100 then
                    say
("Dein Level ist zu niedrig..")
                    
say("Mindestlevel: 100")
                    return
                
end
                
return
            
end
            pc
.warp(1049615104)
            if 
s==3 then
                
if pc.get_level()<95 then
                    say
("Dein Level ist zu niedrig..")
                    
say("Mindestlevel: 95")
                    return
                
end
                
return
            
end    
            pc
.warp(1126415104)
            if 
s==4 then
                
if pc.get_level()<105 then
                    say
("Dein Level ist zu niedrig..")
                    
say("Mindestlevel: 105")
                    return
                
end
                
return
            
end 
            pc
.warp(900100)
        
end
    end
end 
Die Console zeigt mir folgenden Fehler an. "localhost# cannot find quest index for teleportationsring
Assertion failed: (!"cannot find quest index"), function LoadStateScript, file questnpc.cpp, line 99."
01/15/2014 08:50 Mijago#9545
Gib der Quest mal einen anderen Namen( das zwischen Quest und begin), Compilere die dann erneut, evtl funktioniert das schon.
Nebenbei, du wirst bei dir immer auf die 90er Map geportet (Logik Fehler)
Tipp : select Rückgabe mit if prüfen
01/15/2014 12:51 xFliege#9546
PHP Code:
quest shops begin 
    state start begin 
        when 20300.chat 
or 20320.chat or 20340.chat."Körper FBs" begin 
            say_title
("Körper-Kampf Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(18
            else 
                return 
            
end 
        end 
        when 20301.chat 
or 20321.chat or 20341.chat."Mental FBs" begin 
            say_title
("Mental-Kampf Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(19
            else 
                return 
            
end 
        end 
        when 20302.chat 
or 20322.chat or 20342.chat."Nahkampf FBs" begin 
            say_title
("Nahkampf Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(20
            else 
                return 
            
end 
        end 
        when 20303.chat 
or 20323.chat or 20343.chat."Fernkampf FBs" begin 
            say_title
("Fernkampf Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(21
            else 
                return 
            
end 
        end 
        when 20304.chat 
or 20324.chat or 20344.chat."Magische Waffen FBs" begin 
            say_title
("Magische-Waffen Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(22
            else 
                return 
            
end 
        end 
        when 20305.chat 
or 20325.chat or 20345.chat."Schwarze Magie FBs" begin 
            say_title
("Schwarze-Magie Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(23
            else 
                return 
            
end 
        end 
        when 20306.chat 
or 20326.chat or 20346.chat."Drachenmacht FBs" begin 
            say_title
("Drachenmacht Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(24
            else 
                return 
            
end 
        end 
        when 20307.chat 
or 20327.chat or 20347.chat."Heilung FBs" begin 
            say_title
("Heilungs Lehrer:"
            
say(""
            
say("Möchtest du den FB-Shop öffnen?"
            
local s select("Ja""Nein"
            if 
== 1 then 
                npc
.open_shop(25
            else 
                return 
            
end 
        end 
    end 
end 
Es geht nur bei dem letzten NPC der eingeschrieben ist.....
01/15/2014 13:56 K.A.K.A.S.H.I#9547
Kann mir bitte jemand die Quest auf Fehler Prüfen und fertig stellen :o

Code:
quest userpanel begin
	state start begin
		when 70036.use begin
		addimage ( - 100 , - 70 , "004.tga" )
			say_title("Userpanel ~ Amaterasu-Revolution")
			say("")
			say_blue2("Wähle aus, was du machen möchtest.")
			local todo = select("Lager öffnen", "Itemshop-Lager öffnen", "Endlevel", "Yangsteine", "Rangpunkte", "Abbrechen")
			if todo == 1 then
				game.open_safebox()

			elseif todo == 2 then
				game.open_mall() 

			elseif todo == 3 then
				if pc.get_level() < 1 then
				addimage ( - 100 , - 70 , "004.tga" )
				say("Dein Level ist zu niedrig")
				else
 		           	say_reward("Du bist nun Level 250") 
 		           	while pc.get_level() < 250 do 
 		           	local a = pc.get_next_exp() 
 		           	pc.give_exp2(a) 
	              	end 
			end

			elseif todo == 4 then
				if pc.get_level() < 1 then
				addimage ( - 100 , - 70 , "004.tga" )
				say("Dein Level ist zu niedrig")
				else
 		           	say_reward("Du hast 200x Yangstein bekommen") 
		              pc.give_item2(50513, 200)
	              	end 
			end

			elseif todo == 5 then
				if pc.get_level() < 1 then
				addimage ( - 100 , - 70 , "004.tga" )
				say("Dein Level ist zu niedrig")
				else
 		           	say_reward("Du hast den Rang bekommen") 
				pc.change_alignment(20000)
	              	end 
			end

			elseif todo == 6 then
				return
			end
		end
	end
end
01/15/2014 15:11 flampy1#9548
hallo

PHP Code:
quest cash begin
    state start begin
         when letter begin
         send_letter
("Level kaufen")
         
end
         when info 
or button begin
            local ep 
pc.get_next_exp()
            if 
pc.get_money() >= 50000000 then
                say_title
("Level kaufen")
                
say("")
                
say("Du kannst dir jetzt ein Level up")
                
say("Kaufen weil wegen Yang.")
                
say("")
                
say_reward("Möchtest du ein Level kaufen?")
                
local a select("Jap""Nein")
                if 
== 2 then
                    
return
                else
                    
pc.change_money(-50000000)
                    
pc.give_exp2(999999999)
                
end
            end
        end
    end
end 
kann man das mit den exp weglassen und gleich ein lvl up machen ?
01/15/2014 15:19 .SonY#9549
hi
i make /qc
and got an error in vb
quest:
PHP Code:
quest anti_rodar begin
    state start begin
        when 71084.
use == truebegin
            say_title
(""Equipa"")
            
say("Lembre-se não use bot de rodar!")
            
say("Lorem ipsum dolor sit amet,")
            
say("consectetur adipiscing elit.")
            
say("Sed fringilla nisl a enim egestas")
            
say("eu suscipit erat blandit.")
            
wait()
            
say_title(""Equipa"")
            
say("Isto é uma simples prevenção contra o uso")
            
say("")
            
say("Cumprimentos,")
            
say("A equipa")
        
end
    end
end 

error:
[Only registered and activated users can see links. Click Here To Register...]

anyone know how to solve this?
thx
01/15/2014 15:45 .Inya#9550
PHP Code:
quest anti_rodar begin
    state start begin
        when 71084.
use begin
            say_title
("Equipa")
            
say("Lembre-se não use bot de rodar!")
            
say("Lorem ipsum dolor sit amet,")
            
say("consectetur adipiscing elit.")
            
say("Sed fringilla nisl a enim egestas")
            
say("eu suscipit erat blandit.")
            
wait()
            
say_title("Equipa")
            
say("Isto é uma simples prevenção contra o uso")
            
say("")
            
say("Cumprimentos,")
            
say("A equipa")
        
end
    end
end 
01/15/2014 15:51 .SonY#9551
Quote:
Originally Posted by .InyaProduction View Post
PHP Code:
quest anti_rodar begin
    state start begin
        when 71084.
use begin
            say_title
("Equipa")
            
say("Lembre-se não use bot de rodar!")
            
say("Lorem ipsum dolor sit amet,")
            
say("consectetur adipiscing elit.")
            
say("Sed fringilla nisl a enim egestas")
            
say("eu suscipit erat blandit.")
            
wait()
            
say_title("Equipa")
            
say("Isto é uma simples prevenção contra o uso")
            
say("")
            
say("Cumprimentos,")
            
say("A equipa")
        
end
    end
end 
I already tried
but 71084 has "type = 3" I neet to confirming with "true" if not this does not have any effect
01/15/2014 20:01 .yorliK#9552
Quote:
Originally Posted by xFliege View Post

Es geht nur bei dem letzten NPC der eingeschrieben ist.....
Ich hab grad wenig Zeit aber versuch doch mal hinter jedem chat die Auwahl zu schreiben z.b. when 20307.chat."Heilung FBs" or 20327.chat."Heilung FBs" or 20347.chat."Heilung FBs" begin
Is nur ne Idee, gucks mir morgen genauer an..
__________________________________________________ _________

Quote:
Originally Posted by .SonY View Post
I already tried
but 71084 has "type = 3" I neet to confirming with "true" if not this does not have any effect
Go in Navicat and change type to 18 ? Maybe this will work ?
01/15/2014 23:25 moldhenr#9553
Guten Abend, das Problem liegt da, dass der Server komplett andere Koordinaten nimmt. Hat einer ne Idee?
01/16/2014 13:38 .yorliK#9554
Quote:
Originally Posted by moldhenr View Post
Guten Abend, das Problem liegt da, dass der Server komplett andere Koordinaten nimmt. Hat einer ne Idee?
Du musst bei jedem Warp 2-mal die 0 eintragen. z.B. 0240, 16640 ---> 024000,1664000 denke ich jetzt mal^^
01/16/2014 15:12 moldhenr#9555
Quote:
Originally Posted by Kilroy. View Post
Du musst bei jedem Warp 2-mal die 0 eintragen. z.B. 0240, 16640 ---> 024000,1664000 denke ich jetzt mal^^
Hab ich schon ausprobiert, leider hilft das auch nicht. Die Sache ist ja auch, dass er mich immer zu der gleichen Position tpt, egal was ich anklicke, sogar wenn ich auf abbrechen geklickt hab. :(