HSPTV!掲示板

これみたいに画像をテキストにするとかはできませんか?
http://www.onionsoft.net/hsp/contest2005/list_s1.html#id38

一応こんなプラグラムを作ったんですけど、うまくいかないです...

*skins
a=dir_cur
dialog "png|jpg|bmp",16,"画像ファイル|画像ファイル|画像ファイル"
c=stat
if c=0:goto *lllll
chdir a
b=refstr
picload b
winx=ginfo_winx
winy=ginfo_winy
winx2=0
winy2=0
dim rpos,100
dim gpos,100
dim bpos,100
repeat
pget
r=ginfo_r
g=ginfo_g
b=ginfo_b
await
if winx2=winx and winy2=winy:break
if winx2=winx:winy2=winy2+1:winx=0
winx2=winx2+1
rpos(winy2)=rpos(winy2)+r
gpos(winy2)=gpos(winy2)+g
bpos(winy2)=bpos(winy2)+b
loop
goto *skin_loated
*skin_loated
dialog "スキンの読み込みに成功しました。"
goto *skin_saved
*skin_saved
notesel rgbpos
notesave "skin.txt"

ざっと見た感じ
gotoで存在しないラベル指定しているのと
pgetで座標を指定していないのと
noteselで指定している変数に何も入れていないですね

一応スクリプト全部

*lllll
cls
//button "接続",*play
button "スキン設定",*skins
button "配列からスキン読み込み",*skin
stop
*skins
a=dir_cur
dialog "png|jpg|bmp",16,"画像ファイル|画像ファイル|画像ファイル"
c=stat
if c=0:goto *lllll
chdir a
b=refstr
picload b
winx=ginfo_winx
winy=ginfo_winy
winx2=0
winy2=0
dim rpos,100
dim gpos,100
dim bpos,100
repeat
pget
r=ginfo_r
g=ginfo_g
b=ginfo_b
await
if winx2=winx and winy2=winy:break
if winx2=winx:winy2=winy2+1:winx=0
winx2=winx2+1
rpos(winy2)=rpos(winy2)+r
gpos(winy2)=gpos(winy2)+g
bpos(winy2)=bpos(winy2)+b
loop
goto *skin_loated
*skin_loated
dialog "スキンの読み込みに成功しました。"
goto *skin_saved
*skin_saved
notesel rgbpos
notesave "skin.txt"
*skin
goto *lllll

前にも言った話ではありますが(返答もないので見て無いのかもしれないが)、
分からないから即質問ではなく、一旦落ち着いて変数の扱いを確認した方が良いと思います。
今回も含め、変数関連で問題があって動いてないという理由が多いです。
それから、「動かない」ではなく、「エラー(内容○○)が出る」など、
具体的な状況を記載することをお勧めします。
質問者も回答者もただの人間なので質問者がどのような状態になっているのか
記載しないと読み取れません。勘違いや誤解のもとです。

それはそれとして、
repeat以降の変数に問題があるように見えます。
repeatを抜ける条件が
>>if winx2=winx and winy2=winy:break
ですが、
>>winx2=winx2+1
↑でwinx2がwinxと同じ数値になった際、
>>if winx2=winx:winy2=winy2+1:winx=0
こちらでwinxが0になる。
加算しているのはwinx2なのに横サイズを格納したwinxをリセットしているため、
一度↑を実行した後はwinxが0のまま、winx2はリセットされないまま
永久に加算され続け、一生breakされない状態になっています。

問題発生時ですが、変数の中身を定期的に確認することをお勧めします。
今回の場合はrepeatに入ってから抜け出せていなかったので、
repeat内に

title ""+winx+","+"winx2"

の様なコードを入れることでタイトルバーに変数の内容が表示、 更新されていき、winxが0になり、winx2の数値が異常に増えていっていることが 理解できると思います。

すみません。もう少し確認してから投稿するようにします。