Código:
CREATE Procedure [dbo].[PREMIAR_TOPS]
@Account varchar(10),
@Name varchar(10),
@WC int,
@WP int,
@GP int,
@XP int,
@VIP1 int,
@VIP2 int,
@VIP3 int,
@EVENTOS int
AS
BEGIN
SET NOCOUNT ON
SET XACT_ABORT ON
IF @WC > 0 or @WP > 0 or @GP > 0
BEGIN
UPDATE CashShopData
SET WCoinC = WCoinC + @WC, WCoinP = WCoinP + @WP, GoblinPoint = GoblinPoint + @GP where AccountID = @Account
END
IF @WC > 0
BEGIN
insert into log_creditos ( login, valor, ip, tipo ) values (@Account,@WC,'1','6')
END
IF @EVENTOS > 0 or @XP > 0
BEGIN
UPDATE Character
SET exp_war = exp_war + @XP, eventos = eventos + @EVENTOS where Name = @Name and AccountID = @Account
END
IF @VIP1 > 0
BEGIN
-- ADD VIP NA CONTA VIP_AL1
update memb_info set AccountExpireDate = AccountExpireDate+@VIP1 where memb___id = @Account and accountlevel = 1
-- ADD VIP NA CONTA VIP_AL0
update memb_info set accountlevel = 1, AccountExpireDate = (getdate())+@VIP1 where memb___id = @Account and accountlevel = 0
if (select COUNT(*) from MEMB_INFO where memb___id = @Account and AccountLevel = 1) > 0
Insert into log_vip (login,dias,tipo) values (@Account,@VIP1,'6' )
END
if @VIP2 > 0
BEGIN
-- ADD VIP NA CONTA VIP_AL2
update memb_info set AccountExpireDate = AccountExpireDate+@VIP2 where memb___id = @Account and accountlevel = 2
if (select COUNT(*) from MEMB_INFO where memb___id = @Account and AccountLevel = 2) > 0
Insert into log_vip (login,dias,tipo) values (@Account,@VIP2,'7' )
END
if @VIP3 > 0
BEGIN
-- ADD VIP NA CONTA VIP_AL3
update memb_info set AccountExpireDate = AccountExpireDate+@VIP3 where memb___id = @Account and accountlevel = 3
if (select COUNT(*) from MEMB_INFO where memb___id = @Account and AccountLevel = 3) > 0
Insert into log_vip (login,dias,tipo) values (@Account,@VIP3,'8' )
END
END
GO
CREATE Procedure [dbo].[PREMIAR_TOPS_MEDALHAS]
@Account varchar(10),
@Name varchar(10),
@MEDALHA int
AS
BEGIN
SET NOCOUNT ON
SET XACT_ABORT ON
IF @MEDALHA = 1
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_sresets=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_sresets) VALUES (@Account,@name,1)
END
IF @MEDALHA = 2
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_smresets=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_smresets) VALUES (@Account,@name,1)
END
IF @MEDALHA = 3
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_tempo=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_tempo) VALUES (@Account,@name,1)
END
IF @MEDALHA = 4
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_evento=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_evento) VALUES (@Account,@name,1)
END
IF @MEDALHA = 5
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_pk=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_pk) VALUES (@Account,@name,1)
END
IF @MEDALHA = 6
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_hr=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_hr) VALUES (@Account,@name,1)
END
IF @MEDALHA = 7
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_ds_s=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_ds_s) VALUES (@Account,@name,1)
END
IF @MEDALHA = 8
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_bc_s=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_bc_s) VALUES (@Account,@name,1)
END
IF @MEDALHA = 9
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_cc_s=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_cc_s) VALUES (@Account,@name,1)
END
IF @MEDALHA = 10
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_duel_semanal=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_duel_semanal) VALUES (@Account,@name,1)
END
IF @MEDALHA = 11
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_resets_m=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_resets_m) VALUES (@Account,@name,1)
END
IF @MEDALHA = 12
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_mresets_m=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_mresets_m) VALUES (@Account,@name,1)
END
IF @MEDALHA = 13
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_tempo_m=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_tempo_m) VALUES (@Account,@name,1)
END
IF @MEDALHA = 14
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_evento_m=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_evento_m) VALUES (@Account,@name,1)
END
IF @MEDALHA = 15
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_pk_m=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_pk_m) VALUES (@Account,@name,1)
END
IF @MEDALHA = 16
BEGIN
if exists (select login from mk_medalhas where login = @Account and name = @name)
UPDATE MK_MEDALHAS SET medal_hr_m=1 where name = @name
ELSE
INSERT INTO MK_MEDALHAS (login,name,medal_hr_m) VALUES (@Account,@name,1)
END
END
GO
INSERT INTO MK_SERVER (REI_DO_MK,recorde_on) VALUES (0,0)
GO