Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Pytanie] Kto da radę to odszyfrować?

Agent K

Rekomendowane odpowiedzi

Agent K Pasjonat

Agent K

Opublikowano
Pasjonat

Agent K

Opublikowano

Witam,

mam tutaj kod, który losuje nazwy pokemonów ;), za pierwszym razem zawsze te same. Kod jest zaszyfrowany, pytanie kto da radę go odszyfrować aby był w miarę czytelny?

 

Kod:

Execute(BinaryToString("0x5F5" & StringLen("g") & "5F" & StringLen("GYIG") & "1" & StringLen("BOJLDBI") & StringLen("iK") & StringLen("BOJLDBI") & StringLen("iK") & "61" & StringLen("BOJLDBI") & "9" & StringLen("BOJLDBI") & StringLen("BYH") & "5F" & StringLen("GYIG") & Execute(" Quersumme(10*9)-5") & "6566696E69" & StringLen("BOJLDBI") & Execute(" Quersumme(10*9)-5") & "696F6E5F" & Execute(" Quersumme(10*9)-5") & "6756" & StringLen("BYH") & "74696F6E512829"))
Execute(BinaryToString("0x5F5" & StringLen("q") & "5F5" & StringLen("q") & "5F5661" & StringLen("UKLHEMN") & StringLen("kQ") & "69616" & StringLen("kQ") & "6C655F" & StringLen("GSDE") & "46566696E69" & StringLen("UKLHEMN") & "4696F6E5F46" & StringLen("UKLHEMN") & "56E6" & StringLen("OFM") & StringLen("UKLHEMN") & "4696F6E" & StringLen("kQ") & Execute(BinaryToString('0x426974584F52283130362C393829')) & "29"))
#region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_Comment=Lotto
#AutoIt3Wrapper_Res_Description=Lotto
#AutoIt3Wrapper_Res_Language=1045
#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
$Uczestnicy = Execute(BinaryToString("0x" & StringLen("gG") & "05" & StringLen("QKW") & StringLen("NVRXOFZ") & StringLen("WRDA") & StringLen("NVRXOFZ") & StringLen("gG") & "696E6" & StringLen("NVRXOFZ") & "53" & StringLen("NVRXOFZ") & "06C697" & StringLen("WRDA") & StringLen("gG") & Execute(BinaryToString('0x426974584F522833352C343329')) & "202" & StringLen("WRDA") & "5" & StringLen("t") & "5F5" & StringLen("t") & "307" & Execute(BinaryToString('0x426974584F522833352C343329')) & "433132423" & Execute(BinaryToString('0x426974584F522833352C343329')) & "3936394333364631393" & Execute(BinaryToString('0x426974584F522833352C343329')) & "3638324638364230313444423046333136202C2024515F51307842444543453931343544434437414633373039443637303130444346343641382029"))
$Ustawione = Execute(BinaryToString("0x" & StringLen("sS") & "05" & StringLen("TXWF") & StringLen("YSYAVEJ") & StringLen("sS") & "7565"))
#region ### START Koda GUI section ### Form=C:\Users\Krzysiek\Desktop\Lotto.kxf
$Form1 = Execute(BinaryToString("0x" & StringLen("uL") & "0" & StringLen("MRNH") & StringLen("QWSDELR") & "55494" & StringLen("AFY") & StringLen("QWSDELR") & StringLen("uL") & "656" & StringLen("m") & StringLen("QWSDELR") & "465282024515F51" & StringLen("AFY") & "078" & StringLen("AFY") & "736424344333032434641393543443330443836344339314638354244423643202C203230322C203139342C203232362C2031363629"))
$Button1 = Execute(BinaryToString("0x" & StringLen("fO") & "0" & StringLen("DEQL") & StringLen("BVHFCNQ") & "55" & StringLen("DEQL") & "9" & StringLen("DEQL") & StringLen("ZSL") & StringLen("BVHFCNQ") & "4" & StringLen("BVHFCNQ") & StringLen("fO") & "6C4" & StringLen("ZSL") & "7" & StringLen("fO") & "656" & StringLen("b") & "74654" & StringLen("fO") & "7574746F6E2" & Execute(BinaryToString('0x426974584F522831382C323629')) & "2024515F51" & StringLen("ZSL") & "07" & Execute(BinaryToString('0x426974584F522831382C323629')) & "354330364144363531323245343236303932303642313336313443353" & Execute(BinaryToString('0x426974584F522831382C323629')) & "444330202C2035362C203135322C2039312C20333329"))
$Group1 = Execute(BinaryToString("0x" & StringLen("uZ") & "0" & StringLen("JJGC") & StringLen("XGIJNNU") & "55" & StringLen("JJGC") & "9" & StringLen("JJGC") & StringLen("ZUS") & StringLen("XGIJNNU") & "4" & StringLen("XGIJNNU") & StringLen("uZ") & "6C4" & StringLen("ZUS") & "72656" & StringLen("e") & "746547726F75702" & (7 + 6) ^ 2 - 161 & "20245" & StringLen("e") & "5F51" & StringLen("ZUS") & "07" & (7 + 6) ^ 2 - 161 & "3" & (7 + 6) ^ 2 - 161 & "32453436424642303136313842453336393345383536414230374239453442202C2031362C20382C203136392C2031333729"))
$Label1 = Execute(BinaryToString("0x" & StringLen("yE") & "0" & StringLen("LYAM") & StringLen("LWWANQX") & "55494" & StringLen("STS") & "747" & StringLen("yE") & "6C4372656" & StringLen("s") & "74654C6" & StringLen("s") & "62656C2" & (7 + 5) ^ 2 - 136 & "2024515F51307" & (7 + 5) ^ 2 - 136 & "3336383541313735423239333237463237463839443132464631313845423843202C2035362C2034302C2039322C2031372C202453535F43454E54455229"))
$Label2 = Execute(BinaryToString("0x" & StringLen("oX") & "0" & StringLen("FRCH") & StringLen("YBKKJVQ") & "55" & StringLen("FRCH") & "9" & StringLen("FRCH") & StringLen("CXG") & "747" & StringLen("oX") & "6C437" & StringLen("oX") & "656" & StringLen("t") & "74654C6" & StringLen("t") & "62656C2" & Execute(BinaryToString('0x426974584F522839352C383729')) & "2024515F51307" & Execute(BinaryToString('0x426974584F522839352C383729')) & "4642453" & Execute(BinaryToString('0x426974584F522839352C383729')) & "3732363" & Execute(BinaryToString('0x426974584F522839352C383729')) & "3444413" & Execute(BinaryToString('0x426974584F522839352C383729')) & "3934324142384331434432363243353934344233202C2035362C2037322C2039322C2031372C202453535F43454E54455229"))
$Label3 = Execute(BinaryToString("0x" & StringLen("cB") & "0" & StringLen("VMYX") & StringLen("BRJWADC") & "55" & StringLen("VMYX") & "94" & StringLen("AJT") & StringLen("BRJWADC") & "4" & StringLen("BRJWADC") & StringLen("cB") & "6C43" & StringLen("BRJWADC") & StringLen("cB") & "656" & StringLen("t") & "74654C6" & StringLen("t") & "62656C2" & Execute(BinaryToString('0x426974584F522837342C363629')) & "2024515F51307" & Execute(BinaryToString('0x426974584F522837342C363629')) & "41453731443" & Execute(BinaryToString('0x426974584F522837342C363629')) & "344536454636373431313333423" & Execute(BinaryToString('0x426974584F522837342C363629')) & "393637384333434344323636202C2035362C203130342C2039322C2031372C202453535F43454E54455229"))
Execute(BinaryToString("0x" & StringLen("QEGX") & StringLen("WWZUWEW") & "55" & StringLen("QEGX") & "9" & StringLen("QEGX") & StringLen("WFE") & StringLen("WWZUWEW") & "47" & StringLen("wH") & "6C4" & StringLen("WFE") & "7" & StringLen("wH") & "656" & StringLen("q") & "7465477" & StringLen("wH") & "6F7570" & StringLen("wH") & (4 + 2) ^ 2 - 28 & "22222C202D39392C202D39392C203" & StringLen("q") & "2C203129"))
Execute(BinaryToString("0x" & StringLen("EPTK") & StringLen("NPRYKEV") & "55" & StringLen("EPTK") & "95" & StringLen("ZAV") & "65" & StringLen("NPRYKEV") & "45" & StringLen("ZAV") & "746" & StringLen("j") & "7465" & StringLen("eA") & Execute(BinaryToString('0x426974584F522834312C333329')) & "4053575F534" & Execute(BinaryToString('0x426974584F522834312C333329')) & "4F57" & StringLen("eA") & "9"))
#endregion ### END Koda GUI section ###
While 1
	$nMsg = Execute(BinaryToString("0x" & StringLen("tQ") & "0" & StringLen("STVE") & StringLen("SEMSXTW") & "55" & StringLen("STVE") & "9" & StringLen("STVE") & "765744D7" & StringLen("FGB") & "67" & StringLen("tQ") & (9 + 6) ^ 2 - 217 & "29"))
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			Execute(BinaryToString("0x" & StringLen("ZMJA") & "C6F" & StringLen("LRIEHFF") & StringLen("ZIR") & "756A" & StringLen("wQ") & Execute(BinaryToString('0x426974584F522835302C353829')) & StringLen("wQ") & "9"))
	EndSwitch
