الموقع العربي الاول للعبة Silkroad Online

الموقع العربي الاول للعبة Silkroad Online (https://silkroad4arab.com/vb/index.php)
-   قسم الشروحات و البرامج المستخدمة في عمل السيرفرات الخاصة (https://silkroad4arab.com/vb/forumdisplay.php?f=289)
-   -   Scroll to Change Name on Game (https://silkroad4arab.com/vb/showthread.php?t=506377)

Mr.Serag 01-06-2013 10:44 PM

Scroll to Change Name on Game
 
http://forums.mazika2day.com/imgcache2/9110.gif
http://forums.mazika2day.com/imgcache2/9113.gif
لست أدرى من أين أبدا ؟! وهل تطاوعنى الكلمات ؟؟
فان الكلمات تتصاغر والعبارات تتضاءل ولكننى سأحاول
قدراً أستطاعتى وعسى ان اوفق فقد قال تعالى
(( وقل اعملوا فسيرى الله عملكم ورسولة والمؤمنين))
http://www.sheekh-3arb.net/3atter/di...s/image218.gif
RefObjCommon
كود:

1    43606    ITEM_MALL_CHANGENAME    ???? ???? ??? (???)    xxx    SN_ITEM_MALL_CHANGENAME    SN_ITEM_MALL_CHANGENAME_TT_DESC    1    0    3    3    13    14    180000    3    0    1    1    1    255    0    1    0    0    129    0    0    0    0    0    0    0    -1    0    -1    0    -1    0    -1    0    -1    0    0    0    0    0    0    0    100    0    0    0    xxx    item\etc\drop_mall_scroll.bsr    Premium\etc\changename.ddj    xxx    xxx    22006
RefObjItem
كود:

xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    -1    xxx    0    0    0
RefSkill
كود:

1    34006    1013    SKILL_MALL_CHANGENAME    ???? ????    SKILL_MALL_CHANGENAME    0    1    1    0    0    0    0    0    1000    0    0    0    3599    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    1    0    0    0    0    0    0    0    0    0    0    0    0    3    0    0    255    255    0    0    0    0    0    255    255    255    255    item\etc\mall_optlevel_upgrade_scroll_1.ddj    SN_SKILL_MALL_CHANGENAME    xxx    SN_SKILL_MALL_CHANGENAME_TT_DESC    xxx    0    0    3    1667396966    1851946342    1685418593    1500    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0    0
Procedure

_TimedJob
كود:

        if(@JobID = '34006') -- Mudar nome do char
        begin
declare @CharName16 varchar(64)
        Select @CharName16=CharName16 from _Char where CharID = @CharID
        Update _Char Set CharName16 = '@'+ @CharName16 Where CharID = @CharID
            return -3
        end

Execute
كود:

USE [SRO_VT_SHARD]
GO
/****** Fixed And Modified By Jangan ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-----------------------------------------------------------------------------------------------------

ALTER procedure [dbo].[_RenameCharNameByID]
@CharID        int,
@NewName    varchar(64)
as
    if (not exists (select charid from _char where charid = @charid))
        return -1
    set xact_abort on
begin transaction
    if (exists (select charid from _charnamelist with (updlock) where charname16 = @NewName))
    begin
        rollback transaction
        return -3
    end
    declare @old_name varchar(64)
    select @old_name = charname16 from _char where charid = @charid
    update _char set charname16 = @NewName where charid = @charid
    if (@@error <> 0 or @@rowcount = 0)
    begin
        rollback transaction
        return -4       
    end
    insert _CharNameList values(@NewName, @charid)
    UPDATE _Char set CharName16 = @NewName where CharID = @CharID
    update _Friend set friendcharname = @NewName where friendcharid = @charid
    update _GuildMember set charname = @NewName where charid = @charid
    update _Memo set fromcharname = @NewName where fromcharname = @old_name
    update _TrainingCampMember set charname = @NewName where charid = @charid
    declare @cos_id int
    declare cos_cursor  cursor fast_forward for   
    select id
    from _charcos 
    where ownercharid = @CharID
    open cos_cursor 
    fetch next from cos_cursor  into @cos_id
    while( @@fetch_status = 0 )
    begin
        update _Items set CreaterName = @NewName 
        where ID64 in 
        (select ItemID from _InvCOS where COSID = @cos_id and ItemID > 0) 
        and CreaterName = @old_Name
        if (@@error <> 0 )
        begin
            close cos_cursor
            deallocate cos_cursor
            rollback transaction
            return -5
        end
        fetch next from cos_cursor  into @cos_id
    end
    close cos_cursor
    deallocate cos_cursor
    declare pc_inv_cursor cursor fast_forward for
    select it.Data                           
    from _Inventory as inv join _Items as it on inv.ItemID = it.ID64 
    where 
    (inv.CharID = @CharID and inv.Slot >= 13 and inv.ItemID > 0) and   
    (it.Data <> 0)  and                           
    (exists (select top 1 ID from _RefObjCommon where ID = it.RefItemID and TypeID1 = 3 and TypeID2 = 2))
    open pc_inv_cursor 
    fetch next from pc_inv_cursor  into @cos_id
    while( @@fetch_status = 0 )
    begin
        update _Items set CreaterName = @NewName 
        where ID64 in 
        (select ItemID from _InvCOS where COSID = @cos_id and ItemID > 0) 
        and CreaterName = @old_Name
        if (@@error <> 0 )
        begin
            close pc_inv_cursor
            deallocate pc_inv_cursor
            rollback transaction
            return -6
        end
        fetch next from pc_inv_cursor  into @cos_id
    end
    close pc_inv_cursor
    deallocate pc_inv_cursor
    if (CHARINDEX('@', @old_name, 0) > 0)
    begin
        select * from _Char
        where CharID = ''
    end
    commit transaction
return 1

منقول
http://t3.gstatic.com/images?q=tbn:A...mdzm5VjI9SXgWg
في النهاية لا أملك إلا أن أقول أنني قد عرضت رأيي وأدليت بفكرتي في هذا الموضوع
لعلي أكون قد وفقت في كتابته والتعبير عنه وأخيراً ما أنا إلا بشر قد أخطئ
وقد أصيب فإن كنت قد أخطأت فأرجو مسامحتي وإن كنت فد أصبت فهذا كل ما أرجوه من الله عزوجل.
http://forums.mazika2day.com/imgcache2/9148.gif
http://forums.mazika2day.com/imgcache2/9149.gif
http://forums.mazika2day.com/imgcache2/9153.gif
http://forums.mazika2day.com/imgcache2/9154.gif

ELjOkeR 03-06-2013 11:40 PM

Approved #

MyRȝturn 04-06-2013 09:30 AM

شكـــــــــــراً يا كبير

MyOwnJ3lood 11-06-2013 11:35 PM

هى فين الملفات و اكواد الMedia؟

™Anas™ 12-06-2013 12:21 AM

حضرتك مشرف يعني يا ريت بعد إذنك بلاش Copy w Paste ده خالص يعني ع الأقل إكتب ده فيه كزا وده كزا عشان الناس تفهم
شكرا

Tigger 13-05-2014 11:36 AM

:biggrin2:

man_lok2002 13-05-2014 12:23 PM

طيب انا عاندي الاسكرول فى الداتا و بلمها بس مش بتشتغل يعنى ادوس عليها مش بتدرب
ممكن كود الى بيشغلها

Tigger 14-05-2014 11:22 AM

Good Jop:stretcher:


الساعة الآن 07:56 PM.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.