Create security.stk

Author: 梶塚太智

examples/security.stk

@@ -0,0 +1,13 @@
+(Stackスクリプトセキュリティ) print
+(スキャンするファイル名を入力してください> ) 
+input (name) var name read-file (code) var
+
+(
+    (ファイルシステムが破壊される可能性がある危険なコードを発見しました) print
+    (危険なコードを削除しています) print
+    code (write-file) (#削除されました#) replace
+    name write-file
+    (完了しました) print
+    () input
+) (このスクリプトは安全です print)
+code (write-file) find if