拼图无双脚本

拼图无双脚本 #===================================================================== ========= # ? 个性化自定义内容 # #—————————————————————————————————— #最终版本。注意有两个小bug修正方法如下: #416行应更改为:@smallpicture[i].sprite.y = @space_y*@h+@offset_y #386行应更改为:@smallpicture[i].sprite.y = @space_y*@h+@offset_y #都是x和y打错了，如果不用点歌系统无所谓的。 #游戏介绍 # 继搬运工后，拼图游戏也在劫难逃。这是一个非常非常简单的拼图游戏，简单到你只要按#F11打开脚本，把新添脚本的注释看明白，就可以自己制作拼图游戏了～ #本着66RPG简明无敌的宗旨，同样，不需要做任何复杂的设置，你可以看看工程中，总共#用到3个变量，2个开关，其中还有2个变量和1个开关是和拼图无关的地方用的。 #可以随意决定切割刀数，以及前景、背景。同时，这个脚本可以配合1024×768脚本共同#使用～ # 是否使用“点歌”功能,如果不会自定义点歌功能，将true改为false即可 # 选了true一定要将Audio\BGM下的歌曲考到自己工程相应文件夹，或者自定义。 $carol3PT_music = true #—————————————————————————————————— # # 如果拼图游戏胜利结束，返回时自动打开的开关编号 # 当玩家放弃返回的时候，这个开关不打开 $carol3PT_switch = 104 #—————————————————————————————————— # # 如果拼图游戏胜利结束时播放的音乐名 $carol3PT_me = "Audio/Me/001-Victory01" #—————————————————————————————————— # # 步数的变量编号，如果不需要记录步数，设置=0即可。 $carol3PT_steps = 0 #—————————————————————————————————— # # 前景图编号 & 被拼图编号 # # 使用说明: # # 默认情况下，在调用拼图功能之前，请先使用显示图片的功能显示一张前景图和一张背景图 # 这两张图可以是透明度为0，或者缩得极小，或者显示在屏幕外面，都没有关系(就是说，不用让这两张图出现在屏幕可视范围内，这图不是给玩家看的) # 程序只是需要读取出这两张图片的名称而已，这样在制作中就不需要动脚本了。 $carol3PT_font = 2 #——前景图 $carol3PT_picture = 1 #——拆散的被拼图 # 然后，使用的时候只需要输入 $scene = Scene_PT.new(x,y) 即可。 # # 括号内的x,y是切割的刀数，比如$scene = Scene_PT.new(3,3)就是3*3的拼图，$scene = Scene_PT.new(4,4)就是4*4的 # 也可以横纵切割得不一样，比如$scene = Scene_PT.new(4,6)，但是这样的图不一定能够 # 保证一定有解，可能分配后就是不可能拼出来。 # # 如果你只是输入$scene = Scene_PT.new，那就是最简单的3*3拼图 # # 另外注意:在场景返回后请加一个对话事件，否则在某些RMXP上可能会跳过下面的一段事件。 #——————————————————————————————————————— # # 是否允许玩家放弃(如果不允许，请一定让玩家拼横纵切割一样的图，否则„„) $carol3PT_draw = true #——————————————————————————————————————— # # 被拼图片坐标偏移，根据你自己制作的前景图决定。 $carol3PT_offset_x = 30 $carol3PT_offset_y = 30 #———————————————————————————————————————— # # 作者的话: # # 创作这么一个东西的灵感来源于偶然遇见的拼图游戏(“偶然遇见”是人名，新人别误会) # 反正正在做网站，也是为了光辉大陆的游戏制作业，于是耗费一天，有了这么个东西 # # 完美不完美，我不好说。如果有意见，请到www.66rpg.com留言板提出 # #——————————————————————————————————————— — #============================================================================== # ? Scene_SmallPicture #------------------------------------------------------------------------------ # 处理拼图小图的类 #============================================================================== class SmallPicture #-------------------------------------------------------------------------- # ? 定义实例变量 #-------------------------------------------------------------------------- attr_accessor :sprite # 拥有的图片 attr_accessor :x # 目前的x坐标 attr_accessor :y # 目前的y坐标 #-------------------------------------------------------------------------- # ? 初始化对像 #-------------------------------------------------------------------------- def initialize(x , y , final_x , final_y ) @sprite = Sprite.new#——拥有的图片 @x=x #——目前x坐标 @y=y #——目前y坐标，这两个可以随时变化 @final_x = final_x #——目标最终x坐标 @final_y = final_y #——目标最终y坐标，初始化后这两个就不可变化了 end #-------------------------------------------------------------------------- # ? 最终判断功能，已经到位则返回true，否则为false #-------------------------------------------------------------------------- def judge if @x==@final_x and @y==@final_y return true else return false end end end #============================================================================== # ? Scene_PT #------------------------------------------------------------------------------ # 处理拼图的类 #============================================================================== class Scene_PT #-------------------------------------------------------------------------- # ? 初始化对像 # menu_index : 命令光标的初期位置 #-------------------------------------------------------------------------- def initialize(max_x=3,max_y=3) $game_switches[$carol3PT_switch] = false @offset_x = $carol3PT_offset_x #——偏移x @offset_y = $carol3PT_offset_y #——偏移y @max_x = max_x #——纵切刀数 @max_y = max_y #——横切刀数 @smallpicture = []#——可爱的小图们 @randnumbers = [] #——一个随机数组 bit = Bitmap.new("Graphics/Pictures/"+$game_screen.pictures[$carol3PT_picture].name) @l = bit.width/@max_x #——每格宽度 @h = bit.height/@max_y #——每格高度 bit.dispose @space_x = max_x-1 @space_y = max_y-1 @update_phase = 1 @last_count = 0 if $carol3PT_steps != 0 $game_variables[$carol3PT_steps] = 0 end end #-------------------------------------------------------------------------- # ? 初始化对像 # 生成随机数(晕„„我不会生成随机数组，只好自己编一个了) #-------------------------------------------------------------------------- def randnumbers for i in 0...@max_x*@max_y-1 thatsOK = false #——判断循环结束后是否已经获得了下一个随机数 for j in 0..30 #——如果30次随机不能成功就用另外一种算法，防止运算太久。 tempnumber = rand(@max_x*@max_y-1).to_i #——生成随机数 already = false #——判断是否已经有过这个数字了 for k in 0...@randnumbers.size if tempnumber == @randnumbers[k] #——逐个寻找 already = true break end end if already == false @randnumbers.push(tempnumber) thatsOK = true break end end if thatsOK == false #——如果经过随机过程不能成功，这种算法保证OK而已。 for j in 0...@max_x*@max_y-1 already = false for k in 0...@randnumbers.size if j==@randnumbers[k] already = true break end end if already == false @randnumbers.push(j) break end end end end end #-------------------------------------------------------------------------- # ? 刷新 #-------------------------------------------------------------------------- def refresh for i in 0...@max_y for j in 1..@max_x if i==@max_y-1 and j==@max_x break #——右下角留空白 end #——把编号为i*@max_y+j-1的图放到@randnumbers[i*@max_y+j-1]对应的编号 x = @randnumbers[i*@max_x+j-1]%@max_x y = @randnumbers[i*@max_x+j-1]/@max_x @smallpicture.push(SmallPicture.new(x,y,j-1,i)) @smallpicture[i*@max_x+j-1].sprite.bitmap = Bitmap.new(@l,@h) @smallpicture[i*@max_x+j-1].sprite.bitmap.blt(0, 0, Bitmap.new("Graphics/Pictures/"+$game_screen.pictures[$carol3PT_picture].name), Rect.new((j-1)*@l,i*@h,@l,@h)) @smallpicture[i*@max_x+j-1].sprite.x = x*@l+@offset_x @smallpicture[i*@max_x+j-1].sprite.y = y*@h+@offset_y @smallpicture[i*@max_x+j-1].sprite.opacity = 0 @smallpicture[i*@max_x+j-1].sprite.z = 2 $game_system.se_play($data_system.decision_se) for opacity in 0..5 @smallpicture[i*@max_x+j-1].sprite.opacity+=51 Graphics.update end end end end #-------------------------------------------------------------------------- # ? 主处理 #-------------------------------------------------------------------------- def main @frontsprite = Sprite.new @frontsprite.bitmap = Bitmap.new("Graphics/Pictures/"+$game_screen.pictures[$carol3PT_font].name) @frontsprite.z = 999 Graphics.transition @backsprite = Sprite.new @backsprite.bitmap = Bitmap.new("Graphics/Pictures/"+$game_screen.pictures[$carol3PT_picture].name) @backsprite.x = @offset_x @backsprite.y = @offset_y @backsprite.opacity = 0 @backsprite.z = 1 for i in 0..10 @backsprite.opacity += 25 Graphics.update end for i in 0..20 Graphics.update end for i in 0..20 @backsprite.opacity -= 9 Graphics.update end @backsprite.opacity = 70 randnumbers #——如果在测试的时候自己懒得拼，就把下面这一行最开头的#号去掉。 #@randnumbers = [0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,3 5,36] refresh #————上面都是一些浪费内存和时间的过程，生成窗口放在下面 s1 = "?查看完成图" s2 = "?重新分布" s3 = "?放弃这次" s4 = "?更换背景乐" #——命令窗口。 if $carol3PT_draw == false @command_window = Window_Command.new(180,[s1,s2]) else if $carol3PT_music == true @command_window = Window_Command.new(180,[s1,s2,s3,s4]) else @command_window = Window_Command.new(180,[s1,s2,s3]) end end @command_window.x = 240 @command_window.y = 160 @command_window.z = 1000 @command_window.back_opacity = 192 @command_window.visible = false @command_window.active = false #——下面音乐部分就是你自己定义了，请放在Audio/BGM文件夹下 @music = [] #——以下文件按照在黑暗圣剑传说中的出场命名，实际上来源于RTP、 #——英雄传说、FF10、 @music[0] = "Audio/BGM/失色的彩画" @music[1] = "Audio/BGM/舞踏曲" @music[2] = "Audio/BGM/回梦游仙" @music[3] = "Audio/BGM/鸟之诗" @music[4] = "Audio/BGM/断肠崖" @music[5] = "Audio/BGM/晓之车" @music[6] = "Audio/BGM/宇宙之花" @music[7] = "Audio/BGM/夜曲-菲儿" @volume = [80,80,100,100,100,80,80,80] #——顺次定义音量 @pitch = [100,100,100,100,100,100,100,100] #——定义音调 @music_window = Window_Command.new(400,["失色的彩画","舞踏曲","回梦游仙","鸟之诗","断肠崖","晓之车","宇宙之花","夜曲-菲儿"]) @music_window.contents_opacity = 0 @music_window.opacity = 0 @music_window.x = 220 @music_window.y = (480-@music_window.height)/2 @music_window.z = 1000 @music_window.active = false @music_window.visible = false loop do Graphics.update Input.update update if $scene != self break end end Graphics.freeze @command_window.dispose for i in 0...@smallpicture.size @smallpicture[i].sprite.bitmap.dispose @smallpicture[i].sprite.dispose end @sprite = nil @frontsprite.bitmap.dispose @frontsprite.dispose @backsprite.bitmap.dispose @backsprite.dispose @music_window.dispose end #-------------------------------------------------------------------------- # ? 刷新画面 #-------------------------------------------------------------------------- def update case @update_phase #——拼图过程 when 1 if Input.trigger?(Input::B) @update_phase = 2 $game_system.se_play($data_system.decision_se) @command_window.visible = true @command_window.active = true end if Input.trigger?(Input::RIGHT) if @space_x == 0 $game_system.se_play($data_system.buzzer_se) #——演奏冻结SE else for i in 0...@smallpicture.size if @smallpicture[i].x == @space_x-1 and @smallpicture[i].y == @space_y $game_system.se_play($data_system.decision_se) @smallpicture[i].x += 1 for j in 0...5 @smallpicture[i].sprite.x+=@l/5 Graphics.update end @smallpicture[i].sprite.x = @space_x*@l+@offset_x #——为了防止不能整除出错，特地添加这么一行 @space_x -= 1 if $carol3PT_steps != 0 $game_variables[$carol3PT_steps]+=1 end break end end if victory_judge Audio.me_play($carol3PT_me, 80, 100) for i in 0..20 @backsprite.opacity+=13 Graphics.update end @update_phase = 5 end end end if Input.trigger?(Input::LEFT) if @space_x == @max_x-1 $game_system.se_play($data_system.buzzer_se) #——演奏冻结SE else for i in 0...@smallpicture.size if @smallpicture[i].x == @space_x+1 and @smallpicture[i].y == @space_y $game_system.se_play($data_system.decision_se) @smallpicture[i].x -= 1 for j in 0...5 @smallpicture[i].sprite.x-=@l/5 Graphics.update end @smallpicture[i].sprite.x = @space_x*@l+@offset_x #——为了防止不能整除出错，特地添加这么一行 @space_x += 1 if $carol3PT_steps != 0 $game_variables[$carol3PT_steps]+=1 end break end end if victory_judge Audio.me_play($carol3PT_me, 80, 100) for i in 0..20 @backsprite.opacity+=13 Graphics.update end @update_phase = 5 end end end if Input.trigger?(Input::DOWN) if @space_y == 0 $game_system.se_play($data_system.buzzer_se) #——演奏冻结SE else for i in 0...@smallpicture.size if @smallpicture[i].y == @space_y-1 and @smallpicture[i].x == @space_x $game_system.se_play($data_system.decision_se) @smallpicture[i].y += 1 for j in 0...5 @smallpicture[i].sprite.y+=@h/5 Graphics.update end @smallpicture[i].sprite.y = @space_y*@h+@offset_x #——为了防止不能整除出错，特地添加这么一行 @space_y -= 1 if $carol3PT_steps != 0 $game_variables[$carol3PT_steps]+=1 end break end end if victory_judge Audio.me_play($carol3PT_me, 80, 100) for i in 0..20 @backsprite.opacity+=13 Graphics.update end @update_phase = 5 end end end if Input.trigger?(Input::UP) if @space_y == @max_y-1 $game_system.se_play($data_system.buzzer_se) #——演奏冻结SE else for i in 0...@smallpicture.size if @smallpicture[i].y == @space_y+1 and @smallpicture[i].x == @space_x $game_system.se_play($data_system.decision_se) @smallpicture[i].y -= 1 for j in 0...5 @smallpicture[i].sprite.y-=@h/5 Graphics.update end @smallpicture[i].sprite.y = @space_y*@h+@offset_x #——为了防止不能整除出错，特地添加这么一行 @space_y += 1 if $carol3PT_steps != 0 $game_variables[$carol3PT_steps]+=1 end break end end if victory_judge Audio.me_play($carol3PT_me, 80, 100) for i in 0..20 @backsprite.opacity+=13 Graphics.update end @update_phase = 5 end end end when 2 update_command_window #——打开选项窗口的时候 when 3 if Input.trigger?(Input::C) or Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) for i in 0...5 @backsprite.opacity -= 20 Graphics.update end @command_window.visible = true @command_window.active = true for i in 0...5 @backsprite.opacity -= 16 Graphics.update end @backsprite.opacity = 70 @backsprite.z = 1 @update_phase = 2 end when 4 #——选音乐 @music_window.update if Input.trigger?(Input::C) $game_system.se_play($data_system.decision_se) Audio.bgm_play(@music[@music_window.index],@volume[@music_window.index], @pitch[@music_window.index]) @update_phase = 2 for i in 0...20 @command_window.x +=11 @music_window.opacity -= 14 @music_window.contents_opacity -= 14 Graphics.update end @music_window.visible = false @music_window.active = false @command_window.active = true end if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @update_phase = 2 for i in 0...20 @command_window.x +=11 @music_window.opacity -= 14 @music_window.contents_opacity -= 14 Graphics.update end @music_window.visible = false @music_window.active = false @command_window.active = true end when 5 #——胜利～ @last_count += 1 if @last_count == 100 $game_switches[$carol3PT_switch] = true $scene = Scene_Map.new end if Input.trigger?(Input::B) or Input.trigger?(Input::C) $game_switches[$carol3PT_switch] = true $scene = Scene_Map.new end end end #——def update #-------------------------------------------------------------------------- # ? 选项窗口专用 #-------------------------------------------------------------------------- def update_command_window @command_window.update if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @command_window.visible = false @command_window.active = false @update_phase = 1 @command_window.index = 0 end if Input.trigger?(Input::C) case @command_window.index when 0 $game_system.se_play($data_system.decision_se) @backsprite.z = 998 for i in 0...10 @backsprite.opacity+=10 Graphics.update end @command_window.visible = false @command_window.active = false for i in 0...10 @backsprite.opacity+=10 Graphics.update end @update_phase = 3 when 1 @command_window.visible = false @command_window.active = false @update_phase = 1 renew when 2 $game_system.se_play($data_system.cancel_se) $scene = Scene_Map.new when 3 $game_system.se_play($data_system.decision_se) @music_window.active = true @music_window.visible = true for i in 0...20 @command_window.x -=10 @music_window.opacity += 10 @music_window.contents_opacity += 14 Graphics.update end @update_phase = 4 @command_window.active = false end end end #-------------------------------------------------------------------------- # ? 重新开局(你可以在这里添一些搞笑的东西, ,，或者记数，不过不太厚道„„) #-------------------------------------------------------------------------- def renew @randnumbers = [] #——一个随机数组 for i in 0...@smallpicture.size #——先把原来的东西给清空 @smallpicture[i].sprite.bitmap.dispose @smallpicture[i].sprite.dispose end @smallpicture = nil @smallpicture = [] #——可爱的小图们，回来吧～ Graphics.update @space_x = @max_x-1 @space_y = @max_y-1 randnumbers refresh end #-------------------------------------------------------------------------- # ? 用来判断胜利的函数，如果已经拼完会返回true #-------------------------------------------------------------------------- def victory_judge for pic in @smallpicture if pic.judge==false return false end end return true end end