HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2021
1228
Sora何回かボタンをクリックすると画面が白くなる4解決


Sora

リンク

2021/12/28(Tue) 19:39:05|NO.94809

こんにちは
ただただポイントを稼ぐゲームを作っているのですが
何回かボタンをクリックすると
画面が白くなり操作できなくなります
あと、最初の乱数が毎回同じになるのも修正したいです
どなたか解決策を教えていただけないでしょうか
以下スクリプトです

title "稼ぐゲーム" screen 0,350,100 ten=0 *start cls if ten<0:ten=0 font msgothic,30 mes "現在"+ten+"Point" objsize 300,70 objmode objmode_usefont button "ポイントGETを試みる",*tensyori stop *tensyori await syori=rnd(2) tenpm=rnd(101) randomize if syori=0:goto*tasu if syori=1:goto*hiku *tasu cls await randomize font msgothic,30 if tenpm=0:goto*tasu mes ""+tenpm+"Pointゲットした!" ten=ten+tenpm wait 100 goto *start *hiku cls await randomize font msgothic,30 if tenpm<50:goto*hiku mes ""+tenpm+"Point失った..." ten=ten-tenpm wait 100 goto *start



この記事に返信する


沢渡

リンク

2021/12/28(Tue) 19:53:57|NO.94810

>何回かボタンをクリックすると
>画面が白くなり操作できなくなります
「if tenpm=0:goto*tasu」でtenpmの値が0の時に*tasuに戻っていますが、
戻ったところでtenpmの値が変わるわけでもないので、それで無限ループになってしまうのでしょう。
これはその後の「if tenpm<50:goto*hiku」も同様です。

>あと、最初の乱数が毎回同じになるのも修正したいです
最初の乱数の前にrandomizeを実行していないからです。
このソースコードの中ではrandomizeを何度も実行していますが、
最初に一回だけ実行すれば問題ありません。

以上を踏まえた上で修正してみました。

title "稼ぐゲーム" screen 0,350,100 ten=0 randomize //randomizeは最初に一回だけ実行すればいい *start cls if ten<0:ten=0 font msgothic,30 mes "現在"+ten+"Point" objsize 300,70 objmode objmode_usefont button "ポイントGETを試みる",*tensyori stop *tensyori await syori=rnd(2) //tenpm=rnd(101) //ここではまだtenpmは取得しない //randomize if syori=0:goto*tasu if syori=1:goto*hiku *tasu cls await //randomize font msgothic,30 //if tenpm=0:goto*tasu tenpm=rnd(100)+1 //1〜100のランダムな数値がtenpmに入る mes ""+tenpm+"Pointゲットした!" ten=ten+tenpm wait 100 goto *start *hiku cls await //randomize font msgothic,30 //if tenpm<50:goto*hiku tenpm=rnd(51)+50 //50〜100のランダムな数値がtenpmに入る mes ""+tenpm+"Point失った..." ten=ten-tenpm wait 100 goto *start



Sora

リンク

2021/12/28(Tue) 23:05:51|NO.94815

丁寧な解説ありがとうございます(*^▽^*)
参考にさせていただきます!!



Sora

リンク

2022/2/12(Sat) 15:23:13|NO.95392

ようやく完成したので、公開したいと思います(^^♪
目的は「ポイントを大量に稼ぐ」です。
「ノルマ達成したらクリア」と、「永遠に続く」の2つのモードがあります(*'▽')

↓ここからダウンロードできます↓
https://ux.getuploader.com/Virtual_OS/download/2

バグ等ありましたら教えて頂けると幸いです<m(__)m>



Sora

リンク

2022/6/3(Fri) 21:12:25|NO.96552

新しいバージョンを作りました!v(^_^)v

・改良した所
ノルマ設定を追加(10000Pt固定だと結構長くなるため)
Soraが昔作った似てるようで全く違うものを追加

↓ここからダウンロードできます(*'ω'*)↓
https://ux.getuploader.com/Virtual_OS/download/3



記事削除

記事NO.パスワード
(質問が解決したスレッドは他の利用者に活用してもらうため、削除しないようお願いします)

NO.94809への返信

マスコット

好きなマスコットを選んでください。

名前

e-mail
HOME
  1. 初めて利用する方は、HSP3掲示板の使い方をお読みください。
  2. 不要部分の多い長いスクリプトの投稿は ご遠慮ください。
  3. 書き込みは自動改行されません。適度に改行を入れてください。
  4. スクリプトは小文字の<pre>〜</pre>で囲むと見やすく表示できます。

削除用パスワード

解決したら質問者本人がここをチェックしてください。

エラー発生時、再送信すると二重送信になることがあります。
回答が得られたら、お礼書き込み時に[解決]チェックしてください。
SPAM防止のためURLから始まる文章は投稿できません。
SPAM防止のため英文字のみの本文を投稿することはできません。

ONION software Copyright 1997-2021(c) All rights reserved.