«ôŪ¹Lefun¤j¤jªº¤B¤B¤p±¾delphiì©l½X(§ó·s¬°V91ª©·½½X)
http://bbs.wgun.net/thread-188762-1-1.html
¦Û¤v¤]¾Ç¤@¾Ç¼g¥~±¾, ¤p§Ì¥u¶·n³Ü¤ô¸ò¥dÁä¥\¯à, ¨ä¥¦´N¤£¦h»¡¤F
¥ýקï¤j¤jªº¤@¨Ç¸ê®Æ, ¬Ý¬Ý¯à¤£¯à¥Î
°ò§}קï
W2i_Base=$9C1514;
µøµ¡Âù¶}
ì Ghwnd := FindWindow(nil, 'Element Client');
§ï Ghwnd := FindWindow(nil, '§¹¬ü¥@¬É«e¶Ç');
¤Hª«°T®§
ì ReadProcessMemory(ProcessID, Pointer(ft+$454), @hp, 4, tt);
ì ReadProcessMemory(ProcessID, Pointer(ft+$484), @maxhp, 4, tt);
ì ReadProcessMemory(ProcessID, Pointer(ft+$458), @mp, 4, tt);
ì ReadProcessMemory(ProcessID, Pointer(ft+$488), @maxmp, 4, tt);
§ï ReadProcessMemory(ProcessID, Pointer(ft+$46C), @hp, 4, tt);
§ï ReadProcessMemory(ProcessID, Pointer(ft+$4A4), @maxhp, 4, tt);
§ï ReadProcessMemory(ProcessID, Pointer(ft+$470), @mp, 4, tt);
§ï ReadProcessMemory(ProcessID, Pointer(ft+$4A8), @maxmp, 4, tt);
קï«áÁ`ºâ¶¶§Qªº¯à¥Î, ¦ý°ÝÃD¥X²{¤F
°²³]§Ú¥Î¤ò¶}°}, ³]©w80%³Ü¤ô
·í¹CÀ¸µøµ¡ACTIVE®É, ±¾¬O¨S°ÝÃD
¦ý·í¹CÀ¸µøµ¡ÁY¨ì³Ì¤p®É, ±¾´N¨S¦æ°Ê¤F
´«¤@Ӥ覡»¡¤ñ¸û²³æ, Âù¶}Âù±¾
¤ò2¬í¸É¦× ¦×2¬í§q¦å
·íµøµ¡¤Á´«¨ì¤òªº®ÉÔ, ¤ò¦b¸É ¦×½}¤u
·íµøµ¡¤Á´«¨ì¦×ªº®ÉÔ, ¦×¦b§q ¤ò½}¤u
§Ú¦A¬Ý±¾, 2Ó±¾³£¦³¦bp®É
µM«á²Ä3ªÌ¬Ý¨ì ¦×¸ò¤ò¦P®É½}¤u (¦]¬°2Ó¹CÀ¸µøµ¡§¡¬°INACTIVE)
¦³¤j¤j¯à±Ð§Ú¤@¤U¶Ü? |