[SERVICE] Die Questerstellung

03/06/2016 21:49 Ðαrkbøζζ#3406
Hey Leute :-)
Würde gerne meine Jagdquests so modifizieren das ich
beispielsweise die Level 10er Jagdquest erst bekomme, wenn die Level 5er abgeschlossen ist.

Kann mir jemand den Befehl dazu sagen? Sofern es den gibt^^
03/06/2016 22:13 rollback#3407
Quote:
Originally Posted by Ðαrkbøζζ View Post
Hey Leute :-)
Würde gerne meine Jagdquests so modifizieren das ich
beispielsweise die Level 10er Jagdquest erst bekomme, wenn die Level 5er abgeschlossen ist.

Kann mir jemand den Befehl dazu sagen? Sofern es den gibt^^
Kommt drauf an wie du sie aufbaust.
03/06/2016 22:20 Ðαrkbøζζ#3408
Beispiel:
PHP Code:
quest jagd2 begin
    state start begin
        when login 
or levelup with pc.get_level() >= 3 begin
            set_state
(info1)
        
end
    end
    state info1 begin
        when letter begin
            send_letter
("Jagd Teil 2")
        
end
        when button 
or info begin
            say
("Hallo "..pc.get_name().." hier kannst")
            
say("du auswaehlen ob du lieber 20 Hungrige")
            
say("Wildhunde oder 10 Hungrige Woelfe toeten")
            
say("moechtest")
            
say("")
            
say("Waehle klug")
            
local a select("20 Hungrige Wildhunde""10 Hungrige Woelfe")
                if 
== 1 then
                    say
("Du willst also lieber 20 Hungrige Wildhunde")
                    
say("toeten als 10 Hungrige Woelfe und auch diese Belohnung")
                    
say("erhalten")
                    
say_reward("Toete 20 Hungrige Wildhunde")
                    
say("")
                    
pc.setqf("state1"0)
                    
q.set_counter("count1"20)
                    
set_state(Wildhund)
                else
                    
say("Du willst also lieber 10 Hungrige Woelfe")
                    
say("toeten als 20 Hungrige Wildhunde und auch")
                    
say("diese Belohnung erhalten")
                    
say_reward("Toete 10 Hungrige Woelfe")
                    
say("")
                    
pc.setqf("state1"0)
                    
q.set_counter("count2"10)
                    
set_state(Wolf)
                
end
        end
    end
    state Wildhund begin
        when letter begin
            send_letter
("Jagd Teil 2")
        
end
    
        when info 
or button begin
            say_title
("Wie viele noch?")
            
say("Hier erfaehrst du wie viele Monster du noch toeten musst")
            
say("")
            
say_reward("Du hast schon "..pc.getqf("state1").." von 20 Hungrige Wildhunden getoetet!")
        
end
        when 171.kill begin
            local count1 
pc.getqf("state1") + 1
            
if count1 <= 20 then
                pc
.setqf("state1"count1)
                
q.set_counter("Hungriger Wildhund"count1)
            
end
            
if count1 == 20 then
                set_state
(fertig)
            
end
        end
    end
    state Wolf begin
        when letter begin
            send_letter
("Jagd Teil 2")
        
end
    
        when info 
or button begin
            say_title
("Wie viele noch?")
            
say("Hier erfaehrst du wie viele Monster du noch toeten musst")
            
say("")
            
say_reward("Du hast schon "..pc.getqf("count2").." von 10 Hungrigen Woelfen getoetet!")
        
end
        when 172.kill begin
            local count2 
pc.getqf("state2") + 1
            
if count2 <= 10 then
                pc
.setqf("state2"count2)
                
q.set_counter("Hungriger Woelfe"count2)
            
end
            
if count2 == 10 then
                set_state
(fertig)
            
end
        end
    end
    state fertig begin
        when letter begin
            send_letter
("Fertig!")
        
end
        when button 
or info begin
            say_title
("Glueckwunsch")
            
say("Du hast die Quest erfolgreich abgeschlossen!")
            
