All pastes #154884 Raw Edit

MarketScriptV2.1

public text v1 · immutable
#154884 ·published 2006-08-30 17:55 UTC
rendered paste body
;???????????????????????????????????????????????????????????????????
;??                                                               ??
;?? RuneScape mIRC MarketScript © Bounce vers. 2.1                ??
;?? /msg BOUNCE ON IRC.SWIFTIRC.NET FOR PERMISSION BEFORE USING   ??
;?? SCRIPT FOR PERSONAL USE ONLY!                                 ??
;??                                                               ??
;?? Edit at own risk.                                             ??
;?? Questions can be sent to Bounce on irc.swiftirc.net           ??
;??                                                               ??
;??~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~/~??
;??                                                               ??
;?? Bugfixes Vers. 2.1 - 30-Aug.-2006                             ??
;?? ~ Various incorrect variables fixed                           ??
;?? ~ New variables not letting an item being sold/bought twice   ??
;??                                                               ??
;???????????????????????????????????????????????????????????????????
;~~~~~
;Remote
;~~~~~

;General info / beginner info

on *:TEXT:!Start:#: {
  notice $nick 5..::MarketScript © Bounce vers. 2.1::..
  notice $nick 5To sell an item, type: 4!Sell Item
  notice $nick 5To buy an item, type: 4!Buy Item
  notice $nick 5-
  notice $nick 5To trigger the message last put for sale, type: 4!LastSell
  notice $nick 5To trigger the message last searched, type: 4!LastBuy
  notice $nick 5When an item is sold or searched, follow the instructions of the 2nd message.
  notice $nick 5-
  notice $nick 5PM All your questions, suggestions & bugs to 4Bounce 5on irc.SwiftIrc.net.
  notice $nick 5Also, PM 4Bounce 5for recent versions.
}

; Commands

on *:TEXT:!marketcommands:#: {
  notice $nick 4..::Market Commands::..
  notice $nick !Sell
  notice $nick !Sold
  notice $nick !Buy
  notice $nick !Bought
  notice $nick 7-
  notice $nick !LastSell (Triggers last !Sell)
  notice $nick !LastSold (Triggers last !Sold)
  notice $nick !LastBuy (Triggers last !Buy)
  notice $nick !LastBought (Triggers last !Bought)
  notice $nick 7-
  notice $nick !Yes (For use with !LastX commands)
  notice $nick !No (For use with !LastX commands)
  notice $nick 7-
  notice $nick !DealBuy (To buy item sold with !Sell command)
  notice $nick !YesBuy (For use with !Dealbuy command)
  notice $nick 7-
  notice $nick !DealSell (To sell searched item with !Buy command)
  notice $nick !YesSell (For use with !DealSell command)
  notice $nick 7-
  notice $nick !ClearMarket (Clears all market variables)
}

; Marketcommands

on *:TEXT:!sell*:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %sell $2-
    set %sellnick $nick
    msg $chan 15»14» || 14Selling:1 %sell 14::1 $nick 14|| «15«
    msg $chan 15»14» || 14Type: 1!DealBuy 14to buy this item. || «15«
  }
}

on *:TEXT:!sold*:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %sold $2-
    set %soldnick $nick
    msg $chan 15»14» || 14Sold:1 %sold 14|| «15«
  }
}

on *:TEXT:!buy*:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %buy $2-
    set %buynick $nick
    msg $chan 15»14» || 14Buying:1 %buy 14::1 $nick 14|| «15«
    msg $chan 15»14» || 14Type: 1!DealSell 14to sell this item. || «15«
  }
}

on *:TEXT:!bought*:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %bought $2-
    set %boughtnick $nick
    msg $chan 15»14» || 14Bought:1 %bought 14|| «15«
  }
}

on *:TEXT:!lastsell:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %question 15»14» || 14Last recorded item for sale - Selling:1 %sell 14::1 %sellnick 14|| «15«
    notice $nick 15»14» || 14Last recorded item for sale - Selling:1 %sell 14::1 %sellnick 14|| «15«
    notice $nick 15»14» || 14Buy this item? Type:1!DealBuy 14or 1!No 14|| «15«
  }
}

on *:TEXT:!lastsold:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %question 15»14» || 14Last recorded item sold - Sold:1 %sold 14::1 %soldnick 14|| «15«
    notice $nick 15»14» || 14Last recorded item sold - Sold:1 %sold 14::1 %soldnick 14|| «15«
    notice $nick 15»14» || 14Send this message to $chan ?:14 Type 1!Yes 14or 1!No 14|| «15«
  }
}

