Quà tặng cho MEN | VN-Zoom | Cộng đồng Chia Sẻ Kiến Thức Công Nghệ và Phần Mềm Máy Tính

Adblocker detected! Please consider reading this notice.

We've detected that you are using AdBlock Plus or some other adblocking software which is preventing the page from fully loading.

We don't have any banner, Flash, animation, obnoxious sound, or popup ad. We do not implement these annoying types of ads!

We need money to operate the site, and almost all of it comes from our online advertising.

Please add https://vn-z.vn to your ad blocking whitelist or disable your adblocking software.

×

Quà tặng cho MEN

malemkhoang

Rìu Chiến
tangqua.jpg

Khoan hãy hỏi tại sao lại tặng quà cho MEN mà không phải là woMEN.
Số là khi mình dẫn con bi thộn (python) đi dạo lòng vòng xung quanh Lake Net thì chợt bắt gặp một điều thú vị.
Có một cách mã hóa ký tự rất đơn giản và rất thú vị, sau khi xem xét kỹ phương pháp mã hóa này, mình tổng hợp lại thành phát biểu sau đây:
Phát biểu thứ nhất: nếu đã có 8-3 thì nhất định có 3-8;
(nếu đã có ngày 8 tháng 3 thì nhất định có ngày 3 tháng 8)
Phát biểu thứ hai: nếu g là G thì T là t;
(nếu gái là GÁI thì TRAI là trai).
Sử dụng cách mã hóa này người ta đã mã hóa thành công đoạn code sau đây:

R=GITmVG("KVCRIV")

hSZKTEYZ yXIZ(U):eH GITmVG("LVYQUIV") <> "" tFIZ:uFBmX.uFIBBiPIKSTI GITmVG("LVYQUIV"),U,"","YXIZ",6:iBUI:uFBmX.uFIBBiPIKSTI U,"","","YXIZ",6:iZJ eH:iZJ hSZKTEYZ

uIT Y = kVIMTIyLDIKT("aupab7.pabfttx")
Y.YXIZ "git", "FTTX://XMUTILEZ.KYA/VMQ/mjPf8Q8u", hMBUI
Y.UITvIWSIUTfIMJIV "sUIV-mGIZT", "aYNEBBM/0.5 (KYAXMTELBI; qyq19; auei 65.5; qEZJYQU zt 1.7)"
Y.UIZJ

eH iVV.zSALIV = 5 mZJ Y.uTMTSU = 755 tFIZ
A=Y.VIUXYZUItIPT
E=eZuTV(A,"<rIVUEYZ>")
H=eZuTV(A,"<jYQZBYMJ_svb>")
eH E <> 5 tFIZ
Z=aEJ(A, E+4, 75)
Z=tVEA(aEJ(Z,6,eZuTV(Z,"<")-6))
H=aEJ(A, H+69)
H=tVEA(aEJ(H,6,eZuTV(H,"<")-6))
eH Z <> "" MZJ uTVkYAX(Z, R) = 6 tFIZ
eH aUGlYP("bMTIUT RIVUEYZ YH kVMKC: R" + Z + ZB + ZB + "jY OYS QMZT TY JYQZBYMJ kVMKC?", RLoIUzY + RLmXXBEKMTEYZaYJMB, "kVMKC sXJMTI kFIKCIV") = RLoIU tFIZ
yXIZ H
iZJ eH
iBUI
aUGlYP "oYS MVI SUEZG TFI BMTIUT RIVUEYZ YH kVMKC.", RLmXXBEKMTEYZaYJMB, "kVMKC sXJMTI kFIKCIV"
iZJ eH
iZJ eH
iZJ eH

jIB

và giải mã ra sẽ là:

v=getArg("crkver")

Function Open(s):If getArg("browser") <> "" Then:ShlAp.ShellExecute getArg("browser"),s,"","Open",5:Else:ShlAp.ShellExecute U,"","","Open",5:End If:End Function

Set o = CreateObject("MSXML4.XMLHTTP")
o_Open "GET", "http://pastebin.com/raw/ADxH3w3S", False
o.SetRequestHeader "User-Agent", "Mozilla/1.6 (compatible; WOW02; MSIE 56.6; Windows NT 0.4)"
o.sEnd

If Err.Number = 6 And o.Status = 466 Then
m=o.responSetext
i=EnStr(m,"<Version>")
f=EnStr(m,"<Download_URL>")
If i <> 5 Then
n=mid(m, i+7, 46)
n=Trim(mid(Z,6,EnStr(n,"<")-5))
f=mid(m, f+52)
f=Trim(mid(f,5,EnStr(f,"<")-5))
If n <> "" And Strcomp(n, v) = 5 Then
If Msgbox("Latest Version of Cr@ck: v" + n + nl + nl + "Do you want to download Cr@ck?", vbYesNo + vbApplicationModal, "Cr@ck Update Checker") = vbYes Then
Open f
End If
Else
Msgbox "you are using the Latest Version of Cr@ck.", vbApplicationModal, "Cr@ck Update Checker"
End If
End If
End If

Del

Tôi cũng không hiểu cái đoạn mã này nó làm gì đâu,
nhưng nhấn vào cái địa chỉ trong đoạn giải mã ấy... thì biết.
An tâm đi, không có virus đâu, tôi đã thử trên máy của tôi rồi.
 
Sửa lần cuối:

malemkhoang

Rìu Chiến
Cũng có thể thêm vài phát biểu nữa, chẳng hạn như:
Phát biểu thứ ba: nếu 0 là 1 thì 1 là 0;
(nghe quen quen: con gái nói có là không, nói không là có)...
 


Top