[SERVICE] Die Questkontrolle

Page 361 of 845

361

04/08/2012 22:38 hr4rjuku#5401

@Ellovo

Spoiler

Bittesch�n sollte funktionieren, wenn ich keinen Fehler gemacht hab :P

04/09/2012 02:30 XxTheStrikerxX#5402

Brauche ma hielfe hier:

Spoiler

PHP Code:


			
quest azrael_truhe begin
    state start begin
        when 50186.use begin
        say_title("Truhe des Azrael:")
        say("")
        say("Du m�chtest also die Truhe �ffnen?")
        say("Bist du dir ganz sicher?")
        say("Wenn du die Truhe �ffnest verliert,")
        say("die Truhe ihren D�monen!")
        say("")
        say_reward("Wichtig! du brauchst 1 Freie Inventar seite,")
        say_reward("sonst bekommst du nicht alle 18 Items!")
        say("")
        say_reward("M�chten sie den D�monen befreien?")
        say("")
        local dc = select("Zustimmen","Abbrechen")
            if 2 == dc then
            return
            end
            if 1 == dc then
            local r=number(1, 18) 
                if r == 1 then 
                    pc.give_item2("27992", 5) 
                    pc.give_item2("25041", 5) 
                    pc.give_item2("11298", 1) 
                    pc.give_item2("3153", 1) 
                    pc.give_item2("1123", 1)
                    pc.give_item2("14220", 1)
                    pc.give_item2("15240", 1)
                    pc.give_item2("16222", 1)
                    pc.give_item2("16208", 1)
                    pc.give_item2("12263", 1)
                    pc.give_item2("12283", 1)
                    pc.give_item2("12391", 1)
                    pc.give_item2("12403", 1)
                    pc.give_item2("13142", 1)                    
                    pc.give_item2("7154", 1)
                    pc.give_item2("12530", 1)
                    pc.give_item2("12543", 1)
                    pc.give_item2("11498", 1)
                    pc.remove_item("50186", 1)
                elseif r == 2 then 
                    pc.give_item2("27993", 5) 
                    pc.give_item2("25041", 5) 
                    pc.give_item2("11698", 1) 
                    pc.give_item2("3153", 1) 
                    pc.give_item2("1123", 1)
                    pc.give_item2("14220", 1)
                    pc.give_item2("15240", 1)
                    pc.give_item2("16222", 1)
                    pc.give_item2("16208", 1)
                    pc.give_item2("12263", 1)
                    pc.give_item2("12283", 1)
                    pc.give_item2("12391", 1)
                    pc.give_item2("12403", 1)
                    pc.give_item2("13142", 1)                    
                    pc.give_item2("7154", 1)
                    pc.give_item2("12530", 1)
                    pc.give_item2("12543", 1)
                    pc.give_item2("11898", 1)
                    pc.remove_item("50186", 1)
                    elseif r == 3 then 
                    pc.give_item2("27994", 5) 
                    pc.give_item2("25041", 5) 
                    pc.give_item2("11898", 1) 
                    pc.give_item2("3153", 1) 
                    pc.give_item2("1123", 1)
                    pc.give_item2("14220", 1)
                    pc.give_item2("15240", 1)
                    pc.give_item2("16222", 1)
                    pc.give_item2("16208", 1)
                    pc.give_item2("12263", 1)
                    pc.give_item2("12283", 1)
                    pc.give_item2("12391", 1)
                    pc.give_item2("12403", 1)
                    pc.give_item2("13142", 1)                    
                    pc.give_item2("7154", 1)
                    pc.give_item2("12530", 1)
                    pc.give_item2("12543", 1)
                    pc.give_item2("11298", 1)
                    pc.remove_item("50186", 1)
                    end
            end
end
end
end

Quest Funktionier an sich aber Truhe �ffnet sich nur Manchmal!

04/09/2012 09:04 Jakomo'#5403

