【TTL】はじめてのTTLマクロ 6 iniファイルの読み込み

はじめに

connect後にiniファイルを読み込み、バックグラウンドカラーやフォントなどを変更します。
これにより、無事connectできた際にウィンドウの見た目がかわるので、処理状況が分かるようになります。

TERATERM.INI

変更したい個所を記載。
VTColorは、文字のRGB、背景のRGBの順です。

[Tera Term]
;	Language (English/Japanese/Russian/Korean/Chinese/UTF-8)
Language=Japanese
;	Terminal size
TerminalSize=300,32
;	Terminal size=window size (on/off)
TermIsWin=off
;	Auto window resizing option (on/off)
AutoWinResize=off
;	Enable scroll buffer (on/off)
EnableScrollBuff=on
;	Scroll buffer size
ScrollBuffSize=10000
;  	Text and background colors
;		for Normal characters
VTColor=0,0,0,255,255,255
;	Font ※-16:12pt
VTFont=ＭＳ ゴシック,0,-20,128

logget.ttl

connectするサブルーチンの直後に、restoresetupでiniファイルを読み込みウィンドウのタイトルをホスト名に変更するサブルーチンを実行するようにします。

;------------------------------------------------------------------------------
;変数設定
;------------------------------------------------------------------------------
  ;debugモードで動かすか選択
  numDebugFlag = 1		; 1:debugモード 0:通常モード
  if numDebugFlag = 1 messagebox "debugModeOn" "debug"

  ;フォルダ名・ファイル名を設定
  strIniFileName        = ".\TERATERM.INI"

  ;プロンプト回り
  strConnectText = ""
  strLogFileName = params[2]
  strIP          = params[3]
  strLoginPass   = params[4]
  strEnablePass  = params[5]
  strLoginUser   = params[6]

;------------------------------------------------------------------------------
;メインルーチン
;------------------------------------------------------------------------------
:mainRoutin
 ;機器にログインしてログ取得
  call funcGetConnectText
  call funcConnectDevice

（略）

;------------------------------------------------------------------------------
;connectし、接続できたらiniファイルの読み込むサブルーチン
;------------------------------------------------------------------------------
:funcConnectDevice
  if numDebugFlag = 1 messagebox "funcConnectDevice" "debug"

  ;リンク状態を必要に応じてリセットしてから接続
  testlink
  if result <> 0 closett
  connect strConnectText

  ;iniファイルを読み込む
  getdir strTemp
  strconcat strTemp strIniFileName
  restoresetup strTemp 

  ;windowのタイトルを設定
  settitle strHostname

return

前の記事