home *** CD-ROM | disk | FTP | other *** search
/ Reverse Code Engineering RCE CD +sandman 2000 / ReverseCodeEngineeringRceCdsandman2000.iso / RCE / L2C / adenozin / SimpleScript.exe / Main / alias2.ini < prev    next >
Encoding:
INI File  |  2000-05-25  |  15.1 KB  |  307 lines
  1. [aliases]
  2. n0=; FServe Commands
  3. n1=/fadv {
  4. n2=  if ($group(#ctcptrig) == off) {
  5. n3=    if (%mchan1o == 1) /msg [ [ %mchan1 ] ] 4 [ [ %fstrig ] ] 5is now Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  6. n4=    if (%mchan2o == 1) /msg [ [ %mchan2 ] ] 4 [ [ %fstrig ] ] 5is now Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  7. n5=    if (%mchan3o == 1) /msg [ [ %mchan3 ] ] 4 [ [ %fstrig ] ] 5is now Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  8. n6=    if (%mchan4o == 1) /msg [ [ %mchan4 ] ] 4 [ [ %fstrig ] ] 5is now Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  9. n7=    if (%mchan5o == 1) /msg [ [ %mchan5 ] ] 4 [ [ %fstrig ] ] 5is now Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  10. n8=  }
  11. n9=  else {
  12. n10=    if (%mchan1o == 1) /msg [ [ %mchan1 ] ] 4 Type2 /ctcp [ [ $me ] ] [ [ %fstrig ] ] 5to get on my fserv which is Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  13. n11=    if (%mchan2o == 1) /msg [ [ %mchan2 ] ] 4 Type2 /ctcp [ [ $me ] ] [ [ %fstrig ] ] 5to get on my fserv which is Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  14. n12=    if (%mchan3o == 1) /msg [ [ %mchan3 ] ] 4 Type2 /ctcp [ [ $me ] ] [ [ %fstrig ] ] 5to get on my fserv which is Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  15. n13=    if (%mchan4o == 1) /msg [ [ %mchan4 ] ] 4 Type2 /ctcp [ [ $me ] ] [ [ %fstrig ] ] 5to get on my fserv which is Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  16. n14=    if (%mchan5o == 1) /msg [ [ %mchan5 ] ] 4 Type2 /ctcp [ [ $me ] ] [ [ %fstrig ] ] 5to get on my fserv which is Serving:2 [ [ %fdes ] ] 5- Users(2 $fserv(0) 5/2 [ [ %maxusers ] ] 5)3 - 3Gets(2 $send(0) 5/2 [ [ %maxglobal ] ] 3)5 -3 [ [ %fserved ] ] 5Already Served   5 -3 [ [ %sender2 5 %what ] ]
  17. n15=  }
  18. n16=}
  19. n17=/joinchans {
  20. n18=  if (%fson == 1) {
  21. n19=    if (%mchan1o == 1) /join %mchan1
  22. n20=    if (%mchan2o == 1) /join %mchan2
  23. n21=    if (%mchan3o == 1) /join %mchan3
  24. n22=    if (%mchan4o == 1) /join %mchan4
  25. n23=    if (%mchan5o == 1) /join %mchan5
  26. n24=  }
  27. n25=  if ($group(#xdcc) == on) {
  28. n26=    if (%xdchan1.status == ON) /join %xdchan1.chan
  29. n27=    if (%xdchan2.status == ON) /join %xdchan2.chan
  30. n28=    if (%xdchan3.status == ON) /join %xdchan3.chan
  31. n29=    if (%xdchan4.status == ON) /join %xdchan4.chan
  32. n30=    if (%xdchan5.status == ON) /join %xdchan5.chan
  33. n31=  }
  34. n32=  if (%et1o == 1) /join %et1mchan
  35. n33=  if (%et2o == 1) /join %et2mchan
  36. n34=  if (%et3o == 1) /join %et3mchan
  37. n35=  if (%et4o == 1) /join %et4mchan
  38. n36=  if (%et5o == 1) /join %et5mchan
  39. n37=  if (%ftp.status == on) /join %ftp.chan
  40. n38=}
  41. n39=/numgetspp {
  42. n40=  /set %tempvar 1
  43. n41=  /set %tempvar2 0
  44. n42=  if (%tempvar <= $send(0) ) {
  45. n43=    if ($send(%tempvar) == $1) /inc %tempvar2
  46. n44=    /inc %tempvar
  47. n45=  }
  48. n46=  /unset %tempvar
  49. n47=  return %tempvar2
  50. n48=  /unset %tempvar2
  51. n49=}
  52. n50=checkcps {
  53. n51=  set %lpcount 1
  54. n52=  :lpcou3
  55. n53=  if (%lpcount <= $send(0) ) {
  56. n54=    if ( $send(%lpcount).cps  < %mincps ) {
  57. n55=      .notice $send(%lpcount) 5The 2send 5of3 $send(%lpcount).file 5from me to you is going only at2 $send(%lpcount).cps $+ 5and I want my 3sends 5to be 2greater 5than4 %mincps $+ , 5so I am 4stopping your 3send5.
  58. n56=      .close -s $send(%lpcount)
  59. n57=    }
  60. n58=    inc %lpcount
  61. n59=    goto lpcou3
  62. n60=  }
  63. n61=  unset %lpcount
  64. n62=}
  65. n63=/fssetall {
  66. n64=  /set %mchan1t $?="First Channel To Serve (0 to stop):"
  67. n65=  if (%mchan1t != 0) {
  68. n66=    /set %mchan1 %mchan1t
  69. n67=    /set %mchan1o 1
  70. n68=    /set %mchan1t $?="Second Channel To Serve (0 to stop):"
  71. n69=    if (%mchan1t != 0) {
  72. n70=      /set %mchan2 %mchan1t
  73. n71=      /set %mchan2o 1
  74. n72=      /set %mchan1t $?="Third Channel To Serve (0 to stop):"
  75. n73=      if (%mchan1t != 0) {
  76. n74=        /set %mchan3 %mchan1t
  77. n75=        /set %mchan3o 1
  78. n76=        /set %mchan1t $?="Fourth Channel To Serve (0 to stop):"
  79. n77=        if (%mchan1t != 0) {
  80. n78=          /set %mchan4 %mchan1t
  81. n79=          /set %mchan4o 1
  82. n80=          /set %mchan1t $?="Fifth Channel To Serve (0 to stop):"
  83. n81=          if (%mchan1t != 0) {
  84. n82=            /set %mchan5 %mchan1t
  85. n83=            /set %mchan5o 1
  86. n84=          }
  87. n85=          else /set %mchan5o 0
  88. n86=        }
  89. n87=        else {
  90. n88=          /set %mchan4o 0
  91. n89=          /set %mchan5o 0
  92. n90=        }      
  93. n91=      }
  94. n92=      else {
  95. n93=        /set %mchan3o 0
  96. n94=        /set %mchan4o 0
  97. n95=        /set %mchan5o 0
  98. n96=      }
  99. n97=    }
  100. n98=    else {
  101. n99=      /set %mchan2o 0
  102. n100=      /set %mchan3o 0
  103. n101=      /set %mchan4o 0
  104. n102=      /set %mchan5o 0
  105. n103=    }
  106. n104=  }
  107. n105=  else {
  108. n106=    /set %mchan1o 0
  109. n107=    /set %mchan2o 0
  110. n108=    /set %mchan3o 0
  111. n109=    /set %mchan4o 0
  112. n110=    /set %mchan5o 0
  113. n111=  }
  114. n112=  /unset %mchan1t
  115. n113=  /set %fstrig $?="Trigger to activate FServe:"
  116. n114=  /set %maxgets $?="Maximum Gets from FServe per Person:"
  117. n115=  /set %maxglobal $?="FServe and XDCC Maximum Gets At Once:"
  118. n116=  /set %maxusers $?="Maximum Users On FServe At Once:"
  119. n117=  /set %homedir $sdir="FServe Home Directory"
  120. n118=  /set %wtext $dir="FServe Welcome Text File" c:\
  121. n119=  /set %fdes $?="FServe Ad Description:"
  122. n120=  /set %fadt $?="FServe Ad Timeout in Seconds:"
  123. n121=}
  124. n122=/fseasy {
  125. n123=  /set %mchan1t $?="First Channel To Serve (0 to stop):"
  126. n124=  if (%mchan1t != 0) {
  127. n125=    /set %mchan1 %mchan1t
  128. n126=    /set %mchan1o 1
  129. n127=    /set %mchan1t $?="Second Channel To Serve (0 to stop):"
  130. n128=    if (%mchan1t != 0) {
  131. n129=      /set %mchan2 %mchan1t
  132. n130=      /set %mchan2o 1
  133. n131=      /set %mchan1t $?="Third Channel To Serve (0 to stop):"
  134. n132=      if (%mchan1t != 0) {
  135. n133=        /set %mchan3 %mchan1t
  136. n134=        /set %mchan3o 1
  137. n135=        /set %mchan1t $?="Fourth Channel To Serve (0 to stop):"
  138. n136=        if (%mchan1t != 0) {
  139. n137=          /set %mchan4 %mchan1t
  140. n138=          /set %mchan4o 1
  141. n139=          /set %mchan1t $?="Fifth Channel To Serve (0 to stop):"
  142. n140=          if (%mchan1t != 0) {
  143. n141=            /set %mchan5 %mchan1t
  144. n142=            /set %mchan5o 1
  145. n143=          }
  146. n144=          else /set %mchan5o 0
  147. n145=        }
  148. n146=        else {
  149. n147=          /set %mchan4o 0
  150. n148=          /set %mchan5o 0
  151. n149=        }      
  152. n150=      }
  153. n151=      else {
  154. n152=        /set %mchan3o 0
  155. n153=        /set %mchan4o 0
  156. n154=        /set %mchan5o 0
  157. n155=      }
  158. n156=    }
  159. n157=    else {
  160. n158=      /set %mchan2o 0
  161. n159=      /set %mchan3o 0
  162. n160=      /set %mchan4o 0
  163. n161=      /set %mchan5o 0
  164. n162=    }
  165. n163=  }
  166. n164=  else {
  167. n165=    /set %mchan1o 0
  168. n166=    /set %mchan2o 0
  169. n167=    /set %mchan3o 0
  170. n168=    /set %mchan4o 0
  171. n169=    /set %mchan5o 0
  172. n170=  }
  173. n171=  /unset %mchan1t
  174. n172=  /set %fstrig $?="Trigger to activate FServe:"
  175. n173=  /set %maxgets 1
  176. n174=  /set %maxglobal $?="FServe and XDCC Maximum Gets At Once:"
  177. n175=  /set %maxusers $?="Maximum Users On FServe At Once:"
  178. n176=  /set %homedir $sdir="FServe Home Directory"
  179. n177=  /set %wtext $dir="FServe Welcome Text File" c:\
  180. n178=  /set %fdes $?="FServe Ad Description:"
  181. n179=  /set %fadt 300
  182. n180=}
  183. n181=/fsstatusreport {
  184. n182=  /aline @StatusLog ----- FServe Status Report ------
  185. n183=  if (%fson == 1) /aline @StatusLog 5FServe: 3On
  186. n184=  else /aline @StatusLog 5FServe: 3Off
  187. n185=  /if (%mchan1o == 1) /aline @StatusLog 5Channel 1: 3On
  188. n186=  else /aline @StatusLog 5Channel 1: 3Off
  189. n187=  /aline @StatusLog 5Channel 1:3 %mchan1
  190. n188=  /if (%mchan2o == 1) /aline @StatusLog 5Channel 2: 3On
  191. n189=  else /aline @StatusLog 5Channel 2: 3Off
  192. n190=  /aline @StatusLog 5Channel 2:3 %mchan2
  193. n191=  /if (%mchan3o == 1) /aline @StatusLog 5Channel 3: 3On
  194. n192=  else /aline @StatusLog 5Channel 3: 3Off
  195. n193=  /aline @StatusLog 5Channel 3:3 %mchan3
  196. n194=  /if (%mchan4o == 1) /aline @StatusLog 5Channel 4: 3On
  197. n195=  else /aline @StatusLog 5Channel 4: 3Off
  198. n196=  /aline @StatusLog 5Channel 4:3 %mchan4
  199. n197=  /if (%mchan5o == 1) /aline @StatusLog 5Channel 5: 3On
  200. n198=  else /aline @StatusLog 5Channel 5: 3Off
  201. n199=  /aline @StatusLog 5Channel 5:3 %mchan5
  202. n200=  /aline @StatusLog 5FServe Trigger:3 %fstrig
  203. n201=  /aline @StatusLog 5Maximum Gets Per Person:3 %maxgets
  204. n202=  /aline @StatusLog 5Maximum Gets At Once:3 %maxglobal
  205. n203=  /aline @StatusLog 5Maximum Users On At Once:3 %maxusers
  206. n204=  /aline @StatusLog 5Home Directory:3 %homedir
  207. n205=  /aline @StatusLog 5Welcome Text File:3 %wtext
  208. n206=  /aline @StatusLog 5Ad Description:3 %fdes
  209. n207=  /aline @StatusLog 5Ad Timeout:3 %fadt
  210. n208=  /aline @StatusLog 5Total Amount Of People Served:3 %fserved
  211. n209=  /aline @StatusLog 5Total Gets:3 %totalgets
  212. n210=  if (%nlpmg == 1) /aline @StatusLog 5You cannot come on when Max Global Gets are in progress
  213. n211=  else /aline @StatusLog 5You can come on when Max Global Gets are in progress
  214. n212=  if (%cfget == 1) /aline @StatusLog 5The FServe session will be terminated in %cftime seconds after the user gets something
  215. n213=  else /aline @StatusLog 5The FServe session will continue after the user gets something
  216. n214=  if (%fslot == ON) /aline @StatusLog 5All channels that your fserv is on will be sent a notice that an fserv slot is open once one opens up
  217. n215=  else /aline @StatusLog 5All channels that your fserv is on will not be sent a notice that an fserv slot is open once one opens up
  218. n216=  if (%sslot == ON) /aline @StatusLog 5All channels that your fserv is on will be sent a notice that a send slot is open once one opens up
  219. n217=  else /aline @StatusLog 5All channels that your fserv is on will not be sent a notice that a send slot is open once one opens up
  220. n218=  if ($group(#other1) == on) {
  221. n219=    /aline @StatusLog 5Other Directory 1:3 On
  222. n220=    /aline @StatusLog 5Trigger:3 %other1trig
  223. n221=    /aline @StatusLog 5Description:3 %other1desc
  224. n222=    /aline @StatusLog 5Directory:3 %other1dir
  225. n223=  }
  226. n224=  else /aline @StatusLog 5Other Directory 1:3 Off
  227. n225=  if ($group(#other2) == on) {
  228. n226=    /aline @StatusLog 5Other Directory 2:3 On
  229. n227=    /aline @StatusLog 5Trigger:3 %other2trig
  230. n228=    /aline @StatusLog 5Description:3 %other2desc
  231. n229=    /aline @StatusLog 5Directory:3 %other2dir
  232. n230=  }
  233. n231=  else /aline @StatusLog 5Other Directory 2:3 Off
  234. n232=  if ($group(#other3) == on) {
  235. n233=    /aline @StatusLog 5Other Directory 3:3 On
  236. n234=    /aline @StatusLog 5Trigger:3 %other3trig
  237. n235=    /aline @StatusLog 5Description:3 %other3desc
  238. n236=    /aline @StatusLog 5Directory:3 %other3dir
  239. n237=  }
  240. n238=  else /aline @StatusLog 5Other Directory 3:3 Off
  241. n239=}
  242. n240=/et1sr {
  243. n241=  /aline @StatusLog ----- Extra Trigger 1 Status Report -----
  244. n242=  /if (%et1o == 1) /aline @StatusLog 5Extra Trigger 1:3 On
  245. n243=  else /aline @StatusLog 5Extra Trigger 1:3 Off
  246. n244=  /aline @StatusLog 5Trigger:3 %et1trig
  247. n245=  /aline @StatusLog 5File:3 %et1file
  248. n246=  /aline @StatusLog 5Ad Description:3 %et1des
  249. n247=  /aline @StatusLog 5Ad TimeOut:3 %et1to
  250. n248=  /aline @StatusLog 5Main Channel:3 %et1mchan
  251. n249=  /aline @StatusLog 5Total Gets:3 %et1g
  252. n250=  /if (%fggr1 == 1) /aline @StatusLog 5Following Global Gets Rule
  253. n251=  else /aline @StatusLog 5Not Following Global Gets Rule
  254. n252=}
  255. n253=/et2sr {
  256. n254=  /aline @StatusLog ----- Extra Trigger 2 Status Report -----
  257. n255=  /if (%et2o == 1) /aline @StatusLog 5Extra Trigger 2:3 On
  258. n256=  else /aline @StatusLog 5Extra Trigger 2:3 Off
  259. n257=  /aline @StatusLog 5Trigger:3 %et2trig
  260. n258=  /aline @StatusLog 5File:3 %et2file
  261. n259=  /aline @StatusLog 5Ad Description:3 %et2des
  262. n260=  /aline @StatusLog 5Ad TimeOut:3 %et2to
  263. n261=  /aline @StatusLog 5Main Channel:3 %et2mchan
  264. n262=  /aline @StatusLog 5Total Gets:3 %et2g
  265. n263=  /if (%fggr2 == 1) /aline @StatusLog 5Following Global Gets Rule
  266. n264=  else /aline @StatusLog 5Not Following Global Gets Rule
  267. n265=}
  268. n266=/et3sr {
  269. n267=  /aline @StatusLog ----- Extra Trigger 3 Status Report -----
  270. n268=  /if (%et3o == 1) /aline @StatusLog 5Extra Trigger 3:3 On
  271. n269=  else /aline @StatusLog 5Extra Trigger 3:3 Off
  272. n270=  /aline @StatusLog 5Trigger:3 %et3trig
  273. n271=  /aline @StatusLog 5File:3 %et3file
  274. n272=  /aline @StatusLog 5Ad Description:3 %et3des
  275. n273=  /aline @StatusLog 5Ad TimeOut:3 %et3to
  276. n274=  /aline @StatusLog 5Main Channel:3 %et3mchan
  277. n275=  /aline @StatusLog 5Total Gets:3 %et3g
  278. n276=  /if (%fggr3 == 1) /aline @StatusLog 5Following Global Gets Rule
  279. n277=  else /aline @StatusLog 5Not Following Global Gets Rule
  280. n278=}
  281. n279=/et4sr {
  282. n280=  /aline @StatusLog ----- Extra Trigger 4 Status Report -----
  283. n281=  /if (%et4o == 1) /aline @StatusLog 5Extra Trigger 4:3 On
  284. n282=  else /aline @StatusLog 5Extra Trigger 4:3 Off
  285. n283=  /aline @StatusLog 5Trigger:3 %et4trig
  286. n284=  /aline @StatusLog 5File:3 %et4file
  287. n285=  /aline @StatusLog 5Ad Description:3 %et4des
  288. n286=  /aline @StatusLog 5Ad TimeOut:3 %et4to
  289. n287=  /aline @StatusLog 5Main Channel:3 %et4mchan
  290. n288=  /aline @StatusLog 5Total Gets:3 %et4g
  291. n289=  /if (%fggr4 == 1) /aline @StatusLog 5Following Global Gets Rule
  292. n290=  else /aline @StatusLog 5Not Following Global Gets Rule
  293. n291=}
  294. n292=/et5sr {
  295. n293=  /aline @StatusLog ----- Extra Trigger 5 Status Report -----
  296. n294=  /if (%et5o == 1) /aline @StatusLog 5Extra Trigger 5:3 On
  297. n295=  else /aline @StatusLog 5Extra Trigger 5:3 Off
  298. n296=  /aline @StatusLog 5Trigger:3 %et5trig
  299. n297=  /aline @StatusLog 5File:3 %et5file
  300. n298=  /aline @StatusLog 5Ad Description:3 %et5des
  301. n299=  /aline @StatusLog 5Ad TimeOut:3 %et5to
  302. n300=  /aline @StatusLog 5Main Channel:3 %et5mchan
  303. n301=  /aline @StatusLog 5Total Gets:3 %et5g
  304. n302=  /if (%fggr5 == 1) /aline @StatusLog 5Following Global Gets Rule
  305. n303=  else /aline @StatusLog 5Not Following Global Gets Rule
  306. n304=}
  307.