検索
AND検索
OR検索
トップ
|
リロード
|
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
NO_590_DOC をテンプレートにして作成
メニュー
簡易掲示板
LINK集
y.tackの公式BBSブックマーク
practice room
?
最新の20件
2022-10-09
多角形の内外判定
2021-05-19
RecentDeleted
2018-08-01
FrontPage
文字列型変数管理サブルーチン
GAME作成システム
2018-07-31
double型変数管理サブルーチン
int型変数管理サブルーチン
2018-07-21
GUIとメイン分割処理。たたき台2
2018-07-11
memo
NO_579_sample
GUIとメイン分割処理。たたき台
2018-06-28
NO_714
NO_712
NO_706
NO_705
NO_704
NO_703
NO_702
2018-06-23
Shift_JIS
モートン番号テーブル化 / 八分木
total
0
today
0
yesterday
0
now
1
Menu
Total:0/Today:0
開始行:
[[簡単言語]]
**NO_590_DOC [#i8b21653]
;変数(普通の)を取得/代入するモジュールを作ろうと思った...
;ラベルの処理はどうなったか忘れたのでw
;復習を兼ねてコメント書いてみました
#module mod_label i_name,i_ID,i_l_value
;i_nameラベル変数の名前
;i_nameラベル変数のID
;i_nameラベル変数の値、コマンド番号を格納する(だったよ...
#modinit str p_name,int p_ID,int p_l_value
i_name=p_name
i_ID=p_ID
i_l_value=p_l_value
return
;モジュールのメンバ変数に値を代入。変数とか言って
;代入する命令がないので、定数を格納するかんじだったか、...
#modcfunc local get_i_name
return i_name
#modcfunc local get_i_ID
return i_ID
#modcfunc local get_i_l_value
return i_l_value
;getter
#deffunc local x_label_init int sw_new_p,str _p_name,int...
; global fv_ID
if sw_new_p==1{
fv_ID=0
}
newmod o_label,mod_label,_p_name,fv_ID,_p_l_value
fv_ID++
return
;ラベルインスタンス作成 オブジェクト名(配列になる)モ...
;インスタンスの名前(引数) ID(IDを作るたびに++引数で...
#defcfunc local get_x_label_l_value str __p_name,int __p...
r_name=get_i_name@mod_label(o_label.__p_ID)
;IDが引数のインスタンスの名前を取得
if r_name!=__p_name:return -1
;返ってきた名前が引数で指定した名前と異なったらエラー
return get_i_l_value@mod_label(o_label.__p_ID)
;返ってきた名前と引数で指定した名前が等しい インスタン...
#global
;変数をIDだけでも名前だけで識別してるわけでもなく
;IDを渡して返ってきた名前と引数で指定した名前が等しい時...
;IDだけだと間違いやすく
;名前だけだと検索するのに時間がかかるので
;取得はめんどくさいですが
;二つのやり方のいいとこどりとなっています
#なんか とりあえず出来て動いてそのままほったらかしぽw~
#想像と現実の乖離みたいなw
終了行:
[[簡単言語]]
**NO_590_DOC [#i8b21653]
;変数(普通の)を取得/代入するモジュールを作ろうと思った...
;ラベルの処理はどうなったか忘れたのでw
;復習を兼ねてコメント書いてみました
#module mod_label i_name,i_ID,i_l_value
;i_nameラベル変数の名前
;i_nameラベル変数のID
;i_nameラベル変数の値、コマンド番号を格納する(だったよ...
#modinit str p_name,int p_ID,int p_l_value
i_name=p_name
i_ID=p_ID
i_l_value=p_l_value
return
;モジュールのメンバ変数に値を代入。変数とか言って
;代入する命令がないので、定数を格納するかんじだったか、...
#modcfunc local get_i_name
return i_name
#modcfunc local get_i_ID
return i_ID
#modcfunc local get_i_l_value
return i_l_value
;getter
#deffunc local x_label_init int sw_new_p,str _p_name,int...
; global fv_ID
if sw_new_p==1{
fv_ID=0
}
newmod o_label,mod_label,_p_name,fv_ID,_p_l_value
fv_ID++
return
;ラベルインスタンス作成 オブジェクト名(配列になる)モ...
;インスタンスの名前(引数) ID(IDを作るたびに++引数で...
#defcfunc local get_x_label_l_value str __p_name,int __p...
r_name=get_i_name@mod_label(o_label.__p_ID)
;IDが引数のインスタンスの名前を取得
if r_name!=__p_name:return -1
;返ってきた名前が引数で指定した名前と異なったらエラー
return get_i_l_value@mod_label(o_label.__p_ID)
;返ってきた名前と引数で指定した名前が等しい インスタン...
#global
;変数をIDだけでも名前だけで識別してるわけでもなく
;IDを渡して返ってきた名前と引数で指定した名前が等しい時...
;IDだけだと間違いやすく
;名前だけだと検索するのに時間がかかるので
;取得はめんどくさいですが
;二つのやり方のいいとこどりとなっています
#なんか とりあえず出来て動いてそのままほったらかしぽw~
#想像と現実の乖離みたいなw
ページ名: