Windows 10/11でのHTBasic for Windows ワークウィンドウの設定

Tip

■ Windows 10/11でのHTBasic for Windows ■
[ワークウィンドウの設定]

はじめに

HTBasicは、Windows 10 / 11動作環境で実行するWindows32bitアプリケーションです。
HP9000 Workstation BASIC ⇒　HPBASIC/HTBasic for DOS ⇒ HPBASIC/HTBasic for Windowsと、Rocky Mountain BASICの仕様は継承され、Windows 10/11動作環境のPCで使用できる「HTBasic 2021」「HTBasic 10.1」があります。(2022.03現在)
HTBASIC for HP Workstation 以来のソースコードはほとんど継承され、テキストベースで最新のHTBasic for Windowsで読み込み、シンタックスチェックができ、新しいプラットホーム移植・実行が可能となっています。
HP9000 Workstation BASICでのコマンドベース・ライクの操作画面/表示設定も可能です。

<拡大>	<拡大>
HP9000/345 Workstation BASIC でユーザが使用する画面 DISPLAY 解像度：1600ｘ 1024	Windows 11 Enterprise HTBASIC 2021でユーザが使用する画面（HP9000ライク） DISPLAY 解像度：1920ｘ 1080

「HTBasic 2021」「HTBasic 10.1」はWindows32bitアプリケーションとして、Windows 10 / 11のGUI等機能/操作性の良さを利用し、よりユーザにとって使いやすいものになり、目的に合わせカストマイズが可能です。

<拡大>

HP9000以来、Rocky Mountain BASIC仕様のBASICの使用環境（プラットフォーム）はドラマティックな変化があり、メインプロセッサ/グラフィックスの高速化、使用できるメインメモリーの拡大、使用できるファイルサイズの拡大と新しいインターフェースへの対応等に対し、HTBasic for Windowsはその時点で最大のパフォーマンスを発揮できるように、継続的にアップデートが続けられています。
以下、Windows 10 / 11で「HTBasic 2021」「HTBasic 10.1」をよりユーザにとって使いやすく、目的に合わせたカストマイズの方法について、Windowsデスクトップのカストマイズも併せ紹介します。

目　次

１．プログラムの親和性（例題で使用するテストプログラム）
２．テストプログラムを、初めてHTBasic/Windows で実行
３．Windows11でのHTBasic for Windows「 WindowsアプリケーションのGUI」
４．HTBasic for Windowsとあわせて使用するWindowsの機能と設定方法
４-１　Windowsデスクトップで、Windowsアプリケーションの可視領域を増やす方法
４-１-１　「タスクバーを隠す」機能
４-１-２　「タスクバーの高さを変える」機能
４-２　Windowsデスクトップで、Windowsアプリケーションの表示を拡大する方法
５． HTBasicワーク・ウィンドウのデスクトップ上の位置と幅と高さの設定
６．ツールバーとステータスラインの表示/非表示
７．運用状況に合わせた、HTBasicとWindowsデスクトップの設定
８．終わりに
８－１　その他のHTBasicでの設定値
８－２　サンプルプログラムのまとめ（７-例４）

１．プログラムの親和性（例題で使用するテストプログラム）

130 GINIT
140 CLEAR SCREEN
150 GCLEAR
160 KEY LABELS OFF
170 FOR I=1 TO 44
180 PRINT TABXY(1,I);I
190 NEXT I
200 FOR I=1 TO 128
210 OUTPUT Buf$ USING "DDD";I
220 PRINT TABXY(I,2);Buf$[3;1]
230 PRINT TABXY(I,3);Buf$[2;1]
240 PRINT TABXY(I,4);Buf$[1;1]
250 NEXT I
260 L_pitch=100/(51)
270 PEN 1
280 CSIZE 2,.5
290 LORG 1

300 FOR I=1 TO 51
310 MOVE 5,100-(I*L_pitch)
320 LABEL I
330 NEXT I
340 MOVE 0,0
350 DRAW 100,100
360 MOVE 100,0
370 DRAW 0,100
380 PEN 2
390 MOVE 0,0
400 DRAW RATIO*100,100
410 MOVE RATIO*100,0
420 DRAW 0,100
430 PEN 1
440 WAIT 5
450 KEY LABELS ON
460 END

