> 難しい
文字列操作にはある程度の慣れと知識が必要になります。とはいえ決して難解なジャンルではないので、簡単なスクリプトを組みながら慣れていけばOKです。
> 変数にいくつ全角文字があるか求める
もっとも簡単なのはループを使って求めることでしょう。
	target = "この文字列に'何文字全角文字が含まれているのか'を調べます。"
	len = strlen( target )
	mes target
	repeat len
		p = peek( target, cnt )
		if (( 129 <= p ) & ( p <= 159 )) | (( 224 <= p ) & ( p <= 252 )) {
			// targetのcntバイト目は全角文字の1バイト目である
			count++
			continue cnt + 2
		}
	loop
	mes "全角文字は" + count + "文字ありました。"
	mes "ちなみに長さが" + len + "バイトですので、半角文字は" + ( len - count * 2 ) + "文字ある計算になります。"
	stop