[SERVICE] Die Questerstellung

Page 47 of 248 « First 374546 47 48495797147 Last »
10/11/2013 21:32 Mr. 'Avenue™#691
Quote:
Originally Posted by MrPlayboy View Post
PHP Code:
quest aresleepless begin
    state start begin
        when npcvnum.chat."WUnschlevel setzen" begin
            say_title("NPCNAME:")
            say("Auf welches Level möchtest du gesetzt werden?")
            local a=input()
            if tonumber(a)==false then
                say_title("NPCNAME:")
                say("Bitte nur Zahlen!")
            else
                pc.set_level(a)
                say_title("NPCNAME:")
                say("Du bist nun Level "..pc.get_level().."")
            end
        end
    end
end 
Und in die Questlib kommt:

PHP Code:
function pc.set_level(x)
    while pc.get_level() ~= x do
        pc.give_exp2(pc.get_next_exp())
    end
end 
Die 2. mach ich gleich
Ehm, das ist meine Funktion, hättest wenigstens dazu schreiben können ;o

Zudem kann man die Quest kürzer schreiben.

Quest:
Code:
quest wunschlevel begin
	state start begin
		when NPCVNUM.chat."Wunschlevel setzen" begin
			say_title(mob_name(npc.get_race())..":")
			say("Auf welches Level möchtest du gesetzt werden?")
			say_reward("Beachte aber, dass du dein Level nicht senken kannst")
			local a = tonumber(input())
			pc.set_level(a)
			say_title(mob_name(npc.get_race())..":")
			say("Du bist nun Level "..pc.get_level())
		end
	end
end

Funktion:
Code:
function pc.set_level(x) 
    if x <= pc.get_level() then 
        return FALSE
    else 
        while pc.get_level() ~= x do 
            pc.give_exp2(pc.get_next_exp()) 
        end 
    end 
end
10/11/2013 22:32 .ProjektX²#692
Quote:
Originally Posted by Mr. 'Avenue™ View Post
Ehm, das ist meine Funktion, hättest wenigstens dazu schreiben können ;o

Zudem kann man die Quest kürzer schreiben.

Quest:
Code:
quest wunschlevel begin
	state start begin
		when NPCVNUM.chat."Wunschlevel setzen" begin
			say_title(mob_name(npc.get_race())..":")
			say("Auf welches Level möchtest du gesetzt werden?")
			say_reward("Beachte aber, dass du dein Level nicht senken kannst")
			local a = tonumber(input())
			pc.set_level(a)
			say_title(mob_name(npc.get_race())..":")
			say("Du bist nun Level "..pc.get_level())
		end
	end
end

Funktion:
Code:
function pc.set_level(x) 
    if x <= pc.get_level() then 
        return FALSE
    else 
        while pc.get_level() ~= x do 
            pc.give_exp2(pc.get_next_exp()) 
        end 
    end 
end
Du regst dich jetzt nicht ernsthaft ueber so ne mikrige Funktion auf. :rtfm:
10/11/2013 23:39 makralovag#693
HELP!

