home *** CD-ROM | disk | FTP | other *** search
/ Reverse Code Engineering RCE CD +sandman 2000 / ReverseCodeEngineeringRceCdsandman2000.iso / RCE / L2C / adenozin / SimpleScript.exe / Main / xdcc < prev    next >
Encoding:
Text File  |  2000-05-25  |  6.4 KB  |  119 lines
  1. xdcc.listchan {
  2.   if (%XDCC == Off) { echo $active %ver6 You need to turn the XDCC server on to use it!!. | halt }
  3.   .timer0 1 1 msg %chan1 %Ver2 ╫ XDCC ╫ /ctcp $me XDCC Send #Num. to get a file
  4.   if (%pack1 == $null) { echo $active %ver6 You need to set a pack1 | halt } 
  5.   else { .timer1 1 2 msg %chan1  [#1] [ $+ %pack1.desc $+ ] $lof(%pack1) b  } 
  6.   if (%pack2 == $null) { halt } 
  7.   else { .timer2 1 3 msg %chan1 [#2] [ $+ %pack2.desc $+ ] $lof(%pack2) b }
  8.   if (%pack3 == $null) { halt } 
  9.   else { .timer3 1 4 msg %chan1 [#3] [ $+ %pack3.desc $+ ] $lof(%pack3) b }
  10.   if (%pack4 == $null) { halt } 
  11.   else { .timer4 1 5 msg %chan1 [#4] [ $+ %pack4.desc $+ ] $lof(%pack4) b }
  12.   if (%pack5 == $null) { halt } 
  13.   else { .timer5 1 6 msg %chan1 [#5] [ $+ %pack5.desc $+ ] $lof(%pack5) b }
  14.   if (%pack6 == $null) { halt } 
  15.   else { .timer6 1 7 msg %chan1 [#6] [ $+ %pack6.desc $+ ] $lof(%pack6) b }
  16.   if (%pack7 == $null) { halt } 
  17.   else { .timer7 1 8 msg %chan1 [#7] [ $+ %pack7.desc $+ ] $lof(%pack7) b }
  18.   if (%pack8 == $null) { halt } 
  19.   else { .timer8 1 9 msg  %chan1 [#8] [ $+ %pack8.desc $+ ] $lof(%pack8) b }
  20.   if (%pack9 == $null) { halt } 
  21.   else { .timer9 1 10 msg %chan1 [#9] [ $+ %pack9.desc $+ ] $lof(%pack9) b }
  22.   if (%pack10 == $null) { halt } 
  23.   else { .timer10 1 11 msg %chat1 [#10] [ $+ %pack10.desc $+ ] $lof(%pack10) b }
  24. }
  25. xdcc.chan {
  26.   if (xdcc.chan == Off)  { halt }
  27.   .timer0 1 1 msg %chan2 %Ver2 ╫ XDCC ╫ /ctcp $me XDCC Send #Num. to get a file
  28.   if (%pack1 == $null) { echo $active %ver6 You need to set a pack1 | halt } 
  29.   else { .timer1 1 2 msg %chan2  [#1] [ $+ %pack1.desc $+ ] $lof(%pack1) b  } 
  30.   if (%pack2 == $null) { halt } 
  31.   else { .timer2 1 3 msg %chan2 [#2] [ $+ %pack2.desc $+ ] $lof(%pack2) b }
  32.   if (%pack3 == $null) { halt } 
  33.   else { .timer3 1 4 msg %chan2 [#3] [ $+ %pack3.desc $+ ] $lof(%pack3) b }
  34.   if (%pack4 == $null) { halt } 
  35.   else { .timer4 1 5 msg %chan2 [#4] [ $+ %pack4.desc $+ ] $lof(%pack4) b }
  36.   if (%pack5 == $null) { halt } 
  37.   else { .timer5 1 6 msg %chan2 [#5] [ $+ %pack5.desc $+ ] $lof(%pack5) b }
  38.   if (%pack6 == $null) { halt } 
  39.   else { .timer6 1 7 msg %chan2 [#6] [ $+ %pack6.desc $+ ] $lof(%pack6) b }
  40.   if (%pack7 == $null) { halt } 
  41.   else { .timer7 1 8 msg %chan2 [#7] [ $+ %pack7.desc $+ ] $lof(%pack7) b }
  42.   if (%pack8 == $null) { halt } 
  43.   else { .timer8 1 9 msg  %chan2 [#8] [ $+ %pack8.desc $+ ] $lof(%pack8) b }
  44.   if (%pack9 == $null) { halt } 
  45.   else { .timer9 1 10 msg %chan2 [#9] [ $+ %pack9.desc $+ ] $lof(%pack9) b }
  46.   if (%pack10 == $null) { halt } 
  47.   else { .timer10 1 11 msg %chat2 [#10] [ $+ %pack10.desc $+ ] $lof(%pack10) b }
  48. }
  49. xdcc.list {
  50.   if (xdcc.list  == Off)  { halt }
  51.   .timer0 1 1 msg %chan3 %Ver2 ╫ XDCC ╫ /ctcp $me XDCC Send #Num. to get a file
  52.   if (%pack1 == $null) { echo $active %ver6 You need to set a pack1 | halt } 
  53.   else { .timer1 1 2 msg %chan3  [#1] [ $+ %pack1.desc $+ ] $lof(%pack1) b  } 
  54.   if (%pack2 == $null) { halt } 
  55.   else { .timer2 1 3 msg %chan3 [#2] [ $+ %pack2.desc $+ ] $lof(%pack2) b }
  56.   if (%pack3 == $null) { halt } 
  57.   else { .timer3 1 4 msg %chan3 [#3] [ $+ %pack3.desc $+ ] $lof(%pack3) b }
  58.   if (%pack4 == $null) { halt } 
  59.   else { .timer4 1 5 msg %chan3 [#4] [ $+ %pack4.desc $+ ] $lof(%pack4) b }
  60.   if (%pack5 == $null) { halt } 
  61.   else { .timer5 1 6 msg %chan3 [#5] [ $+ %pack5.desc $+ ] $lof(%pack5) b }
  62.   if (%pack6 == $null) { halt } 
  63.   else { .timer6 1 7 msg %chan3 [#6] [ $+ %pack6.desc $+ ] $lof(%pack6) b }
  64.   if (%pack7 == $null) { halt } 
  65.   else { .timer7 1 8 msg %chan3 [#7] [ $+ %pack7.desc $+ ] $lof(%pack7) b }
  66.   if (%pack8 == $null) { halt } 
  67.   else { .timer8 1 9 msg  %chan3 [#8] [ $+ %pack8.desc $+ ] $lof(%pack8) b }
  68.   if (%pack9 == $null) { halt } 
  69.   else { .timer9 1 10 msg %chan3 [#9] [ $+ %pack9.desc $+ ] $lof(%pack9) b }
  70.   if (%pack10 == $null) { halt } 
  71.   else { .timer10 1 11 msg %chat3 [#10] [ $+ %pack10.desc $+ ] $lof(%pack10) b }
  72. }
  73. xdcc.listall {
  74.   if (%XDCC == Off) { echo $active %ver6 You need to turn the XDCC server on first. | halt }
  75.   .timer0 1 1 amsg [XiRC] ╫ XDCC ╫ /ctcp $me get #Num. to get a file
  76.   if (%pack1 == $null) { echo $active %ver6 You need to set a pack1 | halt } 
  77.   else { .timer1 1 2 amsg [#1] [ $+ %pack1.desc $+ ] $lof(%pack1) b  } 
  78.   if (%pack2 == $null) { halt } 
  79.   else { .timer2 1 3 amsg [#2] [ $+ %pack2.desc $+ ] $lof(%pack2) b }
  80.   if (%pack3 == $null) { halt } 
  81.   else { .timer3 1 4 amsg [#3] [ $+ %pack3.desc $+ ] $lof(%pack3) b }
  82.   if (%pack4 == $null) { halt } 
  83.   else { .timer4 1 5 amsg [#4] [ $+ %pack4.desc $+ ] $lof(%pack4) b }
  84.   if (%pack5 == $null) { halt } 
  85.   else { .timer5 1 6 amsg [#5] [ $+ %pack5.desc $+ ] $lof(%pack5) b }
  86.   if (%pack6 == $null) { halt } 
  87.   else { .timer6 1 7 amsg [#6] [ $+ %pack6.desc $+ ] $lof(%pack6) b }
  88.   if (%pack7 == $null) { halt } 
  89.   else { .timer7 1 8 amsg [#7] [ $+ %pack7.desc $+ ] $lof(%pack7) b }
  90.   if (%pack8 == $null) { halt } 
  91.   else { .timer8 1 9 amsg [#8] [ $+ %pack8.desc $+ ] $lof(%pack8) b }
  92.   if (%pack9 == $null) { halt } 
  93.   else { .timer9 1 10 amsg [#9] [ $+ %pack9.desc $+ ] $lof(%pack9) b }
  94.   if (%pack10 == $null) { halt } 
  95.   else { .timer10 1 11 amsg [#10] [ $+ %pack10.desc $+ ] $lof(%pack10) b }
  96. }
  97. xdcc.packs {
  98.   window -l @XDCC 100 20 400 320 @XDCC
  99.   clear @XDCC
  100.   aline @XDCC Right click to set the packs, you must set them in order
  101.   aline @XDCC á
  102.   aline @XDCC 1. %pack1 - %pack1.desc - $lof(%pack1) b
  103.   aline @XDCC 2. %pack2 - %pack2.desc - $lof(%pack2) b
  104.   aline @XDCC 3. %pack3 - %pack3.desc - $lof(%pack3) b
  105.   aline @XDCC 4. %pack4 - %pack4.desc - $lof(%pack4) b
  106.   aline @XDCC 5. %pack5 - %pack5.desc - $lof(%pack5) b
  107.   aline @XDCC 6. %pack6 - %pack6.desc - $lof(%pack6) b
  108.   aline @XDCC 7. %pack7 - %pack7.desc - $lof(%pack7) b
  109.   aline @XDCC 8. %pack8 - %pack8.desc - $lof(%pack8) b
  110.   aline @XDCC 9. %pack9 - %pack9.desc - $lof(%pack9) b
  111.   aline @XDCC 10. %pack10 - %pack10.desc - $lof(%pack10) b
  112. }
  113. xdcc.off {
  114.   set %XDCC Off 
  115.   if (%XDCC.timechan == On) { /timer24 off | /set %xdcc.timechan off }
  116.   if (%XDCC.timeall == On) { /timer25 off | /set %xdcc.timeall off }
  117.   echo $active %ver6 XDCC server is now Off
  118. }
  119.