vSro Paylaşım vSRO Teleport Taşı / NPC Yerini Değiştirme (Taşıma)

USE [SRO_VT_SHARD]
GO

-- ===================================================================
-- 1. ADIM: DEĞİŞKENLER
-- ===================================================================
DECLARE @TargetBuildingCode VARCHAR(128) = 'STORE_TQ_SNAKEGATE' -- Yeri değiştirilecek Teleport/NPC Kodu
DECLARE @ReferenceCharName  VARCHAR(16)  = '[GM]PvP'           -- Koordinatları alınacak karakter adı

-- Kontroller: Eşya/Bina ve Karakter Veritabanında Mevcut mu?
DECLARE @BuildingID INT = (SELECT ID FROM dbo._RefObjCommon WITH (NOLOCK) WHERE CodeName128 = @TargetBuildingCode)
DECLARE @CharID INT     = (SELECT CharID FROM dbo._Char WITH (NOLOCK) WHERE CharName16 = @ReferenceCharName)

IF (@BuildingID IS NULL)
BEGIN
    RAISERROR('HATA: Belirtilen teleport/bina kodu (_RefObjCommon) bulunamadı!', 16, 1)
    RETURN
END

IF (@CharID IS NULL)
BEGIN
    RAISERROR('HATA: Belirtilen referans karakter (_Char) bulunamadı!', 16, 1)
    RETURN
END

-- ===================================================================
-- 2. ADIM: KARAKTERİN KONUM BİLGİLERİNİ ÇEKME (FLOAT HASSASİYETİ)
-- ===================================================================
DECLARE @RegionID SMALLINT
DECLARE @PosX REAL
DECLARE @PosY REAL
DECLARE @PosZ REAL

SELECT 
    @RegionID = LatestRegion,
    @PosX     = PosX,
    @PosY     = PosY,
    @PosZ     = PosZ
FROM dbo._Char WITH (NOLOCK)
WHERE CharID = @CharID

-- ===================================================================
-- 3. ADIM: TELEPORT BİNASINI YENİ KONUMA TAŞIMA
-- ===================================================================
UPDATE dbo._RefObjCommon
SET 
    RegionID = @RegionID,
    OffsetX  = @PosX,
    OffsetY  = @PosY,
    OffsetZ  = @PosZ
WHERE ID = @BuildingID

PRINT '================================================================='
PRINT 'BAŞARILI: ' + @TargetBuildingCode + ' yeni koordinatlarına taşındı!'
PRINT 'RegionID: ' + CAST(@RegionID AS VARCHAR(10))
PRINT 'X: ' + CAST(@PosX AS VARCHAR(20)) + ' | Y: ' + CAST(@PosY AS VARCHAR(20)) + ' | Z: ' + CAST(@PosZ AS VARCHAR(20))
PRINT '================================================================='