;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;Script By Vegeto079/Peach/|Cloud_Strife|;;;;;;;;;;;;;
;;Note: Sorry about huge script, but its needed as far as I know;;
;;;To Contact me about the script, email veget00tegev@yahoo.com;;;
;;;;;;;;;;;;Or talk to me in #peach on irc.swifitrc.net;;;;;;;;;;;
;;;;;Please do not edit this in any way without my permission;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
alias buy {
  if (%preset.one == $null) { set %preset.one None }
  if (%preset.two == $null) { set %preset.two None }
  if (%preset.three == $null) { set %preset.three None }
  if (%preset.four == $null) { set %preset.four None }
  if (%preset.five == $null) { set %preset.five None }
  if ($1 == stop) {
    timeritem* off
    echo -a Buying ended.
    unset %item*
    unset %buying
    halt
  }
  if (%buying == on) {
    echo -a You are already buying items! Type ( /buy stop ) to stop!
    halt
  }
  set %buying $?!="Would you like to load a preset buying/selling script?"
  if (%buying == $false) { goto regular }
  if (%buying == $true) { goto presets }
  :regular
  set %buying $?!="Would you like to create a preset buying/selling script?"
  if (%buying == $false) { goto regular2 }
  if (%buying == $true) { goto presets2 }
  :regular2
  set %buying $$?="How many items would you like to buy/sell? (1-3)"
  if (%buying == 1) {
    set %item $$?="What are you wanting to buy/sell?"
    set %item.type $$?="Are you buying or selling %item $+ ? (Please put -ING at the end, and type in CAPS)"
    set %item.price $$?="What price do you want for it? (Say offer for offer price.)"
    set %item.nick $$?="What nick do you want them to message to buy?"
    set %item.chan $$?="What channel do you want to message?"
    join %item.chan
    timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ !
    timeritem1a 01 %time loltimer1
    echo -a Selling started. To stop, type ( /buy stop )
    set %buying on
    halt
  }
  if (%buying == 2) {
    set %item $$?="What is the first item you are wanting to buy/sell?"
    set %item.type $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
    set %item.price $$?="What price do you want for it? (Say offer for offer price.)"
    set %item2 $$?="What is the second item you are wanting to buy/sell?"
    set %item2.type $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
    set %item2.price $$?="What price do you want for it? (Say offer for offer price.)"
    set %item.nick $$?="What nick do you want them to message to buy?"
    set %item.chan $$?="What channel do you want to message?"
    set %time $$?="How many seconds do you want to be inbetween messages? (Default 25)"
    set %time2 $calc(%time * 2)
    join %item.chan
    timeritem2 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ !
    timeritem2a 01 %time loltimer2
    echo -a Selling started. To stop, type ( /buy stop )
    set %buying on
    halt
  }
  if (%buying == 3) {
    set %item $$?="What is the first item you are wanting to buy/sell?"
    set %item.type $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
    set %item.price $$?="What price do you want for it? (Say offer for offer price.)"
    set %item2 $$?="What is the second item you are wanting to buy/sell?"
    set %item2.type $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
    set %item2.price $$?="What price do you want for it? (Say offer for offer price.)"
    set %item3 $$?="What is the third item you are wanting to buy/sell?"
    set %item3.type $$?="Are you buying or selling this third item? (Please put -ING at the end, and type in CAPS)"
    set %item3.price $$?="What price do you want for it? (Say offer for offer price.)"
    set %item.nick $$?="What nick do you want them to message to buy?"
    set %item.chan $$?="What channel do you want to message?"
    set %time $$?="How many seconds do you want to be inbetween messages? (Default 25)"
    set %time2 $calc(%time * 2)
    join %item.chan
    timeritem3 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ !
    timeritem2a 01 %time loltimer3
    echo -a Selling started. To stop, type ( /buy stop )
    set %buying on
    halt
  }
  :presets
  set %buying $$?="What preset number do you want to use? $+ $crlf $+ 1: %preset.one $+ $crlf $+  2: %preset.two $+ $crlf $+ 3: %preset.three $+ $crlf $+ 4: %preset.four $+ $crlf $+ 5: %preset.five $+ $crlf $+ 6: End (Choose none)"
  if (%buying != 1) && (%buying != 2) && (%buying != 3) && (%buying != 4) && (%buying != 5) {
    halt
  }
  set %buying2 $replace(%buying,1,one,2,two,3,three,4,four,5,five)
  if (%preset. [ $+ [ %buying2 ] ] == None) {
    halt
    unset %buying2
  }
  unset %buying2
  if (%buying == 1) {
    if (%preset.one.type == 1) {
      set %item %itemp1
      set %item.type %item.typep1
      set %item.price %item.pricep1
      set %item.nick %item.nickp1
      set %item.chan %item.chanp1
      set %time %timep1
      set %time2 %time2p1
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer1
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 2) {
      set %item %itemp1
      set %item.type %item.typep1
      set %item.price %item.pricep1
      set %item2 %item2p1
      set %item2.type %item2.typep1
      set %item2.price %item2.pricep1
      set %item.nick %item.nickp1
      set %item.chan %item.chanp1
      set %time %timep1
      set %time2 %time2p1
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer2
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 3) {
      set %item %itemp1
      set %item.type %item.typep1
      set %item.price %item.pricep1
      set %item2 %item2p1
      set %item2.type %item2.typep1
      set %item2.price %item2.pricep1
      set %item3 %item3p1
      set %item3.type %item3.typep1
      set %item3.price %item3.pricep1
      set %item.nick %item.nickp1
      set %item.chan %item.chanp1
      set %time %timep1
      set %time2 %time2p1
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer3
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
  }
  ;
  if (%buying == 2) {
    if (%preset.one.type == 1) {
      set %item %itemp2
      set %item.type %item.typep2
      set %item.price %item.pricep2
      set %item.nick %item.nickp2
      set %item.chan %item.chanp2
      set %time %timep2
      set %time2 %time2p2
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer1
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 2) {
      set %item %itemp2
      set %item.type %item.typep2
      set %item.price %item.pricep2
      set %item2 %item2p2
      set %item2.type %item2.typep2
      set %item2.price %item2.pricep2
      set %item.nick %item.nickp2
      set %item.chan %item.chanp2
      set %time %timep2
      set %time2 %time2p2
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer2
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 3) {
      set %item %itemp2
      set %item.type %item.typep2
      set %item.price %item.pricep2
      set %item2 %item2p2
      set %item2.type %item2.typep2
      set %item2.price %item2.pricep2
      set %item3 %item3p2
      set %item3.type %item3.typep2
      set %item3.price %item3.pricep2
      set %item.nick %item.nickp2
      set %item.chan %item.chanp2
      set %time %timep2
      set %time2 %time2p2
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer3
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
  }
  ;
  if (%buying == 3) {
    if (%preset.one.type == 1) {
      set %item %itemp3
      set %item.type %item.typep3
      set %item.price %item.pricep3
      set %item.nick %item.nickp3
      set %item.chan %item.chanp3
      set %time %timep3
      set %time2 %time2p3
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer1
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 2) {
      set %item %itemp3
      set %item.type %item.typep3
      set %item.price %item.pricep3
      set %item2 %item2p3
      set %item2.type %item2.typep3
      set %item2.price %item2.pricep3
      set %item.nick %item.nickp3
      set %item.chan %item.chanp3
      set %time %timep3
      set %time2 %time2p3
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer2
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 3) {
      set %item %itemp3
      set %item.type %item.typep3
      set %item.price %item.pricep3
      set %item2 %item2p3
      set %item2.type %item2.typep3
      set %item2.price %item2.pricep3
      set %item3 %item3p3
      set %item3.type %item3.typep3
      set %item3.price %item3.pricep3
      set %item.nick %item.nickp3
      set %item.chan %item.chanp3
      set %time %timep3
      set %time2 %time2p3
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer3
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
  }
  ;
  if (%buying == 4) {
    if (%preset.one.type == 1) {
      set %item %itemp4
      set %item.type %item.typep4
      set %item.price %item.pricep4
      set %item.nick %item.nickp4
      set %item.chan %item.chanp4
      set %time %timep4
      set %time2 %time2p4
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer1
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 2) {
      set %item %itemp4
      set %item.type %item.typep4
      set %item.price %item.pricep4
      set %item2 %item2p4
      set %item2.type %item2.typep4
      set %item2.price %item2.pricep4
      set %item.nick %item.nickp4
      set %item.chan %item.chanp4
      set %time %timep4
      set %time2 %time2p4
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer2
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 3) {
      set %item %itemp4
      set %item.type %item.typep4
      set %item.price %item.pricep4
      set %item2 %item2p4
      set %item2.type %item2.typep4
      set %item2.price %item2.pricep4
      set %item3 %item3p4
      set %item3.type %item3.typep4
      set %item3.price %item3.pricep4
      set %item.nick %item.nickp4
      set %item.chan %item.chanp4
      set %time %timep4
      set %time2 %time2p4
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer3
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
  }
  ;
  if (%buying == 5) {
    if (%preset.one.type == 1) {
      set %item %itemp5
      set %item.type %item.typep5
      set %item.price %item.pricep5
      set %item.nick %item.nickp5
      set %item.chan %item.chanp5
      set %time %timep5
      set %time2 %time2p5
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer1
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 2) {
      set %item %itemp5
      set %item.type %item.typep5
      set %item.price %item.pricep5
      set %item2 %item2p5
      set %item2.type %item2.typep5
      set %item2.price %item2.pricep5
      set %item.nick %item.nickp5
      set %item.chan %item.chanp5
      set %time %timep5
      set %time2 %time2p5
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer2
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
    if (%preset.one.type == 3) {
      set %item %itemp5
      set %item.type %item.typep5
      set %item.price %item.pricep5
      set %item2 %item2p5
      set %item2.type %item2.typep5
      set %item2.price %item2.pricep5
      set %item3 %item3p5
      set %item3.type %item3.typep5
      set %item3.price %item3.pricep5
      set %item.nick %item.nickp5
      set %item.chan %item.chanp5
      set %time %timep5
      set %time2 %time2p5
      join %item.chan
      timeritem1 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ !
      timeritem1a 01 %time loltimer3
      echo -a Selling started. To stop, type ( /buy stop )
      set %buying on
      halt
    }
  }
  :presets2
  set %buying $$?="What preset number do you want to make? $+ $crlf $+ 1: %preset.one $+ $crlf $+  2: %preset.two $+ $crlf $+ 3: %preset.three $+ $crlf $+ 4: %preset.four $+ $crlf $+ 5: %preset.five $+ $crlf $+ 6: End (Choose none)"
  if (%buying != 1) && (%buying != 2) && (%buying != 3) && (%buying != 4) && (%buying != 5) {
    halt
  }
  if (%buying == 1) {
    set %buying $$?="How many items would you like to buy/sell? (1-3)"
    if (%buying == 1) {
      set %itemp1 $$?="What are you wanting to buy/sell?"
      set %item.typep1 $$?="Are you buying or selling %item $+ ? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep1 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp1 $$?="What nick do you want them to message to buy?"
      set %item.chanp1 $$?="What channel do you want to message?"
      set %timep1 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p1 $calc(%time * 2)
      set %preset.one $$?="What do you want this preset to be named?"
      set %preset.one.type 1
      halt
    }
    if (%buying == 2) {
      set %itemp1 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep1 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep1 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p1 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep1 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep1 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp1 $$?="What nick do you want them to message to buy?"
      set %item.chanp1 $$?="What channel do you want to message?"
      set %timep1 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p1 $calc(%time * 2)
      set %preset.one $$?="What do you want this preset to be named?"
      set %preset.one.type 2
      halt
    }
    if (%buying == 3) {
      set %itemp1 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep1 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep1 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p1 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep1 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep1 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item3p1 $$?="What is the third item you are wanting to buy/sell?"
      set %item3.typep1 $$?="Are you buying or selling this third item? (Please put -ING at the end, and type in CAPS)"
      set %item3.pricep1 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp1 $$?="What nick do you want them to message to buy?"
      set %item.chanp1 $$?="What channel do you want to message?"
      set %timep1 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p1 $calc(%time * 2)
      set %preset.one $$?="What do you want this preset to be named?"
      set %preset.one.type 3
      halt
    }
  }
  if (%buying == 2) {
    set %buying $$?="How many items would you like to buy/sell? (1-3)"
    if (%buying == 1) {
      set %itemp2 $$?="What are you wanting to buy/sell?"
      set %item.typep2 $$?="Are you buying or selling %item $+ ? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep2 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp2 $$?="What nick do you want them to message to buy?"
      set %item.chanp2 $$?="What channel do you want to message?"
      set %timep2 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p2 $calc(%time * 2)
      set %preset.two $$?="What do you want this preset to be named?"
      set %preset.two.type 1
      halt
    }
    if (%buying == 2) {
      set %itemp2 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep2 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep2 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p2 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep2 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep2 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp2 $$?="What nick do you want them to message to buy?"
      set %item.chanp2 $$?="What channel do you want to message?"
      set %timep2 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p2 $calc(%time * 2)
      set %preset.two $$?="What do you want this preset to be named?"
      set %preset.two.type 2
      halt
    }
    if (%buying == 3) {
      set %itemp2 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep2 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep2 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p2 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep2 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep2 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item3p2 $$?="What is the third item you are wanting to buy/sell?"
      set %item3.typep2 $$?="Are you buying or selling this third item? (Please put -ING at the end, and type in CAPS)"
      set %item3.pricep2 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp2 $$?="What nick do you want them to message to buy?"
      set %item.chanp2 $$?="What channel do you want to message?"
      set %timep2 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p2 $calc(%time * 2)
      set %preset.two $$?="What do you want this preset to be named?"
      set %preset.two.type 3
      halt
    }
  }
  if (%buying == 3) {
    set %buying $$?="How many items would you like to buy/sell? (1-3)"
    if (%buying == 1) {
      set %itemp3 $$?="What are you wanting to buy/sell?"
      set %item.typep3 $$?="Are you buying or selling %item $+ ? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep3 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp3 $$?="What nick do you want them to message to buy?"
      set %item.chanp3 $$?="What channel do you want to message?"
      set %timep3 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p3 $calc(%time * 2)
      set %preset.three $$?="What do you want this preset to be named?"
      set %preset.three.type 1
      halt
    }
    if (%buying == 2) {
      set %itemp3 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep3 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep3 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p3 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep3 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep3 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp3 $$?="What nick do you want them to message to buy?"
      set %item.chanp3 $$?="What channel do you want to message?"
      set %timep3 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p3 $calc(%time * 2)
      set %preset.three $$?="What do you want this preset to be named?"
      set %preset.three.type 2
      halt
    }
    if (%buying == 3) {
      set %itemp3 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep3 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep3 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p3 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep3 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep3 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item3p3 $$?="What is the third item you are wanting to buy/sell?"
      set %item3.typep3 $$?="Are you buying or selling this third item? (Please put -ING at the end, and type in CAPS)"
      set %item3.pricep3 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp3 $$?="What nick do you want them to message to buy?"
      set %item.chanp3 $$?="What channel do you want to message?"
      set %timep3 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p3 $calc(%time * 2)
      set %preset.three $$?="What do you want this preset to be named?"
      set %preset.three.type 3
      halt
    }
  }
  if (%buying == 4) {
    set %buying $$?="How many items would you like to buy/sell? (1-3)"
    if (%buying == 1) {
      set %itemp4 $$?="What are you wanting to buy/sell?"
      set %item.typep4 $$?="Are you buying or selling %item $+ ? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep4 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp4 $$?="What nick do you want them to message to buy?"
      set %item.chanp4 $$?="What channel do you want to message?"
      set %timep4 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p4 $calc(%time * 2)
      set %preset.four $$?="What do you want this preset to be named?"
      set %preset.four.type 1
      halt
    }
    if (%buying == 2) {
      set %itemp4 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep4 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep4 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p4 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep4 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep4 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp4 $$?="What nick do you want them to message to buy?"
      set %item.chanp4 $$?="What channel do you want to message?"
      set %timep4 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p4 $calc(%time * 2)
      set %preset.four $$?="What do you want this preset to be named?"
      set %preset.four.type 2
      halt
    }
    if (%buying == 3) {
      set %itemp4 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep4 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep4 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p4 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep4 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep4 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item3p4 $$?="What is the third item you are wanting to buy/sell?"
      set %item3.typep4 $$?="Are you buying or selling this third item? (Please put -ING at the end, and type in CAPS)"
      set %item3.pricep4 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp4 $$?="What nick do you want them to message to buy?"
      set %item.chanp4 $$?="What channel do you want to message?"
      set %timep4 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p4 $calc(%time * 2)
      set %preset.four $$?="What do you want this preset to be named?"
      set %preset.four.type 3
      halt
    }
  }
  if (%buying == 5) {
    set %buying $$?="How many items would you like to buy/sell? (1-3)"
    if (%buying == 1) {
      set %itemp5 $$?="What are you wanting to buy/sell?"
      set %item.typep5 $$?="Are you buying or selling %item $+ ? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep5 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp5 $$?="What nick do you want them to message to buy?"
      set %item.chanp5 $$?="What channel do you want to message?"
      set %timep5 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p5 $calc(%time * 2)
      set %preset.five $$?="What do you want this preset to be named?"
      set %preset.five.type 1
      halt
    }
    if (%buying == 2) {
      set %itemp5 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep5 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep5 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p5 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep5 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep5 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp5 $$?="What nick do you want them to message to buy?"
      set %item.chanp5 $$?="What channel do you want to message?"
      set %timep5 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p5 $calc(%time * 2)
      set %preset.five $$?="What do you want this preset to be named?"
      set %preset.five.type 2
      halt
    }
    if (%buying == 3) {
      set %itemp5 $$?="What is the first item you are wanting to buy/sell?"
      set %item.typep5 $$?="Are you buying or selling this first item? (Please put -ING at the end, and type in CAPS)"
      set %item.pricep5 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item2p5 $$?="What is the second item you are wanting to buy/sell?"
      set %item2.typep5 $$?="Are you buying or selling this second item? (Please put -ING at the end, and type in CAPS)"
      set %item2.pricep5 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item3p5 $$?="What is the third item you are wanting to buy/sell?"
      set %item3.typep5 $$?="Are you buying or selling this third item? (Please put -ING at the end, and type in CAPS)"
      set %item3.pricep5 $$?="What price do you want for it? (Say offer for offer price.)"
      set %item.nickp5 $$?="What nick do you want them to message to buy?"
      set %item.chanp5 $$?="What channel do you want to message?"
      set %timep5 $$?="How many seconds do you want to be inbetween messages? (Default 25)"
      set %time2p5 $calc(%time * 2)
      set %preset.five $$?="What do you want this preset to be named?"
      set %preset.five.type 3
      halt
    }
  }
}
alias loltimer1 {
  timeritem1b 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price $+ . Message %item.nick $+ .
}
alias loltimer2 {
  timeritem2b 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price $+ . Message %item.nick $+ .
}
alias loltimer3 {
  timeritem3b 00 %time2 msg %item.chan .[ $+ %item.type $+ ]. %item [PRICE] %item.price .[ $+ %item2.type $+ ]. %item2 [PRICE] %item2.price .[ $+ %item3.type $+ ]. %item3 [PRICE] %item3.price $+ . Message %item.nick $+ .
}
on *:load:{
  if (%load.item2 == Yes) {
    set %load.item $?!="This script has already been loaded once or more before. Load again?"
  }
  if (%load.item2 == $null) || (%load.item == $true) {
    set %load.item $true
    set %load.item2 Yes
    unset %preset*
    timeritem* off
    unset %item*
    unset %buying
    unset %time*
    echo -a Buying Script Loaded. Type /buy and it will take you through everything.
    halt
  }
}