www.pudn.com > sangoku_26_zh_tw.rar > data_send.pl

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/# 
#_/     NEW CHARA DATA 完成    _/# 
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/# 
 
sub DATA_SEND { 
 
	open(IN,"$TOWN_LIST") or &ERR2("被指定文件不開。"); 
	@TOWN = ; 
	close(IN); 
 
	&CHARA_MAIN_OPEN; 
	&HEADER; 
 
	print <<"EOM"; 
＞＞註冊完畢＜＜
 
 
$kname 已經進入 $GAME_TITLE 世界。
請不要忘記你的 帳號 跟 密碼。 
 
ID：$in{'id'}
 
PASS ：$in{'pass'}
 
 
社會地位
 
 
名子
$in{'chara_name'}
 
國家
$cou_name
 
官威
$LANK[0]
 
初期位置
$z2name
 
武力
$in{'str'}
 
智力
$in{'int'}
 
統率力
$in{'tou'}
 
郵件信箱
$in{'mail'}
 
 
適合初學者
 
 
 
 
 
 
 
有經驗玩家
 
 
 
 
 
 
EOM 
 
		&FOOTER; 
 
		exit; 
} 
1;