単純に書くとこうなりますが
#include "hspdx.as"
onexit *Exit
window = 1
*Boot
es_ini
es_screen 640, 480, 32, 0, window, 1
buffer 1, 640, 480
color
boxf
color $FF, $FF, $FF
font "MS ゴシック", 30, 1
pos 100, 200
if window {
mes "ウィンドウモード"
} else {
mes "フルスクリーンモード"
}
font "MS ゴシック", 20, 1
pos 100, 400
mes "ENTER KEY で切り換え"
es_buffer 0
gsel 0, 1
repeat
es_cls
es_excopy 0, 0, 0, 640, 480, 640, 480, 0, 0, 0, ESB_ADD, $FF
es_sync 16
stick key
if key And 32: break
await 0
loop
es_bye
window Xor 1
goto *Boot
*Exit
es_bye
end