HSPTV!掲示板

どうすればエディタを作れるか
初心者たちと上級者のヒントで考えるのだ！！！

じゃあ貴方はどうすればいいと思いますか？

とにかくがんばりたい
screen 0,500,500
cls 1
sdim form, 1024
form =""
; オブジェクトの表示位置
pos 1, 50
; メッセージボックス設置
mesbox form, 498, 450, 5
objsize 100,25
が物足りないからどうかしたい

後は「保存」と「読み込み」が出来れば完成じゃね？

「保存」と「読み込み」どうやるの？

基本仕様ガイドのメモリノートパッド命令の項目みればいいんでね？

bsaveでいいんでね

でどうする

*start
screen 0,500,500
cls 1
sdim form, 2024
form =""
pos 1, 50
mesbox form, 498, 450, 5
objsize 100,25
pos 0,0:button "新規作成", *sinki
pos 100,0:button "セーブ", *save
pos 200,0:button "ロード", *load
stop
*load
dialog "txt", 16, "テキスト"
if stat = 0 : stop
notesel form
noteload refstr
objprm 0, form
objprm 1, form
objsize 100,25
pos 0,0:button "新規作成", *sinki
pos 100,0:button "セーブ", *save
pos 200,0:button "ロード", *load
stop
*sinki
cls 1
goto *start
*save
dialog "txt", 17, "テキスト"
if stat = 0 : stop
notesel form
notesave refstr
objsize 100,25
pos 0,0:button "新規作成", *sinki
pos 100,0:button "セーブ", *save
pos 200,0:button "ロード", *load
stop
できた〜！！

なんだかしらんが、とにかく良し！！

>>objsize 100,25
>>pos 0,0:button "新規作成", *sinki
>>pos 100,0:button "セーブ", *save
>>pos 200,0:button "ロード", *load

なぜ何度も出てくるのだ。

もう解決したようだけど、
>>objsize 100,25
>>pos 0,0:button "新規作成", *sinki
>>pos 100,0:button "セーブ", *save
>>pos 200,0:button "ロード", *load
がすごく多かったので、少し変えてみました。

*start
	screen 0,500,500
	cls 1
	sdim form, 2024
	form =""
	pos 1, 50
	mesbox form, 498, 450, 5
	objsize 100,25
	pos 0,0
	button gosub "新規作成", *sinki
	pos 100,0
	button gosub "セーブ", *save
	pos 200,0
	button gosub "ロード", *load
	stop
*load
	dialog "*",16
	if stat=0 :return
	notesel form
	noteload refstr
	objprm 0,form
	return
*sinki
	form=""
	objprm 0,form
	return
*save
	dialog "*",17
	if stat=0 :return
	notesel form
	notesave refstr
	return

gosub → return でやったが、
goto → stop でもよい。

エディタのサンプルは標準でついていますよ。
それを参考にすれば簡単なものくらいはできます。
本格的なものやMDI/TDIにするのはHSPでは難しいですね(実装している人もいますが
どうやっているんだろう?と思います)。

おし！
解決したぞ
解決２回目なので
解け２〜なんてどう？