プチコン総合スレッド - 1314589236

1：プチコンまとめWiki管理人★：2011/08/29(月) 12:40:36: プチコンに関する、質問や雑談はこちらで行えます。
マナーを守って楽しく書き込みましょう。
知識のある方は、よろしければ質問への回答のご協力をお願いします。

★これは2ちゃんねるによく似た見た目の掲示板ですが、
ここは2ちゃんねるではなく、プチコンまとめWikiの一部です。お気軽に書き込んでください。
また、不適切な書き込み・他人が不快になる書き込みは削除する場合があります。
261：上弦の月：2012/03/14(水) 20:01:04 ID:rRRDXMyg: 外からはホスト規制されてて2ちゃんに書き込めないからこのスレはありがたいです。
早く帰ってやるぞ！
262：名無しさん：2012/03/14(水) 22:34:29 ID:aQCw/bqo: あっ、そういうことだったんですか。
管理人さん、ありがとうございます。
263：orirakkusu ◆XksB4AwhxU：2012/03/15(木) 10:19:33 ID:No8DEOb6: どうやら例の文字化け文字列は私のところでも同じでした。
どうやら一回フリーズせずに行くとそこを抜けない限り行き来できるようです。
検証は
COLリソース:ファイル数1つ
です。
8こだとバグらないようです。
以上、報告でした。
264：なゆすけ：2012/03/16(金) 07:31:27 ID:6zqnmhg.: マーク2ゲット‼
265：orirakkusu ◆XksB4AwhxU：2012/03/16(金) 11:46:08 ID:No8DEOb6: >>264
よかったねっ♪♪
266：orirakkusu ◆XksB4AwhxU：2012/03/16(金) 13:30:08 ID:No8DEOb6: あの、mkllのMMLで、b(フラット)を出すにはどうしたらいいんでしょうか？
267：名無しさん：2012/03/16(金) 14:23:30 ID:eotW/ifA: >>266
-
268：orirakkusu ◆XksB4AwhxU：2012/03/16(金) 16:13:53 ID:No8DEOb6: >>267
ありがとうございます！！
269：ロジウム：2012/03/16(金) 16:33:38 ID:2WhdzhyY: MKⅡをてにいれ。
サンプルファイルのCHREDのBFのところでフォント？を変えたんですが、
それをどうやって使うのかが分からないんですが誰かわかる人いませんか？
270：orirakkusu ◆XksB4AwhxU：2012/03/16(金) 17:46:34 ID:No8DEOb6: そのまま変えた文字を打てば変わってます。ファイルとして保存したい場合、実行モードでSAVE "BGF0:ファイルメイ"とすれば保存できます。
271：ロジウム：2012/03/16(金) 18:18:39 ID:2WhdzhyY: >>269
それが、なぜだか分からないのですがLOADしても文字が変わらないんです。
プチコンには、ひらがなが無いのでどうにかしたいのですが…
272：orirakkusu ◆XksB4AwhxU：2012/03/16(金) 18:21:19 ID:No8DEOb6: BGPAGE 0:LOAD"BGF0:ファイルメイ"でどうでしょうか。
273：ロジウム：2012/03/16(金) 18:42:38 ID:2WhdzhyY: >>272
できました。
ありがとうございました。
274：kebin：2012/03/17(土) 02:15:44 ID:ghWMAHcY: 初めまして

さっそく質問で悪いんですが…

ニコチャンマークを、ただ十字キーで動かすプログラムを作ってるんですが

LOCATEのでの座標が31,22辺りになると、表示がおかしくなってしまいます。
公式サイトを見て、LOCATEの範囲以上の数値にはならないようにしてあるのですが

こんな初歩的な質問ですみません…
275：名無しさん：2012/03/17(土) 03:13:09 ID:Mcqso4yU: >>274
PRINT文の一番後ろに[;]付けましたか？
PRINT"ｺﾝﾆﾁﾊ";
276：kebin：2012/03/17(土) 10:15:45 ID:ghWMAHcY: おお、解決しました！ありがとうございます。

