メモリノートパッド/notedel

  1
  2
  3
  4
  5
  6

s = "abc\ndef\nghi\njkl"
mes s
notesel s
notedel 1
mes "---"
mes s

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26

-
|
|
|
|
|
!
 
 
 
 
 
-
|
|
|
|
|
|
|
|
|
!
 
 
 

s = {"
見えるよ
見えるよ
;HSPと同じコメント
世界が見える
何が見えるの？
"}
notesel s
 *main
repeat notemax
    wait 100
    noteget sr, cnt
    if instr(sr,0,";")=0 {
        // コメント行を削除して２回目以降はコメント処理が不要になる
        notedel cnt
//*
        ; 間違い例
        continue
/*/
        ; 正しい例
        continue cnt
/*/
    }
    mes sr
loop
goto *main