わざわざつぶやきに反応してくださって、どうもありがとうございました^^


かなりむか～しのBASICです。


フリーウェアのMBASIC86とか、ROMフリーで動くFM-7エミュレータとか、そんなの使ってます。
Windows上でのアプリ開発はどうするのかって？　そんなの作らないもーん（作れません(ヾﾉ･∀･`)）　


VisualBasicもフリーで使えるみたいですけど、うちのパソコンだと重すぎます。
そもそもフォームとかイベントとか(´･д･｀)ゞ？？だし、なんか画面がごちゃごちゃしてて(；´∀｀)だし・・・
でも2.0は持ってたんだよ。



FOR I=0 TO LEN("4F6B6667747A76285D79827A")/2-1
PRINT CHR$ 　(VAL("&H"+MID$("4F6B6667747A76285D79827A",I*2+1,2))-I-1);
NEXT I



下の方に解説・答えを入れておきました・・・
興味の無い方、自力で考えたい方は飛ばしてください。




















・LENは( )の中の文字数を数える関数。
　24文字あるので、FOR I=0 TO 24/2-1 = 11。なので、FOR I=0 TO 11と同じ。


・FOR～NEXTは、繰り返し命令。
　上の例では、0から11までの12回。
　変数Iの値を1づつ増やしながら、FOR～NEXTの間（2行目）を12回実行する。


・MID$(A,B,C)は、文字を取り出す関数。Aの文章の、B文字目から、C文字取り出す。
　MID$("ABCDEFG",1,2)なら"AB"。　MID$("ABCDEFG",4,3)なら"DEF"

　I=0 のとき、MID$("4F6B6667～",0*2+1,2)は"4F"
　I=1 のとき、MID$("4F6B6667～",1*2+1,2)は"6B"
　つまり２行目で、"4F","6B","66"と２文字づつ区切っている。


・VALは( )の中の文字を数値として扱う関数。
　文字の足し算"12"+"13"="1213"、数字の足し算"12"+"13"="25"の違い。


・CHR$は( )の中の数値を文字として返す関数。いわゆるアスキーコード。
　例えば、CHR$(65)なら"A"、CHR$(66)なら"B"
　( )の中に文字は入れられないので、上の例ではVAL関数で数値に変換している。


なので、CHR$(&H4F-I-1) = Iは0なので &H4F-1 = CHR$(&H4E) = N
　　　　　CHR$(&H6B-I-1) = Iは1　　　　　&H6B-2 = CHR$(&H69) = i
　　　　　CHR$(&H66-I-1) = Iは2　　　　　&H66-3 = CHR$(&H63) = c
　　　　　CHR$(&H67-I-1) = Iは3　　　　　&H67-4 = CHR$(&H63) = c...


答え　"Niccoto Town"とつぶやいていました。

#日記広場：パソコン/インターネット