为什么我这里的PUSH不能用? - Project1

#==============================================================================
# ■ Game_Temp
#------------------------------------------------------------------------------
# 　セーブデータに含まれない、一時的なデータを扱うクラスです。このクラスのイン
# スタンスは $game_temp で参照されます。
#==============================================================================
class Game_Temp
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :tshoot_p_name # プレイヤーキャラのファイル名
attr_accessor :tshoot_p_index # プレイヤーキャラの画像インデックス
attr_accessor :tshoot_p_speed # 自機の移動速度
attr_accessor :tshoot_p_speed_slow # 自機の低速移動速度
attr_accessor :tshoot_bgm # ゲームで使用するBGM
attr_accessor :tshoot_ground # ゲームで使用する背景
attr_accessor :tshoot_stage # ステージデータ
attr_accessor :tshoot_life # 初期ライフ
attr_accessor :tshoot_bomb # 初期ボム
attr_accessor :tshoot_bomb_reset # 被弾時ボム回復フラグ
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias tshoot_game_temp_initialize initialize
def initialize
tshoot_game_temp_initialize
@tshoot_p_name = "Actor2"
@tshoot_p_index = 7
@tshoot_p_speed = 4096
@tshoot_p_speed_slow = 2048
@tshoot_bgm = "Audio/BGM/Scene2.mid"
@tshoot_ground = "Graphic/System/ground｡jpg"
@tshoot_stage = TShoot_Stage.new
@tshoot_life = 4
@tshoot_bomb = 2
@tshoot_bomb_reset = true
end
end

复制代码

#==============================================================================
# ■ TShoot_Player
#------------------------------------------------------------------------------
# 　シューティングの自機クラス
#==============================================================================
class TShoot_Player < Sprite
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :sx
attr_reader :sy
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(x, y)
super(nil)
self.x = x + 32
self.y = y + 32
self.ox = 16
self.oy = 16
self.z = 100
self.bitmap = Cache.character($game_temp.tshoot_p_name)
self.src_rect = Rect.new($game_temp.tshoot_p_index % 4 * 96 + 32,
$game_temp.tshoot_p_index / 4 * 128 + 96, 32, 32)
@sx = x << 10
@sy = y << 10
@reload = 0 # リロードタイマー
@throw = 0 # 無敵タイマー
@anime = 0 # アニメタイマー
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
if @throw > 0
@throw -= 1
self.opacity = 128 if @throw == 120
self.opacity = 255 if @throw == 0
end
if @throw < 120
update_move
update_shot
update_anime
end
end
#--------------------------------------------------------------------------
# ● 更新(ショット)
#--------------------------------------------------------------------------
def update_shot
@reload -= 1 if @reload > 0
if Input.press?(Input::C) or # ショット
($game_switches[TSHOOT::SW_MOUSE_INPUT] and Input.mouse_press?("MLB"))
if @reload == 0
if TSHOOT::USE_SHOT_PATTERN
for shot in TSHOOT::SHOT_PATTERN[$scene.info.power / TSHOOT::ITEM_NEED]
d = shot[2]
d = d - ( shot[1] * ( shot[0] - 1 ) / 2 )
for i in 0...shot[0]
$scene.add_pbullet(self.x, self.y - 6, d, shot[3], shot[4], shot[5])
d += shot[1]
end
@reload = shot[6]
end
else
if $scene.info.power < TSHOOT::ITEM_NEED
$scene.add_pbullet(self.x, self.y - 6, TSHOOT::ANGLE_UP, 4096, 0, 0)
elsif $scene.info.power < TSHOOT::ITEM_NEED * 2
$scene.add_pbullet(self.x - 6, self.y - 6, TSHOOT::ANGLE_UP, 4096, 0, 0)
$scene.add_pbullet(self.x + 6, self.y - 6, TSHOOT::ANGLE_UP, 4096, 0, 0)
else
$scene.add_pbullet(self.x - 12, self.y - 6, TSHOOT::ANGLE_UP, 4096, 0, 0)
$scene.add_pbullet(self.x, self.y - 8, TSHOOT::ANGLE_UP, 4096, 0, 0)
$scene.add_pbullet(self.x + 12, self.y - 6, TSHOOT::ANGLE_UP, 4096, 0, 0)
end
@reload = 8
end
end
end
if Input.trigger?(Input::B) or # ボム
($game_switches[TSHOOT::SW_MOUSE_INPUT] and Input.mouse_trigger?("MRB"))
if $scene.info.bomb > 0
$scene.se_flag[4] = true
$scene.info.add_bomb(-1)
$scene.clear_bullet
$scene.back_ground.shake(true, 32)
$scene.back_ground.shake(false, 32)
$scene.back_ground.flash
end
end
end
#--------------------------------------------------------------------------
# ● 更新(移動処理)
#--------------------------------------------------------------------------
def update_move
if $game_switches[TSHOOT::SW_MOUSE_INPUT]
x, y = Input.mouse_pos(true)
self.x = [[x, 32].max, 320].min
self.y = [[y, 32].max, 384].min
@sx = self.x - 32 << 10
@sy = self.y - 32 << 10
else
vx = 0
vy = 0
speed = (Input.press?(Input::A) ? $game_temp.tshoot_p_speed_slow : $game_temp.tshoot_p_speed)
if Input.press?(Input::LEFT)
vx = -speed
elsif Input.press?(Input::RIGHT)
vx = speed
end
if Input.press?(Input::UP)
vy = -speed
elsif Input.press?(Input::DOWN)
vy = speed
end
if vx != 0 and vy != 0
vx = vx * 7 / 10
vy = vy * 7 / 10
end
@sx += vx
@sy += vy
@sx -= vx if @sx < 0 or @sx > (288 << 10)
@sy -= vy if @sy < 0 or @sy > (352 << 10)
self.x = (@sx >> 10) + 32
self.y = (@sy >> 10) + 32
end
end
#--------------------------------------------------------------------------
# ● 更新(アニメーション)
#--------------------------------------------------------------------------
def update_anime
@anime = (@anime + 1) % 60
index = $game_temp.tshoot_p_index
pattern = @anime / 15
pattern = pattern < 3 ? pattern : 1
self.src_rect.set((index % 4 * 3 + pattern) * 32, index / 4 * 128 + 96, 32, 32)
end
#--------------------------------------------------------------------------
# ● ダメージ
# 返り値 : プレイヤーがダメージを受けたかどうかを返す
#--------------------------------------------------------------------------
def damage
return false if throw?
$scene.se_flag[3] = true
$scene.back_ground.shake(true, 32)
$scene.back_ground.shake(false, 32)
$scene.info.add_life(-1)
$scene.info.add_power(TSHOOT::ITEM_LOST)
$scene.info.set_bomb($game_temp.tshoot_bomb) if $game_temp.tshoot_bomb_reset
@throw = 180
self.opacity = 0
@sx = 144 << 10 # 初期位置のＸ座標
@sy = 336 << 10 # 初期位置のＹ座標
a = 0.0
d = Math::PI * 2 / 8
for i in 0...8
$scene.add_effect(1, self.x - 16, self.y - 16, (Math.cos(a) * 2048).to_i,
(Math.sin(a) * 2048).to_i)
a += d
end
self.x = (@sx >> 10) + 32
self.y = (@sy >> 10) + 32
return true
end
#--------------------------------------------------------------------------
# ● 角度を返す
#--------------------------------------------------------------------------
def get_angle(sx, sy)
return Math.atan2( @sy - sy, @sx - sx )
end
#--------------------------------------------------------------------------
# ● スルー状態を返す
#--------------------------------------------------------------------------
def throw?
return @throw > 0
end
end

复制代码

#==============================================================================
# ■ TShoot_PBullet
#------------------------------------------------------------------------------
# 　シューティングの自機弾クラス
#==============================================================================
class TShoot_PBullet < Sprite
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(x, y, angle, speed, index, type)
super(nil)
self.x = x - 6
self.y = y
self.z = 100
self.bitmap = Cache.system("pbullet")
self.src_rect = Rect.new(index * 12, 0, 12, 12)
self.opacity = TSHOOT::PBULLET_OPACITY
self.blend_type = TSHOOT::PBULLET_BLEND
@real_x = self.x << 8
@real_y = self.y << 8
@vx = (Math.cos(angle) * speed).to_i
@vy = (Math.sin(angle) * speed).to_i
@speed = speed
@type = type
@count = rand(3) + 1
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
if @type == 1
@count -= 1
if @count == 0
@count = 5
d, id = 9999, -1
for i in 0...$scene.enemy.size
next if $scene.enemy[i] == nil
d2 = (self.x - $scene.enemy[i].x).abs + (self.y - $scene.enemy[i].y).abs
d, id = d2, i if d > d2
end
if id >= 0
angle = Math.atan2($scene.enemy[id].y - self.y, $scene.enemy[id].x - self.x)
@vx = (Math.cos(angle) * @speed).to_i
@vy = (Math.sin(angle) * @speed).to_i
end
end
end
@real_x += @vx
@real_y += @vy
self.x = @real_x >> 8
self.y = @real_y >> 8
for i in 0...$scene.enemy.size
next if $scene.enemy[i] == nil
if self.y <= $scene.enemy[i].y + 32 and self.y + 12 >= $scene.enemy[i].y
if self.x <= $scene.enemy[i].x + 32 and self.x + 12 >= $scene.enemy[i].x
$scene.enemy[i].damage
$scene.add_effect(2, self.x + self.width / 2, self.y + self.height / 2, 0, 0)
dispose
return
end
end
end
dispose if self.x < -16 or self.x > 336 or self.y < -16 or self.y > 400
end
end

复制代码

