; **********************
; CSP by Smc_S
; **********************
;
;######### DDE related stuff v1.2 ##########
;############# Remote script ###############
on 1:LOAD:{
/load -a scripts/customdde.mrc
/set %ddeservname alienDDE
/set %ddewinyn on
/set %saydde off
/set %reactdde on
/set %ddertext !song
/set %mp3sendyn on
/set %mp3sendtrig !sendsong
/echo DDEwindow script loaded
}
on *:START:{
/ddeserver on %ddeservname
/ddewin
}
on 1:TEXT:%mp3sendtrig:#:{
if %mp3sendyn == on {
if %wanow != nothing {
var %file = $nopath(%wafile)
var %check = $readini(ini\songs.ini,%file,$nick)
if (%check != true) {
/writeini -n ini\songs.ini " $+ %file $+ " $nick true
/dcc send $nick %wafile
;/msg $chan There is currently a problem with DCC file transfers! Sorry :(
/timer -o 1 60 /writeini -n ini\songs.ini " $+ %file $+ " $nick false
}
}
}
}
on 1:TEXT:%ddertext:#:{
if %reactdde == on {
/msg $chan I'm now listening to %wanow ( %watime ) $ismp3send
}
}
on 1:TEXT:!list:#:{
if %reactdde == on {
if %wanow != nothing {
/notice $nick Type %ddertext to see what I'm currently playing in Winamp
}
}
}
on 1:KEYDOWN:@DDE.Input:90,88,67,86,66:{
if ($keychar == z) /dde winamp_c prev
if ($keychar == x) /dde winamp_c play
if ($keychar == c) /dde winamp_c pause
if ($keychar == v) /dde winamp_c stop
if ($keychar == b) /dde winamp_c next
}
menu status {
-
DDE Window
.$enabledy(%ddewinyn) Enable:/ddewinon
.$enabledn(%ddewinyn) Disable:/ddewinoff
.-
.Rename Server:/dderename
}