PHP Code:


			
quest azrael_truhe begin

    state start begin

        when 50186.use begin

        say_title("Truhe des Azrael:")

        say("")

        say("Du m�chtest also die Truhe �ffnen?")

        say("Bist du dir ganz sicher?")

        say("Wenn du die Truhe �ffnest verliert,")

        say("die Truhe ihren D�monen!")

        say("")

        say_reward("Wichtig! du brauchst 1 Freie Inventar seite,")

        say_reward("sonst bekommst du nicht alle 18 Items!")

        say("")

        say_reward("M�chten sie den D�monen befreien?")

        say("")

        local dc = select("Zustimmen","Abbrechen")

            if 2 == dc then

            return

            elseif 1 == dc then

            local r=number(1, 3) 

                if r == 1 then 

                    pc.give_item2("27992", 5) 

                    pc.give_item2("25041", 5) 

                    pc.give_item2("11298", 1) 

                    pc.give_item2("3153", 1) 

                    pc.give_item2("1123", 1)

                    pc.give_item2("14220", 1)

                    pc.give_item2("15240", 1)

                    pc.give_item2("16222", 1)

                    pc.give_item2("16208", 1)

                    pc.give_item2("12263", 1)

                    pc.give_item2("12283", 1)

                    pc.give_item2("12391", 1)

                    pc.give_item2("12403", 1)

                    pc.give_item2("13142", 1)                    

                    pc.give_item2("7154", 1)

                    pc.give_item2("12530", 1)

                    pc.give_item2("12543", 1)

                    pc.give_item2("11498", 1)

                    pc.remove_item("50186", 1)

                elseif r == 2 then 

                    pc.give_item2("27993", 5) 

                    pc.give_item2("25041", 5) 

                    pc.give_item2("11698", 1) 

                    pc.give_item2("3153", 1) 

                    pc.give_item2("1123", 1)

                    pc.give_item2("14220", 1)

                    pc.give_item2("15240", 1)

                    pc.give_item2("16222", 1)

                    pc.give_item2("16208", 1)

                    pc.give_item2("12263", 1)

                    pc.give_item2("12283", 1)

                    pc.give_item2("12391", 1)

                    pc.give_item2("12403", 1)

                    pc.give_item2("13142", 1)                    

                    pc.give_item2("7154", 1)

                    pc.give_item2("12530", 1)

                    pc.give_item2("12543", 1)

                    pc.give_item2("11898", 1)

                    pc.remove_item("50186", 1)

                elseif r == 3 then 

                    pc.give_item2("27994", 5) 

                    pc.give_item2("25041", 5) 

                    pc.give_item2("11898", 1) 

                    pc.give_item2("3153", 1) 

                    pc.give_item2("1123", 1)

                    pc.give_item2("14220", 1)

                    pc.give_item2("15240", 1)

                    pc.give_item2("16222", 1)

                    pc.give_item2("16208", 1)

                    pc.give_item2("12263", 1)

                    pc.give_item2("12283", 1)

                    pc.give_item2("12391", 1)

                    pc.give_item2("12403", 1)

                    pc.give_item2("13142", 1)                    

                    pc.give_item2("7154", 1)

                    pc.give_item2("12530", 1)

                    pc.give_item2("12543", 1)

                    pc.give_item2("11298", 1)

                    pc.remove_item("50186", 1)

                end

            end

        end

    end

end

04/09/2012 12:37 .Iscariot#5404

Eine Frage h�tte ich auch noch: Wenn ich in einer Quest z.B. [SL]Iscariot oder [GM]sonstwas hinschreibe werden die Klammern nicht angezeigt, kann man das Porblem irgendwie l�sen?

04/09/2012 13:27 poXavincS#5405

this quest way here: quest/object/101/kill/kill.quest

PHP Code:


			
local level = pc.get_level

local randoom = math.random(1,5)



if level >= 1 and level <= 4 then

    if randoom == 1 then pc.get_gold(5000) end

    if randoom == 2 then end

    if randoom == 3 then end

    if randoom == 4 then pc.get_gold(20000) end

    if randoom == 5 then pc.get_gold(10000) end

end



--if level > 4, not give nothing

04/09/2012 14:57 127.6.6.6#5406