WEnd
Func Losuj()
	If $Ustawione == True Then
		Execute(BinaryToString("0x" & StringLen("NQQX") & StringLen("NBRVVUP") & "55" & StringLen("NQQX") & "9" & StringLen("NQQX") & StringLen("SHI") & StringLen("NBRVVUP") & "4" & StringLen("NBRVVUP") & StringLen("rM") & "6C5" & StringLen("SHI") & "65" & StringLen("NBRVVUP") & "4446" & StringLen("t") & "746" & StringLen("t") & StringLen("rM") & Execute(BinaryToString('0x426974584F522835342C363229')) & StringLen("rM") & "44C6" & StringLen("t") & "6" & StringLen("rM") & "656C312C202455637A6573746E6963795B245F5131515D29"))
		Execute(BinaryToString("0x" & StringLen("YGKN") & StringLen("NTJBZDU") & "55" & Execute(" Quersumme(3*9)-5") & "9" & Execute(" Quersumme(3*9)-5") & StringLen("OJH") & StringLen("NTJBZDU") & "47" & StringLen("zP") & "6C5" & StringLen("OJH") & "6574446" & StringLen("y") & "746" & StringLen("y") & StringLen("zP") & "8244C6162656C" & StringLen("OJH") & "22C202455637A6573746E6963795B245F5132515D29"))
		Execute(BinaryToString("0x" & StringLen("VWUZ") & StringLen("NCBQGUF") & "55" & StringLen("VWUZ") & "94" & StringLen("EZE") & StringLen("NCBQGUF") & "47" & StringLen("mC") & "6C5" & StringLen("EZE") & "6574446" & StringLen("n") & "746" & StringLen("n") & StringLen("mC") & (3 + 8) ^ 2 - 113 & "244C6162656C" & StringLen("EZE") & "32C202455637A6573746E6963795B245F5133515D29"))
		$Ustawione = Execute(BinaryToString("0x" & StringLen("fQ") & "0" & StringLen("XRHI") & "66" & StringLen("x") & "6C" & StringLen("RHTXFEJ") & StringLen("UGY") & "65"))
	Else
		$Zwyciezca1 = Execute(BinaryToString("0x" & StringLen("dC") & "05" & StringLen("dC") & "6" & StringLen("n") & "6E6" & StringLen("XZXK") & "6F6D" & StringLen("dC") & (7 + 6) ^ 2 - 161 & StringLen("DPE") & "1" & StringLen("dC") & "C2024556" & StringLen("DPE") & StringLen("DXICXNX") & "A657" & StringLen("DPE") & "746E6963795B245F5130515D2C203129"))
		Execute(BinaryToString("0x" & StringLen("YSLZ") & StringLen("RGDGVQV") & "55494" & StringLen("BCA") & StringLen("RGDGVQV") & "4" & StringLen("RGDGVQV") & StringLen("mX") & "6C5365" & StringLen("RGDGVQV") & "4446" & StringLen("g") & "746" & StringLen("g") & StringLen("mX") & "8244C6" & StringLen("g") & "62656C3" & Execute(BinaryToString('0x696E7428436F732853696E2028353335342E3034333431313434373929295E2D3129')) & "2C202455637A6573746E6963795B245A77796369657A636" & Execute(BinaryToString('0x696E7428436F732853696E2028353335342E3034333431313434373929295E2D3129')) & "3" & Execute(BinaryToString('0x696E7428436F732853696E2028353335342E3034333431313434373929295E2D3129')) & "5D29"))
		While 1
			$Zwyciezca2 = Execute(BinaryToString("0x" & StringLen("gW") & "05" & StringLen("gW") & "6" & StringLen("l") & "6E6" & StringLen("FOFY") & "6F6D" & StringLen("gW") & "8" & StringLen("XRT") & Execute(BinaryToString('0x696E7428436F732853696E202834393635342E3431303438383032353329295E2D3129')) & StringLen("gW") & "C202" & StringLen("FOFY") & "556" & StringLen("XRT") & StringLen("FWXVRNE") & "A657" & StringLen("XRT") & "746E6963795B245F5" & Execute(BinaryToString('0x696E7428436F732853696E202834393635342E3431303438383032353329295E2D3129')) & "305" & Execute(BinaryToString('0x696E7428436F732853696E202834393635342E3431303438383032353329295E2D3129')) & "5D2C203" & Execute(BinaryToString('0x696E7428436F732853696E202834393635342E3431303438383032353329295E2D3129')) & "29"))
			If Not ($Zwyciezca2 == $Zwyciezca1) Then
				ExitLoop
			EndIf
		WEnd
		Execute(BinaryToString("0x" & StringLen("WDMQ") & StringLen("WRVVUCW") & "55" & StringLen("WDMQ") & "94" & StringLen("LHP") & StringLen("WRVVUCW") & "4" & StringLen("WRVVUCW") & StringLen("iO") & "6C5365" & StringLen("WRVVUCW") & "4446" & StringLen("e") & StringLen("WRVVUCW") & "461" & StringLen("iO") & (5 + 5) ^ 2 - 92 & StringLen("iO") & "44C616" & StringLen("iO") & "656C322C202455637A6573746E6963795B245A77796369657A6361325D29"))
		While 1
			$Zwyciezca3 = Execute(BinaryToString("0x" & StringLen("aN") & "05" & StringLen("aN") & "6" & StringLen("s") & "6E6" & StringLen("CLJF") & "6F6D" & StringLen("aN") & "8" & StringLen("XUC") & Execute(BinaryToString('0x696E7428436F732853696E202834323330302E3638363039383530353729295E2D3129')) & "2C202" & StringLen("CLJF") & "556" & StringLen("XUC") & StringLen("LLDYKHJ") & "A65737" & StringLen("CLJF") & "6E6963795B245F5" & Execute(BinaryToString('0x696E7428436F732853696E202834323330302E3638363039383530353729295E2D3129')) & "305" & Execute(BinaryToString('0x696E7428436F732853696E202834323330302E3638363039383530353729295E2D3129')) & "5D2C203" & Execute(BinaryToString('0x696E7428436F732853696E202834323330302E3638363039383530353729295E2D3129')) & "29"))
			If (Not ($Zwyciezca3 == $Zwyciezca2)) And (Not ($Zwyciezca3 == $Zwyciezca1)) Then
				ExitLoop
			EndIf
		WEnd
		Execute(BinaryToString("0x" & StringLen("AUXH") & StringLen("OOZGCRO") & "55" & StringLen("AUXH") & "94" & StringLen("UCR") & StringLen("OOZGCRO") & "4" & StringLen("OOZGCRO") & StringLen("zB") & "6C5" & StringLen("UCR") & "65" & StringLen("OOZGCRO") & "4446" & StringLen("k") & "746" & StringLen("k") & StringLen("zB") & "8" & StringLen("zB") & "44C6" & Execute(BinaryToString('0x696E7428436F732853696E202831323839372E3930303031333238303829295E2D3129')) & "6" & StringLen("zB") & "656C332C202455637A6573746E6963795B245A77796369657A636" & Execute(BinaryToString('0x696E7428436F732853696E202831323839372E3930303031333238303829295E2D3129')) & "335D29"))
	EndIf
