[Aportes indexados] AntiSpeedHack de IAO

Estado
Cerrado para nuevas respuestas.

DarkThom

Oráculo Lvl 3
Bueno miren siempre me olvidava de preguntar esto en el codigo del cliente que barrin libero , en la carpeta "\Codigo\Backup" esta este modulo nose si sirve y si sirve diganme si es bueno

Gracias


antiSh.bas

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Option</span> <span style="color: #b1b100;">Explicit</span></li><li style="" class="li1"><span style="color: #808080;">'NIST SERVERS</span></li><li style="" class="li2"><span style="color: #808080;">'128.138.140.44    utcnist.colorado.edu           University of CO, Boulder</span></li><li style="" class="li1"><span style="color: #808080;">'129.6.15.28       time-a.nist.gov                NIST, Gaithersburg, MD</span></li><li style="" class="li1"><span style="color: #808080;">'129.6.15.29       time-b.nist.gov                NIST, Gaithersburg, MD</span></li><li style="" class="li2"><span style="color: #808080;">'131.107.1.10      time-nw.nist.gov               Microsoft, Redmond, WA</span></li><li style="" class="li1"><span style="color: #808080;">'132.163.4.101     time-a.timefreq.bldrdoc.gov    NIST, Boulder, Colorado</span></li><li style="" class="li1"><span style="color: #808080;">'132.163.4.102     time-b.timefreq.bldrdoc.gov    NIST, Boulder, Colorado</span></li><li style="" class="li2"><span style="color: #808080;">'132.163.4.103     time-c.timefreq.bldrdoc.gov    NIST, Boulder, Colorado</span></li><li style="" class="li1"><span style="color: #808080;">'192.43.244.18     time.nist.gov                  NCAR, Boulder, Colorado</span></li><li style="" class="li1"><span style="color: #808080;">'205.188.185.33    nist1.aol-va.truetime.com      AOL TrueTime, Virginia</span></li><li style="" class="li2"><span style="color: #808080;">'207.126.98.204    nist1-sj.glassey.com           Abovenet, San Jose, CA</span></li><li style="" class="li1"><span style="color: #808080;">'207.200.81.113    nist1.aol-ca.truetime.com      AOL TT, Sunnyvale, CA</span></li><li style="" class="li1"><span style="color: #808080;">'208.184.49.9      nist1-ny.glassey.com           Abovenet, New York City</span></li><li style="" class="li2"><span style="color: #808080;">'216.200.93.8      nist1-dc.glassey.com           Abovenet, Virginia</span></li><li style="" class="li1"><span style="color: #808080;">'66.243.43.21      nist1.datum.com                Datum, San Jose, CA</span></li><li style="" class="li1"><span style="color: #808080;">'132.163.4.102 anda bien</span></li><li style="" class="li2"> </li><li style="" class="li1"><span style="color: #b1b100;">Private</span> <span style="color: #b1b100;">Const</span> MAXIMADIFERENCIA = <span style="color: #cc66cc;">5000</span> <span style="color: #808080;">'diferencia máxima tolerable atribuída al tráfico en la red en ms</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Private</span> <span style="color: #b1b100;">Declare</span> <span style="color: #b1b100;">Function</span> GetTickCount Lib <span style="color: #ffffff;">"kernel32"</span> <span style="color: #66cc66;">(</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Private</span> ZERO <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li2"><span style="color: #b1b100;">Private</span> ULTIMO <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #808080;">'Funciones del cliente</span></li><li style="" class="li2"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Sub</span> GetNistTime<span style="color: #66cc66;">(</span>Optional ip <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span> = <span style="color: #ffffff;">"132.163.4.102"</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"><span style="color: #b1b100;">With</span> frmMain</li><li style="" class="li1">    <span style="color: #b1b100;">If</span> .<span style="color: #66cc66;">WSAntiSH</span>.<span style="color: #66cc66;">State</span> <> sckClosed <span style="color: #b1b100;">Then</span></li><li style="" class="li2">        .<span style="color: #66cc66;">WSAntiSH</span>.<span style="color: #b1b100;">Close</span></li><li style="" class="li1">        <span style="color: #b1b100;">DoEvents</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">    .<span style="color: #66cc66;">WSAntiSH</span>.<span style="color: #66cc66;">RemoteHost</span> = ip</li><li style="" class="li1">    .<span style="color: #66cc66;">WSAntiSH</span>.<span style="color: #66cc66;">RemotePort</span> = <span style="color: #cc66cc;">13</span></li><li style="" class="li1">    .<span style="color: #66cc66;">WSAntiSH</span>.<span style="color: #66cc66;">protocol</span> = sckTCPProtocol</li><li style="" class="li2">    .<span style="color: #66cc66;">WSAntiSH</span>.<span style="color: #66cc66;">Connect</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">With</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Sub</span> AddTime<span style="color: #66cc66;">(</span>tiempo <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"><span style="color: #b1b100;">If</span> ZERO = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    ZERO = tiempo - GetTickCount</li><li style="" class="li2"><span style="color: #b1b100;">Else</span></li><li style="" class="li1">    ULTIMO = tiempo - GetTickCount</li><li style="" class="li1">    SendANTISH</li><li style="" class="li2"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Private</span> <span style="color: #b1b100;">Sub</span> SendANTISH<span style="color: #66cc66;">(</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"><span style="color: #b1b100;">If</span> <span style="color: #66cc66;">(</span>ULTIMO - ZERO<span style="color: #66cc66;">)</span> > MAXIMADIFERENCIA <span style="color: #b1b100;">Or</span> <span style="color: #66cc66;">(</span>ULTIMO - ZERO<span style="color: #66cc66;">)</span> < <span style="color: #66cc66;">(</span><span style="color: #cc66cc;">0</span> - MAXIMADIFERENCIA<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    <span style="color: #808080;">'frmCliente.List2.AddItem "SH+" & ULTIMO - ZERO</span></li><li style="" class="li2">    Debug.<span style="color: #b1b100;">Print</span> <span style="color: #ffffff;">"SH+"</span> & ULTIMO - ZERO</li><li style="" class="li1"><span style="color: #b1b100;">Else</span></li><li style="" class="li1">    <span style="color: #808080;">'frmCliente.List2.AddItem "SH-" & ULTIMO - ZERO</span></li><li style="" class="li2">    Debug.<span style="color: #b1b100;">Print</span> <span style="color: #ffffff;">"SH-"</span> & ULTIMO - ZERO</li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2"> </li></ol></div>[/vb]

Me Parece que no sirve pero we
 
A

Anonymous

Invitado
Ese es el Anti-SH de Barrin que estaba para descargar en UASU y otros lados...
¿Sirve? En aquellas épocas sería para los SH que habían, o sea los que te aceleraban todo lodo lo que tenias abierto. Ahora para el Engine no creo que sirva...

Creo que sacaba un Tick y de internet sacaba la hora universal, dejaba pasar un tiempo controlado por este GetTickCount y lo comparaba con la hora en internet de nuevo, si eran iguales no tenia SH. (Por ahí mande fruta).
 

Pocho

Oráculo Lvl 3
claro q sirve... y anda mucho mejor de lo q pensas, es anti Engine y otros, busca, en el de uasu trae ejemplo de uso
 
Estado
Cerrado para nuevas respuestas.
Arriba