HSPTV!掲示板

スクリーンセーバーを作ろうと思い、まず色をじっくり変えた背景を作ろうと思いました。
自分のやりたいことは、変数[h]か[s]か[v]が255を超えたら変数を少なくしていき、
変数が0になったら変数を足していくということをしたいわけですが、変数が0の時、
足していくことができません。
とりあえず、コードを載せておきます。

bgscr 
*start
cls
randomize
h=rnd(256)
s=rnd(256)
v=rnd(256)
if h>100:h-=50
if s>150:s-=50
if v>150:v-=50
*main
onerror *main;エラー防止[ネストレベルが深い]
/*色絵画*/
if vs=5:vv=5
if hs=5:hh=5
if ass=5:ss=5
if hh=0:h+=1
if hh=5:h-=1
if ss=0:s+=1
if ss=5:s-=1
if vv=0:v+=1
if vv=5:v-=1
/********/
/*色判定*/
if h<=1:hh=0
if h>=255:hh=5:hs=5
if s<=1:ss=0
if s>=255:ss=5:ass=5
if v<=1:vv=0
if v>=255:vv=5:vs=5
/********/
color
pos 0,0
mes "h="+h
pos 40,0
mes "s="+s
pos 80,0
mes "v="+v
await 2
hsvcolor h,s,v:boxf
goto*main

どうか回答よろしくお願いします！

まずインデントする。これは自分の分かりにくいソースコードを人様にせめて見てもらうための
最低限の心意気なので必ずヤる事。vsだのvvだのass(!?)だの意味の分かりづらい変数名を使うなら
コメントも必要だ。
珍妙なonerror等から察するにまだ経験値が足りないので以下のソースを見て自分で考えること。

#define MAX 255	
	hensuu=0
	zoukabun=1
	
*main
	color 255,255,255:boxf
	color 0,0,0
	
	pos 0,0:mes hensuu
	mes zoukabun
	hensuu+=zoukabun
	if hensuu\MAX=0:zoukabun=-zoukabun
	wait 1
	goto *main

しょうもない質問してすみませんでした。
誠に簡単に解決したので削除しておきます

#define MAX 255	
bgscr 
*start
		
cls
randomize
h=rnd(256)
s=rnd(256)
v=rnd(256)
if h>100:h-=50
if s>150:s-=50
if v>150:v-=50
*main
乱数=rnd(2)
乱数+=1
onerror *main;エラー防止[ネストレベルが深い]
/*色絵画*/
if vのスイッチ=5:vv=5
if hのスイッチ=5:hh=5
if sのスイッチ=5:ss=5
if hh=0:h+=乱数
if hh=5:h-=乱数
if ss=0:s+=乱数
if ss=5:s-=乱数
if vv=0:v+=乱数
if vv=5:v-=乱数
/********/
/*色判定*/
if h<=1:hh=0
if h>=255:hh=5:hs=5
if s<=1:ss=0
if s>=255:ss=5:ass=5
if v<=1:vv=0
if v>=255:vv=5:vs=5
/********/
color
pos 0,0
mes "h="+h
pos 40,0
mes "s="+s
pos 80,0
mes "v="+v
await 2
hsvcolor h,s,v:boxf
goto*main

解決Test

結局onerror云々については解決してないような…
onerrorはHSP内でエラーが発生したときに、
指定されたラベルに飛ぶようにする命令だぞ。

>>check様
onerrorは、取りあえず初めは「repeat~loop」を使っていましたので
時々[ネストが深すぎます]というエラーが出ていました。
なので、そのあとも再開するためにこの命令があります、が、
[goto*main]に変えたので方式が変わり、onerrorは関係なくなったので、消しておこうと思います
アドバイス有り難うございます

ネストが深すぎるというのは、そもそも君のrepeat〜loopの構造がおかしくてHSPが
悲鳴を上げているということなので、onerrorを入れても根本的解決になっていない。
例えるなら『足の骨を折って超痛い。超痛くて食欲ないからあっさりしたものを食べよう』と
いうチンプンカンプンな対応を取っていることになる。骨折を直す努力をしよう。