Code:
quest javito begin
	state start begin
		function attr_list ( bonus )
            local attr = {
                [1] = "Max. TP",
                [2] = "Max. MP",
                [3] = "Vitalität",
                [4] = "Intelligenz",
                [5] = "Stärke",
                [6] = "Beweglichkeit",
                [7] = "Angriffsgeschwindigkeit",
                [8] = "Bewegungsgeschw.",
                [9] = "Zaubergeschwindigkeit",
                [10] = "TP-Regeneration",
                [11] = "MP-Regeneration",
                [12] = "Vergiftungschance ",
                [13] = "Ohnmachtschance ",
                [14] = "Verlangsamungschance ",
                [15] = "Chance auf krit. Treffer +",
                [16] = "Chance auf durchbohrenden Treffer",
                [17] = "Stark gegen Halbmenschen +",
                [18] = "Stark gegen Tiere +",
                [19] = "Stark gegen Orks +",
                [20] = "Stark gegen Esoterische +",
                [21] = "Stark gegen Untote +",
                [22] = "Stark gegen Teufel +",
                [23] = "Schaden wird von TP absorbiert",
                [24] = "Schaden wird von MP absorbiert",
                [25] = "Chance auf Manaraub",
                [27] = "Chance, Nahkampf-Angriff abzublocken ",
                [28] = "Chance, Pfeilangriff auszuweichen",
                [29] = "Schwertverteidigung ",
                [30] = "Zweihänderverteidigung ",
                [31] = "Dolchverteidigung ",
                [32] = "Glockenverteidigung ",
                [33] = "Fächerverteidigung ",
                [34] = "Pfeilwiderstand ",
                [35] = "Feuerwiderstand ",
                [36] = "Blitzwiderstand ",
                [37] = "Magiewiderstand ",
                [38] = "Windwiderstand ",
                [39] = "Chance, Nahkampftreffer zu reflektieren",
                [40] = "Giftwiderstand",
                [41] = "Chance, MP wiederherzustellen",
                [42] = "Chance auf EXP-Bonus",
                [43] = "Chance, eine doppelte Menge Yang fallen zu lassen.",
                [44] = "Chance, eine doppelte Menge von Gegenständen fallen zu lassen.",
                [45] = "Chance, TP wiederherzustellen",
                [46] = "Abwehr gegen Ohnmacht",
                [47] = "Abwehr gegen Verlangsamen",
                [48] = "Angriffswert",
                [49] = "Stark gegen Monster",
                [50] = "Fertigkeitsschaden ",
                [51] = "Durchschn. Schaden ",
                [52] = "Widerstand gegen Fertigkeitsschaden ",
                [53] = "Durchschn. Schadenswiderstand ",
                [71] = "Fertigkeitsschaden",
                [72] = "Durchschn. Schaden",
            }
            return tostring(attr[bonus])
		end
		
		when 9011.take begin
			say_title(mob_name(9011))
			local itemid = mysql_query("SELECT vnum FROM player.item WHERE owner_id="..pc.get_account_id().." and window='SAFEBOX' and pos='0';")
			local itemid = item.get_id()
			local itemname = item.get_name()
			local bonuszok = mysql_select("SELECT attrtype0, attrvalue0, attrtype1, attrvalue1, attrtype2, attrvalue2, attrtype3, attrvalue3, attrtype4, attrvalue4, attrtype5, attrvalue5, attrtype6, attrvalue6 FROM player.item WHERE id ='"..itemid.."'")
			say_title(item.get_name())
			say("Bónuszok:")
			if tonumber(bonuszok.attrtype0[1]) > 0 then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype0[1])).." : "..bonuszok.attrvalue0[1])
            else
                say(" Üres")
            end
            if tonumber(bonuszok.attrtype1[1]) > 0 then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype1[1])).." : "..bonuszok.attrvalue1[1])
            else
                say(" Üres")
            end
            if tonumber(bonuszok.attrtype2[1]) > 0 then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype2[1])).." : "..bonuszok.attrvalue2[1])
            else
                say(" Üres")
            end
            if tonumber(bonuszok.attrtype3[1]) > 0  then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype3[1])).." : "..bonuszok.attrvalue3[1])
            else
                say(" Üres")
            end
			if tonumber(bonuszok.attrtype4[1]) > 0  then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype4[1])).." : "..bonuszok.attrvalue4[1])
            else
                say(" Üres")
            end
			if tonumber(bonuszok.attrtype5[1]) > 0  then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype5[1])).." : "..bonuszok.attrvalue5[1])
            else
                say(" Üres")
            end
			if tonumber(bonuszok.attrtype6[1]) > 0  then
                say_reward(javito.attr_list(tonumber(bonuszok.attrtype6[1])).." : "..bonuszok.attrvalue6[1])
            else
                say(" Üres")
            end
			if 1 == select("Javítás", "Mégse") then
				say_title("Javítás")
				say("")
				say("Javításhoz szükséges: "..item.get_name(70001))
				if 1 == select("Javít", "Mégse") then
				if  pc.countitem(70001) > 0 then
					local player = pc.get_account_id()
					local bon0 = bonuszok.attrvalue0[1] * 1.2
					local bon1 = bonuszok.attrvalue1[1] * 1.2
					local bon2 = bonuszok.attrvalue2[1] * 1.2
					local bon3 = bonuszok.attrvalue3[1] * 1.2
					local bon4 = bonuszok.attrvalue4[1] * 1.2
					local bon5 = bonuszok.attrvalue5[1] * 1.2
					local bon6 = bonuszok.attrvalue6[1] * 1.2
					mysql_query("UPDATE player.item SET attrvalue0='"..bon0.."', attrvalue1='"..bon1.."', attrvalue2='"..bon2.."', attrvalue3='"..bon3.."', attrvalue4='"..bon4.."', attrvalue5='"..bon5.."', attrvalue6='"..bon6.."' WHERE id = '"..itemid.."' LIMIT 1")
					say("A tárgy bónuszai javítva")
					end
				end
			end
		end
	end
