Alias CloneX {
  If ($Dialog(p.cloning)) { Dialog -v p.cloning }
  Else { Dialog -md p.cloning p.cloning }
}
dialog p.cloning {
  title "CloneX"
  size -1 -1 696 560
  option pixels
  tab "Connection", 200, 8 8 679 543
  box "Server", 8, 24 56 244 76, tab 200
  text "Server:", 9, 32 78 42 16, tab 200
  edit "", 10, 72 76 188 21, tab 200 autohs
  text "Server Port:", 1, 32 104 66 16, tab 200
  box "Nickname Settings", 34, 24 136 244 68, tab 200
  radio "", 35, 32 152 12 20, tab 200
  radio "Other:", 36, 32 176 52 20, tab 200
  edit "", 38, 88 176 172 21, tab 200 autohs
  combo 12, 100 100 160 132, tab 200 size edit drop
  box "Connection Statistics", 39, 16 360 260 76, tab 200
  text "Number of Clones Connected:", 40, 24 384 154 16, tab 200
  text "Total amount of Connections:", 42, 24 408 154 16, tab 200
  text "-", 41, 184 384 82 16, tab 200
  text "-", 43, 184 408 82 16, tab 200
  text "Number of Clones to Connect:", 49, 24 272 146 16, tab 200
  text "Protocol to Connect through:", 215, 24 296 146 16, tab 200
  text "Delay between Connections:", 390, 24 320 146 16, tab 200
  combo 50, 176 272 88 180, tab 200 size drop
  combo 47, 176 296 88 108, tab 200 size drop
  combo 391, 176 320 88 148, tab 200 size drop
  box "Connection Status", 219, 280 40 396 500, tab 200
  edit "", 44, 288 56 380 445, tab 200 read multi autohs vsbar
  button "Clear Status Window", 53, 288 504 379 25, tab 200
  button "Connect", 48, 16 440 259 25, disable tab 200
  button "Connect with Nicklist", 3000, 16 472 259 25, tab 200
  button "Disconnect All", 52, 16 512 259 25, tab 200
  combo 37, 48 152 216 116, tab 200 size drop
  box "PreLoad Settings", 51, 16 40 260 316, tab 200
  box "User Modes", 54, 24 208 244 52, tab 200
  text "On connect user mode:", 57, 32 232 114 16, tab 200
  edit "+id", 58, 152 228 108 21, tab 200
  tab "Firewall", 201
  box "Socks 4", 234, 240 40 212 500, tab 201
  box "Socks 5", 235, 464 40 212 500 , tab 201
  box "HTTP Proxy", 236, 16 40 212 500 , tab 201
  text "Host/IP:", 55, 24 58 42 16, tab 201
  text "Port:", 56, 24 82 26 16, tab 201
  edit "", 3, 56 80 164 21, tab 201 autohs
  edit "", 2, 72 56 148 21, tab 201 autohs
  text "Host/IP:", 65, 248 58 42 16, tab 201
  edit "", 66, 296 56 148 21, tab 201 autohs
  text "Port:", 67, 248 82 26 16, tab 201
  edit "", 68, 280 80 164 21, tab 201 autohs
  button "Import", 6, 128 104 91 17, tab 201
  button "Remove All", 244, 128 120 91 17, tab 201
  button "Add", 5, 24 104 91 17, tab 201
  button "Add", 70, 248 104 91 17, tab 201
  button "Remove", 72, 248 120 91 17, tab 201
  button "Import", 71, 352 104 91 17, tab 201
  button "Remove All", 256, 352 120 91 17, tab 201
  button "Remove", 7, 24 120 91 17, tab 201
  text "Host/IP:", 74, 472 58 42 16, tab 201
  edit "", 75, 520 56 148 21, tab 201 autohs
  text "Port:", 76, 472 82 26 16, tab 201
  edit "", 77, 504 80 164 21, tab 201 autohs
  button "Add", 79, 472 104 91 17, tab 201
  button "Remove", 81, 472 120 91 17, tab 201
  button "Import", 80, 576 104 91 17, tab 201
  button "Remove All", 265, 576 120 91 17, tab 201
  list 78, 472 144 196 388, tab 201 size hsbar vsbar
  list 69, 248 144 196 388, tab 201 size hsbar vsbar
  list 4, 24 144 196 388, tab 201 size hsbar vsbar
  tab "Actions", 202
  box "Actions", 305, 192 40 484 276, tab 202
  button "Join", 306, 200 56 67 17, disable tab 202
  button "Part", 307, 200 80 67 17, disable tab 202
  button "CTCP", 309, 200 232 67 17, disable tab 202
  button "Message", 310, 200 136 67 17, disable tab 202
  button "Notice", 311, 200 160 67 17, disable tab 202
  button "Other Command", 312, 200 288 107 17, disable tab 202
  edit "", 314, 272 56 84 21, disable tab 202 autohs
  edit "", 316, 272 80 84 21, disable tab 202 autohs
  edit "", 320, 272 232 84 21, disable tab 202 autohs
  edit "", 322, 272 136 84 21, disable tab 202 autohs
  edit "", 326, 272 160 84 21, disable tab 202 autohs
  edit "", 329, 312 288 356 21, disable tab 202 autohs
  text "Message:", 323, 360 136 50 16, tab 202
  text "Message:", 327, 360 160 50 16, tab 202
  edit "", 324, 416 136 252 21, disable tab 202 autohs
  edit "", 328, 416 160 252 21, disable tab 202 autohs
  button "Change", 330, 584 376 83 17, disable tab 202
  edit "Random", 331, 584 392 84 21, disable tab 202 autohs
  box "Nicks to Perform the Actions:", 332, 24 376 156 76, tab 202
  edit "", 783, 416 80 252 21, disable tab 202 autohs
  text "Message:", 784, 360 80 50 16, tab 202
  radio "All", 333, 104 392 36 20, disable tab 202
  radio "Selected", 334, 104 408 60 20, disable tab 202
  radio "Group 1", 335, 32 392 60 20, disable tab 202
  radio "Group 2", 336, 32 408 60 20, disable tab 202
  radio "Group 3", 337, 32 424 60 20, disable tab 202
  box "Nick List", 338, 16 40 172 500, tab 202
  list 339, 24 56 156 316, disable tab 202 size extsel vsbar
  list 373, 456 384 108 148, disable tab 202 size vsbar
  list 369, 328 384 108 148, disable tab 202 size vsbar
  list 351, 200 368 108 164, disable tab 202 size vsbar
  button "Move to Group 1 >", 340, 24 464 155 17, disable tab 202
  button "Move to Group 2 >", 341, 24 488 155 17, disable tab 202
  button "Move to Group 3 >", 342, 24 512 155 17, disable tab 202
  box "Group 1", 348, 192 320 124 220, tab 202
  box "Group 2", 366, 320 320 124 220, tab 202
  box "Group 3", 370, 448 320 124 220, tab 202
  button "Remove", 349, 200 336 107 17, disable tab 202
  button "Remove All", 350, 200 352 107 17, disable tab 202
  button "Remove", 367, 328 336 107 17, disable tab 202
  button "Remove All", 368, 328 352 107 17, disable tab 202
  button "Remove", 371, 456 336 107 17, disable tab 202
  button "Remove All", 372, 456 352 107 17, disable tab 202
  button "Quit", 11, 200 264 67 17, disable tab 202
  edit "", 13, 272 264 396 21, disable tab 202 autohs
  edit "", 18, 400 232 268 21, disable tab 202 autohs
  text "CTCP:", 19, 360 232 34 16, tab 202
  button "Nicklist", 20, 584 472 83 17, disable tab 202
  text "Channel key when Channel's +k:", 22, 360 56 162 16, tab 202
  edit "", 23, 528 56 140 21, disable tab 202
  button "Describe", 24, 200 184 67 17, disable tab 202
  edit "", 25, 272 184 84 21, disable tab 202 autohs
  text "Message:", 26, 360 184 50 16, tab 202
  edit "", 27, 416 184 252 21, disable tab 202 autohs
  button "Join Part", 28, 200 104 67 17, disable tab 202
  edit "", 29, 272 104 84 21, disable tab 202 autohs
  text "Message:", 30, 360 104 50 16, tab 202
  edit "", 31, 416 104 252 21, disable tab 202 autohs
  text "Change nickname using Nicklist:", 21, 584 432 90 32, tab 202
  box "Nickname", 14, 576 352 100 188, tab 202
  button "All 3", 15, 200 208 67 17, disable tab 202
  edit "", 16, 272 208 84 21, disable tab 202 autohs
  edit "", 17, 416 208 252 21, disable tab 202 autohs
  text "Message:", 32, 360 208 50 16, tab 202
  text "Nicklist Format: <Nick> [Ident]", 33, 584 496 82 32, tab 202
  check "Reply to CTCPs", 46, 576 328 92 20, tab 202
  menu "File", 403
  item "Quit", 476, 403, cancel
  menu "Specials", 411
  item "Ip-Ports", 412, 411
  menu "Nick List", 413, 411
  menu "Change Nick", 414, 413
  item "Default List", 415, 414
  item "Select List", 416, 414
  menu "Safeguard Nicks", 417, 413
  item "Default List", 418, 417
  item "Select List", 419, 417
  menu "Connect with List", 420, 413
  item "Default List", 421, 420
  item "Select List", 422, 420
}
 