#==============================================================================
# ■ TShoot_Enemy
#------------------------------------------------------------------------------
# 　シューティングの敵機クラス
#==============================================================================
class TShoot_Enemy < Sprite
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :sx
attr_reader :sy
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(x, y, shot, move)
super(nil)
self.x = x + 16
self.y = y + 16
self.z = 90
@sx = x << 10
@sy = y << 10
@vx = 0
@vy = 0
@shot = shot # ショットオプション値
@move = move # 移動オプション値
@cnt_move = 0 # 移動用タイマー
@cnt_shot = 0 # ショット用タイマー
@cnt_shot_reset = 180 # ショットのループ間隔
@angle_shot = 0.0
@anime = 0 # アニメタイマー
@dir = 2 # 向き
@hp = 5
@score = 1 # 所持しているスコアアイテム数
@power = 0 # 同パワーアイテム数
@life = 0 # 同ライフアイテム数
@bomb = 0 # 同ボムアイテム数
set_type
self.bitmap = Cache.character(@file_name)
self.src_rect = Rect.new(@file_index % 4 * 96 + 32,
@file_index / 4 * 128 + ((@dir - 2) / 2) * 32, 32, 32)
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
if @hp <= 0
$scene.se_flag[2] = true
$scene.back_ground.shake(false, 16)
set_item
$scene.add_effect(3, self.x + 16, self.y + 16, 0, 0)
dispose
return
end
action
@sx += @vx
@sy += @vy
self.x = (@sx >> 10) + 16
self.y = (@sy >> 10) + 16
if $scene.player.y > self.y and $scene.player.y < self.y + 32
if $scene.player.x > self.x and $scene.player.x < self.x + 32
$scene.player.damage
end
end
update_anime
if self.x < -16 or self.x > 352 or self.y < -16 or self.y > 400
dispose
end
end
#--------------------------------------------------------------------------
# ● 更新(アニメーション)
#--------------------------------------------------------------------------
def update_anime
@anime = (@anime + 1) % 60
pattern = @anime / 15
pattern = pattern < 3 ? pattern : 1
self.src_rect.set((@file_index % 4 * 3 + pattern) * 32,
@file_index / 4 * 128 + ((@dir - 2) / 2) * 32, 32, 32)
end
#--------------------------------------------------------------------------
# ● 下を向く
#--------------------------------------------------------------------------
def turn_down
@dir = 2
end
#--------------------------------------------------------------------------
# ● 左を向く
#--------------------------------------------------------------------------
def turn_right
@dir = 4
end
#--------------------------------------------------------------------------
# ● 右を向く
#--------------------------------------------------------------------------
def turn_left
@dir = 6
end
#--------------------------------------------------------------------------
# ● 上を向く
#--------------------------------------------------------------------------
def turn_up
@dir = 8
end
#--------------------------------------------------------------------------
# ● ダメージ
#--------------------------------------------------------------------------
def damage
@hp -= 2
$scene.se_flag[1] = true
end
#--------------------------------------------------------------------------
# ● 自機のいる角度を取得
#--------------------------------------------------------------------------
def get_angle
return $scene.player.get_angle(@sx, @sy)
end
#--------------------------------------------------------------------------
# ● アイテムセット
#--------------------------------------------------------------------------
def set_item
n = @score + @power + @life + @bomb
return if n == 0
a = -Math::PI / 2
d = Math::PI * 2 / n
for i in 0...n
index = 3
if i < @score
index = 0
elsif i < @score + @power
index = 1
elsif i < n - @bomb
index = 2
end
$scene.add_item((@sx >> 10) + 8, self.y + 8, (Math.cos(a) * 768).to_i,
(Math.sin(a) * 768).to_i, index)
a += d
end
end
#--------------------------------------------------------------------------
# ● n方向ショット
#--------------------------------------------------------------------------
def nway_shot(n, space, angle, speed, aim, index, type = 1)
d = angle
d += get_angle if aim
d = d - ( space * ( n - 1 ) / 2 )
for i in 0...n
$scene.add_ebullet(@sx, @sy, (Math.cos(d) * speed).to_i,
(Math.sin(d) * speed).to_i, index, type)
d += space
end
end
#--------------------------------------------------------------------------
# ● 全方位ショット
#--------------------------------------------------------------------------
def nall_shot(n, angle, speed, aim, index, type = 1)
a = angle
a += get_angle if aim
d = Math::PI * 2 / n
for i in 0...n
$scene.add_ebullet(@sx, @sy, (Math.cos(a) * speed).to_i,
(Math.sin(a) * speed).to_i, index, type)
a += d
end
end
#--------------------------------------------------------------------------
# ● 行動処理（中身は継承先に）
#--------------------------------------------------------------------------
def action
end
end

复制代码

#==============================================================================
# ■ TShoot_EBullet
#------------------------------------------------------------------------------
# 　シューティングの敵機弾クラス
#==============================================================================
class TShoot_EBullet < Sprite
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :last_vx
attr_reader :last_vy
#--------------------------------------------------------------------------
# ● オブジェクト初期化
# x = 敵機のｘ方向中心
# y = 敵機のｙ方向中心
#--------------------------------------------------------------------------
def initialize(x, y, vx, vy, index, id)
super(nil)
@index = index
@graze = true
set_type
@sx = x + ((16 - self.width / 2) << 10)
@sy = y + ((16 - self.height / 2) << 10)
self.x = (@sx >> 10) + 16
self.y = (@sy >> 10) + 16
self.z = 110 + id
@vx = vx
@vy = vy
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
@sx += @vx
@sy += @vy
self.x = (@sx >> 10) + 16
self.y = (@sy >> 10) + 16
# 接触判定
if $scene.player.y < self.y + self.width + 16 and $scene.player.y > self.y - 16
if $scene.player.x > self.x - 16 and $scene.player.x < self.x + self.height + 16
if @graze and not $scene.player.throw?
$scene.add_effect(4, $scene.player.x - 4, $scene.player.y - 4,
rand(4096) - 2048, rand(4096) - 2048)
$scene.se_flag[9] = true if TSHOOT::USE_GRAZE_SE
$scene.info.add_graze
@graze = false
end
if $scene.player.y > self.y and $scene.player.y < self.y + (self.width / 2)
if $scene.player.x > self.x and $scene.player.x < self.x + (self.height / 2)
self.x = -32 if $scene.player.damage
end
end
end
end
dispose if self.x < -16 or self.x > 336 or self.y < -16 or self.y > 400
end
#--------------------------------------------------------------------------
# ● 自機狙いに変更
#--------------------------------------------------------------------------
def change_aim(speed)
x = @sx + ((self.width / 2 - 16) << 10)
y = @sy + ((self.height / 2 - 16) << 10)
angle = $scene.player.get_angle(x, y)
@vx = (Math.cos(angle) * speed).to_i
@vy = (Math.sin(angle) * speed).to_i
end
#--------------------------------------------------------------------------
# ● ご主人様を設定
#--------------------------------------------------------------------------
def set_master(id)
@master = id
end
end

复制代码

#==============================================================================
# ■ TShoot_Item
#------------------------------------------------------------------------------
# 　シューティングのアイテムクラス
#==============================================================================
class TShoot_Item < Sprite
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(x, y, vx, vy, type)
super(nil)
self.x = x + 32
self.y = y
self.z = 80
self.bitmap = Cache.system("item")
self.src_rect = Rect.new(type * 16, 0, 16, 16)
self.opacity = TSHOOT::ITEM_OPACITY
self.blend_type = TSHOOT::ITEM_BLEND
@type = type
@sx = x << 10
@sy = y << 10
@vx = vx
@vy = vy
@cnt = 0
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
if @cnt < 30
@cnt += 1
@vy = 1024 if @cnt == 30
@sx += @vx
@sx = 0 if @sx < 0
@sx = 303 << 10 if @sx > (303 << 10)
self.x = (@sx >> 10) + 32
end
@sy += @vy
self.y = @sy >> 10
if $scene.player.y - 32 <= self.y + 32 and $scene.player.y + 32 >= self.y
if $scene.player.x - 32 <= self.x + 32 and $scene.player.x + 32 >= self.x
if @type == 0
$scene.se_flag[5] = true
n = 10 * ($scene.info.graze + 1)
elsif @type == 1
$scene.se_flag[6] = true
n = 5 * ($scene.info.graze + 1)
$scene.info.add_power(1)
elsif @type == 2
$scene.se_flag[7] = true
n = 8 * ($scene.info.graze + 1)
$scene.info.add_life(1)
elsif @type == 3
$scene.se_flag[8] = true
n = 8 * ($scene.info.graze + 1)
$scene.info.add_bomb(1)
end
$scene.info.add_score(n)
$scene.add_popup(self.x + 8, self.y, n.to_s)
self.y = 416
end
end
dispose if self.y >= 416
end
end

复制代码

#==============================================================================
# ■ TShoot_Stage
#------------------------------------------------------------------------------
# 　シューティングのステージクラス
#==============================================================================
class TShoot_Stage
#--------------------------------------------------------------------------
# ● リセット
#--------------------------------------------------------------------------
def reset
@time = []
@type = []
@data = []
@pos = 0
@cnt = 0
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
while(1)
break if @time[@pos] != @cnt
if @type[@pos] < 200 # キャラクター配置
$scene.add_enemy(@type[@pos], @data[@pos][0], @data[@pos][1], @data[@pos][2], @data[@pos][3])
elsif @type[@pos] == 200 # メッセージ
$game_message.face_name = @data[@pos][0]
$game_message.face_index = @data[@pos][1]
$game_message.background = @data[@pos][2]
$game_message.position = @data[@pos][3]
$game_message.texts.push(@data[@pos][4])
elsif @type[@pos] == 201 # ピクチャの表示
$scene.back_ground.show_picture(@data[@pos][0], @data[@pos][1],
@data[@pos][2], @data[@pos][3], @data[@pos][4], @data[@pos][5],
@data[@pos][6], @data[@pos][7], @data[@pos][8])
elsif @type[@pos] == 202 # ピクチャの消去
$scene.back_ground.erase_picture(@data[@pos][0])
elsif @type[@pos] == 203 # 全削除
$scene.clear_all
elsif @type[@pos] == 204 # 敵数ストッパー
if $scene.enemy_num > @data[@pos][0]
@cnt -= 1
break
end
elsif @type[@pos] == 205 # ステージ終了
$scene.state = 1
Audio.me_play("Audio/ME/Victory1.mid", 100, 100) # 撃破時にME再生
end
@pos += 1
end
@cnt += 1
if TSHOOT::GC_COUNT > 0
GC.start if @cnt % TSHOOT::GC_COUNT == 0
end
end
#--------------------------------------------------------------------------
# ● データの追加
#--------------------------------------------------------------------------
def add(time, type, data)
@time.push(time)
@type.push(type)
@data.push(data)
end
#--------------------------------------------------------------------------
# ● データのソート
#--------------------------------------------------------------------------
def sort
while(1)
flag = false
for i in [email protected] - 1
if @time[i] > @time[i + 1]
time = @time[i]
type = @type[i]
data = @data[i].dup
@time[i] = @time[i + 1]
@type[i] = @type[i + 1]
@data[i] = @data[i + 1].dup
@time[i + 1] = time
@type[i + 1] = type
@data[i + 1] = data.dup
flag = true
end
end
break unless flag
end
end
end