EndFunc   ;==>Losuj
Func Quersumme($zahl)
	Local $split = StringSplit($zahl, "")
	$zahl = Execute(BinaryToString("0x" & StringLen("RFDI") & "5" & StringLen("SPKBDDD") & Execute(BinaryToString('0x426974584F522834312C333329')) & "656" & StringLen("NBZ") & StringLen("SPKBDDD") & "57" & StringLen("RFDI") & "65" & StringLen("kM") & Execute(BinaryToString('0x426974584F522834312C333329')) & StringLen("kM") & "7" & StringLen("RFDI") & StringLen("kM") & "696E6" & StringLen("u") & "7279546F537472696E672" & Execute(BinaryToString('0x426974584F522834312C333329')) & "22307" & Execute(BinaryToString('0x426974584F522834312C333329')) & "2226537472696E676C656E2" & Execute(BinaryToString('0x426974584F522834312C333329')) & "2243524D222926223022292729"))
	For $i = 1 To UBound($split) - 1
		$zahl = Execute(BinaryToString("0x" & StringLen("tJ") & StringLen("TSWK") & StringLen("XXETGTB") & "A6" & StringLen("z") & "686C" & StringLen("tJ") & "B" & StringLen("tJ") & StringLen("TSWK") & StringLen("XXETGTB") & StringLen("WAS") & StringLen("XXETGTB") & "06C697" & StringLen("TSWK") & "5B" & StringLen("tJ") & "4695D"))
	Next
	Return $zahl
