/showme {Rremove_ function replace all _ for ' ' in string}
/showme {Rremove: function replace all : from \; in string}
/alias {Rremove_ %0} {/var param $0;/empty tmp;/loop {0,@Math(@Len($param)-1),RemLC} {/if {"@Mid($param,$RemLC,1)"=="_"} {/var tmp {@ConCat($tmp,@PreTrans( ))}} {/var tmp {@ConCat($tmp,@Mid($param,$RemLC,1))}} };/unvar param}
/alias {Rremove: %0} {/var param $0;/empty tmp;/loop {0,@Math(@Len($param)-1),RemLC} {/if {"@Mid($param,$RemLC,1)"==":"} {/var tmp {@ConCat($tmp,@PreTrans(\;))}} {/var tmp {@ConCat($tmp,@Mid($param,$RemLC,1))}} };/unvar param}

/showme {There will be stored you path}
/array {Twalk} {100,1}
/variable {VwalkCount} {0} {GTreningiCeny}
/variable {VwalkStep} {1} {GTreningiCeny}

/showme {main part of script file, first alias sets the path, next ones allow to move on path}
/alias {#walk_path %0} {/var VwalkCount @WordCount($0);/if {$VwalkCount>0} {/loop {1,$VwalkCount,WalkLC} {/assign Twalk {$WalkLC,1} @Word($0,$WalkLC)};/loop {1,$VwalkCount,WalkLC} {Rremove_ @GetArray(Twalk,$WalkLC,1);Rremove: $tmp;/assign Twalk {$WalkLC,1} $tmp}};/var VwalkStep 0}
/alias {#walk_next} {/if {$VwalkCount>=1 && $VwalkStep<$VwalkCount} {;/math VwalkStep {$VwalkStep+1};@GetArray(Twalk,$VwalkStep,1)} {/showme {Where do you want to go? Better use #walk_paths}}}
/alias {#walk_prev} {/if {$VwalkCount>=1 && $VwalkStep>0} {;/if {"@GetArray(Twalk,$VwalkStep,1)"=="w"} {e};/if {"@GetArray(Twalk,$VwalkStep,1)"=="e"} {w};/if {"@GetArray(Twalk,$VwalkStep,1)"=="n"} {s};/if {"@GetArray(Twalk,$VwalkStep,1)"=="s"} {n};/if {"@GetArray(Twalk,$VwalkStep,1)"=="nw"} {se};/if {"@GetArray(Twalk,$VwalkStep,1)"=="se"} {nw};/if {"@GetArray(Twalk,$VwalkStep,1)"=="sw"} {ne};/if {"@GetArray(Twalk,$VwalkStep,1)"=="ne"} {sw};/if {"@GetArray(Twalk,$VwalkStep,1)"=="d"} {u};/if {"@GetArray(Twalk,$VwalkStep,1)"=="u"} {d};/math VwalkStep {$VwalkStep-1}} {/showme {Where do you want to go? Better use #walk_paths}}


/showme {After you use #walk_path then ckp6 will send to the mud part of path}
/macro {ckp6} {#walk_next;/showme {Path: $VwalkStep/$VwalkCount}}
/macro {ckp4} {#walk_prev;/showme {Path: $VwalkStep/$VwalkCount}}


/showme {Expamples of speedwalk path}
/alias {p2ox} {#walk_path ne e ne:look ne se se e se ne ne se se e e e se e ne e ne e open_gate}
/alias {ox2p} {#walk_path w sw w sw w w sw:/showme_{watch_for_trap}}
/alias {nv2p} {#walk_path e e e e e say_tar_la_la:Rdelay_2000 e e e e e e e:/showme_{@AnsiBold()P-polana@AnsiReset()}}
/alias {p2nv} {#walk_path w w w w w w zapukaj_w_brame:Rdelay_2000 w w w w w w}
/alias {p2t}  {#walk_path s se s s s se e e se s s se se se s:/showme_{woda} se e e e:/showme_{@AnsiBold()T-skrzyzowanie@AnsiReset()}}