复制代码

#==============================================================================
# ■ TShoot_Ground
#------------------------------------------------------------------------------
# 　シューティングの背景クラス
#==============================================================================
class TShoot_Ground < Sprite
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(nil)
self.bitmap = Cache.system("ground")
self.x = -16
self.y = -32
self.z = 25
@flash = 0
@shake_x = 0
@angle_x = 0.0
# スクロール用に背景をもう１枚作成
@back_sub = Sprite.new
@back_sub.bitmap = self.bitmap
@back_sub.x = self.x
@back_sub.y = self.y - self.bitmap.height
# フレーム部分の作成
@viewport1 = Viewport.new(0, 0, 544, 416)
@viewport1.z = 9000
bitmap = Cache.system("frame")
rect = Rect.new(16, 0, 320, 16)
@back_top = Sprite.new(@viewport1)
@back_top.bitmap = Bitmap.new(320, 16)
@back_top.bitmap.blt(0, 0, bitmap, rect)
@back_top.x = 16
rect = Rect.new(16, 400, 320, 16)
@back_bottom = Sprite.new(@viewport1)
@back_bottom.bitmap = Bitmap.new(320, 16)
@back_bottom.bitmap.blt(0, 0, bitmap, rect)
@back_bottom.x = 16
@back_bottom.y = 400
rect = Rect.new(0, 0, 16, 416)
@back_left = Sprite.new(@viewport1)
@back_left.bitmap = Bitmap.new(16, 416)
@back_left.bitmap.blt(0, 0, bitmap, rect)
rect = Rect.new(336, 0, 208, 416)
@back_right = Sprite.new(@viewport1)
@back_right.bitmap = Bitmap.new(208, 416)
@back_right.bitmap.blt(0, 0, bitmap, rect)
@back_right.bitmap.font.size = 20
@back_right.bitmap.font.bold = true
@back_right.bitmap.font.shadow = true
@back_right.bitmap.font.color = Color.new(255, 255, 255, 255)
@back_right.bitmap.draw_text(16, 16, 176, 20, "HiScore")
@back_right.bitmap.draw_text(16, 44, 176, 20, "Score")
@back_right.bitmap.draw_text(16, 84, 176, 20, "Life")
@back_right.bitmap.draw_text(16, 108, 176, 20, "Bomb")
@back_right.bitmap.draw_text(48, 136, 176, 20, "Power")
@back_right.bitmap.draw_text(48, 164, 176, 20, "Graze")
@back_right.x = 336
bitmap.dispose
# ピクチャの作成
@viewport2 = Viewport.new(16, 16, 320, 384)
@viewport2.z = 8900
@pictures = []
for i in 0..20
@pictures.push(Game_Picture.new(i))
end
@picture_sprites = []
for i in 1..20
@picture_sprites.push(Sprite_Picture.new(@viewport2, @pictures[i]))
end
end
#--------------------------------------------------------------------------
# ● 解放
#--------------------------------------------------------------------------
def dispose
@back_top.dispose
@back_bottom.dispose
@back_right.dispose
@back_left.dispose
@back_sub.dispose
for sprite in @picture_sprites
sprite.dispose
end
@viewport1.dispose
@viewport2.dispose
super
end
#--------------------------------------------------------------------------
# ● ピクチャの表示
#--------------------------------------------------------------------------
def show_picture(number, name, origin, x, y, zoom_x, zoom_y, opacity, blend_type)
@pictures[number].show(name, origin, x, y, zoom_x, zoom_y, opacity, blend_type)
end
#--------------------------------------------------------------------------
# ● ピクチャの消去
#--------------------------------------------------------------------------
def erase_picture(number)
@pictures[number].erase
end
#--------------------------------------------------------------------------
# ● 揺らす
# dir : trueなら横揺れ、falseなら縦揺れ
# power : 揺れの強さ
#--------------------------------------------------------------------------
def shake(dir, power = 16)
@shake_x = power
@angle_x = 0.0
end
#--------------------------------------------------------------------------
# ● フラッシュ
#--------------------------------------------------------------------------
def flash
@flash = 255
end
#--------------------------------------------------------------------------
# ● 更新
#--------------------------------------------------------------------------
def update
if @shake_x > 0
@angle_x += 0.7
@shake_x -= 1
self.x = (Math.cos(@angle_x) * @shake_x).to_i - 16
end
if @flash > 0
@flash -= 32
self.color.set(255, 255, 255, @flash)
end
self.y += TSHOOT::BG_SCROLL_SPEED
self.y -= self.bitmap.height * 2 if self.y >= self.bitmap.height
@back_sub.y += TSHOOT::BG_SCROLL_SPEED
@back_sub.y -= self.bitmap.height * 2 if @back_sub.y >= self.bitmap.height
@back_sub.x = self.x
@back_sub.color.set(255, 255, 255, @flash)
for picture in @pictures
picture.update
end
for sprite in @picture_sprites
sprite.update
end
end
end

复制代码

