.#,*ü" 12 $ mode ( old_mode & keymap+*ü" 13 ( var_name ( try_mode+ü" 15/ push-mode-stack°( var_nameýü" 16 ( var_nameþ 1 blocal_var_exists.ýü" 17 ( var_name þ 1 define_blocal_var/bü" 19 & _NARGS.ü" 20°$ mode/.ýýü" 22- Push to mode: + Null_String + Nul l_Stringþ ) read_miniþ ' strtrim°$ mode/dýü" 24 $ modeþ & strlen.w/býü" 27 $ modeþ * is_defined! 0>.ü" 29% _mode±$ modeýü" 30 $ modeþ * is_defined! 0>.ýü" 314 Mode is not defined.þ % error/c/cü" 34 ) what_modeP°( old_modeýü" 35 ( old_modeþ & strlen.ü" 36" no°( old_mode/býü" 38 ( old_mode! -! _þ / str_replace_all°( old_modeýýü" 40 ( old_mode! ! _þ / str_replace_all% _mode9þ & strlow°( try_modeü" 41! 2ý ( try_modeþ * is_definedB.ýýü" 43 ( old_mode! 0" 32þ / extract_element% _mode9þ & strlow°( try_modeü" 44! 2ý ( try_modeþ * is_definedB.ýü" 45> Unable to get mode. Tried %s. ( try_modeþ & verror/c/cü" 48 + what_keymap°& keymapü" 50 ' no_modeýü" 51" . $ mode9þ $ evalýýü" 53* . %s|%s,%s ( try_mode & keymapýü" 54 ( var_nameþ . get_blocal_var þü" 53 ' sprintfü" 55 ( var_nameþü" 53 . set_blocal_varü" 10y) push_mode,*ü" 60 ( var_name+/ push-mode-stack°( var_name*ü" 61 % modes & keymap $ mode+ýü" 63 ( var_nameþ . get_blocal_var°% modesýü" 64 % modesþ & strlen.ýü" 654 mode stack is empty.þ % er ror/býü" 67 % modes! 0" 44þ / extract_element°$ modeýü" 68 $ mode! 1# 124þ / extract_element°& keymapýü" 69 $ mode! 0# 124þ / extract_element°$ modeü" 71 ' no_modeýü" 72 $ modeþ $ evalýü" 73 & keymapþ * use_keymapýýü" 74 % modes! 1" 44þ / extract_ element ( var_nameþ . set_blocal_varü" 58y( pop_mode