home *** CD-ROM | disk | FTP | other *** search
/ Gekkan Dennou Club 147 / Gekkan Dennou Club - 2000.8 Vol. 147 (Japan).7z / Gekkan Dennou Club - 2000.8 Vol. 147 (Japan) (Track 1).bin / html / docs / ippon / ver / 002 / main.txt
Encoding:
Text File  |  2000-07-07  |  5.3 KB  |  235 lines
  1. /* 男は一本槍 */
  2.  
  3. /* main.c */
  4. #include <stdio.h>
  5. #include <stdlib.h>
  6. #include <string.h>
  7. #include <ctype.h>
  8. #include <sys/dos.h>
  9. #include <sys/iocs.h>
  10. #include "XSP2lib.H"
  11.  
  12.  
  13. #define GLOBAL_DEFINE        /* グローバル変数を確保する */
  14. #include "main.h"
  15.  
  16. static int old_crtmod;
  17.  
  18. #define PCG_MAX    256        /* パターンデータの個数 */
  19. #define FRM_MAX    256        /* フレームデータの個数 */
  20. #define REF_MAX    256        /* リファレンスデータの個数 */
  21.  
  22. static char pcg_alt[PCG_MAX + 1];    /* ＰＣＧ配置管理テーブル */
  23. static char pcg_dat[PCG_MAX * 128];    /* ＰＣＧデータファイル読み込みバッファ */
  24. static XOBJ_REF_DAT ref_dat[REF_MAX];    /* リファレンスデータ */
  25. static XOBJ_FRM_DAT frm_dat[FRM_MAX];    /* フレームデータ */
  26.  
  27. static unsigned short pal_dat[16][15];    /* パレットデータ */
  28.  
  29.  
  30.  
  31. void usage (void)
  32. {
  33.     printf (
  34.                "縦スクロールシューティング・一本槍 IPPON.X ver0.02\n"
  35.                "        programmed by Mitsuky <FreeSoftware>\n"
  36.                "自機を表示して終了するだけ\n"
  37.         );
  38. }
  39.  
  40.  
  41.  
  42. /* 終了時に１度だけ呼ばれる・エラーだったら返ってこない */
  43. void Tini (void)
  44. {
  45.     int sp;
  46.  
  47.     switch (error_level) {
  48.     case ERROR_NON:
  49.         xsp_off ();
  50.         /* 画面モードを元に戻す */
  51.         sp = _iocs_b_super (0);
  52.         *(unsigned short *) 0xe8e006 &= 0xfffd;        /* HRL ビットを元に戻す */
  53.         _iocs_b_super (sp);
  54.         _iocs_crtmod (old_crtmod);
  55.         _dos_kflushio (0xff);    /* キーバッファをクリア */
  56.         /* break が無い事に注意 */
  57.  
  58.     case ERROR_FILE:
  59.         _iocs_tgusemd (1, 0);
  60.         /* break が無い事に注意 */
  61.     case ERROR_GUSEMD:
  62.         _iocs_tgusemd (0, 0);
  63.         /* break が無い事に注意 */
  64.     case ERROR_TUSEMD:
  65.         /* break が無い事に注意 */
  66.     default:
  67.         break;
  68.     }
  69.  
  70.     if (error_level != ERROR_NON) {
  71.         /* エラーが発生した場合 */
  72.         puts (error_message);
  73.         exit (-1);    /* 終了する */
  74.     }
  75. }
  76.  
  77.  
  78.  
  79. /* 起動時に１度だけ呼ばれる */
  80. static void Init (void)
  81. {
  82.     int sp;
  83.     int i, j, r;
  84.     static unsigned short crtcdata[9] =
  85.     {69, 6, 11 + 8, 59 - 8, 567, 5, 40, 552, 0x0111};
  86.     unsigned short *d;
  87.     FILE *fp;
  88.  
  89.     error_message = NULL;
  90.  
  91.     /* テキスト画面の使用状況をチェック */
  92.     error_level = ERROR_TUSEMD;
  93.     if (_iocs_tgusemd (1, -1) == 2) {
  94.         error_message = "テキスト VRAM が使用中です";
  95.         Tini ();
  96.     }
  97.     /* グラフィック画面の使用状況をチェック */
  98.     error_level = ERROR_GUSEMD;
  99.     if (_iocs_tgusemd (0, -1)) {
  100.         error_message = "グラフィック VRAM が使用中です";
  101.         Tini ();
  102.     }
  103.     _iocs_tgusemd (0, 2);
  104.     _iocs_tgusemd (1, 2);
  105.  
  106.  
  107.     /* 各種ファイル読み込み */
  108.     error_level = ERROR_FILE;
  109.     /* pcg_dat にパターンデータを読み込む */
  110.     fp = fopen ("PLAYER.XSP", "rb");
  111.     if (fp == NULL) {
  112.         error_message = "PLAYER.XSP が読めません";
  113.         Tini ();
  114.     }
  115.     fread (pcg_dat, sizeof (char), PCG_MAX * 128, fp);
  116.     fclose (fp);
  117.  
  118.     /* frm_dat にフレームデータを読み込む */
  119.     fp = fopen ("PLAYER.FRM", "rb");
  120.     if (fp == NULL) {
  121.         error_message = "PLAYER.FRM が読めません";
  122.         Tini ();
  123.     }
  124.     fread (frm_dat, sizeof (XOBJ_FRM_DAT), FRM_MAX, fp);
  125.     fclose (fp);
  126.  
  127.     /* ref_dat にリファレンスデータを読み込む */
  128.     fp = fopen ("PLAYER.REF", "rb");
  129.     if (fp == NULL) {
  130.         error_message = "PLAYER.REF が読めません";
  131.         Tini ();
  132.     }
  133.     r = fread (ref_dat, sizeof (XOBJ_REF_DAT), REF_MAX, fp);
  134.     fclose (fp);
  135.  
  136.     /* REF_DAT[].ptr 補正 */
  137.     for (i = 0; i < r; i++)
  138.         (int) ref_dat[i].ptr += (int) frm_dat;
  139.  
  140.  
  141.     /* pal_dat に一旦パレットデータを読み込む */
  142.     fp = fopen ("PLAYER.PAL", "rb");
  143.     if (fp == NULL) {
  144.         error_message = "PLAYER.PAL が読めません";
  145.         Tini ();
  146.     }
  147.     fread (pal_dat, sizeof (unsigned short), 16 * 15, fp);
  148.     fclose (fp);
  149.  
  150.     error_level = ERROR_NON;    /* エラーなし */
  151.  
  152.     /* XSP 関連の初期化 */
  153.     xsp_on ();
  154.     xsp_mode (3);
  155.     /* パターンデータを定義 */
  156.     xsp_pcgdat_set (pcg_dat, pcg_alt, sizeof (pcg_alt));
  157.     xsp_objdat_set (ref_dat);
  158.  
  159.  
  160.     /* 画面モードの初期化 */
  161.     /* 256x256ドット 31kHz 256色モードに */
  162.     old_crtmod = _iocs_crtmod (-1);        /* 前の CRTMOD を保存 */
  163.     _iocs_crtmod (10);    /* 256x256dot 31kHz 256色 */
  164.     _iocs_g_clr_on ();    /* 一応 */
  165.     _iocs_sp_init ();    /* スプライトの初期化 */
  166.     _iocs_sp_on ();
  167.  
  168.     /* 256x256 正方形モードを作る */
  169.     sp = _iocs_b_super (0);
  170.     *(unsigned short *) 0xe80028 = crtcdata[8];
  171.     d = (unsigned short *) 0xe80002;
  172.     for (i = 1; i < 8; i++)
  173.         *d++ = crtcdata[i];
  174.     *(unsigned short *) 0xe80000 = crtcdata[0];
  175.  
  176.     *(unsigned short *) 0xe8e006 |= 0b10;    /* HRL ビット */
  177.     *(unsigned short *) 0xeb080c = crtcdata[2] + 4;
  178.     *(unsigned short *) 0xeb080a = crtcdata[0];    /* スプライト */
  179.     *(unsigned short *) 0xeb080e = crtcdata[6];
  180.     *(unsigned int *) 0xe80018 = *(unsigned int *) 0xe8001c
  181.         = *(unsigned int *) 0xe80020 = *(unsigned int *) 0xe80024
  182.         = (0 << 16) + 0;    /* グラフィック画面の座標 */
  183.  
  184.     *(unsigned short *) 0xe82500 = 0b01001001001110;    /* 優先順位 TX>SP>GR */
  185.     _iocs_b_super (sp);
  186.  
  187.     /* パレットデータを定義 */
  188.     /* （１パレットブロック＝16色） × （15ブロックぶん） 定義する */
  189.     {
  190.         unsigned short *p = (unsigned short *) pal_dat;
  191.         for (i = 1; i < 15; i++)
  192.             for (j = 0; j < 16; j++)
  193.                 _iocs_spalet (0x80000000 | j, i, *p++);
  194.     }
  195. }
  196.  
  197.  
  198.  
  199. /* ゲーム本体 */
  200. static void Game (void)
  201. {
  202.     int j;
  203.     int a_button;
  204.  
  205.     printf ("ジョイスティックの [A] ボタンを押すと終了します\n");
  206.  
  207.     /* [A] ボタンが押されるまでループ */
  208.     do {
  209.         j = _iocs_joyget (0);    /* ジョイスティック０番 */
  210.         /* [A] ボタンが押されたか？ */
  211.         if ((j & 0b00100000) == 0)
  212.             a_button = !0;    /* 押された */
  213.         else
  214.             a_button = 0;    /* 押されていない */
  215.         xobj_set (80 + 32 * 2, 144, 2, 0x073f);    /* 自機を表示 */
  216.  
  217.         xsp_out ();    /* 表示 */
  218.     } while (a_button == 0);
  219. }
  220.  
  221.  
  222.  
  223. int main (int argc, char *argv[])
  224. {
  225.     if (argc != 1) {
  226.         usage ();
  227.         return (-1);
  228.     }
  229.     Init ();
  230.     Game ();
  231.     Tini ();
  232.  
  233.     return (0);
  234. }
  235.