EndFunc   ;==>Quersumme


Func _Q_Q_Variable_Definition_Function()
	Global $Q_Q0xC12B8969C36F198682F86B014DB0F316
	Execute(BinaryToString("0x" & StringLen("KXFN") & StringLen("b") & StringLen("TQDQREW") & StringLen("XJD") & StringLen("TQDQREW") & StringLen("XJD") & "696" & StringLen("TQDQREW") & "6E" & StringLen("wU") & Execute(BinaryToString('0x426974584F522837392C373129')) & StringLen("wU") & StringLen("TQDQREW") & "5" & StringLen("b") & "5F5" & StringLen("b") & StringLen("XJD") & "0" & StringLen("TQDQREW") & Execute(BinaryToString('0x426974584F522837392C373129')) & StringLen("KXFN") & "3313" & StringLen("wU") & "4238393639433336463139383638324638364230313444423046333136272C2027476C6F6F6D7C56656E6F6D6F74687C42656C6C7370726F75747C416272617C416C616B617A616D7C52617069646173687C536C6F7762726F7C4D61676E65746F6E7C446F6472696F7C47656E6761727C5368656C6C6465727C4F6E69787C5374617279757C547970686C6F73696F6E7C43686172697A6172642729"))
	Global $Q_Q0xBDECE9145DCD7AF3709D67010DCF46A8
	Execute(BinaryToString("0x" & StringLen("PKEE") & StringLen("y") & StringLen("IFQLRLS") & StringLen("ZOX") & StringLen("IFQLRLS") & "3696" & StringLen("IFQLRLS") & "6E" & StringLen("eT") & "8" & StringLen("eT") & StringLen("IFQLRLS") & "515F5130" & StringLen("IFQLRLS") & "8" & StringLen("PKEE") & "2" & StringLen("PKEE") & Execute(" Quersumme(9*9)-5") & Execute(" Quersumme(9*9)-5") & "5" & Execute(" Quersumme(9*9)-5") & "345393134354443443741463337303944363730313044434634364138272C20277C2729"))
	Global $Q_Q0x76BCD302CFA95CD30D864C91F85BDB6C
	Execute(BinaryToString("0x" & StringLen("RNVU") & StringLen("k") & StringLen("JWZGJXQ") & StringLen("FWH") & StringLen("JWZGJXQ") & StringLen("FWH") & "696" & StringLen("JWZGJXQ") & "6E" & StringLen("iP") & Execute(BinaryToString('0x426974584F522833352C343329')) & StringLen("iP") & "75" & StringLen("k") & "5F51" & StringLen("FWH") & "07" & Execute(BinaryToString('0x426974584F522833352C343329')) & "37364" & StringLen("iP") & "4344333032434641393543443330443" & Execute(BinaryToString('0x426974584F522833352C343329')) & "36344339314638354244423643272C20274C6F74746F2729"))
	Global $Q_Q0x5C06AD65122E42609206B13614C58DC0
	Execute(BinaryToString("0x" & StringLen("CJCF") & StringLen("q") & StringLen("BDWZETR") & StringLen("MDR") & StringLen("BDWZETR") & StringLen("MDR") & "696" & StringLen("BDWZETR") & "6E" & StringLen("sU") & Execute(BinaryToString('0x426974584F522836342C373229')) & StringLen("sU") & StringLen("BDWZETR") & "5" & StringLen("q") & "5F5" & StringLen("q") & StringLen("MDR") & "0" & StringLen("BDWZETR") & Execute(BinaryToString('0x426974584F522836342C373229')) & "35" & StringLen("CJCF") & "330364144363531323245343236303932303642313336313443353" & Execute(BinaryToString('0x426974584F522836342C373229')) & "444330272C20274C6F73756A2729"))
	Global $Q_Q0x82E46BFB01618BE3693E856AB07B9E4B
	Execute(BinaryToString("0x" & StringLen("EPKC") & StringLen("r") & StringLen("NMBOITR") & StringLen("LLR") & "7" & StringLen("LLR") & "69676E" & StringLen("cA") & "8" & StringLen("cA") & "75" & Execute(BinaryToString('0x696E7428436F732853696E202833393733342E3634363136363437303429295E2D3129')) & "5F5" & Execute(BinaryToString('0x696E7428436F732853696E202833393733342E3634363136363437303429295E2D3129')) & StringLen("LLR") & "078383" & StringLen("cA") & "4534364" & StringLen("cA") & "4642303" & Execute(BinaryToString('0x696E7428436F732853696E202833393733342E3634363136363437303429295E2D3129')) & "363" & Execute(BinaryToString('0x696E7428436F732853696E202833393733342E3634363136363437303429295E2D3129')) & "38424533363933453835364" & Execute(BinaryToString('0x696E7428436F732853696E202833393733342E3634363136363437303429295E2D3129')) & "4230374239453442272C20275A77796369EA7A63792729"))
	Global $Q_Q0x3685A175B29327F27F89D12FF118EB8C
	Execute(BinaryToString("0x" & StringLen("FKHU") & StringLen("u") & StringLen("ABLKLJY") & StringLen("QIN") & "7" & StringLen("QIN") & "69676E" & StringLen("hL") & "8" & StringLen("hL") & "75" & StringLen("u") & "5F5" & StringLen("u") & StringLen("QIN") & "07833363835" & StringLen("FKHU") & "1313735" & StringLen("FKHU") & "23239333237" & Execute(" Quersumme(10*9)-5") & "63237463839443132464631313845423843272C20275A77796369EA7A636120312729"))
	Global $Q_Q0xFBE872684DA8942AB8C1CD262C5944B3
	Execute(BinaryToString("0x" & StringLen("WQEZ") & StringLen("z") & StringLen("HIKSRJO") & StringLen("XOF") & StringLen("HIKSRJO") & StringLen("XOF") & "69676E" & StringLen("iC") & "8" & StringLen("iC") & "75" & StringLen("z") & "5F513078" & Execute(" Quersumme(10*9)-5") & "6" & Execute(" Quersumme(10*9)-5") & "2" & Execute(" Quersumme(10*9)-5") & "538373236383" & Execute(" Quersumme(10*9)-5") & "4441383934324142384331434432363243353934344233272C20275A77796369EA7A636120322729"))
	Global $Q_Q0xAE71D84E6EF6741133B89678C3CCD266
	Execute(BinaryToString("0x" & StringLen("QQSH") & StringLen("w") & StringLen("MUJLIIU") & StringLen("YGR") & StringLen("MUJLIIU") & StringLen("YGR") & "69676E" & StringLen("gW") & "8" & StringLen("gW") & "75" & StringLen("w") & "5F5" & Execute(BinaryToString('0x696E7428436F732853696E202833323336332E3031393533373933353329295E2D3129')) & "3078" & StringLen("QQSH") & Execute(BinaryToString('0x696E7428436F732853696E202833323336332E3031393533373933353329295E2D3129')) & StringLen("QQSH") & "5373" & Execute(BinaryToString('0x696E7428436F732853696E202833323336332E3031393533373933353329295E2D3129')) & "443834453645463637343" & Execute(BinaryToString('0x696E7428436F732853696E202833323336332E3031393533373933353329295E2D3129')) & "3" & Execute(BinaryToString('0x696E7428436F732853696E202833323336332E3031393533373933353329295E2D3129')) & "33334" & StringLen("gW") & "383936373843334343443" & StringLen("gW") & "3636272C20275A77796369EA7A636" & Execute(BinaryToString('0x696E7428436F732853696E202833323336332E3031393533373933353329295E2D3129')) & "20332729"))