#==============================================================================
# ■ TShoot_Message
#------------------------------------------------------------------------------
# 　シューティング用のメッセージウィンドウです。
#==============================================================================
class TShoot_Message < Window_Selectable
#--------------------------------------------------------------------------
# ● 定数
#--------------------------------------------------------------------------
MAX_LINE = 2 # 最大行数
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(16, 320, 320, 80)
self.z = 8950
self.active = false
self.index = -1
self.openness = 0
@opening = false # ウィンドウのオープン中フラグ
@closing = false # ウィンドウのクローズ中フラグ
@text = nil # 表示すべき残りの文章
@contents_x = 0 # 次の文字を描画する X 座標
@contents_y = 0 # 次の文字を描画する Y 座標
@line_count = 0 # 現在までに描画した行数
@wait_count = 0 # ウェイトカウント
@background = 0 # 背景タイプ
@position = 2 # 表示位置
@show_fast = false # 早送りフラグ
@line_show_fast = false # 行単位早送りフラグ
@pause_skip = false # 入力待ち省略フラグ
create_gold_window
create_number_input_window
create_back_sprite
end
#--------------------------------------------------------------------------
# ● 解放
#--------------------------------------------------------------------------
def dispose
super
dispose_gold_window
dispose_number_input_window
dispose_back_sprite
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
super
update_gold_window
update_number_input_window
update_back_sprite
update_show_fast
unless @opening or @closing # ウィンドウの開閉中以外
if @wait_count > 0 # 文章内ウェイト中
@wait_count -= 1
elsif self.pause # 文章送り待機中
input_pause
elsif self.active # 選択肢入力中
input_choice
elsif @number_input_window.visible # 数値入力中
input_number
elsif @text != nil # 残りの文章が存在
update_message # メッセージの更新
elsif continue? # 続ける場合
start_message # メッセージの開始
open # ウィンドウを開く
$game_message.visible = true
else # 続けない場合
close # ウィンドウを閉じる
$game_message.visible = @closing
end
end
end
#--------------------------------------------------------------------------
# ● 所持金ウィンドウの作成
#--------------------------------------------------------------------------
def create_gold_window
@gold_window = Window_Gold.new(384, 0)
@gold_window.openness = 0
end
#--------------------------------------------------------------------------
# ● 数値入力ウィンドウの作成
#--------------------------------------------------------------------------
def create_number_input_window
@number_input_window = Window_NumberInput.new
@number_input_window.visible = false
end
#--------------------------------------------------------------------------
# ● 背景スプライトの作成
#--------------------------------------------------------------------------
def create_back_sprite
@back_sprite = Sprite.new
@back_sprite.bitmap = Cache.system("MessageBack")
@back_sprite.visible = (@background == 1)
@back_sprite.x = 16
@back_sprite.z = 8940
@back_sprite.src_rect.width = 320
@back_sprite.src_rect.height = 96
end
#--------------------------------------------------------------------------
# ● 所持金ウィンドウの解放
#--------------------------------------------------------------------------
def dispose_gold_window
@gold_window.dispose
end
#--------------------------------------------------------------------------
# ● 数値入力ウィンドウの解放
#--------------------------------------------------------------------------
def dispose_number_input_window
@number_input_window.dispose
end
#--------------------------------------------------------------------------
# ● 背景スプライトの解放
#--------------------------------------------------------------------------
def dispose_back_sprite
@back_sprite.dispose
end
#--------------------------------------------------------------------------
# ● 所持金ウィンドウの更新
#--------------------------------------------------------------------------
def update_gold_window
@gold_window.update
end
#--------------------------------------------------------------------------
# ● 数値入力ウィンドウの更新
#--------------------------------------------------------------------------
def update_number_input_window
@number_input_window.update
end
#--------------------------------------------------------------------------
# ● 背景スプライトの更新
#--------------------------------------------------------------------------
def update_back_sprite
@back_sprite.visible = (@background == 1)
@back_sprite.y = y - 16
@back_sprite.opacity = openness
@back_sprite.update
end
#--------------------------------------------------------------------------
# ● 早送りフラグの更新
#--------------------------------------------------------------------------
def update_show_fast
if self.pause or self.openness < 255
@show_fast = false
elsif Input.trigger?(Input::C) and @wait_count < 2
@show_fast = true
elsif not Input.press?(Input::C)
@show_fast = false
end
if @show_fast and @wait_count > 0
@wait_count -= 1
end
end
#--------------------------------------------------------------------------
# ● 次のメッセージを続けて表示するべきか判定
#--------------------------------------------------------------------------
def continue?
return true if $game_message.num_input_variable_id > 0
return false if $game_message.texts.empty?
if self.openness > 0 and not $game_temp.in_battle
return false if @background != $game_message.background
return false if @position != $game_message.position
end
return true
end
#--------------------------------------------------------------------------
# ● メッセージの開始
#--------------------------------------------------------------------------
def start_message
@text = ""
for i in 0...$game_message.texts.size
@text += "　　" if i >= $game_message.choice_start
@text += $game_message.texts[i].clone + "x00"
end
@item_max = $game_message.choice_max
convert_special_characters
reset_window
new_page
end
#--------------------------------------------------------------------------
# ● 改ページ処理
#--------------------------------------------------------------------------
def new_page
contents.clear
if $game_message.face_name.empty?
@contents_x = 0
else
name = $game_message.face_name
index = $game_message.face_index
draw_face(name, index, 0, 0)
@contents_x = 112
end
@contents_y = 0
@line_count = 0
@show_fast = false
@line_show_fast = false
@pause_skip = false
contents.font.color = text_color(0)
end
#--------------------------------------------------------------------------
# ● 改行処理
#--------------------------------------------------------------------------
def new_line
if $game_message.face_name.empty?
@contents_x = 0
else
@contents_x = 112
end
@contents_y += WLH
@line_count += 1
@line_show_fast = false
end
#--------------------------------------------------------------------------
# ● 特殊文字の変換
#--------------------------------------------------------------------------
def convert_special_characters
@text.gsub!(/V[([0-9]+)]/i) { $game_variables[$1.to_i] }
@text.gsub!(/V[([0-9]+)]/i) { $game_variables[$1.to_i] }
@text.gsub!(/N[([0-9]+)]/i) { $game_actors[$1.to_i].name }
@text.gsub!(/C[([0-9]+)]/i) { "x01[#{$1}]" }
@text.gsub!(/G/) { "x02" }
@text.gsub!(/./) { "x03" }
@text.gsub!(/|/) { "x04" }
@text.gsub!(/!/) { "x05" }
@text.gsub!(/>/) { "x06" }
@text.gsub!(/</) { "x07" }
@text.gsub!(/^/) { "x08" }
@text.gsub!(/\/) { "" }
@text.gsub!(/
/) { "" }
end
#--------------------------------------------------------------------------
# ● ウィンドウの背景と位置の設定
#--------------------------------------------------------------------------
def reset_window
@background = $game_message.background
@position = $game_message.position
if @background == 0 # 通常ウィンドウ
self.opacity = 255
else # 背景を暗くする、透明にする
self.opacity = 0
end
case @position
when 0 # 上
self.y = 16
@gold_window.y = 360
when 1 # 中
self.y = 144
@gold_window.y = 0
when 2 # 下
self.y = 320
@gold_window.y = 0
end
end
#--------------------------------------------------------------------------
# ● メッセージの終了
#--------------------------------------------------------------------------
def terminate_message
self.active = false
self.pause = false
self.index = -1
@gold_window.close
@number_input_window.active = false
@number_input_window.visible = false
$game_message.main_proc.call if $game_message.main_proc != nil
$game_message.clear
end
#--------------------------------------------------------------------------
# ● メッセージの更新
#--------------------------------------------------------------------------
def update_message
loop do
c = @text.slice!(/./m) # 次の文字を取得
case c
when nil # 描画すべき文字がない
finish_message # 更新終了
break
when "x00" # 改行
new_line
if @line_count >= MAX_LINE # 行数が最大のとき
unless @text.empty? # さらに続きがあるなら
self.pause = true # 入力待ちを入れる
break
end
end
when "x01" # C[n] (文字色変更)
@text.sub!(/[([0-9]+)]/, "")
contents.font.color = text_color($1.to_i)
next
when "x02" # G (所持金表示)
@gold_window.refresh
@gold_window.open
when "x03" # . (ウェイト 1/4 秒)
@wait_count = 15
break
when "x04" # | (ウェイト 1 秒)
@wait_count = 60
break
when "x05" # ! (入力待ち)
self.pause = true
break
when "x06" # > (瞬間表示 ON)
@line_show_fast = true
when "x07" # < (瞬間表示 OFF)
@line_show_fast = false
when "x08" # ^ (入力待ちなし)
@pause_skip = true
else # 普通の文字
contents.draw_text(@contents_x, @contents_y, 40, WLH, c)
c_width = contents.text_size(c).width
@contents_x += c_width
end
break unless @show_fast or @line_show_fast
end
end
#--------------------------------------------------------------------------
# ● メッセージの更新終了
#--------------------------------------------------------------------------
def finish_message
if $game_message.choice_max > 0
start_choice
elsif $game_message.num_input_variable_id > 0
start_number_input
elsif @pause_skip
terminate_message
else
self.pause = true
end
@wait_count = 10
@text = nil
end
#--------------------------------------------------------------------------
# ● 選択肢の開始
#--------------------------------------------------------------------------
def start_choice
self.active = true
self.index = 0
end
#--------------------------------------------------------------------------
# ● 数値入力の開始
#--------------------------------------------------------------------------
def start_number_input
digits_max = $game_message.num_input_digits_max
number = $game_variables[$game_message.num_input_variable_id]
@number_input_window.digits_max = digits_max
@number_input_window.number = number
if $game_message.face_name.empty?
@number_input_window.x = x
else
@number_input_window.x = x + 112
end
@number_input_window.y = y + @contents_y
@number_input_window.active = true
@number_input_window.visible = true
@number_input_window.update
end
#--------------------------------------------------------------------------
# ● カーソルの更新
#--------------------------------------------------------------------------
def update_cursor
if @index >= 0
x = $game_message.face_name.empty? ? 0 : 112
y = ($game_message.choice_start + @index) * WLH
self.cursor_rect.set(x, y, contents.width - x, WLH)
else
self.cursor_rect.empty
end
end
#--------------------------------------------------------------------------
# ● 文章送りの入力処理
#--------------------------------------------------------------------------
def input_pause
if Input.trigger?(Input::B) or Input.trigger?(Input::C)
self.pause = false
if @text != nil and not @text.empty?
new_page if @line_count >= MAX_LINE
else
terminate_message
end
end
end
#--------------------------------------------------------------------------
# ● 選択肢の入力処理
#--------------------------------------------------------------------------
def input_choice
if Input.trigger?(Input::B)
if $game_message.choice_cancel_type > 0
Sound.play_cancel
$game_message.choice_proc.call($game_message.choice_cancel_type - 1)
terminate_message
end
elsif Input.trigger?(Input::C)
Sound.play_decision
$game_message.choice_proc.call(self.index)
terminate_message
end
end
#--------------------------------------------------------------------------
# ● 数値入力の処理
#--------------------------------------------------------------------------
def input_number
if Input.trigger?(Input::C)
Sound.play_decision
$game_variables[$game_message.num_input_variable_id] =
@number_input_window.number
$game_map.need_refresh = true
terminate_message
end
end
end

复制代码

#==============================================================================
# ■ TShoot_Info
#------------------------------------------------------------------------------
# 　シューティングの情報表示クラス
#==============================================================================
class TShoot_Info < Sprite
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :hi_score
attr_reader :score
attr_reader :life
attr_reader :bomb
attr_reader :power
attr_reader :graze
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(nil)
@hi_score = $game_variables[TSHOOT::HI_SCORE_ID]
@score = 0
@life = $game_temp.tshoot_life
@bomb = $game_temp.tshoot_bomb
@power = 0
@graze = 0
self.x = 336
self.y = 0
self.z = 9100
self.bitmap = Bitmap.new(208, 192)
@flag_hi = true # 再描画フラグ
@flag_score = true # 再描画フラグ
@flag_life = true # 再描画フラグ
@flag_bomb = true # 再描画フラグ
@flag_power = true # 再描画フラグ
@flag_graze = true # 再描画フラグ
@bitmap_number = Cache.system("number")
redraw
end
#--------------------------------------------------------------------------
# ● 解放
#--------------------------------------------------------------------------
def dispose
@bitmap_number.dispose
super
end
#--------------------------------------------------------------------------
# ● スコアを加算
#--------------------------------------------------------------------------
def add_score(n)
@score += n
if @hi_score < @score
@hi_score = @score
@flag_hi = true
end
@flag_score = true
end
#--------------------------------------------------------------------------
# ● ライフを加算
#--------------------------------------------------------------------------
def add_life(n)
@life += n
if @life < 0
@life = 0
$scene.state = 2
Audio.me_play("Audio/ME/Shock.mid", 100, 100)
end
@flag_life = true
end
#--------------------------------------------------------------------------
# ● ボムを代入
#--------------------------------------------------------------------------
def set_bomb(n)
@bomb = n
@flag_bomb = true
end
#--------------------------------------------------------------------------
# ● ボムを加算
#--------------------------------------------------------------------------
def add_bomb(n)
@bomb += n
@flag_bomb = true
end
#--------------------------------------------------------------------------
# ● パワーを加算
#--------------------------------------------------------------------------
def add_power(n)
@power = [[@power + n, 0].max, TSHOOT::POWER_MAX].min
@flag_power = true
end
#--------------------------------------------------------------------------
# ● グレイズを加算
#--------------------------------------------------------------------------
def add_graze
@graze += 1
@flag_graze = true
end
#--------------------------------------------------------------------------
# ● 再描画
#--------------------------------------------------------------------------
def redraw
draw_number(16, 17, 176, 20, @hi_score) if @flag_hi
draw_number(16, 45, 176, 20, @score) if @flag_score
draw_star(68, 85, 124, 20, @life) if @flag_life
draw_star(68, 109, 124, 20, @bomb) if @flag_bomb
draw_number(16, 137, 176, 20, @power) if @flag_power
draw_number(16, 165, 176, 20, @graze) if @flag_graze
@flag_hi = false
@flag_score = false
@flag_life = false
@flag_bomb = false
@flag_power = false
@flag_graze = false
end
#--------------------------------------------------------------------------
# ● 数字の描画
#--------------------------------------------------------------------------
def draw_number(x, y, width, height, value)
self.bitmap.clear_rect(x, y, width, height)
x = x + width - 8
rect = Rect.new(value % 10 * 8, 0, 8, 16)
while(1)
self.bitmap.blt(x, y, @bitmap_number, rect)
value /= 10
break if value == 0
x -= 8
rect.set(value % 10 * 8, 0, 8, 16)
end
end
#--------------------------------------------------------------------------
# ● 星アイコンの描画
#--------------------------------------------------------------------------
def draw_star(x, y, width, height, value)
self.bitmap.clear_rect(x, y, width, height)
rect = Rect.new(96, 0, 16, 16)
for i in 0...8
rect.set(80, 0, 16, 16) if i == value
self.bitmap.blt(x, y, @bitmap_number, rect)
x += 16
end
end
end

