//2フレーム目にgotoAndPlay(1);を入れることを忘れずに。

fscommand2("FullScreen", true);//全画面表示に
fscommand2( "SetQuality", "high" );//高画質モードに

//年・月・日・時・分・秒・曜日(日～土を0～6)の取得
year = fscommand2("GetDateYear");
month = fscommand2("GetDateMonth");
day = fscommand2("GetDateDay");
hour = fscommand2("GetTimeHours");
minute = fscommand2("GetTimeMinutes");
second = fscommand2("GetTimeSeconds");
weekday = fscommand2("GetDateWeekday");

//曜日の表示形式設定
weekday_0 = "sun";
weekday_1 = "mon";
weekday_2 = "tue";
weekday_3 = "wed";
weekday_4 = "thu";
weekday_5 = "fri";
weekday_6 = "sat";

//年の文字列変換
year = String(year);

//月の文字列変換(一桁の場合は頭に0をつける)
if(month > 9)month = String(month);
else mont = "0" add String(month);

//日の文字列変換(一桁の場合は頭に0をつける)
if(day > 9)day = String(day);
else day = "0" add String(day);

//曜日の文字列変換
weekday = eval ("weekday_" add weekday);

//時の文字列変換(一桁の場合は頭に0をつける)
if(hour > 9)hour = String(hour);
else hour = "0" add String(hour);

//分の文字列変換(一桁の場合は頭に0をつける)
if(minute > 9)minute = String(minute);
else minute = "0" add String(minute);

//秒の文字列変換(一桁の場合は頭に0をつける)
if(second > 9)second add String(second);
else second = "0" add String(second);

//文字列の連結と表示
//\nは改行の文字コード
time_txt = year add "/" add month add "/" add day add weekday add "\n" add hour add ":" add minute add ":" add second;

//テキストフィールド生成　引数は名称、深度、x座標、y座標、横幅、縦幅
_root.createTextField("text_txt", 1, 0, 0, 300, 100);
var DIS_STR:String = "青春Bの素材でflashが得意になったら嬉しいです。";//表示文字列
var LINE_NUM:Number = 15;//一行あたりの文字数
var CHANGE_NUM:Number = 500;//文字表示間隔(msec)
var char_num:Number = 0;//文字数カウント

//文字表示関数呼び出し設定
var intervalId:Number = setInterval(loadString, CHANGE_NUM);

//文字表示関数
function loadString():Void{
text_txt.text += DIS_STR.charAt(char_num++);//表示文字の追加
if(char_num % LINE_NUM < 1)text_txt.text += '\n';//LINE_NUMの値毎に改行
if(char_num > DIS_STR.length - 1) clearInterval(intervalId);//表示完了につき関数呼び出しクリア
}

//画像ファイルはimgフォルダ内にimage1.jpg、image2.jpg……で保存
var IMAGE_NUM:Number = 5;//画像枚数
var CHANGE_NUM:Number = 5000;//画像切り替えタイミング(msec)
var now_num:Number = 1;//現在の表示画像番号
var image_obj:Object = new Object();//画像ロード用オブジェクト
var image_mcl:MovieClipLoader = new MovieClipLoader();//画像ロード監視用
image_mcl.addListener(image_obj);
var image_mc:MovieClip = _root.createEmptyMovieClip("image_mc" , 1);//画像ロード用MovieClip
var intervalId:Number;//インターバルID格納用
image_mcl.loadClip("img/image" + now_num + ".jpg" , image_mc);//最初の画像ロード

function loadImage():Void{//画像ロード関数
clearInterval(intervalId);//呼び出しクリア
now_num++;//画像番号進める
if(now_num > IMAGE_NUM)now_num = 1;//画像番号が最大値超えたら戻す
image_mcl.loadClip("img/image" + now_num + ".jpg",image_mc);
}

image_obj.onLoadInit = function(target_mc:MovieClip):Void {//画像ロード完了時関数
intervalId = setInterval(_root, "loadImage" , CHANGE_NUM);//画像ロード関数タイマー設定
}

//複数文字列を左端から順番に表示していく
//最終的には文字配列内の最終文字列を表示する
//text_dtはステージ上ダイナミックテキストインスタンス
//コメントの文字番号とは表示文字列の何文字目かを指す0基点の数値

