#author("2018-08-01T00:05:20+09:00","","") *文字列型変数管理サブルーチン [#sba1ce92] //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 //そういえばこのモジュールテストしてないっすw