♪ずんずんずん と来りゃ♪ずざざん ざん と来りゃ♪おいらのサイトは ずざざんざん♪製作、運営 y.repeat mail to:y.tack2010@gmail.com 

//	mesbox描画用module
//	以下MBとはmesboxのこと
#module m_MB_draw
//	変数定義
#deffunc _4MB_init
	target=""
	stock=""
	ID=0
	return
//	IDのsetter
#deffunc _4MB_set_ID int p
	ID=p
	return
//	MB描画
#deffunc MB_draw
	target=stock+target
	stock=""
	objprm ID,target
	return
//	描画用文字列に追加(すぐは描画しない)
#deffunc MB_add str _4add
	stock+=_4add
	return
//	描画用文字列に追加(すぐは描画しない)改行付加
#deffunc MB_add_line str _4add
	stock+=_4add+"\n"
	return
#global
sdim var4MB,20000
mesbox var4MB,300,480,0
ID4MB=stat
_4MB_init
_4MB_set_ID ID4MB
sdim dt_var_names,96,100
dt_var_names.0="btstr1","btstr2","btstr3","btstr4","btstr5","btstr6","btstr7","btstr8"
dt_var_names.8="btnext1","btnext2","btnext3","btnext4","btnext5","btnext6","btnext7","btnext8"
dt_var_names.16="nm_bt"
sdim dt_vars,96,100
	
sdim dt_op_text,64000
dt_op_text={"
	this:@a@
		bstr1:A
		next1:@aa@
		bstr2:B
		next2:@ab@
		nm_bt:2
		cl_text
		ptext:ボタンを押してください
		show_text
	this_end
	this:@aa@
		bstr1:NEXT
		next1:@a@
		nm_bt:1
		cl_text
		ptext:あなたはAを押しましたね
		show_text
	this_end
	this:@ab@
		bstr1:NEXT
		next1:@a@
		nm_bt:1
		cl_text
		ptext:あなたはBを押しましたね
		show_text
	this_end"}
#module stock_sc m_ID,m_contents
#modinit str p_id;,str p_con
	m_ID=p_id
;	m_contents=p_con
	m_contents=""
	return
#modcfunc show_ID
	return m_ID
#modfunc add_con str p_s
	m_contents+=p_s
	return
#modcfunc show_con
	return m_contents
#global
notesel dt_op_text

newmod one_sc,stock_sc,"this:@a@"
i=0
j=0
for j,0,notemax,1
tmp=""
noteget tmp,j
if instr(tmp,0,"this_end")==-1{
	add_con one_sc(0),tmp+"\n"
}else{
	add_con one_sc(0),tmp
	_break
}
next

j++
newmod one_sc,stock_sc,"this:@aa@"
i=0
for jj,j,notemax,1
tmp=""
noteget tmp,jj
if instr(tmp,0,"this_end")==-1{
	add_con one_sc(1),tmp+"\n"
}else{
	add_con one_sc(1),tmp
	_break
}
next

jj++
newmod one_sc,stock_sc,"this:@ab@"
i=0
for jjj,jj,notemax,1
tmp=""
noteget tmp,jjj
if instr(tmp,0,"this_end")==-1{
	add_con one_sc(2),tmp+"\n"
}else{
	add_con one_sc(2),tmp
	_break
}
next
jjj++
MB_add "・ID\n"+show_ID(one_sc(0))+"\n\n"
MB_add "・con\n"+show_con(one_sc(0))+"\n\n"

MB_add "・ID\n"+show_ID(one_sc(1))+"\n\n"
MB_add "・con\n"+show_con(one_sc(1))+"\n\n"

MB_add "・ID\n"+show_ID(one_sc(2))+"\n\n"
MB_add "・con\n"+show_con(one_sc(2))+"\n\n"
MB_draw

コメントをかく


「http://」を含む投稿は禁止されています。

利用規約をご確認のうえご記入下さい

管理人/副管理人のみ編集できます