scheme - プチシェスキームで画面をクリアする

Question

ちょっと気になる質問。プチシェスキームSWLで画面をクリアする方法を知っている人はいますか? clear、cls、clean を試しました。

前もって感謝します。

Answer 1

このドキュメントhttp://scheme.com/csug8/use.htmlは次のように述べています。

^L-^L   clear screen and redisplay entry

プログラムから画面をクリアしたい場合は、端末で使用されている「画面のクリア」コードを送信してください。https://github.com/tonyg/racket-ansi/blob/master/ansi.rktでは、送信されたコードが CSI "2J" であることがわかります。CSI は \033[ を表します。

プログラムから実行する方法は次のとおりです（OS Xのターミナルのプチでテスト済み）。

(define ESC #\033)
(define CSI (list->string (list ESC #\[ )))
(define CLEAR (string-append CSI "2J"))
(display CLEAR)