On *:Dialog:p.cloning:Edit:*: {
  If ($Did == 2) || ($Did == 3) { p.clon.fire.secl 2 3 5 }
  If ($Did == 66) || ($Did == 68) { p.clon.fire.secl 66 68 70 }
  If ($Did == 75) || ($Did == 77) { p.clon.fire.secl 75 77 79 }
  If ($Did == 10) || ($Did == 12) || ($Did == 38) || ($Did == 50) { P.Cloning.conEcheck }
  If ($Did == 38) { If ($len($Did($DName,38)) > 10) { P.Cloning.fal Nickname cannot exceed 10 Characters. | Did -r $DName 38 } }
  If ($Did == 314) {   
    If (& iswm $Did($DName,$Did).Text) && ($Left($Did($DName,$Did).Text,1) == $chr(35)) Did -e $DName 306
    Else Did -b $DName 306 
  }
  If ($Did == 29) {
    If (& iswm $Did($DName,$Did).Text) && ($Left($Did($DName,$Did).Text,1) == $chr(35)) Did -e $DName 28
    Else Did -b $DName 28
  }
  If ($Did == 316) { 
    If (& iswm $Did($DName,$Did).Text) && ($Left($Did($DName,$Did).Text,1) == $chr(35)) { Did -e $DName 307 }
    Else { Did -b $DName 307 }
  }
  If ($Did == 320) { 
    If (& iswm $Did($DName,$Did).Text) && (* iswm $Did($DName,18).Text) Did -e $DName 309
    Else Did -b $DName 309
  }
  If ($Did == 322) || ($Did == 324) { 
    If (& iswm $Did($DName,322).Text) && (* iswm $Did($DName,324).Text) Did -e $DName 310
    Else Did -b $DName 310 
  }
  If ($Did == 326) || ($Did == 328) { 
    If (& iswm $Did($DName,326).Text) && (* iswm $Did($DName,328).Text) Did -e $DName 311
    Else Did -b $DName 311 
  }
  If ($Did == 25) || ($Did == 27) { 
    If (& iswm $Did($DName,25).Text) && (* iswm $Did($DName,27).Text) Did -e $DName 24
    Else Did -b $DName 24
  }
  If ($Did == 16) || ($Did == 17) { 
    If (& iswm $Did($DName,16).Text) && (* iswm $Did($DName,17).Text) Did -e $DName 15
    Else Did -b $DName 15
  }
  If ($Did == 320) || ($Did == 18) { 
    If (& iswm $Did($DName,320).Text) && (* iswm $Did($DName,18).Text) Did -e $DName 309
    Else Did -b $DName 309
  }
  If ($Did == 329) { 
    If (* iswm $Did($DName,$Did).Text) Did -e $DName 312
    Else Did -b $DName 312
  }
  If ($Did == 331) {
    If (& iswm $Did($DName,$Did).Text) Did -e $DName 330
    Else Did -b $DName 330
  }
}
Alias -l P.Cloning.conEcheck {
  If ($Dialog(p.cloning)) {
    If (??* iswm $Did($DName,10)) && ($abs($Did($DName,12)) != 0) && ($abs($Did($DName,50)) != 0) { 
      If ($Did($DName,36).state == 0) { Did -e $DName 48 | Did -e $DName 421 | Did -e $DName 422 }
      Elseif ($Did($DName,38)) { Did -e $DName 48 | Did -e $DName 421 | Did -e $DName 422 }
      Else { If ($Did($DName,48).enabled == $True) { Did -b $DName 48 | Did -b $DName 421 | Did -b $DName 422 } }
    }
    Elseif ($Did($DName,48).enabled == $True) { Did -b $DName 48 | Did -b $DName 421 | Did -b $DName 422 }
  }
}
Alias -l p.clon.fire.secl {
  If ($Dialog(p.cloning)) {
    If (??* iswm $Did($DName,$1)) && ($abs($Did($DName,$2)) != 0) && ($Did($DName,$2)) { Did -e $DName $$3 }
    Elseif ($Did($DName,$$3).enabled == $True) { Did -b $DName $$3 }
  }
}
Alias -l p.clon.fire.secl1 {
  Var %p.clon.fire.secl1 = $Did($DName,$2) $Did($DName,$$3)
  If ($Dialog(p.cloning)) && (!$Didwm($DName,$1,%p.clon.fire.secl1)) { Did -i $DName $1 $calc($Did($DName,$1).lines + 1) %p.clon.fire.secl1 }
}
Alias -l P.Cloning.fire.secl2 { If ($Dialog(p.cloning)) { Did -d $DName $1 $$Did($DName,$1).sel } }
Alias -l P.Cloning.fire.secl3 {
  If ($Dialog(p.cloning)) {
    Var %P.Cloning.proFile = $SFile($iif(%p.save.cloning.lstPath,%p.save.cloning.lstPath,C:\),Select,Import)
    If (%P.Cloning.proFile) {
      Set %p.save.cloning.lstPath $nofile(%P.Cloning.proFile)
      Var %I = 1
      While (%I <= $Lines(%P.Cloning.proFile)) {
        Var %P.Cloning.proFile.p = $read(%P.Cloning.proFile,%I)
        If ($Gettok(%P.Cloning.proFile.p,0,58) == 2) { Var %P.Cloning.proFile.p = $Gettok(%P.Cloning.proFile.p,1,58) $Gettok(%P.Cloning.proFile.p,2,58) }
        If (($Gettok(%P.Cloning.proFile.p,0,32) != 2) || ($abs($Gettok(%P.Cloning.proFile.p,2,32)) == 0)) { P.Cloning.fal The Proxy File must have the Proxy and the Port in this order: one.proxy.com 8080 OR other.proxy.com:8080 | return }
        If (%P.Cloning.proFile.p) && (!$Didwm($DName,$1,%P.Cloning.proFile.p)) { Did -i $DName $1 $calc($Did($DName,$1).lines + 1) %P.Cloning.proFile.p }
        Inc %I
      }
      Unset %P.Cloning.proFile.p
    }
  }
}
Alias -l P.Cloning.ddnsd {
  If ($Dialog(p.cloning)) {
    If ($Did(p.cloning,47).Text == Socks 4) || ($Did(p.cloning,47).Text == Socks 5) {
      .enable #P.Cloning.DdnsD
      .dns $Did(p.cloning,10).Text
      p.clon.stats -Resolving Host/Ip... $time
    }
    Else { P.Cloning.jj }   
  }
}
#P.Cloning.DdnsD off
On *:DNS: {
  If ($Dialog(p.cloning)) {
    Did -o p.cloning 10 1 $Iif($iaddress,$iaddress,$naddress)
    .disable #P.Cloning.DdnsD
    p.clon.stats -Resolved to $Iif($iaddress,$iaddress,$naddress) at $time
    p.clon.stats -
    P.Cloning.jj
  }
  Haltdef
}
#P.Cloning.DdnsD end
On *:Dialog:p.cloning:sclick:*: {
  If ($Did == 53) { Did -r $DName 44 }
  If ($Did == 36) { If ($Did($DName,36).state == 1) && ($Did($DName,38) == $null) { Did -b $DName 48 | Did -b $DName 421 | Did -b $DName 422 } }
  If ($Did == 35) { If ($Did($DName,5).enabled == $False) { Did -e $DName 48 | Did -e $DName 421 | Did -e $DName 422 } }
  If ($Did == 70) { p.clon.fire.secl1 69 66 68 }
  If ($Did == 79) { p.clon.fire.secl1 78 75 77 }
  If ($Did == 72) { P.Cloning.fire.secl2 69 }
  If ($Did == 81) { P.Cloning.fire.secl2 78 }
  If ($Did == 5) { p.clon.fire.secl1 4 2 3 }
  If ($Did == 6) { P.Cloning.fire.secl3 4 }
  If ($Did == 7) { P.Cloning.fire.secl2 4 }
  If ($Did == 71) { P.Cloning.fire.secl3 69 }
  If ($Did == 80) { P.Cloning.fire.secl3 78 }
  If ($Did == 48) { Unset %P.Cloning.Nlist.conn* | P.Cloning.ddnsd }
  If ($Did == 52) {
    If ($Sock(p.cloning*)) { .SockWrite -nt P.Cloning.* Quit | .timerPCloning.out 1 1 .sockclose P.Cloning.* }
    If ($hget(P.Cloning.a)) { hfree P.Cloning.a }
    .timerP.Cloning.Recr off
    P.Cloning.recr 1
    Unset %P.Cloning.pn %P.Cloning.t | .timerP.Cloning.* off | p.clon.stats | P.Cloning.cmds
  }
  If ($Did == 339) {
    If ($Did($DName,$Did).sel) { Did -e $DName 340 | Did -e $DName 341 | Did -e $DName 342 }
    Else { Did -b $DName 340 | Did -b $DName 341 | Did -b $DName 342 }  
  }
  If ($Did == 244) { Did -r $DName 4 }
  If ($Did == 256) { Did -r $DName 69 }
  If ($Did == 265) { Did -r $DName 78 }
  If ($Did == 340) && ($Did($DName,339).sel) { P.Cloning.nick.gr.ad 351 }
  If ($Did == 341) && ($Did($DName,339).sel) { P.Cloning.nick.gr.ad 369 }
  If ($Did == 342) && ($Did($DName,339).sel) { P.Cloning.nick.gr.ad 373 }
  If ($Did == 349) { Did -d $DName 351 $$Did($DName,351).sel }
  If ($Did == 367) { Did -d $DName 369 $$Did($DName,369).sel }
  If ($Did == 371) { Did -d $DName 373 $$Did($DName,373).sel }
  If ($Did == 350) { Did -r $DName 351 }
  If ($Did == 368) { Did -r $DName 369 }
  If ($Did == 372) { Did -r $DName 373 }
  If ($Did == 28) { P.Cloning.runcmd JOIN $Did($DName,29).Text | P.Cloning.runcmd PART $Did($DName,29).Text : $+ $Did($DName,31).Text }
  If ($Did == 11) { P.Cloning.runcmd Quit : $+ $Did($DName,13).Text }
  If ($Did == 24) { P.Cloning.runcmd PRIVMSG $Did($DName,25).Text :ACTION $Did($DName,27).Text $+  }
  If ($Did == 15) {
    P.Cloning.runcmd PRIVMSG $Did($DName,16).Text : $+ $Did($DName,17).Text
    P.Cloning.runcmd NOTICE $Did($DName,16).Text : $+ $Did($DName,17).Text
    P.Cloning.runcmd PRIVMSG $Did($DName,16).Text :ACTION $Did($DName,17).Text $+ 
  }
  If ($Did == 306) { P.Cloning.runcmd JOIN $Did($DName,314).Text $Did($DName,23).Text }
  If ($Did == 307) { P.Cloning.runcmd PART $Did($DName,316).Text : $+  $Did($DName,783).Text }
  If ($Did == 309) { P.Cloning.runcmd PRIVMSG $Did($DName,320).Text : $+ $chr(1) $+ $Did($DName,18).Text $+ $chr(1) }
  If ($Did == 310) { P.Cloning.runcmd PRIVMSG $Did($DName,322).Text : $+ $Did($DName,324).Text }
  If ($Did == 311) { P.Cloning.runcmd NOTICE $Did($DName,326).Text : $+ $Did($DName,328).Text }
  If ($Did == 312) { P.Cloning.runcmd $Did($DName,329).Text }
  If ($Did == 330) { P.Cloning.runcmd NICK $Did($DName,331).Text }
  If ($Did == 20) { P.Cloning.list.nicksch $SFile($mircdir,"Select") }
  If ($Did == 3000) {
    Unset %P.Cloning.Nlist.conn*
    Set %P.Cloning.Nlist.conn 1
    Set %P.Cloning.Nlist.conn.f $SFile($mircdir,"Choose File")
    If (%P.Cloning.Nlist.conn.f) { P.Cloning.ddnsd }    
  }
}
On *:Dialog:p.cloning:menu:*: {
  If ($Did == 476) { Set %p.save.cloning.srv $Did($DName,10).Text }
  If ($Did == 412) { P.Cloning.ipports }
  If ($Did == 415) { P.Cloning.list.nicksch $mircdirClXNickList.cfg }
  If ($Did == 416) { P.Cloning.list.nicksch $SFile($mircdir,"Select") }
  If ($Did == 418) { P.Cloning.list.save $mircdirClXNickList.cfg }
  If ($Did == 419) { P.Cloning.list.save $SFile($mircdir,"Seclect",Select) }
  If ($Did == 421) { 
    Unset %P.Cloning.Nlist.conn*
    Set %P.Cloning.Nlist.conn 1
    If ($exists($mircdirClXNickList.cfg) == $False) { P.Cloning.fal File not Found }
    Set %P.Cloning.Nlist.conn.f $mircdirClXNickList.cfg 
    P.Cloning.ddnsd 
  }
  If ($Did == 422) { 
    Unset %P.Cloning.Nlist.conn*
    Set %P.Cloning.Nlist.conn 1
    Set %P.Cloning.Nlist.conn.f $SFile($mircdir,"Choose File")
    If (%P.Cloning.Nlist.conn.f) { P.Cloning.ddnsd }    
  }
}
Alias -l P.Cloning.nick.gr.ad {
  If ($Dialog(p.cloning)) {
    Var %I = 1
    While ($Did(p.cloning,339,$Did(p.cloning,339,%I).sel).Text) {
      Var %P.Cloning.adgr1.nicks = $IfMatch
      If (!$Didwm(p.cloning,$1,%P.Cloning.adgr1.nicks)) { Did -i p.cloning $1 $calc($Did(p.cloning,$1).lines + 1) %P.Cloning.adgr1.nicks }
      Inc %I
    }
  }
}
Alias -l P.Cloning.jj {
  If ($Did(p.cloning,47).Text == Normal) { p.clon.do } 
  Elseif ($Did(p.cloning,47).Text == Proxy) { 
    If (!$Did(p.cloning,4,1)) { P.Cloning.fal Please add Proxies to the Proxy list. | P.Cloning.recr 1 | Return }
    p.clon.do 
  }
  Elseif ($Did(p.cloning,47).Text == Socks 4) { 
    If (!$Did(p.cloning,69,1)) { P.Cloning.fal Please add Proxies to the Socks 4 list. | P.Cloning.recr 1 | Return }
    p.clon.do 
  }
  Elseif ($Did(p.cloning,47).Text == Socks 5) { 
    If (!$Did(p.cloning,78,1)) { P.Cloning.fal Please add Proxies to the Socks 5 list. | P.Cloning.recr 1 | Return }
    p.clon.do 
  }
}
Alias -l p.clon.dodo {
  If ($Dialog(p.cloning)) && (!$Sock($1)) {
    P.Cloning.do.w $1 0,0
    .sockopen $1- 
    If ($Did(p.cloning,47).Text == Normal) { Var %p.clon.dodo = *Socket -Normal-: }
    If ($Did(p.cloning,47).Text == Proxy) { Var %p.clon.dodo = *Socket -Proxy-: }
    If ($Did(p.cloning,47).Text == Socks 4) { Var %p.clon.dodo = *Socket -Socks 4-: }
    If ($Did(p.cloning,47).Text == Socks 5) { Var %p.clon.dodo = *Socket -Socks 5-: }
    p.clon.stats %p.clon.dodo $Did(p.cloning,10) $Did(p.cloning,12) 
  }
}
Alias -l p.clon.do {
  If ($Dialog(p.cloning)) {
    P.Cloning.recr 0
    Var %P.Cloning.delay = $Did(p.cloning,391).Text
    If ($Did(p.cloning,47).Text == Normal) {
      Var %I = 1
      While (%I <= $Did(p.cloning,50).Text) {
        Inc %P.Cloning.t
        .timerP.Cloning. [ $+ [ %P.Cloning.t ] ] 1 $calc($iif(%I == 1,0,%I) * %P.Cloning.delay) p.clon.dodo P.Cloning. [ $+ [ %P.Cloning.t ] ] $Did(p.cloning,10) $Did(p.cloning,12)
        Inc %I
      }    
      .timerP.Cloning.Recr. [ $+ [ $rand(1,9999) ] ] 1 $calc(%I * %P.Cloning.delay) P.Cloning.recr 1
      P.Cloning.recr 0 
    }
    Elseif ($Did(p.cloning,47).Text == Proxy) {
      Var %I = 1
      While (%I <= $Did(p.cloning,50).Text) {
        If ($Did(p.cloning,4,$calc(%P.Cloning.pn + 1))) { Inc %P.Cloning.pn }
        Elseif ($Did(p.cloning,4,1)) { Set %P.Cloning.pn 1 }
        Else { P.Cloning.fal Not Proxies. Configure. | Return }
        Inc %P.Cloning.t
        .timerP.Cloning. [ $+ [ %P.Cloning.t ] ] 1 $calc($iif(%I == 1,0,%I) * %P.Cloning.delay) p.clon.dodo P.Cloning. [ $+ [ %P.Cloning.t ] ] $Gettok($Did(p.cloning,4,%P.Cloning.pn),1,32) $Gettok($Did(p.cloning,4,%P.Cloning.pn),2,32)
        Inc %I
      }   
      .timerP.Cloning.Recr. [ $+ [ $rand(1,9999) ] ] 1 $calc(%I * %P.Cloning.delay) P.Cloning.recr 1 
      P.Cloning.recr 0
    }
    Elseif ($Did(p.cloning,47).Text == Socks 4) { 
      Var %I = 1
      While (%I <= $Did(p.cloning,50).Text) {
        If ($Did(p.cloning,69,$calc(%P.Cloning.pn4 + 1))) { Inc %P.Cloning.pn4 }
        Elseif ($Did(p.cloning,69,1)) { Set %P.Cloning.pn4 1 }