PDA

View Full Version : |Jobs/Query| Prêmiar todos online IP unico



maniacoo
07-19-2022, 09:25 PM
Job que desenvolvi para premiar todos os players online, apenas um IP por premio, assim impedindo que as pessoas loguem várias contas para ganhar vários prêmios.

Caso seja uma lan house ou internet compartilhada apenas uma pessoa vai ganhar aleatoriamente.



Use Muonline
Go

Declare @login varchar(20),@ip varchar(20), @test int

set @test = 0
DECLARE LISTA CURSOR LOCAL FOR
SELECT distinct(IP) FROM memb_stat where connectstat=1
OPEN LISTA
FETCH NEXT FROM LISTA INTO @ip
WHILE @@FETCH_STATUS = 0
begin

set @login = (select top 1 memb___id from MEMB_STAT where IP = @ip and ConnectStat=1)

update CashShopData set WCoinC = WCoinC+50, WCoinP = WCoinP+2000, GoblinPoint = GoblinPoint+5000 where AccountID = @login

print @ip
print @login

set @test = @test+1

FETCH NEXT FROM LISTA INTO @ip
end
CLOSE LISTA
DEALLOCATE LISTA

print @test


Defina seu premio onde está em vermelho

Abraço

lhpa
09-21-2023, 06:38 AM
Muito obrigado pela contribuição