say("Du erhaelst:")
            
say_reward("60 Erfahrungspunkte")
            
say_reward("Ausserdem: Einen Schild+6")
            
pc.give_item2(130061)
            
pc.give_exp2(60)
            
set_state(__complete)
            
clear_letter()
        
end
    end
    state __complete begin
    end
end 
Ach und bei der Quest wird wenn man fiecher gekillt hat und dann auf die Mission klickt nicht angezeigt wie viele man gekillt hat. Da steht einfach immernoch 0 :-(
03/08/2016 00:32 .ERDLING.#3409
Kann mir jemand folgende Quests schreiben?


03/10/2016 02:22 .ERDLING.#3410
Ich bräuchte 2 Quests.

Nr. 1
Die Lehre sollte nicht bei den Lehrern gemacht werden, sondern mit Lv. 55 als normale Quest.

Nr. 2
Regenbogenstein, bei dem du aussuchen kannst, ob du einen Skill auf M10 G10 oder P haben möchtest.
Der Skill ist ab 1 mit dem Regi Skillbar.
Jedoch sollten nur einzelne Skills aufgerufen werden.
Der Regenbogenstein, sollte nicht verschwinden.
03/10/2016 18:17 Drαεth#3411
Bräuchte eine Quest wo man bei bestimmten Leveln einen Boni bekommt.
z.B von Level 125 bis 135 verschiedene Bonis je Level
03/10/2016 22:28 123snake123#3412
Hi Suche jemand der mir bei einer Questerstellung hilft, pn me pls
03/11/2016 01:06 Jantux#3413
Quote:
Originally Posted by .ERDLING. View Post
Kann mir jemand folgende Quests schreiben?



Bin mir nicht sicher ob es funktioniert sollte aber eig..

PHP Code:
quest geheime begin
    state start begin
        when kill with npc
.is_pc() and npc.get_empire() == 1 begin -- Hier soll passierendass diese Quest aktiviert wirdwenn der getötete Spieler im Roten reich ist. ---
            
local count pc.getqf("count") + 1
            
if count 35 then
                pc
.setqf("count"count)
            else
                
pc.delqf("count")
                
pc.give_item2(xxxxxx)
                
notice_all (pc.get_name().." hat eine geheime Quest gelöst") --- Die Quest soll nur 1x möglich sein Keine Wiederholung )
                
clear_letter()
                
set_state(__COMPLETE__)
        
end
    end
    state __COMPLETE__ begin    
    end
end 
03/12/2016 11:58 SexStatus#3414
Hey EpvP

Ich bräuchte 2 Quests da ich keine Ahnung vom Questen habe,
bitte ich einen von euch mal mein Anliegen anzuschauen.



Für die Bonis und Items einfach Platzhalter oder Vnum 19 eintragen.

Hey vielen danke bewundere eure Arbeit.

Hier mal das Video damit man sich besser einen hineinversetzen kann.


SexStatus
03/12/2016 15:56 gerald500#3415
Quote:
Originally Posted by SexStatus View Post
Hey EpvP

Ich bräuchte 2 Quests da ich keine Ahnung vom Questen habe,
bitte ich einen von euch mal mein Anliegen anzuschauen.



Für die Bonis und Items einfach Platzhalter oder Vnum 19 eintragen.

Hey vielen danke bewundere eure Arbeit.

Hier mal das Video damit man sich besser einen hineinversetzen kann.


