文字列型変数管理サブルーチン †
//struct str_vars {
// char[100] name;
// int name_l=-1;
// char[256] value;
//}
//文字列型変数一つを扱うモジュール
//str_var_youso_name:変数の名前
//str_var_youso_l:変数の名前の長さ
//str_var_youso_value:変数の値
#module str_var_3youso str_var_youso_name,str_var_youso_l,str_var_youso_value
//コンスタラクタ。引数なし
#modinit
str_var_youso_name=""
str_var_youso_l=-1
str_var_youso_value=""
return
//varのnameのsetter
#modfunc local set_name str __p_str
str_var_youso_name=__p_str
return
//varのnameのstrlenを計算して格納
#modfunc local calc_strlen
str_var_youso_l=strlen(str_var_youso_name)
return
//varのvalueのsetter
#modfunc local set_value str __p_str
str_var_youso_value=__p_str
return
//varのnameのgetter
#modcfunc local get_name
return str_var_youso_name
//varのnameの長さのgetter
#modcfunc local get_length
return str_var_youso_l
//varのvalueのgetter
#modcfunc local get_value
return str_var_youso_value
#global
//そういえばこのモジュールテストしてないっすｗ
Skin "GS2" is designed by yiza.
Powered by PHP 7.1.33. HTML convert time: 0.007 sec.