Edit file File name : macro.slc Content :.#,*�! 4 # str+ . get_last_macro�# str*�! 5 $ file+*�! 6 * macro_name+��! 8 / Macro filename:� 3 read_file_from_mini�$ file��! 9 $ file� & strlen.w/b��" 11 . Name of macro: + Null_String + Null_String� ) read_mini�* macro_name��" 12 * macro_name� & strle n.w/b��" 14$= %%%%%%MACRO NAME: %s\n@%s\n\n * macro_name # str� ' sprintf�# str�" 16" -1� # str $ file� 5 append_string_to_fileA.��" 18 = Error appending macro to file� % error/c�! 2y0 macro_save_macro,*�" 25 % macro+ . get_last_macro�% macro*�" 26 ! i $ imax " ch # num+*�" 27 / last_was_insert+! 0�/ last_was_insert* ! f % ftype+��" 29 ' *macro*� ' pop2buf�" 30 # eob�" 32 ' newline��" 33$/ \ndefine macro_� & insert�" 34 ) push_spot��" 35$. EDITME ()\n{\n� & insert��" 37 % macro� & strlen�$ imax�" 38! 0�# num�" 39! 0�! i.�" 41 ! i $ imax=/.��" 43 ! i % macro!�" ch�" 44 " ch" 92A.�" 46�! i��" 47 ! i % macro!�" ch/.�" 49 " ch" 94A.�" 51�! i��" 52 ! i % macro!�" ch�" 53" 64�" ch/c/d�" 56 " ch�" 57�# num�" 58�! i/f.�" 61 # num/.�" 63�# num���" 64 ( un getkey/f.��" 67! 0� - input_pending/.�" 69 / get_key_binding�! f�% ftype��" 71 ! f� & typeof ( Ref_TypeA.��" 73$S (@%S)(); %%<--- Ref may be to a private function\n ! f� ' vinsert�" 74! 0�/ last_was_insertu/c�" 78 ! f / self_insert_cmdA.�" 80 / last_w as_insert.��" 82$D insert (""); % insert text here\n� & insert�" 83! 1�/ last_was_insert/bu/c�" 88 % ftype.���" 90$0 call ("%s");\n ! f� ' sprintf� & insert/.���" 92$* %s ();\n ! f� ' sprintf� & insert/d�" 94! 0�/ last_was_insert/f��" 97$# }\n� & insert�" 98 ( pop_spot�" 23y1 macro_to_function,*�# 105 # key+ + Null_String�# key*�# 106 " ch+! 0�" ch��# 107 = Press key to assign macro to:� % flush.�# 111 & getkey�" ch�# 112 " ch! 0A. " ^@�" ch/.� " ch� $ char�" ch/d��# 113 # key " ch� & strcat� # key/.��# 115! 5� - input_pending/k���# 117 ! @ . get_last_macro� & strcat # key� , local_setkey���# 118 - Macro set to � # key� 0 expand_keystring� & strcat� ' message�# 103y9 macro_assign_macro_to_key Save