end
ingame problem:

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

Thanks :)
10/12/2013 11:48 abcdosentee#694
Hey leute ich brauche eine quest bei der man ab einen bestimmten level einen text vorgesetzt bekommt auch wo man weiter blättern kann (wenn der text zulang ist) aber man kann diesen text nur einmal lesen nicht bei jedem login! danke

dann noch eine quest wo ein text kommt und man dann auf einer andern map landet aber erst nach ja/nein die quest soll solange kommen bis man auf "ja" klickt dann nicht mehr danke !!
10/12/2013 12:08 .ProjektX²#695
Quote:
Originally Posted by abcdosentee View Post
Hey leute ich brauche eine quest bei der man ab einen bestimmten level einen text vorgesetzt bekommt auch wo man weiter blättern kann (wenn der text zulang ist) aber man kann diesen text nur einmal lesen nicht bei jedem login! danke

dann noch eine quest wo ein text kommt und man dann auf einer andern map landet aber erst nach ja/nein die quest soll solange kommen bis man auf "ja" klickt dann nicht mehr danke !!
PHP Code:
quest abc1 begin
    state start begin
        when levelup with pc.get_level() == LEVEL begin -- Level eintragen
        say_title'TITEL DES TEXTES'
        say'[ENTER]Hallo Fremder...'
        say'Du bist toll...'
        say'weil..'
        wait() --danach wird ne neue seite angefangen
        say_title'TITEL DES TEXTES'
        say'[ENTER]jajaja...'
        say'blub...'
        set_state(_complete_)
        end
    end
    state _complete_ begin
    end
end 
Bei deiner 2. versteh ich leider nicht wann der Text erscheinen soll, habs mit nem levelup wieder gemacht.

PHP Code:
quest abc2 begin
    state start begin
        when letter or levelup with pc.get_level() >= LEVEL begin -- Level eintragen
            send_letter('Nimmerland TP')
        end
        when button or info begin
            say_title'TITEL DES TEXTES'
            say'[ENTER]Hallo Fremder...'
            say'Du bist toll...'
            say'weil..'
            wait() --danach wird ne neue seite angefangen
            say_title'TITEL DES TEXTES'
            say'[ENTER]jajaja...'
            say'blub...'
            say'Soll ich dich ins Nimmerland teleportieren?[ENTER]'
            if select('Ja','Nein') == 1 then
                pc.warp(X-COORDINATE*100,Y-COORDINATE*100) -- x und y coordinate eintragen
                set_state(_complete_)
            end
        end
    end
    state _complete_ begin
    end
end 
10/13/2013 15:51 AreSleepLess#696
.
10/13/2013 16:03 shinzje#697
Hallo ich bräuchte eine quest, die den spiel auf eine map portet un das es in der art eines dungeon ist das man nur sich selbst siehst.

Bitte
Shinzje
10/13/2013 20:56 holosko74#698
Hey, wollte fragen ob mir jemand eine quest geben kann wo ich eine npc klicke und mich teleportieren kann nur auf 1 map mit remove item wenns geht

Danke im vorraus
10/13/2013 22:19 .Soυzα#699
Kann mir vielleicht jemand da weiterhelfen?
Soll eine stink normale Quest sein. Mann klickt den NPC an.
Da wird dann eingezeigt "FarmMap"
Und mann kann sich dahinporten.

