[RELEASE]Eintauschquest

09/16/2011 15:14 ~LuckyStrike~#1
Da ich neu dabei bin im Sachen Quests schreiben,
möchte ich euch meine erste selbstgeschriebene Quest
vorstellen.

Sollte sich alles von selbst erklären.
Die Quest funktioniert zu 100% ist auch getestet worden von mir.
Ein kleines dankeschön gilt auch an lfcmaus der mir
bei der if abfrage geholfen hatte da ich einen kleinen
leichtsinnsfehler hatte und ab v == 2 anstatt elseif
auch ein if hatte aber naja wie gesagt ist meine erste.
Values könnt ihr mit etwas Grips selbst austauschen.

PHP Code:
##############################################
##    COPYRIGHT by ~LuckyStrike~             ##
##            FinalMT2 - Insanaty            ##
##############################################
quest tausch begin
    state start begin
        when 9007.chat
."Eintauschen" begin 
            say_title
("Eintauschen")
            
say("Hallo lieber user von FinalMT2!")
            
say("Ich bin Taeng-Zin-Tao,")
            
say("Ich tausche bestimmte Waffen und Rüstungen")
            
say("Gegen Yang ein die du nicht gebrauchen kannst.")
            
say("Falls du etwas hast bitte ich dich darum es bei")
            
say("mir einzutauschen und das wenn möglich zügig...")
            
say("Viele meiner Freunde behaupten ich sei ein Spinner,")
            
say("weil ich mich mit Relikten und Antiquitäten")
            
say("beschäftige aber ein wahrer Mann steht zu seinen")
            
say("vorlieben. Wenn du nun was eintschauen möchtest....,")
                
wait()
            
say("Ich habe noch ein paar Dinge zu erledigen")
            
say("deswegen Entscheide dich bitte schnell.")
            
say("Du kannst desöfteren zu mir um deine Sachen")
            
say("einzutauschen denn das würde mich sehr freuen,")
            
say("da ich ein sehr erfreuter Antiquitäten Händler bin.")
            
say("")
            
say("")
            
say("")
            
say("")
                
wait()
            
say("Also was möchtest du eintauschen ?")
            
local v = select ("Smaragdpanzer+9", "Smaragdanzug+9", "Smaragdrüstung+9", "Smaragdkleidung+9", "Weiter")
            if 
v == 1 then
                
if pc.count_item(61009) >= 1 then
                    pc
.remove_item(61009, 1)
                    
pc.give_item2(80011, 1)
                    
say("Ich freue mich das wir ein Geschäft")
                    
say("machen konnten. Lass dich mal wieder")
                    
say("bei mir blicken falls du etwas")
                    
say("eintauschen möchtest gegen barres")
                    
say("")
                    
say("")
                    
say_reward("Smaragdbarren erhalten")
                else
                    return
                
end                    
            
elseif v == 2 then
                
if pc.count_item(61019) >= 1 then
                    pc
.remove_item(61019, 1)
                    
pc.give_item2(80011, 1)
                    
say("Ich freue mich das wir ein Geschäft")
                    
say("machen konnten. Lass dich mal wieder")
                    
say("bei mir blicken falls du etwas")
                    
say("eintauschen möchtest gegen barres")
                    
say("")
                    
say("")
                    
say_reward("Smaragdbarren erhalten")
                else
                    return
                
end                    
            
elseif v == 3 then
                
if pc.count_item(61029) >= 1 then
                    pc
.remove_item(61029, 1)
                    
pc.give_item2(80011, 1)
                    
say("Ich freue mich das wir ein Geschäft")
                    
say("machen konnten. Lass dich mal wieder")
                    
say("bei mir blicken falls du etwas")
                    
say("eintauschen möchtest gegen barres")
                    
say("")
                    
say("")
                    
say_reward("Smaragdbarren erhalten")
                else
                    return
                
end
            
elseif v == 4 then
                
if pc.count_item(61039) >= 1 then
                    pc
.remove_item(61039, 1)
                    
pc.give_item2(80011, 1)
                    
say("Ich freue mich das wir ein Geschäft")
                    
say("machen konnten. Lass dich mal wieder")
                    
say("bei mir blicken falls du etwas")
                    
say("eintauschen möchtest gegen barres")
                    
say("")
                    
say("")
                    
say_reward("Smaragdbarren erhalten")
                else
                    return
                
end
            
elseif v == 5 then
                local a 
= select ("Titanklinge+9", "Zin-Stab+9", "Eisflügelbogen+9", "Nexusdolch+9", "Zin-Glocke+9", "Dämonentöter+9", "Abbrechen")
                if 
a == 1 then
                    
if pc.count_item(339) >= 1 then
                        pc
.remove_item(339, 1)
                        
pc.give_item2(80011, 1)
                        
say("Ich freue mich das wir ein Geschäft")
                        
say("machen konnten. Lass dich mal wieder")
                        
say("bei mir blicken falls du etwas")
                        
say("eintauschen möchtest gegen barres")
                        
say("")
                        
say("")
                        
say_reward("Smaragdbarren erhalten")
                    else
                        return
                    
end
                
elseif a == 2 then
                    
if pc.count_item(7269) >= 1 then
                        pc
.remove_item(7269, 1)
                        
pc.give_item2(80011, 1)
                        
say("Ich freue mich das wir ein Geschäft")
                        
say("machen konnten. Lass dich mal wieder")
                        
say("bei mir blicken falls du etwas")
                        
say("eintauschen möchtest gegen barres")
                        
say("")
                        