些細なプログラムでもうまくいくとテンションあがりますね
277：byg：2012/03/17(土) 10:59:45 ID:kruVztKg: 質問です。QRコードで入手したプログラムを一部改変して、
別ファイル名でセーブしようとしても受け付けてくれません。
なにか方法があるのでしょうか？
278：プチコンまとめWiki管理人★：2012/03/17(土) 12:19:24 ID:???: >>277
ファイル名に使えない文字が入っていると思います。
0～9、A～Z だけ使えます。最大8文字です。
279：byg：2012/03/17(土) 13:07:57 ID:kruVztKg: >>278
ご回答ありがとうございます。
最大8文字という制限を知りませんでした。
短くして無事save出来ました。
280：小５のすいせいキッズ：2012/03/17(土) 15:51:13 ID:UwZHchgw: ３D　CAR RACEにある１７９DIMのところBK(でその続きはいったい？
281：小５のすいせいキッズ：2012/03/17(土) 15:54:12 ID:UwZHchgw: それについかで１８１行にもZ$；
282：名無しさん：2012/03/17(土) 16:44:33 ID:Mcqso4yU: >>278
管理人さん、_もです。
283：小5のすいせいキッズ：2012/03/17(土) 17:17:44 ID:UwZHchgw: ただパソコンが悪かっただけです。3DSでできた。
284：小5のすいせいキッズ：2012/03/17(土) 17:23:43 ID:UwZHchgw: 今度は、199行のREAD NO( I )でエラー、文字はバッチリなんですが。
285：プチコンまとめWiki管理人★：2012/03/17(土) 19:29:39 ID:???: >>280
パソコンで見た場合、ブラウザの横幅が狭いと、プログラムが枠外にはみ出してしまいます。
どちらかの操作で、右にスクロールすると続きが見られます。
・プログラムの枠内で、マウスのホイールを押し込んでマウスを右に動かす
・プログラムの枠の一番下にスクロールバーがあるので、動かす

>>282
おっと忘れてました。補足ありがとうございます。

>>284
そこでエラーが出たと言うことは、258行目以降を見直してみてください。
DATA の数がどこか足りないと思います。
286：小5のすいせいキッズ：2012/03/17(土) 21:33:45 ID:UwZHchgw: それでも直らないので、mk2からプチコンにいきエラーを調べました。Tupe mismatch (199,READ)変数の型が一致しないようです。
287：プチコンまとめWiki管理人★：2012/03/17(土) 22:16:10 ID:???: >>286
184. READ F$:CH$(I)=""
を
184. READ F$:CH$(I)="":PRINT F$
に書き換えて実行してみてください。実行してエラー寸前までに表示される
最初の行が 55AA55AA(以下略)
最後の行が 003C424(以下略)
で合計22行分ない場合、どこか間違っています。
288：小5のすいせいキッズ：2012/03/17(土) 22:30:14 ID:UwZHchgw: 実行結果は、55AA55AAから
　　　　　　FDFDFD030107FFFE
そして、エラーです。
289：プチコンまとめWiki管理人★：2012/03/17(土) 22:35:29 ID:???: >>288
183. FOR I=1 TO 22
が間違っていないなら、
258. DATA 55AA55AA55AA55AA
279. DATA 003C424242423C00
の間のDATA文の行が間違って多くなっていると思います。
行番号をよ～く見ながら、見直してみてください。
290：小5のすいせいキッズ：2012/03/17(土) 22:50:27 ID:UwZHchgw: すごい、確かに183行が間違ってました。数が7でした。、と　　なんと今度は203のREADでコンピューターが
訳わからんといってます。すいません。またお願いしてもいいですか。11時まで出来ますので。
291：小5のすいせいキッズ：2012/03/17(土) 22:55:20 ID:UwZHchgw: 朝7時ぐらいに起きそうです。
明日もよろしくお願いします。
292：小5のすいせいキッズ：2012/03/17(土) 23:02:54 ID:UwZHchgw: お休みなさい。もう寝ます小5はこんなに起きたらいけないので。すみません今日１日楽しくできました。
ありがとう。
293：上弦の月：2012/03/17(土) 23:09:04 ID:bnsybnsM: 連コメは控えたほうがよいかと…
294：名無しさん：2012/03/18(日) 01:50:49 ID:jCdR7GpA: ２ちゃんでも書いたんですが、MK2をDSi（多機種では起きるか
未確認）で、
BGMPLAY "O8<CDEFGABC"
とか、
BGMPLAY "O8<CDEFGBC"
とか、
BGMPLAY "<<<<<<<<<<<<CDEABC"
とか、オクターブを８以上（９？）にした上で、AやBの音を
鳴らすと、AやBの場所以降が（CDEFGなど、AB以外でも）全て
同じ、音程の違いが無い”効果音”になってしまいます。
(Aが先にきたときと、Bが先にきたときでは、別の効果音になるが、
それ以降が効果音になってしまうのは同じ）

BGMPLAY "O9"
はエラーになるので、本来はオクターブは８までのはずですが、
BGMPLAY "O8CDE"
と、
BGMPLAY "O8<CDE"
が、音が違うので、実は９まであるようですが、オクターブが
９の状態で鳴らすことを想定してないのか、正常に処理されず、
バグってしまうようです・・・。
295：小5のすいせいキッズ：2012/03/18(日) 06:18:52 ID:UwZHchgw: 今、起きました、試しに3DSでやると…………本当にオクターブ9もあるようですね。それとピアノ習っているのは、なんか、プログラムとは、意味あるのでしょうか。
296：名無しさん：2012/03/18(日) 07:02:10 ID:EQwXQt92: >>290
全部教えてもらおうとしないで、自分で原因を見つける努力もしましょう。
既に入力してうまく動いている人もいるので、あなたの入力したプログラムにどこかしら間違いかあるはずです。

今まで教えてもらったことを応用すれば、FOR文やDATAに問題がある可能性があるとわかるはずです。
エラーが出るところまでのFOR文(195,198,201,202行)に間違いがないか、
280～283行のDATA文に間違いがないか、確認してみてください。
297：小5のすいせいキッズ：2012/03/18(日) 09:59:39 ID:UwZHchgw: やったぁ、実行できた。パソコンで見られなかったところが入力してなかったからです。いろいろありがとうございました。
それとマイカートの右にうごくとき左に行くよりも右につっこんでしまいますどうしたらいいのでしょう。
298：プチコンまとめWiki管理人★：2012/03/18(日) 11:24:48 ID:???: >>296
確かにおっしゃるとおりなんですが、コメントも解説もあまりないんで
初心者には難しいと思います。管理人も小5ぐらいの時にファミリーベーシックを
買ってもらったのが最初なんですが、まともに使いこなすまで
ベーマガ読み続けて2年はかかりました。

>>297
おお、おめでとうございます。
16, 17行目がマイカーの移動処理なんで、その周辺を見直してみては?
299：小5のすいせいキッズ：2012/03/18(日) 13:56:04 ID:UwZHchgw: よし、問題なく動いてます。
実は、ぼくも9月にファミリーベーシックをやったのが最初です、ベーマガはお父さんが捨てちゃったけどいつか見てみたいなと思います。
300：名無しさん：2012/03/18(日) 18:48:23 ID:iuc.2Hn.: mkIIのオクターブ9バグの件ですが、
O8<@D127A
のように@Dをつかったり
O8<A4
のように長さを指定すると音が変わります。
301：わぁぃ@ ◆vCvQmsUz9g：2012/03/18(日) 18:50:05 ID:iuc.2Hn.: >>300
名前打ったのになぁ。
DSiブラウザーは変な動きが多いからなぁ。
302：名無しさん：2012/03/19(月) 03:17:21 ID:YgNtICkc: >>300
既知のバグにオクターブの件があるので、とりあえずの対処法として、
だれかそれ追加記述しといてｗ
303：orirakkusu ◆XksB4AwhxU：2012/03/19(月) 08:33:55 ID:No8DEOb6: EXECバグは直ったっぽいね。
304：プチコンまとめWiki管理人★：2012/03/20(火) 00:21:09 ID:???: >>299
無事エラー解決できたようでよかったです。
ファミリーベーシックが家にあるとはスゴいですねｗこれもお父さんのやつでしょうか。
親子で一緒にプチコンでするのも楽しそうです。
305：プチコンまとめWiki管理人★：2012/03/20(火) 00:22:02 ID:???: >>300
ピアノだとズキューンって鳴りますねｗ
そもそもオクターブ9自体がバグなので何が起こっても不思議ではないです。
306：名無しさん：2012/03/20(火) 11:35:13 ID:YKtDHlng: なんかランダム関数が不機嫌起こすことがあるんだけど
何とかなる代替乱数生成方法ってないのかなー
307：taiga：2012/03/20(火) 14:54:47 ID:Kz.PC9v2: NOT PASTってなんですか？
308：名無しさん：2012/03/20(火) 14:55:28 ID:TgouNn8w: >>306
不機嫌って?
309：名無しさん：2012/03/21(水) 00:32:01 ID:YKtDHlng: >>308
http://twitter.com/#!/_murasame/media/slideshow?url=http%3A%2F%2Ftwitpic.com%2F8w0z77
をプレイしてるとごくまれに青い敵しか出ないとか敵の出現がおかしくなることがあるのね。
310：名無しさん：2012/03/21(水) 00:41:37 ID:YKtDHlng: ついでに今しがた実験したところ25行目当たりの
@gamemain
って書かれた行の後に
GHI=RND(16)
GHI=RND(7)
って２行追加で確定するほど具合が悪くなる。
311：きゃん：2012/03/21(水) 02:34:17 ID:LY8U0Ct6: 通りすがりの者ですが、プチコンmkIIの
＞BGMSTOP でエンベロープの音のリリースタイムの余韻を止められない
これの解決方法がありましたので書いておきます
BGMSTOP 0,1:BGMSTOP 0,0
これで余韻も残らず停止できます。プチって出るのが欠点ですがｗ
312：プチコンまとめWiki管理人★：2012/03/21(水) 20:10:43 ID:???: >>306
質の高い乱数と言えばMT法が最初に思い浮かびますが…
プチコンで実装できるかは謎です。

>>311
それだけだと、16音フルに使わないので、
何回も実行して音が重なってヤバいことになっている場合は対処しきれないです。
BGMPLAY 0,0:BGMPLAY 1,0:BGMPLAY 2,0
BGMSTOP 0:BGMSTOP 1:BGMSTOP 2
ここまでやればたぶん大丈夫なのですが…説明書開閉のほうが早そうですｗ
313：ロジウム：2012/03/23(金) 12:28:35 ID:YXUTFdNc: 質問なんですが。
スプライトでタイトルに題名を漢字で表示したいんですが、
スプライトの座標をSPHOMEで変えてみようかと思ったのですが変えられない
のですが誰か詳しく説明してくれる人いませんか。
それと、題名の漢字が16×16を超えているのですが大丈夫ですかね。
314：名無しさん：2012/03/23(金) 18:40:22 ID:Mcqso4yU: >>313
座標の変更はSPOFSだよ。
315：桜：2012/03/24(土) 00:07:43 ID:MXV3k6w2: テキストを円状に配置する方法をを教えてくださいませんか？
316：名無しさん：2012/03/24(土) 01:58:22 ID:mU62j5Nw: >>315
ちょっとやってみたけどＳＰＡＮＧＬＥだと文字が潰れちゃってうまくいかないな・・・

ＣＬＥＡＲ：ＡＣＬＳ

ＦＯＲ　Ｉ＝０　ＴＯ　２５５
ＣＨＲＲＥＡＤ（”ＢＧＦ”,Ｉ）,Ｃ＄
Ａ＝ＦＬＯＯＲ（I/64）
Ｂ＝（Ｉ％６４）＊４
ＣＨＲＳＥＴ　”ＳＰＵ”＋ＳＴＲ＄（Ａ）,Ｂ,C$

Ａ＄＝”アイウエオカキクケコサシスセソタチツテトナニヌネノ”
ＯＸ＝１２８：ＯＹ＝９６
Ｒ＝９０
Ｖ＝０
ＭＶ＝１５

ＦＯＲ　Ｉ＝０　ＴＯ　ＬＥＮ（Ａ＄）－１
Ｘ＝ＯＸ＋ＣＯＳ（ＲＡＤ（Ｖ））＊Ｒ
Ｙ＝ＯＹ＋ＳＩＮ（ＲＡＤ（Ｖ））＊Ｒ

Ｂ＄＝ＭＩＤ＄（Ａ＄,Ｉ,１）
ＳＰＳＥＴ　Ｉ,ＡＳＣ（Ｂ＄）,0,0,0,0,8,8
ＳＰＨＯＭＥ　Ｉ,4,4
ＳＰＡＮＧＬＥ　Ｉ,Ｖ＋９０
ＳＰＯＦＳ　Ｉ,X,Y
V=V+MV
IF V<0 THEN V=360-(ABS(V))
ＮＥＸＴ
317：小5のすいせいキッズ：2012/03/24(土) 14:48:35 ID:UwZHchgw: すいません、話が合わないですが、
この前はありがとうございました、
パスワードを作ろうと思うのですがINPUTでとった数字を2進数にするにはどうすればいいのですか。
318：名無しさん：2012/03/24(土) 15:21:13 ID:eotW/ifA: >>317
INPUT A
B$=""
FOR I=0 TO 15
B$=STR$(A AND 1)+B$
A=A/2
NEXT
PRINT B$

とりあえず65535まで、動作確認はざっとしかしてないけど
こんなもんでいいかな？
319：桜：2012/03/24(土) 18:31:43 ID:MXV3k6w2: >>316
返信ありがとうございます。
　本当に返信していただけるなんて思っていませんでした。本当にありがとうございます。
　話が変わってしまうのですが、「残酷な天使のテーゼ」と言う曲をプチコンに移植したいのですが、なかなかうまくいかないのですよ。もしこういうことがお上手な方を知っているのでしたら教えていただけないでしょうか？
320：小5のすいせいキッズ：2012/03/24(土) 18:34:50 ID:UwZHchgw: 今、耳コピするので待っててください。
321：わぁぃ@：2012/03/24(土) 18:39:05 ID:FAg0sakA: >>320
耳コピといえば、passengerをプチコンに入れてみた。

ところで、APPENDって何て読むんだろう？
322：小5のすいせいキッズ：2012/03/24(土) 18:40:18 ID:UwZHchgw: 連コメしてごめんなさい。
あの、ア=0　イ=1 ウ=2　のようにパスワードをつくることは出来ますか？。いわゆる文字コードのような………。
323：名無しさん：2012/03/24(土) 18:49:17 ID:TgouNn8w: >>322
あいうえおが
01234になるって事?
324：わぁぃ@ ◆vCvQmsUz9g：2012/03/24(土) 19:04:45 ID:WotHq6ks: ”ASCIIｺ-ﾄﾞ-177”
で、”あ”が0になるけど、”を”がマイナスになるはず。
325：小5のすいせいキッズ：2012/03/24(土) 19:10:04 ID:UwZHchgw: 今ちょっと出来ました。
まだ試してませんが
O5C4E#4F3E#3F2F2F2B#2A#2GF2G3
326：名無しさん：2012/03/24(土) 19:57:37 ID:Oy28T61Y: >>321
「アペンド」だと思います。
327：桜：2012/03/24(土) 20:07:34 ID:MXV3k6w2: >>325
ありがとうございます。
　こんな短時間でここまで作成できるなんてすごいですね。感心してしまいました。
328：わぁぃ@ ◆vCvQmsUz9g：2012/03/24(土) 20:19:08 ID:VQB/wWWg: >>326
ありがとうございます。
いままで「エーペンド」と読んました。
329：わぁぃ@ ◆vCvQmsUz9g：2012/03/24(土) 20:20:29 ID:VQB/wWWg: >>327
「読んました」→「読んでました」
330：小5のすいせいキッズ：2012/03/24(土) 21:10:46 ID:UwZHchgw: 今、直しました
BGMPLAY ”T90O5C4D#4F8.D#16&D#8F8F8F8A#8G#8G16&G4G4A#4<C8.>F16&F8D#8A#8A#8G8A#8A#8.<C16&C4&C”
ざんこくーなてんしのようにーしょうねんよしんわになれー
331：小5のすいせいキッズ：2012/03/24(土) 22:13:05 ID:UwZHchgw: ”R4O4D#8>A#16&A#4<R8D#8D#8F4>A#8A#4R8A#8<G8.G#8.G8.F8.G8.G#8.G8.C4R8C16D16F8.F16&F8D#8D#4R8F16G16”
けっこう大変だな。
332：桜：2012/03/24(土) 23:17:36 ID:MXV3k6w2: 小5のすいせいキッズさん、ありがとうございます。
　話が変わってしまうのですが、1つ質問があるのですが>>330の････#8G#8G16&････のところに違和感があるのでが、どういう音階を入れたらいいのでしょうか。お願いをきいてもらっている立場なのにでしゃばってすみませんがお願いします。
333：桜：2012/03/24(土) 23:55:24 ID:MXV3k6w2: >>331と>>332が順番どうりに再生されないのですがどうしたらいいでしょうか？一番最後の部分しか再生されません。「GOTO」を試しましたが、だめでした。
334：小5のすいせいキッズ：2012/03/25(日) 06:20:29 ID:UwZHchgw: ぼくは、こうしました。
01.BGMPLAY ……………………
02.@01
03.A=BGMCH (0)
04.`IF A=TRUI THEN @01 ELES 05.@1
@1
BGMPLAY
それと命令があやふやですいません。
335：小5のすいせいキッズ：2012/03/25(日) 06:40:53 ID:UwZHchgw: さっきの質問はこう直してください。
B-8A-8G16F8G16&
真ん中のものが抜けてました。(F8)と&も間違ってました。
336：わぁぃ@ ◆vCvQmsUz9g：2012/03/25(日) 10:19:46 ID:fLYyBtiQ: そういえば、セーブ機能つきのプチコンゲームってないかな？
337：orirakkusu ◆XksB4AwhxU：2012/03/25(日) 11:20:03 ID:No8DEOb6: 今作ってるシムシティのようなものには搭載予定。
338：名無しさん：2012/03/25(日) 12:47:06 ID:rukfd5HU: Ａ＄＝"演奏文字列1"
Ｂ＄＝"演奏文字列2"
ＢＧＭＰＬＡＹ　Ａ＄,Ｂ＄
で繋がりますよ
339：桜：2012/03/25(日) 14:42:29 ID:MXV3k6w2: 小5のすいせいキッズさん、わざわざありがとうございます。
340：桜：2012/03/25(日) 20:09:09 ID:MXV3k6w2: >>332の後半に違和感があるのですが。
341：小5のすいせいキッズ：2012/03/25(日) 21:38:48 ID:UwZHchgw: こんばんは、7時から電車で下呂にいってたので今みました。
それと、直したいのはやまやまですが、ちょっとぼくには無理かとすいません続きを今から作ります
342：小5のすいせいキッズ：2012/03/26(月) 08:23:23 ID:UwZHchgw: それと、I$の部分だけ和音にするにはどうすればいいですか。
BGMPLAY A$,B$,C$,B$,C$,D$,E$,G$,I$←ここだけ和音
343：桜：2012/03/26(月) 20:30:24 ID:MXV3k6w2: 無理な要望をしてしまい、申し訳ありません。それと、>>342のご質問ですが、本当に申し訳ないのですが、私は存じ上げません。本当に申し訳ありません。
344：お茶犬：2012/03/26(月) 20:45:14 ID:TgouNn8w: >>319
T80DFG8.F16&F8G8
G8G8<C8>B-8A16G8A8&A8R8
A<CD8.>G16&G8F8
<C8C8>A8<C8C8.D16&D4&D2>R2
T128DFF8&F#8G8.F16&F8G8
G8G8<C8>B-8A16G8A16R4
F<CD4.>G16&G8F8
<C8C8>A8<C8C8.D16>R4
RF8C8C16C16&C4R8F8
F8.G16&G8C8CR8C8
A8.B-16&B-8A8G8F16&F8G8
345：お茶犬：2012/03/26(月) 20:47:41 ID:TgouNn8w: >>344
ちなみにmk2はもってないので動作確認は自作MMLのみです。
346：ぷぎru：2012/03/27(火) 15:25:20 ID:JWeLyinM: 皆でアイデアを出し合ってゲーム作ろうかｗ
ジャンル…2Dジャンプアクション好きな人お願い
アイデア：命令
かわいい＋きもいのキャラ：LOAD”ファイル名”

こんな感じでｗ
347：お茶犬：2012/03/27(火) 20:06:06 ID:TgouNn8w: >>346
つまりキモかわいいって事?w
348：小5のすいせいキッズ：2012/03/27(火) 22:12:14 ID:UwZHchgw: なんかこれけっこういいねそのメンバーに混ぜてください。ちょっとしたゲームなら作れるので。
349：お茶犬：2012/03/27(火) 22:43:18 ID:TgouNn8w: >>348
どうでもいいけど句読点か改行入れたほうが…
350：桜：2012/03/28(水) 00:54:44 ID:MXV3k6w2: １．CLS
２．@STAT
３．?" /|"
４．?" / |"
５．?" C→/ |"←A
６．?"　　ーー"
７．?" ↑B"
８．?"*　求めたい辺を0としてね"
９．INPUT"辺Aは";A
１０．INPUT"辺Bは";B
１１．INPUT"辺Cは";C
１２．
１３．IF　C==0　GOTO@CX
１４．IF　B==0　GOTO@BX
１５．IF　A==0　GOTO@AX
１６．GOTO@STAT
１７．@CX
１８．C=A*A+B*B:PT=SQR(C)
１９．?"辺Cの値は、ルート;C"
２０．?"辺Cの値は、;TP"
２１．GOTO@STAT
２２．
23.@BX
24.B=C*CーB*B:TP1=SQR(B)
２５．?"辺Bの値は、ルート";B
２６．?"辺Bの値は";B
２７．
２８．@AX
２９．A=C*CーB*B:PT2=SQR(A)
３０．？"辺Aの値は、ルート;A"
３１．?"辺Aの値は、PT2"
３２．GOTO@STAT
　上のプログラムは、私と私のお友だちと作ったものです。
　三平方の計算をするためのものです。どなたでもいいですので、このプログラムの改造や補正していただけないでしょうか。
351：名無しさん：2012/03/29(木) 02:32:24 ID:OaZp3NN2: いろいろと計算を加えるといいかもね。
角度とか。
352：ロジウム：2012/03/29(木) 14:33:45 ID:YXUTFdNc: よくあるRPGみたいに文が一行できたら次の行に行き
最後の行にいくと最初の行が消えて…
(説明分かりにくいかな)
なんて言う、要はただの文字表示をやりたいのでが、
どうすればいいでしょうか?
あっ、一文字づつ表示をできるならそれ以上のことは
無いのですが。
353：ジオライド：2012/03/29(木) 15:28:43 ID:Mcqso4yU: >>352
こんなのはどうでしょうか？
LBL$="TXTDT0"
GOSUB@PRTTEXT
END

@PRTTEXT
RESTORE "@"+LBL$
FOR Z=0 TO 2
READ TXT$
FOR I=0 TO LEN(TXT$)-1
WAIT 2
PRINT MID$(TXT$,I,1);
NEXT I:PRINT:WAIT 2
NEXT Z
RETURN

@TXTDT0
DATA"ﾃｽﾄﾀﾞﾖ-ﾝ"
DATA"ｱ-ｱ-ﾃｽﾄﾃｽﾄ"
DATA"ﾃｽﾀﾏﾝ!?"

@TXTDE1
DATA"ｱ-ｱ-ﾏｲｸﾃｽﾄﾁｭｳ•••"
DATA"ｼﾊﾞﾗｸｵﾏﾁｸﾀﾞｻｲ"
DATA"\(^o^)/"
354：名無しさん：2012/03/29(木) 16:40:22 ID:/7N4V9N.: 今手元に、『PCー8801シリーズ　なんでも屋Ｐクン　プログラムリスト』があり、BASICプログラムとマシン語プログラムで構成されているらしいのですが、プチコンで遊べますか?
355：わぁぃ@ ◆vCvQmsUz9g：2012/03/29(木) 16:51:30 ID:KdJl7STk: >>354
マシン語は無理だぬ。
356：名無しさん：2012/03/29(木) 17:09:28 ID:/7N4V9N.: >>355
そうですか…ありがとうございました(m´・ω・｀)m
357：ロジウム：2012/03/29(木) 17:46:05 ID:YXUTFdNc: >>353
ありがとうございます。
参考になりました。
358：ロジウム：2012/03/29(木) 17:55:23 ID:YXUTFdNc: あと、
RESTORE "@"+LBL$
のところでsyntax errorになるし、ここを消しても
ちゃんと作動するのでこれは、いらないのでは?
359：ロジウム：2012/03/29(木) 21:29:40 ID:YXUTFdNc: >>358
勘違いでした。
360：ぷぎru：2012/03/29(木) 21:39:41 ID:JWeLyinM: >>347
キノコ＋ムキムキの足みたいなｗ