;   This file contains miscellaneous macros you may want to try.

;   You should browse the help text on Macros before running these.
;   (Alt H then M)

;   To try them out, press ^F9 to 'compile'.  What keys will be assigned
;   are defined after the {endmacro} or {em}.  You can cut and paste the
;   lines of the macro to a different window and just compile any one,
;   two or three macros.
;
;   To save macros, you save options, see Option pull down menu.

;   Pressing Shift F9 (ShowMacros) will show you what got compiled.

;   Macro Windows will draw a box 17col x 10rows and leave you positioned
;   to draw another.  Pressing the macro key multiple times will draw
;   'picture frames'
;                         ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;                         ³ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;                         ³³ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;                         ³³³ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;                         ³³³³             ³³³³
;                         ³³³³             ³³³³
;                         ³³³³             ³³³³
;                         ³³³³             ³³³³
;                         ³³³³             ³³³³
;                         ³³³³             ³³³³
;                         À³³³ÄÄÄÄÄÄÄÄÄÄÄÄÄÙ³³³
;                          À³³ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ³³
;                           À³ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ³
;                            ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
;
;   To change the size of the box, just change the numbers 17 and 10
;   to whatever you want.
;
;   To change the box style, change the {BSL} to {BDL} for box, double line
;   (press F1 for other box styles)
;

{BeginMacro}            //what follows is a macro
{ieo}                   //ignore end of file, if encountered
{DT}a                   //define tag 'a'
{BMC}{r}*17{d}*10       //block mark column, go right 17, down 10
{BSL}                   //draw a box, single line
{GoTo}a{e}{r}{d}        //go to tag a, enter, right, down
{EndMacro} = Windows    //ask for activation key for macro 'Windows'


;   This Macro is an example of some of pE's features
;   Switch to an empty window (Alt W O) before you run it!  Alt_W gets you
;   a new, empty, window.  Per the bottom line, is will be assigned to F12
;


{BeginMacro}                      // Needed to start macro
{IgnoreEOf}                       // When starting in an empty file
{DeLaY}010                        // Set the delay to 10 milliseconds
{Right}*8{BlockMarkColumn}        // Right 8 columns, Mark Rectangular Block
{Right}*15{Down}*6{BoxSingleLine} // Extend Block 15 right, 6 down, draw box
{INS}                             // Toggle Ins/Rpl mode, hope its replace
{Up}*5{Left}*11                   // Go Up 5 left 11
{DeLaY}100                        // Reset delay to 100 ms/keystroke
pE - The                          // Type forward
{Down}{Left}
"{Left}*2                         // and backward
t{Left}*2c{Left}*2e{Left}*2f{Left}*2r{Left}*2e{Left}*2p{Left}*2"{Left}{Down}
Editor(tm){Down}{Left}*12         // forward
Just Excellent{Down}{Left}        // forward
{DeLay}050                        // Reset the delay to 50 ms
.{Left}*2                         // Type backwards faster
c{Left}*2n{Left}*2I{Left}*2{Left}*2 ,{Left}*2e{Left}*2r{Left}*2a{Left}*2
w{Left}*2t{Left}*2f{Left}*2o{Left}*2S
{END}{Down}{INS}                  // Position to bottom right of box
{DeLaY}033                        // reset the delay
{Up}*6{Left}*15{BlockMarkColumn}{END}{Down}*6  // Mark the Block
{FloatBlock}                      // Start Moving
{Right}*44{Down}*15{Left}*44{Up}*15{Right}*44{Down}*15{Left}*44{Up}*15
{Right}*23{Down}*8{PASte}         // Insert Block here
{DeLaY}005
{Left}*23{Up}*8{PASte}            // Replicate the block
{Right}*23{PASte}                 // Replicate the block
{Right}*23{PASte}                 // Replicate the block
{Down}*8{PASte}                   // Replicate the block
{Left}*46{INS}{PASte}             // Replicate the block
{Down}*8{PASte}                   // Replicate the block
{Right}*23{PASte}                 // Replicate the block
{Right}*23{PASte}                 // Replicate the block
{INS}{PgUp}{Home}
{Down}*7{DeleteLine}              // Delete the line between Blocks
{Down}*7{DeleteLine}              // Delete the other line between Blocks
{PgUp}{Home}                      // Go to the top of the screen
{BlockMarkLines}{Down}*20         // Mark 20 Lines
{CuT}{PASte}*2{DeLaY}150          // Cut, then paste twice
{BlockMarkColumn}{Right}*7        // Now were going to take the vertical
{FileBoTtom}{CuT}{Right}*16       //     space out and replicate columns
{BlockMarkColumn}{Right}*6
{FileBoTtom}{CuT}{Right}*16
{BlockMarkColumn}{Right}*6
{FileBoTtom}{CuT}
{BlockMarkColumn}{Right}*15
{FileBoTtom}{CuT}{PASte}*3        // Fill the whole screen
{Home}{ToggleBorders}{DeLaY}200   // Turn borders on and off an on again
{ToggleBorders}*3{DeLaY}050       // delay less
{SiZeWindow}{Up}*32{Left}*46{CancelOp}  // Make the window smaller
{DeLaY}100                              // delay more
{MoveWindoW}{Right}*50{Down}*24         // Move it around
{Left}*50{Up}*24{CancelOp}
{ZoomWindows}*5                   // Zoom to full size
{EndMacro} F12 PerfectEditor