HSPTV!掲示板

スクロールのように文字が右から左へ美しくスムーズに移動するようなプログラムを作りたいのですが、
よい方法はありませんか？

う〜〜〜ん？
こういうことですか？

buffer 1
mes "右から左にスクロール？"
文字幅 = ginfo_mesx
文字高さ = ginfo_mesy
gsel 0
repeat 文字幅
	gmode 0, cnt, 文字高さ
	pos 文字幅 - cnt,0
	gcopy 1, 文字幅 - cnt
	await 1
loop

buffer 2
mes "それともこういうこと？"
文字幅 = ginfo_mesx
文字高さ = ginfo_mesy
スクリーン幅 = ginfo_winx
gsel 0
repeat スクリーン幅
	gmode 0, 文字幅, 文字高さ
	pos スクリーン幅 - cnt, 文字高さ
	gcopy 2
	await 1
loop

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

「美しく」が欠けてるが。

ここは以後、美しさについて研究するスレになりました。

申し訳ありませんでした。
私としたことが、美しさを欠かすなど…

美しい文字列 = "Ｙｅｓ！　Ｓｏ！　Ｂｅａｕｔｉｆｕｌ！！"
文字数 = strlen( 美しい文字列 ) / 2
移動時間 = 64
回転率 = 0.5
randomize 128
repeat 文字数
	バッファ( cnt ) = ginfo_newid
	buffer バッファ( cnt )
	font msmincho, 26, 19
	boxf
	color rnd( 256 ), rnd( 256 ), rnd( 256 )
	文字 = strmid( 美しい文字列, cnt * 2, 2 )
	mes 文字
	文字幅( cnt ) = ginfo_mesx
	文字高さ( cnt ) = ginfo_mesy
	文字Ｘ( cnt ) = double ( ginfo_winx + 文字幅( cnt ) )
	文字Ｙ( cnt ) = double ( rnd( ginfo_winy ) )
	目標Ｘ += 文字幅( cnt )
	移動速度Ｘ( cnt ) = double( 目標Ｘ - 文字Ｘ( cnt ) ) / 移動時間
	移動速度Ｙ( cnt ) = double( ginfo_winy / 2 - 文字Ｙ( cnt ) ) / 移動時間
loop

描画用バッファ = ginfo_newid
buffer 描画用バッファ
repeat 移動時間 + 1
	redraw 1
	redraw 0
	gradf ,,,,1,$FF0000,$0000FF
	await 1
	回転 = ( 回転率 * 移動時間 ) - ( 回転率 * ( cnt + 1 ) )
	repeat 文字数
		文字Ｘ( cnt ) += 移動速度Ｘ( cnt )
		文字Ｙ( cnt ) += 移動速度Ｙ( cnt )
		gsel 描画用バッファ
		boxf
		pos 文字幅( cnt ), 文字高さ( cnt )
		grotate バッファ( cnt ), 0, 0, 回転, 文字幅( cnt ), 文字高さ( cnt )
		gsel 0
		gmode 2, 文字幅( cnt ) * 2, 文字高さ( cnt ) * 2
		pos 文字Ｘ( cnt ), 文字Ｙ( cnt )
		gcopy 描画用バッファ, 0, 0
	loop
loop

おお！！
素晴らしいです！！
これは素晴らしいですね
ありがとうございます
美しいです。

できれば次は「きらやかさ」や「輝き」を極めたものも見てみたいです

どうぞ。

/********************************************************************************************
*　　＋　　　　　ﾟ　　.　＋　　　　　　　　　　　　.　.　．ﾟ .ﾟ。ﾟ　。　,ﾟ．。ﾟ.　ﾟ．。　.。*
*　　　．　.　　　ﾟ　　.　o　　　　ﾟ　　。　　.　　,　.　.o 。　*　.ﾟ　+　。☆　ﾟ。。．　　.*
*　　　　　　　　　　　　　　　。　　　　　 　｡　　*。,　+　。.　o　ﾟ,　。*,　o　。.        *
*　　ﾟ　　o　　　.　　。　　　.　　.　　　,　　.　,　ｏ　。ﾟ.　,ﾟ　。　＋　。　。,ﾟ.。      *
*　ﾟ　,　　　,　。　.　　　＋　　ﾟ　　　。　　。ﾟ　.　ﾟ。,　☆　*　。ﾟ.　o.ﾟ　　。　.　。   *
*。　.　　．。　　　　o　　　．.　。　ﾟ　 ﾟ　,　。.　o　。*　。　.　o．　。　．　.          *
*　　　　　　　　。　　　.　　　。　　．　.ﾟo　。　*．　。　．.　☆　.　＋.　.　　.         *
*　。　.　　．　.　　　.　　　．　　。　ﾟ。,　☆　ﾟ.　＋　。　ﾟ　,。　.　。　　,　.。       *
*　　　　ﾟ　　。　　　ﾟ　　.　　+。　ﾟ　*　。.　,　。ﾟ　+.　。*。　ﾟ.　　　.　.　．　　.    *
*　。　　.　　　.　。　。ﾟ.　。*　。,　´。.　　☆。。.　ﾟ。+　。　.。　　.　　｡　　　.     *
*　　.　　　。　　ﾟ　ﾟ。　。,　.。o　☆　+　,ﾟ。　*。.　。　。　.　　　　。　　　　.        *
*　ﾟ　.ﾟ　ﾟ　　。ﾟ　+　。.　+。　*　。ﾟ。ﾟ.,　,+　。ﾟ.　。　.　.　　　,　　　　,　　　.     *
*ﾟ。ﾟ+ﾟ`,　o。。.ﾟ*。ﾟ　。.ﾟ　。　☆＋。。ﾟ.　°　。　.　　　,　　　　　　ﾟ　　　　ﾟ        *
*　。,　.ﾟ。　+　☆。,ﾟ.　o。 。+　。ﾟ.,　　.　ﾟ　　　,　　　。　　　　　。　　　.　　　.   *
*　ﾟ.　ｏ　*　。ﾟ。ﾟ.。ﾟ。+ﾟ　。　。　ﾟ。 ﾟ　。　　ﾟ                                        *
*ﾟ`　.ﾟ　.ﾟ.　ﾟ.　.　ﾟ　　.　　ﾟ　　.　　　,　　.　　　　　.　　.　　　。　　　　　　ﾟ　.   *
*　.　　.　　　　　.　,　　　　　。　　　　　　　.　　　　　　　　　　　.　　,　　　　.     *
*　　　　　　。　　　　　　　　　　　　　　　　　ﾟ　　　.　　　　　　　　　　　。           *
*　,　.　　　　　　　　.　　　　　　　　　　　,　　　　　　　.　　　　　.                   *
*********************************************************************************************/
#include "hspinet.as"
font msgothic, 34
pos 30, 220
OutString = ""
InString = "krKBQIFFgUCOcYFAgUWBQINtgUCBRYFAg4qBQIFFgUCV4w=="
b64decode OutString, InString, -1
mes OutString