[SERVICE] Die Questkontrolle

Ganz am Ende ein end zu wenig ;)

Quote:

Originally Posted by .Delta Ganz am Ende ein end zu wenig ;)

Oh Lol ein Anfänger Fehler xD

Danke dir :D

Sry nochmal ne Frage geht immer noch ned nun kommt

syntax error: [string "start"]:58: `then´ expected near `pc´
warpquest7.quest:80:Error occured on compile warpquest7.quest

n paar mal 'then' noch gefehlt, ich hoffe ich habe keine übersehen.

Nun Funktionierts danke dir :)

Error occured on compile t*öteorks.quest


quest töteorks begin
state start begin
when letter or levelup with pc.get_level() >= 40 begin
send_letter("Töte 100 Orks")
end
when button or info begin
say("Hey, "..pc.get_name()..'.')
say("Ich bins Joshi kannst du bitte 100 Ork's töten ?")
say("Dafür erhälst du ein special Item")
say_reward("Du musst noch "..(100-pc.getqf('killed')).." Orks töten.")
end
-- Alle Orks
when kill with npc.get_race() >= 601 and npc.get_race() <= 657 begin
pc.setqf("killed",pc.getqf('killed')+1)
if pc.getqf('killed') == 100 then
say("Du hast die Quest erfolgreich abgeschlossen!")
if pc.get_job() == 3 then
pc.give_item2(299,1)
else
pc.give_item2(909,1)
end
set_state("ende")
end
end
end
state ende begin
when enter begin
pc.delqf("killed")
end
end
end






geht nicht ://

VBox sagt:
qc in malloc(): error: allocation failed
Error occured on compile gmankuendigung.quest



VBox:

bitte danke! :D

Probier es mal damit. Dir hat in der 3. Zeile ein "begin" gefehlt.

Quote:

Originally Posted by Sp0ngeb0b ist cool woher habt ihr die ganzen nicht vorhandenen funktionen? :facepalm: -pc.get_name --> pc.get_name() -pc.get_level -->pc.get_level() -pc.getf() --> pc.getqf() (qetf für dungeons; selbe gilt für pc.setqf) -level_up --> levelup -pc.give_item --> pc.give_item2 etc.

...habt wohl immernoch nicht daraus gelernt
wer lesen kann ist klar im Vorteil ;)

Quote:

Originally Posted by Jakomo' PHP Code: quest gmankuendigung begin     state start begin         when 70001.use with pc.is_gm() begin             say_title("Ankuendigungen")             say("Du möchtest dich also Anmelden")             say("oder Abmelden, soso..")             say("")             say("Dann sag mir was du willst")             local s=select("Anmelden", "Abmelden", "Abbrechen")             if s==3 then                 return             end             if s==1 then                 notice_all(""..pc.get_name.." steht nun für eure Fragen zur Verfügung.")                 notice_all("Bitte beachtet das ein GM keine User anschreibt,")                 notice_all("das müsst ihr selbst machen")             end             if s==2 then                 notice_all(""..pc.get_name.." meldet sich nun ab!")                 notice_all("Viel Spaß noch auf Shiraka2!")             end         end     end end  Probier es mal damit. Dir hat in der 3. Zeile ein "begin" gefehlt.

omg das ist peinlich >.< xD naja danke funzt!

@Spongebob:
doch, nur ich vergess das noch zu oft :/

die rüssi quest brauch ich jetzt noch :/

Hier deine Rüssi quest, hab ma nur nach den ends geschaut, also ka ob noch was anderes Fail ist aber paar ends waren schon fail :D

kann sie nicht einmal mehr hochladen=l Hab sie nochmal strukturierter rein gemacht und die 2te auch =l

Quote:

