HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2008
0524
wai文字の変換?8解決


wai

リンク

2008/5/24(Sat) 23:04:26|NO.16075

"aiueo123"を"61 69 75 65 6F 31 32 33"のように変換するにはどうすれば良いでしょうか?


sdim a,16 a="aiueo123" mes strf("[%X]",a) stop

のようにしてみたのですが、文字がそのまま表示されてしまいます。
どなたかご存知の方がいらっしゃいましたら教えてください。
よろしくお願いしますm(__)m



この記事に返信する


Potocop

リンク

2008/5/24(Sat) 23:22:51|NO.16079


moji = "aiueo123" repeat strlen(moji) ;文字数分繰り返す m1 = strmid(moji, cnt, 1) ;1文字取り出す cnvstow c1, m1 ;文字コードに変換 mes m1 + " : " + strf("%X", c1) loop stop
これでできます



ANTARES

リンク

2008/5/25(Sun) 03:28:16|NO.16093


sdim a,16 a="aiueo123" s="" repeat strlen(a) s+=strf("%X ",peek (a,cnt)) loop mes s stop



wai

リンク

2008/5/25(Sun) 09:07:59|NO.16095

解決しました!
ありがとうございます。



StarratS

リンク

2008/5/25(Sun) 11:25:19|NO.16098


t = "Chinese Premier Wen Jiabao says the number of deaths from the massive earthquake in Sichuan Province has topped 60,000." w = " ","\n" s = "" repeat if peek(t,cnt)=0: break s += strf("%X",peek(t,cnt))+w(cnt\16=$F) loop mes s
長い文字列を処理する際に文字列長を数えるということはそれだけで時間がかかって無駄。



StarratS

リンク

2008/5/25(Sun) 11:28:39|NO.16099

こっちでもいいや。

t = "Chinese Premier Wen Jiabao says the number of deaths from the massive earthquake in Sichuan Province has topped 60,000." w = " \n" s = "" repeat if peek(t,cnt)=0: break s += strf("%X",peek(t,cnt))+strf("%c",peek(w,cnt\16)) loop mes s



wai

リンク

2008/5/25(Sun) 12:06:45|NO.16101

strlenを使わなくてもできるんですね。
効率良い方法も教えて頂いて助かります。
ありがとうございます!



Kpan

リンク

2008/5/25(Sun) 12:50:56|NO.16102

文字列の長さによるのかもしれんですが、こちらで計測したところ、
StarratSさんのサンプルはstrlenで済ませた方が速いです。
(「if peek(t,cnt)=0」分のスピード落ち

あとは、「+=」でなくてpoke命令で書き込めば、もう少しパフォー
マンスは上がるかも?
(元の文字列がもっともっと長いのであれば



StarratS

リンク

2008/5/25(Sun) 13:07:07|NO.16103

さんきゅ。



ONION software Copyright 1997-2023(c) All rights reserved.