diff options
| -rw-r--r-- | Makefile | 2 | ||||
| -rw-r--r-- | lib/Engine_Rhodes.sc | 1 | ||||
| -rw-r--r-- | rhodes.lua | 16 | ||||
| -rw-r--r-- | rhodes.png | bin | 0 -> 1499 bytes | 
4 files changed, 14 insertions, 5 deletions
@@ -1,7 +1,7 @@  all: -upload: rhodes.lua lib/Engine_Rhodes.sc +upload: rhodes.lua lib/Engine_Rhodes.sc rhodes.png  	find . -not -path '*/\.*' -type f | xargs -P 5 -n 1 norns_upload gretchen/rhodes  	norns_load gretchen/rhodes rhodes.lua diff --git a/lib/Engine_Rhodes.sc b/lib/Engine_Rhodes.sc index a644c96..104f87d 100644 --- a/lib/Engine_Rhodes.sc +++ b/lib/Engine_Rhodes.sc @@ -1,3 +1,4 @@ +// -*- compile-command: "make upload" -*-  // Adapted from https://sccode.org/1-522, which is adapted in  // turn from STK's 'rhodey', which is adapted from a TX81z  // algorithm. @@ -7,10 +7,18 @@ engine.name = "Rhodes"  local MusicUtil = require "musicutil"  local ControlSpec = require "controlspec" -function redraw() -  screen.clear() -  screen.move(64, 32) -  screen.text_center("rhodes.") +local _dirname +function dir(f) +  if not _dirname then +    source = string.gsub(debug.getinfo(1,'S').source, "@", "") +    _dirname = string.gsub(source, "[^/.]+.lua", "") +  end +  return _dirname.."/"..f +end + +function redraw(level) +  screen.clear(); +  screen.display_png(dir("rhodes.png"), 0, 0);    screen.update()  end diff --git a/rhodes.png b/rhodes.png Binary files differnew file mode 100644 index 0000000..0a8137c --- /dev/null +++ b/rhodes.png  | 
