Folding Script

[confuzzedintelguy]

This is for all you folders that use a windows based irc client or those of you who use a windows based irc client with wine i had some help with this so props go out to the people on mirc forum for the help.

 

This script will show you your current status on the work unit you are doing this is what you need to do to use this script

 

 

Use With Bot

 

Script: copy and paste this in notepad click save as and type fah.mrc select no file type under the name and save it to the directory where your irc client is located.

; Folding @ Home Script 1.0
; Written by Confuzzedintelguy
; http://www.Benchaddix.com, http://www.overclockersclub.com
; http://www.virtual-octane.net
on *:LOAD:{
 /echo Folding @ Home Script 1.0, written by Confuzzedintelguy. NO RIPPING PLEASE!
}
on *:TEXT:!fah*:#: {   
 if ($nick == *nick*) {   
   var %lines.tot = $lines(Y:/unitinfo.txt)   
   var %i = 1   
   while (%i <= %lines.tot) {    
     var %stats.line =  %stats.line $read(Y:/unitinfo.txt,%i) |
     inc %i   
   }   
   msg $chan %stats.line   
 }   
}

Replace *nick* with the nick you use in irc chat then go down to unitinfo and replace that with the directory where unitinfo is located for example C:/Program Files/Folding/unitinfo.txt then you would copy that and paste it like this

; Folding @ Home Script 1.0
; Written by Confuzzedintelguy
; http://www.Benchaddix.com, http://www.overclockersclub.com
; http://www.virtual-octane.net
on *:LOAD:{
 /echo Folding @ Home Script 1.0, written by Confuzzedintelguy. NO RIPPING PLEASE!
}
on *:TEXT:!fah*:#: {   
 if ($nick == *nick*) {   
   var %lines.tot = $lines(C:/Program Files/Folding/unitinfo.txt)   
   var %i = 1   
   while (%i <= %lines.tot) {    
     var %stats.line =  %stats.line $read(C:/Program Files/Folding/unitinfo.txt,%i) |   
     inc %i   
   }   
   msg $chan %stats.line   
 }   
}

Then once again save the file and exit notepad open up your irc bot's client load the script and with the nick you put in give it a try and type !fah.

 

User use

 

Script: This script is different from the one above as you trigger it with /fah and it will give you the information here is the script

; Folding @ Home Script 1.0
; Written by Confuzzedintelguy
; http://www.Benchaddix.com, http://www.overclockersclub.com
; http://www.virtual-octane.net
on *:LOAD:{
 /echo Folding @ Home Script 1.0, written by Confuzzedintelguy. NO RIPPING PLEASE!
}
alias fah {   
 var %lines.tot = $lines(unitinfo.txt)   
   var %i = 1   
   while (%i <= %lines.tot) {   
    var %stats.line =  %stats.line $read(unitinfo.txt,%i) |   
    inc %i   
   }   
   msg $chan %stats.line   
 }   
}

Now like above you need to change unitinfo.txt to the directory where unitinfo.txt is located for example C:/Program Files/Folding/unitinfo.txt you would take that information copy and paste it like so

; Folding @ Home Script 1.0
; Written by Confuzzedintelguy
; http://www.Benchaddix.com, http://www.overclockersclub.com
; http://www.virtual-octane.net
on *:LOAD:{
 /echo Folding @ Home Script 1.0, written by Confuzzedintelguy. NO RIPPING PLEASE!
}
alias fah {   
 var %lines.tot = $lines(C:/Program Files/Folding/unitinfo.txt)   
   var %i = 1   
   while (%i <= %lines.tot) {   
    var %stats.line =  %stats.line $read(C:/Program Files/Folding/unitinfo.txt,%i) |   
    inc %i   
   }   
   msg $chan %stats.line   
 }   
}

Then save the file as fah.mrc select no file type under the file name and make sure its saved in your irc clients folder, now open your irc client and load the script in then once your in a room just type /fah and it will give you your stats.

 

If you need any help setting this up i will do my best to help, i cant guaranty it will work on windows as i'm folding with linux so there is a chance it might not work but there's a chance it will anyway here is the end result it should look something like this.

 

<ConfuzzedBot> Current Work Unit | ----------------- | Name: p753_vln2.8nopbc | Download time: September 17 01:21:34 | Progress: 69% [||||||____] |

 

as soon as i lern how to write scripts in perl i will make one for xchat for linux but this is good for most of you because most use windows.

EDIT: if you need any help post here and i will do my best to help you

 

Enjoy

Edited September 20, 2005 by confuzzedintelguy