Estará bien esta quest?

Thesignal

Buenas, el otro día un amigo me pidió si podía hacerle una quest, pero la verdad yo nunca me metí mucho en ese tema y no recuerdo muy bien la estructura que lleva..alguien que sepa hacer quest me podría decir si esta bien por favor?

quest Bola begin
	state start begin
		when 20092.chat."Bola Bendicion" begin
		say_title("Bola Bendicion")
		say("Yo puedo darte las bolas bendicion")
		say("Realmente quieres?")
		local q = select ( "Si" , "No" )
			if q == "1" then
			say("Cuantas deseas?")
			local d = select ( "1" , "5" , "10" )
		elseif d == "1" then
			say("Aqui tienes")
			pc . give_item2 ( 70024 , 1)
			end
		elseif d == "2" then
			say("Aqui tienes")
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			end
		elseif d == "3" then
			say("Aqui tienes")
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			pc . give_item2 ( 70024 , 1)
			end
		elseif q == "2" then
			say("Vuelve cuando quieras")
			end
		end
	end
end

Saludos.

Edito: Creo que si ahí un problema en los end, pero aun no encuentro cual es.