Hier :(

Spoiler

PHP Code:


			
quest daemon begin

            

            when levelup with pc.get_level() == 65 begin

                set state (hauptmann_talk)

            end

            state hauptmann_talk begin

                when letter begin

                local v = find_npc_by_vnum(20355)

                if v != 0 then target.vid("__TARGET__", v, "Hauptmann")

                end

                send letter("Es gab einen Anschlag")

                end

            end

            when button or info begin

                say_title("Es gab einen Anschlag")

                say("")

                say("Der Hauptmann hat dich zu ihm")

                say("rufen lassen. Das ist eine gro�e")

                say("Ehre. Der Hauptmann l�sst nur die")

                say("m�chtigsten Soldaten zu sich rufen."

                say("")

                say_reward("Begib dich zum Hauptmann")

                say("")

            end

            when __TARGET__.target.click or 20355.chat."Hauptmann" begin

                target.delete("__TARGET__")

                say_title("Hauptmann")

                say("")

                say("Nun Soldat, ich habe eine wichtige")

                say("Aufgabe f�r dich. Es gab gestern")

                say("Nacht einen Anschlag auf unsere")

                say("Hauptstadt. Unsere Spione berichteten,")

                say("dass die Befehle f�r den Anschlag")

                say("vom D�monenk�nig stammen. Er h�lt")

                say("sich im D�monenturm auf. Du sollst")

                say("uns r�chen und den D�monenk�nig")

                say("erlegen.")

                say("")

                wait()

                say("Gib Acht auf dich, in seiner")

                say("Gegenwart befinden sich viele")

                say("Soldaten, die ihm unterstellt sind.")

                say("")

                say("Ich w�nsche dir viel Gl�ck.")

                pc.setqf("kills", 1)

                q.set_counter("kills", 1)

                set state (kill)

            end

            state kill begin

                when letter begin

                    send letter("R�che uns!)

                end

            end

                when button or info begin

                    say_title("R�che uns!")

                    say_reward("T�te den D�monenk�nig.")

                    say_reward("Er befindet sich im D�monenturm.")

                end

            when 1091.kill with pc.get_level() >= 64 begin

                local count = pc.getqf("kill") -1

                if count == 0 then

                set state (ende)

                end

            end

                state ende begin

                say_title("Geschafft!")

                say("Du hast den D�monenk�nig erlegt!")

                say("Begib dich zur�ck zum Hauptmann")

                say("und berichte ihm davon!")

                local v = find_npc_by_vnum(20355)

                if v != 0 then target.vid("__TARGET2__", v, "Hauptmann2")

                end

                end

        when __TARGET2__.target.click or 20355.chat."Belohnung" begin

            target.delete("__TARGET2__")

            say_title("Gute Arbeit!")

            say("")

            say("Ich wusste doch, dass du es schaffst!")

            say("Ich werde mir deinen Namen im")

            say("Hinterkopf behalten."

            say("Ich hoffe 10 Muscheln werden dir reichen.")

            say("")

            say_reward("Du erh�lst 10 Muscheln")

            say_reward("Du erh�lst 1500 Rangpunkte")

            pc.give_item(27987, 10)

            pc.changealignment(1500)

            clear_letter()

            set_state(__COMPLETE__)

        end

        state __COMPLETE__ begin

        end

end

04/09/2012 15:40 Kriegergeist^^#5407

Tag auch,

habe mal wieder ein kleines Problem mit einer quest, diesmal habe ich sie nicht geschrieben, nur bisschen verbessert :rolleyes:

Hier erst mal die quest:

Spoiler

HTML Code:

quest piraten_event begin
	state start begin
		when 20095.chat."Das Event der Piraten" with pc.is_gm() begin
		if game.get_event_flag("piraten") == 1 then
			say_title("Das Event der Piraten")
			say("")
			say("Das Piraten Event lauft gerade.")
			say("M�chtest du es abbrechen?")
		local a = select("Ja","Nein")
		if a == 1 then
			notice_all("Das Piraten-Event musste leider abgebrochen werden!")
			notice_all("Wir hoffen es hat euch trotzdem Spa� gemacht.")
			game.set_event_flag("piraten", 0)
			game.set_event_flag("piratenwin", 1)
		elseif a == 2 then
			return
		end
		else
			say_title("Das Event der Piraten")
			say("")
			say("M�chtest du es starten? Dazu")
			say("musst du die Monster spawnen.")
			say("Die Id des Piraten ist 5001.")
		local s = select("Ja","Nein")
		if s == 1 then
			notice_all("Das Piraten-Event hat soeben begonnen")
			notice_all("Ein Team-Mitglied wird die Oase mit Piraten bespawnen")
			notice_all("Wer zuerst 200 t�tet, gewinnt das Event!")
			game.set_event_flag("piraten", 1)
			game.set_event_flag("piratenwin", 0)
			pc.warp(296713, 547969)
		elseif s == 2 then
			return
		end
		end
	end

		when login with game.get_event_flag("piraten") == 0 begin
			pc.setqf("piratenkill", 0)
		end

		when login with game.get_event_flag("piraten") == 1 begin
			notice("In der Oase findet gerade das Piraten Event statt.")
			notice("Ein Team-Mitglied wird Piraten bespawnen.")
			notice("Wer zuerst 200 t�tet, gewinnt das Event!")
		end

		when 5001.kill with game.get_event_flag("piraten") == 1 begin
			pc.setqf("piratenkill", pc.getqf("piratenkill") + 1)
			chat("Du hast bereits "..pc.getqf("piratenkill").." erledigt")
			chat("Dir fehlen noch "..200 - pc.getqf("piratenkill").." Piraten!")
		if pc.getqf("piratenkill") >= 199 and game.get_event_flag("piratenwin") == 0 then
			game.set_event_flag("piratenwin", 1)
			notice_all("Der Sieger steht fest, er hat als erstes 200 St�ck erledigt")
			notice_all("Der Sieger hei�t "..pc.name.."")
			game.set_event_flag("piraten", 0)
		else
			end
		end
	end
end

Bei ausf�hren von make wird nichts angezeigt.
Aber ingame, wen ich das monster 5001 kille, kommt keine Nachricht im chat.
Ob eine Nachricht kommt wen ich die 200 gekillt habe, wei� ich nicht :)
Habe auch schon dieses

HTML Code:

if npc.race == 5001 then

benutzt, aber da kamm auch nichts, deswegen habe ich es erst mal rausgelassen.
W�r nett wen ihr mir helfen k�nntet :handsdown:

MfG
Kriegergeist^^

04/09/2012 17:03 XxTheStrikerxX#5408

Hab hier ein Prob:

Spoiler

04/09/2012 17:30 DarkNessWorld2#5409

PHP Code:


			
quest k�rper_shop begin 

    state start begin    

        when 20300.chat or 20320.chat or 20340.chat "K�rper-Kampf Lehrer" begin 

        say_title("K�rper-Kampf Lehrer:") 

        say("") 

        say("Welchen Laden m�chtest du besuchen?") 

        say("") 

        local gm = select("Fertigkeitsb�cher","Frisuren","Abbrechen") 

            if 3 == gm then 

            return 

            elseif 1 == gm then 

            npc.open_shop(110)  

            elseif 2 == gm then 

            npc.open_shop(110)   

            end 

        end 

    end

end

kenne mich eigentlich gar nicht damit aus aber versuch ist es wert

04/09/2012 18:38 Jakomo'#5410

PHP Code:


			
quest k�rper_shop begin 

    state start begin    

        when 20300.chat or 20320.chat or 20340.chat."K�rper-Kampf Lehrer" begin 

            say_title("K�rper-Kampf Lehrer:") 

            say("") 

            say("Welchen Laden m�chtest du besuchen?") 

            say("") 

            local gm = select("Fertigkeitsb�cher","Frisuren","Abbrechen") 

            if 3 == gm then 

                return 

            elseif 1 == gm then 

                npc.open_shop(110)  

            elseif 2 == gm then 

                npc.open_shop(110)   

            end 

        end 

    end

end

04/09/2012 19:52 DarkNessWorld2#5411

gibs ein paar leute die die quest zum knacken bringen k�nnen nach dem porten
funktioniert nicht

PHP Code:


			
quest eventbossmap11 begin 

    state start begin 

        when 20088.chat."Event Boss Map" with pc.get_level() >=150 and game.get_event_flag("eventbossmap") == 0 and pc.getqf("player") == 0 begin 

            say_title("SD2-Porter:") 

            say("") 

            say("Sei gegruesst Reisender!") 

            say("Du moechstest also zur Event Boss Map") 

            say("Ich kann dich gerne hinbringen.") 

            say("") 

            say("Moechtest du zur Event Boss Map") 

            say("") 

            local s = select("Ja", "Nein") 

            if s==1 then

                say_title("SD2-Porter:") 

                say("") 

                say("Gut") 

                say("Ich wuensche dir viel Spass")

                game.set_event_flag("eventbossmap", 1)

                pc.warp(999900, 999900)

            end

            if s==2 then 

                return 

            end 

        end 

        when 2598.kill with pc.get_map_index() == 201 begin 

            notice_all(""..pc.get_name().." hat den Zombiegott besiegt!") 

            notice_all("Wir gratulieren ihm!")

            timer("first", 20)

        end

        when first.timer begin

            warp_all_to_village()

            game.set_event_flag("eventbossmap", 0)

            pc.setqf("player", 1)

            timer("twice", 86400)

        end 

        when twice.timer begin 

            pc.setqf("player", 0)

        end 

    end

end

04/09/2012 20:02 Retrograd#5412

Hallo Leute,
ich wollte fragen ob man in einer Quest auch einen Prozentsatz von MAX_HP machen kann?

Also ich meine das in folgendem Beispiel:

PHP Code:


			
affect.add_collect(apply.MAX_HP,1%,60*60*24*365*60)

Bitte um schnelle Hilfe.

04/09/2012 20:08 Azemi6#5413

Also ich versuche ein item zu machen das wie seeli ist halt einfach schon ab M1 brauchbar ist... ich nehme als item die drachenschuppe (nicht das reittier) und hab die quest von der seeli als vorlage genommen und �berall alles angepasst bzw. wo die 30 stand eine 20 gemacht.... Nun wenn ich das item anklicke mit M1 Skill passiert nix erst ab G1 wie beim normalen seeli. Kann mit jemand helfen!?

In den Objekt ordner in FileZilla hab ich auch den ordner von dem seeli kopiert bearbeitet und die quest darin auch also die .start quest....

Quote:

Originally Posted by Azemi6

Die training_master_skill.quest

Spoiler

PHP Code:

quest training_master_skill begin state start begin when 71123.use begin say_title("Meister") local seelicount = pc.count_item(71123) if pc.get_skill_group() == 0 then say("Du hast keine Fertigkeiten "..pc.get_skill_group()) return end if get_time() < pc.getqf("next_time") then -- and not is_test_server() then if pc.is_skill_book_no_delay() then say("Du hast eine Exo-Rolle Gelesen!") say("Nun kannst du einen weiteren") say("Blauen-Seelenstein lesen!") say("") wait() say_title("Meister") else say("Du hast heute Bereits einen Blauen-Seelenstein gelesen!") return end end local result = training_grandmaster_skill.BuildGrandMasterSkillList(pc.get_job(), pc.get_skill_group()) local vnum_list = result[1] local name_list = result[2] if table.getn(vnum_list) == 0 then say("Du hast keine Fertigkeiten") return end say("Fertigkeit Ausw�hlen") say("") local menu_list = {} table.foreach(name_list, function(i, name) table.insert(menu_list, name) end) table.insert(menu_list, "Abbrechen") local s=select_table(menu_list) if table.getn(menu_list) == s then return end local skill_name=name_list[s] local skill_vnum=vnum_list[s] local skill_level = pc.get_skill_level(skill_vnum) local cur_alignment = pc.get_real_alignment() local need_alignment = 1000+500*(skill_level-20) test_chat("Momentaner Rang: "..cur_alignment) test_chat("Ben�tigter Rang: "..need_alignment) local title=string.format("%s auf Meister %d lesen", skill_name, skill_level-20+1) if pc.count_item(71123) != seelicount then say("Stfu Buguser!") return end item.remove() say_title(title) say("Das lesen eines Blauen-Seelensteines") say("kostet Rangpunke.") say("") if cur_alignment<-19000+need_alignment then say_reward("Du hast zu wenig Rang!") return end if cur_alignment<0 then say_reward(string.format("Ben�tigter Rang: %d -> %d", need_alignment, need_alignment*2)) say_reward("Beim klappen des Blauen-Seelensteins wird dir") say_reward("das doppelte an Rangpunkten abgezoegn!") need_alignment=need_alignment*2 elseif cur_alignment<need_alignment then say_reward(string.format("Ben�tigter Rang: %d", need_alignment)) say_reward("Beim klappen des Blauen-Seelensteins wird dir") say_reward("das doppelte an Rangpunkten abgezoegn!") else say_reward(string.format("Ben�tigter Rang: %d", need_alignment)) end say("") local s=select("Lesen", "Abbrechen") if s==2 then return end if cur_alignment>=0 and cur_alignment<need_alignment then say_title(string.format("%s -Best�tigen", title)) say("Das Lesen eines Blauen-Seelensteines kostet Rang,") say("wenn du diesen Blauen-Seelenstein lie�t,") say("kommst du in -Rang") say("Bitte Best�tige das du diesen Blauen-Seelenstein") say("wirklich lesen m�chtest!") say("") say_reward("Best�tigen") say("") say("Bitte gebe 'Meister' ein!") local s=input() if s!="Meister" then return end end if get_time() < pc.getqf("next_time") then -- and not is_test_server() then if pc.is_skill_book_no_delay() then pc.remove_skill_book_no_delay() else say("Seelitest1") return end end pc.setqf("next_time", get_time()+time_hour_to_sec(number(8, 12))) if need_alignment>0 then if pc.learn_grand_master_skill(skill_vnum) then pc.change_alignment(-need_alignment) say_title(string.format("%s -Erfolgreich", title)) if 40 == pc.get_skill_level(skill_vnum) then say(string.format("%s Seelitest2.", skill_name)) else say(string.format("Dein Blauer-Seelenstein war Erfolgreich!", skill_name, skill_level-20+1+1)) end say("") say_reward("Erfolgreich!") say_reward(string.format("Kosten an Rang: %d ", need_alignment)) say("") else say_title(string.format("%s -Fehlgeschlagen", title)) say("Dein Blauer-Seelenstein hat nicht geklappt.") say("") say_reward("Fehlgeschlagen!") say("") pc.change_alignment(-number(need_alignment/3, need_alignment/2)) end end end function BuildGrandMasterSkillList(job, group) GRAND_MASTER_SKILL_LEVEL = 20 PERFECT_MASTER_SKILL_LEVEL = 30 local skill_list = special.active_skill_list[job+1][group] local ret_vnum_list = {} local ret_name_list = {} -- test_chat(string.format("job=%d, group=%d", job, group)) table.foreach(skill_list, function(i, skill_vnum) local skill_level = pc.get_skill_level(skill_vnum) -- test_chat(string.format("[%d]=%d", skill_vnum, skill_level)) if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then table.insert(ret_vnum_list, skill_vnum) local name=locale.GM_SKILL_NAME_DICT[skill_vnum] if name == nil then name=skill_vnum end table.insert(ret_name_list, name) end end) return {ret_vnum_list, ret_name_list} --return {ret_vnum_list, ret_name_list} end end end

Die training_master_skill.start

Spoiler

PHP Code:

say_title ( "Meister" ) local seelicount = pc . count_item ( 71123 ) if pc . get_skill_group ( ) == 0 then say ( "Du hast keine Fertigkeiten " .. pc . get_skill_group ( ) ) return end if get_time ( ) < pc . getqf ( "next_time" ) then if pc . is_skill_book_no_delay ( ) then say ( "Du hast eine Exo-Rolle Gelesen!" ) say ( "Nun kannst du einen weiteren" ) say ( "Blauen-Seelenstein lesen!" ) say ( "" ) wait ( ) say_title ( "Meister" ) else say ( "Du hast heute Bereits einen Blauen-Seelenstein gelesen!" ) return end end local result = training_grandmaster_skill . BuildGrandMasterSkillList ( pc . get_job ( ) , pc . get_skill_group ( ) ) local vnum_list = result [ 1 ] local name_list = result [ 2 ] if table . getn ( vnum_list ) == 0 then say ( "Du hast keine Fertigkeiten" ) return end say ( "Fertigkeit Ausw�hlen" ) say ( "" ) local menu_list = { } table . foreach ( name_list , function ( i , name ) table . insert ( menu_list , name ) end ) table . insert ( menu_list , "Abbrechen" ) local s = select_table ( menu_list ) if table . getn ( menu_list ) == s then return end local skill_name = name_list [ s ] local skill_vnum = vnum_list [ s ] local skill_level = pc . get_skill_level ( skill_vnum ) local cur_alignment = pc . get_real_alignment ( ) local need_alignment = 1000 + 500 * ( skill_level - 20 ) test_chat ( "Momentaner Rang: " .. cur_alignment ) test_chat ( "Ben�tigter Rang: " .. need_alignment ) local title = string . format ( "%s auf Meister %d lesen" , skill_name , skill_level - 20 + 1 ) if pc . count_item ( 71123 ) ~= seelicount then say ( "Stfu Buguser!" ) return end item . remove ( ) say_title ( title ) say ( "Das lesen eines Blauen-Seelensteines" ) say ( "kostet Rangpunke." ) say ( "" ) if cur_alignment < - 19000 + need_alignment then say_reward ( "Du hast zu wenig Rang!" ) return end if cur_alignment < 0 then say_reward ( string . format ( "Ben�tigter Rang: %d -> %d" , need_alignment , need_alignment * 2 ) ) say_reward ( "Beim klappen des Blauen-Seelensteins wird dir" ) say_reward ( "das doppelte an Rangpunkten abgezoegn!" ) need_alignment = need_alignment * 2 elseif cur_alignment < need_alignment then say_reward ( string . format ( "Ben�tigter Rang: %d" , need_alignment ) ) say_reward ( "Beim klappen des Blauen-Seelensteins wird dir" ) say_reward ( "das doppelte an Rangpunkten abgezoegn!" ) else say_reward ( string . format ( "Ben�tigter Rang: %d" , need_alignment ) ) end say ( "" ) local s = select ( "Lesen" , "Abbrechen" ) if s == 2 then return end if cur_alignment >= 0 and cur_alignment < need_alignment then say_title ( string . format ( "%s -Best�tigen" , title ) ) say ( "Das Lesen eines Blauen-Seelensteines kostet Rang," ) say ( "wenn du diesen Blauen-Seelenstein lie�t," ) say ( "kommst du in -Rang" ) say ( "Bitte Best�tige das du diesen Blauen-Seelenstein" ) say ( "wirklich lesen m�chtest!" ) say ( "" ) say_reward ( "Best�tigen" ) say ( "" ) say ( "Bitte gebe 'Meister' ein!" ) local s = input ( ) if s ~= "Meister" then return end end if get_time ( ) < pc . getqf ( "next_time" ) then if pc . is_skill_book_no_delay ( ) then pc . remove_skill_book_no_delay ( ) else say ( "Seelitest1" ) return end end pc . setqf ( "next_time" , get_time ( ) + time_hour_to_sec ( number ( 8 , 12 ) ) ) if need_alignment > 0 then if pc . learn_grand_master_skill ( skill_vnum ) then pc . change_alignment ( - need_alignment ) say_title ( string . format ( "%s -Erfolgreich" , title ) ) if 40 == pc . get_skill_level ( skill_vnum ) then say ( string . format ( "%s Seelitest2." , skill_name ) ) else say ( string . format ( "Dein Blauer-Seelenstein war Erfolgreich!" , skill_name , skill_level - 20 + 1 + 1 ) ) end say ( "" ) say_reward ( "Erfolgreich!" ) say_reward ( string . format ( "Kosten an Rang: %d " , need_alignment ) ) say ( "" ) else say_title ( string . format ( "%s -Fehlgeschlagen" , title ) ) say ( "Dein Blauer-Seelenstein hat nicht geklappt." ) say ( "" ) say_reward ( "Fehlgeschlagen!" ) say ( "" ) pc . change_alignment ( - number ( need_alignment / 3 , need_alignment / 2 ) ) end end

WIESO HILFT MIR NIEMAND?!!
Es w�rde mich echt freuen wenn mir jemand helfen w�rde!

04/09/2012 20:17 Sp0ngeb0b ist cool#5414

Quote:

Originally Posted by Retrograd

Hallo Leute,
ich wollte fragen ob man in einer Quest auch einen Prozentsatz von MAX_HP machen kann?

Also ich meine das in folgendem Beispiel:

PHP Code:

affect.add_collect(apply.MAX_HP,1%,60*60*24*365*60)

Bitte um schnelle Hilfe.

Hall�chen :D

PHP Code:


			
local max = pc.get_hp() * 0.01

affect.add_collect(apply.MAX_HP,max,60*60*24*365*60)

so w�rde ich es probieren..

an den rest der hilfe brauch: ich helf euch nicht :p

04/09/2012 20:43 127.6.6.6#5415

Fehlermeldung: " expected 'state' "

PHP Code:

Page 361 of 845

361