很和谐的防盗版

yangff

1. #==============================================================================
   
2. # ** Scene_Base
   
3. #------------------------------------------------------------------------------
   
4. #  这个类是游戏中所有场景画面所共同继承的父类。
   
5. #==============================================================================
   
6. 
   
7. class Scene_Base
   
8.   #--------------------------------------------------------------------------
   
9.   # * 程式开始
   
10.   #--------------------------------------------------------------------------
    
11.   def start
    
12.     $mylogo.show
    
13.   end
    
14.   #--------------------------------------------------------------------------
    
15.   # * 更新帧
    
16.   #--------------------------------------------------------------------------
    
17.   def update
    
18.     $mylogo.update
    
19.   end
    
20. end
    
21. #FOR VX
    
22. def exitnovx
    
23.   print "你使用的不是VX"
    
24.   exit
    
25. end
    
26. Bitmap.new(1,1).clear_rect(0,0,1,1) rescue (exitnovx)
    
27. GC.start
    
28. class Logo
    
29.   Width = 255
    
30.   Height = 32
    
31.   HideFPS = 10
    
32.   FPS = 60
    
33.   Text = "本游戏在66RPG免费下载"
    
34.   Opacity = 200
    
35.   def initialize
    
36.     @bitmaps = Bitmap.new(Width,Height)
    
37.     @bitmaps.gradient_fill_rect(Rect.new(0,0,Width,Height),Color.new(0,0,0,255),Color.new(0,0,0,0))
    
38.     @bitmaps.draw_text(Rect.new(0,0,Width,Height),Text)
    
39.     @sprite = Sprite.new
    
40.     @sprite.x = 0
    
41.     @sprite.y = 0
    
42.     @sprite.z = 99999
    
43.     @sprite.bitmap = Bitmap.new(Width,Height)
    
44.     @showed = false
    
45.     @hideed = false
    
46.     @showing = false
    
47.     @hideing = false
    
48.     @nx = 0
    
49.     @xall = FPS/HideFPS
    
50.     @alp = 255
    
51.     @aa = 255 / Width
    
52.   end
    
53.   def HideTime
    
54.     return Width / @xall
    
55.   end
    
56.   def show
    
57.     return if @showed
    
58.     @hideing = false
    
59.     @showing = true
    
60.   end
    
61.   def hide
    
62.     return if @hideed
    
63.     @hideing = true
    
64.     @showing = false
    
65.   end
    
66.   def update
    
67.     if @showing
    
68.   #    @sprite.bitmap.gradient_fill_rect(Rect.new(@nx,0,@xall,Height),Color.new(0,0,0,@alp+(@aa*@xall)-1),Color.new(0,0,0,@alp))
    
69.       @sprite.bitmap.blt(@nx, 0, @bitmaps, Rect.new(@nx,0,@xall,Height),Opacity)
    
70.       @alp = @alp - (@aa*@xall)
    
71.       @nx = @nx+@xall
    
72.       if @nx >= 256
    
73.     #    @sprite.bitmap.draw_text(Rect.new(0,0,Width,Height),"本游戏在66RPG免费下载")
    
74.         @nx = 255
    
75.         @showing = false
    
76.         @showed = true
    
77.         @hideed = false
    
78.         @alp = @alp + @aa
    
79.       end
    
80.     end
    
81.     if @hideing
    
82.       @sprite.bitmap.clear_rect(Rect.new([@nx,0].max,0,@xall,Height))
    
83.       @nx -= @xall
    
84.       if @nx <= -1
    
85.         @sprite.bitmap.clear
    
86.         @nx = 0
    
87.         @hideing = false
    
88.         @hideed = true
    
89.         @showed = false
    
90.         @alp = 255
    
91.       end
    
92.       
    
93.     end
    
94.   end
    
95. end
    
96. $mylogo = Logo.new

复制代码

看左上角，多么好啊~~
  Text = "本游戏在66RPG免费下载"
  Width = 255
  Height = 32
  HideFPS = 10
  FPS = 60
是对脚本的设定
分别是文字、宽度、高度、展示帧数（显示所用帧数、不准确（算法所有误））FPS是自定义FPS用的不用管

yangff

更新了

ClaudeBell

其实改成半透明的，永久显示也不错.....囧

越前リョーマ

以下引用ClaudeBell于2009-2-9 20:33:06的发言：

其实改成半透明的，永久显示也不错.....囧

恩，有特殊功能……

只不过那样的话，就差不多是直接显示个图片了……

yangff

现在就是几乎半透明了,本来就是永久显示.
Xd的地方是不用图片某些人就没办法了

塑望

感觉用途不是很大,因为邪恶的人会直接和谐掉...



P.s 我想ABC看到后会用到很邪恶的地方...

yangff

怎么和谐,难道把那里挡掉?

霜冻之狼

话说右上角的“发动反馈意见”yangff是怎么做到的???
连窗口都改了..好神奇....

yangff

以下引用霜冻之狼于2009-2-10 11:15:33的发言：

话说右上角的“发动反馈意见”yangff是怎么做到的???
连窗口都改了..好神奇....

这个市Windows7