Bitte um Hilfe

function NPC_Geschlechtswechsel()

		dlg_title( "Geschlechtswechsel" )

	if has_item(601100284) >= 1 then -- Her der 1000 Seelen ID 
		dlg_text( "Oh, wie ich sehe magst du dein Geschlecht wechseln. Kein problem!" )

		local sex = get_value( "sex" )
	
		if sex ~= 1 then
			dlg_menu( "Weiblich", "NPC_Sex_Wechsel(1)" )
		end
	
		if sex ~= 2 then 
			dlg_menu( "Maennlich", "NPC_Sex_Wechsel(2)" )
		end
	
		dlg_show()
	else
		dlg_text( "Du brauchst das Herz des Geschlechtswechsels" )
		dlg_menu( "@90010002", " " ) -- Auf Wiedersehen.
		dlg_show()
		
	end
	
end

function NPC_Sex_Wechsel( changed_sex )
	local erfolg = set_sex( changed_sex )

	dlg_title( "Geschlechtswechsel" )
	
	if erfolg == 1 then
	
		delete_item( get_item_handle( 601100284 ), 1 )
		dlg_text( "Glueckwunsch zum neuem Geschlecht!" )
		dlg_menu( "@90010002", " " ) -- Auf Wiedersehen.
		
	else
	
		dlg_text( "Geschlechtswechsel fehlgeschlagen" )
		dlg_menu( "@90010002", " " ) -- Auf Wiedersehen.
		
	end

	dlg_show()
end

function NPC_Sex_Wechsel( changed_sex )
	local erfolg = set_sex( tonumber(changed_sex) )

function Test()		

		dlg_title( "Pet Leveln" )
		dlg_text( "Pet bitte leveln" )

for i = 0, 5 do

		handle = 0
		handle = get_creature_handle( i )

if handle ~= 0 and handle ~= nil then

		lv = get_creature_value( handle, "level" )
		

		text = sconv("@90010009", "#@creature_name@#",tostring(get_creature_value( handle, "name" )) ,"#@creature_level@#",tostring(lv))

		command = 'level_setzen( ' .. handle .. ' )'

		dlg_menu( text, command )

end
end

	dlg_menu( "@90010003", "XY()" )	-- Zurück
	dlg_menu( "@90010002", '' ) -- Auf Wiedersehn
	dlg_show()

end
function level_setzen( handle, lv )

		petlv = get_creature_value( handle, "level" )
		
if petlv >= 0 then

		set_creature_value( handle, "level", petlv + 1 )
		--sv( "jp", playerJPs - 20000000)
		cprint( "<#FFCC33>Deine Kreatur hat einen Jobpunkt erhalten." )
		YY()

else

	dlg_title( "Tausch Shop" )
				
	dlg_text( "Hups, du hast leider nicht genug Jop-Punkte. Es tut mir leid!" )
				
	dlg_menu( "@90010003", "XY()" )	-- Zurück
	dlg_menu( "@90010002", '' ) -- Auf Wiedersehn
	dlg_show()

end
end