note ライターの方向けにハッシュタグの設定を自動化するプログラム【UWSC】

※Windows の方向けの記事です。
※note ライター向けの記事です。

note ライターの方にも UWSC に興味をもってもらえるかな
UWSC は、Windows の操作を自動化するアプリです。

UWSC の準備
「1.UWSCを準備する【UWSC】」を参考にいずれかのサイトからダウンロードしていただいて、圧縮ファイルを解凍、UWSC を起動して、「GruGru.uws」を試して「電卓」が動いたらアプリ側の準備は完了です。

プログラムの準備
下記のコード部分をコピー、「メモ帳」の新しいタブに貼り付けて、適当なファイルネームで保存。拡張子をサンプル同様に「.uws」として保存してもらえればプログラム側の準備は完了です。

//タグ名をカンマで区切って入力する
DIM str = "#タグ１,#タグ２,#タグ３,#タグ４,#タグ５,#タグ６,#タグ７,#タグ８,#タグ９"
DIM array = SPLIT(str, ",")

//----------------------------------------------------------------------
//ガード条件------------------------------------------------------------
//----------------------------------------------------------------------
NUM = GETALLWIN() //ウィンドウ数の取得
SONZAI=0
FOR i = 0 TO (LENGTH(ALL_WIN_ID) - 1) 
if pos("公開設定",STATUS(ALL_WIN_ID[i],ST_TITLE))>0  then
SONZAI=1
STA_1=STATUS(ALL_WIN_ID[i],ST_TITLE)
endif
NEXT
if SONZAI=1 THEN	//無ければエラー
else
　MSGBOX("公開設定 画面 が見つかりません") // 画面がない処理
 exitexit
endif


//----------------------------------------------------------------------
//タグ設定--------------------------------------------------------------
//---------------------------------------------------------------------- 
ID=GETID("公開設定")

ACW(GETID("公開設定"),-1)

FOR i= 1 TO 10		//10個まで消す	
//※必要に応じて調整してください（入力エリア右内側の端）
BTN(LEFT,CLICK,1467+STATUS(ID,ST_CLX),389+STATUS(ID,ST_CLY),40)	
SCKEY(ID,VK_BACK)
NEXT
//※必要に応じて調整してください（入力エリア左内側の端）
BTN(LEFT,CLICK,768+STATUS(ID,ST_CLX),389+STATUS(ID,ST_CLY),40)	
FOR item IN array
SENDSTR(0,item)
SCKEY(ID,VK_CTRL,VK_V,VK_DOWN,VK_RETURN)
NEXT

MSGBOX("完了しました！")

実行環境の準備
いずれかのブラウザで、ご自身のログイン＞記事＞編集＞公開に進む と進んでいただいて「公開設定」の画面にします。「UWSC」を起動した状態にして、一番左の「読込み」ボタンを押下、先ほど保存した「○○.uws」を選択します。

いざ、実行！
真ん中の「再生」ボタンを押下します。プログラムの２行目にある「#タグ１」から「#タグ９」が設定されましたでしょうか！？

修正して使ってください
サンプルとしては以上になります。
「#タグ１」から「#タグ９」の部分をご自身で設定したいタグに修正して使用してください。
※座標を利用しているため、画面のサイズによっては上手くいかない場合があります。その場合は以下のコードもコピーして「□□.uws」として保存、読み込んで、再生してみてください。
BTN( LEFT , CLICK , X座標 , Y座標 , 40 ) となっていますので、必要に応じて修正してください。

WHILE True 
	// カーソル下のウィンドウが対象
	ID = GETID(GET_FROMPOINT_WIN)
	// 絶対座標
	x1 = G_MOUSE_X
	y1 = G_MOUSE_Y
  // 相対座標
  x2 = x1 - STATUS(ID, ST_X)
  y2 = y1 - STATUS(ID, ST_Y)
  s = "絶対座標 x:" + x1 + " y:" + y1 + "<#cr>"
  s = s + "相対座標 x:" + x2 + " y:" + y2
  // 戻す
  MOUSEORG(0)
  Fukidasi(s, 10, 10, 0) 
  Sleep(0.1) 
WEND

どうでしたか！？
割と簡単だったのではないかと思います。この程度の難易度で挑めますので、仕事にも手を付けてみるかは皆さんの気持ち次第です。やるなら明日といわず、今からです。

「誰もが無料でWindows自動化を始め、生産性を向上し続けられるようにする」