say("")
                        
say_reward("Smaragdbarren erhalten")
                    else
                        return
                    
end                    
                
elseif a == 3 then
                    
if pc.count_item(5209) >= 1 then
                        pc
.remove_item(5209, 1)
                        
pc.give_item2(80011, 1)
                        
say("Ich freue mich das wir ein Geschäft")
                        
say("machen konnten. Lass dich mal wieder")
                        
say("bei mir blicken falls du etwas")
                        
say("eintauschen möchtest gegen barres")
                        
say("")
                        
say("")
                        
say_reward("Smaragdbarren erhalten")
                    else
                        return
                    
end
                
elseif a == 4 then
                    
if pc.count_item(4079) >= 1 then
                        pc
.remove_item(4079, 1)
                        
pc.give_item2(80011, 1)
                        
say("Ich freue mich das wir ein Geschäft")
                        
say("machen konnten. Lass dich mal wieder")
                        
say("bei mir blicken falls du etwas")
                        
say("eintauschen möchtest gegen barres")
                        
say("")
                        
say("")
                        
say_reward("Smaragdbarren erhalten")
                    else
                        return
                    
end
                
elseif a == 5 then
                    
if pc.count_item(5189) >= 1 then
                        pc
.remove_item(5189, 1)
                        
pc.give_item2(80011, 1)
                        
say("Ich freue mich das wir ein Geschäft")
                        
say("machen konnten. Lass dich mal wieder")
                        
say("bei mir blicken falls du etwas")
                        
say("eintauschen möchtest gegen barres")
                        
say("")
                        
say("")
                        
say_reward("Smaragdbarren erhalten")
                    else
                        return
                    
end
                
elseif a == 6 then
                    
if pc.count_item(7299) >= 1 then
                        pc
.remove_item(7299, 1)
                        
pc.give_item2(80011, 1)
                        
say("Ich freue mich das wir ein Geschäft")
                        
say("machen konnten. Lass dich mal wieder")
                        
say("bei mir blicken falls du etwas")
                        
say("eintauschen möchtest gegen barres")
                        
say("")
                        
say("")
                        
say_reward("Smaragdbarren erhalten")
                    else
                        return
                    
end
                
elseif a == 7 then
                    
return
                
end
            end
        end
    end
end 
Regardz - Lucky.
09/16/2011 15:16 NaOiZ#2
Nicht schlecht und dann als Anfänger gleich sone QUest zu schreiben Nice Arbeit weiter so :)!
09/16/2011 15:17 ~LuckyStrike~#3
Ich habe nur die kurze version hier publiziert die volle möchte
ich für final behalten :)
09/16/2011 15:18 NaOiZ#4
is verständlich :)
09/16/2011 15:24 D'Arti#5
Hat Final nicht genauso eine Quest ?
Aber halt nur mit king-rüssis Oo
09/16/2011 15:28 ~LuckyStrike~#6
Quote:
Originally Posted by YaKuZo' View Post
Hat Final nicht genauso eine Quest ?
Aber halt nur mit king-rüssis Oo
Nöpe die ist ganz anders aufgebaut und ein
when xxx.use then bla bla aber der aufbau
ist komplett anders
09/16/2011 15:30 Lord Avo​#7
Danke :)
09/16/2011 15:56 Whit3W0lf#8
schaut wirkl nice aus verwende ich vllt :D danke
09/16/2011 16:14 .Alessa#9
@LuckyStrike:
Du meinst wohl when xxx.use begin bla bla :D

Für die erste Quest nicht schlecht^^ Wenn du weiter übst und schwierigere Quests aufsetzt, wirst du auch sehr schnell den Rest vom gängigen Questschreiben lernen. Ist eine gute Methode, sich gleich an die schweren Sachen zu machen.
09/16/2011 16:15 ~LuckyStrike~#10
Ja sry stimmt begin :'P
Bin etwas verwirrt ...
da die vollversionquest ca 400 - 420 zeilen besitzt
und mich das seit gestern f*** und fertig gemacht hat :)
09/16/2011 16:19 lfcmaus#11
hm also ich hätt es net public gemacht,aber deine sache^^
viel erfolg weiterhin
09/16/2011 16:19 .Alessa#12
Kann ich gut verstehen... Hatte mal ne Quest mit ca 900 Zeilen.. Finde da mal einen Fehler Oo Aber ich habe zu Anfangszeiten auch manchmal when blabla then gemacht.. xD
09/16/2011 16:20 ~LuckyStrike~#13
Quote:
Originally Posted by lfcmaus View Post
hm also ich hätt es net public gemacht,aber deine sache^^
viel erfolg weiterhin
Naja ist sowieso die ziemlich geschnittene Version.
Und ich mein, ich geb der Community nur eine Chance
wenn es Flamereien gibt oder sonst was mein gott
dann wars das auch für mich für die Com.

@Alessa
habe ich dich mit meinem blabla angesteckt :'D ?
09/16/2011 16:31 lfcmaus#14
blablabla und das und so und etc sind kult
09/16/2011 16:53 ~LuckyStrike~#15
PHP Code:
quest blabla begin
    when blabla
.use "then" --- xD
      local v 
= select ("bla", "bla bla", "bla bla bla", "abbrechen" )
       if 
v == 1 then
          say
("bla")
        
end
       
elseif v == 2 then
          say
("bla bla")
        
end
       
elseif v == 3 then
          say
("bla bla bla")
        
end
      
elseif v == 4 then
           
return
        
end
     end
   end
end 
Haha =)