このプログラムは、どこも変更なく、HP9000 WS BASICでもHTBasicでも使用できます。

Line# 130 GINT は、すべてのGraphics パラメーターをデフォルト値に設定します
Line# 170 ～ 190 は、 PRINT可能行までPRINTを実行　”44”は、 HP9000で既知となった表示可能ライン数を使用
Line# 200 ～ 250 は、１行にPRINTできる桁数までPRINTを実行　”128” は、 HP9000で既知となった文字数/ラインを使用
Line# 260 　　　　　 L_pitch=100/(51)の”51”は、表示可能ライン数+”7”を使用
Line# 300 ～ 330 は、GRAPHICプレーンで表示可能行までPRINT文の代わりに LABEL文を使用し実行
Line# 340 ～ 370 は、VIEWPORT 0, 100,0,100域を白線で表示
Line# 380 ～ 420 は、VIEWPORT 0,RATIO*100,0,100域を赤線で表示

  HP9000/345 Workstation BASIC でDISPLAY 解像度：1600 x 1024の表示装置を使用した場合の表示域内の1行当たりの文字数 ”128”、PRINT可能な行数 ”44”となります。グラフィック表示域は、デフォルトで “100 x 100“(白線) /“RATIO*100 x 100“(赤線)となります。
  以降のテストではWindows 10 / 11 PCは、Mouse Computer DT7-B460M DISPLAY 解像度：1920 x 1080 (Lenovo T24i-10 WXGA 表示装置)を使用しています。
  HTBasicは、「HTBasic 2021」「HTBasic 10.1」でテストを行っていますが表示は「HTBasic 2021」を使用していますが、差異がある場合は「HTBasic 10.1」での表示もあわせて行っています。
また同様にWindows 11 / 10両Windows OSでテストを行っていますが表示はWindows 11となっており、差異がある場合はWindows 10での表示も行っています。
  注）テストプログラムは、HP9000/345 Workstation BASIC とHTBasicでは同じコードを使用していますが、HTBasicでのグラフィックでの線の表示には資料での表現上、線を強調する処置を行っています。

２．テストプログラムを、初めてHTBasic/Windows で実行

HTBasicを起動すると、Windowsデスクトップに、HTBasicアプリケーション・ウィンドウが表示されます。

<拡大>

　この状態でテストプログラムを実行すると・・・

<拡大>

となり、HP9000 WS BASICでの表示画面とWindows11 HTBasicとでは異なっています。

① PRINTラインが、”44”から“28(44)”となり、LABELの表示サイズ、GRAPHICプレーンのラインピッチが小さくなっています。
② 行あたりの文字数が、表示画面の途中で止まっています。(128桁)

３．Windows11でのHTBasic for Windows「 WindowsアプリケーションのGUI」

<拡大>

  ここでは、全体をHTBasicユーザ作業域/ワーク・ウィンドウと呼びます。
上段から、タイトルバー(Title Bar) 、メニューバー(menu Bar) 、ツールバー(Tool Bars) が配置され、メニューバー(menu Bar) 、ツールバー(Tool Bars)はワーク・ウィンドウから切り離してデスクトップ上に配置可能です。
  中央にHTBasicのプログラムの表示域/実行可視範囲があり、最下段はHTBasicの状況を表示するステータスバー(Status Bar)が配置されています。
  プログラムの実行での表示域では、ALPHAプレーンとGRAPHICSプレーンが重ねて表示されます。
  ALPHAプレーンで表示可能な文字の行数は、STATUSステートメントで取得できます。
            STATUS CRT,13;L_by_crt ! HP9000/HTBasic共通　
            L_by_crt= STATUS(CRT,13) ! HTBasicのみ
  実際にPRINT文で使用できる行数は、L_by_crt-7となります。
<-7>は、①Space　Line 1行分②DISP域1行分③INPUT域2行分④メッセージ1行分⑤ソフトキー 2行分となっています。
１行に表示可能な文字の数の取得は、次のようになります。
            STATUS CRT,9; C_by_l 　　　! HP9000/HTBasic共通
            C_by_l = STATUS(CRT,9)　　! HTBasicのみ