复制代码

#==============================================================================
# ■ TShoot_Popup
#------------------------------------------------------------------------------
# 　シューティングのポップアップクラス
#==============================================================================
class TShoot_Popup < Sprite
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(x, y, text, color = Color.new(255, 255, 255))
super()
self.x = x
self.y = y
self.z = 80
bitmap = Bitmap.new(32, 20)
bitmap.font.size = 16
w = bitmap.text_size(text).width
bitmap.dispose
self.x -= w / 2
bitmap = Bitmap.new(w, 20)
bitmap.font.size = 16
bitmap.font.color = color
bitmap.draw_text(0, 0, w, 24, text, 0)
self.bitmap = bitmap
@cnt = 64
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
@cnt -= 1
self.opacity = @cnt << 3# if @cnt < 32
dispose if @cnt == 0
end
end

复制代码

#==============================================================================
# ■ TShoot_Effect
#------------------------------------------------------------------------------
# 　シューティングのエフェクトクラス
#==============================================================================
class TShoot_Effect < Sprite
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize(x, y, vx, vy)
super()
self.x = x
self.y = y
@sx = x << 10
@sy = y << 10
@vx = vx
@vy = vy
set_type
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
update_type
@sx += @vx
@sy += @vy
self.x = @sx >> 10
self.y = @sy >> 10
@cnt -= 1
self.x = 352 if @cnt == 0
if self.x < -self.width or self.x >= 352 or self.y < -self.height or self.y >= 416
dispose
return
end
end
end
#==============================================================================
# ■ 爆発エフェクト
#==============================================================================
class TShoot_Effect1 < TShoot_Effect
def set_type
self.bitmap = Cache.system("effect1")
self.opacity = 128
self.z = 105
@cnt = 2048
end
def update_type
self.opacity -= 1
end
end
#==============================================================================
# ■ 弾ヒットエフェクト
#==============================================================================
class TShoot_Effect2 < TShoot_Effect
def set_type
self.bitmap = Cache.system("effect1")
self.opacity = 255
self.ox = 16
self.oy = 16
self.z = 105
self.zoom_x = 0.5
self.zoom_y = 0.5
@cnt = 32
end
def update_type
self.opacity -= 8
self.zoom_x += 0.01
self.zoom_y += 0.01
end
end
#==============================================================================
# ■ 敵爆発エフェクト
#==============================================================================
class TShoot_Effect3 < TShoot_Effect
def set_type
self.bitmap = Cache.system("effect1")
self.opacity = 255
self.ox = 16
self.oy = 16
self.z = 105
self.zoom_x = 0.5
self.zoom_y = 0.5
@cnt = 32
end
def update_type
self.opacity -= 8
self.zoom_x += 0.14
self.zoom_y += 0.14
end
end
#==============================================================================
# ■ グレイズエフェクト
#==============================================================================
class TShoot_Effect4 < TShoot_Effect
def set_type
self.bitmap = Cache.system("effect2")
self.z = 105
@cnt = 48
end
def update_type
self.opacity -= 6
end
end

复制代码

#==============================================================================
# ■ TShoot_Scene
#------------------------------------------------------------------------------
# 　シューティングのシーンクラス
#==============================================================================
class TShoot_Scene < Scene_Base
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :back_ground
attr_reader :info
attr_reader :player
attr_reader :enemy
attr_reader :bullet
attr_reader :enemy_num
attr_accessor :state
attr_accessor :se_flag
#--------------------------------------------------------------------------
# ● 開始処理
#--------------------------------------------------------------------------
def start
$game_temp.map_bgm = RPG::BGM.last
$game_temp.map_bgs = RPG::BGS.last
RPG::BGM.stop
RPG::BGS.stop
Audio.bgm_play($game_temp.tshoot_bgm, 100, 100)
@state = 0 # シーンの状態
$game_temp.tshoot_stage.sort # ステージデータをソート
@stage = $game_temp.tshoot_stage
@player = TShoot_Player.new(144, 336)
@enemy = []
@bullet = []
@item = []
@back_ground = TShoot_Ground.new
@info = TShoot_Info.new
@popup = []
@se_flag = []
for i in 0...16 do @se_flag[i] = false end
@message_window = TShoot_Message.new
@enemy_num = 0
end
#--------------------------------------------------------------------------
# ● 終了処理
#--------------------------------------------------------------------------
def terminate
$game_temp.map_bgm.play
$game_temp.map_bgs.play
$game_variables[TSHOOT::RESULT_SCORE_ID] = @info.score
$game_switches[TSHOOT::RESULT_CLEAR_ID] = (@state == 1)
@player.dispose
clear_all
@back_ground.dispose
@info.dispose
for i in [email protected]
@popup[i].dispose if @popup[i] != nil
end
@message_window.dispose
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
Input.mouse_update
@back_ground.update
for i in [email protected]
next if @popup[i] == nil
@popup[i].update
@popup[i] = nil if @popup[i].disposed?
end
@message_window.update # メッセージウィンドウを更新
return if $game_message.visible
case @state
when 0
update_game
when 1
update_result
when 2
update_gameover
end
@info.redraw
for i in 0...16
if @se_flag[i]
Audio.se_play("Audio/SE/"+TSHOOT::SE_NAME[i][0], TSHOOT::SE_NAME[i][1],
TSHOOT::SE_NAME[i][2])
@se_flag[i] = false
break
end
end
end
#--------------------------------------------------------------------------
# ● ゲームのフレーム更新
#--------------------------------------------------------------------------
def update_game
@stage.update
@player.update
for i in [email protected]
next if @enemy[i] == nil
@enemy[i].update
if @enemy[i].disposed?
@enemy_num -= 1
@enemy[i] = nil
end
end
for i in [email protected]
next if @bullet[i] == nil
@bullet[i].update
@bullet[i] = nil if @bullet[i].disposed?
end
for i in [email protected]
next if @item[i] == nil
@item[i].update
@item[i] = nil if @item[i].disposed?
end
if Input.trigger?(Input::Z)
@state = 2
Audio.me_play("Audio/ME/Shock.mid", 100, 100)
end
end
#--------------------------------------------------------------------------
# ● リザルトのフレーム更新
#--------------------------------------------------------------------------
def update_result
if Input.trigger?(Input::C) or
($game_switches[TSHOOT::SW_MOUSE_INPUT] and Input.mouse_trigger?("MLB"))
$scene = Scene_Map.new
end
end
#--------------------------------------------------------------------------
# ● ゲームオーバーのフレーム更新
#--------------------------------------------------------------------------
def update_gameover
if Input.trigger?(Input::C) or
($game_switches[TSHOOT::SW_MOUSE_INPUT] and Input.mouse_trigger?("MLB"))
$scene = Scene_Map.new
end
end
#--------------------------------------------------------------------------
# ● 自機弾の追加処理
#--------------------------------------------------------------------------
def add_pbullet(x, y, angle, speed, index, type)
i = @bullet.index(nil)
i = @bullet.size if i == nil
@bullet[i] = TShoot_PBullet.new(x, y, angle, speed, index, type)
end
#--------------------------------------------------------------------------
# ● 敵機弾の追加処理
#--------------------------------------------------------------------------
def add_ebullet(x, y, vx, vy, index, type)
i = @bullet.index(nil)
i = @bullet.size if i == nil
@bullet[i] = __send__(ADD_EBULLET_TYPE[ type ], x, y, vx, vy, index, i)
return i
end
#--------------------------------------------------------------------------
# ● 弾の全削除
#--------------------------------------------------------------------------
def clear_bullet
for i in [email protected]
@bullet[i].dispose if @bullet[i] != nil
@bullet[i] = nil
end
end
#--------------------------------------------------------------------------
# ● 全削除
#--------------------------------------------------------------------------
def clear_all
for i in [email protected]
@enemy[i].dispose if @enemy[i] != nil
@enemy[i] = nil
end
clear_bullet
for i in [email protected]
@item[i].dispose if @item[i] != nil
@item[i] = nil
end
@enemy_num = 0
end
#--------------------------------------------------------------------------
# ● アイテムの追加処理
#--------------------------------------------------------------------------
def add_item(x, y, vx, vy, type)
i = @item.index(nil)
i = @item.size if i == nil
@item[i] = TShoot_Item.new(x, y, vx, vy, type)
end
#--------------------------------------------------------------------------
# ● エフェクトの追加処理
#--------------------------------------------------------------------------
def add_effect(type, x, y, vx, vy)
i = @popup.index(nil)
i = @popup.size if i == nil
if type == 1
@popup[i] = TShoot_Effect1.new(x, y, vx, vy)
elsif type == 2
@popup[i] = TShoot_Effect2.new(x, y, vx, vy)
elsif type == 3
@popup[i] = TShoot_Effect3.new(x, y, vx, vy)
elsif type == 4
@popup[i] = TShoot_Effect4.new(x, y, vx, vy)
end
end
#--------------------------------------------------------------------------
# ● ポップアップの追加処理
#--------------------------------------------------------------------------
def add_popup(x, y, text, color = Color.new(255, 255, 255))
i = @popup.index(nil)
i = @popup.size if i == nil
@popup[i] = TShoot_Popup.new(x, y, text, color)
end
#--------------------------------------------------------------------------
# ● エネミーの追加処理
#--------------------------------------------------------------------------
def add_enemy(type, x, y, shot, move)
i = @enemy.index(nil)
i = @enemy.size if i == nil
@enemy[i] = __send__(ADD_ENEMY_TYPE[ type ], x, y, shot, move)
@enemy_num += 1
end
end

