PtokaX forum

I desided to make my own winamp.

Please read the inctructions in the begning

Damm.. it's to long for the board... ;p

Here we go... =)

WinampScript (http://destruction.myftp.org/Lua/Lua5/WinampScript.lua)

Please take my name off of that.

-NotRabidWombat

hmm.... done....

Hi madman... can you made this script for Windows Media Player? Thanks

QuoteOriginally posted by 6Marilyn6Manson6
Hi madman... can you made this script for Windows Media Player? Thanks

No... since clever is for winamp only...
it can be done but then we must have a program that can change stuff in winamp media player by command line... and i doubt that microsoft has support for changing things in there media player thru a dos promt...

sorry...

QuoteOriginally posted by madman

QuoteOriginally posted by 6Marilyn6Manson6
Hi madman... can you made this script for Windows Media Player? Thanks

No... since clever is for winamp only...
it can be done but then we must have a program that can change stuff in winamp media player by command line... and i doubt that microsoft has support for changing things in there media player thru a dos promt...

sorry...

No problem madman.. thanks a lot for your reply  :)

Hi Madman.
You Said that you've to config Clever firts, but, config what?
I cant see nothing!

Thanks

Run the clever.exe file, it should popup a cmd window and tell u to type the direcectory to winamp.
if not, go to c:\CLEVER and delete clever.cfg adn run the exe file agin...

Is the link dead or is it me?

must be you...

try this one --> PtokaX Script Database (http://ptxscriptdb.psycho-chihuahua.net/download.php?view.76)

Hi Guys.

Showld this sctipr work with earlier versions of Winamp?


Thanks

I'm useing it on 2.91... =) Also tested some on 5.x

Well... i'm using Win 2003 Build 3790, PtokaX0.3.3.1 and Winamp 5.08c and clever seems to not work very well as when entering "clever.exe songtitle" returns diff. outputs ... none stating the full title name just parts of it :(
Maybe i'm doing' smth wrong here ...

Ohh ...well, i disabled in Winamp's 'General Preferences' the "Scroll title in teh Windows taskbar" option and now it works properly.....

Nice one madman, but i made a minor change.

Since there are user who also have a moderator/netfounder. That one is unable to load the winamp song.

SendComm = 1      -- Send user command [right click] "1"=yes "0"=no

SetTo = {
 

• = 1,   -- Masters
[1] = 1,   -- Operators
 [2] = 1,   -- Vips
 [3] = 1,   -- Regs
 [4] = 1,   -- Moderator
 [5] = 1,   -- NetFounder
 [-1] = 0,  -- Users
}

WinampProfile = {
 
• = 1,   -- Masters
[1] = 0,   -- Operators
 [2] = 0,   -- Vips
 [3] = 0,   -- Regs
 [4] = 1,   -- Moderator
 [5] = 1,   -- NetFounder
[-1] = 0,   -- Users(unregged)
}

function NewUserConnected(user)
   if SendComm == 1 and SetTo[user.iProfile] == 1 then
      user:SendData("$UserCommand 1 3 ?W?n?m??\\Command $<%[mynick]> !cmd||")
      user:SendData("$UserCommand 1 3 ?W?n?m??\\Status on winamp $<%[mynick]> !w.status||")
      user:SendData("$UserCommand 1 3 ?W?n?m??\\Show current playing song $<%[mynick]> !w.song||")
      user:SendData("$UserCommand 1 3 ?W?n?m??\\Show pretty info about song $<%[mynick]> !w.pretty||")
      user:SendData("$UserCommand 1 3 ?W?n?m??\\Get track nr $<%[mynick]> !w.tracknr|")
      if WinampProfile[user.iProfile] == 1 then
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Play (track) $<%[mynick]> !w.play %[line: Tracknr (Optional)]||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Pause song $<%[mynick]> !w.pause||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Stops song $<%[mynick]> !w.stop||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Previous song $<%[mynick]> !w.prev||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Next song $<%[mynick]> !w.next||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Set vol $<%[mynick]> !w.vol %[line: number 0-255]||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Get playlist $<%[mynick]> !w.playlist||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Clear the playlist $<%[mynick]> !w.clear||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Make the playlist $<%[mynick]> !w.makepl||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Reload playlist $<%[mynick]> !w.reload||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Toggle shuffle $<%[mynick]> !w.shuffle||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Toggle Repeat $<%[mynick]> !w.repeat||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Check shuffle mode $<%[mynick]> !w.getshuffle||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Check repeat mode $<%[mynick]> !w.getrepeat||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Start winamp $<%[mynick]> !w.start||")
         user:SendData("$UserCommand 1 3 ?W?n?m??\\Close winamp $<%[mynick]> !w.close||")
      end
   end
end

Can anyone tell me exactly how and what this script acutally does bcuz ive got an rough idea but not very sure thanks in advance :))

Sure.. it's simple...
The script allows you to control winamp on the hub pc.
You can pause, jump 2 next track, previous track, show current playing song and so on...

