home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1998 September
/
VPR9809A.ISO
/
FFILLY
/
Face_Fil
/
Face_fil.lzh
/
autoexec.tfy
< prev
next >
Wrap
Text File
|
1998-05-12
|
11KB
|
349 lines
// Created By sPon 97.4
//
// Face
//
// by Harpy's Planet
//
#info INAM "Face"
#info IART "Harpy's Planet"
#info ICMT "Toffyに追加コード有り。(シーン1)"
#info COMP "HsP(http://CQW05622@niftyserve.or.jp)"
#info GRPC "HsP(http://CQW05622@niftyserve.or.jp)"
#info EFCT "HsP"
#info IDIM 800x600 ,16M
#info JINT Ask me
#info TRNS Ask me
#info MDFY Ask me
int mDown; // Mouse Down Flag
int xoff, yoff; // Background Offset
int pw, ph; // Background Size
int pic[]; // Picture Array
int jump[]; // Jump Counter
// マウスの位置が矩形の範囲内かどうか調べる関数
isInRect(int x1, int y1, int x2, int y2)
{
if(x1 <= MesP2 && MesP2 < x2 && y1 <= MesP3 && MesP3 < y2){
return (1);
}
return (0);
}
LoadResource()
{
LoadPic("E06.jpg"); // Default Background
pic[0] = LoadPic("E06.jpg");
pic[1] = LoadPic("TRAD03.jpg");
pic[2] = LoadPic("click.jpg");
pic[3] = LoadPic("E05.jpg");
pic[4] = LoadPic("E04.jpg");
pic[5] = LoadPic("B01.jpg");
pic[6] = LoadPic("B02.jpg");
pic[7] = LoadPic("B03.jpg");
pic[8] = LoadPic("B04A.jpg");
pic[9] = LoadPic("B04.jpg");
pic[10] = LoadPic("B04B.jpg");
pic[11] = LoadPic("E03.jpg");
pic[12] = LoadPic("E02.jpg");
pic[13] = LoadPic("E01.jpg");
pic[14] = LoadPic("B05.jpg");
pic[15] = LoadPic("B06.jpg");
pic[16] = LoadPic("C03.jpg");
pic[17] = LoadPic("C04.jpg");
pic[18] = LoadPic("C05.jpg");
pic[19] = LoadPic("C06.jpg");
pic[20] = LoadPic("C07.jpg");
pic[21] = LoadPic("C08.jpg");
pic[22] = LoadPic("C09.jpg");
pic[23] = LoadPic("C10.jpg");
pic[24] = LoadPic("C11.jpg");
pic[25] = LoadPic("C15.jpg");
pic[26] = LoadPic("C16.jpg");
pic[27] = LoadPic("D02.jpg");
pic[28] = LoadPic("D03.jpg");
pic[29] = LoadPic("D04.jpg");
pic[30] = LoadPic("D05.jpg");
pic[31] = LoadPic("D07.jpg");
pic[32] = LoadPic("D09.jpg");
}
// オープニング
main()
{
int sw, sh;
jump[0] = 0;
jump[1] = 0;
jump[2] = 0;
jump[3] = 0;
jump[4] = 0;
jump[5] = 0;
jump[6] = 0;
jump[7] = 0;
LoadResource();
pw = PicWidth(0); ph = PicHeight(0);
OpenWin(0);
mDown = 0;
scene0();
}
// シーン 1
scene0()
{
MovePic(pic[0], 0, 0, PicWidth(pic[0]), PicHeight(pic[0]), 0, 0, 0, 2, 60);
jump[0] = 0;//-------ここから追加コード
jump[1] = 0;
jump[2] = 0;
jump[3] = 0;
jump[4] = 0;
jump[5] = 0;
jump[6] = 0;
jump[7] = 0;//-------ここまで追加コード
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,;
MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150, 3, 40);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150);
,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150);
,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150);
,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150);
,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150);
,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,MovePic(pic[1], 0, 0, pw, ph, 0, 0, 150);
,,,,,,,,,,MovePic(pic[2], 0, 0, pw, ph, 0, 170, 220);
,,,,,,,,,,;
del_us; scene0(); del_me;
end_step;
}}
mDown = 0;
mes(LBDOWN){
mDown = 1;
}
mes(LBUP) { if(mDown == 1){
if(isInRect(0, 150, 400, 350)){
del_us; scene1(); del_me;
} else {
;
}
}}
}
// シーン 11
scene1()
{
MovePic(pic[0], 0, 0, PicWidth(pic[0]), PicHeight(pic[0]), 0);
mes(TIME) { step(2) {
PlayMIDI("無題13.MID");
;
end_step;
}}
mes(MIDI_START){
del_us; scene2(); del_me;
}
}
// シーン 2
scene2()
{
MovePic(pic[0], 0, 0, PicWidth(pic[0]), PicHeight(pic[0]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,;
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[3], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,MovePic(pic[4], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[3], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[3], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[0], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,del_us; scene3(); del_me;
end_step;
}}
}
// シーン 3
scene3()
{
MovePic(pic[0], 0, 0, PicWidth(pic[0]), PicHeight(pic[0]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,MovePic(pic[3], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[4], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[3], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[0], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[5], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[6], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[7], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[8], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[9], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[10], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[9], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[8], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,del_us; scene5(); del_me;
end_step;
}}
}
// シーン 4
scene4()
{
MovePic(pic[11], 0, 0, PicWidth(pic[11]), PicHeight(pic[11]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[12], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[13], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[12], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[11], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[8], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[9], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[10], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[9], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[8], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[10], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,del_us; scene5(); del_me;
end_step;
}}
}
// シーン 5
scene5()
{
MovePic(pic[14], 0, 0, PicWidth(pic[14]), PicHeight(pic[14]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[15], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[16], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[17], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[18], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[19], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,jump[0]=jump[0]+1;if(jump[0]==3){jump[0]=0;del_us; scene8(); del_me;},
jump[1]=jump[1]+1;if(jump[1]==4){jump[1]=0;del_us; scene8(); del_me;},
MovePic(pic[20], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,;
jump[2]=jump[2]+1;if(jump[2]==3){jump[2]=0;del_us; scene10(); del_me;},
jump[3]=jump[3]+1;if(jump[3]==2){jump[3]=0;del_us; scene7(); del_me;},
del_us; scene6(); del_me;
end_step;
}}
}
// シーン 7
scene6()
{
MovePic(pic[4], 0, 0, PicWidth(pic[4]), PicHeight(pic[4]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[3], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[0], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,del_us; scene8(); del_me;
end_step;
}}
}
// シーン 8
scene7()
{
MovePic(pic[13], 0, 0, PicWidth(pic[13]), PicHeight(pic[13]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[12], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[11], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,del_us; scene8(); del_me;
end_step;
}}
}
// シーン 6
scene8()
{
MovePic(pic[20], 0, 0, PicWidth(pic[20]), PicHeight(pic[20]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[21], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[22], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[23], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[24], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,;
jump[4]=jump[4]+1;if(jump[4]==4){jump[4]=0;del_us; scene9(); del_me;},
jump[5]=jump[5]+1;if(jump[5]==3){jump[5]=0;del_us; scene9(); del_me;},
jump[6]=jump[6]+1;if(jump[6]==2){jump[6]=0;del_us; scene4(); del_me;},
del_us; scene3(); del_me;
end_step;
}}
}
// シーン 9
scene9()
{
MovePic(pic[25], 0, 0, PicWidth(pic[25]), PicHeight(pic[25]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[26], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[27], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[28], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[29], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[30], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[31], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[32], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,;
jump[7]=jump[7]+1;if(jump[7]==2){jump[7]=0;del_us; scene4(); del_me;},
del_us; scene4(); del_me;
end_step;
}}
}
// シーン 10
scene10()
{
MovePic(pic[13], 0, 0, PicWidth(pic[13]), PicHeight(pic[13]), 0);
mes(TIME) { step(2) {
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[12], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[11], 0, 0, pw, ph, 0, 0, 0);
,,,,,,,,,,,,,,,,,,,,,,,,,MovePic(pic[0], 0, 0, pw, ph, 0, 0, 0);
end_step;
}}
mes(MIDI_END){
del_us; scene0(); del_me;
}
}
// エンディング
ending()
{
mes(TIME){}
}