SexStatus
Code:
quest party begin
	state start begin

		when NPCVNUM.chat."Täglicher Buff" begin
			say("Soll ich dir deinen täglichen Buff geben ?")
			if select("Ja","Nein") == 2 then return end
			affect.add_collect(BONUS,ANZAHL,60*60)
		end
		
		when Weltboss1.Kill or Weltboss2.Kill or Weltboss3.Kill or Weltboss4.Kill or Weltboss5.Kill with party.is_party() begin
			if party.getf("weltbosse") == 0 then
				party.setf("weltbosse",1)
				party.setf("weltbosse_time",get_time()+60*60)
			end
			if party.getf("weltbosse_time") < get_time() then
				party.chat("Leider habt ihr die Weltbosse nicht innerhalb von einer Stunde töten können!")
				party.setf("weltbosse",0)
				party.setf("weltbosse_time",0)
			end
			party.setf("weltbosse",party.getf("weltbosse")+1)
			if party.getf("weltbosse") >= 5 then
				party.setf("weltbosse",0)
				party.setf("weltbosse_time",0)
				party.party_belohnung()
			end
		end
		
		function party_belohnung()
			local belohnung = {19,1}
			local pids = {party.get_member_pids()} 
			for i,v in ipairs(pids) do
				local other = pc.select(v)
				pc.give_item2(belohnung[1],belohnung[2])
				pc.select(other)
			end
		end
		
	end
end
bin mir nicht sicher aber es könnte so funktionieren ^^

habs ganz schnell geschrieben
03/12/2016 17:44 SexStatus#3416
Quote:
Code:
quest party begin
state start begin

when NPCVNUM.chat."Täglicher Buff" begin
say("Soll ich dir deinen täglichen Buff geben ?")
if select("Ja","Nein") == 2 then return end
affect.add_collect(BONUS,ANZAHL,60*60)
end

when Weltboss1.Kill or Weltboss2.Kill or Weltboss3.Kill or Weltboss4.Kill or Weltboss5.Kill with party.is_party() begin
if party.getf("weltbosse") == 0 then
party.setf("weltbosse",1)
party.setf("weltbosse_time",get_time()+60*60)
end
if party.getf("weltbosse_time") < get_time() then
party.chat("Leider habt ihr die Weltbosse nicht innerhalb von einer Stunde töten können!")
party.setf("weltbosse",0)
party.setf("weltbosse_time",0)
end
party.setf("weltbosse",party.getf("weltbosse")+1)
if party.getf("weltbosse") >= 5 then
party.setf("weltbosse",0)
party.setf("weltbosse_time",0)
party.party_belohnung()
end
end

function party_belohnung()
local belohnung = {19,1}
local pids = {party.get_member_pids()}
for i,v in ipairs(pids) do
local other = pc.select(v)
pc.give_item2(belohnung[1],belohnung[2])
pc.select(other)
end
end

end
endbin mir nicht sicher aber es könnte so funktionieren ^^

habs ganz schnell geschrieben

Hey die Quest klappt,

nur ist im Tages Buff keine Zeitbegrenzung man soll ihn ja nur 1x am Tag für 1 Stunde bekommen

Zum Gruppenkill, die werden irgendwie nicht gezählt, habe es mit , mehreren Vnums getestet

Sysrr
03/12/2016 21:02 gerald500#3417
Quote:
Originally Posted by SexStatus View Post
Hey die Quest klappt,

nur ist im Tages Buff keine Zeitbegrenzung man soll ihn ja nur 1x am Tag für 1 Stunde bekommen

Zum Gruppenkill, die werden irgendwie nicht gezählt, habe es mit , mehreren Vnums getestet

Sysrr
Code:
quest party begin
	state start begin

		when NPCVNUM.chat."Täglicher Buff" begin
			if pc.getqf("bufftime") >= get_time() then say("Du hast dir heute bereits deinen täglichen Buff abgeholt") return end
			say("Soll ich dir deinen täglichen Buff geben ?")
			if select("Ja","Nein") == 2 then return end
			affect.add_collect(BONUS,ANZAHL,60*60)
			pc.setqf("bufftime",get_time()+60*60*24)
		end
		
		when Weltboss1.Kill or Weltboss2.Kill or Weltboss3.Kill or Weltboss4.Kill or Weltboss5.Kill begin
			if not party.is_party() then return end
			if party.getf("weltbosse") == 0 then
				party.setf("weltbosse",1)
				party.setf("weltbosse_time",get_time()+60*60)
			end
			if party.getf("weltbosse_time") < get_time() then
				party.chat("Leider habt ihr die Weltbosse nicht innerhalb von einer Stunde töten können!")
				party.setf("weltbosse",0)
				party.setf("weltbosse_time",0)
			end
			party.setf("weltbosse",party.getf("weltbosse")+1)
			if party.getf("weltbosse") >= 5 then
				party.setf("weltbosse",0)
				party.setf("weltbosse_time",0)
				party.party_belohnung()
			end
		end
		
		function party_belohnung()
			local belohnung = {19,1}
			local pids = {party.get_member_pids()} 
			for i,v in ipairs(pids) do
				local other = pc.select(v)
				pc.give_item2(belohnung[1],belohnung[2])
				pc.select(other)
			end
		end
		
	end
