ホーム > タグ > HSP

HSP

cintiqが線画表示に適さないので、一瞬だけメインディスプレイに表示するプログラム

本家とらたま袋の漫画家さんが、cintiqを使ったマルチモニター環境で作業しているのですが
「cintiq上で線画を表示すると鮮明すぎてギザギザが目立つ。
できればメインディスプレイに表示したい」
と、ぼやいていたので、久々にHSPなぞを弄って簡単なプログラムを書きました。

ほんとはコミスタの機能で、ウィンドウのクローンが表示できるんですけど、
マシンスペックの都合だったり、
(cintiqが右側なので) [メニュー] - [ファイル]の位置が左端に移動しちゃうと困ったり、
いろいろ上手い具合に行かないようですね。

さて、問題のプログラムですが、しょうもないコピペプログラミングですので、
実行ファイルではなくサンプルスクリプトとして記載したいと思います。

サブディスプレイの内容をメインに最前面＆全画面で20秒間表示

PLAIN TEXT
HTML:
  1. #uselib "gdi32.dll"
  2. #cfunc CreateDC "CreateDCA" sptr,sptr,sptr,int
  3. #func DeleteDC "DeleteDC"  int
  4. #func BitBlt "BitBlt" int,int,int,int,int,int,int,int,int
  5.  
  6. #define NULL        0
  7. #define SRCCOPY     0x00CC0020
  8. #define CAPTUREBLT  0x40000000
  9.  
  10. // モニター情報の取得(擬似モニターを含む)
  11. #module
  12. #uselib "user32.dll"
  13. #cfunc  EnumDisplayMonitors "EnumDisplayMonitors" sptr, sptr, sptr, int
  14. #func   GetMonitorInfo      "GetMonitorInfoA"     sptr, sptr
  15.  
  16. #define FALSE                   0
  17. #define TRUE                    1
  18. #define NULL                    0
  19. #define MaxMonitors             16
  20. #define MaxRectParameters       4
  21. #define MaxParameters           5
  22. #define Prm_API                 0
  23. #define Prm_max                 1
  24. #define Prm_cnt                 2
  25. #define Prm_idx_primary         3
  26. #define Prm_ptr_rects           4
  27. // 初期化 ret = GMIinit( 最大値 );
  28. //        最大値は数えるディスプレイの最大数。1以上MaxMonitors以下の値。
  29. //        成功ならretは0以外の値、失敗なら0。
  30. #defcfunc GMIinit int max;
  31.         if ( (max <1) || (max> MaxMonitors) ) {
  32.                 return FALSE;
  33.         }
  34.  
  35.         dim  prm,    (MaxParameters + 1);
  36.         dim  rects,  ((max + 1) * MaxRectParameters);
  37.         dim  bin,    (23 + 1);
  38.         mref a_stat, 64;
  39.  
  40.         bin( 0) = 0x83ec8b55, 0x5653d8c4, 0x145d8b57, 0x28d845c7, 0x8d000000;
  41.         bin( 5) = 0x8b50d845, 0xff520855, 0x75c08513, 0xebc03304, 0xfc558b2e;
  42.         bin(10) = 0x7501fa83, 0x084b8b06, 0x8b0c4b89, 0x538b0843, 0x04e0c110;
  43.         bin(15) = 0x8b104d8b, 0x0004b9f1, 0x3c8d0000, 0x0001b802, 0xa5f30000;
  44.         bin(20) = 0x5f0843ff, 0xe58b5b5e, 0x0010C25D;
  45.         prm(Prm_API)         = varptr(GetMonitorInfo);
  46.         prm(Prm_max)         = max;
  47.         prm(Prm_cnt)         = 0;
  48.         prm(Prm_idx_primary) = 0;
  49.         prm(Prm_ptr_rects)   = varptr(rects);
  50.         ret = EnumDisplayMonitors(NULL, NULL, varptr(bin), varptr(prm));
  51.         return ret;
  52. // ディスプレイの数を取得しstatに格納。失敗は負数。
  53. #deffunc GMIcnt
  54.         if (ret == FALSE) {
  55.                 a_stat = -1;
  56.         } else {
  57.                 a_stat = prm(Prm_cnt);
  58.         }
  59.         return;
  60. // プライマリー・ディスプレイのインデックスを取得しstatに格納。失敗は負数。
  61. #deffunc GMIprimary
  62.         if (ret == FALSE) {
  63.                 a_stat = -1;
  64.         } else {
  65.                 a_stat = prm(Prm_idx_primary);
  66.         }
  67.         return;
  68. // 指定したディスプレイの、仮想画面内の座標を取得。
  69. //     ret = GMIrect(idx, rect);
  70. //       成功 : retは0以外。rectに座標を格納。
  71. //              rect(0) : 左上X座標, rect(1) : 左上Y座標,
  72. //              rect(2) : 右下X座標, rect(3) : 右下Y座標
  73. //       失敗 : retは0。    rectは不定。
  74. #defcfunc GMIrect int idx, array rect
  75.         if ( (ret == FALSE) || (idx <0) || (idx>= prm(Prm_cnt)) ) {
  76.                 return FALSE;
  77.         }
  78.         work    = idx * MaxRectParameters;
  79.         rect(0) = rects(work + 0);
  80.         rect(1) = rects(work + 1);
  81.         rect(2) = rects(work + 2);
  82.         rect(3) = rects(work + 3);
  83.         return TRUE;
  84. // 後始末
  85. #deffunc GMIclear
  86.         dim prm,   1;
  87.         dim rects, 1;
  88.         dim bin,   1;
  89.         ret = FALSE;
  90.         return;
  91. #global
  92.  
  93. // ======================== 使用例 =========================
  94. ; ウィンドウ非表示
  95. screen 0, 150, 50 : gsel 0, -1;
  96. wait 50;
  97.  
  98.  
  99.         dim rc, 4;
  100.         ret = GMIinit(4);       // 最大4画面分の情報を取得する
  101.         GMIcnt;
  102.         ret = GMIrect(1, rc);
  103.         subwx0 = rc(0);
  104.         subwy0 = rc(1);
  105.         subwxx = rc(2);
  106.         subwyy = rc(3);
  107.         GMIclear;       // 使わなくなったら呼び出す
  108.  
  109. ; デスクトップ画面のサイズでバッファ画面を作成
  110. sx = subwxx - subwx0 : sy = subwyy - subwy0
  111. buffer 2, sx, sy
  112.  
  113. ; デスクトップ画面のデバイスコンテキスト取得
  114. hdcScreen = CreateDC("DISPLAY", NULL, NULL, NULL)
  115.  
  116. ; デスクトップ画面の画像をコピー
  117. BitBlt hdc, 0, 0, sx, sy, hdcScreen, subwx0, subwy0, SRCCOPY | CAPTUREBLT
  118.  
  119. ; デバイスコンテキスト削除
  120. DeleteDC hdcScreen
  121.  
  122. bgscr 1, ginfo_dispx, ginfo_dispy, 0, 0, 0, : gsel 1,2
  123. gcopy 2, 0, 100, ginfo_dispx, ginfo_dispy
  124.  
  125. wait 2000
  126.  
  127. end

※HSPのコード表示がなかったので、表示がHTMLになってますがご了承下さい。

ある程度環境を選びませんが、当然cintiqがメインディスプレイになっていると
cintiq側に表示してしまうという、逆の動作をします。

今回参考にしたのはこちら

ですので、照らし合わせて数値などを変更していただけば
思い通りの動作になると思います。

プログラミングだかなんだかもうチンプンカンプンだーってんで
実行ファイルだけ欲しい方はtwitter@nawokiまでどうぞ。
リプが無くても泣かない。利用は自己責任。絵を描く人。
上記の条件でのみ配布いたします。(簡単にでよければ改変可能です)

絵を描かない人は……多分スクリプト目的でいらっしゃったと思うので
上記のサイトを熟読して自己解決して下さい。きっとボクよりあなたたちの方が詳しいです。

Home > タグ > HSP

Information

ここは裏たま袋。
本家はこちらです→トラたま袋

最近の投稿
最近のコメント
カテゴリー
タグクラウド
アーカイブ
RSS トラたま袋の新着
フィード

Return to page top