复制代码

#==============================================================================
# ■ 設定項目
#==============================================================================
module TSHOOT
RESULT_SCORE_ID = 1 # 結果のスコアを代入する変数のID
HI_SCORE_ID = 2 # ハイスコアとして参照する変数のID
RESULT_CLEAR_ID = 1 # クリアしたかどうかを代入するスイッチのID
SW_MOUSE_INPUT = 2 # マウス入力切替に使うゲームスイッチID
EBULLET_BLEND = 0 # 敵機弾のブレンドモード(0=通常,1=加算,2=減算)
ITEM_OPACITY = 160 # アイテムの透明度
ITEM_BLEND = 0 # アイテムのブレンドモード(0=通常,1=加算,2=減算)
BG_SCROLL_SPEED = 8 # スクロール速度（ドット/フレーム）
USE_GRAZE_SE = false # 重くてもグレイズ効果音を鳴らすか
GC_COUNT = 120 # GCを実行する間隔(フレーム数)
INFO_FONT = ["Arial Black", "UmePlus Gothic", "ＭＳＰゴシック"] # フォント
SE_NAME = []
SE_NAME[1] = ["Ice9.ogg", 80, 150] # 敵ダメージ効果音
SE_NAME[2] = ["Explosion1.ogg", 80, 100] # 敵撃破効果音
SE_NAME[3] = ["Thunder6.ogg", 80, 100] # 自機爆発効果音
SE_NAME[4] = ["Flash2.ogg", 80, 100] # ボム効果音
SE_NAME[5] = ["Ice4.ogg", 80, 150] # スコアアイテム効果音
SE_NAME[6] = ["Up.ogg", 80, 100] # パワーアイテム効果音
SE_NAME[7] = ["Up.ogg", 80, 100] # ライフアイテム効果音
SE_NAME[8] = ["Up.ogg", 80, 100] # ボムアイテム効果音
SE_NAME[9] = ["Evasion.ogg", 60, 150] # グレイズ効果音
# 自機ショット関連の設定
PBULLET_OPACITY = 128 # 自機弾の透明度
PBULLET_BLEND = 1 # 自機弾のブレンドモード(0=通常,1=加算,2=減算)
ITEM_NEED = 5 # パワーアップに必要なパワーアイテム数
POWER_MAX = 25 # パワーアイテムの最大蓄積量
ITEM_LOST = -5 # 被弾時に失うパワーアイテム数
USE_SHOT_PATTERN = true # ショットパターンを使うか
# 自機のショットパターン
# [way数, way間隔, 発射方向, 速度, 画像インデックス, タイプ, 発射間隔]
# タイプを 1 にすると誘導弾になります……が、挙動が怪しいです。
# USE_SHOT_PATTERN が true のときのみ有効となります。
ANGLE_UP = Math::PI * 3 / 2
SHOT_PATTERN = [
[[1, 0.0, ANGLE_UP, 4096, 0, 0, 8]], # レベル０
[[2, 0.1, ANGLE_UP, 4096, 0, 0, 8]], # レベル１
[[3, 0.1, ANGLE_UP, 4096, 0, 0, 8]], # レベル２
[[4, 0.1, ANGLE_UP, 4096, 0, 0, 8]], # レベル３
[[5, 0.175, ANGLE_UP, 4096, 0, 0, 8]], # レベル４
[[5, 0.15, ANGLE_UP, 4096, 0, 0, 8], # レベル５
[5, 0.6, ANGLE_UP, 4096, 2, 1, 8]]
]
end
class TShoot_Scene < Scene_Base
#--------------------------------------------------------------------------
# ● 敵機追加メソッド
#--------------------------------------------------------------------------
ADD_ENEMY_TYPE = {
1 => :add_enemy1, 2 => :add_enemy2, 3 => :add_enemy3, 4 => :add_enemy4,
5 => :add_enemy5, 6 => :add_enemy6, 7 => :add_enemy7, 8 => :add_enemy8,
9 => :add_enemy9, 10 => :add_enemy10, 11 => :add_enemy11, 12 => :add_enemy12,
13 => :add_enemy13, 14 => :add_enemy14, 15 => :add_enemy15, 16 => :add_enemy16
}
def add_enemy1(x, y, shot, move) TShoot_Enemy1.new(x, y, shot, move) end
def add_enemy2(x, y, shot, move) TShoot_Enemy2.new(x, y, shot, move) end
def add_enemy3(x, y, shot, move) TShoot_Enemy3.new(x, y, shot, move) end
def add_enemy4(x, y, shot, move) TShoot_Enemy4.new(x, y, shot, move) end
def add_enemy5(x, y, shot, move) TShoot_Enemy5.new(x, y, shot, move) end
def add_enemy6(x, y, shot, move) TShoot_Enemy6.new(x, y, shot, move) end
def add_enemy7(x, y, shot, move) TShoot_Enemy7.new(x, y, shot, move) end
def add_enemy8(x, y, shot, move) TShoot_Enemy8.new(x, y, shot, move) end
def add_enemy9(x, y, shot, move) TShoot_Enemy9.new(x, y, shot, move) end
def add_enemy10(x, y, shot, move) TShoot_Enemy10.new(x, y, shot, move) end
def add_enemy11(x, y, shot, move) TShoot_Enemy11.new(x, y, shot, move) end
def add_enemy12(x, y, shot, move) TShoot_Enemy12.new(x, y, shot, move) end
def add_enemy13(x, y, shot, move) TShoot_Enemy13.new(x, y, shot, move) end
def add_enemy14(x, y, shot, move) TShoot_Enemy14.new(x, y, shot, move) end
def add_enemy15(x, y, shot, move) TShoot_Enemy15.new(x, y, shot, move) end
def add_enemy16(x, y, shot, move) TShoot_Enemy16.new(x, y, shot, move) end
#--------------------------------------------------------------------------
# ● 敵弾追加メソッド
#--------------------------------------------------------------------------
ADD_EBULLET_TYPE = {
1 => :add_ebullet1, 2 => :add_ebullet2, 3 => :add_ebullet3,
4 => :add_ebullet4, 5 => :add_ebullet5, 6 => :add_ebullet6,
7 => :add_ebullet7, 8 => :add_ebullet8, 9 => :add_ebullet9,
10 => :add_ebullet10
}
def add_ebullet1(x, y, vx, vy, index, i) TShoot_EBullet1.new(x, y, vx, vy, index, i) end
def add_ebullet2(x, y, vx, vy, index, i) TShoot_EBullet2.new(x, y, vx, vy, index, i) end
def add_ebullet3(x, y, vx, vy, index, i) TShoot_EBullet3.new(x, y, vx, vy, index, i) end
def add_ebullet4(x, y, vx, vy, index, i) TShoot_EBullet4.new(x, y, vx, vy, index, i) end
def add_ebullet5(x, y, vx, vy, index, i) TShoot_EBullet5.new(x, y, vx, vy, index, i) end
def add_ebullet6(x, y, vx, vy, index, i) TShoot_EBullet6.new(x, y, vx, vy, index, i) end
def add_ebullet7(x, y, vx, vy, index, i) TShoot_EBullet7.new(x, y, vx, vy, index, i) end
def add_ebullet8(x, y, vx, vy, index, i) TShoot_EBullet8.new(x, y, vx, vy, index, i) end
def add_ebullet9(x, y, vx, vy, index, i) TShoot_EBullet9.new(x, y, vx, vy, index, i) end
def add_ebullet10(x, y, vx, vy, index, i) TShoot_EBullet10.new(x, y, vx, vy, index, i) end
end
#==============================================================================
# 設定項目はここまで
#==============================================================================
#==============================================================================
# ■コマンド（これは設定項目ではありません）
#==============================================================================
module TSHOOT
module Commands
module_function
#--------------------------------------------------------------------------
# ● ステージデータの初期化
#--------------------------------------------------------------------------
def reset_stage
$game_temp.tshoot_stage.reset
end
#--------------------------------------------------------------------------
# ● 背景画像の指定
#--------------------------------------------------------------------------
def set_ground(file)
$game_temp.tshoot_ground = file
end
#--------------------------------------------------------------------------
# ● ＢＧＭの指定
#--------------------------------------------------------------------------
def set_bgm(file)
$game_temp.tshoot_bgm = file
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（敵機）
#--------------------------------------------------------------------------
def set_enemy(time, type, x, y, shot, move)
$game_temp.tshoot_stage.add(time, type, [x, y, shot, move])
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（ストッパー）
#--------------------------------------------------------------------------
def set_stop(time, num = 0)
$game_temp.tshoot_stage.add(time, 204, [num])
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（ステージ終了）
#--------------------------------------------------------------------------
def set_end(time)
$game_temp.tshoot_stage.add(time, 205, [0])
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（メッセージ）
#--------------------------------------------------------------------------
def set_message(time, message)
$game_temp.tshoot_stage.add(time, 200, ["", 0, 1, 2, message])
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（ピクチャの表示）
#--------------------------------------------------------------------------
def set_picture(time, number, name, origin, x, y, zoom_x, zoom_y, opacity, blend_type)
$game_temp.tshoot_stage.add(time, 201, [number, name, origin, x, y, zoom_x, zoom_y, opacity, blend_type])
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（会話用ピクチャの表示）
#--------------------------------------------------------------------------
def set_face(time, name1, name2, flag = false)
if name1 != ""
x = flag ? -96 : -64
opacity = flag ? 128 : 255
$game_temp.tshoot_stage.add(time, 201, [1, name1, 0, x, 96, 100, 100, opacity, 0])
else
$game_temp.tshoot_stage.add(time, 202, [1])
end
if name2 != ""
x = flag ? 144 : 176
opacity = flag ? 255 : 128
$game_temp.tshoot_stage.add(time, 201, [2, name2, 0, x, 96, 100, 100, opacity, 0])
else
$game_temp.tshoot_stage.add(time, 202, [2])
end
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（ピクチャの消去）
#--------------------------------------------------------------------------
def erase_picture(time, number)
$game_temp.tshoot_stage.add(time, 202, [number])
end
#--------------------------------------------------------------------------
# ● ステージデータの追加（全削除）
#--------------------------------------------------------------------------
def erase_all(time)
$game_temp.tshoot_stage.add(time, 203, [0])
end
end
end
class Game_Interpreter
include TSHOOT::Commands
end