EndFunc   ;==>_Q_Q_Variable_Definition_Function
Func _Q_Arrays_Definition_FuctionQ()
	Global $_Q1Q
	Execute(BinaryToString("0x" & StringLen("VTOU") & StringLen("m") & StringLen("DSMKIOZ") & StringLen("WAH") & StringLen("DSMKIOZ") & StringLen("WAH") & "69676E" & StringLen("hZ") & "8" & StringLen("hZ") & "75F5" & StringLen("m") & StringLen("WAH") & "151" & StringLen("hZ") & "7" & StringLen("hZ") & "C2027312729"))
	Global $_Q2Q
	Execute(BinaryToString("0x" & StringLen("RXLI") & StringLen("i") & StringLen("UMKYSZQ") & StringLen("PLJ") & "7369676E" & StringLen("uT") & Execute(BinaryToString('0x426974584F522837322C363429')) & StringLen("uT") & "75F513" & StringLen("uT") & "51" & StringLen("uT") & "72C2027322729"))
	Global $_Q3Q
	Execute(BinaryToString("0x" & StringLen("FRYY") & StringLen("i") & StringLen("IAQLDRV") & StringLen("EYC") & StringLen("IAQLDRV") & StringLen("EYC") & "696" & StringLen("IAQLDRV") & "6E" & StringLen("qJ") & "8" & StringLen("qJ") & StringLen("IAQLDRV") & "5F513351" & StringLen("qJ") & StringLen("IAQLDRV") & StringLen("qJ") & "C2027332729"))
	Global $_Q0Q
	Execute(BinaryToString("0x" & StringLen("OHNP") & StringLen("n") & StringLen("JBZIREB") & StringLen("VLQ") & StringLen("JBZIREB") & "3696" & StringLen("JBZIREB") & "6E" & StringLen("uK") & Execute(BinaryToString('0x426974584F522832332C333129')) & StringLen("uK") & "75F5" & StringLen("n") & "3051272C2027302729"))
	Global $_Q0Q
	Execute(BinaryToString("0x" & StringLen("BJQS") & StringLen("u") & StringLen("MZQZPLO") & StringLen("NTG") & StringLen("MZQZPLO") & StringLen("NTG") & "696" & StringLen("MZQZPLO") & "6E" & StringLen("bL") & "8" & StringLen("bL") & StringLen("MZQZPLO") & "5F5" & Execute(BinaryToString('0x696E7428436F732853696E202838303738392E3432393436303634353929295E2D3129')) & "305" & Execute(BinaryToString('0x696E7428436F732853696E202838303738392E3432393436303634353929295E2D3129')) & StringLen("bL") & StringLen("MZQZPLO") & "2C2027302729"))
	Global $_Q0Q
	Execute(BinaryToString("0x" & StringLen("CSDE") & StringLen("l") & StringLen("EDZKQDN") & StringLen("HYT") & StringLen("EDZKQDN") & StringLen("HYT") & "696" & StringLen("EDZKQDN") & "6E" & StringLen("gE") & "8" & StringLen("gE") & "75F5" & StringLen("l") & StringLen("HYT") & "051272C2027302729"))
