version=2
@storage.clear
:if:<register.registered(grottofix<level.filename>)>=False
	@register.unregister(grottoitem<level.filename>,int)
	@register.unregister(grottohidden<level.filename>)
	@register.unregister(grottopokemon<level.filename>,int)
	@register.unregister(grottoshiny<level.filename>,str)
	@register.unregister(grottoactive<level.filename>,str)
	@register.unregister(grottolevel<level.filename>,int)
	@register.unregister(grottoempty<level.filename>)
	@register.register(grottofix<level.filename>)
:endif

:if:<register.registered(grottoempty<level.filename>)>=True
	@entity.remove(1)
	@npc.remove(0)
	@screen.fadein
:end
:endif

:if:<register.registered(grottoactive<level.filename>)>=False
	@script.start(hiddengrotto\getlists\<level.filename>)
	@storage.set(integer,random,<system.random(1,10)>)
	:if:<storage.get(integer,random)><7 <and> <storage.get(integer,random)>>0
		:if:<storage.get(integer,random)><3 <and> <storage.get(integer,random)>>0
			@storage.set(string,itemtype,visible)
		:else
			@storage.set(string,itemtype,hidden)
			@entity.setvisible(0,0)
		:endif
		@script.start(hiddengrotto\<storage.get(string,itemtype)>lists\<storage.get(string,grottoitem<storage.get(string,itemtype)>)>)
	:else
		@storage.set(integer,random2,<system.random(1,40)>)
		:if:<storage.get(integer,random2)><20 <and> <storage.get(integer,random2)>>0
			@register.register(grottopokemon<level.filename>,int,<storage.get(integer,grottopokemon4)>)
		:endif
		:if:<storage.get(integer,random2)><32 <and> <storage.get(integer,random2)>>19
			@register.register(grottopokemon<level.filename>,int,<storage.get(integer,grottopokemon3)>)
		:endif
		:if:<storage.get(integer,random2)><40 <and> <storage.get(integer,random2)>>31
			@register.register(grottopokemon<level.filename>,int,<storage.get(integer,grottopokemon2)>)
		:endif
		:if:<storage.get(integer,random2)><41 <and> <storage.get(integer,random2)>>39
			@register.register(grottopokemon<level.filename>,int,<storage.get(integer,grottopokemon1)>)
		:endif
		:if:<system.random(1,1024)>=1
			@register.register(grottoshiny<level.filename>,str,S)
		:else
			@register.register(grottoshiny<level.filename>,str,N)
		:endif
		@register.register(grottolevel<level.filename>,int,<system.random(<storage.get(integer,grottopokemonlevel)>-5,<storage.get(integer,grottopokemonlevel)>)>)
		@register.register(grottoactive<level.filename>,str,Pokemon)
	:endif
:endif
:if:<register.value(grottoactive<level.filename>)>=Item
	@npc.remove(0)
	:if:<register.registered(grottohidden<level.filename>)>=True
		@entity.setvisible(1,0)
		@entity.setcollision(1,0)
	:endif
:else
	@entity.remove(1)
	@npc.wearskin(0,[Pokémon|<register.value(grottoshiny<level.filename>)>]<register.value(grottopokemon<level.filename>)>)
:endif
@level.update
@screen.fadein
:end