１行に表示可能な文字数の最大値は255です。
  GRAPICSプレーンの表示域全体のVIEWPORTのデフォルトは横長の場合、
   VIEWPORT 0,RATIO*100,0,100、縦長の場合、VIEWPORT 0, 100,0, RATIO*100　となります。

４．HTBasic for Windowsとあわせて使用するWindowsの機能と設定方法

４-１　Windowsデスクトップで、Windowsアプリケーションの可視領域を増やす方法

４-１-１　「タスクバーを隠す」機能

アプリケーション・ウィンドウがタスクバーに隠れてしまう/重なってしまう場面にまま遭遇します。この様な時にタスクバー設定を行い使用可能にできます。 Windows11の場合、個人用設定｜タスクバー｜タスクバーの動作から「タスクバーを隠す」機能を設定します。Windows10の場合、個人用設定｜タスクバー　から「デスクトップモードで自動的に隠す」機能を使用します。

４-１-２　「タスクバーの高さを変える」機能

  「タスクバーの高さを変える」事によって、アプリケーション・ウィンドウの表示の自由度が増えます。
  Windows11でのタスクバーの仕様が、大きく変更されました。Windows10では、タスクバーの設定から、「小さいタスクバーボタンを使う」機能で、２段階に調整が行えます。
  Windows11では、何もしないと１段階しかありません。しかし、Registry Editorを操作し、追加の設定により３段階の調整が行われます。
  Windows10の場合、個人用設定｜タスクバー　から「小さいタスクボタンを使う」機能を使用します。

「小さいタスクボタン」

「標準のタスクボタン」

Windows11の場合、Registry Editorを起動後、

\HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\ Explorer\Advanced

まで移動し「TaskbarSiキー（DWORG(32bit)）」を作り、値を設定します。
値の意味は　0：　小　1：　標準　2：　大　　となります。

「0：　小」

「1：標準」

「2：　大」
Windows11標準高の場合、Windows10での標準高より若干高い。

４-２　Windowsデスクトップで、Windowsアプリケーションの表示を拡大する方法

  Windows10/11には、「拡大/縮小｜テキスト、アプリ、その他の項目のサイズを変更」する機能があります。
  テストに使用しているWindows PCの構成では、【100%、125%、150%、175%】を選択できるようになっています。
  デスクトップ上のアイコンのない場所から右クリック、「ディスプレイ設定」を左クリックまたは、スタート｜設定｜システム｜ディスプレイ設定｜拡大/縮小とレイアウト　から設定できます。

５． HTBasicワーク・ウィンドウのデスクトップ上の位置と幅と高さの設定

テストプログラムに、HTBasicアプリケーション・ウィンドウの位置(X,Y)、幅と高さ(W,H)を指定するステートメントを追加します。

10 OPTION BASE 1
20 INTEGER Set4_(1:4)
30 DATA 400,0,1028,925
40 READ Set4_(*)
50 GESCAPE CRT,33,Set4_(*) ! Set position and size: X,Y,W,H

Line# 10 　　　　　 OPTION BASE 1 は、行列のスタートが”1”から始まることを宣言 Line# 20 ～ 40 は、 X,Y,W,Z の値を、Set4(*)にセットします Line# 50 は、　　　 GESCAPE CRT ステートメントの、機能番号”33”を使用し、HTBasic アプリケーション・ウィンドウの位置(X,Y)、幅と高さ(W,H)を設定
　注) 位置(X,Y)は、左上端部の位置で、(-)の値の設定も可能です

<拡大>

６．ツールバーとステータスラインの表示/非表示

HP9000 WS BASICとHTBasic/HPBASIC DOS版では、プログラムの編集・実行等はコマンドライン(インプット域)から行ってきましたが、HTBasic Windows版では、他のWindowsアプリケーションと同様、WindowsのGUIを使用した操作性の良いものとなっています。　半面Display表示装置上の可視領域を減少させてしまします。　そこでHTBasic Windows版では、領域の表示/非表示をコントロールすることができます。

