OkMuOnline


NowaHosting


Resultados 1 a 2 de 2
  1. #1
    Fundador PerfectZone maniacoo's Avatar




    Data de Ingresso
    Jun 2022
    Posts
    27
    Thanks Thanks Given 
    30
    Thanks Thanks Received 
    427
    Thanked in
    14 Posts
    Mentioned
    2 Post(s)

    Prêmiar todos online IP unico

    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.

    Código:
    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

  2. The Following User Says Thank You to maniacoo For This Useful Post:


  3. #2
    Membro lhpa's Avatar

    Data de Ingresso
    Sep 2023
    Posts
    12
    Thanks Thanks Given 
    11
    Thanks Thanks Received 
    0
    Thanked in
    0 Posts
    Mentioned
    0 Post(s)
    País
    China
    Muito obrigado pela contribuição

Permissões de Postagem

  • Você não pode iniciar novos tópicos
  • You may not post Resposta(s)
  • Você não pode enviar anexos
  • Você não pode editar suas mensagens
  •