end
versuchs mal so
03/12/2016 21:52 SexStatus#3418
Quote:
Originally Posted by gerald500 View Post
Code:
quest party begin
	state start begin

		when NPCVNUM.chat."Täglicher Buff" begin
			if pc.getqf("bufftime") >= get_time() then say("Du hast dir heute bereits deinen täglichen Buff abgeholt") return end
			say("Soll ich dir deinen täglichen Buff geben ?")
			if select("Ja","Nein") == 2 then return end
			affect.add_collect(BONUS,ANZAHL,60*60)
			pc.setqf("bufftime",get_time()+60*60*24)
		end
		
		when Weltboss1.Kill or Weltboss2.Kill or Weltboss3.Kill or Weltboss4.Kill or Weltboss5.Kill begin
			if not party.is_party() then return end
			if party.getf("weltbosse") == 0 then
				party.setf("weltbosse",1)
				party.setf("weltbosse_time",get_time()+60*60)
			end
			if party.getf("weltbosse_time") < get_time() then
				party.chat("Leider habt ihr die Weltbosse nicht innerhalb von einer Stunde töten können!")
				party.setf("weltbosse",0)
				party.setf("weltbosse_time",0)
			end
			party.setf("weltbosse",party.getf("weltbosse")+1)
			if party.getf("weltbosse") >= 5 then
				party.setf("weltbosse",0)
				party.setf("weltbosse_time",0)
				party.party_belohnung()
			end
		end
		
		function party_belohnung()
			local belohnung = {19,1}
			local pids = {party.get_member_pids()} 
			for i,v in ipairs(pids) do
				local other = pc.select(v)
				pc.give_item2(belohnung[1],belohnung[2])
				pc.select(other)
			end
		end
		
	end
end
versuchs mal so
Danke, der buff funktioniert jetzt.

Beim Gruppen killen, habe ich wie zuvor das die kills nicht gezählt werden.

Sysrr:

PHP Code:
Mar 12 21:41:59 :: CQuestManager::Kill QUEST_KILL_EVENT (pc=1npc=7201pc2=0)
SYSERRMar 12 21:41:59 :: RunStateLUA_ERROR: [string "party"]:1attempt to call field `is_party' (a nil value)
SYSERR: Mar 12 21:41:59 :: WriteRunningStateToSyserr: LUA_ERROR: quest party.start letter 
03/13/2016 20:26 gerald500#3419
Quote:
Originally Posted by SexStatus View Post
Danke, der buff funktioniert jetzt.

Beim Gruppen killen, habe ich wie zuvor das die kills nicht gezählt werden.

Sysrr:

PHP Code:
Mar 12 21:41:59 :: CQuestManager::Kill QUEST_KILL_EVENT (pc=1npc=7201pc2=0)
SYSERRMar 12 21:41:59 :: RunStateLUA_ERROR: [string "party"]:1attempt to call field `is_party' (a nil value)
SYSERR: Mar 12 21:41:59 :: WriteRunningStateToSyserr: LUA_ERROR: quest party.start letter 
sieht irgendwie so aus als ob du die party.is_party funktion nicht hast warum auch immer lol
03/14/2016 15:13 .Kyroja#3420
Heyho,

Könnte mir einer eine Quest erstellen , dass im Duell die Pots verboten sind ? Also nur die rote

Mit freundlichen Grüßen