[DUVIDA] erro na quest

[rafaelxte2 38]

Olá boas cyber estou a desenvolver uma quest mas sempre que rodo me da erro alguem pode pfv me indicar onde estou a errar a quest?

segue codigo vou especificar a area que me da erro comentando o codigo 

Spoiler

quest drop_diario begin
    state start begin
        when 20008.chat."GM: Diário Honorável Aluno" with pc.get_gm_level()== 5 begin
            say_title("Baek Go:")
            say("")
            say("Olá, "..pc.name.."!")
            say("Você gostaria de ativar o Drop Diário Honorável Aluno?")
            say("")
            local s = select( "Iniciar", "Finalizar", "Fechar" )
            if s == 1 then
                notice_all("O Drop do Diário Honorável Aluno foi iniciado!")
                command("e drop_diario 1")
            elseif s == 2 then
                notice_all("O Drop do Diário Honorável Aluno infelizmente terminou!")
                command("e drop_diario 0")
            elseif s == 3 then
                return
            end
        end	
		--------------------- ERRO COMEÇA AQUI------------------------------------------------------------------
        when 20008.chat."Troca Premiada" with game.get_event_flag("drop_diario") > 0 and pc.level >= 30 begin
			say_title("Okio:")
			say("Eu finalmente consegui descobrir o segredo")
			say("de habilidade celestial de produção de Baús Misteriosos.")
			say("HAHAHA")
			say("Provavelmente eu me tornarei o Mestre")
			say("dos Baús Misteriosos do Reino.")
			say("Agora eu não preciso mais me preucupar")
			say("Ficarei muito rico... HAHAHA")
			say("Para isso, preciso dos ingredientes mais raros.")
			say("Gostaria de tentar?")
            say_reward("Precisa de 50 Diário do Honorável Aluno")
			local s == select ("Sim eu quero", "Não quero") == 1 then
				
				if pc.count_item(70036) =< 50 then
				say("Olá "..pc.name.." Volte a dropar preguiçoso!")
				return
				say("Que bom que optou por trocar pequeno gafanhoto!")
				say("Está aquis eu Baú Misterioso")
				pc.give_item2(50033, 1)
				pc.remove_item(70036, 1)
				notice_all("O jogador "..pc.name" acabou de ganhar 1 Baú Misterioso do emo do Okio")
				end
			elseif == 2 then
				say("Ok fi do cão pode ir embora")
				return
			end
        end	
		------------------------------------------ ATÉ AQUI-------------------------------------------------	
		when 2061.kill or 2062.kill or 2063.kill or 2064.kill or 2065.kill or 2131.kill or 2132.kill or 2133.kill or 2134.kill or 2135.kill or 2401.kill or 2402.kill or 2403.kill or 2404.kill or 3001.kill or 3002.kill or 3003.kill or 3004.kill or 3101.kill or 3102.kill or 3103.kill or 3104.kill or 3105.kill or 3201.kill or 3202.kill or 3203.kill or 3204.kill or 3205.kill or 3301.kill or 3302.kill or 3303.kill or 3304.kill or 3305.kill or 3401.kill or 3402.kill or 3403.kill or 3404.kill or 3405.kill or 3501.kill or 3502.kill or 3503.kill or 3504.kill or 3505.kill or 3551.kill or 3552.kill or 3553.kill or 3554.kill or 3555.kill or 3601.kill or 3602.kill or 3603.kill or 3604.kill or 3605.kill or 3701.kill or 3702.kill or 3703.kill or 3704.kill or 3705.kill or 3801.kill or 3802.kill or 3803.kill or 3804.kill or 3805.kill with game.get_event_flag("drop_diario") > 0 and pc.level >= 30 begin
					local s = number(1, 2)
					if s == 1 then
					pc.give_item2(70036, 1) 
					syschat("Junte 50 e leve até o Okio.") 
				end
			end
		end
	end
-- end	

 

 

['PACI 2,317]

			local s ==* select ("Sim eu quero", "Não quero") == 1 then**
				
				if pc.count_item(70036) =<*** 50 then
				say("Olá "..pc.name.." Volte a dropar preguiçoso!")
				return
				say****("Que bom que optou por trocar pequeno gafanhoto!")
				say("Está aquis eu Baú Misterioso")
				pc.give_item2(50033, 1)
				pc.remove_item(70036, 1)
				notice_all("O jogador "..pc.name******" acabou de ganhar 1 Baú Misterioso do emo do Okio")
				end
			elseif***** == 2 then
				say("Ok fi do cão pode ir embora")
				return
			end

 

Esses são os teus erros:
* A declaração de variáveis faz-se apenas com um único símbolo de igualdade (local s = x);
** Estás a tentar que à variável s lhe seja atribuído um valor mas para além disso tentas, ao mesmo tempo, executar a condição;
***  A simbologia que queres atribuir aí é: <= (menor ou igual);
**** Abres um if e não o fechas;

***** Não estás a comparar nada aqui;

****** Faltam dois pontos antes de fechar com a aspa: "..pc.name.."

[rafaelxte2 38]

Então boas pacificador tentei

 

como ficou 

Spoiler

		--------------------- ERRO COMEÇA AQUI------------------------------------------------------------------
        when 20008.chat."Troca Premiada" with game.get_event_flag("drop_diario") > 0 and pc.level >= 30 begin
			say_title("Okio:")
			say("Eu finalmente consegui descobrir o segredo")
			say("de habilidade celestial de produção de Baús Misteriosos.")
			say("HAHAHA")
			say("Provavelmente eu me tornarei o Mestre")
			say("dos Baús Misteriosos do Reino.")
			say("Agora eu não preciso mais me preucupar")
			say("Ficarei muito rico... HAHAHA")
			say("Para isso, preciso dos ingredientes mais raros.")
			say("Gostaria de tentar?")
            say_reward("Precisa de 50 Diário do Honorável Aluno")
			local s = select ("Sim eu quero", "Não quero")
			
				if s == 1 then
					if pc.count_item(70036) <= 49 then
						say("Olá "..pc.name.." Volte a dropar preguiçoso!")
						return
					end
				say("Que bom que optou por trocar pequeno gafanhoto!")
				say("Está aquis eu Baú Misterioso")
				pc.give_item2(50033, 1)
				pc.remove_item(70036, 50)
				notice_all("O jogador "..pc.name.." acabou de ganhar 1 Baú Misterioso do emo do Okio")
				end
			end
        end	
		------------------------------------------ ATÉ AQUI-------------------------------------------------

 

 agora me da o erro  ---> WHEN  : 20008.chat ("Troca Premiada")        with game . get_event_flag ( "drop_diario" ) > 0 and pc . level >= 30       drop_diario.lua:49:expecting 'state'

[.ukitobi 42]

Tens um end a mais.