on *:TEXT:!lastbuy:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %question 15»14» || 14Last recorded searched item - Buying:1 %buy 14::1 %buynick 14|| «15«
    notice $nick 15»14» || 14Last recorded searched item - Buying:1 %buy 14::1 %buynick 14|| «15«
    notice $nick 15»14» || 14Sell this item? Type:1!DealSell 14or 1!No 14|| «15«
  }
}

on *:TEXT:!lastbought:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %question 15»14» || 14Last recorded bought item - Bought:1 %bought 14::1 %boughtnick 14|| «15«
    notice $nick 15»14» || 14Last recorded item bought - Bought:1 %bought 14::1 %boughtnick 14|| «15«
    notice $nick 15»14» || 14Send this message to $chan ?:14 Type 1!Yes 14or 1!No 14|| «15«
  }
}

; General Commands

on *:TEXT:!yes:#: { if ($nick isop $chan || $nick ishop $chan) {
    notice $nick 15»14» || 1 Agreed 14|| «15«
    msg $chan %question
  }
}

on *:TEXT:!no:#: {
  notice $nick 15»14» || 1 Declined 14|| «15«
}

; DealBuy command
; YesBuy command
; DealSell command
; YesSell command

on *:TEXT:!DealBuy:#: {
  set %dealsell %sell
  notice $nick 15»14» || 14Really buy this item?:1 %dealsell 14::1 %sellnick 14|| «15«
  notice $nick 15»14» || 14Agree? Type: 1!YesBuy 14or 1!No 14|| «15«
  set %DealBuyHalt 0
}

on *:TEXT:!YesBuy:#: { if (%DealSellHalt == 1) { halt } else {
    msg $chan 15»14» || 14BOUGHT:1 %dealsell 14:: 1By $nick 14|| «15«
    notice $nick 15»14» || 14PM:1 %sellnick 14ingame to buy your item:1 %dealsell 14|| «15«
    notice %sellnick 15»14» || 14PM:1 $nick 14ingame to sell your item:1 %dealsell 14|| «15«
    set %dealsell
    set %sellnick
    set %DealBuyHalt 1
  }
}

on *:TEXT:!DealSell:#: {
  set %dealbuy %buy
  notice $nick 15»14» || 14Really sell this item?:1 %dealbuy 14::1 %buynick 14|| «15«
  notice $nick 15»14» || 14Agree? Type: 1!YesSell 14or 1!No 14|| «15«
  set %DealSellHalt 0
}

on *:TEXT:!YesSell:#: { if (%DealSellHalt == 1) { halt } else {
    msg $chan 15»14» || 14SOLD:1 %dealbuy 14:: 1By $nick 14|| «15«
    notice $nick 15»14» || 14PM:1 %buynick 14ingame to buy your item:1 %dealbuy 14|| «15«
    notice %buynick 15»14» || 14PM:1 $nick 14ingame to sell your item:1 %dealbuy 14|| «15«
    set %dealbuy
    set %buynick
    set %DealSellHalt 1
  }
}

; ClearMarket command

on *:TEXT:!clearmarket:#: { if ($nick isop $chan || $nick ishop $chan) {
    set %sell
    set %sellnick
    set %sold
    set %soldnick
    set %buy
    set %buynick
    set %bought
    set %boughtnick
    set %dealsell
    set %dealsellnick
    set %dealbuy
    set %dealbuynick
    set %question
    set %DealBuyHalt 1
    set %DealSellHalt 1
    msg $chan 4M7arket Cleared.
  }
}

;~~~~~
;Variables
;~~~~~
;
;%sell
;%sellnick
;%sold
;%soldnick
;
;%buy
;%buynick
;%bought
;%boughtnick
;
;%dealsell
;%dealsellnick
;%dealbuy
;%dealbuynick
;
;%question
;
;%DealSellHalt 1
;%DealSellHalt 1
;
;???????????????????????????????????????????????????????????????????
;??                                                               ??
;?? RuneScape mIRC MarketScript © Bounce vers. 2.1                ??
;?? /msg BOUNCE ON IRC.SWIFTIRC.NET FOR PERMISSION BEFORE USING   ??
;?? SCRIPT FOR PERSONAL USE ONLY!                                 ??
;??                                                               ??
;???????????????????????????????????????????????????????????????????