so would i hav to use the Shoutcast software also? well i would have to wudnt i?

Nope.... Winamp and Clever is enough....

Lol ive tried to make it work any give me step by step guide on how 2 do this? u can just pm me if thats ok wid you :]

Sure...

1) Install winamp
2) Install Clever
3) Go to where you installed Clever
4) Open a new explorer window
5) Go to C:\
5.1) Create a folder called CLEVER on C:
6) Open C:\CLEVER
7) Switch back to the other explorer window
8) Run Clever.exe
9) Type the path to Winamp (For me D:\Program\Winamp)
10) Type 0 or 1, i choose 0
11) Open the script, find the Setup table
12) change ["Clever"] = "The path 2 where you installed clever",
12.1) Do the same with ["Music"] = "Where you have the Mp3s",
13) Rember that you have to type 2 \ in the text above..
if it's C:\Program\Clever\  then type C:\\Program\\Clever\\
Same goes for Music
14) make sure that Winamp and Script are started...
15) Done....

Now you can reconnect to the hub and you should have a menu called WinampScript   If you dont change that as well ;)

Thanks alot Madman, if i need any help ill come back to you if you dont mynd  :))  btw does it matter where the music is does it have to be in tha same clever folder? or any and just put the path to it?

The music can be in any folder.. as long as it's on the same compuer...

trying to make this bot show who used the command !w.play

want it to be something like this
Playing... track nr: 379  Requested by: USERNAME
and of course i want everyone to see this in MC

i thought it would be something like this:

Code Select Expand

SendToAll(Setup.Name, "Playing... track nr: " ..nr .."  Requested by: " ..curUser() )

but that didnt work (if it did i wouldnt post here) ;)
*EDIT* fixed the problem above using curUser.sName *EDIT*

one more thing if possible it would be nice to make the bot send a "pretty" on a selected time like every hour or so but only if status is playing :P

can someone help me? i'm new at coding lua so i really want to learn some more ;)

QuoteOriginally posted by deus
one more thing if possible it would be nice to make the bot send a "pretty" on a selected time like every hour or so but only if status is playing :P

can someone help me? i'm new at coding lua so i really want to learn some more ;)

Yes.. The bold lines are the ones added...

Setup = {
["Clever"] = "D:\\Program\\clever\\", -- Where did you install Clever
["Music"] = "D:\\ServerMusic\\", -- And where do you have you Mp3 files?
["Name"] = "WinampScript", --The bots name
-- Outcome of standard Playing ][ title ][
["BeforeTitle"] = "Playing ][",
["AfterTitle"] = "][",
["Menu"] = "WinampScript"[b], -- Notice the , !
["Time"] = 1,[/b]
}
function Main()
frmHub:RegBot(Setup.Name)
[b]SetTimer(1000*60*60*Setup.Time)
StartTimer()[/b]
end
[b]function OnTimer()
os.execute(Setup.Clever.. "clever.exe status > winamp.tmp")
local file = io.open("winamp.tmp")
local status = file:read("*all") file:close() os.remove("winamp.tmp")
if status == "Pause" or status == "Stop" then
else
os.execute(Setup.Clever.. "clever.exe prettyinfo > winamp.tmp")
local file = io.open("winamp.tmp")
local info = file:read("*all") file:close() os.remove("winamp.tmp")
SendToAll(Setup.Name, "\r\n" ..info) return 1
end
end[/b]

Thought it was better 2 copy that... then try to instrut u to do that....

The script in the link has NOT been updated...

thanx... that works perfectly but i changed the status == "Paus" line to status == "Play" since i dont really need to know if its paused just if its playing ;)
and of course fixed the if and else's (i have programmed other languages) hehe
but a big thanks for the help...

btw... how come i only get about 1400 of my 1550 mp3s in the playlist? i've checked so every file has been "verified" by winamp (shows the track length)

QuoteOriginally posted by deus
thanx... that works perfectly but i changed the status == "Paus" line to status == "Play" since i dont really need to know if its paused just if its playing ;)
and of course fixed the if and else's (i have programmed other languages) hehe
but a big thanks for the help...

the status == "Pause" linme check it's paused or stoped... if so.. do nothing.. else do pretty info...

QuoteOriginally posted by deus
btw... how come i only get about 1400 of my 1550 mp3s in the playlist? i've checked so every file has been "verified" by winamp (shows the track length)

Good question... i'll check.. just gonna read the forum...

*Edit*
Okey... checked it out... it seams that it only takes a-z and 0-9... so any ? ? ? or some oether signs probarly wont be read..
Amd it for some reason.... some of the id3v2 tags on some songs make them not to get extracted with clever...

i added 1660 song.. but only got 1657... so i started compering the list...
first i did
100 - 100 Same song? yes
200 - 200 Same song? no
Then i check 150 - 150.. same song yes
then 160.. yes 170, 180 yes.. but 190 no..
So i found 3 songs between 180 and 190 that wasent in the dc play list (pasted in notepad)....
and it was standard text.... so i unchecked the id3v2 tag...
dont use it anyway... and then i got 1660 in the dc playlist...

