BorderGame
Bot esse e Shacker - Versione stampabile

+- BorderGame (https://www.bordergame.it)
+-- Forum: Off Topic (/Forum-Off-Topic)
+--- Forum: Off-Topic (/Forum-Off-Topic--27)
+--- Discussione: Bot esse e Shacker (/Thread-Bot-esse-e-Shacker)



Bot esse e Shacker - Lama Power - 17-06-2013 05:45 PM

Ciao ragazzi, parlando di bot minigame, l'ultimo uscito quello "di esse e emme"
non credete che assomigli esageratamente a quel fantastico bot che è stato creato da il nostro amato Shacker?


Io penso che:

Il Bot di esse sia stato fatto sulla base di quello di shacker, questa cosa la dico anche con una certa certezza dato che gran parte della GUI del programma è identica

Piccola parte di Source bot esse:
Codice:
Func Fn0035($__01, $__02, $__03, $__04, $__05, $__06, ByRef $__07, ByRef $__08, $__09)
If $__09 > 0 Then $__01 = "*" & $__09 & " " & $__01
Dim $a4f34104a31[1]
$a4f34104a31 = DllCall("funzioni.dll", "str", "ImageSearch", "int", $__03, "int", $__04, "int", $__05, "int", $__06, "str", $__01)
If $a4f34104a31[0] = "0" Then Return 0
$a0534e02b1a = StringSplit($a4f34104a31[0], "|")
$__07 = Int(Number($a0534e02b1a[2]))
$__08 = Int(Number($a0534e02b1a[3]))
If $__02 = 1 Then
$__07 = $__07 + Int(Number($a0534e02b1a[4]) / 2)
$__08 = $__08 + Int(Number($a0534e02b1a[5]) / 2)
EndIf
Return 1
EndFunc

$a5a44900946 = "Livello 1"
$a1d44b02602 = "Livello 2"
$a1e44d02c3f = "Livello 3"
$a1a44f02646 = "Livello 4"
$a5454103660 = "Livello 5"
$a4c54300838 = "File"
$a3854501d41 = "Avvia"
$a325470292e = "Chiudi"
$a5854902813 = "Aiuto"
$a5354b05538 = "Aiuto F1"
$a2d54d03036 = "Attivo"
$a0054f0255d = "ImpVar0184sibile avviare il bot!"
$a046410345d = "Controlla la tua connessione ad internet o se il bot è stato fixato."
$a0a64306162 = "Ritira"
$a6264503148 = "Auto coupon"
$a1164701739 = "Produzione"
$a5464900d33 = "x2 Ricompensa"
$a6264b02953 = "About xBot"
$a4964d03717 = "Fatto da:"
$a1a64f03f58 = "Sito web:"
$a5974102134 = "Logs"
$a5e74301952 = "Apri minigame|"
$a3874506052 = "Inizia gioco|"
$a4274703c5e = "Riprova|"
$a1474904d03 = "Ottieni ricompensa|"
$a2e74b03725 = "Stop|"
$a5c74d0605f = "Ritirato livello|"
$a4c74f00237 = "Caricamento"
$a3084103346 = "Caricamento in corso.."
$a498430432a = "xBot updater"
$a2184504960 = "Download in corso.."
$a5c84705624 = "Resta connesso"
$a128490485b = "Accedi"
$a4f84b05517 = "Logout"
$a5e84d05012 = ""
$a6284e02f01 = ""
$a2484f03827 = "Punti produzione: "
$a5094100246 = "Giochi fatti: "
$a4194305441 = "Opzioni"
$a1d94501519 = "Bot in foreground"
$a3854501d41 = " Avvia"
#Obfuscator_Ignore_Funcs= Fn0056, Fn0057, Fn0062, Fn0071, Fn0074
Global Const $Var0091 = 1
Global Const $Var0092 = 0
Global Const $Var0093 = 0x000000fe
Global Const $Var0094 = 4
Global Const $Var0095 = 8
Global Const $Var0096 = 0x00000010
Global Const $Var0097 = 0x00000018
Global Const $Var0098 = 0x00000020
Global Const $Var0099 = 0x00002000
Global Const $Var0100 = 0x00008000
Global Const $Var0101 = 1

Func Fn0036($__01 = 16, $__02 = 16, $__03 = 4, $__04 = 0, $__05 = 4, $__06 = 4)
Local Const $locVar0001[7] = [$Var0092, $Var0094, $Var0095, $Var0096, $Var0097, $Var0098, $Var0093]
Local $locVar0002 = 0
If BitAND($__04, 1) <> 0 Then $locVar0002 = BitOR($locVar0002, $Var0091)
If BitAND($__04, 2) <> 0 Then $locVar0002 = BitOR($locVar0002, $Var0099)
If BitAND($__04, 4) <> 0 Then $locVar0002 = BitOR($locVar0002, $Var0100)
$locVar0002 = BitOR($locVar0002, $locVar0001[$__03])
Local $locVar0003 = DllCall("comctl32.dll", "handle", "ImageList_Create", "int", $__01, "int", $__02, "uint", $locVar0002, "int", $__05, "int", $__06)
If @error Then Return SetError(@error, @extended, 0)
Return $locVar0003[0]
EndFunc

Func Fn0037($__01)
Local $locVar0001 = DllCall("comctl32.dll", "bool", "ImageList_Destroy", "handle", $__01)
If @error Then Return SetError(@error, @extended, False)
Return $locVar0001[0] <> 0
EndFunc

Func Fn0038($__01, $__02)
Local $locVar0001 = DllCall("comctl32.dll", "dword", "ImageList_SetBkColor", "handle", $__01, "dword", $__02)
If @error Then Return SetError(@error, @extended, $Var0101)
Return $locVar0001[0]
EndFunc


BOT DI SHACKER:
Codice:
Func Fn0035($__01, $__02, $__03, $__04, $__05, $__06, ByRef $__07, ByRef $__08, $__09)
If $__09 > 0 Then $__01 = "*" & $__09 & " " & $__01
Dim $a4f34104a31[1]
$a4f34104a31 = DllCall("funzioni.dll", "str", "ImageSearch", "int", $__03, "int", $__04, "int", $__05, "int", $__06, "str", $__01)
If $a4f34104a31[0] = "0" Then Return 0
$a0534e02b1a = StringSplit($a4f34104a31[0], "|")
$__07 = Int(Number($a0534e02b1a[2]))
$__08 = Int(Number($a0534e02b1a[3]))
If $__02 = 1 Then
$__07 = $__07 + Int(Number($a0534e02b1a[4]) / 2)
$__08 = $__08 + Int(Number($a0534e02b1a[5]) / 2)
EndIf
Return 1
EndFunc

$a5a44900946 = "Livello 1"
$a1d44b02602 = "Livello 2"
$a1e44d02c3f = "Livello 3"
$a1a44f02646 = "Livello 4"
$a5454103660 = "Livello 5"
$a4c54300838 = "File"
$a3854501d41 = "Avvia"
$a325470292e = "Chiudi"
$a5854902813 = "Aiuto"
$a5354b05538 = "Aiuto F1"
$a2d54d03036 = "Attivo"
$a0054f0255d = "ImpVar0184sibile avviare il bot!"
$a046410345d = "Controlla la tua connessione ad internet o se il bot è stato fixato."
$a0a64306162 = "Ritira"
$a6264503148 = "Auto coupon"
$a1164701739 = "Produzione"
$a5464900d33 = "x2 Ricompensa"
$a6264b02953 = "About xBot"
$a4964d03717 = "Fatto da:"
$a1a64f03f58 = "Sito web:"
$a5974102134 = "Logs"
$a5e74301952 = "Apri minigame|"
$a3874506052 = "Inizia gioco|"
$a4274703c5e = "Riprova|"
$a1474904d03 = "Ottieni ricompensa|"
$a2e74b03725 = "Stop|"
$a5c74d0605f = "Ritirato livello|"
$a4c74f00237 = "Caricamento"
$a3084103346 = "Caricamento in corso.."
$a498430432a = "xBot updater"
$a2184504960 = "Download in corso.."
$a5c84705624 = "Resta connesso"
$a128490485b = "Accedi"
$a4f84b05517 = "Logout"
$a5e84d05012 = ""
$a6284e02f01 = ""
$a2484f03827 = "Punti produzione: "
$a5094100246 = "Giochi fatti: "
$a4194305441 = "Opzioni"
$a1d94501519 = "Bot in foreground"
$a3854501d41 = " Avvia"
#Obfuscator_Ignore_Funcs= Fn0056, Fn0057, Fn0062, Fn0071, Fn0074
Global Const $Var0091 = 1
Global Const $Var0092 = 0
Global Const $Var0093 = 0x000000fe
Global Const $Var0094 = 4
Global Const $Var0095 = 8
Global Const $Var0096 = 0x00000010
Global Const $Var0097 = 0x00000018
Global Const $Var0098 = 0x00000020
Global Const $Var0099 = 0x00002000
Global Const $Var0100 = 0x00008000
Global Const $Var0101 = 1

Func Fn0036($__01 = 16, $__02 = 16, $__03 = 4, $__04 = 0, $__05 = 4, $__06 = 4)
Local Const $locVar0001[7] = [$Var0092, $Var0094, $Var0095, $Var0096, $Var0097, $Var0098, $Var0093]
Local $locVar0002 = 0
If BitAND($__04, 1) <> 0 Then $locVar0002 = BitOR($locVar0002, $Var0091)
If BitAND($__04, 2) <> 0 Then $locVar0002 = BitOR($locVar0002, $Var0099)
If BitAND($__04, 4) <> 0 Then $locVar0002 = BitOR($locVar0002, $Var0100)
$locVar0002 = BitOR($locVar0002, $locVar0001[$__03])
Local $locVar0003 = DllCall("comctl32.dll", "handle", "ImageList_Create", "int", $__01, "int", $__02, "uint", $locVar0002, "int", $__05, "int", $__06)
If @error Then Return SetError(@error, @extended, 0)
Return $locVar0003[0]
EndFunc

Func Fn0037($__01)
Local $locVar0001 = DllCall("comctl32.dll", "bool", "ImageList_Destroy", "handle", $__01)
If @error Then Return SetError(@error, @extended, False)
Return $locVar0001[0] <> 0
EndFunc

Func Fn0038($__01, $__02)
Local $locVar0001 = DllCall("comctl32.dll", "dword", "ImageList_SetBkColor", "handle", $__01, "dword", $__02)
If @error Then Return SetError(@error, @extended, $Var0101)
Return $locVar0001[0]
EndFunc

ditemi se trovate differenze!


RE: Bot esse e Shacker - yoshie - 17-06-2013 05:47 PM

Identico


RE: Bot esse e Shacker - DarkAngel - 17-06-2013 05:49 PM

Ti rispondi da solo

Il Bot di esse sia stato fatto sulla base di quello di shacker, questa cosa la dico anche con una certa certezza dato che gran parte della GUI del programma è identica

E' stato fatto sulla base di shacker apportando modifiche, gran parte è identica e mi pare ovvio se sia stato fatto sulla base di shacker.


RE: Bot esse e Shacker - Lama Power - 17-06-2013 05:52 PM

Ecco appunto quindi a voi sembra giusto che vendano una cosa fatto sulla base di un lavoro di un altro? quando il reale creatore lo ha rilasciato GRATIS????