复制代码

#==============================================================================
# ■ 敵の作成について
#------------------------------------------------------------------------------
# 　まずはデフォルトの敵をいろいろいじって試してみてください
# "敵弾設定と雛形" に基本的な弾幕と移動パターンを用意しました
# デフォルトのタイプ４のように laser_shot(0) と書くだけで
# 折れ曲がるレーザーが撃てます。
#
# nway_shot(n, space, angle, speed, aim, index, type, blend)
# n : 発射する弾数
# space : 弾同士の間隔
# angle : 弾を発射する方向（0.0～6.28）
# speed : 弾の移動速度
# aim : 自機狙いフラグ、trueで自機狙い、falseで無効
# index : 弾の色
# type : 弾のタイプ（1～7）、省略可
#
# nall_shot(n, angle, speed, aim, index, type, blend)
# nway_shotと同じです、弾の間隔は自動的に算出されます
#
# turn_up / turn_down / turn_left / turn_right
# 向きを変えます、変わるのは画像の向きだけで
# ショットや移動方向にはまったく影響しません
#
# その他初期状態で使えるメソッド
# 使用例はデフォルトの敵機タイプ１～１２を参照してください
# basic_move1
# basic_move2(stop_time = 300)
# chain_shot(n, way, speed, index, type = 1)
# wide_shot(n, way, speed, index, type = 1)
# winder_shot(way, index, type = 1)
# whirl_shot(way, index, type = 1)
# whirl_shot2(way, index, type = 1)
# laser_shot(index)
# whip_shot(way, index, type = 1)
# machine_shot(way, speed, index, type = 1)
#
# 初期状態で設定されている弾のタイプ（type の値として使用）
# ただし、レーザー弾は特殊な使い方となります。
# 1 … 通常弾
# 2 … 大きい通常弾
# 3 … レーザー弾（親）
# 4 … レーザー弾（子）
# 5 … 壁で一度跳ね返る弾
# 6 … 自機狙いに変化する弾
# 7 … 自機狙いに変化する大きい弾
#==============================================================================
#==============================================================================
# ■ 敵機タイプ１
#------------------------------------------------------------------------------
# 　画面上部でうろうろしながら後退、自機狙いのｎＷＡＹ３連ショット
# @shot = ショットのｗａｙ数
# @move = 未使用
#==============================================================================
class TShoot_Enemy1 < TShoot_Enemy
# 出現時の処理
def set_type
@hp = 6 # 敵の耐久力（省略時５）
@score = 2 # 持っているスコアアイテムの数（省略時１）
@power = 5 # 持っているパワーアイテムの数（省略時０）
@life = 0 # 持っているライフアイテムの数（省略時０）
@bomb = 0 # 持っているボムアイテムの数（省略時０）
@file_name = "Monster" # 敵機の画像ファイル
@file_index = 2 # 敵機の画像インデックス
@vx = 0 # ｘ方向の初期速度（省略時０）
@vy = 2 << 10 # ｙ方向の初期速度（省略時０）
@cnt_shot = 150 # 出現から攻撃開始までの時間（省略時０）
@cnt_shot_reset = 180 # 攻撃間隔（省略時１８０）
end
# 毎フレーム実行される処理
def action
basic_move1 # 移動の処理
chain_shot(3, @shot, 1500, 1) # ショットの処理（連射数, way数, 弾速, 弾色）
end
end
#==============================================================================
# ■ 敵機タイプ２
#------------------------------------------------------------------------------
# 　ワインダー（@cnt_chotは使えません）
# @shot = ｗａｙ数
# @move = 攻撃時間
#==============================================================================
class TShoot_Enemy2 < TShoot_Enemy
def set_type
@hp = 25
@file_name = "Monster"
@file_index = 0
@vy = 2 << 10
end
def action
basic_move2(@move)
winder_shot(@shot, 2) if @vy == 0 # （way数, 弾色）
end
end
#==============================================================================
# ■ 敵機タイプ３
#------------------------------------------------------------------------------
# 　回転砲台
# @shot = ｗａｙ数
# @move = 攻撃時間
#==============================================================================
class TShoot_Enemy3 < TShoot_Enemy
def set_type
@hp = 25
@file_name = "Monster"
@file_index = 0
@vy = 2 << 10
@angle_shot = Math::PI if self.x < 144 # 左右対称にするしかけ
end
def action
basic_move2(@move)
whirl_shot(@shot, 3) if @vy == 0 # （way数, 弾色）
end
end
#==============================================================================
# ■ 敵機タイプ４
#------------------------------------------------------------------------------
# 　画面上部でうろうろしながら後退、折れ曲がるレーザー発射
# @shot = ショットのｗａｙ数
# @move = 未使用
#==============================================================================
class TShoot_Enemy4 < TShoot_Enemy
def set_type
@hp = 10
@file_name = "Monster"
@file_index = 2
@vy = 2 << 10
@cnt_shot_reset = 180
end
def action
basic_move1
laser_shot(0) # （弾色）
end
end
#==============================================================================
# ■ 敵機タイプ５
#------------------------------------------------------------------------------
# 　画面上部でうろうろしながら後退、鞭ショットを発射
# @shot = ショットのｗａｙ数
# @move = 未使用
#==============================================================================
class TShoot_Enemy5 < TShoot_Enemy
def set_type
@hp = 10
@file_name = "Monster"
@file_index = 2
@vy = 2 << 10
@cnt_shot_reset = 180
end
def action
basic_move1
whip_shot(@shot, 4) # （way数, 弾色）
end
end
#==============================================================================
# ■ 敵機タイプ６
#------------------------------------------------------------------------------
# 　画面上部でうろうろしながら後退、自機狙いの全方位４連ショット壁反射
# @shot = ショットのｗａｙ数
# @move = 未使用
#==============================================================================
class TShoot_Enemy6 < TShoot_Enemy
def set_type
@hp = 25
@file_name = "Monster"
@file_index = 2
@vy = 2 << 10
@cnt_shot_reset = 180
end
def action
basic_move1
wide_shot(4, @shot, 1500, 1, 5) # （連射数, way数, 弾速, 弾色, 弾種）
end
end
#==============================================================================
# ■ 敵機タイプ７
#------------------------------------------------------------------------------
# 　画面上部でうろうろしながら後退、撃破時爆発
# @shot = ショットのｗａｙ数
# @move = 未使用
#==============================================================================
class TShoot_Enemy7 < TShoot_Enemy
def set_type
@hp = 1
@file_name = "Monster"
@file_index = 2
@vy = 3 << 10
end
def action
basic_move1
end
# ダメージを受けたときの処理
def damage
super # 親クラス（TShoot_Enemy）の同メソッドを呼ぶ
nall_shot(@shot, 0.0, 2048, false, 3) if @hp == 0
end
end
#==============================================================================
# ■ 敵機タイプ８
#------------------------------------------------------------------------------
# 　ばらまきショット
# @shot = ｗａｙ数
# @move = 攻撃時間
#==============================================================================
class TShoot_Enemy8 < TShoot_Enemy
def set_type
@hp = 25
@file_name = "Monster"
@file_index = 0
@vy = 2 << 10
@cnt_shot_reset = 180
end
def action
basic_move2(@move)
machine_shot(@shot, 1500, 2) # （way数, 弾速, 弾色）
end
end
#==============================================================================
# ■ 敵機タイプ９
#------------------------------------------------------------------------------
# 　くねくね移動、自機狙いのｎＷＡＹ３連ショット
# @shot = ショットのway数
# @move = 移動方向（0 = 下、1 = 右、2 = 左）
#==============================================================================
class TShoot_Enemy9 < TShoot_Enemy
def set_type
@hp = 8
@file_name = "Monster"
@file_index = 3
@angle_move = 0.0
if @move == 0
@base_pos = @sx
@vy = 1024
else
@base_pos = @sy
@vx = (@move == 1 ? 1024 : -1024)
end
@cnt_shot_reset = 180
end
def action
@angle_move += Math::PI / 120
if @move == 0
@sx = (Math.sin(@angle_move) * (32 << 10)).to_i + @base_pos
else
@sy = (Math.sin(@angle_move) * (32 << 10)).to_i + @base_pos
end
chain_shot(3, @shot, 1500, 1) # ショットの処理（連射数, way数, 弾速, 弾色）
end
end
#==============================================================================
# ■ 敵機タイプ１０
#------------------------------------------------------------------------------
# 　回転砲台（弾が自機狙いに変化する）
# @shot = ｗａｙ数
# @move = 攻撃時間
#==============================================================================
class TShoot_Enemy10 < TShoot_Enemy
def set_type
@hp = 25
@file_name = "Monster"
@file_index = 0
@vy = 2 << 10
@angle_shot = Math::PI if self.x < 144 # 左右対称にするしかけ
end
def action
basic_move2(@move)
whirl_shot2(@shot, 3, 6) if @vy == 0 # （way数, 弾色, 弾種）
end
end
#==============================================================================
# ■ 敵機タイプ１１
#------------------------------------------------------------------------------
# ただまっすぐに移動するだけ
# @shot = 未使用
# @move = 移動方向（0.0 ～ 6.283184）
#==============================================================================
class TShoot_Enemy11 < TShoot_Enemy
def set_type
@hp = 1
@file_name = "Monster"
@file_index = 2
@vx = (Math.cos(@move) * 1536).to_i # ｘ方向の初期速度
@vy = (Math.sin(@move) * 1536).to_i # ｙ方向の初期速度
end
end
#==============================================================================
# ■ 敵機タイプ１２
#------------------------------------------------------------------------------
# 　ボス、直進→停止→ひたすら攻撃＋撃破でゲーム終了
# @shot = 未使用
# @move = 未使用
#==============================================================================
class TShoot_Enemy12 < TShoot_Enemy
def set_type
@hp = 100
@score = 0
@file_name = "Spiritual"
@file_index = 4
@angle_shot = 0.0
Audio.bgm_play("Audio/BGM/Battle1.mid", 100, 100) # 登場時にBGM変更
end
def action
@cnt_shot += 1
if @angle_shot < Math::PI / 2
@angle_shot += 0.01
@sy = (Math.sin(@angle_shot) * (128 << 10)).to_i - (32 << 10)
@cnt_shot = 0
elsif @cnt_shot % 4 == 0
@cnt_shot = 0 if @cnt_shot == 192
if @cnt_shot < 32
nall_shot(32, 0.0, 4096, false, 5)
nall_shot(16, 0.0, 2048, false, 2, 7) if @cnt_shot % 8 == 0
elsif @cnt_shot >= 64 and @cnt_shot < 96
nall_shot(32, Math::PI / 32, 4096, false, 5)
elsif @cnt_shot >= 128 and @cnt_shot < 160
nway_shot(5, 0.3, 0.0, 4096, true, 0)
end
end
end
end

