flash 8 ใส่เสียง background 2 เสียง

import ไฟล์เสียง 2 เสียงไว้ใน library
ที่ scene 1 คลิกที่ layer 1 ,  frame 1  เลือกไฟล์เสียง ที่ 1 เลือกเป็น start ,  loop
ก่อนไป scene 2 ใช้คำสั่ง stopAllsound

scene 2  คลิกที่ layer 1 ,  frame 1  เลือกไฟล์เสียง ที่ 1 เลือกเป็น start ,  loop
ก่อนไป scene 1 ใช้คำสั่ง stopAllsound

flash แสดงเวลา

เวลานับลด แล้วไปหน้า game over
stop();
time = 10;
startTime = getTimer();
this.onEnterFrame=function(){
timeNow=Math.floor((getTimer()-startTime)/1000)
if (txttime.text=="0")
{
gotoAndPlay("Scene 3", 1);
delete this.onEnterFrame;
}
txttime.text=time - timeNow;
}



flash แสดงเวลา นับลด

time = 60;
startTime = getTimer();
this.onEnterFrame=function(){
timeNow=Math.floor((getTimer()-startTime)/1000)
txtTime.text=time-timeNow;
}

แบบที่ 2 แสดงเวลา
function fill(xx){
if (xx<10) {
xx = "0" + xx;
}
return xx;
}

function retime() {
var mydate :Date = new Date();
time1.text = fill(mydate.getMinutes());
time2.text = fill(mydate.getSeconds());
}
intervalId = setInterval(this,"retime",500);

Ninite โปรแกรมช่วยติดตั้ง

Program ninite ช่วยติดตั้ง

Scene_Title

บรรทัดที่ 73-75 เพิ่ม
       when 3    # help
        command_help
        end

บรรทัดที่ 157-158
    s4 = "คำแนะนำการเล่น"
   @command_window = Window_Command.new(172, [s1, s2, s3,s4])

บรรทัดที่ 256
  def command_help
    $scene = Scene_help.new
  end

Scene_help

class Scene_help
 def main
    s0 = "คำแนะนำการเล่น"
    s1 = "1. กดลูกศร ทิศทางต่างๆ เพื่อเลื่อนตำแหน่งตัวละคร"
    s2 = "2. เมื่อพบกับตัวละครอื่นๆ กดปุ่ม enter เพื่อพูดคุย หรือสำรวจสิ่งของ"
    s3 = "..."
    s4= "กดปุ่ม enter กลับไปหน้าจอ tilte"
    @command_window = Window_Command.new(500, [s0,s1, s2,s3,s4])
    @command_window.x = 20
    @command_window.y = 20
   
    Graphics.transition
    Graphics.freeze
    @command_window.dispose
   if Input.trigger?(Input::C)
    $scene = Scene_Title.new
    end
 end
end

Scene_help

class Scene_help
 def main
    s0 = "คำแนะนำการเล่น"
    s1 = "1. กดลูกศร ทิศทางต่างๆ เพื่อเลื่อนตำแหน่งตัวละคร"
    s2 = "2. เมื่อพบกับตัวละครอื่นๆ กดปุ่ม enter เพื่อพูดคุย หรือสำรวจสิ่งของ"
    s3 = "..."
    s4= "กดปุ่ม enter กลับไปหน้าจอ tilte"
    @command_window = Window_Command.new(500, [s0,s1, s2,s3,s4])
    @command_window.x = 20
    @command_window.y = 20
   
    Graphics.transition
    Graphics.freeze
    @command_window.dispose
   if Input.trigger?(Input::C)
    $scene = Scene_Title.new
    end
 end
end

หน่วงเวลา flash delay

on (release) {
setTimeout(delay, 1000);
function delay() {
trace("ทำอะไรก็ว่าไป");
play();
}
}