var DURATION_NUM:Number = 70;//文字シャッフル関数呼び出し間隔(msec)
var intervalId:Number;//setInterval 関数用識別変数

//表示文字配列
//最終要素が最終的に表示される文字列となる
//文字数はすべて統一すること
var STR_ARR:Array = new Array(
"あいうえおあいうえおあいうえおあいうえおあいうえおあいうえお■■",
"かきくけこかきくけこかきくけこかきくけこかきくけこかきくけこ☆☆",
"さしすせそさしすせそさしすせそさしすせそさしすせそさしすせそ○○",
"たちつてとたちつてとたちつてとたちつてとたちつてとたちつてと★★",
"なにぬねのなにぬねのなにぬねのなにぬねのなにぬねのなにぬねの■■",
"はひふへほはひふへほはひふへほはひふへほはひふへほはひふへほ☆☆",
"まみむめもまみむめもまみむめもまみむめもまみむめもまみむめも○○",
"らりるれろらりるれろらりるれろらりるれろらりるれろらりるれろ★★",
"青春Ｂはいつだってクリエイティブに！　もっとクリエイティブに！！");

var ARR_NUM:Number = STR_ARR.length - 1;//文字列数　0基点
var STR_NUM:Number = STR_ARR[ARR_NUM].length - 1;//文字数　0基点
var cnt_num:Number = 0;//シャッフル関数呼び出し回数

//文字シャッフル関数設定
intervalId= setInterval(_root, "textChange", DURATION_NUM);

function textChange():Void{
cnt_num++;//関数呼び出し回数インクリメント
var i:Number = cnt_num - ARR_NUM;//シャッフル終了とならない最小文字番号
if(i < 0)i = 0;
var j:Number = cnt_num;//表示対象の最大文字番号+1
if(cnt_num > STR_NUM)j = STR_NUM + 1;

var k:Number = 0;
var str:String = "";

//文字列生成
while(k < j){
//シャッフル終了となるかどうかで分岐
if(k < i) str += STR_ARR[ARR_NUM].charAt(k);
else str += STR_ARR[cnt_num - k - 1].charAt(k);
k++;
}
text_dt.text = str;
if(cnt_num > STR_NUM + ARR_NUM)clearInterval( intervalId );//関呼び出し終了
}

//text_mcは拡大縮小するインスタンス名
var max_scale:Number = 1.1;//最大時スケール
//最大時スケールが3倍の場合は最小時は1/3とする

var repeat_num:Number = 6;//拡大縮小繰り返し数
var duration_num:Number = 10;//画像サイズ変更処理呼び出し間隔(msec)
var next_scale:Number;//次の目標スケール(%)
var now_num:Number;//現在が何回目の繰り返しか
var scale_duration:Number = 3;//何パーセントずつ増減させるか

var intervalId:Number;//setInterval 関数用識別変数

//インスタンスクリック時関数
text_mc.onPress = function():Void{
//前回のインターバル関数設定をクリア
if( intervalId != null)clearInterval( intervalId);
now_num = 0;//繰り返し回数を0に
//次の目標値計算
next_scale = 100 / max_scale + (100 - 100 / max_scale) * (now_num / repeat_num);
intervalId= setInterval(_root, "scaleC", duration_num);
}

//サイズ変更用関数
function scaleC():Void{
if(next_scale < 100){//縮小中
if(text_mc._xscale < next_scale + scale_duration){//縮小終了
text_mc._xscale = text_mc._yscale = next_scale;

//次の目標スケールを取得
next_scale = 100 * max_scale - (100 * max_scale - 100 ) * (now_num / repeat_num);
return;
}
text_mc._xscale -= scale_duration;
text_mc._yscale = text_mc._xscale;
}
else if(next_scale > 100){//拡大中
if(text_mc._xscale > next_scale - scale_duration){//縮小終了
text_mc._xscale = text_mc._yscale = next_scale;

//次の目標スケールを取得
next_scale = 100 / max_scale + (100 - 100 / max_scale) * (now_num / repeat_num);

now_num++;//繰り返し回数増加
return;
}
text_mc._xscale += scale_duration;
text_mc._yscale = text_mc._xscale;
}
else{//拡大縮小終了
text_mc._xscale = text_mc._yscale = 100;
clearInterval( intervalId );//関数繰り返し終了
intervalID = null;
}
}