复制代码

#==============================================================================
# ■ 敵機弾タイプ１
#------------------------------------------------------------------------------
# 　通常弾
#==============================================================================
class TShoot_EBullet1 < TShoot_EBullet
def set_type
self.blend_type = TSHOOT::EBULLET_BLEND
self.bitmap = Cache.system("ebullet1")
self.src_rect = Rect.new(@index * 12, 0, 12, 12)
end
end
#==============================================================================
# ■ 敵機弾タイプ２
#------------------------------------------------------------------------------
# 　大きい弾
#==============================================================================
class TShoot_EBullet2 < TShoot_EBullet
def set_type
self.blend_type = TSHOOT::EBULLET_BLEND
self.bitmap = Cache.system("ebullet2")
self.src_rect = Rect.new(@index * 32, 0, 32, 32)
end
end
#==============================================================================
# ■ 敵機弾タイプ３
#------------------------------------------------------------------------------
# 　レーザー用通常弾
#==============================================================================
class TShoot_EBullet3 < TShoot_EBullet
def set_type
self.blend_type = 1
self.bitmap = Cache.system("ebullet1")
self.src_rect = Rect.new(@index * 12, 0, 12, 12)
@last_vx = [0, 0]
@last_vy = [0, 0]
Audio.se_play("Audio/SE/Thunder10.ogg", 70, 70)
end
def update
if @vy != 0
if $scene.player.y < self.y + self.width and $scene.player.y > self.y
@vx = $scene.player.x > self.x ? 2048 : -2048
@vy = 0
end
end
@last_vx[1] = @last_vx[0]
@last_vy[1] = @last_vy[0]
@last_vx[0] = @vx
@last_vy[0] = @vy
super
end
end
#==============================================================================
# ■ 敵機弾タイプ４
#------------------------------------------------------------------------------
# 　レーザー用通常弾（ご主人様についていく）
#==============================================================================
class TShoot_EBullet4 < TShoot_EBullet
def set_type
self.blend_type = 1
self.bitmap = Cache.system("ebullet1")
self.src_rect = Rect.new(@index * 12, 0, 12, 12)
@last_vx = [0, 0]
@last_vy = [0, 0]
#~ @graze = false
end
def update
@last_vx[1] = @last_vx[0]
@last_vy[1] = @last_vy[0]
@last_vx[0] = @vx
@last_vy[0] = @vy
@master = -1 if $scene.bullet[@master] == nil
if @master >= 0
@vx = $scene.bullet[@master].last_vx[1]
@vy = $scene.bullet[@master].last_vy[1]
end
super
end
end
#==============================================================================
# ■ 敵機弾タイプ５
#------------------------------------------------------------------------------
# 　画面端で一度だけ跳ね返る弾
#==============================================================================
class TShoot_EBullet5 < TShoot_EBullet
def set_type
self.blend_type = TSHOOT::EBULLET_BLEND
self.bitmap = Cache.system("ebullet1")
self.src_rect = Rect.new(@index * 12, 0, 12, 12)
@bound = true
end
def update
if @bound
if self.x < 16 or self.x > 324
@vx = 0 - @vx
@bound = false
elsif self.y < 16 or self.y > 388
@vy = 0 - @vy
@bound = false
end
end
super
end
end
#==============================================================================
# ■ 敵機弾タイプ６
#------------------------------------------------------------------------------
# 　一定時間後、自機狙いに変化する
#==============================================================================
class TShoot_EBullet6 < TShoot_EBullet
def set_type
self.blend_type = TSHOOT::EBULLET_BLEND
self.bitmap = Cache.system("ebullet1")
self.src_rect = Rect.new(@index * 12, 0, 12, 12)
@cnt = 120
end
def update
@cnt -= 1
if @cnt == 60
@vx = 0
@vy = 0
elsif @cnt == 0
change_aim(1600)
end
super
end
end
#==============================================================================
# ■ 敵機弾タイプ７
#------------------------------------------------------------------------------
# 　一定時間後、自機狙いに変化する大きい弾
#==============================================================================
class TShoot_EBullet7 < TShoot_EBullet6
def set_type
self.blend_type = TSHOOT::EBULLET_BLEND
self.bitmap = Cache.system("ebullet2")
self.src_rect = Rect.new(@index * 32, 0, 32, 32)
@cnt = 120
end
end
#==============================================================================
# ■ TShoot_Enemy
#------------------------------------------------------------------------------
# 　シューティングの敵機クラス
#==============================================================================
class TShoot_Enemy < Sprite
#--------------------------------------------------------------------------
# ● 基本移動（上から出現、左右移動しながら上へ戻る）
#--------------------------------------------------------------------------
def basic_move1
@cnt_move += 1
@vx += @vx > 0 ? -16 : 16 if @vx != 0
@vy += @vy > 0 ? -16 : 16 if @vy != 0
if @cnt_move == 192
@vx = 1024
@vy = -512
elsif @cnt_move == 320
@vx = -1024
@vy = -512
@cnt_move = 64
end
end
#--------------------------------------------------------------------------
# ● 基本移動（上から出現、しばらくとどまったあと上へ戻る）
#--------------------------------------------------------------------------
def basic_move2(stop_time = 300)
@cnt_move += 1
@vy -= 16 if @vy > 0
@vy = -1024 if @cnt_move >= stop_time
end
#--------------------------------------------------------------------------
# ● 自機狙いｎ連ショット
#--------------------------------------------------------------------------
def chain_shot(n, way, speed, index, type = 1)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
for i in 0...n
if @cnt_shot == i * 10 + 10
nway_shot(way, 0.9 / way, 0.0, speed, true, index, type)
end
end
end
#--------------------------------------------------------------------------
# ● 自機狙いｎ連全方位ショット
#--------------------------------------------------------------------------
def wide_shot(n, way, speed, index, type = 1)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
for i in 0...n
if @cnt_shot == i * 10 + 10
nall_shot(way, 0.0, speed, true, index, type)
end
end
end
#--------------------------------------------------------------------------
# ● ワインダー
#--------------------------------------------------------------------------
def winder_shot(way, index, type = 1)
@cnt_shot += 1
@cnt_shot = 0 if @cnt_shot == 540
if @cnt_shot % 4 == 0
angle = (Math.sin(Math::PI * 2 * @cnt_shot / 540)) / 2 + Math::PI / 2
nway_shot(way, 2.8 / way, angle, 4096, false, index, type)
end
end
#--------------------------------------------------------------------------
# ● 回転砲台
# 位置が画面左側なら逆回転
#--------------------------------------------------------------------------
def whirl_shot(way, index, type = 1)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
if @cnt_shot % 12 == 0
@angle_shot += self.x < 144 ? -0.2 : 0.2
nall_shot(way, @angle_shot, 1280, false, index, type)
end
end
#--------------------------------------------------------------------------
# ● 高速回転砲台
# 位置が画面左側なら逆回転
#--------------------------------------------------------------------------
def whirl_shot2(way, index, type = 1)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
if @cnt_shot % 4 == 0
@angle_shot += self.x < 144 ? -0.5 : 0.5
nall_shot(way, @angle_shot, 1280, false, index, type)
end
end
#--------------------------------------------------------------------------
# ● 直角に折れ曲がるレーザー
#--------------------------------------------------------------------------
def laser_shot(index)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
if @cnt_shot == 10
id = $scene.add_ebullet(@sx, @sy, 0, 2048, index, 3)
for i in 0...19
last_id = $scene.add_ebullet(@sx, @sy, 0, 0, index, 4)
$scene.bullet[last_id].set_master(id)
id = last_id
end
end
end
#--------------------------------------------------------------------------
# ● 自機狙い鞭ショット
#--------------------------------------------------------------------------
def whip_shot(way, index, type = 1)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
nway_shot(way, 0.9 / way, 0.0, 3072, true, index, type) if @cnt_shot == 10
nway_shot(way, 0.9 / way, 0.0, 2048, true, index, type) if @cnt_shot == 20
nway_shot(way, 0.9 / way, 0.0, 1536, true, index, type) if @cnt_shot == 30
nway_shot(way, 0.9 / way, 0.0, 1280, true, index, type) if @cnt_shot == 40
nway_shot(way, 0.9 / way, 0.0, 1024, true, index, type) if @cnt_shot == 50
end
#--------------------------------------------------------------------------
# ● ばらまきショット
#--------------------------------------------------------------------------
def machine_shot(way, speed, index, type = 1)
@cnt_shot -= 1
@cnt_shot = @cnt_shot_reset if @cnt_shot <= 0
if @cnt_shot >= 10 and @cnt_shot < 100
if @cnt_shot % 5 == 0
angle = rand(512) * (Math::PI / 4) / 512 + (Math::PI * 3 / 8)
nway_shot(way, 0.9 / way, angle, speed, false, index, type)
end
end
end
end

复制代码