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


HSPTV!掲示板


未解決 解決 停止 削除要請

2008
0223
hirosenzmチャットのなやみ5解決


hirosenzm

リンク

2008/2/23(Sat) 18:54:58|NO.13720

こんにちは。
質問が2つあります。
1)チャットの送信する部分をどうしたらいいかわかりません。
2台のコンピュータでやりましたが、できません。(XPとVistaだから?)
以下テストです。

#include "hspsock.as" #pack "hspsock.as" #packopt name "hirosechat" screen 0,500,500 title "HIROSECHAT - by JHS" ipget username="" sdim username,10 *name cls mes "名前(半角で10文字まで):":input username button "参加",*start stop *start cls mes username chat="" mes "半角で40文字までで文を入力して下さい。" input chat,300,,40 button "発言",*write button "リセット",*reset button "退出",*name note="" sdim note,20000 exist "chat.txt" if strsize != -1{ notesel note noteload "chat.txt" noteadd note,0,1 } mesbox note,300,300,0,20000 repeat sockget hatugen,64,0//発言を受信 if stat == 0{ notesel note noteadd hatugen,0,0 notesave "chat.txt" } await 1 loop stop *write hatugen=""+username+">"+chat+">"+gettime(0)+gettime(1)+gettime(2)+"" sockput ""+hatugen+"",0//上の行の内容を送信 notesel note noteadd hatugen,0,0 notesel note notesave "chat.txt" objprm 4,note stop *reset chat="" objprm 3,chat stop
2)↑のスクリプトをHSPLetで動作させたんですが、エラーが出てしまいます。

だれか解決策教えて下さい。
長くなりすみません。



この記事に返信する


f

リンク

2008/2/23(Sat) 20:09:52|NO.13725

そりゃ、hspletが対応してない命令使えばエラーにもなるんでね?
内容を詳細に見てないし実行もさせてないので他にも原因あるかもしれないが。



a

リンク

2008/2/23(Sat) 20:20:58|NO.13726

どことも接続してない状態で送信受信しようとしてるからじゃないですかね



hirosenzm

リンク

2008/2/26(Tue) 20:16:59|NO.13764

失礼いたしました。
sockopenがあるじゃないですか。
本当、失礼しました・・・。



hirosenzm

リンク

2008/2/26(Tue) 20:17:32|NO.13765

解決チェック忘れました



hirosenzm

リンク

2008/2/26(Tue) 20:18:00|NO.13766

チェック忘れました



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