Project1

标题: 懂脚本的过来一下这个xp仿网络防沉迷的脚本怎么样？ [打印本页]

作者: buzhi5 时间: 2012-5-8 18:25
标题: 懂脚本的过来一下这个xp仿网络防沉迷的脚本怎么样？
module Graphics
@ask1 = ["你已玩了x小时，请问要关机吗？","反沉迷提示！！"]
@ask2 = ["如果不关机会直接退出游戏，确定吗？","反沉迷提示！！"]
CP_ACP = 0
CP_UTF8 = 65001
TIME = 2700
@ctext = Array.new
@m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
@w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
@msgbox = Win32API.new('user32', 'MessageBox', %w(p p p i), 'i')
@wsm = Proc.new{|i|
      len = @m2w.call(CP_UTF8, 0, i, -1, nil, 0)
      buf = "\0\0" * len
      @m2w.call(CP_UTF8, 0, i, -1, buf, buf.size/2)
      len = @w2m.call(CP_ACP, 0, buf, -1, nil, 0, nil, nil)
      @ctext.push "\0" * len
      @w2m.call(CP_ACP, 0, buf, -1, @ctext.last, @ctext.last.size, nil, nil)
      }
[@ask1,@ask2].flatten.each{|i| @wsm.call(i)}
@update = method("update") if @update.nil?
def self.update
@first = Time.now.sec if !@first
@atend = Time.now.sec
if ((@atend - @first).abs+1) % TIME == 0
   begin
      self.warning{|a,b| @msgbox.call(0, a, b, 1) }
   rescue  Hangup
      exit
   end
end
@update.call
end
def self.warning
   2.times{|j| j == 0 ?
      ((yield @ctext[0], @ctext[1]) == 1 ? (`Shutdown.exe -s -t 10`) : (next)):
      (yield @ctext[2], @ctext[3]) == 1 ? (exit) : (retry)
   }
end
end

求鉴定
帮忙加上点注释dsu_plus_rewardpost_czw

作者: 纳兹 时间: 2012-5-8 18:48
干嘛要防沉迷…… 没什么意义

作者: [email protected] 时间: 2012-5-8 18:48
不怎么样，直接关电脑的我以前用过

作者: 灵魂の补给 时间: 2012-5-8 21:49
不知lz问的什么，
反正用法事
自动判断时间然后到点提示并执行....

作者: 1850501961 时间: 2013-8-6 17:13

你要盗取身份证

欢迎光临 Project1 (https://rpg.blue/)