[過去ﾛｸﾞ] HSP - Hot Soup Processor (1001ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
1(5): 名無しさん＠お腹いっぱい。 [hsp] 01/11/10 04:04 ID:??? AAS
ＨＳＰは、お手軽に使うことのできるスクリプト言語システムです。
テキストによるスクリプトを書くだけで、誰にでも簡単にウインドゥズ上で
画像表示、メニューシステムの構築ができます。
多彩な命令セットを使いこなすことでゲームアプリケーションまで作成する
ことができます。
Hot Soup Processor 公式サイト
外部ﾘﾝｸ:www.onionsoft.net
3(1): 名無しさん＠お腹いっぱい。 01/11/10 04:11 ID:??? AAS
>>1
ごくろうさまです。
273: 02/02/27 21:24 ID:??? AAS
>272
ﾊｧ? >>1から飛べるじゃん。
566(1): 02/05/17 00:47 ID:??? AAS
*aaa
;a=0
repeat -1
sockwait 0
title "CHK="+stat+"/"+a
; ;if stat>1 : dialog "Socket error1": goto *bye
; ;mes "aaa"+stat
; if stat>=0 : gosub *send
sockcheck 1
if stat>1 : dialog "Socket error": goto *bye:
if stat==0 : gosub *get
;mes coment
a++
wait 10
loop
stop
*send
;sockwait 0
t1=0:t2=0:t3=0
gettime t1,4
gettime t2,5
gettime t3,6
mm=name+"("+t1+":"+t2+":"+t3+"):"
mm=mm+coment
if(coment!=""){
sockput mm,1
if stat : dialog "Socket error!!!": goto *bye
;mes "["+mm+coment+"] を送信しました。"
}
goto *aaa
574(1): 416(HSP) ◆HoSW/FCI 02/05/17 10:04 ID:??? AAS
#include "hspsock.as"
title "TCPサーバーテスト"
*init
sdim log,32000 : sdim say,256 : sdim s,256 : mesbox log,640,400,0
port=999 : pos 0 :mes "ポート"+port+"で接続待機中..."
sockmake 0,port : if stat : dialog "Socket make error": goto *bye
onexit *bye ;終了時必ずソケットを閉じる。
repeat ;接続待ち
wait 1 : sockwait 0 : if stat>1 : dialog "Socket error" : goto *bye
if stat=0 : break ;ｷﾀｰ
loop
pos 0,400 : input say,580,24,128 : pos 580,400 : button "送信",*send : pos 0 : mes "接続しました。"
*main
wait 1 : sockcheck 0 : if stat>1 : dialog "Socket error!": goto *bye
if stat=0 : gosub *get ;受信データ有り
goto *main
*get
sockget s,128,0 : if s!"" : log+=s+"\n" : objprm 0,log
return
*send
if say="" : goto *main ;相手が切断するとなぜか受信
sockput say : if stat : dialog "Socket error": goto *bye
say="" : objprm 1,say : goto *main
*bye
sockclose : end
575(1): 416(HSP) ◆HoSW/FCI 02/05/17 10:07 ID:??? AAS
#include "hspsock.as"
title "TCPクライアントテスト"
*init
sdim log,32000 : sdim say,256 : sdim s,256 : mesbox log,640,400,0
adr="127.0.0.1" ;相手(サーバー)のIPを入力。ローカルなら127.0.0.1
port=999 : mes adr+"、ポート"+port+"に接続中..."
sockopen 0,adr,port : if stat : dialog "socket error" : goto *bye
onexit *bye
pos 0,400 : input say,580,24,128 : pos 580,400 : button "送信",*send : pos 0 : mes "接続しました..."
*main
wait 1 : sockcheck 0 : if stat>1 : dialog "Socket error!": goto *bye
if stat=0 : gosub *get ;受信データ有り
goto *main
*get
sockget s,128,0 : if s!"" : log+=s+"\n" : objprm 0,log
return
*send
if say="" : goto *main : else : sockput say : if stat : dialog "Socket error": goto *bye
say="" : objprm 1,say : goto *main
*bye
sockclose : end
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.026s