diff --git a/src/main/res/raw/misc.forth b/src/main/res/raw/misc.forth index 661b6a9..45867cf 100644 --- a/src/main/res/raw/misc.forth +++ b/src/main/res/raw/misc.forth @@ -13,4 +13,6 @@ } each tbl ; -: ms ( n -- ) 'java.lang.Thread/sleep/l' jvm-call-static ; \ No newline at end of file +: ms ( n -- ) 'java.lang.Thread/sleep/l' jvm-call-static ; + +: tone ( hz ms -- ) swap 'com.vectron.forthcalc.support.Tone/play/di' jvm-call-static ; \ No newline at end of file