quest - dobrze napisany?

[Mychuś]

Cześć, napisałem dziś mojego pierwszego questa, proszę o sprawdzenie i wskazanie mi błędów..

 

				   state start begin
						    when login or lebelup with pc.get_level(=5
											 set_state(info)
	  end
  end   
state info begin
								    when letter begin
												    local v = find_npc_by_vnum(xxx)
												    if v !=0 then
																    target.vid("__TARGET__", v, "Nazwa Npc")		  
												    end
												    send_letter("Zielarstwo")
when button or info begin
												    say_title("Zielarstwo")
												    say("Udaj się do biologa")
												    say("Ma on dla ciebie misje")
when_TARGET_.target.click or
												    2011.chat."Podejdz bliżej, mam dla ciebie misje" begin	  
												    target.delete(_TARGET_")			 
say("Musisz mi pomóc")
												    say("Idz i zdobądz je dla mnie")
												    say("Ostatnio widziałem jak mają je czarne orki")
												    set_state(zdobadz kwiat)
												    local s = select ("Tak" , "Nie")
										    if s == 2 then
														    say_title("Biolog:")
														    say("No trudno, dozobaczenia.")
														    set_state(__COMPLETE__)
										    elseif s == 1 then
														    say_title("Swietnie!")
														    say("świetnie!")
														    say("No ruszaj już!")
														    set_state(krol)
	    end
				  end
 end
state kolejne_state begin
											  when letter begin
					    send_letter("zdobądz kwiat")
    end
				  when button or info begin
								  say("zdobądz kwiat")
				  end

								  when 100.kill with pc.countitem(xxx)==0 begin
				    local random = math.random(1)
				    if random == 1 then
				    pc.give_item2(xxx, 1)
				    say("zdobyłeś kwiat! Przynieś go Biologowi")
				  local v = find_npc_vnum(xxx)
				  if v != 0 then  
						  target.vid("_TARGET_", v, "Biolog")
				  end 
 end
   end
when 20016.chat."Udało Ci się!" with pc.countitem(xxx)>0 begin
target.delete("__TARGET__")
								    say_title("Świetnie! Udało Ci się zdobyć kwiat")
								    say("Dzięki tobie, teraz będę mógł zbadać ten kwiat.")
								    say_reward("Oto twoja nagroda:")
									    pc.remove_item(xxx, 1)
											  pc.give+_item2(YYY) 
			    set_state(_COMPLETE_)
			    end
	  end
								    state __COMPLETE__  begin
		    end
end

[Gamus]

http://www.mpcforum.pl/topic/223876-pisanie-poprawa-questw/