Project1

标题: VA你???了！！！ [打印本页]

作者: 晴兰 时间: 2012-11-24 03:26
提示: 作者被禁止或删除内容自动屏蔽

作者: 爱尔伯塔 时间: 2012-11-24 07:26
这是???...了啊

作者: bbh 时间: 2012-11-24 08:44
好有爱的脚本啊0 0……………………

作者: zeldafd 时间: 2012-11-24 09:26
不能解釋的錯誤=-=：
是存取的東西過分了麼…

作者: 咕噜 时间: 2012-11-24 12:39
好可爱的脚本啊

作者: satgo1546 时间: 2012-11-24 12:53
会不会导致电脑一起???了……呐……

作者: zhangbanxian 时间: 2012-11-24 14:45
本帖最后由 zhangbanxian 于 2012-11-24 14:58 编辑

- -b好绕的脚本，然后原来字符串可以写成这样吗，call什么的原来可以省略吗（我竟然被蒙在鼓里这么久）orz...
然后，貌似是漏写了一个.to_s，method_missing用多了，bug果然不好找...

RUBY 代码复制

class API
  def initialize(dll)
    @dll = dll.to_s
  end
  def method_missing sym, *a
    Win32API.new(@dll, sym.to_s, a.map{|x|x.is_a?(Integer) ? ?i: ?p}, ?i).(*a)
  end
end
def method_missing(sym)
  x = API.new(sym)
  define_singleton_method sym, lambda{x}
  x
end
 
 
$plane = Sprite.new
$plane.bitmap = Bitmap.new Graphics.width, Graphics.height
 
def readkey
  user32.GetKeyboardState $buf="\0"*256 
end
 
module Game
  def self.update
    a = $buf
    readkey    
    p $buf.unpack("c*")  if a != $buf
  end
end
 
loop do
  Graphics.update
  Game.update
end

class API


  def initialize(dll)


    @dll = dll.to_s


  end


  def method_missing sym, *a


    Win32API.new(@dll, sym.to_s, a.map{|x|x.is_a?(Integer) ? ?i: ?p}, ?i).(*a)


  end


end


def method_missing(sym)


  x = API.new(sym)


  define_singleton_method sym, lambda{x}


  x


end


 


 


$plane = Sprite.new


$plane.bitmap = Bitmap.new Graphics.width, Graphics.height


 


def readkey


  user32.GetKeyboardState $buf="\0"*256 


end


 


module Game


  def self.update


    a = $buf


    readkey    


    p $buf.unpack("c*")  if a != $buf


  end


end


 


loop do


  Graphics.update


  Game.update


end

作者: 晴兰 时间: 2012-11-24 21:57
提示: 作者被禁止或删除内容自动屏蔽

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