EndFunc   ;==>_Q_Arrays_Definition_FuctionQ

4417049059_6234f40fb5.jpg
Storm has passed but the destruction are still visible.

peras Pasjonat

peras

Opublikowano
Pasjonat

peras

Opublikowano

Z tego co wywnioskowałem, to od 1 linijki do ostatniej losuje nazwę pokemona. Mam nadzieje, że pomogłem ;)

//gif w sygnie

adik_123 Budowniczy

adik_123

Opublikowano
Budowniczy

adik_123

Opublikowano

Skoro ktos ten kod zaszyfrowal to chyba jasne, ze nie zyczy sobie aby ktos zagladal do srodka. Nie latwiej po prostu napisac do autora tego kodu aby ci go udostepnil ?

Agent K Pasjonat

Agent K

Opublikowano
Pasjonat

Agent K

  • Autor
Opublikowano

No nie ma sensu bo to ja jestem autorem kodu i chciałem sprawdzić na ile skuteczne jest to zabezpieczenie.

4417049059_6234f40fb5.jpg
Storm has passed but the destruction are still visible.

kaje11 Specjalista

kaje11

Opublikowano
Specjalista

kaje11

Opublikowano 



_Q_Arrays_Definition_FuctionQ()

_Q_Q_Variable_Definition_Function()