Originally Posted by Fear *_* Hier deine Rüssi quest, hab ma nur nach den ends geschaut, also ka ob noch was anderes Fail ist aber paar ends waren schon fail :D Code: quest neue_ruessi begin state start begin when login or levelup with pc.get_level() >= 90 begin send_letter("Neue Ruestungen") end when button or info begin say_title("Neue Ruestungen") say("Du möchtest also eine neue Ruestung haben..") say("Ich kann dir eine besorgen, aber") say("Du wirst viel fuer mich tun muessen.") say("") say("Als erstes toete 5 Metin Jeon-Un") pc.setqf("metin", 5) end when 8027.kill with pc.get_level() >= 90 begin pc.setqf("metin", pc.getqf("metin") - 1) if pc.getqf("metin") == 0 then say_title("Gut!") say("Jetzt musst du laufen...") say("Gehe ins Experten AD und toete") say("den Affen-Lord 5 mal!") pc.setqf("Affen-Lord", 5) end end when 5163.kill with pc.get_level() >= 90 begin pc.setqf("Affen-Lord", pc.getqf("Affen-Lord") - 1) if pc.getqf("Affen-Lord") == 0 then say_title("Super Arbeit!") say("Du denkst, du hast es nun geschafft,") say("nicht wahr?") say("...") say("Da muss ich dich leider enttaeuschen!") say("Bringe mir noch eine") say("Goldene Siegerurkunde!") end if pc.count_item(50040) >= 1 then say_title("Wow!") say("Du hast echt Talent.") say("Nun muss ich dir wohl deine Belohnung geben..") say("Aber vergiss nicht, diese Rüstung ist sehr") say("wertvoll, also verschwende sie nicht!") pc.give_item2(11299, 1) pc.change_money(20000000) notice_all(""..pc.get_name().." hat die neue Ruestung erhalten!") set_state("ende") end end end state("ende") begin end end

darauf hin sagt die vbox:

state("ende") begin

Was soll das denn :)

Grüße, Mira :)

danke, aber kommt immernoch der gleiche fehler :D

Quote:

Originally Posted by Azemi6 PHP Code: quest Userpanel begin     state start begin     when 60002.use begin         say_title("BS2-Userpanel")                  when info or button with pc.is_gm() begin             say("Willkommen im Ingame Userpanel")             local x = select("Lager Öffnen", "Reichsporter", "Teaminformation", "Schließen" )             if x == 1 then                 game.open_safebox()                 setskin(NOWINDOW)             elseif x == 2 then                 say ( "Reichsteleporter" )                 local s = select ( "In das Shinsoo Reich teleportieren" , "In das Chunjo Reich teleportieren" , "In das Jinno Reich teleportieren" , "Abbrechen" )                  if s == 1 then                     say ( "Du wirst nun in das Shinsoo Reich teleportiert!" )                     wait()                     pc.warp ( 469300 , 964200 )                 elseif s == 2 then                     say ( "Du wirst nun in das Chunjo Reich teleportiert!" )                     wait()                     pc.warp ( 55700 , 157900 )                  elseif s == 3 then                     say ( "Du wirst nun in das Jinno Reich teleportiert!" )                     wait()                     pc.warp ( 969600 , 278400 )                  elseif s == 4 then                     return                 end             elseif x == 3 then                  say( "Teaminformationen" )                 local a = select ( "Game Team", "Board Team", "Schließen" )                 if a == 1 then                     say ( "Hier findet ihr die Liste aller Teamler (Ingame)" )                     say ( "" )                     say ( "Server Admins:" )                     say ( "[SA]Kedoja" )                     say ( "[SA]KroNe" )                     say ( "" )                     say ( "Servertechniker:" )                     say ( "[ST]*Kein*'" )                     say ( "" )                     say ( "Super Gamemaster:" )                     say ( "[SGM]*Kein*" )                     say ( "" )                     say ( "Gamemaster:" )                     say ( "[GM]*Kein*" )                     say ( "" )                     say ( "Test Gamemaster:" )                     say ( "[TGM]*Kein*" )                 elseif a == 2 then                     say ( "Hier findet ihr die Liste aller Teamler (Forum)" )                     say ( "" )                     say ( "Board Admin:" )                     say ( "[BA]*Kein*" )                     say ( "" )                     say ( "Super Moderator:" )                     say ( "[SMOD]*Kein*" )                     say ( "" )                     say ( "Moderator:" )                     say ( "[MOD]*Kein*" )                 elseif a == 3 then                     return                 end             elseif x == 4 then                 return             end         end     end end  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         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_master_skill.BuildMasterSkillList(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(50513) != 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 'Trainieren' ein!")         local s=input()         if s!="Trainieren" 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_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 BuildMasterSkillList(job, group)         MASTER_SKILL_LEVEL = 20         GRAND_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 >= MASTER_SKILL_LEVEL and skill_level < GRAND_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

Kann mir da einer helfen was falsch sein kann bei den 2 quest oben??
Wenn ich das item anklicke kommt nur der titten z.B. User Panel oder Meister
und dann kommt darunter ein Balken zum Ok klicken