サイトトップへ
OSASK.NET
  サイトトップへ       新掲示板(閉鎖済)   Wiki(凍結済)   旧掲示板(廃止済)   ニュース(廃止済)  
7: 2012-03-29 (木) 03:43:32 ifearxbbu(ifearxbbu)[cFmxHuDkriw] ソース 現: 2024-01-08 (月) 12:58:56 k-tan ソース
Line 24: Line 24:
 segment CODE(USE32, PARA); /* おまじない */  segment CODE(USE32, PARA); /* おまじない */
 default(code == CODE); /* おまじない */  default(code == CODE); /* おまじない */
 + 
 asmout("[FILE 'askahelo.ask']"); /* nask編参照 */  asmout("[FILE 'askahelo.ask']"); /* nask編参照 */
 asmout("GLOBAL _OsaskMain");  asmout("GLOBAL _OsaskMain");
 + 
 /* 最初の[SECTION .text]は省略可能なので省略 */  /* 最初の[SECTION .text]は省略可能なので省略 */
 + 
 void _OsaskMain()  void _OsaskMain()
 {  {
     asmout("MOV EBX,data.func_init"); /* ASKAはラベルへのgoto以外はうまくできないので、やむなくasmout。 */      asmout("MOV EBX,data.func_init"); /* ASKAはラベルへのgoto以外はうまくできないので、やむなくasmout。 */
     CALL(0xc7, 0);      CALL(0xc7, 0);
 + 
     asmout("MOV EBX,data.func_openwin");  CALL(0xc7, 0);      asmout("MOV EBX,data.func_openwin");  CALL(0xc7, 0);
     asmout("MOV EBX,data.func_titlebox"); CALL(0xc7, 0);      asmout("MOV EBX,data.func_titlebox"); CALL(0xc7, 0);
Line 41: Line 41:
     /* 永久スリープなので帰ってこない */      /* 永久スリープなので帰ってこない */
 }  }
 + 
 asmout("[SECTION .data]");  asmout("[SECTION .data]");
 + 
 void data()  void data()
 {  {
Line 50: Line 50:
     asmout("DD 0x0004, data.work, 0x0000");      asmout("DD 0x0004, data.work, 0x0000");
     /* ファンクション番号0x04(API初期化), ワークエリアのポインタ, 終了ファンクション番号0x00 */      /* ファンクション番号0x04(API初期化), ワークエリアのポインタ, 終了ファンクション番号0x00 */
 + 
 func_openwin:  func_openwin:
     asmout("DD 0x0020, data.window, 0x0200, 18 * 8, 3 * 16, 0x0000");      asmout("DD 0x0020, data.window, 0x0200, 18 * 8, 3 * 16, 0x0000");
     /* ファンクション番号0x20(ウィンドウオープン), window構造体のポインタ, スロット番号0x200,      /* ファンクション番号0x20(ウィンドウオープン), window構造体のポインタ, スロット番号0x200,
         xサイズ(ドット単位), yサイズ(ドット単位), 終了ファンクション番号0x00 */          xサイズ(ドット単位), yサイズ(ドット単位), 終了ファンクション番号0x00 */
 + 
 func_titlebox:  func_titlebox:
     asmout("DD 0x0028, 0x1000, data.wintitle, 0, 8, 1, 0, 0, data.window, 0x00c0, 0, 0x0000");      asmout("DD 0x0028, 0x1000, data.wintitle, 0, 8, 1, 0, 0, data.window, 0x00c0, 0, 0x0000");
Line 62: Line 62:
         表示x位置0, 表示y位置0, window構造体のポインタ, 標準キャラクタセット使用(0x00c0),          表示x位置0, 表示y位置0, window構造体のポインタ, 標準キャラクタセット使用(0x00c0),
         空白キャラクタ0, 終了ファンクション番号0x00 */          空白キャラクタ0, 終了ファンクション番号0x00 */
 + 
 func_settitle:  func_settitle:
     asmout("DD 0x0040, 0x1000, 0, 0, data.wintitle, 0, 0, 0, 8, 'askahelo', 0x0000");      asmout("DD 0x0040, 0x1000, 0, 0, data.wintitle, 0, 0, 0, 8, 'askahelo', 0x0000");
Line 68: Line 68:
         表示x位置0, 表示y位置0, textbox構造体のポインタ, 文字色0, 背景色0, キャラクタコードオフセット0,          表示x位置0, 表示y位置0, textbox構造体のポインタ, 文字色0, 背景色0, キャラクタコードオフセット0,
         文字数8, 文字列"naskhelo", 終了ファンクション番号0x00 */          文字数8, 文字列"naskhelo", 終了ファンクション番号0x00 */
 + 
 func_sleep:  func_sleep:
     DD(0x0018, 0x0001, 0, 0, 0x0000);      DD(0x0018, 0x0001, 0, 0, 0x0000);
     /* ファンクション番号0x0018(シグナル関係の処理), オプション1(スリープ), パラメータ0,      /* ファンクション番号0x0018(シグナル関係の処理), オプション1(スリープ), パラメータ0,
         パラメータ0, 終了ファンクション番号0x00 */          パラメータ0, 終了ファンクション番号0x00 */
 + 
     ALIGNB(16); /* align8で十分だった気がするけど、なんとなく気分で */      ALIGNB(16); /* align8で十分だった気がするけど、なんとなく気分で */
 work:  work:
Line 83: Line 83:
     RESB(64);  /* 8文字分 (8 * 1 * 8) */      RESB(64);  /* 8文字分 (8 * 1 * 8) */
 }  }
 + 
