function cDragon_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
	local count = role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])
	local FamilyID = role.GetRoleFamilyID(MapID, InstanceID, RoleID)
	local my_rating_point = family_dragon_sql(FamilyID,0,0)
	local level = role.GetRoleLevel(MapID, InstanceID, RoleID)
	local dragolevels = {}
	dragolevels[0] = {0}
	dragolevels[1] = {3000}
	dragolevels[2] = {7000}
	dragolevels[3] = {12000}
	dragolevels[4] = {18000}
	dragolevels[5] = {26000}
	dragolevels[6] = {my_rating_point}
	--- Опр шанс от 1 до 100
	
	
	local chanse = math.random(1,100)
	---- айди скилла , ур , стат тек , след лвл , след стат , золото , Кровь , коготь, шанс, субайди скилла
	local skill10 = {}
	skill10[0] = {3060001,0,0,1,150,25,10,1,100,30600}
	skill10[1] = {3060002,1,150,2,300,50,12,1,90,30600}
	skill10[2] = {3060003,2,300,3,450,75,14,2,80,30600}
	skill10[3] = {3060004,3,450,4,600,100,16,2,75,30600}
	skill10[4] = {3060005,4,600,5,750,125,18,3,70,30600}
	skill10[5] = {3060006,5,750,6,900,150,20,3,65,30600}
	skill10[6] = {3060007,6,900,7,1050,175,22,4,60,30600}
	skill10[7] = {3060008,7,1050,8,1200,200,24,4,55,30600}
	skill10[8] = {3060009,8,1200,9,1350,225,26,5,50,30600}
	skill10[9] = {3060010,9,1350,10,1500,250,28,5,45,30600}
	skill10[10] = {3060011,10,1500,11,1650,275,30,6,40,30600}
	skill10[11] = {3060012,11,1650,12,1800,300,32,6,35,30600}
	
	local skill11 = {}
	skill11[0] = {3060101,0,0,1,100,100,20,2,100,30601,0,10}
	skill11[1] = {3060102,1,100,2,150,200,22,2,90,30601,10,15}
	skill11[2] = {3060103,2,150,3,200,300,24,4,80,30601,15,20}
	skill11[3] = {3060104,3,200,4,250,400,26,4,75,30601,20,25}
	skill11[4] = {3060105,4,250,5,300,500,28,6,70,30601,25,30}
	skill11[5] = {3060106,5,300,6,350,600,30,6,65,30601,30,35}
	skill11[6] = {3060107,6,350,7,400,700,32,8,60,30601,35,40}
	skill11[7] = {3060108,7,400,8,450,800,34,8,55,30601,40,45}
	skill11[8] = {3060109,8,450,9,500,900,36,10,50,30601,45,50}
	skill11[9] = {3060110,9,500,10,550,1000,38,10,45,30601,50,55}
	skill11[10] = {3060111,10,550,11,600,1100,40,12,40,30601,55,60}
	skill11[11] = {3060112,11,600,12,650,1200,42,12,35,30601,60,65}
	
	local skill12 = {}
	skill12[0] = {3060201,0,0,1,1100,25,20,1,100,30602}
	skill12[1] = {3060202,1,1100,2,1250,50,22,1,90,30602}
	skill12[2] = {3060203,2,1250,3,1400,75,24,2,80,30602}
	skill12[3] = {3060204,3,1400,4,1550,100,26,2,75,30602}
	skill12[4] = {3060205,4,1550,5,1700,125,28,3,70,30602}
	skill12[5] = {3060206,5,1700,6,1850,150,30,3,65,30602}
	skill12[6] = {3060207,6,1850,7,2000,175,32,4,60,30602}
	skill12[7] = {3060208,7,2000,8,2150,200,34,4,55,30602}
	skill12[8] = {3060209,8,2150,9,2300,225,36,5,50,30602}
	skill12[9] = {3060210,9,2300,10,2450,250,38,5,45,30602}
	skill12[10] = {3060211,10,2450,11,2600,275,40,6,40,30602}
	skill12[11] = {3060212,11,2600,12,2750,300,42,6,35,30602}
	
	local skill13 = {}
	skill13[0] = {3060301,0,0,1,300,100,30,2,100,30603,0,5}
	skill13[1] = {3060302,1,300,2,600,200,32,2,90,30603,5,10}
	skill13[2] = {3060303,2,600,3,900,300,34,4,80,30603,10,15}
	skill13[3] = {3060304,3,900,4,1200,400,36,4,75,30603,15,20}
	skill13[4] = {3060305,4,1200,5,1500,500,38,6,70,30603,20,25}
	skill13[5] = {3060306,5,1500,6,1800,600,40,6,65,30603,25,30}
	skill13[6] = {3060307,6,1800,7,2100,700,42,8,60,30603,30,35}
	skill13[7] = {3060308,7,2100,8,2400,800,44,8,55,30603,35,40}
	skill13[8] = {3060309,8,2400,9,2700,900,46,10,50,30603,40,45}
	skill13[9] = {3060310,9,2700,10,3000,1000,48,10,45,30603,45,50}
	skill13[10] = {3060311,10,3000,11,3300,1100,50,12,40,30603,50,55}
	skill13[11] = {3060312,11,3300,12,3600,1200,52,12,35,30603,55,60}
	
	local skill14 = {}
	skill14[0] = {3060401,0,0,1,80,25,20,1,100,30604}
	skill14[1] = {3060402,1,80,2,120,50,22,1,90,30604}
	skill14[2] = {3060403,2,120,3,160,75,24,2,80,30604}
	skill14[3] = {3060404,3,160,4,200,100,26,2,75,30604}
	skill14[4] = {3060405,4,200,5,240,125,28,3,70,30604}
	skill14[5] = {3060406,5,240,6,280,150,30,3,65,30604}
	skill14[6] = {3060407,6,280,7,320,175,32,4,60,30604}
	skill14[7] = {3060408,7,320,8,360,200,34,4,55,30604}
	skill14[8] = {3060409,8,360,9,400,225,36,5,50,30604}
	skill14[9] = {3060410,9,400,10,440,250,38,5,45,30604}
	skill14[10] = {3060411,10,440,11,480,275,40,6,40,30604}
	skill14[11] = {3060412,11,480,12,520,300,42,6,35,30604}
	
	
	local skill15 = {}
	skill15[0] = {3060501,0,0,1,1700,100,30,2,100,30605,0,12000}
	skill15[1] = {3060502,1,1700,2,2000,200,32,2,90,30605,12000,18000}
	skill15[2] = {3060503,2,2000,3,2300,300,34,4,80,30605,18000,24000}
	skill15[3] = {3060504,3,2300,4,2600,400,36,4,75,30605,24000,30000}
	skill15[4] = {3060505,4,2600,5,2900,500,38,6,70,30605,30000,36000}
	skill15[5] = {3060506,5,2900,6,3200,600,40,6,65,30605,36000,42000}
	skill15[6] = {3060507,6,3200,7,3500,700,42,8,60,30605,42000,48000}
	skill15[7] = {3060508,7,3500,8,3800,800,44,8,55,30605,48000,54000}
	skill15[8] = {3060509,8,3800,9,4100,900,46,10,50,30605,54000,60000}
	skill15[9] = {3060510,9,4100,10,4400,1000,48,10,45,30605,60000,66000}
	skill15[10] = {3060511,10,4400,11,4700,1100,50,12,40,30605,66000,72000}
	skill15[11] = {3060512,11,4700,12,5000,1200,52,12,35,30605,72000,78000}
	
	
	local skill16 = {}
	skill16[0] = {3060601,0,0,1,100,25,30,1,100,30606}
	skill16[1] = {3060602,1,100,2,200,50,32,1,90,30606}
	skill16[2] = {3060603,2,200,3,300,75,34,2,80,30606}
	skill16[3] = {3060604,3,300,4,400,100,36,2,75,30606}
	skill16[4] = {3060605,4,400,5,500,125,38,3,70,30606}
	skill16[5] = {3060606,5,500,6,600,150,40,3,65,30606}
	skill16[6] = {3060607,6,600,7,700,175,42,4,60,30606}
	skill16[7] = {3060608,7,700,8,800,200,44,4,55,30606}
	skill16[8] = {3060609,8,800,9,900,225,46,5,50,30606}
	skill16[9] = {3060610,9,900,10,1000,250,48,5,45,30606}
	skill16[10] = {3060611,10,1000,11,1100,275,50,6,40,30606}
	skill16[11] = {3060612,11,1100,12,1200,300,52,6,35,30606}
	
	local skill17 = {}
	skill17[0] = {3060701,0,0,1,600,100,40,2,100,30607,0,22000}
	skill17[1] = {3060702,1,600,2,900,200,42,2,90,30607,22000,33000}
	skill17[2] = {3060703,2,900,3,1200,300,44,4,80,30607,33000,44000}
	skill17[3] = {3060704,3,1200,4,1500,400,46,4,75,30607,44000,55000}
	skill17[4] = {3060705,4,1500,5,1800,500,48,6,70,30607,55000,66000}
	skill17[5] = {3060706,5,1800,6,2100,600,50,6,65,30607,66000,77000}
	skill17[6] = {3060707,6,2100,7,2400,700,52,8,60,30607,77000,88000}
	skill17[7] = {3060708,7,2400,8,2700,800,54,8,55,30607,88000,99000}
	skill17[8] = {3060709,8,2700,9,3000,900,56,10,50,30607,99000,110000}
	skill17[9] = {3060710,9,3000,10,3300,1000,58,10,45,30607,110000,121000}
	skill17[10] = {3060711,10,3300,11,3600,1100,60,12,40,30607,121000,132000}
	skill17[11] = {3060712,11,3600,12,3900,1200,62,12,35,30607,132000,143000}
	
	local skill18 = {}
	skill18[0] = {3060801,0,0,1,10,25,30,1,100,30608}
	skill18[1] = {3060802,1,10,2,15,50,32,1,90,30608}
	skill18[2] = {3060803,2,15,3,20,75,34,2,80,30608}
	skill18[3] = {3060804,3,20,4,25,100,36,2,75,30608}
	skill18[4] = {3060805,4,25,5,30,125,38,3,70,30608}
	skill18[5] = {3060806,5,30,6,35,150,40,3,65,30608}
	skill18[6] = {3060807,6,35,7,40,175,42,4,60,30608}
	skill18[7] = {3060808,7,40,8,45,200,44,4,55,30608}
	skill18[8] = {3060809,8,45,9,50,225,46,5,50,30608}
	skill18[9] = {3060810,9,50,10,55,250,48,5,45,30608}
	skill18[10] = {3060811,10,55,11,60,275,50,6,40,30608}
	skill18[11] = {3060812,11,60,12,65,300,52,6,35,30608}
	
	local skill19 = {}
	skill19[0] = {3060901,0,0,1,10,100,40,2,100,30609,0,300}
	skill19[1] = {3060902,1,10,2,15,200,42,2,90,30609,300,450}
	skill19[2] = {3060903,2,15,3,20,300,44,4,80,30609,450,600}
	skill19[3] = {3060904,3,20,4,25,400,46,4,75,30609,600,750}
	skill19[4] = {3060905,4,25,5,30,500,48,6,70,30609,750,900}
	skill19[5] = {3060906,5,30,6,35,600,50,6,65,30609,900,1050}
	skill19[6] = {3060907,6,35,7,40,700,52,8,60,30609,1050,1200}
	skill19[7] = {3060908,7,40,8,45,800,54,8,55,30609,1200,1350}
	skill19[8] = {3060909,8,45,9,50,900,56,10,50,30609,1350,1500}
	skill19[9] = {3060910,9,50,10,55,1000,58,10,45,30609,1500,1650}
	skill19[10] = {3060911,10,55,11,60,1100,60,12,40,30609,1650,1800}
	skill19[11] = {3060912,11,60,12,65,1200,62,12,35,30609,1800,1950}
	
	local DragoLevel = map.GetMapScriptData(901878291,FamilyID,1,1)
	-----Определяем уровень
	if tonumber(my_rating_point) >= 0 and tonumber(my_rating_point) <= 2999 then
	FDragonLvl = 1
	elseif tonumber(my_rating_point) >= 3000 and tonumber(my_rating_point) <= 6999 then
	FDragonLvl = 2
	elseif tonumber(my_rating_point) >= 7000 and tonumber(my_rating_point) <= 11999 then
	FDragonLvl = 3
	elseif tonumber(my_rating_point) >= 12000 and tonumber(my_rating_point) <= 17999 then
	FDragonLvl = 4
	elseif tonumber(my_rating_point) >= 18000 and tonumber(my_rating_point) <= 25999 then
	FDragonLvl = 5
	elseif tonumber(my_rating_point) >= 26000 then
	FDragonLvl = 6
	end
	
	map.SetMapScriptData(901878291,FamilyID,1,1,FDragonLvl)
	
	--[[local FDragonLvl = map.GetMapScriptData(901878291,FamilyID,1,4)
	
	if (tonumber(my_rating_point) >= 0 and tonumber(my_rating_point) <= 2999) and FDragonLvl ~= 0 then
	FDragonLvl = 1
	map.SetMapScriptData(901878291,FamilyID,1,4,1)
	map.MapDeleteCreature(MapID, InstanceID, TargetID)	
	map.MapCreateCreature(MapID, InstanceID, 6040321+FDragonLvl, 133, 40, 113, 1)
	elseif tonumber(my_rating_point) >= 3000 and tonumber(my_rating_point) <= 6999 and FDragonLvl ~= 2 then
	FDragonLvl = 2
	map.SetMapScriptData(901878291,FamilyID,1,4,2)
	
	map.MapDeleteCreature(MapID, InstanceID, TargetID)	
	map.MapCreateCreature(MapID, InstanceID, 6040321+FDragonLvl, 133, 40, 113, 1)
	elseif tonumber(my_rating_point) >= 7000 and tonumber(my_rating_point) <= 11999 and FDragonLvl ~= 3 then
	FDragonLvl = 3
	map.SetMapScriptData(901878291,FamilyID,1,4,3)
	map.MapDeleteCreature(MapID, InstanceID, TargetID)	
	map.MapCreateCreature(MapID, InstanceID, 6040321+FDragonLvl, 133, 40, 113, 1)
	elseif tonumber(my_rating_point) >= 12000 and tonumber(my_rating_point) <= 17999 and FDragonLvl ~= 4 then
	FDragonLvl = 4
	map.SetMapScriptData(901878291,FamilyID,1,4,4)
	map.MapDeleteCreature(MapID, InstanceID, TargetID)	
	map.MapCreateCreature(MapID, InstanceID, 6040321+FDragonLvl, 133, 40, 113, 1)
	elseif tonumber(my_rating_point) >= 18000 and tonumber(my_rating_point) <= 25999 and FDragonLvl ~= 5 then
	FDragonLvl = 5
	map.SetMapScriptData(901878291,FamilyID,1,4,5)
	map.MapDeleteCreature(MapID, InstanceID, TargetID)	
	map.MapCreateCreature(MapID, InstanceID, 6040321+FDragonLvl, 133, 40, 113, 1)
	elseif tonumber(my_rating_point) >= 26000 and FDragonLvl ~= 6 then
	FDragonLvl = 6
	map.SetMapScriptData(901878291,FamilyID,1,4,6)
	map.MapDeleteCreature(MapID, InstanceID, TargetID)	
	map.MapCreateCreature(MapID, InstanceID, 6040321+FDragonLvl, 133, 40, 113, 1)
	end

	--]]
	
	----Проверка изученных скиллов
	local learnskills = {}
	learnskills[10] = role.IsLearnedSkill(RoleID, 30600)
	learnskills[11] = role.IsLearnedSkill(RoleID, 30601)
	learnskills[12] = role.IsLearnedSkill(RoleID, 30602)
	learnskills[13] = role.IsLearnedSkill(RoleID, 30603)
	learnskills[14] = role.IsLearnedSkill(RoleID, 30604)
	learnskills[15] = role.IsLearnedSkill(RoleID, 30605)
	learnskills[16] = role.IsLearnedSkill(RoleID, 30606)
	learnskills[17] = role.IsLearnedSkill(RoleID, 30607)
	learnskills[18] = role.IsLearnedSkill(RoleID, 30608)
	learnskills[19] = role.IsLearnedSkill(RoleID, 30609)
	-- Дублирование удалено - индексы 20-29 не нужны, используются только 10-19
	
	
	--- Проверка на 0 ур скиллов
	for i = 10,19 do
	if learnskills[i] == nil or learnskills[i] == 0 then
	learnskills[i] = 0
	end
	end
	
	
	----Диалог
	if TalkIndex == -1 then
	 if level >= 50 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950665)				--Чтобы прокачать пассивные навыки, нажмите кнопку Магия дракона. Чтобы прокачать дракона, нажмите кнопку Развитие.\nДля повышения уровня дракона нужно &lt;p1&gt; опыта.
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, dragolevels[FDragonLvl][1]-tonumber(my_rating_point))	
		msg.AddMsgEvent(MsgID, 21, 5)
		msg.AddMsgEvent(MsgID, 1, 950666)				--Магия дракона
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 950667)				--Развитие		
		msg.AddMsgEvent(MsgID, 21, -12)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	 elseif level < 50 then 
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950664)				--Чтобы разговаривать с драконом, уровень вашего персонажа должен быть не ниже 50
		msg.AddMsgEvent(MsgID, 24, TargetID)		
		msg.AddMsgEvent(MsgID, 21, -12)
		msg.AddMsgEvent(MsgID, 1, 100001)				--ОК
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 5 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950668)				--Здесь вы можете прокачать пассивные навыки Магии дракона. Для этого вам потребуются Кровь дракона, Коготь дракона и золото. Каждый следующий навык можно изучить только после изучения 6 уровней предыдущего навыка. Выберите навык из списка, чтобы узнать подробности.\nИспользовано попыток изучения &lt;p1&gt; из 20.
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10)
		msg.AddMsgEvent(MsgID, 1, 950680)				--Чутье дракона
		msg.AddMsgEvent(MsgID, 21, 11)
		msg.AddMsgEvent(MsgID, 1, 950681)				--Аура присутствия
		msg.AddMsgEvent(MsgID, 21, 12)
		msg.AddMsgEvent(MsgID, 1, 950682)				--Проницательный взгляд
		msg.AddMsgEvent(MsgID, 21, 13)
		msg.AddMsgEvent(MsgID, 1, 950683)				--Боевой закал
		msg.AddMsgEvent(MsgID, 21, 14)
		msg.AddMsgEvent(MsgID, 1, 950684)				--Драконий покров
		msg.AddMsgEvent(MsgID, 21, 15)
		msg.AddMsgEvent(MsgID, 1, 950685)				--Непоколебимость
		msg.AddMsgEvent(MsgID, 21, 16)
		msg.AddMsgEvent(MsgID, 1, 950686)				--Единство с природой
		msg.AddMsgEvent(MsgID, 21, 17)
		msg.AddMsgEvent(MsgID, 1, 950687)				--Торжество жизни
		msg.AddMsgEvent(MsgID, 21, 18)
		msg.AddMsgEvent(MsgID, 1, 950688)				--Абсолютный щит
		msg.AddMsgEvent(MsgID, 21, 19)
		msg.AddMsgEvent(MsgID, 1, 950689)				--Триумф дракона
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	
	elseif TalkIndex == 10 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][2])
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][3])
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][4])
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][5])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][6])
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][7])
		msg.AddMsgEvent(MsgID, 9, skill10[learnskills[TalkIndex]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	elseif TalkIndex == 11 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[10] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][2])
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][3])
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][11])
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][4])
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][5])
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][12])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][6])
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][7])
	
		msg.AddMsgEvent(MsgID, 9, skill11[learnskills[TalkIndex]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 14 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[13] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][2])
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][3])
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][4])
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][5])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][6])
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][7])
		msg.AddMsgEvent(MsgID, 9, skill14[learnskills[14]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 16 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[15] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][2])
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][3])
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][4])
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][5])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][6])
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][7])
		msg.AddMsgEvent(MsgID, 9, skill16[learnskills[16]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 17 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[16] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][2])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][3])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][11])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][4])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][5])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][12])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][6])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][7])
		msg.AddMsgEvent(MsgID, 9, skill17[learnskills[17]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 18 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[17] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][2])
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][3])
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][4])
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][5])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][6])
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][7])
		msg.AddMsgEvent(MsgID, 9, skill18[learnskills[18]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 19 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[18] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][2])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][3])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][11])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][4])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][5])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][12])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][6])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][7])
		msg.AddMsgEvent(MsgID, 9, skill19[learnskills[19]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 15 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[14] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][2])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][3])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][11])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][4])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][5])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][12])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][6])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][7])
		msg.AddMsgEvent(MsgID, 9, skill15[learnskills[15]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 13 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[12] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][2])
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][3])
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][11])
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][4])
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][5])
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][12])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][6])
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][7])
	
		msg.AddMsgEvent(MsgID, 9, skill13[learnskills[13]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 12 then
	if learnskills[TalkIndex] == 12 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950703)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	end
	if learnskills[11] < 6 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950702)---- Эта способность дракона еще не открыта
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100001)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950680+TalkIndex)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][2])
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][3])
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][4])
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][5])
		if learnskills[TalkIndex] == 0 then
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][9])
		
		else
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][9]+FDragonLvl*3)
		end
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][6])
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][7])
		msg.AddMsgEvent(MsgID, 9, skill12[learnskills[12]][8])
		msg.AddMsgEvent(MsgID, 9, count)
		msg.AddMsgEvent(MsgID, 21, 10+TalkIndex)
		msg.AddMsgEvent(MsgID, 1, 950700)				--Изучить
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 20 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill10[learnskills[10]][7] and drago_kog >= skill10[learnskills[10]][8] and gold >= skill10[learnskills[10]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill10[learnskills[10]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill10[learnskills[10]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill10[learnskills[10]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill10[learnskills[10]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill10[learnskills[10]][10])
		role.AddSkill(RoleID, skill10[learnskills[10]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill10[learnskills[10]][7] or drago_kog < skill10[learnskills[10]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill10[learnskills[10]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		
	elseif TalkIndex == 21 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill11[learnskills[11]][7] and drago_kog >= skill11[learnskills[11]][8] and gold >= skill11[learnskills[11]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill11[learnskills[11]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill11[learnskills[11]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill11[learnskills[11]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill11[learnskills[11]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill11[learnskills[11]][10])
		role.AddSkill(RoleID, skill11[learnskills[11]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill11[learnskills[11]][7] or drago_kog < skill11[learnskills[11]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill11[learnskills[11]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		
	elseif TalkIndex == 22 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill12[learnskills[12]][7] and drago_kog >= skill12[learnskills[12]][8] and gold >= skill12[learnskills[12]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill12[learnskills[12]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill12[learnskills[12]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill12[learnskills[12]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill12[learnskills[12]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill12[learnskills[12]][10])
		role.AddSkill(RoleID, skill12[learnskills[12]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill12[learnskills[12]][7] or drago_kog < skill12[learnskills[12]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill12[learnskills[12]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 23 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill13[learnskills[13]][7] and drago_kog >= skill13[learnskills[13]][8] and gold >= skill13[learnskills[13]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill13[learnskills[13]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill13[learnskills[13]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill13[learnskills[13]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill13[learnskills[13]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill13[learnskills[13]][10])
		role.AddSkill(RoleID, skill13[learnskills[13]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill13[learnskills[13]][7] or drago_kog < skill13[learnskills[13]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill13[learnskills[13]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 24 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill14[learnskills[14]][7] and drago_kog >= skill14[learnskills[14]][8] and gold >= skill14[learnskills[14]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill14[learnskills[14]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill14[learnskills[14]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill14[learnskills[14]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill14[learnskills[14]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill14[learnskills[14]][10])
		role.AddSkill(RoleID, skill14[learnskills[14]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill14[learnskills[14]][7] or drago_kog < skill14[learnskills[14]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill14[learnskills[14]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 25 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill15[learnskills[15]][7] and drago_kog >= skill15[learnskills[15]][8] and gold >= skill15[learnskills[15]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill15[learnskills[15]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill15[learnskills[15]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill15[learnskills[15]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill15[learnskills[15]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill15[learnskills[15]][10])
		role.AddSkill(RoleID, skill15[learnskills[15]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill15[learnskills[15]][7] or drago_kog < skill15[learnskills[15]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill15[learnskills[15]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 26 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill16[learnskills[16]][7] and drago_kog >= skill16[learnskills[16]][8] and gold >= skill16[learnskills[16]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill16[learnskills[16]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill16[learnskills[16]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill16[learnskills[16]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill16[learnskills[16]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill16[learnskills[16]][10])
		role.AddSkill(RoleID, skill16[learnskills[16]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill16[learnskills[16]][7] or drago_kog < skill16[learnskills[16]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill16[learnskills[16]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 27 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill17[learnskills[17]][7] and drago_kog >= skill17[learnskills[17]][8] and gold >= skill17[learnskills[17]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill17[learnskills[17]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill17[learnskills[17]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill17[learnskills[17]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill17[learnskills[17]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill17[learnskills[17]][10])
		role.AddSkill(RoleID, skill17[learnskills[17]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill17[learnskills[17]][7] or drago_kog < skill17[learnskills[17]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill17[learnskills[17]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 28 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill18[learnskills[18]][7] and drago_kog >= skill18[learnskills[18]][8] and gold >= skill18[learnskills[18]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill18[learnskills[18]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill18[learnskills[18]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill18[learnskills[18]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill18[learnskills[18]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill18[learnskills[18]][10])
		role.AddSkill(RoleID, skill18[learnskills[18]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill18[learnskills[18]][7] or drago_kog < skill18[learnskills[18]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill18[learnskills[18]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 29 then
		local drago_krov = role.GetRoleItemNum(RoleID,6600979)
		local drago_kog = role.GetRoleItemNum(RoleID,6600980)
		local gold = role.GetRoleSilver(MapID, InstanceID, RoleID)
		if drago_krov >= skill19[learnskills[19]][7] and drago_kog >= skill19[learnskills[19]][8] and gold >= skill19[learnskills[19]][6]*10000 and count < 20 then
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600979, skill19[learnskills[19]][7], 101)
		role.RemoveFromRole(MapID, InstanceID, RoleID, 6600980, skill19[learnskills[19]][8], 101)
		role.DecRoleSilver(MapID, InstanceID, RoleID, skill19[learnskills[19]][6]*10000, 452)
		if chanse >= 1 and chanse <= skill19[learnskills[19]][9]+FDragonLvl*3 then
		role.RemoveSkill(RoleID, skill19[learnskills[19]][10])
		role.AddSkill(RoleID, skill19[learnskills[19]][1])
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950708)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		else
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 13, 0)
		msg.AddMsgEvent(MsgID, 1, 950707)
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
		role.SetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"],role.GetRoleScriptData(RoleID, 1, RoleDataType["DragonCount"])+1)
		elseif drago_krov < skill19[learnskills[19]][7] or drago_kog < skill19[learnskills[19]][8] then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950705)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif gold < skill19[learnskills[19]][6]*10000 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950704)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		elseif count >= 20 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950706)	
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		end
	elseif TalkIndex == 4 then
	if tonumber(my_rating_point) < 26000 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950669)				--Здесь вся ваша семья может повышать уровень дракона, превращая различные предметы в опыт. Повышение уровней увеличивает шансы изучения навыков Магии дракона и открывает доступ к специальным заданиям на Драконьем острове. Если не кормить дракона 1 день, то после 23:59 он теряет 500 опыта.
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, 6)
		msg.AddMsgEvent(MsgID, 1, 950670)				--Драконья пища
		msg.AddMsgEvent(MsgID, 21, 7)
		msg.AddMsgEvent(MsgID, 1, 950671)				--5000 золота
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950721)				---Дракон достиг маскимального уровня, кормление невозможно.
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 100002)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	
	elseif TalkIndex == 7 then
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950672)				--За сдачу вы получите &lt;p1&gt; опыта семейного питомца
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, 10)
		msg.AddMsgEvent(MsgID, 21, 9)
		msg.AddMsgEvent(MsgID, 1, 950673)				--Сдать
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 950674)				--Назад
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	
	elseif TalkIndex == 9 then
	if role.GetRoleSilver(MapID, InstanceID, RoleID) >= 50000000 then
	role.DecRoleSilver(MapID, InstanceID, RoleID, 50000000, 452)
	family_dragon_sql(FamilyID,10,1)
	family_dragon_Active(FamilyID,1,1)
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950677)				--Не достаточно золота
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 950674)				--Назад
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	elseif TalkIndex == 6 then
	local pusha = role.GetRoleItemNum(RoleID,6600973)
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950672)				--За сдачу вы получите &lt;p1&gt; опыта семейного питомца
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 9, 10*pusha)
		msg.AddMsgEvent(MsgID, 21, 8)
		msg.AddMsgEvent(MsgID, 1, 950673)				--Сдать
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 950674)				--Назад
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
		return
	elseif TalkIndex == 8 then
	local pusha = role.GetRoleItemNum(RoleID,6600973)
	if pusha >= 1 then
	role.RemoveFromRole(MapID, InstanceID, RoleID, 6600973, 1*pusha, 101)
	family_dragon_sql(FamilyID,10*pusha,1)
	family_dragon_Active(FamilyID,1,1)
	else
	local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950676)				--У вас нет Драконьей пищи
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 950674)				--Назад
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	end
	end
	
end
aux.RegisterCreatureEvent(6040322, 7, "cDragon_On_Talk")
aux.RegisterCreatureEvent(6040323, 7, "cDragon_On_Talk")
aux.RegisterCreatureEvent(6040324, 7, "cDragon_On_Talk")
aux.RegisterCreatureEvent(6040325, 7, "cDragon_On_Talk")
aux.RegisterCreatureEvent(6040326, 7, "cDragon_On_Talk")
aux.RegisterCreatureEvent(6040327, 7, "cDragon_On_Talk")