HSPTV!掲示板

例えばa÷bの割り算をして、余りが無い時にはダイアログにa÷ｂの結果を表示させ、余りが出る時にはダイアログに○あまり×のように表示させたいのですがどうしたらいいですか？
先日始めたばっかりで、よくわからないのでよろしくお願いします

先日始めたばっかりなら、マニュアルに一通り目を通しましょう。

とりあえずヒントだけ。
この程度ならあまり難しくないはずです。

あまりを求めるには、とある算術演算子を使います。
プログラミングマニュアルの 【3.6 式】 から探してみてください。

あまりがあるか、ないかで処理を分岐させるには if 命令を使います。
【3.12 条件判断】から探してみてください。
あまりがあるか、ないかの判断のしかたもあわせて考えてみましょう。

ダイアログの表示には dialog 命令を使います。

少し誰かからもらったんですけど、
電卓、 + - ÷ ×　がはいってあるのでいいですかね？
これです

screen 0,800,800
*hontai
mes "ただしもしも何もしないで÷をおすと、Error,0で除算しましたとかかれます。ごめんなさい。"
title "電卓"
font "メイリオ",30,1
pos 50,10
mes "数字を入力し、記号を選んでください"
pos 200,100
input suuzi,50,20,5
pos 200,130
input suuzini,50,20,5
pos 150,250
objsize 30,30
button "+",*＋
pos 190,250
button "-",*ー
pos 230,250
button "×",*×
pos 270,250
button "÷",*÷
pos 500,500
objsize 150,25
button goto "終わる" , *end1
button goto "初期化" , *kosin
button goto "使い方" , *tukaikata
stop
*初め
color 255,255,255:boxf 0,100,600,600
stop
*＋
color 0,0,0
pos 200,300
mes suuzi+suuzini
pos 200,400
button "Ｃ",*初め
stop
*ー
color 0,0,0
pos 200,300
mes suuzi-suuzini
pos 200,400
button "Ｃ",*初め
stop
*×
color 0,0,0
pos 200,300
mes suuzi*suuzini
pos 200,400
button "Ｃ",*初め
stop
*÷
color 0,0,0
pos 200,300
mes suuzi/suuzini
pos 200,400
button "Ｃ",*初め
stop
/*詳細とか書かないでごめんなさい。*/
*end1
dialog "ありがとうございました。またつかってください。メッセージボックスが消えて１秒で終わります。 " , 0 , "つかってくれてうれしいよ"
await 2450
/*これ消してもいいよ上のやつ*/
end
stop
*kosin
cls
goto *hontai
stop
*tukaikata
cls
mes "まず上にある inputbox があるのでそこに計算したい数字を入力します。\nそうして、計算したい記号をおすと、答えを見ることができます。"
mes "操作方法\n●input ========== 数字を入力。\n●+ ============== 足し算をする。"
mes "●- ============== 引き算をする。\n●× ============= 掛け算をする。\n●÷ ============= 割り算をする。\n●C ============== リセットする。\n●終わる ========= 終わる。\n●初期化 ========= リセットする。"
button goto "わかった" , *wakata
button goto "終わる" , *end1
stop
*wakata
cls
goto *hontai

です。いちおうこれだいじょうぶですかね？

質問したからには責任もっていただきたいものですが。
分からない場合でも、責任もって補足します。
一応5日も経ってしまっているのでサンプルを少し

	a = 10
	b = 6
	//普通に割り算する
	c = a / b
	//次に余りを求める
	d = a \ b
	
	//あまりがない(あまりが0)ならば○あまり×のように表示、違えばダイアログ
	if (a \ b = 0) {
		mes a / b
	} else {
		dialog ""+a/b+"あまり"+a\b+""
	}

少し補充したほうがいいですかね?

screen 0,800,800
 *hontai
 mes "ただしもしも何もしないで÷をおすと、Error,0で除算しましたとかかれます。ごめんなさい。"
title "電卓"
font "メイリオ",30,1
 pos 50,10
 mes "数字を入力し、記号を選んでください"
pos 200,100
 input suuzi,50,20,5
 pos 200,130
 input suuzini,50,20,5
 pos 150,250
 objsize 30,30
 button "+",*＋
pos 190,250
 button "-",*ー
pos 230,250
 button "×",*×
 pos 270,250
 button "÷",*÷
 pos 500,500
 objsize 150,25
 button goto "終わる" , *end1
 button goto "初期化" , *kosin
 button goto "使い方" , *tukaikata
 stop
 *初め
color 255,255,255:boxf 0,100,600,600
 stop
 *＋ 
color 0,0,0
 pos 200,300
 mes suuzi+suuzini
 pos 200,400
 button "Ｃ",*初め
stop
 *ー
color 0,0,0
 pos 200,300
 mes suuzi-suuzini
 pos 200,400
 button "Ｃ",*初め
stop
 *×
 color 0,0,0
 pos 200,300
 mes suuzi*suuzini
 pos 200,400
 button "Ｃ",*初め
stop
 *÷
 color 0,0,0
 pos 200,300
 mes suuzi/suuzini
 pos 200,400
 button "Ｃ",*初め
stop
 /*詳細とか書かないでごめんなさい。*/
 *end1
 dialog "ありがとうございました。またつかってください。メッセージボックスが消えて１秒で終わります。 " , 0 , "つかってくれてうれしいよ"
await 2450
 /*これ消してもいいよ上のやつ*/
end
 stop
 *kosin
 cls
 goto *hontai
 stop
 *tukaikata
 cls
 mes "まず上にある inputbox があるのでそこに計算したい数字を入力します。\nそうして、計算したい記号をおすと、答えを見ることができます。"
mes "操作方法\n●input ========== 数字を入力。\n●+ ============== 足し算をする。"
mes "●- ============== 引き算をする。\n●× ============= 掛け算をする。\n●÷ ============= 割り算をする。\n●C ============== リセットする。\n●終わる ========= 終わる。\n●初期化 ========= リセットする。"
button goto "わかった" , *wakata
 button goto "終わる" , *end1
 stop
 *wakata
 cls
 goto *hontai

追加要素:青くなってる？

>>5
は？

自動的じゃん。

>Mitukiさん
ボタンや入力ボックスなどのオブジェクトは1024個までしか設置できません。
ですがこのプログラムは、「＋」ボタンを押すたびに「C」ボタンを作成しています。
なので恐らく「+」ボタンを1000回ちょっとクリックしたところで、
「オブジェクト数が多すぎます」とエラーが出るかと。