home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703A.ISO / FFILLY / FTILE400 / PICTURE.TFY < prev    next >
Text File  |  1996-12-19  |  5KB  |  106 lines
  1. /*　画像関連　Ｔｏｆｆｙファイル　*/
  2.  
  3. loadpicture(){        //画像ファイルを読み込む
  4.  
  5.     yellowpic=LoadPic("yellow.bmp");        //黄色ブロック
  6.     whitepic=LoadPic("white.bmp");        //１段目白タイル
  7.     greenpic=LoadPic("green.bmp");        //２段目緑タイル
  8.     bluepic=LoadPic("blue.bmp");        //３段目青タイル
  9.     redpic=LoadPic("red.bmp");            //４段目赤タイル
  10.     bigflatpic=LoadPic("flat_big.bmp");        //ビッグふらっとマン
  11.     uppic=LoadPic("flat_up.bmp");        //ふらっとマン上向き
  12.     rightpic=LoadPic("flat_rig.bmp");        //ふらっとマン右向き
  13.     leftpic=LoadPic("flat_lef.bmp");        //ふらっとマン左向き
  14.     downpic=LoadPic("flat_dow.bmp");        //ふらっとマン下向き
  15.     bottunpic=LoadPic("bottun.bmp");        //ボタン
  16.     rulepic=LoadPic("rulepic.bmp");        //ルール
  17.     clearpic=LoadPic("clear.bmp");        //クリア
  18.     clearokpic=LoadPic("clearok.bmp");        //クリアしたステージの色変更
  19.     openingpic=LoadPic("opening.bmp");        //オープニング
  20.     basepic=CreatePic(openingpic,540,365);    //ゲーム盤生成
  21.     reportpic=CreatePic(openingpic,540,335);    //成績表生成
  22.     sortpic=CreatePic(openingpic,540,335);    //成績表ソート生成
  23.     reportclspic=CreatePic(openingpic,540,335);    //成績表消去生成
  24.     helppic=CreatePic(openingpic,540,335);    //ヘルプ生成
  25.     helpprofilepic=CreatePic(openingpic,540,280);    //プロフィール生成
  26.     helpmovepic=CreatePic(openingpic,530,280);    //操作方法生成
  27.     helprulepic=CreatePic(openingpic,530,360);    //ルール生成
  28.     helpaboutpic=CreatePic(openingpic,350,180);    //バージョン情報生成
  29.  
  30.     MovePic(openingpic,0,0,540,365,basepic,0,0);        //ゲーム盤
  31.     MovePic(openingpic,0,0,540,335,reportpic,0,0);    //成績表
  32.     MovePic(openingpic,0,0,540,335,sortpic,0,0);        //成績表ソート
  33.     MovePic(openingpic,0,0,540,335,reportclspic,0,0);    //成績表消去
  34.     MovePic(openingpic,0,0,540,335,helppic,0,0);        //ヘルプ
  35.     MovePic(openingpic,0,0,530,360,helprulepic,0,0);    //バージョン情報
  36.     MovePic(openingpic,0,0,530,280,helpmovepic,0,0);    //操作方法
  37.     MovePic(openingpic,0,0,350,180,helpaboutpic,0,0);    //バージョン情報
  38.     MovePic(openingpic,0,0,540,280,helpprofilepic,0,0);    //プロフィール
  39. }
  40.  
  41. drawpic(){                        //画像描き込み
  42.     int i;
  43.  
  44.     MovePic(bottunpic,0,190,59,19,openingpic,230,300);    //オープニング成績表ボタン
  45.     MovePic(bottunpic,0,57,59,19,openingpic,320,300);    //オープニング操作方法ボタン
  46.     MovePic(bottunpic,0,95,59,19,openingpic,410,300);    //オープニングルールボタン
  47.     MovePic(bottunpic,0,152,59,19,openingpic,500,300);    //オープニング終了ボタン
  48.     MovePic(uppic,0,0,33,33,openingpic,520,20);        //オープニングふらっとマン
  49.  
  50.     MovePic(bigflatpic,0,0,180,175,basepic,345,80);    //ゲーム盤ビッグふらっとマン
  51.     MovePic(bottunpic,0,133,59,19,basepic,360,275);    //ゲーム盤やり直しボタン
  52.     MovePic(bottunpic,0,171,59,19,basepic,450,275);    //ゲーム盤一手戻すボタン
  53.     MovePic(bottunpic,0,209,59,19,basepic,360,300);    //ゲーム盤セーブボタン
  54.     MovePic(bottunpic,0,228,59,19,basepic,450,300);    //ゲーム盤ロードボタン
  55.     MovePic(bottunpic,0,19,59,19,basepic,360,325);    //ゲーム盤ヘルプボタン
  56.     MovePic(bottunpic,0,152,59,19,basepic,450,325);    //ゲーム盤終わるボタン
  57.  
  58.  
  59.     MovePic(bottunpic,0,114,59,19,helppic,90,260);    //ヘルププロフィールボタン
  60.     MovePic(bottunpic,0,57,59,19,helppic,180,260);    //ヘルプ操作方法ボタン
  61.     MovePic(bottunpic,0,95,59,19,helppic,270,260);    //ヘルプルールボタン
  62.     MovePic(bottunpic,0,0,59,19,helppic,360,260);        //ヘルプaboutボタン
  63.     MovePic(bottunpic,0,38,59,19,helppic,450,260);    //ヘルプ閉じるボタン
  64.     MovePic(bottunpic,0,266,59,19,reportpic,270,300);    //成績表ソートボタン
  65.     MovePic(bottunpic,0,247,59,19,reportpic,360,300);    //成績表ファイルボタン
  66.     MovePic(bottunpic,0,76,59,19,reportpic,450,300);    //成績表ＯＫボタン
  67.     MovePic(bottunpic,0,76,59,19,sortpic,450,300);    //成績表ソートＯＫボタン
  68.     MovePic(bottunpic,0,76,59,19,helpprofilepic,260,250);    //プロフィールＯＫボタン
  69.     MovePic(bigflatpic,0,0,180,175,helpprofilepic,350,65);    //プロフィールビッグふらっとマン
  70.     MovePic(bottunpic,0,76,59,19,helpmovepic,450,240);    //操作方法ＯＫボタン
  71.     MovePic(bottunpic,0,76,59,19,helprulepic,440,330);    //ルールＯＫボタン
  72.     MovePic(uppic,0,0,33,33,helpaboutpic,10,10);        //aboutふらっとマン
  73.     MovePic(bottunpic,0,76,59,19,helpaboutpic,150,150);    //aboutＯＫボタン
  74.  
  75.     for(i=0;i<15;i=i+1){                //ヘルプふらっとマン
  76.         MovePic(uppic,0,0,33,33,helppic,10+35*i,10);
  77.         MovePic(uppic,0,0,33,33,helppic,10+35*i,290);
  78.     }
  79.  
  80.     masuwrite();                    //ゲーム盤マス目
  81.     helptitle();                    //ヘルプテキスト
  82.     helpprofiletitle();                    //プロフィールテキスト
  83.     helpmovetitle();                    //操作方法テキスト
  84.     helpruletitle();                    //ルールテキスト
  85.     helpabouttitle();                    //aboutテキスト
  86.     reporttitle();                    //成績表テキスト
  87.     sorttitle(stepsum,clearsum);                //成績表ソートテキスト
  88. }
  89.  
  90.  
  91. masuwrite(){        //マス目を引く関数
  92.     int i;
  93.  
  94.     SetLineSize(2);
  95.     SetPaintColor(0x000000);
  96.     DrawLine(basepic,10,10,10,325);
  97.     DrawLine(basepic,10,325,325,325);
  98.     DrawLine(basepic,325,325,325,10);
  99.     DrawLine(basepic,325,10,10,10);
  100.  
  101.     for(i=1;i<=8;i=i+1){
  102.         SetLineSize(1);
  103.         DrawLine(basepic,10+35*i,10,10+35*i,325);
  104.         DrawLine(basepic,10,10+35*i,325,10+35*i);
  105.     }
  106. }