プチコン 非公式コミュニティ
トピック
RF-4E
◆2Fao.QP8H0Nw
2020/9/19 23:11
2020/9/19 23:11
情報交換
PRGGETについて
LOAD "PRG1:PLAYER.INI",0
PRGEDIT 1,1
NAME$=PRGGET$()
PRGEDIT 1,2
ABC$=PRGGET$()
をして、PLAYER.INIの1行目をNAME$、2行目をLV$に格納したいです。
そして、1.2行目のどちらか(又は両方)が何も無かったときにメッセージを出したいので、
IF LEN(NAME$)==0 THEN ？"データが壊れています"
IF LEN(ABC$)==0 THEN ？"データが壊れています"
としました。
しかし、1行目2行目を空白にしてやって見ても、メッセージが出かったので、DIRECTモードでLEN(NAME$)にして見ると0が返って来ました。
説明が悪くて申し訳無いですが、何か間違えているのか、プチコンのバグなのか教えて欲しいです。
PRGEDIT 1,1
NAME$=PRGGET$()
PRGEDIT 1,2
ABC$=PRGGET$()
をして、PLAYER.INIの1行目をNAME$、2行目をLV$に格納したいです。
そして、1.2行目のどちらか(又は両方)が何も無かったときにメッセージを出したいので、
IF LEN(NAME$)==0 THEN ？"データが壊れています"
IF LEN(ABC$)==0 THEN ？"データが壊れています"
としました。
しかし、1行目2行目を空白にしてやって見ても、メッセージが出かったので、DIRECTモードでLEN(NAME$)にして見ると0が返って来ました。
説明が悪くて申し訳無いですが、何か間違えているのか、プチコンのバグなのか教えて欲しいです。
コメント
Very micro soft 人事部
2020/9/19 23:15
◆BDuG8hoYvRQ2
LENじゃなくて、
If (abc$=="")||(name$=="") then ?"データが壊れています。"
としてみては?
If (abc$=="")||(name$=="") then ?"データが壊れています。"
としてみては?
Header
2020/9/19 23:16
◆BDuG8hoYvRQ2
↑名前間違えました。すみません。
RF-4E
2020/9/19 23:18
◆2Fao.QP8H0Nw
ちなみに、LEN(NAME$)が1なので
IF LEN(NAME$)==1 THEN "データが壊れています"
にすると、PLAYER.INIの1行目に何も無い時にメッセージを出すことが出来ました
IF LEN(NAME$)==1 THEN "データが壊れています"
にすると、PLAYER.INIの1行目に何も無い時にメッセージを出すことが出来ました
RF-4E
2020/9/19 23:19
◆2Fao.QP8H0Nw
なるほど。
なんかそんな気がしてきた
試してくる
なんかそんな気がしてきた
試してくる
RF-4E
2020/9/19 23:21
◆2Fao.QP8H0Nw
いや、そういえば試して見たけど無理だった。
何もない筈のNAME$が空白になってる
何もない筈のNAME$が空白になってる
Header
2020/9/19 23:28
◆BDuG8hoYvRQ2
えぇ...(困惑
もしかしてCHR$(10)が入ってるとか?
もしかしてCHR$(10)が入ってるとか?
RF-4E
2020/9/19 23:33
◆2Fao.QP8H0Nw
なんかよくわからないけど解決した
一番最初に
IF PRGSIZE(2,0)!=2 THEN ?"データが壊れてます"
にしたら直った
一番最初に
IF PRGSIZE(2,0)!=2 THEN ?"データが壊れてます"
にしたら直った
Na
2020/9/19 23:37
◆QoELVrBXBQCI
PRGGET$の文字列の後ろには必ず改行(CHR$(10))が入ります。
(ただしファイルの終わりだった場合は""になります)
なので、LENで調べるなら
IF LEN(NAME$)<=1 THEN "データが壊れています"
とすれば動作します。
それと、PRGGET$をするとPRGEDITの行数は自動的に1増えてくれるので、
LOAD "PRG1:PLAYER.INI",0
PRGEDIT 1,1
NAME$=PRGGET$()
ABC$=PRGGET$()
と連続で書いても動作します。
(ただしファイルの終わりだった場合は""になります)
なので、LENで調べるなら
IF LEN(NAME$)<=1 THEN "データが壊れています"
とすれば動作します。
それと、PRGGET$をするとPRGEDITの行数は自動的に1増えてくれるので、
LOAD "PRG1:PLAYER.INI",0
PRGEDIT 1,1
NAME$=PRGGET$()
ABC$=PRGGET$()
と連続で書いても動作します。
Header
2020/9/19 23:41
◆BDuG8hoYvRQ2
なるほど。
Naさんの説明わかりやすい ...
Naさんの説明わかりやすい ...
RF-4E
2020/9/19 23:41
◆2Fao.QP8H0Nw
なるほど、改行が入ってたんですね
PRGEDITも勝手に増えてくれるんですね
知りませんでした！
ありがとうございます！
PRGEDITも勝手に増えてくれるんですね
知りませんでした！
ありがとうございます！
さすらいの名無し
2020/9/20 10:52
◆LWMA5UzCJb3e
てっきりUSE 1のし忘れかと()
コメントを書く
- こちらは「プチコン3号」「プチコンBIG」など、プチコンシリーズに関する話題を扱ったコミュニティです
- プチコンシリーズにまったく関係ない書き込みはご遠慮下さい。削除の対象となります
- こちらにはその他のゲームや雑談のコミュニティはなく、作る予定もありません (ひとりで管理できないため)。ごめんなさい
- ユーザー登録なしで書き込みができます
- 秘密の合い言葉は成りすましの防止 (トリップ機能)、書き込みの編集時の本人認証に使用します
- 秘密の合い言葉に他人に推測されやすい言葉、他サービスと同じパスワードは入力しないでください。
- 書き込むと、投稿時に入力したお名前と秘密の暗号が記憶され、ログイン状態になります