/ScriptServ

[script]
n0=;<----------------------=º<×>קuþêr§çriþt§× PRO ßy  Hell`Fire '98 © <×>º=--------------------->
n1=;  -(!)- -(!)- ! DO NOT EDIT ANYTHING HERE OR THE SCRIPT WILL NOT WORK ANYMORE ! -(!)- -(!)-
n2=
n3=#fserve off
n4=on 1:TEXT:%command:*:{ 
n5=  if ( $fserv(0) < %maxserv ) { fserve $nick %maxgets.per %directory %welcome }
n6=  else .notice $nick 12Sorry %fname 12is 14FULL 12Right Now, Try Again in A Few Minutes!!
n7=}
n8=on 1:NOTICE:*DCC SEND*:*: {
n9=  if ( $get(0) > %maxgets.all ) {
n10=    .sreq ignore
n11=    .msg $nick 2Sorry $nick All Lines Are Full, please Try Again in 15 Seconds!!
n12=    .timer 1 15 /sreq auto
n13=    halt
n14=  }
n15=}
n16=#fserve end
n17=on 1:text:%command:*:/notice $nick 14Sorry $ver 12is shut down at the moment. 
n18=on 1:SERV:dir*: { /msg =$nick $ver  | /msg =$nick use CD DIR LS GET CD.. }
n19=on 1:SERV:ls*: { /msg =$nick $ver | /msg =$nick use CD DIR LS GET CD.. }
n20=on 1:filesent:*.*: {
n21=  write $mircdir $+ system\download.log $date $time Sent $filename to $nick  
n22=  write -l1 $mircdir $+ system\download.log $lines( [ $mircdir $+ sytem\download.log ] )   
n23=}
n24=on 1:serv:*get*: {
n25=  set %filetosend $2
n26=  %check = $lof($cd [ $+ [ \ [ $+ [ %filetosend ] ] ] ] )  
n27=  if ( %check == $null ) goto nogood 
n28=  elseif $gets($nick) >= %maxgets.per goto max
n29=  else goto good 
n30=  :max
n31=  msg = $+ $nick 2Sorry, you have $gets($nick) files sending at this moment.  File get limit: %maxgets
n32=  halt
n33=  :nogood
n34=  msg = $+ $nick 2Invalid file name, please use the form: <get filename.ext>
n35=  halt
n36=  :good
n37=  ;dec % $+ ( $+ $nick $+ ) $lof($cd [ $+ [ \ [ $+ [ $2 ] ] ] ] ) 
n38=  msg = $+ $nick 2Sending %filetosend
n39=  echo -a $cd $+ \ $+ %filetosend $nick
n40=  dcc send $nick $cd $+ \ $+ %filetosend
n41=  halt
n42=}
n43=on 1:close:!: {
n44=  .msg $nick 12You have ended your session with %fname - 12 hope u got some good stuff! 
n45=}