60 GESCAPE CRT,46 ! Turn the Control Toolbar off (46)/ on(47)
70 GESCAPE CRT,60 ! Turn the Search & Bookmark Toolbar off (60)/ on(61)
80 GESCAPE CRT,62 ! Turn the Debug Toolbar off(62) / on(63)
90 GESCAPE CRT,48 ! Turn the Status Bar off (48)/ on(49)

Line# 60～80 3種類のTool Bar使用表示をオフにします
　Control Toolbarの表示/非表示機能は、メニューバーからも利用できます
Line# 90 Status Barの表示をオフにします

他の表示/非表示機能
タイトルバーの表示/非表示

GESCAPE CRT,38 ! Hide / Restore the Title bar (Toggle switch)

注）トグルスイッチとなっています。使用については勧めません。

メインメニューバーの表示/非表示

GESCAPE CRT,51 ! Remove Main Menu (50)/ Restore Main Menu (51)

        注）HTBasic10.1では使用可。HTBasic2021では使用不可（2021.03.03）
               使用については勧めませんが、メニューバーをワークウィンドウから切り離す事で、
               同等の設定が可能です。

<拡大>

運用状況に合わせた、HTBasicとWindowsデスクトップの設定は、４．５．６．項を組み合わせてカストマイズを行います。

   例1） HTBasicのサイズを、幅：800　高さ：600（SVGA相当）に設定し、Tool Bar、Status Bar
       を非表示にし、デスクトップのタスクバーを、「0：　小」に設定
      ①　100%　の場合

②　125%　の場合

③　150%　の場合

④　175%　の場合

       HTBasicのアプリケーション下端が、タスクバーに隠れてしますので、
       ４-１-２　「タスクバーを隠す」機能を使用すると、全体が表示できます。
       文字を大きくして、操作がしやすくなります。

   例２）HTBasicのサイズを、幅：1024　高さ：768　（XGA相当）に設定し、Tool Bar、Status Bar
       を非表示にし、デスクトップのタスクバーを、「0：　小」に設定
      ①　100%　の場合

<拡大>

②　125%　の場合

<拡大>

文字も大きくなり、操作がしやすくなります。（XGA相当）

    例３）HTBasicのサイズを、最大幅：1916最大高さ：996　（Full Hi-vision 1920ｘ1080相当）
       に設定し、Tool Bar、Status Barを非表示、デスクトップのタスクバーを、「0：　小」に、
       タスクバーを残し、デスクトップをフルに使用

<拡大>

この設定の場合、PRINT文使用可能域の行数は “48”、１行当たりの文字数は “239”となります。
可視領域に余裕がある場合は、ツールバーを残すことをお勧めします。

例４）HTBasicのサイズを、最大幅：1280最大高さ：800（WXGA 1280ｘ800相当）
に、Tool Bar、Status Barを表示にし、デスクトップのタスクバーを、「0：　小」に設定

<拡大>

この設定の場合、PRINT文使用可能域の行数は “37”、１行当たりの文字数は “160”となります。

８．終わりに

８－１　その他のHTBasicでの設定値

(1) 漢字表示を可能にします
     CONTROL CRT,100;1 ! Enable use Kanji-character
(2) HTBasicがアクティブ状態で、マウスからの一部の割り込みを停止
     CONTROL KBD,203;1 ! Mouse move capturing with ON KBD$ (1 = on, 0 = off)
     CONTROL KBD,204;1 ! Mouse click capturing with ON KBD$ (1 = on, 0 = off)
     CONTROL KBD,16;1 ! Scroll keys: 0 = Enable, 1 = Disable,
                 ! 2 = Disable, but allow ON KBD capture.
                 ! Prevents user from scrolling off screen display with cursor keys.
(3) 最大化ボタンを押すと、アプリケーション・ウィンドウ内の表示がクリアされますので、
     使用停止するには・・・
     GESCAPE CRT,56 !Disable Maximize button on the Parent Window

８－２　サンプルプログラムのまとめ（７-例４）

