1 REM タイヒ゜ンク゛シャキョウセ゛ンハン 10 CLS 20 LOCATE 0,0:?"タイヒ゜ンク゛シャキョウ" 30 IF INKEY()!=10 THEN GOTO 20 40 CLS:LOCATE 0,0:?"マカハンニャハラミツタシンキ゛ョウ":GOSUB 1000 50 CLS:LOCATE 0,0:?"カンシ゛ーサ゛イホ゛ーサツキ゛ョウシ゛ン":GOSUB 1000 60 CLS:LOCATE 0,0:?"ハンニャーハーラーミーターシ゛ーショウケンコ゛ー":GOSUB 1000 70 CLS:LOCATE 0,0:?"オンカイクウト゛ーイツサイクーヤクシャーリーシーシキ":GOSUB 1000 80 CLS:LOCATE 0,0:?"フーイークウクウフー":GOSUB 1000 90 CLS:LOCATE 0,0:?"イーシキシキソクセ゛ークウクウソクセ゛ーシキ":GOSUB 1000 100 CLS:LOCATE 0,0:?"シ゛ューソウキ゛ョウシキヤクフ゛ーニョー":GOSUB 1000 110 CLS:LOCATE 0,0:?"セ゛ーシャーリーシーセ゛ーショーホウ":GOSUB 1000 120 CLS:LOCATE 0,0:?"クウソウフーショウフーメツフークーフーシ゛ョウ":GOSUB 1000 130 CLS:LOCATE 0,0:?"フーソ゛ーフーケ゛ンセ゛ーコークウチュウ":GOSUB 1000 140 CLS:LOCATE 0,0:?"ムーシキムシ゛ューソウキ゛ョウシキムーケ゛ン":GOSUB 1000 150 CLS:LOCATE 0,0:?"ニーヒ゛ーセ゛ッシンニームーシキショウ":GOSUB 1000 160 CLS:LOCATE 0,0:?"コウミーソクホウムーケ゛ンカイナイシー":GOSUB 1000 170 CLS:LOCATE 0,0:?"ムーイーシキカイムームーミョウ":GOSUB 1000 180 CLS:LOCATE 0,0:?"シ゛ンナイシームーロウシー":GOSUB 1000 190 CLS:LOCATE 0,0:?"コレテ゛セ゛ンハンハオシマイテ゛ス、オツカレサマテ゛シタ!":END 1000 A=0:INPUT A:RETURN
すごいアイデア! 般若心経そのままではなくて、ところどころの音を伸ばす部分も再現するとは見事です。私は「ー」を打つのが苦手なので、とても練習になります。(ーの打ち方を)悟ってしまいそう……。