NO_696_exe の変更点

追加された行はこの色です。
削除された行はこの色です。
NO_696_exe へ行く。
NO_696_exe の差分を削除

#author("2018-06-16T00:06:47+09:00","","")
#author("2018-06-16T00:07:57+09:00","","")
***ＮＯ＿６９６＿ｅｘｅ [#p8b0beb5]

別exe簡単インタプリタ~

簡単インタプリタと言いつつオウム返しのみｗ~
***main [#o58eb160]

 sdim _4note,4000
 #define tmp_exe "hsptmp.exe"
 #define d_file "dat_file.dat"
 exec tmp_exe,0
 notesel _4note
 repeat 3000
 await 1000
 cls 0
 pos 0,0
 mes cnt
 _4note=str(cnt)
 notesave d_file
 loop

***sub [#q2a017db]

 sdim _4note,4000
 notesel _4note
 note_stock=_4note

 *begin
 await 100
 if note_stock!=_4note{
 cls 0
 pos 0,0
 mes _4note
 note_stock=_4note
 }
 goto *begin