*** どうやってアセンブルするの? [#v2c5e547] *** どうやってアセンブルするの? [#v2c5e547]
Line 151: Line 151:
-定数計算まわりのじゃじゃ馬なところが改善されて、naskレベルのラベルをthroughしてくれる機能があれば、結構おすすめできるんですけどねえ・・・。 -- [[K]] SIZE(10){2004-12-12 (日) 20:09:04} -定数計算まわりのじゃじゃ馬なところが改善されて、naskレベルのラベルをthroughしてくれる機能があれば、結構おすすめできるんですけどねえ・・・。 -- [[K]] SIZE(10){2004-12-12 (日) 20:09:04}
-tolset08にあわせて説明を修正。 -- [[K]] SIZE(10){2005-01-28 (金) 22:58:09} -tolset08にあわせて説明を修正。 -- [[K]] SIZE(10){2005-01-28 (金) 22:58:09}
-- eHRLAf  <a href="http://vkeemeshseko.com/">vkeemeshseko</a>, [url=http://octxdasuwgsx.com/]octxdasuwgsx[/url], [link=http://izntuxgfzozm.com/]izntuxgfzozm[/link], http://fiwsutgbrytr.com/ -- ''ifearxbbu'' &new{2012-03-29 (木) 03:43:31};+//- eHRLAf  <a href="http://vkeemeshseko.com/">vkeemeshseko</a>, [url=http://octxdasuwgsx.com/]octxdasuwgsx[/url], [link=http://izntuxgfzozm.com/]izntuxgfzozm[/link], http://fiwsutgbrytr.com/ -- ''ifearxbbu'' &new{2012-03-29 (木) 03:43:31};
-#comment+//#comment

トップ   差分 バックアップ 複製 名前変更 リロード印刷に適した表示   ページ新規作成 全ページ一覧 単語検索 最新ページの一覧   ヘルプ
新着

目次
メンバー一覧


最新の20件
2016-10-01 2016-09-08
  • @MenuBar.
2016-09-07 2016-09-04 2016-08-15 2015-09-23 2014-07-30 2014-07-04 2014-02-04 2013-10-26 2013-06-21 2013-06-17 2013-06-15 2013-04-02 2013-02-09 2013-02-04 2012-12-25 2012-12-01 2012-05-28 2012-03-31

トピック一覧
一般用コメント最新
新掲示板lina
2016/9/5 20:58
SandBoxゲスト
2016/9/4 12:01
RecentDeletedlina
2015/6/2 19:29
Old-OSASK-MLlina
2014/6/29 9:14
hideyosi/メールhideyosi
2014/1/6 20:17
hideyosi/募集中lina
2013/11/8 19:56

このサイトは川合秀実から委託を受けて、OSASKコミュニティによって管理・運営されています。