Ren-Ren's Fileserver — File Browser
Ren-RensFileserverv1.2 / Ren-RensFileserverv1.2 / rfs-dlg.mrc
rfs-dlg.mrc — 15.88 KB — Download this file
; Ren-Ren's Fileserver v1.2
; Copyright© 2001-2003 by Adrian Au. All rights reserved.
; http://adrian.saxtus.gr
; http://www.geocities.com/renx2
; renx2@yahoo.com
;
; %rfs-fs-<nick> = <fs maxq maxsend maxq-i maxsend-i maxonline mincps maxcps autoresume ratio ipsend maxsize lastcom and time>
; (prop = maxq maxsend maxq-i maxsend-i maxonline mincps maxcps autoresume ratio ipsend)
; (queue = <nick> <maxsend-i>.<mincps>.<maxcps>.<autoresume> <ip> <path and file>)
; login = <user> <pass> <maxq-i> <maxsend-i> <mincps> <maxcps> <autoresume> <ratio> <welcome>
; %rfs-send-<nick><160><path and file> = <fs> <maxsend-i> <mincps> <maxcps> <autoresume> <ip> <channels>
; %rfs-q = <fs1> <fs2> ... (paused queues)
; %~rfs-send-<nick> = <chan>
; %rfs-whois-<nick> = <command>
; %rfs-whois><nick> = <address,5>
; %rfs-whois.<network> = <nicks awaiting userhost reply>
; table rfs-fs = <fs> <trigger>
; file rfs.ini
; file rfs-q-<fs>.rfs
; file rfs-<fs>.fsc
; file rfs-ratio.ini
; file rfs-ban.txt
; @rfs-q-<fs>
; timerrfsad<fs><chan>
; timerrfscps
; timerrfspart<nick>@<num>
; timerrfsquit<nick>
; timerrfsoff<fs>
; timerrfs-fs-<nick>
; timerrfs-fstl-<nick>
;
on 1:unload:{
var %~rfsu = $rfs-def(win)
if (%_rfsunload != 1) unset %rfs*
hfree -w rfs*
if ($dialog(%~rfsu) != $null) dialog -x %~rfsu
}
dialog rfsalertbox {
title $rfs-network » RFS Notice
icon $rfs-opt(ico),0
size -1 -1 150 50
option dbu
edit %rfs-alert,1,5 5 145 30,read,vsbar,multi,center
button "OK",10,65 37 25 10,ok,result
}
dialog rfspromptbox {
title $rfs-network » RFS Prompt
icon $rfs-opt(ico),0
size -1 -1 100 40
option dbu
text %rfs-alert,1,5 5 95 15,center
button "Yes",10,20 25 25 10,ok,result
button "No",11,55 25 25 10,cancel
}
dialog rfsentrybox {
title $rfs-network » RFS Prompt
icon $rfs-opt(ico),0
size -1 -1 150 50
option dbu
text %rfs-alert,1,5 5 145 30,center
edit %rfs-alert1,13,5 20 140 10,autohs,result
button "OK",10,50 35 25 10,ok
button "Cancel",11,80 35 25 10,cancel
}
dialog rfswait {
title $rfs-network » RFS Wait
icon $rfs-opt(ico),0
size -1 -1 60 15
option dbu
text %rfs-alert,1,2 5 55 10,center
button "OK",10,61 16 10 10,ok
}
dialog rfsstatbox {
title $rfs-network » RFS %rfs-alert
icon $rfs-opt(ico),0
size -1 -1 140 80
option dbu
edit "",1,5 5 130 60,read,multi,vsbar,autohs,hsbar
button "Close",11,55 67 30 10,ok
}
dialog rfsq {
title Fserve %rfsq Queues
icon $rfs-opt(ico),0
size -1 -1 350 200
option dbu
list 1,5 5 315 195,hsbar,extsel
button "&Add",2,322 25 25 10
button "&Remove",3,322 35 25 10
button "C&lear",4,322 45 25 10
button "&Up",5,322 65 25 10
button "&Down",6,322 75 25 10
button "&Top",7,322 85 25 10
button "&Bottom",8,322 95 25 10
button "&Send File",13,322 115 25 10
button "Ru&n",11,322 135 25 10
button "&Pause",12,322 145 25 10
button "Sa&ve",9,322 165 25 10,ok
button "&Cancel",10,322 175 25 10
}
dialog rfsp {
title Fserve %rfsp Profiles (User syntax: login <user> <password>)
icon $rfs-opt(ico),0
size -1 -1 250 218
option dbu
list 1,5 5 115 215,hsbar,extsel,sort
edit "",2,159 7 87 10,autohs
text "User:",52,125 9 32 8
edit "",3,159 20 87 10,autohs
text "Password:",53,125 22 32 8
edit "",4,159 33 25 10,autohs
text "Max Queue:",54,125 35 32 8
edit "",5,221 33 25 10,autohs
text "Max Send:",55,187 35 32 8
edit "",6,159 46 25 10,autohs
text "Min CPS:",56,125 48 32 8
edit "",7,221 46 25 10,autohs
text "Max CPS:",57,187 48 32 8
edit "",8,159 59 25 10,autohs
text "Autoresume:",58,125 61 32 8
edit "",18,221 59 25 10,autohs
text "DL:UL Ratio:",19,187 61 32 8
edit "",9,125 83 120 40,multi,vsbar
text "Welcome Msg: (Parameters: <me> <nick>)",98,125 74 107 8
button "&Add",32,125 182 30 10
button "&Remove",33,155 182 32 10
button "C&lear All Profiles",34,125 192 62 10
button "C&opy to Another Fserve",35,125 202 62 10
button "&Save Profiles",10,200 187 45 10,ok
button "&Cancel Changes",11,200 197 45 10
box "Individual Default",51,125 125 120 50
edit "",12,166 135 20 10,autohs,read
text "Max Queue:",62,132 137 32 8
edit "",13,221 135 20 10,autohs,read
text "Max Send:",63,189 137 32 8
edit "",14,166 148 20 10,autohs,read
text "Min CPS:",64,132 150 32 8
edit "",15,221 148 20 10,autohs,read
text "Max CPS:",65,189 150 32 8
edit "",16,166 161 20 10,autohs,read
text "Autoresume:",66,132 163 32 8
edit "" 17,221 161 20 10,autohs,read
text "DL:UL Ratio:",67,189 163 32 8
}
dialog rfss {
title Fserve %rfss Scheduler
icon $rfs-opt(ico),0
size -1 -1 210 110
option dbu
list 9,5 5 80 105,hsbar,extsel,sort
text "&Time:",19,90 11 20 8
edit "",11,110 9 25 10
radio "On",12,145 9 20 10,push,group
radio "Off",13,165 9 20 10,push
radio "Monday",1,90 22 50 10,group
radio "Tuesday",2,90 35 50 10
radio "Wednesday",3,90 48 50 10
radio "Thursday",4,90 61 50 10
radio "Friday",5,145 22 50 10
radio "Saturday",6,145 35 50 10
radio "Sunday",7,145 48 50 10
radio "Any day",8,145 61 50 10
button "&Add",14,90 76 30 10
button "&Remove",15,120 76 32 10
button "C&lear Schedule",16,90 86 62 10
button "C&opy to Another Fserve",17,90 96 62 10
button "&Save Schedule",10,160 81 45 10,ok
button "&Cancel",18,160 91 45 10
}
dialog rfsaddtrig {
title $rfs-network » Add to Selected Fserve
icon $rfs-opt(ico),0
size -1 -1 235 75
option dbu
edit "",1,30 8 202 10,autohs
text "Trigger:",2,5 10 25 8
edit "",3,30 21 167 10,autohs
button "Path",4,201 22 15 8
button "File",5,216 22 15 8
text "Path/File:",6,5 23 25 8
edit "",7,30 34 173 10,autohs
button "..",8,206 35 10 8
button "Edit",9,216 35 15 8
text "Welcome:",10,5 37 25 8
edit "",11,52 48 25 10,autohs
text "Max File Size (Kb):",12,5 50 45 8
check "Ops",13,110 48 20 10
check "Halfops",14,135 48 30 10
check "Voiced",15,165 48 30 10
check "Regular",16,195 48 30 10
text "Access:"17,88 50 20 8
button "Add Trigger",18,145 61 40 10,ok
button "Cancel",19,185 61 40 10,cancel
}
dialog rfsmain {
title $rfs-network » $rfs-def(script) ( $+ $rfs-def(page) $+ )
icon $rfs-opt(ico),0
size -1 -1 365 262
option dbu
menu "&RFS",90
item "&Unload RFS",92
item break,91
item "&Close",93,ok
menu "&Log",96
item "&Log Window",94
item "&Edit Log",95
menu "&Help",97
item "&Help File",98
item "Home&page",99
tab "Fserves",100,0 0 364 252
tab "Ban",200
tab "Credits",300
tab "Log",400
tab "Options",500
button "O&n",23,3 17 30 10,tab 100
button "&Off",24,33 17 30 10,tab 100
button "S&elect All",68,91 17 30 10,tab 100
button "Pause Sel. Q&ueue(s)",48,3 29 59 10,tab 100
button "S&top Sel. Send(s)",49,62 29 59 10,tab 100
list 1,2 41 120 50,hsbar,extsel,sort,tab 100
button "Sa&ve as New Fserve",51,128 17 60 10,tab 100
button "&Update Selected Fserve",50,188 17 70 10,tab 100
button "&Remove Fserve",25,258 17 50 10,tab 100
button "&Default Data",46,322 17 40 10,tab 100
box "Trigger: (For '/CTCP YourNick Trigger': <ctcp> Trigger. For 'Action Trigger': <action> Trigger)",32,127 30 235 77,tab 100
list 15,132 38 226 45,hsbar,extsel,tab 100
button "Up",41,132 83 32 10,tab 100
button "Down",42,164 83 33 10,tab 100
button "Top",43,197 83 32 10,tab 100
button "Bottom",44,229 83 33 10,tab 100
button "Add/Ed&it",29,132 93 40 10,tab 100
button "Re&move",30,172 93 40 10,tab 100
button "C&lear Triggers",31,212 93 50 10,tab 100
text "From left to right: <Trigger><Initial Path/File><Welcome File><Max Filesize><Access>",2,270 83 90 22,tab 100
edit "",3,153 110 207 10,autohs,tab 100
text "Channels:",53,128 112 25 8,tab 100
edit "",11,223 123 137 10,autohs,tab 100
text $rfs-def(minadtimertxt),61,128 125 95 8,tab 100
edit "",12,175 144 20 10,autohs,tab 100
text "Trigger Separator:",62,128 146 45 8,tab 100
edit "",69,175 157 20 10,autohs,tab 100
text "Autoresume Tries:",70,128 159 45 8,tab 100
edit "",71,175 170 20 10,autohs,tab 100
text "DL:UL Ratio:",72,128 172 32 8,tab 100
check "Start on Connect",74,128 190 50 10,tab 100
check "Respond to Find",75,128 203 50 10,tab 100
text "(Cache must be built)",5,136 213 60 8 ,tab 100
check "Use IP Send",73,128 224 40 10,tab 100
button "?",82,170 224 10 10,tab 100
check "Open Slot Announcer",83,128 237 70 10,tab 100
box "Fserve Max",20,220 136 73 48,tab 100
edit "",6,246 144 20 10,autohs,tab 100
edit "",16,269 144 20 10,read,tab 100
text "Queue:",56,224 146 20 8,tab 100
edit "",7,246 157 20 10,autohs,tab 100
edit "",17,269 157 20 10,read,tab 100
text "Send:",57,224 159 20 8,tab 100
edit "",13,246 170 20 10,autohs,tab 100
edit "",18,269 170 20 10,read,tab 100
text "Online:",60,224 172 20 8,tab 100
box "Individual",21,300 136 59 61,tab 100
edit "",8,336 144 20 10,autohs,tab 100
text "Max Queue:",58,304 146 30 8,tab 100
edit "",9,336 157 20 10,autohs,tab 100
text "Max Send:",59,304 159 30 8,tab 100
edit "",19,336 170 20 10,autohs,tab 100
text "Min CPS (K):",63,304 172 30 8,tab 100
edit "",47,336 183 20 10,autohs,tab 100
text "Max CPS (K):",66,304 185 32 8,tab 100
box "Statistics Logging",80,199 195 95 48,tab 100
check "Access",76,203 203 45 10,tab 100
check "Popular Files",79,203 216 45 10,tab 100
check "Sent Files",77,250 203 45 10,tab 100
check "Failed Files",78,250 216 45 10,tab 100
button "Reset Checked Statistics",81,212 229 65 10,tab 100
button "Current &Queues",38,310 200 45 10,tab 100
button "Fserve &Stats",37,310 210 45 10,tab 100
button "Edit &Profiles",39,310 220 45 10,tab 100
button "Scheduler",26,310 230 45 10,tab 100
button "&Build File Cache",4,310 240 45 10,tab 100
box "Fserve Ad",22,2 84 120 162,tab 100
edit "",10,7 92 110 67,multi,vsbar,tab 100
edit "",14,7 162 110 67,multi,vsbar,read,tab 100
button "Refresh Previe&w",33,7 232 45 10,tab 100
button "De&fault",34,52 232 25 10,tab 100
button "?",35,77 232 10 10,tab 100
button "&Ad Now",67,92 232 25 10,tab 100
; Ban
list 201,85 27 275 227,extsel,hsbar,sort,tab 200
list 202,2 17 80 45,hsbar,sort,tab 200
list 203,2 65 80 190,extsel,hsbar,sort,tab 200
button "&Ban",204,90 17 20 10,tab 200
button "&Enter Ban",205,110 17 30 10,tab 200
button "&Unban",206,140 17 25 10,tab 200
button "&Clear List",207,165 17 30 10,tab 200
button "&Edit",208,215 17 25 10,tab 200
button "&Reload",209,265 17 25 10,tab 200
button "&Save",210,290 17 25 10,tab 200
; Credits
list 301,2 29 346 225,extsel,hsbar,sort,tab 300
button "&Add",302,5 17 20 10,tab 300
button "&Remove",303,25 17 25 10,tab 300
button "&Clear All",304,50 17 25 10,tab 300
button "&Edit",305,85 17 20 10,tab 300
text "Sort by:",309,175 19 25 10,tab 300
radio "&Time",306,200 17 25 10,tab 300
radio "A&ddress",307,225 17 30 10,tab 300
radio "Cred&its",308,255 17 25 10,tab 300
; Log
edit "",401,2 17 360 220,read,autovs,hsbar,multi,tab 400
button "Open Log Window",402,10 240 60 10,tab 400
button "Clear",403,80 240 30 10,tab 400
}
dialog rfsoption {
title $rfs-network » Options
icon $rfs-opt(ico),0
size -1 -1 255 216
option dbu
tab "System",100,0 0 254 215
tab "Fserve",200
tab "Help",300
button "Close",1,100 400 30 10,ok
; System
text "RFS Directory",4,177 19 35 10,tab 100
list 5,5 17 170 15,tab 100
text "System Sound",6,177 32 35 10,tab 100
list 7,5 30 170 15,tab 100
text "Warning Sound",8,177 45 40 10,tab 100
list 9,5 43 170 15,tab 100
combo 10,5 56 142 45,edit,drop,vsbar,tab 100
button "+",11,149 57 8 8,tab 100
button "-",12,157 57 8 8,tab 100
button "x",13,165 57 8 8,tab 100
text "Network List (server group)",14,177 58 65 10,tab 100
button "Preview Colors",76,5 69 40 10,tab 100
edit $rfs-opt(color1),70,50 69 12 10,tab 100
text "Primary Color",71,64 71 35 8,tab 100
edit $rfs-opt(color3),74,105 69 12 10,tab 100
text "Secondary Color",75,119 71 40 8,tab 100
edit $rfs-opt(color2),72,163 69 12 10,tab 100
text "Warning Color",73,177 71 45 8,tab 100
check "Open on Desktop",2,5 82 100 10,tab 100
check "Always on Top",3,105 82 100 10,tab 100
check "Log Fserve Open/Close",77,5 95 100 10,tab 100
check "Log Fserve Login/Logout",78,105 95 100 10,tab 100
check "Log Fserve Errors",79,5 108 100 10,tab 100
check "Log File Received",80,105 108 100 10,tab 100
check "Log File Sent",81,5 121 100 10,tab 100
check "Log Failed File Send",82,105 121 100 10,tab 100
check "Log Window Always on Top",84,5 135 100 10,tab 100
button "Edit Log",67,5 153 40 10,tab 100
button "Default",15,105 153 30 10,tab 100
; Fserve
edit $rfs-opt(list),18,5 17 100 10,autohs,tab 200
text "List Commands",19,107 19 45 8,tab 200
edit $rfs-opt(find),20,5 30 100 10,autohs,tab 200
text "Find Commands",21,107 32 45 8,tab 200
edit $rfs-opt(findmax),49,5 43 20 10,autohs,tab 200
text "Max Find Results",50,27 45 45 8,tab 200
edit $rfs-opt(logincache),51,5 56 20 10,autohs,tab 200
text "Login Cache",52,27 58 45 8,tab 200
edit $rfs-opt(ipsendport),53,5 69 20 10,autohs,tab 200
text "IP Send Port",54,27 71 45 8,tab 200
edit $rfs-opt(autosendb),65,5 82 20 10,autohs,tab 200
text "Auto-Send Size (K)",66,27 84 45 8,tab 200
edit $rfs-opt(autoresumeb),55,5 95 20 10,autohs,tab 200
text "Minimum Autoresume Size (K) or Percent",56,27 96 100 8,tab 200
edit $rfs-dccmaxcps,68,5 108 40 10,read,tab 200
button "mIRC Total Max CPS",69,47 108 65 10,tab 200
edit $rfs-opt(fstimeout),57,75 43 20 10,autohs,tab 200
text "Fserve Idle Timeout",58,97 45 50 8,tab 200
edit $rfs-opt(partdelay),59,75 56 20 10,autohs,tab 200
text "Stop Send on User Part",60,97 58 58 8,tab 200
edit $rfs-opt(quitdelay),61,75 69 20 10,autohs,tab 200
text "Stop Send on User Quit",62,97 71 58 8,tab 200
edit $rfs-opt(cpschk),63,75 82 20 10,autohs,tab 200
text "CPS Check Freq",64,97 84 45 8,tab 200
; "Fserve Time Limit"
box "Fserve Default",22,5 123 61 48,tab 200
edit "",23,42 131 20 10,autohs,tab 200
text "Max Queue:",24,10 133 30 8,tab 200
edit "",25,42 144 20 10,autohs,tab 200
text "Max Send:",26,10 146 30 8,tab 200
edit "",27,42 157 20 10,autohs,tab 200
text "Max Online:",28,10 159 30 8,tab 200
box "Individual Default",29,82 123 61 61,tab 200
edit "",30,118 131 20 10,autohs,tab 200
text "Max Queue:",31,86 133 30 8,tab 200
edit "",32,118 144 20 10,autohs,tab 200
text "Max Send:",33,86 146 30 8,tab 200
edit "",34,118 157 20 10,autohs,tab 200
text "Min CPS (K):",35,86 159 30 8,tab 200
edit "",36,118 170 20 10,autohs,tab 200
text "Max CPS (K):",37,86 172 32 8,tab 200
check "Anti-camping",38,165 17 60 10,tab 200
check "Global Ratio Switch",39,165 30 60 10,tab 200
check "Check for Duplicate in Queues",86,165 43 80 10,tab 200
check "Allow Off-Channel Access",40,165 56 80 10,tab 200
check "Show RFS Name in Ads",41,165 69 70 10,tab 200
check "Stop Queues when Fserve Off",83,165 82 85 10,tab 200
check "Pause Queues on Get",87,165 95 70 10,tab 200
box "Send Notice to User",42,160 113 90 98,tab 200
check "On Fserve Access Fail",43,165 121 70 10,tab 200
check "On Get Request Fail",44,165 134 70 10,tab 200
check "On CPS Below Minimum",45,165 147 70 10,tab 200
check "On Clone Detected",46,165 160 70 10,tab 200
check "On Access Fail due to Ban",47,165 173 75 10,tab 200
check "On Send Fail due to DCCAllow",48,165 186 85 10,tab 200
check "Show Notices in Log Window",85,165 199 85 10,tab 200
; help
edit "",301,5 20 245 138,read,multi,vsbar,tab 300
box "About",302,5 162 245 40,tab 300
Edit "If you find RFS useful, please consider making a donation at the page. Thank you! You can also email me with any comments/suggestions. renx2@yahoo.com",304,10 170 232 20,read,multi,tab 300
link $rfs-def(page),303,10 192 80 10,tab 300
link Help File,305,215 192 30 10,tab 300
}
; End of script