kiriel.gifKiriel D'Sol

Macros

Macros Available:

Orga Outback Stepped Directions Macro

To use, copy and paste the following text into your Clan Lord macros file. Feel free to customize for your own use as needed.


// Orga Outback- Stepped Directions to Orga Village // Based on the map at http://home.pacbell.net/friedlee/cl/orgaoutback/orgaoutbackmini.html // Macro created by Kiriel D'Sol // Notify kiriel@windsofdawn.org if you find a mistake or want to suggest an improvement "oob2ov" { if @text != "" if @text != "current" setglobal oobsnell @text end if end if if @text != "current" setglobal curoobsnell oobsnell end if if @text == "current" message "Currently in: " curoobsnell message oobyell " (type oobyell to yell this)" else if oobsnell == "1" message "Currently in: " oobsnell setglobal oobyell "W to 8" message oobyell " (type oobyell to yell this)" setglobal oobsnell "8" else if oobsnell == "2" message "Currently in: " oobsnell setglobal oobyell "S to 1 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "3" message "Currently in: " oobsnell setglobal oobyell "W to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "4" message "Currently in: " oobsnell setglobal oobyell "W to 1 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "5" message "Currently in: " oobsnell setglobal oobyell "S to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "6" message "Currently in: " oobsnell setglobal oobyell "W to 2 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "2" else if oobsnell == "7" message "Currently in: " oobsnell setglobal oobyell "S to 2" message oobyell " (type oobyell to yell this)" setglobal oobsnell "2" else if oobsnell == "8" message "Currently in: " oobsnell setglobal oobyell "N to 9" message oobyell " (type oobyell to yell this)" setglobal oobsnell "9" else if oobsnell == "9" message "Currently in: " oobsnell setglobal oobyell "N to 11" message oobyell " (type oobyell to yell this)" setglobal oobsnell "11" else if oobsnell == "10" message "Currently in: " oobsnell setglobal oobyell "E to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "11" message "Currently in: " oobsnell setglobal oobyell "E to 12" message oobyell " (type oobyell to yell this)" setglobal oobsnell "12" else if oobsnell == "12" message "Currently in: " oobsnell setglobal oobyell "W to 14" message oobyell " (type oobyell to yell this)" setglobal oobsnell "14" else if oobsnell == "13" message "Currently in: " oobsnell setglobal oobyell "W to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "14" message "Currently in: " oobsnell setglobal oobyell "W to 15" message oobyell " (type oobyell to yell this)" setglobal oobsnell "15" else if oobsnell == "15" message "Currently in: " oobsnell setglobal oobyell "N to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "16" message "Currently in: " oobsnell setglobal oobyell "N to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "17" message "Currently in: " oobsnell setglobal oobyell "N to 20 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "18" message "Currently in: " oobsnell setglobal oobyell "W to 20 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "19" message "Currently in: " oobsnell setglobal oobyell "E to 20 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "20" message "Currently in: " oobsnell setglobal oobyell "N to 22" message oobyell " (type oobyell to yell this)" setglobal oobsnell "22" else if oobsnell == "21" message "Currently in: " oobsnell setglobal oobyell "N to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "22" message "Currently in: " oobsnell setglobal oobyell "W to 23" message oobyell " (type oobyell to yell this)" setglobal oobsnell "23" else if oobsnell == "23" message "Currently in: " oobsnell setglobal oobyell "W to Orga Village" message oobyell " (type oobyell to yell this)" setglobal oobsnell "" else if oobsnell == "24" message "Currently in: " oobsnell setglobal oobyell "N to 20" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "25" message "Currently in: " oobsnell setglobal oobyell "E to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "26" message "Currently in: " oobsnell setglobal oobyell "E to 20" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "27" message "Currently in: " oobsnell setglobal oobyell "S to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "28" message "Currently in: " oobsnell setglobal oobyell "N to 20" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "29" message "Currently in: " oobsnell setglobal oobyell "E to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "30" message "Currently in: " oobsnell setglobal oobyell "E to 18" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "31" message "Currently in: " oobsnell setglobal oobyell "N to 20" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "32" message "Currently in: " oobsnell setglobal oobyell "S to 20" message oobyell " (type oobyell to yell this)" setglobal oobsnell "20" else if oobsnell == "33" message "Currently in: " oobsnell setglobal oobyell "N to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "34" message "Currently in: " oobsnell setglobal oobyell "S to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "35" message "Currently in: " oobsnell setglobal oobyell "W to 22" message oobyell " (type oobyell to yell this)" setglobal oobsnell "22" else message "OOB map at http://home.pacbell.net/friedlee/cl/orgaoutback/orgaoutbackmini.html" message "Currently in: Trainer's Grove (specify a snell number to override)" setglobal oobyell "S to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" message "Use oob2ov current to get the most recent snell information" end if } // Orga Outback- Stepped Directions to Dred Passage // Based on the map at http://home.pacbell.net/friedlee/cl/orgaoutback/orgaoutbackmini.html // Macro created by Kiriel D'Sol // Notify kiriel@windsofdawn.org if you find a mistake or want to suggest an improvement "oob2dp" { if @text != "" if @text != "current" setglobal oobsnell @text end if end if if @text != "current" setglobal curoobsnell oobsnell end if if @text == "current" message "Currently in: " curoobsnell message oobyell " (type oobyell to yell this)" else if oobsnell == "1" message "Currently in: " oobsnell setglobal oobyell "W to 8" message oobyell " (type oobyell to yell this)" setglobal oobsnell "8" else if oobsnell == "2" message "Currently in: " oobsnell setglobal oobyell "S to 1 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "3" message "Currently in: " oobsnell setglobal oobyell "W to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "4" message "Currently in: " oobsnell setglobal oobyell "W to 1 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "5" message "Currently in: " oobsnell setglobal oobyell "S to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "6" message "Currently in: " oobsnell setglobal oobyell "W to 2 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "2" else if oobsnell == "7" message "Currently in: " oobsnell setglobal oobyell "S to 2" message oobyell " (type oobyell to yell this)" setglobal oobsnell "2" else if oobsnell == "8" message "Currently in: " oobsnell setglobal oobyell "N to 9" message oobyell " (type oobyell to yell this)" setglobal oobsnell "9" else if oobsnell == "9" message "Currently in: " oobsnell setglobal oobyell "N to 11" message oobyell " (type oobyell to yell this)" setglobal oobsnell "11" else if oobsnell == "10" message "Currently in: " oobsnell setglobal oobyell "E to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "11" message "Currently in: " oobsnell setglobal oobyell "E to 12" message oobyell " (type oobyell to yell this)" setglobal oobsnell "12" else if oobsnell == "12" message "Currently in: " oobsnell setglobal oobyell "W to 14" message oobyell " (type oobyell to yell this)" setglobal oobsnell "14" else if oobsnell == "13" message "Currently in: " oobsnell setglobal oobyell "W to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "14" message "Currently in: " oobsnell setglobal oobyell "W to 15" message oobyell " (type oobyell to yell this)" setglobal oobsnell "15" else if oobsnell == "15" message "Currently in: " oobsnell setglobal oobyell "N to 17" message oobyell " (type oobyell to yell this)" setglobal oobsnell "17" else if oobsnell == "16" message "Currently in: " oobsnell setglobal oobyell "N to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" else if oobsnell == "17" message "Currently in: " oobsnell setglobal oobyell "S to 18 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "18" message "Currently in: " oobsnell setglobal oobyell "E to 25 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "25" else if oobsnell == "19" message "Currently in: " oobsnell setglobal oobyell "N to 18 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "20" message "Currently in: " oobsnell setglobal oobyell "E to 18 (two way)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "21" message "Currently in: " oobsnell setglobal oobyell "E to 18" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "22" message "Currently in: " oobsnell setglobal oobyell "S to 18" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "23" message "Currently in: " oobsnell setglobal oobyell "N to 18" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "24" message "Currently in: " oobsnell setglobal oobyell "S to 25" message oobyell " (type oobyell to yell this)" setglobal oobsnell "25" else if oobsnell == "25" message "Currently in: " oobsnell setglobal oobyell "S to 26" message oobyell " (type oobyell to yell this)" setglobal oobsnell "26" else if oobsnell == "26" message "Currently in: " oobsnell setglobal oobyell "W to 29" message oobyell " (type oobyell to yell this)" setglobal oobsnell "29" else if oobsnell == "27" message "Currently in: " oobsnell setglobal oobyell "W to 25" message oobyell " (type oobyell to yell this)" setglobal oobsnell "25" else if oobsnell == "28" message "Currently in: " oobsnell setglobal oobyell "E to 35" message oobyell " (type oobyell to yell this)" setglobal oobsnell "35" else if oobsnell == "29" message "Currently in: " oobsnell setglobal oobyell "N to 30" message oobyell " (type oobyell to yell this)" setglobal oobsnell "30" else if oobsnell == "30" message "Currently in: " oobsnell setglobal oobyell "N to 31" message oobyell " (type oobyell to yell this)" setglobal oobsnell "31" else if oobsnell == "31" message "Currently in: " oobsnell setglobal oobyell "E to 32" message oobyell " (type oobyell to yell this)" setglobal oobsnell "32" else if oobsnell == "32" message "Currently in: " oobsnell setglobal oobyell "Enter the tree path to Dred Passage (requires full PF)" message oobyell " (type oobyell to yell this)" setglobal oobsnell "" else if oobsnell == "33" message "Currently in: " oobsnell setglobal oobyell "S to 30" message oobyell " (type oobyell to yell this)" setglobal oobsnell "30" else if oobsnell == "34" message "Currently in: " oobsnell setglobal oobyell "E to 18" message oobyell " (type oobyell to yell this)" setglobal oobsnell "18" else if oobsnell == "35" message "Currently in: " oobsnell setglobal oobyell "N to 25" message oobyell " (type oobyell to yell this)" setglobal oobsnell "25" else message "OOB map at http://home.pacbell.net/friedlee/cl/orgaoutback/orgaoutbackmini.html" message "Currently in: Trainer's Grove (specify a snell number to override)" setglobal oobyell "S to 1" message oobyell " (type oobyell to yell this)" setglobal oobsnell "1" message "Use oob2dp current to get the most recent snell information" end if } // Orga Outback- yell next step macro (goes with the Orga Outback Directions series) "oobyell" { if oobyell == "" message "No yell currently set, please set your current snell using your directions macro" else "/yell " oobyell "\r" end if }