on *:load: {
.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: Paste Delay $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 17/10/2016 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Thank you for using this Addon,igo,Addon: Paste Delay $chr(40) $+ v5.4 $+ $chr(41))
.echo -s _____________________________________________________
.echo -s 0,1 Loading 9,1Paste Delay0,1 Add-On...
.echo -s 0,1 You are running mIRC $version on Windows $+ $os
.echo -s ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: {
.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: Paste Delay $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 17/10/2016 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: Paste Delay $chr(40) $+ v5.4 $+ $chr(41))
}
;############################ -«•»SaNCaK ScripT«•»- ############################
on *:INPUT:#:{
if ($left($1,1) != /) {
haltdef
var %lines = $1-
if (%lines == $null) { %lines }
if (!$window(@Pastedelay)) { window -lh @Pastedelay }
if (($target ischan) && (c isincs $gettok($chan($active).mode,1,32))) {
%lines = $strip(%lines,c)
}
if ($window(@Pastedelay)) { aline @Pastedelay %lines }
.timerpastedelay 1 0 start.pastedelay
halt
if ($me isop #) { .msg # $1- | echo -tm $chan 02(@01 $+ $me $+ 02)01 $1- | haltdef }
if ($me ishop #) { .msg # $1- | echo -tm $chan 02(%01 $+ $me $+ 02)01 $1- | haltdef }
if ($me isvoice #) { .msg # $1- | echo -tm $chan 02(+01 $+ $me $+ 02)01 $1- | haltdef }
if ($me isreg #) { .msg # $1- | echo -tm $chan 02(01 $+ $me $+ 02)01 $1- | haltdef }
if ($inpaste) && ($istok(channel query chat,$window($active).type,32)) {
}
}
}
alias -l start.pastedelay {
var %PDWindow = @Pastedelay, %pastedelay
if (($line(%PDWindow,0) > 3) && (!$$input(Paste $line(%PDWindow,0) lines to $active $+ ? $crlf $pdpreview,iyw,Confirm Paste Delay))) {
var %play = $$input(Play $line(%PDWindow,0) lines to $active $+ ? $crlf $pdpreview,iyw,Confirm Playback text))
$iif((%play),!.play -b $active 3000)
window -c @Pastedelay
return
}
pastedelay $active 1 %pastedelay
}
alias -l pdpreview {
return $crlf $line(@Pastedelay,1) $crlf $line(@Pastedelay,2) $crlf $line(@Pastedelay,3) $crlf $line(@Pastedelay,4)
}