Forum Harici.Üye lik Sistemi Kaldırılmıştır |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Tüm SQL Analyzer Kodları İndirmeden Kullanın |
|
|
Oto Np SymboL 1 . Adım
PHP- Kodu:
CREATE PROCEDURE otonpsimgesi AS
/* webmsn */
declare @KNP int,
@HNP int
select @KNP = nKarusLoyalty from user_knights_rank where shindex = 6
select @HNP = nElmoLoyalty from user_knights_rank where shindex = 6
truncate table npkarus
insert npkarus
select top 30 strUserID, Loyalty, LoyaltyMonthly
from USERDATA
where Nation = 1 and Loyalty < @KNP
order by LoyaltyMonthly desc
truncate table nphuman
insert nphuman
select top 30 strUserID, Loyalty, LoyaltyMonthly
from USERDATA
where Nation = 2 and Loyalty < @HNP
order by LoyaltyMonthly desc
declare @Karusa varchar(21),
@Karusb varchar(21),
@Karusc varchar(21),
@Karusd varchar(21),
@Karuse varchar(21),
@Karusf varchar(21),
@Karusg varchar(21),
@Karush varchar(21),
@Karusi varchar(21),
@Karusj varchar(21),
@Karusk varchar(21),
@Karusl varchar(21),
@Karusm varchar(21),
@Karusn varchar(21),
@Karusu varchar(21),
@Karusv varchar(21),
@Karusy varchar(21),
@Karusx varchar(21),
@Karusw varchar(21),
@Karusz varchar(21),
@Karusab varchar(21),
@Karusac varchar(21),
@Karusad varchar(21),
@Karusae varchar(21),
@Karusaf varchar(21),
@Karusag varchar(21),
@Karusah varchar(21),
@Karusai varchar(21),
@Karusaj varchar(21),
@Karusak varchar(21),
@Elmoa varchar(21),
@Elmob varchar(21),
@Elmoc varchar(21),
@Elmod varchar(21),
@Elmoe varchar(21),
@Elmof varchar(21),
@Elmog varchar(21),
@Elmoh varchar(21),
@Elmoi varchar(21),
@Elmoj varchar(21),
@Elmok varchar(21),
@Elmol varchar(21),
@Elmom varchar(21),
@Elmon varchar(21),
@Elmou varchar(21),
@Elmov varchar(21),
@Elmoy varchar(21),
@Elmox varchar(21),
@Elmow varchar(21),
@Elmoz varchar(21),
@Elmoab varchar(21),
@Elmoac varchar(21),
@Elmoad varchar(21),
@Elmoae varchar(21),
@Elmoaf varchar(21),
@Elmoag varchar(21),
@Elmoah varchar(21),
@Elmoai varchar(21),
@Elmoaj varchar(21),
@Elmoak varchar(21)
select @Karusa = strUserID from npkarus where nRank = 1
select @Karusb = strUserID from npkarus where nRank = 2
select @Karusc = strUserID from npkarus where nRank = 3
select @Karusd = strUserID from npkarus where nRank = 4
select @Karuse = strUserID from npkarus where nRank = 5
select @Karusf = strUserID from npkarus where nRank = 6
select @Karusg = strUserID from npkarus where nRank = 7
select @Karush = strUserID from npkarus where nRank = 8
select @Karusi = strUserID from npkarus where nRank = 9
select @Karusj = strUserID from npkarus where nRank = 10
select @Karusk = strUserID from npkarus where nRank = 11
select @Karusl = strUserID from npkarus where nRank = 12
select @Karusm = strUserID from npkarus where nRank = 13
select @Karusn = strUserID from npkarus where nRank = 14
select @Karusu = strUserID from npkarus where nRank = 15
select @Karusv = strUserID from npkarus where nRank = 16
select @Karusy = strUserID from npkarus where nRank = 17
select @Karusx = strUserID from npkarus where nRank = 18
select @Karusw = strUserID from npkarus where nRank = 19
select @Karusz = strUserID from npkarus where nRank = 20
select @Karusab = strUserID from npkarus where nRank = 21
select @Karusac = strUserID from npkarus where nRank = 22
select @Karusad = strUserID from npkarus where nRank = 23
select @Karusae = strUserID from npkarus where nRank = 24
select @Karusaf = strUserID from npkarus where nRank = 25
select @Karusag = strUserID from npkarus where nRank = 26
select @Karusah = strUserID from npkarus where nRank = 27
select @Karusai = strUserID from npkarus where nRank = 28
select @Karusaj = strUserID from npkarus where nRank = 29
select @Karusak = strUserID from npkarus where nRank = 30
select @Elmoa = strUserID from nphuman where nRank = 1
select @Elmob = strUserID from nphuman where nRank = 2
select @Elmoc = strUserID from nphuman where nRank = 3
select @Elmod = strUserID from nphuman where nRank = 4
select @Elmoe = strUserID from nphuman where nRank = 5
select @Elmof = strUserID from nphuman where nRank = 6
select @Elmog = strUserID from nphuman where nRank = 7
select @Elmoh = strUserID from nphuman where nRank = 8
select @Elmoi = strUserID from nphuman where nRank = 9
select @Elmoj = strUserID from nphuman where nRank = 10
select @Elmok = strUserID from nphuman where nRank = 11
select @Elmol = strUserID from nphuman where nRank = 12
select @Elmom = strUserID from nphuman where nRank = 13
select @Elmon = strUserID from nphuman where nRank = 14
select @Elmou = strUserID from nphuman where nRank = 15
select @Elmov = strUserID from nphuman where nRank = 16
select @Elmoy = strUserID from nphuman where nRank = 17
select @Elmox = strUserID from nphuman where nRank = 18
select @Elmow = strUserID from nphuman where nRank = 19
select @Elmoz = strUserID from nphuman where nRank = 20
select @Elmoab = strUserID from nphuman where nRank = 21
select @Elmoac = strUserID from nphuman where nRank = 22
select @Elmoad = strUserID from nphuman where nRank = 23
select @Elmoae = strUserID from nphuman where nRank = 24
select @Elmoaf = strUserID from nphuman where nRank = 25
select @Elmoag = strUserID from nphuman where nRank = 26
select @Elmoah = strUserID from nphuman where nRank = 27
select @Elmoai = strUserID from nphuman where nRank = 28
select @Elmoaj = strUserID from nphuman where nRank = 29
select @Elmoak = strUserID from nphuman where nRank = 30
PHP- Kodu:
/* Güncelleme Yapıyoruz */
update user_personal_rank set strElmoUserID = @Elmoa, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoa), strKarusUserID = @karusa, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusa) where nRank = 1
update user_personal_rank set strElmoUserID = @Elmob, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmob), strKarusUserID = @karusb, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusb) where nRank = 2
update user_personal_rank set strElmoUserID = @Elmoc, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoc), strKarusUserID = @karusc, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusc) where nRank = 3
update user_personal_rank set strElmoUserID = @Elmod, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmod), strKarusUserID = @karusd, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusd) where nRank = 4
update user_personal_rank set strElmoUserID = @Elmoe, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoe), strKarusUserID = @karuse, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karuse) where nRank = 5
update user_personal_rank set strElmoUserID = @Elmof, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmof), strKarusUserID = @karusf, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusf) where nRank = 6
update user_personal_rank set strElmoUserID = @Elmog, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmog), strKarusUserID = @karusg, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusg) where nRank = 7
update user_personal_rank set strElmoUserID = @Elmoh, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoh), strKarusUserID = @karush, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karush) where nRank = 8
update user_personal_rank set strElmoUserID = @Elmoi, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoi), strKarusUserID = @karusi, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusi) where nRank = 9
update user_personal_rank set strElmoUserID = @Elmoj, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoj), strKarusUserID = @karusj, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusj) where nRank = 10
update user_personal_rank set strElmoUserID = @Elmok, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmok), strKarusUserID = @karusk, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusk) where nRank = 11
update user_personal_rank set strElmoUserID = @Elmol, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmol), strKarusUserID = @karusl, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusl) where nRank = 12
update user_personal_rank set strElmoUserID = @Elmom, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmom), strKarusUserID = @karusm, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusm) where nRank = 13
update user_personal_rank set strElmoUserID = @Elmon, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmon), strKarusUserID = @karusn, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusn) where nRank = 14
update user_personal_rank set strElmoUserID = @Elmou, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmou), strKarusUserID = @karusu, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusu) where nRank = 15
update user_personal_rank set strElmoUserID = @Elmov, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmov), strKarusUserID = @karusv, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusv) where nRank = 16
update user_personal_rank set strElmoUserID = @Elmoy, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoy), strKarusUserID = @karusy, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusy) where nRank = 17
update user_personal_rank set strElmoUserID = @Elmox, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmox), strKarusUserID = @karusx, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusx) where nRank = 18
update user_personal_rank set strElmoUserID = @Elmow, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmow), strKarusUserID = @karusw, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusw) where nRank = 19
update user_personal_rank set strElmoUserID = @Elmoz, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoz), strKarusUserID = @karusz, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusz) where nRank = 20
update user_personal_rank set strElmoUserID = @Elmoab, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoab), strKarusUserID = @karusab, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusab) where nRank = 21
update user_personal_rank set strElmoUserID = @Elmoac, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoac), strKarusUserID = @karusac, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusac) where nRank = 22
update user_personal_rank set strElmoUserID = @Elmoad, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoad), strKarusUserID = @karusad, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusad) where nRank = 23
update user_personal_rank set strElmoUserID = @Elmoae, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoae), strKarusUserID = @karusae, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusae) where nRank = 24
update user_personal_rank set strElmoUserID = @Elmoaf, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoaf), strKarusUserID = @karusaf, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusaf) where nRank = 25
update user_personal_rank set strElmoUserID = @Elmoag, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoag), strKarusUserID = @karusag, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusag) where nRank = 26
update user_personal_rank set strElmoUserID = @Elmoah, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoah), strKarusUserID = @karusah, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusah) where nRank = 27
update user_personal_rank set strElmoUserID = @Elmoai, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoai), strKarusUserID = @karusai, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusai) where nRank = 28
update user_personal_rank set strElmoUserID = @Elmoaj, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoaj), strKarusUserID = @karusaj, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusaj) where nRank = 29
update user_personal_rank set strElmoUserID = @Elmoak, nElmoLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @Elmoak), strKarusUserID = @karusak, nKarusLoyaltyMonthly = (select LoyaltyMonthly from userdata where struserid = @karusak) where nRank = 30
GO
PHP- Kodu:
Oto Np SymboL 2 . Adım
create table [nphuman]
(
[nRank] [int] IDENTITY (1, 1) NOT NULL ,
[strUserID] char(21) NOT NULL,
[Loyalty] int NOT NULL,
[LoyaltyMonthly] int NOT NULL,
)
create table [npkarus]
(
[nRank] [int] IDENTITY (1, 1) NOT NULL ,
[strUserID] char(21) NOT NULL,
[Loyalty] int NOT NULL,
[LoyaltyMonthly] int NOT NULL,
)
Oto SymboL 3 . Adım
PHP- Kodu:
exec imbacodermyst
exec Rank_Knights
exec np_icon
Oto Ban Sistemi
PHP- Kodu:
--Created SainTs 2008
--Kullanım: exec paraekle 'Char ADI ' , 'Para Miktarı'
Create Procedure paraekle
@userid varchar,
@para int
as
update userdata set gold = @para where struserid = @userid
GO
Server'e DeLos Eklemek
PHP- Kodu:
insert into [K_WARPINFO] Values (21,316,'Delos','Delos Desert',5000,30,529,5,253,5) insert into [K_WARPINFO] Values (21,416,'Delos','Delos Desert',5000,30,529,5,253,5) insert into [K_WARPINFO] Values (30,321,'Moradon','Delos Desert',0,21,315,0,400,10) insert into [K_WARPINFO] Values (30,301,'Moradon','Delos Desert',0,21,315,0,400,10) insert into [K_OBJECTEVENT] Values (30,4030,1,0,5,30,1,650,0,650) insert into [K_OBJECTEVENT] Values (30,4031,1,0,5,32,1,550,0,255) insert into [EVENT] Values (30,2001,0,1,1,1,1,1,32,50,30,1,1) insert into [ZONE_INFO] Values (2,30,'elmorad_1212.smd',15000,15000,15000,1,0,'war_a_ch') insert into [ZONE_INFO] Values (2,32,'elmorad_1212.smd',15000,15000,15000,1,0,'dungeon_b1_th')
Stat SıfırLama Relogla
PHP- Kodu:
CREATE PROCEDURE statduzelt
@oyunid varchar(21)
AS
Declare @lvl int, @point tinyint, @class int, @str int , @mp int, @hp int, @dex int
select @lvl = level, @point = points, @class = class, @str = Strong, @dex = Dex, @hp = Sta, @mp = Cha from userdata where StrUserID = @oyunid
--Warriorlar için..
IF ((@class = 106 or @class = 206) and @lvl >= 74 and @lvl <= 80 and @point >= 1 and @point <= 31 and @str < 71 and @hp < 71 and @Dex < 71 and @mp < 71)
Begin
Update Userdata Set Strong = Strong + @point + 1 , Points = 255 Where struserid = @oyunid
END
--Rogueler için..
PHP- Kodu:
IF ((@class = 108 or @class = 208) and @lvl >= 74 and @lvl <= 80 and @point >= 1 and @point <= 31 and @str < 71 and @hp < 71 and @Dex < 71 and @mp < 71)
Begin
Update Userdata Set Dex = Dex + @point + 1 , Points = 255 Where struserid = @oyunid
END
--Mageler için..
PHP- Kodu:
IF ((@class = 110 or @class = 210) and @lvl >= 74 and @lvl <= 80 and @point >= 1 and @point <= 31 and @str < 71 and @hp < 71 and @Dex < 71 and @mp < 71)
Begin
Update Userdata Set Cha = Cha + @point + 1 , Points = 255 Where struserid = @oyunid
END
--Priestler için..
PHP- Kodu:
IF ((@class = 112 or @class = 212) and @lvl >= 74 and @lvl <= 80 and @point >= 1 and @point <= 31 and @str < 71 and @hp < 71 and @Dex < 71 and @mp < 71)
Begin
Update Userdata Set Strong = Strong + @point + 1 , Points = 255 Where struserid = @oyunid
END
GO
Bunu yaptıktan sonra "exec statduzelt 'nick" yazdıktan sonra düzeliyor.
Biz relogda olsun istediğimiz için;
LOAD_USER_DATA da.
PHP- Kodu:
SELECT Nation, Race, Class, HairColor, Rank, Title, [Level], [Exp], Loyalty, Face, City, Knights, Fame,
Hp, Mp, Sp, Strong, Sta, Dex, Intel, Cha, Authority, Points, Gold, [Zone], Bind, PX, PZ, PY, dwTime, strSkill, strItem,strSerial, sQuestCount, strQuest, MannerPoint, LoyaltyMonthly
Bu kodların üstüne yani oto masterın altına
PHP- Kodu:
exec statduzelt @id
Tüm Char'ları Moradona Atmak
PHP- Kodu:
update Userdata set zone = '21'
Np İşareTi Ekleme
PHP- Kodu:
CREATE PROCEDURE np_icon
AS
DECLARE
--This script has been made by BERKİN GÜLER in 12.09.2007
--Bu script KOLTEAMSTS Tarafından 09.07.2008 Tarihinde YapıLmıştır
@berkin varchar(100),
@cigdm varchar(100),
@i int
BEGIN TRANSACTION
SELECT @berkin=strUserID FROM USERDATA WHERE Nation = '1' ORDER BY Loyalty
UPDATE USERDATA SET strUserID = '[D]' + @berkin WHERE strUserID = @berkin
SELECT @cigdm=strUserID FROM USERDATA WHERE Nation = '2' ORDER BY Loyalty
UPDATE USERDATA SET strUserID = '[D]' + @cigdm WHERE strUserID = @cigdm
IF @@error<>0
begin
rollback transaction
print 'Hata oluştu!'
end
else
begin
print 'ICON EKLEME ISLEMI BASARILI.'
print @berkin + 've' + @cigdm + ',' + '[D]' + @berkin + 've' + '[D]' + @cigdm + 'olarak degistirildi!'
end
COMMIT TRANSACTION
GO
User'lerin Tüm Np'sini Silme Kod'u
PHP- Kodu:
UPDATE USERDATA
SET Loyalty = 0
WHERE Authority = 1
Npc'de +9 İtem Satmak İstiyorsanız..!
PHP- Kodu:
update K_NPC set iSellingGroup = '199009'
where strName = 'Npc İsmi'
PHP- Kodu:
Dagger Defance İtemLeri Kaldırma
DELETE FROM ITEMEXT13 WHERE (dwID > 40) AND (dwID < 51)
DELETE FROM ITEMEXT13 WHERE (dwID > 70) AND (dwID < 81)
DELETE FROM ITEMEXT13 WHERE (dwID > 303) AND (dwID < 310)
DELETE FROM ITEMEXT13 WHERE (dwID > 312) AND (dwID < 319)
DELETE FROM ITEMEXT13 WHERE (dwID > 321) AND (dwID < 328)
DELETE FROM ITEMEXT13 WHERE (dwID > 330) AND (dwID < 337)
DELETE FROM ITEMEXT13 WHERE (dwID > 540) AND (dwID < 551)
DELETE FROM ITEMEXT14 WHERE (dwID > 40) AND (dwID < 51)
DELETE FROM ITEMEXT14 WHERE (dwID > 70) AND (dwID < 81)
DELETE FROM ITEMEXT14 WHERE (dwID > 303) AND (dwID < 310)
DELETE FROM ITEMEXT14 WHERE (dwID > 312) AND (dwID < 319)
DELETE FROM ITEMEXT14 WHERE (dwID > 321) AND (dwID < 328)
DELETE FROM ITEMEXT14 WHERE (dwID > 330) AND (dwID < 337)
DELETE FROM ITEMEXT14 WHERE (dwID > 540) AND (dwID < 551)
DELETE FROM ITEMEXT15 WHERE (dwID > 40) AND (dwID < 51)
DELETE FROM ITEMEXT15 WHERE (dwID > 70) AND (dwID < 81)
DELETE FROM ITEMEXT15 WHERE (dwID > 303) AND (dwID < 310)
DELETE FROM ITEMEXT15 WHERE (dwID > 312) AND (dwID < 319)
DELETE FROM ITEMEXT15 WHERE (dwID > 321) AND (dwID < 328)
DELETE FROM ITEMEXT15 WHERE (dwID > 330) AND (dwID < 337)
DELETE FROM ITEMEXT15 WHERE (dwID > 540) AND (dwID < 551)
DELETE FROM ITEMEXT16 WHERE (dwID > 40) AND (dwID < 51)
DELETE FROM ITEMEXT16 WHERE (dwID > 70) AND (dwID < 81)
DELETE FROM ITEMEXT16 WHERE (dwID > 303) AND (dwID < 310)
DELETE FROM ITEMEXT16 WHERE (dwID > 312) AND (dwID < 319)
DELETE FROM ITEMEXT16 WHERE (dwID > 321) AND (dwID < 328)
DELETE FROM ITEMEXT16 WHERE (dwID > 330) AND (dwID < 337)
DELETE FROM ITEMEXT16 WHERE (dwID > 540) AND (dwID < 551)
DELETE FROM ITEMEXT17 WHERE (dwID > 40) AND (dwID < 51)
DELETE FROM ITEMEXT17 WHERE (dwID > 70) AND (dwID < 81)
DELETE FROM ITEMEXT17 WHERE (dwID > 303) AND (dwID < 310)
DELETE FROM ITEMEXT17 WHERE (dwID > 312) AND (dwID < 319)
DELETE FROM ITEMEXT17 WHERE (dwID > 321) AND (dwID < 328)
DELETE FROM ITEMEXT17 WHERE (dwID > 330) AND (dwID < 337)
DELETE FROM ITEMEXT17 WHERE (dwID > 540) AND (dwID < 551)
Walkry Ekleme Kod'u
PHP- Kodu:
insert into [ITEM_BASIC] Values (203011000,13,'Valkyrie Pauldron ','Illuminates the northen sky emitting magnificent light',50800100,50801100,0,0,210,0,5,0,1,0,100,0,210,4200,720000,2,220,0,0,0,80,0,0,176,94,0,0,0,1)
insert into [ITEM_BASIC] Values (243011000,13,'Valkyrie Pauldron ','Illuminates the northen sky emitting magnificent light',50800100,50801100,0,0,220,0,5,0,2,0,100,0,124,4200,720000,2,176,0,0,0,80,0,0,0,94,176,0,0,1)
insert into [ITEM_BASIC] Values (263011000,13,'Valkyrie Pauldron ','Illuminates the northen sky emitting magnificent light',50800100,50801100,0,0,230,0,5,0,3,0,100,0,100,4200,720000,2,158,0,0,0,80,0,0,0,0,0,160,106,1)
insert into [ITEM_BASIC] Values (283011000,13,'Valkyrie Pauldron ','Illuminates the northen sky emitting magnificent light',50800100,50801100,0,0,240,0,5,0,4,0,100,0,134,4200,720000,2,190,0,0,0,80,0,0,94,0,0,176,0,1)
insert into [ITEM_BASIC] Values (203012000,14,'Valkyrie Pads ','Illuminates the northen sky emitting magnificent light',50800200,50801100,0,0,210,0,6,0,1,0,100,0,200,4200,432000,2,191,0,0,0,80,0,0,172,92,0,0,0,1)
insert into [ITEM_BASIC] Values (243012000,14,'Valkyrie Pads ','Illuminates the northen sky emitting magnificent light',50800200,50801100,0,0,220,0,6,0,2,0,100,0,110,4200,432000,2,152,0,0,0,80,0,0,0,92,172,0,0,1)
insert into [ITEM_BASIC] Values (263012000,14,'Valkyrie Pads ','Illuminates the northen sky emitting magnificent light',50800200,50801100,0,0,230,0,6,0,3,0,100,0,90,4200,432000,2,139,0,0,0,80,0,0,0,0,0,156,104,1)
insert into [ITEM_BASIC] Values (283012000,14,'Valkyrie Pads ','Illuminates the northen sky emitting magnificent light',50800200,50801100,0,0,240,0,6,0,4,0,100,0,118,4200,432000,2,166,0,0,0,80,0,0,92,0,0,172,0,1)
insert into [ITEM_BASIC] Values (202013000,15,'Valkyrie Helmet ','Illuminates the northen sky emitting magnificent light',50800300,50801300,0,0,210,0,7,0,1,0,100,0,182,4200,288000,2,153,0,0,0,80,0,0,168,90,0,0,0,1)
insert into [ITEM_BASIC] Values (242013000,15,'Valkyrie Helmet ','Illuminates the northen sky emitting magnificent light',50800300,50801300,0,0,220,0,7,0,2,0,100,0,91,4200,288000,2,127,0,0,0,80,0,0,0,90,168,0,0,1)
insert into [ITEM_BASIC] Values (262013000,15,'Valkyrie Helmet ','Illuminates the northen sky emitting magnificent light',50800300,50801300,0,0,230,0,7,0,3,0,100,0,75,4200,288000,2,117,0,0,0,80,0,0,0,0,0,152,102,1)
insert into [ITEM_BASIC] Values (282013000,15,'Valkyrie Helmet ','Illuminates the northen sky emitting magnificent light',50800300,50801300,0,0,240,0,7,0,4,0,100,0,93,4200,288000,2,134,0,0,0,80,0,0,90,0,0,168,0,1)
insert into [ITEM_BASIC] Values (203014000,16,'Valkyrie Gauntlet ','Illuminates the northen sky emitting magnificent light',50800400,50801100,0,0,210,0,8,0,1,0,100,0,160,4200,144000,2,115,0,0,0,80,0,0,160,86,0,0,0,1)
insert into [ITEM_BASIC] Values (243014000,16,'Valkyrie Gauntlet ','Illuminates the northen sky emitting magnificent light',50800400,50801100,0,0,220,0,8,0,2,0,100,0,75,4200,144000,2,96,0,0,0,80,0,0,0,86,160,0,0,1)
insert into [ITEM_BASIC] Values (263014000,16,'Valkyrie Gauntlet ','Illuminates the northen sky emitting magnificent light',50800400,50801100,0,0,230,0,8,0,3,0,100,0,60,4200,144000,2,90,0,0,0,80,0,0,0,0,0,144,98,1)
insert into [ITEM_BASIC] Values (283014000,16,'Valkyrie Gauntlet ','Illuminates the northen sky emitting magnificent light',50800400,50801100,0,0,240,0,8,0,4,0,100,0,78,4200,144000,2,101,0,0,0,80,0,0,86,0,0,160,0,1)
insert into [ITEM_BASIC] Values (203015000,17,'Valkyrie Boots ','Illuminates the northen sky emitting magnificent light',50800500,50801100,0,0,210,0,9,0,1,0,100,0,157,4200,144000,2,115,0,0,0,80,0,0,164,88,0,0,0,1)
insert into [ITEM_BASIC] Values (243015000,17,'Valkyrie Boots ','Illuminates the northen sky emitting magnificent light',50800500,50801100,0,0,220,0,9,0,2,0,100,0,71,4200,144000,2,96,0,0,0,80,0,0,0,88,164,0,0,1)
insert into [ITEM_BASIC] Values (263015000,17,'Valkyrie Boots ','Illuminates the northen sky emitting magnificent light',50800500,50801100,0,0,230,0,9,0,3,0,100,0,56,4200,144000,2,90,0,0,0,80,0,0,0,0,0,148,100,1)
insert into [ITEM_BASIC] Values (283015000,17,'Valkyrie Boots ','Illuminates the northen sky emitting magnificent light',50800500,50801100,0,0,240,0,9,0,4,0,100,0,75,4200,144000,2,101,0,0,0,80,0,0,88,0,0,164,0,1)
Rogue 75 Skill Bugu Fixed
PHP- Kodu:
update MAGIC_TYPE2
set AddDamagePlus = 1
where NeedArrow = 1 or NeedArrow = 3 or NeedArrow = 5
Npc Silme Kod'u
PHP- Kodu:
DELETE FROM K_NPC
WHERE (sSid = 26041) OR
(sSid = 26041)
DELETE FROM K_NPC
WHERE (sSid = 16080) OR
(sSid = 16080)
DELETE FROM K_NPC
WHERE (sSid = 14402) OR
(sSid = 14402)
DELETE FROM K_NPC
WHERE (sSid = 14403) OR
(sSid = 14403)
DELETE FROM K_NPC
WHERE (sSid = 14415) OR
(sSid = 14415)
DELETE FROM K_NPC
WHERE (sSid = 14416) OR
(sSid = 14416)
DELETE FROM K_NPC
WHERE (sSid = 16011) OR
(sSid = 16011)
DELETE FROM K_NPC
WHERE (sSid = 16086) OR
(sSid = 16086)
DELETE FROM K_NPC
WHERE (sSid = 26011) OR
(sSid = 26011)
DELETE FROM K_NPC
WHERE (sSid = 13014) OR
(sSid = 13014)
DELETE FROM K_NPC
WHERE (sSid = 14301) OR
(sSid = 14301)
DELETE FROM K_NPC
WHERE (sSid = 16079) OR
(sSid = 16079)
DELETE FROM K_NPCPOS
WHERE (NpcID = 26041) OR
(NpcID = 26041)
DELETE FROM K_NPCPOS
WHERE (NpcID = 16080) OR
(NpcID = 16080)
DELETE FROM K_NPCPOS
WHERE (NpcID = 14402) OR
(NpcID = 14402)
DELETE FROM K_NPCPOS
WHERE (NpcID = 14403) OR
(NpcID = 14403)
DELETE FROM K_NPCPOS
WHERE (NpcID = 16079) OR
(NpcID = 16079)
DELETE FROM K_NPCPOS
WHERE (NpcID = 14415) OR
(NpcID = 14415)
DELETE FROM K_NPCPOS
WHERE (NpcID = 14416) OR
(NpcID = 14416)
DELETE FROM K_NPCPOS
WHERE (NpcID = 16011) OR
(NpcID = 16011)
DELETE FROM K_NPCPOS
WHERE (NpcID = 16086) OR
(NpcID = 16086)
DELETE FROM K_NPCPOS
WHERE (NpcID = 26011) OR
(NpcID = 26011)
DELETE FROM K_NPCPOS
WHERE (NpcID = 13014) OR
(NpcID = 13014)
DELETE FROM K_NPCPOS
WHERE (NpcID = 14301) OR
(NpcID = 14301)
İlk 5 Clan G0 Diğerleri G1 Yapmak
PHP- Kodu:
-- Bu Kod slmmurat1995 - gsmrt150 tarafından yapılmıştır
CREATE PROCEDURE ilk5g0 AS
exec rank_knights
update knights set points = '999999',ranking = '0'
update knights set points = '999999',ranking = '1'
where idname = (Select strname from KNIGHTS_RATING where nrank = 1)
update knights set points = '999999',ranking = '1'
where idname = (Select strname from KNIGHTS_RATING where nrank = 2)
update knights set points = '999999',ranking = '1'
where idname = (Select strname from KNIGHTS_RATING where nrank = 3)
update knights set points = '999999',ranking = '1'
where idname = (Select strname from KNIGHTS_RATING where nrank = 4)
update knights set points = '999999',ranking = '1'
where idname = (Select strname from KNIGHTS_RATING where nrank = 5)
GO
Patos Glave
PHP- Kodu:
910025342 Patos Glave 70 4 0 2 169 150 400 40 5000 191899 0 0 0 0 0 1 99 0 0 0 0 200 0 0 0 5 0 0 0 0 0 0 0 0 0 0 150 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
User Sınırına Göre Premium Check
PHP- Kodu:
CREATE PROCEDURE [dbo].[ACCOUNT_LOGIN]
@AccountID varchar(21),
@Password varchar(13),
@nRet smallintOUTPUT
AS
--NecromanceR Ko-Cuce 2008 Pre Kontrol
DECLARE @Nation tinyint, @CharNum smallint,@kisi smallint , @PremyName varchar(21)
SET @Nation = 0
SET @CharNum = 0
DECLARE @pwd varchar(13)
SET @pwd =null
SELECT @pwd = strPasswd FROM TB_USER WHERE strAccountID = @AccountID and idays>0
IF @pwd ISnull
BEGIN
--SET @nRet = 0
SET @nRet = 4
RETURN
END
ELSEIF @pwd <> @Password
BEGIN
--SET @nRet = 0
SET @nRet = 3
RETURN
END
--Bu Kısım By_ArmatadH Tarafından Editlenmiştir!
select @PremyName = strAccountID from PremiumCheck where strAccountID = @AccountID
select @kisi = count(straccountid) from currentuser
delete from PremiumCheck where strAccountID = @AccountID
begin
insert into PremiumCheck (strAccountID) VALUES (@AccountID)
end
IF @kisi>100 and @PremyName = 0 --Burayı Kendinize Göre Editleyiniz...User Sınırı Doldugunda Check Veriyor
BEGIN
SET @nRet = 12
RETURN
END
SELECT @Nation = bNation, @CharNum = bCharNum FROM ACCOUNT_CHAR WHERE strAccountID = @AccountID
IF@@ROWCOUNT= 0
BEGIN
SET @nRet = 1
RETURN
END
IF @CharNum = 0
BEGIN
SET @nRet = 1
RETURN
END
ELSE
BEGIN
SET @nRet = 1
RETURN
END
Necromancerin Premium Check Tablosu Olusturmak ;
PHP- Kodu:
CREATE TABLE [dbo].[PremiumCheck](
[strAccountID] [varchar](21) COLLATE Latin1_General_CI_AI NOT NULL
) ON [PRIMARY]
Başlangıç İtemleri Değiştirmek
Eklenmesi Gereken 1. ve Önemli Kod:
PHP- Kodu:
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[baslangic_duzenle]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[baslangic_duzenle]
GO
CREATE TABLE [dbo].[baslangic_duzenle] (
[dwid] [int] NULL ,
[stacksize] [smallint] NULL ,
[durability] [smallint] NULL ,
[strUserId] [varchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[sira] [int] NULL ,
[itembasicname] [varchar] (100) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,
[strSerial] [int] NULL
) ON [PRIMARY]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[baslangic]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[baslangic]
GO
CREATE TABLE [dbo].[baslangic] (
[class] [smallint] NULL ,
[stritem] [varchar] (400) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY]
GO
-- Ko-Cuce 2008
insert into baslangic values ('5' , ':ø~')
insert into baslangic values ('6' , ':ø~')
insert into baslangic values ('7' , ':ø~')
insert into baslangic values ('5' , ':ø~')
insert into baslangic values ('1' , '' )
insert into baslangic values ('2' , '' )
insert into baslangic values ('3' , '' )
insert into baslangic values ('4' , '' )
Eklenmesi Gereken 2. Kod:
PHP- Kodu:
--bu procedure Maktiris1536 tarafından eylenmiştir..
-- Başlangıç itemlerine Uyarlandı (Ganks)
--KO-Cuce.com 2008
CREATE procedure baslangicitemleri_bul
@StrUserID int
AS
DECLARE
@length int, -- stritem uzunluğu
@i int, -- item'in stritem deki yeri
@dwid int,
@dur int,
@duar int,
@Kocuce int,
@StackSize1 int,
@Sira int,
@Row int,
@name varchar(100),
@extname varchar(100),
@ext int,
@strSerial int
set @i = 14*0+1
set @length = 401
select @Row=count(*) from baslangic where class=@StrUserID
delete from baslangic_duzenle where struserid=@StrUserID
if @Row>0
begin
WHILE @i < @length
Begin
--Buraya İşemek Yasaktır
-- Burası Türkiye :o ( herkez işeyebilir )
Select @dwid=cast(cast(substring(cast(substring(strItem, @i,4) as varbinary(4)), 4, 1)+substring(cast(substring(strItem, @i,4) as varbinary(4)), 3, 1)+substring(cast(substring(strItem, @i,4) as varbinary(4)), 2, 1)+substring(cast(substring(strItem, @i,4) as varbinary(4)), 1, 1) as varbinary(4)) as int(4)),
@dur = cast(cast(cast( substring(strItem, @i+5, 1) as varbinary(1))+cast(substring(strItem, @i+4, 1) as varbinary(1)) as varbinary(2)) as smallint),
@StackSize1 = cast(cast(cast( substring(strItem, @i+7, 1) as varbinary(1))+cast(substring(strItem, @i+6, 1) as varbinary(1)) as varbinary(2)) as smallint),
@StrUserID = class
From baslangic
Where class = @StrUserID
if @dwid=0
begin
set @extname='~~~~~~ item yok ~~~~~~'
set @name='~~~~~~ item yok ~~~~~~'
end
else
begin
set @extname='Bulunamadi
select @extname=strname from item where num=@dwid
end
insert into baslangic_duzenle (dwid,stacksize,durability,struserid,sira,itembasicname) values(@dwid,@StackSize1,@dur,@StrUserID,(@i-1) / 8,@extname )
set @i=@i+8
end
select * from baslangic_duzenle where struserid=@StrUserID order by sira
end
GO
Eklenmesi Gereken 3. Kod:
PHP- Kodu:
CREATE procedure baslangicitemleri_kaydet
-- Created by Matrix1536
-- Pisci by Aküma
-- Başlangıc itemi Uyarlama - Ganks
@StrUserID int
AS
DECLARE
@length int, -- stritem uzunluğu
@row int, -- yerine göre deişior.
@i int, -- itemin stritem deki yeri
@dwid int, -- dwid
@pos int,
@dur int,
@dur1 int,
@Kocuce int,
@ext int,
@StackSize1 int,
@strName varchar(30),
@strExtName varchar(30),
@strSerial int,
@CstrSerial varbinary(4),
@Cdwid varbinary(4),
@Cdur varchar(2),
@Source tinyint,
@NEWdwid int,
@StackSize int,
@Cstack varchar(2),
@sira int
set @sira=0
set @i = 14*0
set @length = 401
select @row=count( * ) from baslangic where class=@StrUserID
if @row>0
begin
Select @dwid=dwid,
@dur = durability,
@StackSize1 = stacksize,
@StrUserID = strUserID
From baslangic_duzenle
Where strUserID = @StrUserID and sira=@sira
print @dwid
Set @Cdwid = Substring(cast(@dwid as varbinary(4)), 4, 1) + Substring(cast(@dwid as varbinary(4)), 3, 1) + Substring(cast(@dwid as varbinary(4)), 2, 1) + Substring(cast(@dwid as varbinary(4)), 1, 1)
Set @Cdur = cast(Substring(cast(@dur as varbinary(2)), 2, 1)+Substring(cast(@dur as varbinary(2)), 1, 1) as varchar(2))
Set @Cstack = cast(Substring(cast(@StackSize1 as varbinary(2)), 2, 1)+Substring(cast(@StackSize1 as varbinary(2)), 1, 1) as varchar(2))
update UserData set
strItem = cast(cast(cast(@Cdwid as varchar(4)) + @Cdur + @Cstack as varchar(8)) as binary(400))
where class = @StrUserID
set @i=@i+8
set @sira=@sira+1
WHILE @sira < 50
Begin
Select @dwid=dwid,
@dur = durability,
@StackSize1 = stacksize,
@StrUserID = strUserID
From baslangic_duzenle
Where strUserID = @StrUserID and sira=@sira
Set @Cdwid = Substring(cast(@dwid as varbinary(4)), 4, 1) + Substring(cast(@dwid as varbinary(4)), 3, 1) + Substring(cast(@dwid as varbinary(4)), 2, 1) + Substring(cast(@dwid as varbinary(4)), 1, 1)
Set @Cdur = cast(Substring(cast(@dur as varbinary(2)), 2, 1)+Substring(cast(@dur as varbinary(2)), 1, 1) as varchar(2))
Set @Cstack = cast(Substring(cast(@StackSize1 as varbinary(2)), 2, 1)+Substring(cast(@StackSize1 as varbinary(2)), 1, 1) as varchar(2))
set @CstrSerial = Substring(cast(@strSerial as varbinary(4)), 4, 1) + Substring(cast(@strSerial as varbinary(4)), 3, 1) + Substring(cast(@strSerial as varbinary(4)), 2, 1) + Substring(cast(@strSerial as varbinary(4)), 1, 1)
--KO-Cuce.com 2008
update baslangic set
strItem = cast(substring(strItem, 1, @i) + cast(cast(@Cdwid as varchar(4)) + @Cdur + @Cstack as varchar(8)) + substring(strItem, @i+8, 401-@i) as binary(400))
where class = @StrUserID
--Buraya İşemek Yasaktır
set @i=@i+8
set @sira=@sira+1
end
end
GO
Eklenmesi Gereken 4. Kod:
PHP- Kodu:
--Edited By ganks...
-- KO-CUCE.com için yapılmıştır...
CREATE PROCEDURE baslangicitem
@account varchar(21)
AS
begin
declare @class smallint
select @class = cast(substring(cast(class as varchar(3)),2,2) as smallint(2)) from userdata where struserid=@account
if @class=1 or @class=5 or @class=6
set @class = 1
if @class=2 or @class=7 or @class=8
set @class = 2
if @class=3 or @class=9 or @class=10
set @class = 3
if @class=4 or @class=11 or @class=12
set @class = 4
update userdata set stritem = (select stritem from baslangic where class=@class) where struserid=@account
end
GO
Eğer Başlangıç İtem Değiştirme v1 Kurulu ise , 4. Kodu Girmeyebilirsiniz. Yani Prosedürlerde baslangicitem prosedürü var ise.
Uygulanması gereken Kod:
PHP- Kodu:
/****** Object: Stored Procedure dbo.CREATE_NEW_CHAR Script Date: 6/6/2006 6:03:33 PM ******/
/****** 개체: 저장 프로시저 dbo.CREATE_NEW_CHAR 스크립트 날짜: 2002-11-14 오전 11:18:03 ******/
-- scripted by samma
-- 2002.01.17
-- 2003.02.06 sungyong
ALTER 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 = @Nation
SET @Zone=21
SELECT @PosX = InitX, @PosZ = InitZ FROM ZONE_INFO WHERE ZoneNo = @Zone
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
IF @@ERROR <> 0
BEGIN
ROLLBACK TRAN
SET @nRet = 4
RETURN
END
COMMIT TRAN
SET @nRet = 0
GO
Class Sayıları
PHP- Kodu:
2 = Rogue
1 = warrior
3 = Mage
4 = priest
Öncelikle başlangıç itemlerini Buluyoruz.
PHP- Kodu:
exec baslangicitemleri_bul 'ClassSayısı'
sonra , baslangic_duzenle tablosundan Gerekli itemleri ekliyoruz. invertory editor kullanmasını bilirsiniz. ama Program değil , Tablo olarak .
ve Gerekli itemleri değiştirip , ekledikten sonra Kaydetmeliyiz..
PHP- Kodu:
exec baslangicitemleri_kaydet 'BulunanClassSayısı'
Konuyu Daha Detaylı Okumak İsteyenlere
Burdan
Bugsuz Oyun İçi Ncs
PHP- Kodu:
CREATE PROCEDURE CHANGE_NEW_ID
@byType char(21),
@AccountID char(21),
@charid char(21),
@newid char(21),
@nRet smallint output
as
-- created by hasan 20/06/2008 reason : can skintisi
-- sanirim dahasi yok bütün hepsini updateledik.
--fixed dupid by Cecil
--Düzenleme TheDark
DECLARE @dupid INT
SELECT @dupid = struserid FROM [userdata] WHERE [struserid] = @newid
if @dupid = 1
BEGIN
SET @nRet = 1
RETURN
END
BEGIN
BEGIN TRAN
DELETE FROM userdata WHERE struserid = @newid
END
BEGIN
update userdata set strUserID = @newid where strUserID = @charid
update currentuser set strCharID = @newid where strCharID = @charid
update friend_list set strUserID = @newid where strUserID = @charid
update king_ballot_box set strCharID = @newid where strCharID = @charid
update king_candidacy_notice_board set strUserID = @newid where strUserID = @charid
update king_election_list set strName = @newid where strName = @charid
update king_system set strKingName = @newid where strKingName = @charid
update rental_item set strLenderCharID = @newid where strLenderCharID = @charid
update rental_item set strBorrowerCharID = @newid where strBorrowerCharID = @charid
update rental_item_list set strBorrowerCharID = @newid where strBorrowerCharID = @charid
update account_char set strCharID1 = @newid where strCharID1 = @charid
update account_char set strCharID2 = @newid where strCharID2 = @charid
update account_char set strCharID3 = @newid where strCharID3 = @charid
end
GO
IRK Değiştirme
PHP- Kodu:
CREATE PROCEDURE [dbo].[ACCOUNT_NATION_CHANGE]
@strAccountID as varchar(40),
@Nation as tinyint
AS
/*
Author : Ceribrio
*/
DECLARE @strNation tinyint,@Class int,@Race int,@strCharID1 char(21), @strCharID2 char(21), @strCharID3 char(21)
SELECT @strNation = bNation,@strCharID1 = strCharID1,@strCharID2 = strCharID2,@strCharID3 = strCharID3 FROM ACCOUNT_CHAR WHERE strAccountID = @strAccountID
SET @Class = null
SET @Race = null
IF @Nation = 1 and @strNation = 2
BEGIN
SELECT @Class = Class,@Race = Race FROM USERDATA WHERE strUserID = @strCharID1
IF @Class = 201 OR @Class = 205 OR @Class = 206
BEGIN
SET @Race = 1
END
IF @Class = 202 OR @Class = 207 OR @Class = 208
BEGIN
SET @Race = 2
END
IF @Class = 203 OR @Class = 209 OR @Class = 210
BEGIN
SET @Race = 3
END
IF @Class = 204 OR @Class = 211 OR @Class = 212
BEGIN
IF @Race = 12
BEGIN
SET @Race = 4
END
ELSE
BEGIN
SET @Race = 2
END
END
UPDATE USERDATA SET Nation = @Nation,Race = @Race,Class = @Class - 100 WHERE strUserID = @strCharID1
DELETE FROM KNIGHTS_USER WHERE strUserID = @strCharID1
SELECT @Class = Class,@Race = Race FROM USERDATA WHERE strUserID = @strCharID2
IF @Class = 201 OR @Class = 205 OR @Class = 206
BEGIN
SET @Race = 1
END
IF @Class = 202 OR @Class = 207 OR @Class = 208
BEGIN
SET @Race = 2
END
IF @Class = 203 OR @Class = 209 OR @Class = 210
BEGIN
SET @Race = 3
END
IF @Class = 204 OR @Class = 211 OR @Class = 212
BEGIN
IF @Race = 12
BEGIN
SET @Race = 4
END
ELSE
BEGIN
SET @Race = 2
END
END
UPDATE USERDATA SET Nation = @Nation,Race = @Race,Class = @Class - 100 WHERE strUserID = @strCharID2
DELETE FROM KNIGHTS_USER WHERE strUserID = @strCharID2
SELECT @Class = Class,@Race = Race FROM USERDATA WHERE strUserID = @strCharID3
IF @Class = 201 OR @Class = 205 OR @Class = 206
BEGIN
SET @Race = 1
END
IF @Class = 202 OR @Class = 207 OR @Class = 208
BEGIN
SET @Race = 2
END
IF @Class = 203 OR @Class = 209 OR @Class = 210
BEGIN
SET @Race = 3
END
IF @Class = 204 OR @Class = 211 OR @Class = 212
BEGIN
IF @Race = 12
BEGIN
SET @Race = 4
END
ELSE
BEGIN
SET @Race = 2
END
END
UPDATE USERDATA SET Nation = @Nation,Race = @Race,Class = @Class - 100 WHERE strUserID = @strCharID3
DELETE FROM KNIGHTS_USER WHERE strUserID = @strCharID3
UPDATE ACCOUNT_CHAR SET bNation = @Nation WHERE strAccountID = @strAccountID
END
IF @Nation = 2 and @strNation = 1
BEGIN
SELECT @Class = Class,@Race = Race FROM USERDATA WHERE strUserID = @strCharID1
IF @Class = 101 OR @Class = 105 OR @Class = 106
BEGIN
SET @Race = 12
END
IF @Class = 102 OR @Class = 107 OR @Class = 108
BEGIN
SET @Race = 12
END
IF @Class = 103 OR @Class = 109 OR @Class = 110
BEGIN
SET @Race = 12
END
IF @Class = 104 OR @Class = 111 OR @Class = 112
BEGIN
IF @Race = 4
BEGIN
SET @Race = 12
END
ELSE
BEGIN
SET @Race = 13
END
END
UPDATE USERDATA SET Nation = @Nation,Race = @Race,Class = @Class + 100 WHERE strUserID = @strCharID1
DELETE FROM KNIGHTS_USER WHERE strUserID = @strCharID1
SELECT @Class = Class,@Race = Race FROM USERDATA WHERE strUserID = @strCharID2
IF @Class = 101 OR @Class = 105 OR @Class = 106
BEGIN
SET @Race = 12
END
IF @Class = 102 OR @Class = 107 OR @Class = 108
BEGIN
SET @Race = 12
END
IF @Class = 103 OR @Class = 109 OR @Class = 110
BEGIN
SET @Race = 12
END
IF @Class = 104 OR @Class = 111 OR @Class = 112
BEGIN
IF @Race = 4
BEGIN
SET @Race = 12
END
ELSE
BEGIN
SET @Race = 13
END
END
UPDATE USERDATA SET Nation = @Nation,Race = @Race,Class = @Class + 100 WHERE strUserID = @strCharID2
DELETE FROM KNIGHTS_USER WHERE strUserID = @strCharID2
SELECT @Class = Class,@Race = Race FROM USERDATA WHERE strUserID = @strCharID3
IF @Class = 101 OR @Class = 105 OR @Class = 106
BEGIN
SET @Race = 12
END
IF @Class = 102 OR @Class = 107 OR @Class = 108
BEGIN
SET @Race = 12
END
IF @Class = 103 OR @Class = 109 OR @Class = 110
BEGIN
SET @Race = 12
END
IF @Class = 104 OR @Class = 111 OR @Class = 112
BEGIN
IF @Race = 4
BEGIN
SET @Race = 12
END
ELSE
BEGIN
SET @Race = 13
END
END
UPDATE USERDATA SET Nation = @Nation,Race = @Race,Class = @Class + 100 WHERE strUserID = @strCharID3
DELETE FROM KNIGHTS_USER WHERE strUserID = @strCharID3
UPDATE ACCOUNT_CHAR SET bNation = @Nation WHERE strAccountID = @strAccountID
END
PHP- Kodu:
EXEC ACCOUNT_NATION_CHANGE 'HESABIDSI','IRKNUMARASI'
KING_SYSTEM (Tamamiyle Otomatik Krallık Sistemi)
PHP- Kodu:
-- Krallıkla İlgili Tablolarımızı Temizliyoruz...
TRUNCATE TABLE KING_BALLOT_BOX
TRUNCATE TABLE KING_ELECTION_LIST
TRUNCATE TABLE KING_SYSTEM
TRUNCATE TABLE KING_CANDIDACY_NOTICE_BOARD
-- Önce Clanlarımızın Ranklarını Güncelliyoruz...
EXEC RANK_KNIGHTS
-- Karus İlk 10 Clan Liderini, Kral Adayı Gösteriyoruz...
INSERT INTO KING_ELECTION_LIST SELECT TOP 10 4,1,IDNum,Chief,0 FROM KNIGHTS WHERE Nation = 1 ORDER BY Points DESC
-- El Morad İlk 10 Clan Liderini, Kral Adayı Gösteriyoruz...
INSERT INTO KING_ELECTION_LIST SELECT TOP 10 4,2,IDNum,Chief,0 FROM KNIGHTS WHERE Nation = 2 ORDER BY Points DESC
-- KING_SYSTEMi Güncelliyoruz...
DECLARE @Day tinyint
DECLARE @Month tinyint
DECLARE @Year smallint
SET @Day = DAY(GETDATE())
SET @Month = MONTH(GETDATE())
SET @Year = YEAR(GETDATE())
INSERT INTO KING_SYSTEM VALUES(1,3,@Year,@Month,@Day,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,10,2100000000,2100000000,NULL,NULL)
INSERT INTO KING_SYSTEM VALUES(2,3,@Year,@Month,@Day,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,10,2100000000,2100000000,NULL,NULL)
Savaş Bugunu %100 Fixleyin. [Warder Kesince Notice geçiyor ve NP veriyor]
1
PHP- Kodu:
DELETE
FROM K_NPC
WHERE (strName = 'warder 1') OR
(strName = 'warder 2') OR
(strName = 'keeper')
2
PHP- Kodu:
DELETE
FROM K_NPCPOS
WHERE (ZoneID = 102) AND (NpcID = 21045) OR
(ZoneID = 102) AND (NpcID = 21041) OR
(ZoneID = 102) AND (NpcID = 21042) OR
(ZoneID = 102) AND (NpcID = 11041) OR
(ZoneID = 102) AND (NpcID = 11042) OR
(ZoneID = 102) AND (NpcID = 11047) OR
(ZoneID = 103) AND (NpcID = 21045) OR
(ZoneID = 101) AND (NpcID = 21045)
3
PHP- Kodu:
INSERT INTO [K_NPCPOS] Values(103,21045,104,1,3,91,0,670,143,671,142,670,144,672,142,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(101,21045,104,1,3,91,0,597,300,600,297,596,301,601,296,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(102,21045,104,1,3,91,0,176,455,178,453,167,465,188,446,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(102,11047,104,1,5,93,0,807,545,810,542,794,548,814,530,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(102,21041,104,1,1,98,0,73,77,76,75,64,84,82,66,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(102,21042,104,1,2,90,0,450,188,453,186,444,193,461,179,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(102,11041,104,1,6,99,0,947,949,949,946,944,952,952,943,1,30,0,0,NULL)
INSERT INTO [K_NPCPOS] Values(102,11042,104,1,4,92,0,554,816,557,813,541,819,560,801,1,30,0,0,NULL)
4
PHP- Kodu:
INSERT INTO [K_NPC] Values(11041,'Keeper',11610,100,120310049,170450000,2,7,11,1,1,2,0,80,0,0,215000,0,0,15000,375,375,5000,1500,2,7,1000,0,0,0,100,100,100,100,100,100,100,90,7,14,35,2000,21011,0,0,1)
INSERT INTO [K_NPC] Values(11042,'Warder 1',11610,100,120710049,170450000,2,7,11,1,1,2,0,70,0,0,150000,0,0,10000,275,275,4000,1500,2,7,1000,0,0,0,100,100,100,100,100,100,100,90,7,14,35,1000,21011,0,0,1)
INSERT INTO [K_NPC] Values(11047,'Warder 2',11610,100,120710049,170450000,2,7,11,1,1,2,0,70,0,0,150000,0,0,10000,275,275,4000,1500,2,7,1000,0,0,0,100,100,100,100,100,100,100,90,7,14,35,1000,21011,0,0,1)
INSERT INTO [K_NPC] Values(21042,'Warder 1',21610,100,130450179,170450000,1,7,11,1,1,2,0,70,0,0,150000,0,0,10000,275,275,6000,1500,2,7,1000,0,0,0,100,100,100,100,100,100,100,90,7,14,35,1000,21011,0,0,1)
INSERT INTO [K_NPC] Values(21045,'Warder 2',21610,100,130450179,170450000,1,7,11,1,1,2,0,70,0,0,150000,0,0,10000,275,275,6000,1500,2,7,1000,0,0,0,100,100,100,100,100,100,100,90,7,14,35,1000,21011,0,0,1)
INSERT INTO [K_NPC] Values(21041,'Keeper',21610,100,130650179,170450000,1,7,11,1,1,2,0,80,0,0,215000,0,0,15000,375,375,8000,1500,2,7,1000,0,0,0,100,100,100,100,100,100,100,90,7,14,35,2000,21011,0,0,1)
5
PHP- Kodu:
update zone_info set roomevent = '101'
where zoneno = '101'
go
update zone_info set roomevent = '102'
where zoneno = '102'
go
update zone_info set roomevent = '103'
where zoneno = '103'
Evt Dosyaları
|
|
|
|
|
|
|
(HACKEROO1)
Sitede yayınlanan yazılar ve bilgiler izinsiz kullanılamaz.
Sitede sunulan programları kurmadan/çalıştırmadan önce virüs taramasından geçiriniz.
Programların kullanımları sonucu oluşabilecek zararlardan hackeroo1 sorum lu degildir.
Yasal Uyarı
Bu site ismi verilen dosyaların kendilerini barındırmamaktadır ve sorumlulukları kaynaklara aittir. Hak sahibinin talebi durumunda derhal sitemizden kaldırılacaktır. Sitede verilen linklerin yasalara aykırı kullanımı karşısında oluşabilecek hiçbir sorundan HACKEROO1.TR.GG Sorumlu DEĞİLDİR
|
|
|
|
|