9
23
2010
0

RM通用:搞瞎你的眼睛

是的,乃没看错,这个脚本是用来搞瞎你的眼睛的,加入任意工程执行即可。

 

def calc(x,y)
  a = 0
  a += 2 if 3 * x + 8 * y > 3600
  a += 1 if 3 * x - 2 * y > 600
  case a
  when 0
    return 7 if 3 * x - 8 * y > -1200
    return 4
  when 3
    return 6 if 3 * x - 8 * y > -1200
    return 3
  when 1
    return 9 if 3 * x + 2 * y > 1800
    return 8
  when 2
    return 2 if 3 * x + 2 * y > 1800
    return 1
  end
end

h = {
1 => Color.new(255,0,0),
2 => Color.new(0,255,0),
3 => Color.new(0,0,255),
4 => Color.new(255,255,0),
6 => Color.new(255,0,255),
7 => Color.new(255,255,255),
8 => Color.new(0,255,255),
9 => Color.new(0,0,0)
}
Graphics.frame_rate = 120
s = Sprite.new
s.bitmap = Bitmap.new(640,480)
for i in 0..640
  for j in 0..480
    c = h[calc(i,j)]
    c.alpha = 255 - (i - 400).abs * (j - 300).abs * 255 / (200 * 480)
    s.bitmap.set_pixel(i,j,c)
  end
    Graphics.update
end  
s.ox = s.x = 320
s.oy = s.y = 240
loop do
  for i in 0..20
    s.zoom_x += 0.1
    s.zoom_y += 0.02
    s.opacity -= 10
    Graphics.update
  end
  for i in 0..20
    s.zoom_x -= 0.1
    s.zoom_y -= 0.02
    s.opacity += 10
    Graphics.update
  end
end
exit
Category: RM | Tags: XP VX | Read Count: 1747

登录 *


loading captcha image...
(输入验证码)
or Ctrl+Enter

Host by is-Programmer.com | Power by Chito 1.3.3 beta | Theme: Aeros 2.0 by TheBuckmaker.com