Guest User

Untitled

a guest
Jul 19th, 2018
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.63 KB | None | 0 0
  1. on *:TEXT:!auction*:#test: {
  2. if ($2 == $null) { .notice $nick Error }
  3. elseif ($2 == add) {
  4. if ($3 == $null) { .notice $nick Please Mention The Special Nature Of Your Pokemon! }
  5. elseif ($4 == $null) { .notice $nick Please Enter A Pokemon To place in the Auction! }
  6. elseif ($5 == $nul) { .notice $nick Please Enter A Minimum Base Price For The Plaaced Pokemon for Auction! }
  7. else {
  8. if ($read(data/pokemon.bx, w, $4)) && ($read(data/specials.bx, w, $3)) {
  9. .inc %id
  10. .writeini -n data/auction.bx $nick Pokemon $4
  11. .writeini -n data/auction.bx $nick Nature $3
  12. .writeini -n data/auction.bx $nick Base $5
  13. .writeini -n data/auction.bx $nick id %id
  14. .write data/auction_list.bx %id $+ - $4 By $nick
  15. .set %bid_id $readini(data/auction.bx, $nick, id)
  16. .msg $chan [Auction] $nick Placed $3 In The Auction List With ID: %bid_id To Place a Bid Please Type !bid %bid_id <Amount>
  17. .unset %bid_id
  18. }
  19. else { .notice $nick Error: Something Has Gone Wrong In The Format }
  20. }
  21. }
  22. elseif ($2 == del) {
  23. .set %del $readini(data/auction.bx, $nick, Pokemon)
  24. if (%del == $3) {
  25. .dec %id
  26. .unset %del
  27. .remini data/auction.bx $nick
  28. .msg $chan [Auction] $nick Pulled Back His Pokemon, $3 From The Auction
  29. .set %temp_id $readini(data/auction.bx, $nick, id)
  30. .write -dl $+ %temp_id data/auction_list.bx
  31. .unset %temp_id
  32.  
  33. }
  34. else {
  35. .notice $nick You Have Not Put $4 In The Auction!
  36. .unset %del
  37. }
  38. }
  39.  
  40. elseif ($2 == list) { .play $chan data/auction_list.bx }
  41. }
Add Comment
Please, Sign In to add comment