Unnamed

alias click_trader_config {
  ;Set Your Sites, Max 15
  var %sites = TV;MP;PR;RF;SE;SN;SP;ST

  ;Set Your Sections, Max 18
  var %sections = DVDR;X264;XVID;MDVDR;GAMES;PS2;WII;XBOX360;XXX;XXXDVDR;TV-DVDR;TV-X264;TV-XVID

  ;Do not edit anything below this line
  ;----------------------------------------------------------
  if ($1 == sites) return %sites
  if ($1 == sections) return %sections
}

on ^*:hotlink:*:#tvland-pre:return

on *:hotlink:*:#tvland-pre {
  set %click_trader_rls $1
  var %tokens = $numtok($hotline, 32) | var %x = 1
  while (%x <= %tokens) {
    if ($gettok($hotline, %x, 32) == .:) set %click_trader_sec $gettok($hotline, $calc(%x + 1), 32)
    inc %x
  }
  if ($dialog(click_trader) == $null) dialog -m click_trader click_trader
  else $click_trader_init(false)
}

dialog click_trader {
  title "Click Trader For smokin1 By XceL"
  size -1 -1 353 108
  option dbu

  button "Go", 1, 280 74 70 31
  button "Clear", 2, 280 43 70 31

  text "Pre:", 3, 5 7 20 8
  edit "", 4, 20 5 330 10
  box "Sections", 5, 5 18 135 75
  radio "", 6, 7 30 41 8, group hide
  radio "", 7, 7 40 41 8, hide
  radio "", 8, 7 50 41 8, hide
  radio "", 9, 7 60 41 8, hide
  radio "", 10, 7 70 41 8, hide
  radio "", 11, 7 80 41 8, hide
  radio "", 12, 50 30 41 8, hide
  radio "", 13, 50 40 41 8, hide
  radio "", 14, 50 50 41 8, hide
  radio "", 15, 50 60 41 8, hide
  radio "", 16, 50 70 41 8, hide
  radio "", 17, 50 80 41 8, hide
  radio "", 18, 95 30 41 8, hide
  radio "", 19, 95 40 41 8, hide
  radio "", 20, 95 50 41 8, hide
  radio "", 21, 95 60 41 8, hide
  radio "", 22, 95 70 41 8, hide
  radio "", 23, 95 80 41 8, hide
  box "Sites", 24, 145 18 130 75
  button "", 25, 147 29 40 12, hide
  button "", 26, 147 41 40 12, hide
  button "", 27, 147 53 40 12, hide
  button "", 28, 147 65 40 12, hide
  button "", 29, 190 29 40 12, hide
  button "", 30, 190 41 40 12, hide
  button "", 31, 190 53 40 12, hide
  button "", 32, 190 65 40 12, hide
  button "", 33, 233 29 40 12, hide
  button "", 34, 233 41 40 12, hide
  button "", 35, 233 53 40 12, hide
  button "", 36, 233 65 40 12, hide
  edit "", 37, 147 81 126 10
  text "Race Line:", 38, 5 97 40 8
  radio "RUSHDLL1", 39, 45 97 40 8, group
  radio "RUSHDLL2", 40, 90 97 40 8
  radio "RUSHDLL3", 41, 135 97 40 8
  radio "RUSHDLL4", 42, 180 97 40 8
  radio "RUSHDLL5", 43, 225 97 40 8
  button "Stop Active Transfers", 44, 280 17 70 13
  button "Disconnect Idle Sites", 45, 280 30 70 13
}

alias click_trader_init {
  var %x = 1 | var %tokens | var %base_section = 5 | var %token | var %base_site = 24
  %tokens = $numtok($click_trader_config(sections), 59)
  while (%x <= %tokens) {
    %token = $gettok($click_trader_config(sections), %x, 59) | did -u click_trader $calc(%base_section + %x)
    if (%click_trader_sec == %token) { did -vca click_trader $calc(%base_section + %x) %token | did -c click_trader $calc(%base_section + %x) }
    else { did -va click_trader $calc(%base_section + %x) %token }
    inc %x
  }
  if ($1 == true) {
    %tokens = $numtok($click_trader_config(sites), 59) | %x = 1
    while (%x <= %tokens) {
      %token = $gettok($click_trader_config(sites), %x, 59)
      did -va click_trader $calc(%base_site + %x) %token
      inc %x
    }
    did -c click_trader 39
  }
  did -ram click_trader 4 %click_trader_rls
  did -m click_trader 37
  unset %click_trader_rls | unset %click_trader_sec
}

on *:dialog:click_trader:init:0:$click_trader_init(true)
on *:dialog:click_trader:sclick:25,26,27,28,29,30,31,32,33,34,35,36:did -a click_trader 37 $did($did) $+ $chr(59)
on *:dialog:click_trader:sclick:2:did -r click_trader 37
on *:dialog:click_trader:sclick:44:dll rushmirc.dll RushScript RushApp.FTP.RemoveQueue('', '', '', RS_TRANSFER or RS_NORMAL or RS_WAITING or RS_FAIL)
on *:dialog:click_trader:sclick:45:{ dll rushmirc.dll RushScript RushApp.FTP.Logout('', 0) | dll rushmirc.dll RushScript RushApp.DeleteEmptyTabs('', 0) }

on *:dialog:click_trader:sclick:1: {
  var %x = 6 | var %sec | while (%x < 24) { if ($did(%x).state == 1) { %sec = $did(%x) } | inc %x }
  if ($did(39).state) dll rushmirc.dll RushScript RushApp.FTP.Transfer(0, '', '', '', ' $+ $left($did(37), -1) $+ ', ' $+ %sec $+ ', ' $+ $did(4) $+ ', RS_LOGIN OR RS_CHECKLOGIN, 'CD1;CD2;CD3;CD4;CD5;CD6;CD7;CD8;CD9', '', '', '', '(\w*100%\w*)|(\w*-\sCOMPLETE(\s(\)|-)|D\))\w*)', 500, 1, 2, 'RS_SORTSIZE', 'RS_SORTSIZE', 2, 0)
  elseif ($did(40).state) dll rushmirc.dll RushScript RushApp.FTP.Transfer(0, '', '', '', ' $+ $left($did(37), -1) $+ ', ' $+ %sec $+ ', ' $+ $did(4) $+ ', RS_LOGIN OR RS_CHECKLOGIN, '', '', '', '', '(\w*100%\w*)|(\w*-\sCOMPLETE(\s(\)|-)|D\))\w*)', 500, 1, 2, 'RS_SORTSIZE', 'RS_SORTSIZE', 2, 0)
  elseif ($did(41).state) dll rushmirc.dll RushScript
  elseif ($did(42).state) dll rushmirc.dll RushScript
  elseif ($did(43).state) dll rushmirc.dll RushScript
}