Prêmiar todos online IP unico

[louis]

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