HSPTV!掲示板

Twitterについっとするプログラムを組んでいます。
自分ではうまくできたつもりなのですが、エラーが出て動きません。
そのまま貼るには余分なものが多いので、サンプルを改造し再現したものを貼ります。

#include "hspinet.as"

	netinit
	if stat : dialog "ネット接続できません。" : end

	username = "hsp_taro"
	password = "greathsp"

	neturl "http://"+username+":"+password+"@twitter.com/statuses/"

	prm = "status=HSP%82%A9%82%E7%93%8A%8De%83e%83X%83g%81I%20%5Bhsp%5D"
	netrequest_post "update.xml", prm

	mes "DOWNLOAD 開始"

*main
	;	結果待ちのためのループ
	netexec res
	if res > 0 : goto *comp
	if res < 0 : goto *bad
	await 50
	goto *main

*bad
	;	エラー
	neterror estr
	mes "ERROR "+estr
	stop

*comp
	;	完了
	mes "DOWNLOAD 完了"

	netgetv buf
	mesbox buf,640,400,1

	stop

投稿するにはどうすればいいでしょうか。

これでOKなはずです。

#include "hspinet.as"

// HSP3用多倍長整数演算プラグイン・RSAモジュール
// (BASE64エンコードに使用)
// http://hsp.tv/make/tool1.html
#include "rsa.hsp"

	netinit
	if stat : dialog "ネット接続できません。" : end

	username = "UserName"
	password = "Password"
	
	sdim base64
	b=""+username+":"+password
	EncodeBase64 base64,b,strlen(b)
	
	neturl "http://twitter.com/statuses/"
	
	netheader "Authorization: Basic "+base64+"\n"
	prm = "status=HSP+Send+Test"
	netrequest_post "update.xml", prm

*main
	;	結果待ちのためのループ
	netexec res
	if res > 0 : goto *comp
	if res < 0 : goto *bad
	await 50
	goto *main

*bad
	;	エラー
	neterror estr
	mes "ERROR "+estr
	stop

*comp
	;	完了
	mes "DOWNLOAD 完了"

	netgetv buf
	mesbox buf,640,400,1

	stop

	
	;http://twitter.com/statuses/update.xml

投稿したらこうなりました。
http://twitter.com/hinekure_inovia

ふむふむ。
認証のところが違ったのですね。
これでHSPでもTwitterクライアントが作れることが証明できました。
ありがとうございます。
ついでにフォローさせていただきます。

解決忘れ。