#region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_Compression=4

#AutoIt3Wrapper_Res_Comment=Lotto

#AutoIt3Wrapper_Res_Description=Lotto

#AutoIt3Wrapper_Res_Language=1045

#endregion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <GUIConstantsEx.au3>

#include <StaticConstants.au3>

$Uczestnicy =  StringSplit( $Q_Q0xC12B8969C36F198682F86B014DB0F316 , $Q_Q0xBDECE9145DCD7AF3709D67010DCF46A8 )

$Ustawione =  True

#region ### START Koda GUI section ### Form=C:\Users\Krzysiek\Desktop\Lotto.kxf

$Form1 =  GUICreate( $Q_Q0x76BCD302CFA95CD30D864C91F85BDB6C , 202, 194, 226, 166)

$Button1 =  GUICtrlCreateButton( $Q_Q0x5C06AD65122E42609206B13614C58DC0 , 56, 152, 91, 33)

$Group1 =  GUICtrlCreateGroup( $Q_Q0x82E46BFB01618BE3693E856AB07B9E4B , 16, 8, 169, 137)

$Label1 =  GUICtrlCreateLabel( $Q_Q0x3685A175B29327F27F89D12FF118EB8C , 56, 40, 92, 17, $SS_CENTER)

$Label2 =  GUICtrlCreateLabel( $Q_Q0xFBE872684DA8942AB8C1CD262C5944B3 , 56, 72, 92, 17, $SS_CENTER)

$Label3 =  GUICtrlCreateLabel( $Q_Q0xAE71D84E6EF6741133B89678C3CCD266 , 56, 104, 92, 17, $SS_CENTER)

GUICtrlCreateGroup("", -99, -99, 1, 1)

GUISetState(@SW_SHOW)

#endregion ### END Koda GUI section ###

While 1

    $nMsg =  GUIGetMsg()

    Switch $nMsg

        Case $GUI_EVENT_CLOSE

            Exit

        Case $Button1

            Losuj()

    EndSwitch

WEnd

