¿ªÔÆÌåÓý

  1. H390-Vm
  2. Messages
Single Messages Topics Expanded Polls

Re: #VMCE #rexx EE goes XEDIT - compiling a wish list #VMCE #rexx

 

A demonstration of EE's new ALL, MORE, and SHOW commands:
?
First:? all/extract
Second: more/input
Third: show
?
Note that MORE and SHOW are implemented as internal macros inside EE$MACRO EXEC.
?
See coloured screenshot for full beauty: /g/h390-vm/photo/280705/3834709
?
Martin
?
?REVERSER EE ? ? ? A1 ? ? ? ? V 255 ?Workl=125 Size=41 Line=ToF ? ? ? ? 5 File(s)?
?====> all/extract ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ? 0 * * * Top of File * * * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 6 ? ? ? ?"extract line" ? ? ?retrieves editor status information ? ? ? ? ? ? ?
? ? 7 ? ? ? ?"extract curline" ? file contensts in curline.3 ? ? ? ? ? ? ? ? ? ? ?
? ?12 ? "extract line" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?14 ? /* "extract size" */ size.1 = 41 /* not yet implemented */ ? ? ? ? ? ? ? ?
? ?17 ? ? "extract curline" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?42 * * * End of File * * * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Unchanged ?Load=0xE9C000 ?EE V1.3.2.0012_240924-1417 ?MECAFF at VM370CE ?14:42:30?

?REVERSER EE ? ? ? A1 ? ? ? ? V 255 ?Workl=125 Size=41 Line=ToF ? ? ? ? 5 File(s)?
?====> more/input ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 0 * * * Top of File * * * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 6 ? ? ? ?"extract line" ? ? ?retrieves editor status information ? ? ? ? ? ? ?
? ? 7 ? ? ? ?"extract curline" ? file contensts in curline.3 ? ? ? ? ? ? ? ? ? ? ?
? ? 8 ? ? ? ?"input ..." ? ? ? ? adds new content to file ? ? ? ? ? ? ? ? ? ? ? ??
? ?12 ? "extract line" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?14 ? /* "extract size" */ size.1 = 41 /* not yet implemented */ ? ? ? ? ? ? ? ?
? ?17 ? ? "extract curline" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?20 ? ? ? "input ." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?28 ? ? ? "input ."text1""reverse(text2) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?31 ? ? ? ?"input" reverse(text) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?42 * * * End of File * * * ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Unchanged ?Load=0xE9C000 ?EE V1.3.2.0012_240924-1417 ?MECAFF at VM370CE ?14:43:38?

?REVERSER EE ? ? ? A1 ? ? ? ? V 255 ?Workl=125 Size=41 Line=19 ? ? ? ? ?5 File(s)?
?====> show ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ? 7 ? ? ? ?"extract curline" ? file contensts in curline.3 ? ? ? ? ? ? ? ? ? ? ?
? ? 8 ? ? ? ?"input ..." ? ? ? ? adds new content to file ? ? ? ? ? ? ? ? ? ? ? ??
? ? 9 ? */ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?10 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?11 ? signal on syntax ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?12 ? "extract line" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?13 ? "top" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?14 ? /* "extract size" */ size.1 = 41 /* not yet implemented */ ? ? ? ? ? ? ? ?
? ?15 ? do i = 1 to size.1 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?16 ? ? "locate 1" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?17 ? ? "extract curline" ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?18 ? ? text = curline.3 ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?19 ? ? if text = "" then do /* blank line ? */ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?20 ? ? ? "input ." ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?21 ? ? end ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?22 ? ? else if substr(text,1,1) = " " then do /* leading blank ? */ ? ? ? ? ? ?
? ?23 ? ? ? do j = 1 to length(text) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?24 ? ? ? ? if substr(text,j,1) ^= " " then leave ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?25 ? ? ? end ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?26 ? ? ? text1 = substr(text,2,j-2) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?27 ? ? ? text2 = substr(text,j) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?28 ? ? ? "input ."text1""reverse(text2) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
? ?29 ? ? end ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
? ?30 ? ? else do /* 1st char is non-blank */ ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
Unchanged ?Load=0xE9C000 ?EE V1.3.2.0012_240924-1417 ?MECAFF at VM370CE ?14:45:19?
Join [email protected] to automatically receive all group messages.