example2

function Guildplayersreward(event, pPlayer)
    for _,v in pairs(GetPlayersInWorld()) do
        if(v)and(v:IsInGuild()==true)then
            local Vip = ACCT[GetAcctId(v)].Vip
            a=(5*Vip)
            v:SendBroadcastMessage("|cff00cc00Thank you for playing.|r")
            UpdateMG(v, a)
            end
        if(v)and(v:IsInGuild()==false)then
            v:SendBroadcastMessage("|cff00cc00Join a guild and earn hourly rewards.|r")
            end
        end
    end
RegisterTimedEvent("Guildplayersreward", 1800000, 0)
 -- 60000 = 1 minute
 -- 1800000 = 30 minutes