Eintausch Quest über NPC

09/15/2011 10:25 ~LuckyStrike~#1
Ja ich habe es zwar vorhin in die Questkontrolle gepostet
aber das dauert jahre bis da jemand mal reinschaut
und den Fehler sieht darum hier nochmal ...

Ja ich wollte gerade eine eintauschquest schreiben für Server 1 ..
allerdings hab ich nun 148 Zeilen umsonst geschrieben wie es aussieht....

PHP Code:
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 
== 1 then
                
if pc.count_item(61009) >= 1 then
                    pc
.remove_item(610091)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end                    
            
elseif == 2 then
                
or if pc.count_item(61019) >= 1 then
                    pc
.remove_item(610191)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end                    
            
elseif == 3 then
                
if pc.count_item(61029) >= 1 then
                    pc
.remove_item(610291)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 4 then
                
if pc.count_item(61039) >= 1 then
                    pc
.remove_item(610391)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                else
                    
wait()
                
end
            end
            local v 
select ("Titanklinge+9""Zin-Stab+9""Eisflügelbogen+9""Nexusdolch+9""Zin-Glocke+9""Dämonentöter+9""Abbrechen")
            if 
== 1 then
                
if pc.count_item(339)
                    
pc.remove_item(3391)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 2 then
                
if pc.count_item(7269) >= 1 then
                    pc
.remove_item(72691)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end                    
            
elseif == 3 then
                
if pc.count_item(5209) >= 1 then
                    pc
.remove_item(52091)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 4 then
                
if pc.count_item(4079) >= 1 then
                    pc
.remove_item(40791)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 5 then
                
if pc.count_item(5189) >= 1 then
                    pc
.remove_item(51891)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 6 then
                
if pc.count_item(7299) >= 1 then
                    pc
.remove_item(72991)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                else
                    return
                
end
            end
        end
    end
end 
Hoffe jemand kann mir dabei helfen ...
beim Reload via Putty dumped der Core nicht
sondern läd unendlich und hört nicht auf bzw
er bleibt einfach stehen.

Wenn ich es bis zum ersten if v == 1 mache
dann funktioniert noch alles ... aber ab if v == 2
das genaue Problem liegt an der v == 2
if pc.count_item(xxx) >= 1 lösche ich den befehl
geht die quest lasse ich den befehl geht sie nicht
fängt er dann an stehen zu bleiben .. >_<
09/15/2011 10:41 lfcmaus#2
liegt daran das deine if bedingungen nicht beendet werdet
du hast nen form fehler drinnen
in einer mehrauswahl local müsstest du wenn du mit if arbeitest jedes if mit einen end beenden oder du setzt ab if v == 2then ein elseif v == 2then usw
also so.:

PHP Code:
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 
== 1 then
                
if pc.count_item(61009) >= 1 then
                    pc
.remove_item(610091)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end                    
            
elseif == 2 then
                
if pc.count_item(61019)
                    
pc.remove_item(610191)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end                    
            
elseif == 3 then
                
if pc.count_item(61029)
                    
pc.remove_item(610291)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end
            
elseif == 4 then
                
if pc.count_item(61039)
                    
pc.remove_item(610391)
                    
pc.give_item2(800111)
                    
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
                    
wait()
                
end
            end
            local v 
select ("Titanklinge+9""Zin-Stab+9""Eisflügelbogen+9""Nexusdolch+9""Zin-Glocke+9""Dämonentöter+9""Abbrechen")
            if 
== 1 then
                
if pc.count_item(339)
                    
pc.remove_item(3391)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end
            
elseif == 2 then
                
if pc.count_item(7269)
                    
pc.remove_item(72691)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end                    
            
elseif == 3 then
                
if pc.count_item(5209)
                    
pc.remove_item(52091)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end
            
elseif == 4 then
                
if pc.count_item(4079)
                    
pc.remove_item(40791)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end
            
elseif == 5 then
                
if pc.count_item(5189)
                    
pc.remove_item(51891)
                    
pc.give_item2(800111)
                    
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
                    
hier ne ausgfabe wenn item nicht vorhanden
                end
            
elseif == 6 then
                
if pc.count_item(7299)
                    
pc.remove_item(72991)
                    
pc.give_item2(800111)
                    
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
            end
        end
    end
end 
09/15/2011 10:44 ~LuckyStrike~#3
Okay habe sie nochmal etwas abgeändert also >.< ...

PHP Code:
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 
== 1 then
                
if pc.count_item(61009) >= 1 then
                    pc
.remove_item(610091)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end                    
            
elseif == 2 then
                
or if pc.count_item(61019) >= 1 then
                    pc
.remove_item(610191)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end                    
            
elseif == 3 then
                
if pc.count_item(61029) >= 1 then
                    pc
.remove_item(610291)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 4 then
                
if pc.count_item(61039) >= 1 then
                    pc
.remove_item(610391)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                else
                    
wait()
                
end
            end
            local v 
select ("Titanklinge+9""Zin-Stab+9""Eisflügelbogen+9""Nexusdolch+9""Zin-Glocke+9""Dämonentöter+9""Abbrechen")
            if 
== 1 then
                
if pc.count_item(339)
                    
pc.remove_item(3391)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 2 then
                
if pc.count_item(7269) >= 1 then
                    pc
.remove_item(72691)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end                    
            
elseif == 3 then
                
if pc.count_item(5209) >= 1 then
                    pc
.remove_item(52091)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 4 then
                
if pc.count_item(4079) >= 1 then
                    pc
.remove_item(40791)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 5 then
                
if pc.count_item(5189) >= 1 then
                    pc
.remove_item(51891)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                
end
            
elseif == 6 then
                
if pc.count_item(7299) >= 1 then
                    pc
.remove_item(72991)
                    
pc.give_item2(800111)
                    
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
                
say("Du besitzt dieses item nicht.")
                
say("Komme wieder wenn du einen besitzt")
                
say("und vergolde meine Edle Zeit nicht!")
                
say("")
                
say("")
                    return
                else
                    return
                
end
            end
        end
    end
end 
Funkt trotzdem nicht
09/15/2011 14:49 3jfx#4
Wie wärs mal mit Fehlermeldungen?

Zeile 203: if
Zeile 213: else
Zeile 220: else
Zeile 222: end

das erste was mir aufgefallen ist.


edit: außerdem viel zu viel code. wenn du einmal siehst, dass ein und der der selbe aufbau mehrmals vorkommt, sich jedoch nur in ein paar variablen unterscheidet, hast du grundlegend was falsch gemacht ;) denn das ist einfach schlecht ;)