{"id":204,"date":"2008-05-03T07:19:13","date_gmt":"2008-05-03T07:19:13","guid":{"rendered":"http:\/\/6teen.ru\/?p=141"},"modified":"2008-05-03T07:19:13","modified_gmt":"2008-05-03T07:19:13","slug":"5476","status":"publish","type":"post","link":"http:\/\/pblog.ru\/lab\/?p=204","title":{"rendered":"\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 Bios Wake-on-Lan"},"content":{"rendered":"<p>\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 Bios Wake-on-Lan<br \/>\n<!--more--><\/p>\n<pre class=\"alt2\" style=\"margin:0px; padding:6px; border:1px inset; width:580px; height:320px; overflow:auto\"><div>\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 Bios Wake-on-Lan\n\n{$APPTYPE CONSOLE}\n\nuses\nSysUtils,\nClasses,\nIdBaseComponent,\nIdComponent,\nIdUDPBase,\nIdUDPClient;\n\nfunction HexStringToBinString(const HexStr: string): string;\nvar\ni, l: integer;\nbegin\nResult := '';\nl := length(HexStr);\nl := l div 2;\nSetLength(Result, l);\nfor i := 1 to l do\n if HexToBin(PChar(Copy(HexStr, (i - 1) * 2 + 1, 2)),\nPChar(@Result[i]), 1) = 0 then\n  raise Exception.Create('Invalid hex value');\nend;\n\nprocedure SendMagicPacket(MACAddress: string);\nvar\ns, packet: string;\ni: integer;\nbegin\nif Length(MACAddress) <> 12 then\n raise Exception.CreateFmt('Invalid MAC Address: %s', [MACAddress]);\npacket := HexStringToBinString('FFFFFFFFFFFF');\ns := HexStringToBinString(MACAddress);\nfor i := 1 to 16 do\n packet := packet + s;\nwith TIdUDPClient.Create(nil) do\n try\n  Active := true;\n  BroadcastEnabled := true;\n  Broadcast(packet, 9);\n finally\n  Free;\n end;\nend;\n\nbegin\nif ParamCount <> 1 then\n WriteLn('usage: WakeOnLan MACAddress' + #10 + #13 + 'exmple: WakeOnLan 000102030405')\nelse\n SendMagicPacket(ParamStr(1));\nend.\n<\/div><\/pre>\n<p><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 Bios Wake-on-Lan<\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[395,433],"tags":[476,597],"_links":{"self":[{"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=\/wp\/v2\/posts\/204"}],"collection":[{"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=204"}],"version-history":[{"count":0,"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=\/wp\/v2\/posts\/204\/revisions"}],"wp:attachment":[{"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=204"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=204"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/pblog.ru\/lab\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=204"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}