トップ 差分 一覧 ソース 検索 ヘルプ PDF RSS ログイン

postoffice01.hsp

postoffice01.hsp(8)
po.png(8)
postoffice01.exe(8)

; Post Office 01
; copyleft 2017-06-23 sugiura@nagoya-u.jp

#packopt name "postoffice01"
#pack "po.png"

*settei
screen 0, 640, 680

notesel log

*main
	pos 50, 180
	picload "po.png", 1
	color 255,255,204
	boxf 0, 0, 640, 80

	pos 100, 10
	font "ゴシック", 18, 1
		color 0,0,0
	mes "Now, you are at the red star."
	mes "A woman is asking you a question."
	mes "---------------------------------"
	font "ゴシック", 18, 1
	mes "Woman: \"Excuse me. Is there a post office near here?\""


	color 255,255,204
	boxf 0, 560, 640, 680

	pos 100, 560
		color 0,0,0
	mes "Write the instruction to the post office."	
	
	ans = ""										; 解答欄の提示
	mesbox ans, 500, 80, 1, 0
	button goto "Finish", *owari

	stop

; end
*owari
	noteadd ans
	notesave "ans.txt"
	cls
	pos 300, 400
		font "ゴシック", 18, 1
	mes "Bye!"
	wait 200
	end