da ist irgendetwas fail.
PHP Code:
quest capewarp begin
    state start begin
        when 20080.use begin
            say_title("capewarp") 
            say("Wohin möchtest du Teleportiert werden?")
        local empire = pc.get_empire() 
                    local selectmap = select("Capedragonhead","Abbrechen")
            if empire == 1 then
            pc.warp(599400, 756300)
              end
           end
        end
     end
  end 
10/13/2013 22:24 .ProjektX²#700
Quote:
Originally Posted by .н¢Happy View Post
Kann mir vielleicht jemand da weiterhelfen?
Soll eine stink normale Quest sein. Mann klickt den NPC an.
Da wird dann eingezeigt "FarmMap"
Und mann kann sich dahinporten.

da ist irgendetwas fail.
PHP Code:
quest capewarp begin
    state start begin
        when 20080.use begin
            say_title("capewarp") 
            say("Wohin möchtest du Teleportiert werden?")
        local empire = pc.get_empire() 
                    local selectmap = select("Capedragonhead","Abbrechen")
            if empire == 1 then
            pc.warp(599400, 756300)
              end
           end
        end
     end
  end 
Du verwendest die Variable selectmap nie.
Und wenn du nicht im Reich "1" bist, wirst du auch nicht teleportiert.

Sag mir wie du es haben willst! :)
10/13/2013 22:36 .Soυzα#701
Also ich habe in map1 ein NPC stehen.
Da soll ein Fenster teleport aufgehen.
Und da steht halt "name"
und abbrechen daunter
wenn mann drauf klickt auf "name" wird man in die Map teleportiert kordis kann ich ja anpassen.
10/14/2013 00:24 Red Firestar#702
Ich suche eine Fun Quest es gibt ja eine Quest mit der man alle Npc´s töten kann jetzt möchte ich bloß das man nicht die Npc´s tötet sondern alle User/Member außer sich selbst wäre nett wenn jemand sie schreiben könnte und hier rein posten und man sollte sie nur 1x benutzten können damit sie sofort nach Benutzung verschwindet und die Npc´s sollen auch wieder erscheinen und das nach 10 sec.
10/14/2013 08:27 .Inya#703
Quote:
Originally Posted by .KifferKönigsKobra View Post
Ich suche eine Fun Quest es gibt ja eine Quest mit der man alle Npc´s töten kann jetzt möchte ich bloß das man nicht die Npc´s tötet sondern alle User/Member außer sich selbst wäre nett wenn jemand sie schreiben könnte und hier rein posten und man sollte sie nur 1x benutzten können damit sie sofort nach Benutzung verschwindet und die Npc´s sollen auch wieder erscheinen und das nach 10 sec.
Es gibt leider keinen Quest Befehl um Spieler zu töten meines wissens nach :o
10/14/2013 10:22 .ProjektX²#704
Quote:
Originally Posted by .н¢Happy View Post
Also ich habe in map1 ein NPC stehen.
Da soll ein Fenster teleport aufgehen.
Und da steht halt "name"
und abbrechen daunter
wenn mann drauf klickt auf "name" wird man in die Map teleportiert kordis kann ich ja anpassen.
PHP Code:
quest teleportmap1 begin
    state start begin
        when xxx.chat.'Teleport' begin --npcvnum
            say_title'Teleport:'
            say'[ENTER]Moechtest du dich teleportieren?[ENTER]'
            if select('NameDerMap','Abbrechen') == 1 then
                pc.warp(x,y) --coords
            end
        end
    end
end 

Quote:
Originally Posted by .н¢InyaProduction View Post
Es gibt leider keinen Quest Befehl um Spieler zu töten meines wissens nach :o
Klingt nach einer Aufgabe! :D
Ich kann mich leider erst in ~2 Tagen ransetzen, fals sie bis dahin niemand geloest hat, probier ich mein Glueck.
10/14/2013 13:56 Mijago#705
Wenn man in einem dungeon ist, kann man den Spieler töten
Ansonsten mit normalen befehlen nicht
Page 47 of 248 « First 374546 47 48495797147 Last »