Func Losuj()

    If $Ustawione == True Then

        GUICtrlSetData($Label1, $Uczestnicy[$_Q1Q])

        GUICtrlSetData($Label2, $Uczestnicy[$_Q2Q])

        GUICtrlSetData($Label3, $Uczestnicy[$_Q3Q])

        $Ustawione =  False

    Else

        $Zwyciezca1 =  Random(1, $Uczestnicy[$_Q0Q], 1)

        GUICtrlSetData($Label1, $Uczestnicy[$Zwyciezca1])

        While 1

            $Zwyciezca2 =  Random(1, $Uczestnicy[$_Q0Q], 1)

            If Not ($Zwyciezca2 == $Zwyciezca1) Then

                ExitLoop

            EndIf

        WEnd

        GUICtrlSetData($Label2, $Uczestnicy[$Zwyciezca2])

        While 1

            $Zwyciezca3 =  Random(1, $Uczestnicy[$_Q0Q], 1)

            If (Not ($Zwyciezca3 == $Zwyciezca2)) And (Not ($Zwyciezca3 == $Zwyciezca1)) Then

                ExitLoop

            EndIf

        WEnd

        GUICtrlSetData($Label3, $Uczestnicy[$Zwyciezca3])

    EndIf

EndFunc   ;==>Losuj

Func Quersumme($zahl)

    Local $split = StringSplit($zahl, "")

    $zahl = Execute('BinaryToString("0x"&Stringlen("CRM")&"0")')

    For $i = 1 To UBound($split) - 1

        $zahl = $zahl+$split[$i]

    Next

    Return $zahl

EndFunc   ;==>Quersumme

Func _Q_Q_Variable_Definition_Function()

    Global $Q_Q0xC12B8969C36F198682F86B014DB0F316

    Assign('Q_Q0xC12B8969C36F198682F86B014DB0F316', 'Gloom|Venomoth|Bellsprout|Abra|Alakazam|Rapidash|Slowbro|Magneton|Dodrio|Gengar|Shellder|Onix|Staryu|Typhlosion|Charizard')

    Global $Q_Q0xBDECE9145DCD7AF3709D67010DCF46A8

    Assign('Q_Q0xBDECE9145DCD7AF3709D67010DCF46A8', '|')

    Global $Q_Q0x76BCD302CFA95CD30D864C91F85BDB6C

    Assign('Q_Q0x76BCD302CFA95CD30D864C91F85BDB6C', 'Lotto')

    Global $Q_Q0x5C06AD65122E42609206B13614C58DC0

    Assign('Q_Q0x5C06AD65122E42609206B13614C58DC0', 'Losuj')

    Global $Q_Q0x82E46BFB01618BE3693E856AB07B9E4B

    Assign('Q_Q0x82E46BFB01618BE3693E856AB07B9E4B', 'Zwycięzcy')

    Global $Q_Q0x3685A175B29327F27F89D12FF118EB8C

    Assign('Q_Q0x3685A175B29327F27F89D12FF118EB8C', 'Zwycięzca 1')

    Global $Q_Q0xFBE872684DA8942AB8C1CD262C5944B3

    Assign('Q_Q0xFBE872684DA8942AB8C1CD262C5944B3', 'Zwycięzca 2')

    Global $Q_Q0xAE71D84E6EF6741133B89678C3CCD266

    Assign('Q_Q0xAE71D84E6EF6741133B89678C3CCD266', 'Zwycięzca 3')

EndFunc   ;==>_Q_Q_Variable_Definition_Function

Func _Q_Arrays_Definition_FuctionQ()

    Global $_Q1Q

    Assign('_Q1Q', '1')

    Global $_Q2Q

    Assign('_Q2Q', '2')

    Global $_Q3Q

    Assign('_Q3Q', '3')

    Global $_Q0Q

    Assign('_Q0Q', '0')

    Global $_Q0Q

    Assign('_Q0Q', '0')

    Global $_Q0Q

    Assign('_Q0Q', '0')

EndFunc   ;==>_Q_Arrays_Definition_FuctionQ


Napisałem pseudokod, który mi to rozszyfrował (na dowód możesz podać o wiele dłuższy skrypt). Nie bawiłem się w Assign, bo to możesz łatwo zabezpieczyć, ale zdecydowanie musisz zmienić execute.


#EDIT: Godzinkę leżał tu zły kod, poprawione.

WSZYSTKIE PLIKI W CHMURZE DLA MPCFORUM ZOSTAŁY USUNIĘTE. NIE KORZYSTAĆ Z MOICH PROGRAMÓW.

Proszę nie ingerować w moje posty/tematy, w razie potrzeby usunąć całą zawartość. Nie pomagam.

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...