1. PVP-KENTİ Konu Görüntüleme Yarışması Başlıyor
    Duyuruyu Kapat

Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

Konu, 'Prosedür Paylaşımları' kısmında Castro tarafından paylaşıldı.

  1. Castro

    Castro BANNED BANNED

    Mesajlar:
    0
    Beğenilen Mesajlar:
    0
    [d="Bilgiler"]
    Konu Başlığı: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]
    Yapımcı:idephis
    Yardımcı: ''Bilinmiyor''
    Uyumlu Versionlar: 1299
    [/d]

    [d="Konu Anlatım"]

    Kod:
    CREATE PROCEDURE CREATE_NEW_CHAR
     
    @nRet smallint OUTPUT,
    @AccountID char(21),
    @index tinyint,
    @CharID char(21),
    @Race tinyint,
    @Class smallint,
    @Hair tinyint,
    @Face tinyint,
    @Str tinyint,
    @Sta tinyint,
    @Dex tinyint,
    @Intel tinyint,
    @Cha tinyint
     
    AS
     
    DECLARE @Row tinyint, @Nation tinyint, @Zone tinyint, @PosX int, @PosZ int
    SET @Row = 0 SET @Nation = 0 SET @Zone = 0 SET @PosX = 0 SET @PosZ = 0
     
    SELECT @Nation = bNation, @Row = bCharNum FROM ACCOUNT_CHAR WHERE strAccountID = @AccountID
     
    IF @Row >= 5 SET @nRet = 1
     
    IF @Nation = 1 AND @Race > 10 SET @nRet = 2
    ELSE IF @Nation = 2 AND @Race < 10 SET @nRet = 2
    ELSE IF @Nation <>1 AND @Nation <> 2 SET @nRet = 2
     
    IF @nRet > 0
    RETURN
     
    SELECT @Row = COUNT(*) FROM USERDATA WHERE strUserId = @CharID
    IF @Row > 0
    BEGIN
    SET @nRet = 3
    RETURN
    END
     
     
    SET @Zone=21
    SELECT @PosX = InitX, @PosZ = InitZ FROM ZONE_INFO WHERE ZoneNo = @Zone
     
    select @row = 3
    if @CharID like '%___%'
    if @CharID like '%_%'
    if @CharID like '%__%'
    if @CharID like '%:%'
    if @CharID like '%::%'
    begin
    SET @nRet = 3
    RETURN
     
     
    END
    BEGIN TRAN
    IF @index = 0
    UPDATE ACCOUNT_CHAR SET strCharID1 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 1
    UPDATE ACCOUNT_CHAR SET strCharID2 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 2
    UPDATE ACCOUNT_CHAR SET strCharID3 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 3
    UPDATE ACCOUNT_CHAR SET strCharID4 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 4
    UPDATE ACCOUNT_CHAR SET strCharID5 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
     
     
    INSERT INTO USERDATA (strUserId, Nation, Race, Class, HairColor, Face, Strong, Sta, Dex, Intel, Cha, Zone, PX, PZ )
    VALUES (@CharID, @Nation, @Race, @Class, @Hair, @Face, @Str, @Sta, @Dex, @Intel, @Cha, @Zone, @PosX, @PosZ )
     
     
    exec baslangicitem @CharID
    update userdata set Class = 106 , strong = '255' , sta = '180' ,strskill = '?????P<???' , [level] = '83' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 101
    update userdata set Class = 108 , strong = '71' , dex = '255' , sta = '169' ,strskill ='P<' , [level] = '83' , hp ='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 102
    update userdata set Class = 110 , strong = '71' , sta = '100' , cha = '194' , intel = '162' ,strskill ='P<' , [level] = '83' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 103
    update userdata set Class = 112 , strong = '110' , sta = '120' , intel = '230' ,strskill ='P<' , [level] = '83' where struserid = @CharID and @Class = 104
    update userdata set Class = 206 , strong = '255' , sta = '180' ,strskill ='P<' , [level] = '83' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 201
    update userdata set Class = 208 , strong = '71' , dex = '255' , sta = '169' ,strskill ='P<' , [level] = '83' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 202
    update userdata set Class = 210 , strong = '71' , sta = '100' , cha = '194' , intel = '162' ,strskill ='P<' , [level] = '83' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 203
    update userdata set Class = 212 , strong = '110' , sta = '120' , intel = '230' ,strskill ='P<' , [level] = '83' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 204
     
     
    update userdata set Class = 106 where struserid = @CharID and @Class = 101
    update userdata set Class = 108 where struserid = @CharID and @Class = 102
    update userdata set Class = 110 where struserid = @CharID and @Class = 103
    update userdata set Class = 112 where struserid = @CharID and @Class = 104
    update userdata set Class = 206 where struserid = @CharID and @Class = 201
    update userdata set Class = 208 where struserid = @CharID and @Class = 202
    update userdata set Class = 210 where struserid = @CharID and @Class = 203
    update userdata set Class = 212 where struserid = @CharID and @Class = 204
     
    IF @@ERROR <> 0
    BEGIN
    ROLLBACK TRAN
    SET @nRet = 4
    RETURN
    END
     
    COMMIT TRAN
    SET @nRet = 0
    GO 
    
    Tamamen, sorunsuzdur.
    [/d]
     
  2. Atilla

    Atilla Yeni Üye Kayıtlı Üye

    Mesajlar:
    22
    Beğenilen Mesajlar:
    0
    Cevap: Oto Ba?langıç [Level 83 Stat Verili Master ve Skiller açık ]

    Yani Bu ?ekilde Bu Kod cali?irmi Sence ?
     
  3. JustForYou

    JustForYou Yeni Üye Kayıtlı Üye

    Mesajlar:
    70
    Beğenilen Mesajlar:
    0
    Cevap: Oto Ba?langıç [Level 83 Stat Verili Master ve Skiller açık ]

    tabikide çalısmaz düzenleyip ver bence
     
  4. Castro

    Castro BANNED BANNED

    Mesajlar:
    0
    Beğenilen Mesajlar:
    0
    Cevap: Oto Ba?langıç [Level 83 Stat Verili Master ve Skiller açık ]

    Yenilendi.
     
  5. idephis

    idephis Yeni Üye Kayıtlı Üye

    Mesajlar:
    260
    Beğenilen Mesajlar:
    1
    Cevap: Oto Ba?langıç [Level 83 Stat Verili Master ve Skiller açık ]

    Kimden Alıntı BU:p
     
  6. I3y€x€LLænC€

    I3y€x€LLænC€ Yeni Üye Kayıtlı Üye

    Mesajlar:
    46
    Beğenilen Mesajlar:
    0
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

    Cino* Kardeş Başlıngıç Levelini Parasını Statları Class'a göre Nasıl Değiştiriyoruz...
     
  7. TireSome

    TireSome BANNED BANNED

    Mesajlar:
    203
    Beğenilen Mesajlar:
    3
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

    Cino 1 lvl master paylasırsan sevinirim:)
     
  8. Lemus

    Lemus Yeni Üye Kayıtlı Üye

    Mesajlar:
    347
    Beğenilen Mesajlar:
    0
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

    Süpersin :)
     
  9. ∂я šqℓ

    ∂я šqℓ BANNED BANNED

    Mesajlar:
    70
    Beğenilen Mesajlar:
    0
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

    Ben 80 Yapmak İstiom Nasıl Yapcam...
     
  10. Lemus

    Lemus Yeni Üye Kayıtlı Üye

    Mesajlar:
    347
    Beğenilen Mesajlar:
    0
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

    Kendine Göre Ayarlıycan. =)
     
  11. Tr_Cool_Tr

    Tr_Cool_Tr <marquee>Lineage 2 Game Master</marquee> Kayıtlı Üye

    Mesajlar:
    282
    Beğenilen Mesajlar:
    1
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]

    Kod:
    CREATE PROCEDURE CREATE_NEW_CHAR
     
    @nRet smallint OUTPUT,
    @AccountID char(21),
    @index tinyint,
    @CharID char(21),
    @Race tinyint,
    @Class smallint,
    @Hair tinyint,
    @Face tinyint,
    @Str tinyint,
    @Sta tinyint,
    @Dex tinyint,
    @Intel tinyint,
    @Cha tinyint
     
    AS
     
    DECLARE @Row tinyint, @Nation tinyint, @Zone tinyint, @PosX int, @PosZ int
    SET @Row = 0 SET @Nation = 0 SET @Zone = 0 SET @PosX = 0 SET @PosZ = 0
     
    SELECT @Nation = bNation, @Row = bCharNum FROM ACCOUNT_CHAR WHERE strAccountID = @AccountID
     
    IF @Row >= 5 SET @nRet = 1
     
    IF @Nation = 1 AND @Race > 10 SET @nRet = 2
    ELSE IF @Nation = 2 AND @Race < 10 SET @nRet = 2
    ELSE IF @Nation <>1 AND @Nation <> 2 SET @nRet = 2
     
    IF @nRet > 0
    RETURN
     
    SELECT @Row = COUNT(*) FROM USERDATA WHERE strUserId = @CharID
    IF @Row > 0
    BEGIN
    SET @nRet = 3
    RETURN
    END
     
     
    SET @Zone=21
    SELECT @PosX = InitX, @PosZ = InitZ FROM ZONE_INFO WHERE ZoneNo = @Zone
     
    select @row = 3
    if @CharID like '%___%'
    if @CharID like '%_%'
    if @CharID like '%__%'
    if @CharID like '%:%'
    if @CharID like '%::%'
    begin
    SET @nRet = 3
    RETURN
     
     
    END
    BEGIN TRAN
    IF @index = 0
    UPDATE ACCOUNT_CHAR SET strCharID1 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 1
    UPDATE ACCOUNT_CHAR SET strCharID2 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 2
    UPDATE ACCOUNT_CHAR SET strCharID3 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 3
    UPDATE ACCOUNT_CHAR SET strCharID4 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
    ELSE IF @index = 4
    UPDATE ACCOUNT_CHAR SET strCharID5 = @CharID, bCharNum = bCharNum + 1 WHERE strAccountID = @AccountID
     
     
    INSERT INTO USERDATA (strUserId, Nation, Race, Class, HairColor, Face, Strong, Sta, Dex, Intel, Cha, Zone, PX, PZ )
    VALUES (@CharID, @Nation, @Race, @Class, @Hair, @Face, @Str, @Sta, @Dex, @Intel, @Cha, @Zone, @PosX, @PosZ )
     
     
    exec baslangicitem @CharID
    update userdata set Class = 106 , strong = '255' , sta = '165' ,strskill = '?????P<???' , [level] = '80' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 101
    update userdata set Class = 108 , strong = '71' , dex = '255' , sta = '154' ,strskill ='P<' , [level] = '80' , hp ='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 102
    update userdata set Class = 110 , strong = '71' , sta = '100' , cha = '179' , intel = '162' ,strskill ='P<' , [level] = '80' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 103
    update userdata set Class = 112 , strong = '110' , sta = '120' , intel = '215' ,strskill ='P<' , [level] = '80' where struserid = @CharID and @Class = 104
    update userdata set Class = 206 , strong = '255' , sta = '165' ,strskill ='P<' , [level] = '80' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 201
    update userdata set Class = 208 , strong = '71' , dex = '255' , sta = '154' ,strskill ='P<' , [level] = '80' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 202
    update userdata set Class = 210 , strong = '71' , sta = '100' , cha = '179' , intel = '162' ,strskill ='P<' , [level] = '80' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 203
    update userdata set Class = 212 , strong = '110' , sta = '120' , intel = '215' ,strskill ='P<' , [level] = '80' , hp='5000' ,mp='5000' ,exp = '1' where struserid = @CharID and @Class = 204
     
     
    update userdata set Class = 106 where struserid = @CharID and @Class = 101
    update userdata set Class = 108 where struserid = @CharID and @Class = 102
    update userdata set Class = 110 where struserid = @CharID and @Class = 103
    update userdata set Class = 112 where struserid = @CharID and @Class = 104
    update userdata set Class = 206 where struserid = @CharID and @Class = 201
    update userdata set Class = 208 where struserid = @CharID and @Class = 202
    update userdata set Class = 210 where struserid = @CharID and @Class = 203
    update userdata set Class = 212 where struserid = @CharID and @Class = 204
     
    IF @@ERROR <> 0
    BEGIN
    ROLLBACK TRAN
    SET @nRet = 4
    RETURN
    END
     
    COMMIT TRAN
    SET @nRet = 0
    GO
    80 için böyle olucak ...
     
  12. ∂я šqℓ

    ∂я šqℓ BANNED BANNED

    Mesajlar:
    70
    Beğenilen Mesajlar:
    0
    Cevap: Oto Başlangıç [Level 83 Stat Verili Master ve Skiller açık ]


    Çok teşekkür ederim:cloud9:
     

Sayfayı Paylaş