10 OPTION BASE 1
20 CONTROL CRT,100;1 ! Enable use Kanji-character
30 INTEGER Set4_(1:4)
40 DATA 150,0,1280,800
50 READ Set4_(*)
60 GESCAPE CRT,33,Set4_(*) ! Set position and size: X,Y,W,H
70 GESCAPE CRT,47 ! Turn the Control Toolbar off (46)/ on(47)
80 GESCAPE CRT,60 ! Turn the Search & Bookmark Toolbar off (60)/ on(61)
90 GESCAPE CRT,62 ! Turn the Debug Toolbar off(62) / on(63)
100 GESCAPE CRT,49 ! Turn the Status Bar off (48)/ on(49)
110 GESCAPE CRT,56 ! Disable Maximize button on the Parent Window
120 !
130 CONTROL KBD,203;1 ! Mouse move capturing with ON KBD$ (1 = on, 0 = off)
140 CONTROL KBD,204;1 ! Mouse click capturing with ON KBD$ (1 = on, 0 = off)
150 CONTROL KBD,16;1 ! Scroll keys: 0 = Enable, 1 = Disable, 2 = Disable,
151 !but allow ON KBD capture.
152 !Prevents user from scrolling off screen display with cursor keys.
160 !
170 GINIT
180 CLEAR SCREEN
190 GCLEAR
200 KEY LABELS OFF
210 ! 220 C_by_l=STATUS(CRT,9) ! Get columns by Line
230 L_by_crt=STATUS(CRT,13) ! Get lines by CRT
240 L_by_alpha=L_by_crt-7 ! Get Max lines of ALPHA plane
250 L_pitch=100/(L_by_crt) ! Line pitch on the GRAPHIC plane
260 L_pitch=.992*L_pitch ! Line pitch adjustment WXGA(1280ｘ800) .992
270 !
280 FOR I=1 TO L_by_alpha
290 PRINT TABXY(1,I);I
300 NEXT I
310 FOR I=1 TO C_by_l
320 OUTPUT Buf$ USING "DDD";I
330 PRINT TABXY(I,2);Buf$[3;1]
340 LORG 1
350 FOR I=1 TO L_by_crt
360 MOVE 5,100-(I*L_pitch)
370 LABEL I
380 NEXT I
390 ! 400 MOVE 0,0
410 DRAW 100,100
420 MOVE 100,0
430 DRAW 0,100
440 !
450 PEN 2
460 MOVE 0,0
470 DRAW RATIO*100,100
480 MOVE RATIO*100,0
490 DRAW 0,100
500 !
510 PEN 1
520 WAIT 5
530 KEY LABELS ON
540 END

参考） Lenovo T24i-10 WXGA 1920x1080 での設定値

	Line# 30
800x600(SVGA)	DATA 200,6,800,600
1024x768(XGA)	DATA 200,0,1024,768
1280x768(WXGA)	DATA 200,0,1280,768
1280x800(WXGA)	DATA 200,0,1280,800
1920x1080(WXGA)	DATA -8,-8,1916,996

	Line# 210 (Line pitch adjustment )	Line# 340 (Font size adjustment)
800x600(SVGA)	L_pitch=.99*L_pitch	CSIZE 3,.5
1024x768(XGA)	L_pitch=.988*L_pitch	CSIZE 2.5,.5
1280x768(WXGA)	L_pitch=.988*L_pitch	CSIZE 2.5,.5
1280x800(WXGA)	L_pitch=.992*L_pitch	CSIZE 2.4,.5
1920x1080(WXGA)	L_pitch=.995*L_pitch	CSIZE 1.8,.5

注）Line# 210　Line pitch adjustment 値はおおよその値です
Line# 340 　Font size adjustment値はおおよその値です

以上
i2net/2022.03.21

TransEra, HTBasic, TAMS, HP, Agilent, Keysight, NI, ines, Microsoft, Windows等記載されている会社名、製品名は各社の登録商標または商標です

【お問い合わせ先】

アイネット株式会社
E-mailでのお問い合わせ
_/_/_/ Copyright 1998- 2022 I2NET Co., Ltd.　AllRights Reserved. _/_/_/