*Edit *
Hehe... dont work 2 late...;p
remove this line 4 in OnTimer
curUser:SendData(Setup.Name, "Winamp is " ..status.. "ed") return 1

Great script Madman. Love it!

hi

a little silly question how can users lisen to the songs ? should they connect trough winamp to the hub adress or something ?

hope you understand me  :rolleyes:


cheers

Usually they click this link:

hostname-of-shoutcast-server.yourdomain.org:port

port is 8000 by default as far as I can recall.

oki tnx  :D

cheers

ive set up everthing as said and have got it to work...

the problem i can tseem to sort out is lan config :(

I got all the script etc setup  + shoutcast broadcast plugin on same comp (eg.192.168.X.X) as hub. all working fine ..

But i need the broadcast from winamp to reach my shoutcast server (192.168.X.X)which is on other comp on lan . I want it set his way because of cpu usage.

Anyway i have opened ports in router  as well as local win firewall  with exceptions and everthing still no sucess.. any suggestions ???

comps are networked thru router which is also modem !!

THIs SCRIPT IS AWESOME :)

QuoteOriginally posted by jaggudada
ive set up everthing as said and have got it to work...

the problem i can tseem to sort out is lan config :(

I got all the script etc setup  + shoutcast broadcast plugin on same comp (eg.192.168.X.X) as hub. all working fine ..

But i need the broadcast from winamp to reach my shoutcast server (192.168.X.X)which is on other comp on lan . I want it set his way because of cpu usage.

You need to enable portforward to the 8000 port of your SC server box. Also, I am afraid this won't work with the server on another machine.

Oh, and DISABLE windows firewall.

Note that this is a WinamScript, so it Does not support Shoutcast...  if i rember correct there is a ShoutChast script.. dont kno if it's lua5 yet tho...
And yes... the script can ONLY get songs if wiamp is run on local machine...

QuoteOriginally posted by madman
Note that this is a WinamScript, so it Does not support Shoutcast...  if i rember correct there is a ShoutChast script.. dont kno if it's lua5 yet tho...
And yes... the script can ONLY get songs if wiamp is run on local machine...

Oh, this only gets the playlist then? I mixed something up then. Anyway, I gave some basic help related to SC.

thanks bastya and mad man awesome script.. checked settings again..  and found out it was my second firewall blocking it  so had to maually configure  the port settings again in second firewall.. I had already set it up in xp. to let in the broadcast for winamp.


Yeh what i did was install all the scripts  winamp etc on comp with hub as said..but had winamp withe the shoutcast  broadcast plugin setup in winamp. so what winamp is doing is sending the songs to my other comp on lan(which has shoutcast server)... But it was not reaching the other comp on lan due to 2nd firewall..which is fixed now.. i didnt want the shoutcast server  to be on same comp as load on cpu.

 so effectively  now first comp is doing all the main jobs and second comp is with  shoutcast server  allowing people to connect on  to stream on second comp

It does seem to work... but  listeners do get error syncing probs  now and then..even tho its  just a few users and  the speed is good

could it be because its routed thru lan etc ??

ps:thanks tazzie those mods u gave too were quite nice..i did took off a few unwanted commands tho..likeshuffle toggle etc..dont want too many  people pressing too many buttons..hehe
do come and check it out at

bollywood.no-ip.org
cheers

Correct me if I?m wrong here...

Is it the possibility for a user to connect to the hub to play, and  listening to the music/mp3's playing on the hubcomputer?
If it is like this, we don?t get it to work..
Yes, we can start Winamp from the users client, play, pause & stop it..etc. But not a tone from the speakers  ?(

Or have I missunderstood the hole idea with the Winampscript...  :baby:

The idea with the script is to show what you are playing on your server.

I made it beacuse i had my winamp running on the hub server, and there for i couldnt do the  /w thing as everybody else.... so i made this script in stead.. the script gives you complete control over the winamp on the hub server. Unless you install Shotcast nobody eccept you will be able to hear what your winamp plays....
The idea for this script is to simply to replace the /w function in dc clietns with a more advanced thing... ;p

Tnx for the answer Madman. Now I know why..."Oh the silence" :)

Anybody who knows a script that can help me out?
We want to let the users in the hub listen to the music playing on the hubserver.

This is maybe not the right place, but I give it a shot...
A script in which you can point to a specific url, by type it with a given cmd, such as for an example: +swenews for http://swenews.patrikweb.net/index.php.

/Dj

Look at this one, maybe something...
 http://winamp.com/plugins/details.php?id=143259

Hello everybody!
Can someone tell me another link for clever_2_98.zip ?
Because this link http://www.jukkis.net/clever/clever_2_98.zip  is dead for me :(

http://www.thedestruction.org/filer/clever_2_98.zip

There you go

10q 10q :)
cool script .. by the way