REAPER-EEL-Scripts VS jsfx

or here.. https://www.extremraym.com/en/my-reaper-scripts/

/** * ReaScript Name: Play and recording clock * Description: Check the state of the ripple editing mod. * Instructions: Run. * Author: X-Raym * Author URI: http://extremraym.com * Repository: GitHub > X-Raym > EEL Scripts for Cockos REAPER * Repository URI: https://github.com/X-Raym/REAPER-EEL-Scripts * File URI: * Licence: GPL v3 * Forum Thread: EEL: Clock (shows project time) * Forum Thread URI: http://forum.cockos.com/showthread.php?t=155542 * REAPER: 5.0 * Extensions: None * Version: 1.1.1 */ /** * Changelog: * v1.1.1 (2018-09-01) # Corrected name * v1.1 (2018-08-19) + Empty Clock + Red background for recording play state * v1.0 (2015-03-20) + Initial release */ // Based on Clock (EEL script by spk77 14.2.2015) // Use mouse wheel to increase/decrease font size // Right click on window -> cycle through time formatting modes // Initial values font_size = 100; font_name = "Arial"; window_w = 1200; window_h = 600; function adjust_font_size(mouse_wheel_val) ( mouse_wheel_val > 0 ? ( font_size < 200 ? ( font_size += 4; ); ); mouse_wheel_val < 0 ? ( (font_size > 16 ) ? ( font_size -= 4; ); ); gfx_setfont(1, font_name, font_size); mouse_wheel = 0; ); function init(window_w, window_h) ( gfx_init("Time Elapsed" , window_w, window_h); gfx_setfont(1, font_name, font_size, 'b'); gfx_a = 1; gfx_r = 1; gfx_g = 1; gfx_b = 1; ); function run() local(time_range, time_sel_start, time_sel_end) ( GetPlayState() == 0 || GetPlayState() == 2 ? ( format_timestr_pos(last_value, #buf, format) ):( format_timestr_pos(GetPlayPosition2()-GetCursorPosition(), #buf, format); last_value = GetPlayPosition2()-GetCursorPosition(); ); gfx_measurestr(#buf, str_w, str_h); mouse_wheel != 0 ? adjust_font_size(mouse_wheel); mouse_state == 0 && mouse_cap == 2 && mouse_x > 5 && mouse_x < gfx_w - 5 && mouse_y > 5 && mouse_y < gfx_h - 5 ? ( mouse_state = 1; format < 6 ? format += 1 : format = 0; ); mouse_cap == 0 ? mouse_state = 0; a = GetPlayState(); GetPlayState() == 5 ? ( gfx_r = 1; gfx_b = 0; gfx_g = 0; gfx_rect( 0, 0, gfx_w, gfx_h, 1); ); format < 6 ? ( gfx_r = 1; gfx_b = 1; gfx_g = 1; gfx_x = 0.5*(gfx_w-str_w); gfx_y = 5; gfx_printf(#buf); ); gfx_update(); gfx_getchar() >= 0 ? defer("run();"); ); last_value = 0; init(window_w, window_h); run();