Wallops

By blackvenomm666 on May 17, 2011

Image
This is my version of a wallops bar. I really don't like them docked so i did an @window instead just load into a new remotes and you can either A restart mirc it will open when mirc starts or B. right click in a channel query status or nicklist and go to wallops and it will open it. after that just wait. can right click in the wallops window to either A. clear the window or B. close it

Menu nicklist,channel,query,status {
  .wallops: { wallops }
}
on *:WALLOPS:*:{ 
  if $window(@wallops) { 
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) 12,4 WALLOPS 4,1 $strip($1-)
  }
  haltdef
}
on *:SNOTICE:*:{
  if $window(@wallops) {
    aline -pd @wallops 12,1 $server  7,1 $time(ddd h:nn:ss::tt)  12,4 SNOTICE  4,1 $strip($1-)
  }
  haltdef
}

on *:NICK: {
  if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) 12,4 NickChange 4,1 $nick is now known as $newnick
  }
  haltdef
}
raw 381:*:{
  if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt)  12,4 OPER 4,1 $strip($2-)
  }
  haltdef
}
on *:ctcpreply:*: { if $window(@wallops) {
    aline -pd @wallops 7,1 CTCP Reply $time(ddd h:nn:ss::tt) 4,1 from 12,1 $nick 4,1 $1-
  }
}
on ^*:NOTICE:*:*: {
  if (%noticeblocker == off) {
    if $window(@wallops)  {
      aline -pd @wallops 12,1 $server  7,1 $time(ddd h:nn:ss::tt)  12,4 NOTICE from 12,1 $nick 4,1 $strip($1-)
    }
    haltdef
  }
}
raw 311 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3 4,1 $4
  }
  haltdef
}
raw 319 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3- 
  }
  haltdef
}
raw 312 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3- 
  }
  haltdef
}
raw 317 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $6 $duration($3) : $7- $time($4, ddd h:nn:ss::tt) 
  }
  haltdef
}
raw 313 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3- 
  }
  haltdef
}
raw 379 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3- 
  }
  haltdef
}
raw 310 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3- 
  }
  haltdef
}
raw 378 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 4,1 $2 12,1 $3- 
  }
  haltdef
}
raw 318 ^:*: { if $window(@wallops) {
  }
  haltdef
}
raw 320 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 12,1 $2 is a $3- 
  }
  haltdef
}
raw 307 ^:*: { if $window(@wallops) {
    aline -pd @wallops 12,1 $server 7,1 Whois $time(ddd h:nn:ss::tt) 12,1 $2- 
  }
  haltdef
}
on *:DISCONNECT: { if $window(@wallops) {
    if ($nick == $me) {
      aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) 4,15you 12,4Disconnected from $server 4,1 $1-
    }
  }
}
on *:ERROR:*Closing Link*: { if $window(@wallops) {
    if (banned isin $1-) { aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) 12,4 banned 4,1 $me 12,1 $1-
    }
    else {
      aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) 12,4 ERROR 4,1 $me 12,1 $1-
    }
  }
}

on *:quit: { if $window(@wallops) {

    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) 12,4 quit 4,1 $nick just quit 12,1 $1-
  }
}
on *:RAWMODE:#:{
  if $window(@wallops) && (+o isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (-o isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (+q isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (-q isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (+a isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (-a isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (+h isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (-h isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (+v isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
  if $window(@wallops) && (-v isin $1) {
    aline -pd @wallops 12,1 $server 7,1 $time(ddd h:nn:ss::tt) $chan  4,1 $nick sets $1-
  }
}
on *:start:{
  wallops
}
alias wallops {
  window -Ckbz @wallops 10 10 900 130 $mircexe
  %x $dll(dmu.dll,ChangeIcon,@wallops > $mircdir/venompics/untitled.ico) 
  aline -pd @wallops 7,1 $time(ddd h:nn:ss::tt) 3,1 Start Up  4,1 Welcome To Venom Irc
  aline -pd @wallops  7,1 $time(ddd h:nn:ss::tt) 3,1Start Up  4,1 You are on mIRC Verison $version
  aline -pd @wallops  7,1 $time(ddd h:nn:ss::tt) 3,1 Start Up  4,1 This Wallops was coded by V3nom aka Ryan
}
menu @wallops {
  .commands
  ..clear:clear
  ..exit:{
    close -@
  }
}

Comments

Sign in to comment.
blackvenomm666   -  Mar 31, 2012

you can dock this easily using mdx or dcx.

 Respond  
BigSteve   -  Mar 29, 2012

you cant dock this one not easily there are docked ones out there but you need MDX or DCX (DCX is soo much better and there is a code for one out there) just search Wallops and you should find quite a few.

 Respond  
PockyMMMM   -  Mar 29, 2012

ok so if i want it docked how can i change that?

 Respond  
blackvenomm666   -  Jun 10, 2011

:)

 Respond  
BigSteve   -  May 20, 2011

nah you think >.<

 Respond  
D34th   -  May 20, 2011

Was just givin ya a hard time steve >.<

 Respond  
BigSteve   -  May 20, 2011

D34th never said I made it lol just said I prefer My dcx wallops lol never said I coded it (but for all who care) D34th coded the base and I changed Mine

 Respond  
blackvenomm666   -  May 19, 2011

haha yea i guess

 Respond  
napa182   -  May 19, 2011

nice to see you do something else besides dialogs =P

 Respond  
blackvenomm666   -  May 19, 2011

ty

 Respond  
D34th   -  May 19, 2011

Also nice work Ryan

 Respond  
D34th   -  May 19, 2011

BigSteve
I prefer mine docked nice one Ryan although I dont really like the @window wallops I like My dcx walops :3

don't forget who made it lol ;P

 Respond  
blackvenomm666   -  May 19, 2011

O_O. i likes the different colors haha. it actually makes it easier for me to keep track of stuff thats going on in it instead of having it all one color. And the colors are easily changed/removed anyway. if people dont like em they can change or remove em

 Respond  
dsabecky   -  May 19, 2011

It's a nice idea, but you should really tone down the whole coloring everything as it adds a tacky factor. Other than that it looks like a solid snippet. :)

 Respond  
irchainscriptz   -  May 18, 2011

ahhh ok k00l

 Respond  
blackvenomm666   -  May 18, 2011

well some yes. but i use them as rarely as possible in venom irc im using 3 dll's one for color of dialogs one to dock a dialog and one to change icons on the channel/query/nicklist window's other than that im not using any dll's

 Respond  
irchainscriptz   -  May 18, 2011

I hear ya there blackvenomm666 but in some cases we need DLL's

 Respond  
BigSteve   -  May 18, 2011

DLL's ftw :p

 Respond  
blackvenomm666   -  May 18, 2011

<<<<dislikes dll's and uses em as little as possible haha. if i can do it without a dll i'll do it without a dll.

 Respond  
BigSteve   -  May 18, 2011

I prefer mine docked nice one Ryan although I dont really like the @window wallops I like My dcx walops :3

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.