{"id":35,"date":"2014-08-11T23:56:00","date_gmt":"2014-08-11T14:56:00","guid":{"rendered":"http:\/\/chaboneko.wp.xdomain.jp\/2014\/08\/11\/35"},"modified":"2020-09-29T10:37:11","modified_gmt":"2020-09-29T01:37:11","slug":"hsp%e3%81%a7%e3%82%b7%e3%83%b3%e3%83%97%e3%83%ab%e3%81%aa%e8%89%a6%e3%81%93%e3%82%8c%e5%b0%82%e7%94%a8%e3%83%96%e3%83%a9%e3%82%a6%e3%82%b6","status":"publish","type":"post","link":"http:\/\/chabon.cloudfree.jp\/?p=35","title":{"rendered":"HSP\u3067\u30b7\u30f3\u30d7\u30eb\u306a\u8266\u3053\u308c\u5c02\u7528\u30d6\u30e9\u30a6\u30b6"},"content":{"rendered":"<p><img loading=\"lazy\" decoding=\"async\" src=\"http:\/\/chabon.cloudfree.jp\/wp-content\/uploads\/importfc2\/knkrbrowserHSP_ss01.jpg\" alt=\"knkrbrowserHSP_ss01.jpg\" border=\"0\" width=\"550\" height=\"349\" \/><br \/>\r\n\r\n\u3053\u3093\u306a\u611f\u3058\u306e\u30d4\u30c3\u30bf\u30ea\u30b5\u30a4\u30ba\u306e\u8266\u3053\u308c\u5c02\u7528\u30d6\u30e9\u30a6\u30b6\u3002<\/p>\r\n\r\n<p>HSP\u3067COM\uff08IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\uff09\u3092\u6271\u3063\u3066\u307f\u305f\u304b\u3063\u305f\u3002<br \/>\r\n\r\n\u3068\u3044\u3063\u3066\u3082<a href=\"http:\/\/www.geocities.co.jp\/Playtown-Yoyo\/6130\/hsp\/hsp-browser.html\" target=\"_blank\" title=\"\u898b\u3064\u3051\u305f\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\" rel=\"noopener noreferrer\">\u898b\u3064\u3051\u305f\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9<\/a>\u306b\u3001\u8266\u3053\u308c\u306e\u4f4d\u7f6e\u8abf\u6574\u6a5f\u80fd\u3084\u3089\u3001\u62e1\u5927\u7e2e\u5c0f\u6a5f\u80fd\u3084\u3089\u3092\u8ffd\u52a0\u3057\u305f\u3060\u3051\u3067\u3059\u3002<\/p>\r\n\r\n\r\n\r\n<!--more-->\r\n\r\n\r\n\r\n\r\n\r\n<h4>\u30d7\u30ed\u30b0\u30e9\u30e0\u3068\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9\u306e\u30c0\u30a6\u30f3\u30ed\u30fc\u30c9<\/h4>\r\n\r\n<p>\r\n\r\n\u2192\r\n\r\n<!--\r\n\r\n<a href=\"http:\/\/chabon.cloudfree.jp\/wp-content\/uploads\/dl\/2015\/knkrBrowserHSP_20141113.zip\r\n\r\n\" >knkrBrowserHSP_20141113.zip <\/a>\r\n\r\n-->\r\n\r\n<a class=\"download-link filetype-icon filetype-zip\"\n   title=\"\" href=\"http:\/\/chabon.cloudfree.jp?download=762&#038;tmstv=1780514199\" rel=\"nofollow\">\n\tknkrBrowserHSP_20141113.zip\t(987.23 KB)\n    &nbsp;\n\t1121 \u30c0\u30a6\u30f3\u30ed\u30fc\u30c9<\/a>\n\r\n\r\n<\/p>\r\n\r\n\r\n\r\n<p>\u81ea\u5206\u306e\u74b0\u5883\uff08Win7 + IE11\uff09\u3067\u306f\u52d5\u3044\u305f\u3051\u3069\u3001\u305d\u306e\u4ed6\u306f\u78ba\u8a8d\u3057\u3066\u307e\u305b\u3093\u3002<br \/>\r\n\r\n\u4ed5\u69d8\u5909\u66f4\u3067\u4f7f\u3048\u306a\u304f\u306a\u308b\u304b\u3082\u3057\u308c\u306a\u3044\u3057\u3001\u4e0d\u5177\u5408\u304c\u8d77\u3053\u308b\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u3002<br \/>\r\n\r\n\u3082\u3057exe\u30d5\u30a1\u30a4\u30eb\u3084\u30bd\u30fc\u30b9\u30d5\u30a1\u30a4\u30eb\u3092\u5229\u7528\u3055\u308c\u308b\u65b9\u304c\u5c45\u3089\u3063\u3057\u3083\u3044\u307e\u3057\u305f\u3089\u3001\u81ea\u5df1\u8cac\u4efb\u3067\u304a\u9858\u3044\u3057\u307e\u3059\u3002<\/p>\r\n\r\n\r\n\r\n\r\n\r\n<h4><mark>2014\/11\/13\u8ffd\u8a18<\/mark><\/h4>\r\n\r\n<p>\r\n\r\n\u306a\u3093\u304b\u8272\u3005\u4e0d\u5b89\u5b9a\u3060\u3063\u305f\u306e\u3067\u3001COM\u30a4\u30d9\u30f3\u30c8\u51e6\u7406\u7b49\u3092\u4fee\u6b63\u3057\u307e\u3057\u305f\u3002<br \/>\r\n\r\n\u2191\u306e\u30c0\u30a6\u30f3\u30ed\u30fc\u30c9\u30ea\u30f3\u30af\u306ezip\u30d5\u30a1\u30a4\u30eb\u3092\u5dee\u3057\u66ff\u3048\u307e\u3057\u305f\u3002<br \/>\r\n\r\n\u3064\u3044\u3067\u306b\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u6a5f\u80fd\u3092\u3064\u3051\u307e\u3057\u305f\u3002<br \/>\r\n\r\n\u30bf\u30a4\u30c8\u30eb\u30d0\u30fc\u3092\u53f3\u30af\u30ea\u30c3\u30af\u3059\u308b\u3068\u3001\u4ee5\u4e0b\u306e\u753b\u50cf\u306e\u3088\u3046\u306a\u9805\u76ee\u304c\u51fa\u307e\u3059\u3002<br \/>\r\n\r\n\u300c\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u3092\u64ae\u308b\u300d\u3092\u30af\u30ea\u30c3\u30af\u3059\u308b\u3068\u30b7\u30e3\u30c3\u30bf\u30fc\u97f3\u304c\u9cf4\u308a\u3001exe\u30d5\u30a1\u30a4\u30eb\u3068\u540c\u3058\u5834\u6240\u306eScreenShot\u30d5\u30a9\u30eb\u30c0\u306b\u753b\u50cf\u3092\u4fdd\u5b58\u3057\u307e\u3059\u3002<br \/>\r\n\r\n<img loading=\"lazy\" decoding=\"async\" src=\"http:\/\/chabon.cloudfree.jp\/wp-content\/uploads\/importfc2\/knkrbrowserHSP_ss02.jpg\" alt=\"knkrbrowserHSP_ss02.jpg\" border=\"0\" width=\"551\" height=\"320\" \/><br \/>\r\n\r\n\u2193\u4ee5\u4e0b\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9<\/p>\r\n\r\n<pre class=\"toolbar:1 lang:default decode:true \" title=\"knkrBrowserHSP.hsp\"> \r\n\/\/----------------------------------------------------------------------------\r\n\/\/ \u8266\u3053\u308c\u30d6\u30e9\u30a6\u30b6HSP\r\n\/\/----------------------------------------------------------------------------\r\n\r\n#include \"user32.as\"\r\n#include \"gdi32.as\"\r\n#include \"hspcv.as\"\r\n\r\n\/\/----------------------------------------------------------------------------\r\n\/\/ \u5171\u901a\u5b9a\u7fa9\r\n\/\/----------------------------------------------------------------------------\r\n    \r\n    \/\/\u30aa\u30fc\u30d0\u30fc\u30e9\u30c3\u30d7\u30a6\u30a4\u30f3\u30c9\u30a6\u306b\u5909\u66f4\u3059\u308b\u3068\u304d\u306b\u5fc5\u8981\u306a\u5b9a\u7fa9\r\n    #define GWL_STYLE              0xFFFFFFF0\r\n    #define WS_OVERLAPPEDWINDOW    0x14CF0000\r\n    #define SWP_NOSIZE             0x01\r\n    #define SWP_NOMOVE             0x02\r\n    #define SWP_FRAMECHANGED       0x20\r\n    \r\n    \/\/Windows\u30e1\u30c3\u30bb\u30fc\u30b8\u5b9a\u7fa9\r\n    #define WM_SIZE           0x05    \r\n    #define WM_SYSCOMMAND     0x0112\r\n    \r\n    \/\/BitBlt\u95a2\u6570\u3067\u4f7f\u7528\u3059\u308b\u30e9\u30b9\u30bf\u30aa\u30da\u30ec\u30fc\u30b7\u30e7\u30f3\u30b3\u30fc\u30c9\r\n    #define SRCCOPY     0x00CC0020\r\n    \r\n    \/\/COM\u30a4\u30d9\u30f3\u30c8\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30fc\u30b9ID\r\n    #define DIID_DWebBrowserEvents2    \"{34A715A0-6587-11D0-924A-0020AFC7AC4D}\"\r\n    \r\n    \/\/COM\u30a4\u30d9\u30f3\u30c8\u306e\u30c7\u30a3\u30b9\u30d1\u30c3\u30c1ID\r\n    #define DISPID_DOCUMENTCOMPLETE   259\r\n    \r\n    \/\/\u30b2\u30fc\u30e0(Flash)\u306e\u5927\u304d\u3055\u3068\u30a2\u30b9\u6bd4\r\n    #define GAME_WIDTH         800\r\n    #define GAME_HEIGHT        480\r\n    gameAspectRait = double(GAME_HEIGHT) \/ double(GAME_WIDTH)    \r\n    \r\n    \/\/\u30b7\u30b9\u30c6\u30e0\u30e1\u30cb\u30e5\u30fc\u9805\u76eeID\r\n    #enum IDM_SS_JPG           = 0x01\r\n    #enum IDM_SS_PNG           = 0x02\r\n    #enum IDM_SS_BMP           = 0x04\r\n    #enum IDM_SS_OPEN          = 0x08\r\n    #enum IDM_WSIZE_DEFAULT    = 0x10\r\n    \r\n\/\/----------------------------------------------------------------------------\r\n\/\/ start\r\n\/\/----------------------------------------------------------------------------\r\n    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u306e\u4f5c\u6210\r\n    screen 0,ginfo_dispx,ginfo_dispy,0, , , GAME_WIDTH, GAME_HEIGHT\r\n    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u30b9\u30bf\u30a4\u30eb\u3092\u30aa\u30fc\u30d0\u30fc\u30e9\u30c3\u30d7\u30a6\u30a4\u30f3\u30c9\u30a6\u306b\r\n    SetWindowLong hwnd,GWL_STYLE,WS_OVERLAPPEDWINDOW\r\n    SetWindowPos hwnd, 0, 0, 0, 0, 0, SWP_NOSIZE|SWP_NOMOVE|SWP_FRAMECHANGED\r\n    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u306e\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30b5\u30a4\u30ba\u3092\u8266\u3053\u308c\u306b\u3042\u308f\u305b\u308b\r\n    gosub *fitClientWindowSizeToGame\r\n    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u30b5\u30a4\u30ba\u5909\u66f4\u6642\u306e\u30e1\u30c3\u30bb\u30fc\u30b8\u30cf\u30f3\u30c9\u30e9\u3092\u8a2d\u7f6e\r\n    oncmd gosub *onWM_SIZE, WM_SIZE\r\n    \/\/\u80cc\u666f\u8272\r\n    color 0,0,0:boxf\r\n    \/\/\u30bf\u30a4\u30c8\u30eb\u30d0\u30fc\u6587\u5b57\u5217\r\n    title \"\u8266\u3053\u308c\u30d6\u30e9\u30a6\u30b6HSP\"\r\n    \r\n    \/\/\u30b7\u30b9\u30c6\u30e0\u30e1\u30cb\u30e5\u30fc\u30a4\u30d9\u30f3\u30c8\u30cf\u30f3\u30c9\u30e9\u306e\u8a2d\u7f6e\r\n    oncmd gosub *syscommand, WM_SYSCOMMAND\r\n    \/\/\u30b7\u30b9\u30c6\u30e0\u30e1\u30cb\u30e5\u30fc\u306e\u30cf\u30f3\u30c9\u30eb\u3092\u53d6\u5f97\r\n    GetSystemMenu hwnd, 0\r\n    hSystemMenu = stat\r\n    \/\/\u9805\u76ee\u306e\u8ffd\u52a0\r\n    InsertMenu hSystemMenu, 0, $400, IDM_SS_JPG, \"\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u3092\u64ae\u308b JPG\u5f62\u5f0f(&amp;J)\"\r\n    InsertMenu hSystemMenu, 1, $400, IDM_SS_PNG, \"\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u3092\u64ae\u308b PNG\u5f62\u5f0f(&amp;P)\"\r\n    InsertMenu hSystemMenu, 2, $400, IDM_SS_BMP, \"\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u3092\u64ae\u308b BMP\u5f62\u5f0f(&amp;B)\"\r\n    InsertMenu hSystemMenu, 3, $400 | $800, 0, \"\"\r\n    InsertMenu hSystemMenu, 4, $400, IDM_SS_OPEN, \"\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u958b\u304f(&amp;F)\"\r\n    InsertMenu hSystemMenu, 5, $400 | $800, 0, \"\"\r\n    InsertMenu hSystemMenu, 6, $400, IDM_WSIZE_DEFAULT, \"\u753b\u9762\u30b5\u30a4\u30ba\u3092\u30c7\u30d5\u30a9\u30eb\u30c8\u306b\u623b\u3059(&amp;1)\"\r\n    InsertMenu hSystemMenu, 7, $400 | $800, 0, \"\"\r\n    \r\n    \/\/IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\u306e\u8a2d\u7f6e\r\n    objsize GAME_WIDTH,GAME_HEIGHT\r\n    axobj IE, \"Shell.Explorer.2\", ginfo_winx ,ginfo_winy  \r\n    hIE = objinfo(stat, 2)    \/\/\u30cf\u30f3\u30c9\u30eb\u306e\u53d6\u5f97\r\n    comevent ie_event, IE, DIID_DWebBrowserEvents2, *WebBrowserEvent \/\/COM\u30a4\u30d9\u30f3\u30c8\u306e\u53d6\u5f97\u958b\u59cb\r\n    \r\n    \/\/\u30ed\u30b0\u30a4\u30f3\u7d42\u4e86\u30d5\u30e9\u30b0\u306e\u521d\u671f\u5316\r\n    bLoginFinished = 0\r\n    \/\/\u30ed\u30b0\u30a4\u30f3\u30da\u30fc\u30b8\u306b\u79fb\u52d5\r\n    url = \"http:\/\/www.dmm.com\/netgame\/social\/-\/gadgets\/=\/app_id=854854\/\"\r\n    IE-&gt;\"Navigate\" url\r\n\r\n\/\/----------------------------------------------------------------------------\r\n\/\/ \u30e9\u30d9\u30eb\r\n\/\/----------------------------------------------------------------------------\r\n*main\r\n    stop\r\n\r\n*WebBrowserEvent\r\n    \/\/COM\u30a4\u30d9\u30f3\u30c8\u51e6\u7406\r\n    dispid = comevdisp(ie_event)\r\n    if (dispid == DISPID_DOCUMENTCOMPLETE){\r\n        \/\/\u30da\u30fc\u30b8\u8aad\u307f\u8fbc\u307f\u304c\u7d42\u4e86\u3057\u305f\u6642\r\n        wait 10\r\n        pDoc = IE(\"Document\")    \/\/IHTMLDocument2\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30fc\u30b9\u3092\u53d6\u5f97\r\n        \/\/pDoc\u306etitle\u30d7\u30ed\u30d1\u30c6\u30a3\u304b\u3089\u3001\u30b2\u30fc\u30e0\u30da\u30fc\u30b8\u3067\u3042\u308b\u304b\u5224\u65ad\r\n        docTitle = pDoc(\"title\")\r\n        if(instr(docTitle, 0, \"\u8266\u968a\u3053\u308c\u304f\u3057\u3087\u3093\") != -1){\r\n            \/\/\u30b2\u30fc\u30e0\u30da\u30fc\u30b8\u3060\u3063\u305f\u3089\r\n            if(bLoginFinished == 0){\r\n                \/\/\u30a4\u30f3\u30e9\u30a4\u30f3\u30d5\u30ec\u30fc\u30e0\u306eFlash\u3092\u62bd\u51fa\r\n                pGameFrame = pDoc(\"getElementById\", \"game_frame\")\r\n                inlineFrameURL = pGameFrame(\"getAttribute\", \"src\")\r\n                IE-&gt;\"Navigate\" inlineFrameURL\r\n                bLoginFinished = 1\r\n                return\r\n            }\r\n        }\r\n        \/\/\u30b9\u30af\u30ed\u30fc\u30eb\u3057\u306a\u3044\u3088\u3046\u306b\u3059\u308b\r\n        if(bLoginFinished == 1){\r\n            pBody = pDoc(\"body\")    \/\/body\u8981\u7d20\u306eIHTMLElement2\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30fc\u30b9\r\n            pStyle = pBody(\"style\")    \/\/IHTMLStyle2\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30fc\u30b9\r\n            pBody(\"scroll\") = \"no\"\r\n        }\r\n        \/\/\u30da\u30fc\u30b8\u306e\u30b9\u30af\u30ed\u30fc\u30eb\u4f4d\u7f6e\u8abf\u6574\r\n        pWindow = pDoc(\"parentWindow\")    \/\/IHTMLWindow2\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30fc\u30b9\r\n        if(bLoginFinished == 0){    \/\/\u30ed\u30b0\u30a4\u30f3\u30da\u30fc\u30b8\u306e\u6642\r\n            pWindow-&gt;\"scroll\" 70 ,75\r\n        }\r\n        else{    \/\/\u30b2\u30fc\u30e0\u30da\u30fc\u30b8\u306e\u6642\r\n             SetWindowPos hIE, 0, 0, 0, 800, 480,0\r\n            pWindow-&gt;\"scroll\" 0 ,16\r\n        }\r\n    }\r\n    return\r\n*fitClientWindowSizeToGame\r\n    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u306e\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30b5\u30a4\u30ba\u3092\u8266\u3053\u308c\u306b\u3042\u308f\u305b\u308b\r\n    newWidth = ginfo_sizex - ginfo_winx + GAME_WIDTH    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u67a0\u3092\u542b\u3081\u305f\u5e45\u3092\u7b97\u51fa\r\n    newHeight = ginfo_sizey - ginfo_winy + GAME_HEIGHT\r\n    SetWindowPos hwnd, 0, 0, 0, newWidth, newHeight,SWP_NOMOVE\r\n    return\r\n*scaleGameArea\r\n    \/\/\u30b2\u30fc\u30e0\u30a8\u30ea\u30a2\u306e\u62e1\u5927\u7e2e\u5c0f\r\n    pDoc = IE(\"Document\")\r\n    if(pDoc(\"ReadyState\")==\"complete\"){\r\n        \/\/\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30a6\u30a4\u30f3\u30c9\u30a6\u306e\u30a2\u30b9\u30da\u30af\u30c8\u6bd4\u306e\u53d6\u5f97\r\n        clientAspectRaito = double(ginfo_winy) \/ double(ginfo_winx)\r\n        \r\n        \/\/\u30a2\u30b9\u30da\u30af\u30c8\u6bd4\u306b\u3088\u308a\u3001\u62e1\u5927\u7387\u3084IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e\u4f4d\u7f6e\u306e\u5024\u3092\u6c7a\u5b9a\r\n        if(clientAspectRaito &gt; gameAspectRait){\r\n            \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u304c\u7e26\u306b\u9577\u3044\u6642\r\n            scaleFactor = double(ginfo_winx) \/ double(GAME_WIDTH)    \/\/\u62e1\u5927\u7387\r\n            IEposX = 0    \/\/IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\u306e\u79fb\u52d5\u5148X\u5ea7\u6a19\r\n            IEposY = (ginfo_winy - double(GAME_HEIGHT)*scaleFactor)\/2\r\n            IEwidth = ginfo_winx    \/\/IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\u306e\u5e45\r\n            IEheight = double(GAME_HEIGHT)*scaleFactor\r\n        }\r\n        else : if(clientAspectRaito &lt; gameAspectRait){\r\n            \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u304c\u6a2a\u306b\u9577\u3044\u6642\r\n            scaleFactor = double(ginfo_winy) \/ double(GAME_HEIGHT)\r\n            IEposX = (ginfo_winx - double(GAME_WIDTH)*scaleFactor )\/2\r\n            IEposY = 0\r\n            IEwidth = double(GAME_WIDTH)*scaleFactor\r\n            IEheight = ginfo_winy\r\n        }\r\n        else : if(clientAspectRaito == gameAspectRait){\r\n            \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u306e\u30a2\u30b9\u6bd4\u304c\u30b2\u30fc\u30e0\u3068\u540c\u3058\u6642\r\n            scaleFactor = double(ginfo_winx) \/ double(GAME_WIDTH)\r\n            IEposX = 0 : IEposY = 0 : IEwidth = ginfo_winx : IEheight = ginfo_winy\r\n        }\r\n        \/\/IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e\u4f4d\u7f6e\u5408\u308f\u305b\u3068\u62e1\u5927\u7e2e\u5c0f\r\n        SetWindowPos hIE, 0, int(IEposX), int(IEposY), int(IEwidth), int(IEheight), 0\r\n    \r\n        \/\/Flash\u306e\u30a8\u30ec\u30e1\u30f3\u30c8\u3092\u53d6\u5f97\r\n        pFlash = pDoc(\"getElementById\", \"flashWrap\")\r\n        pStyleFlash = pFlash(\"Style\")\r\n        \/\/\u30b2\u30fc\u30e0\u753b\u9762(Flash)\u306e\u62e1\u5927\u7e2e\u5c0f\u3068\u4f4d\u7f6e\u5408\u308f\u305b\r\n        pStyleFlash(\"zoom\") = scaleFactor\r\n        \/\/\u30a8\u30ec\u30e1\u30f3\u30c8\u306e\u5834\u6240\u307e\u3067\u30b9\u30af\u30ed\u30fc\u30eb\r\n        pFlash-&gt;\"scrollIntoView\" \"true\" \r\n    }\r\n    return\r\n*onWM_SIZE\r\n    \/\/\u30a6\u30a4\u30f3\u30c9\u30a6\u30b5\u30a4\u30ba\u5909\u66f4\u306e\u30e1\u30c3\u30bb\u30fc\u30b8\u304c\u98db\u3093\u3067\u304d\u305f\u6642\u306e\u51e6\u7406\r\n    \/\/\u6700\u5c0f\u5316\u3057\u305f\u6642\u306f\u7121\u52b9\r\n    IsIconic(hwnd)\r\n    if(stat):return\r\n    \/\/\u30b2\u30fc\u30e0\u8868\u793a\u6642\u3001\u30a6\u30a4\u30f3\u30c9\u30a6\u30b5\u30a4\u30ba\u5909\u66f4\u3067\u30b2\u30fc\u30e0\u30a8\u30ea\u30a2\u306e\u62e1\u5927\u7e2e\u5c0f\r\n    if(bLoginFinished){\r\n        gosub *scaleGameArea\r\n    }\r\n    else{\r\n        \/\/\u30ed\u30b0\u30a4\u30f3\u753b\u9762\u306e\u6642\u306f\u30b5\u30a4\u30ba\u5909\u66f4\u3055\u305b\u306a\u3044\r\n        gosub *fitClientWindowSizeToGame\r\n    }\r\n    return\r\n    \r\n*syscommand\r\n    \/\/\u30b7\u30b9\u30c6\u30e0\u30b3\u30de\u30f3\u30c9\u304c\u547d\u4ee4\u3055\u308c\u305f\u6642\r\n    switch wparam    \r\n        case IDM_SS_JPG\r\n        case IDM_SS_PNG\r\n        case IDM_SS_BMP\r\n            \/\/\u30b9\u30af\u30ea\u30fc\u30f3\u30b7\u30e7\u30c3\u30c8\u3092\u64ae\u308b\r\n            wait 20\r\n            \/\/\u30e1\u30a4\u30f3\u30a6\u30a4\u30f3\u30c9\u30a6\u306e\u30c7\u30d0\u30a4\u30b9\u30b3\u30f3\u30c6\u30ad\u30b9\u30c8\u306e\u30cf\u30f3\u30c9\u30eb\u3092\u53d6\u5f97\r\n            GetDC hwnd\r\n            hdcTarget = stat\r\n            \/\/\u30b9\u30af\u30b7\u30e7\u7528\u306e\u30d0\u30c3\u30d5\u30a1\u3092\u521d\u671f\u5316\u3057\u3001\u3053\u308c\u3092\u753b\u9762\u5236\u5fa1\u547d\u4ee4\u5148\u306b\u6307\u5b9a\r\n            buffer 1, ginfo(12), ginfo(13), 0\r\n            \/\/\u30e1\u30a4\u30f3\u30a6\u30a4\u30f3\u30c9\u30a6\u2192\u30d0\u30c3\u30d5\u30a1\u3078\u753b\u50cf\u3092\u30b3\u30d4\u30fc\r\n            BitBlt hdc, 0, 0, ginfo(12), ginfo(13), hdcTarget, 0, 0, SRCCOPY\r\n            \/\/\u30c7\u30d0\u30a4\u30b9\u30b3\u30f3\u30c6\u30ad\u30b9\u30c8\u958b\u653e\r\n            ReleaseDC hwnd, hdcTarget\r\n            \/\/\u4fdd\u5b58\u30d5\u30a9\u30eb\u30c0\u306e\u5b58\u5728\u30c1\u30a7\u30c3\u30af\u3068\u4f5c\u6210\r\n            dirlist x, \"ScreenShot\", 5\r\n            if (stat == 0){mkdir \"ScreenShot\"}\r\n            \/\/\u62e1\u5f35\u5b50\u306e\u6c7a\u5b9a\r\n            extension = \".bmp\"\r\n            if(wparam == IDM_SS_JPG){extension = \".jpg\"}\r\n            if(wparam == IDM_SS_PNG){extension = \".png\"}\r\n            \/\/\u30d5\u30a1\u30a4\u30eb\u540d\u3068\u30d1\u30b9\u3092\u6c7a\u3081\u308b\r\n            fileName = strf(\"%04d_%02d%02d_%02d%02d_%02d\", gettime(0), gettime(1), gettime(3), gettime(4), gettime(5), gettime(6))\r\n            savePath = \"ScreenShot\\\\\" + fileName + extension\r\n            \/\/CV\u30d0\u30c3\u30d5\u30a1\u3092\u521d\u671f\u5316\u3001\u30b3\u30d4\u30fc\u3057\u3066\u4fdd\u5b58\r\n            cvbuffer 0, ginfo(12), ginfo(13)\r\n            cvputimg 0\r\n            cvsave savePath\r\n            \/\/\u97f3\u3092\u9cf4\u3089\u3059\r\n            mmload \"capture.wav\",0\r\n            mmplay 0\r\n            \/\/\u753b\u9762\u5236\u5fa1\u547d\u4ee4\u5148\u3092\u30e1\u30a4\u30f3\u30a6\u30a3\u30f3\u30c9\u30a6\u306b\u623b\u3059\r\n            gsel 0, 0\r\n            swbreak\r\n        case IDM_SS_OPEN\r\n            exec \"explorer ScreenShot\"\r\n            swbreak\r\n        case IDM_WSIZE_DEFAULT\r\n            gosub *fitClientWindowSizeToGame\r\n            swbreak\r\n        default\r\n            swbreak\r\n    swend\r\n    return<\/pre>\r\n\r\n\r\n\r\n<h4>\u88dc\u8db3<\/h4>\r\n\r\n<p>\r\n\r\n51\u884c\u76ee\uff1a\u30b2\u30fc\u30e0\u306e\u5927\u304d\u3055\u3092\u81ea\u7531\u306b\u62e1\u5927\u7e2e\u5c0f\u51fa\u6765\u308b\u3088\u3046\u306b\u3057\u305f\u304b\u3063\u305f\u306e\u3067\u3001Windows API\u306eSetWindowLong\u95a2\u6570\u3067\u30aa\u30fc\u30d0\u30fc\u30e9\u30c3\u30d7\u30a6\u30a4\u30f3\u30c9\u30a6\u30b9\u30bf\u30a4\u30eb\u306b\u5909\u66f4\u3059\u308b(HSP\u3067\u4f5c\u3089\u308c\u308b\u30c7\u30d5\u30a9\u30eb\u30c8\u306e\u30a6\u30a4\u30f3\u30c9\u30a6\u306f\u30b5\u30a4\u30ba\u5909\u66f4\u4e0d\u53ef)<br \/>\r\n\r\nSetWindowLong\u95a2\u6570\u3092\u547c\u3073\u51fa\u3057\u305f\u5f8c\u306f\u3001\u5fc5\u305aSetWindowPos\u95a2\u6570\u3092\u547c\u3073\u3001\u4f4d\u7f6e\u3084\u5927\u304d\u3055\u3092\u5909\u66f4\u305b\u305a\u3068\u3082SWP_FRAMECHANGED\u30d5\u30e9\u30b0\u3092\u6307\u5b9a\u3057\u3001\u30a6\u30a4\u30f3\u30c9\u30a6\u30b9\u30bf\u30a4\u30eb\u306e\u5909\u66f4\u3092\u3059\u3050\u306b\u9069\u7528\u3057\u306a\u3051\u308c\u3070\u306a\u3089\u306a\u3044\u3002\u305d\u3046\u3067\u306a\u3044\u3068\u30a6\u30a4\u30f3\u30c9\u30a6\u67a0\u3084\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30a8\u30ea\u30a2\u306e\u63cf\u753b\u304c\u5d29\u308c\u305f\u308a\u3059\u308b\u3002Aero\u6709\u52b9\u6642\u306f\u7279\u306b\u5d29\u308c\u306a\u3044\u304c\u3001Aero\u30aa\u30d5\u306e\u6642\u3084\u3001WindowsXP\u4ee5\u524d\u306e\u63cf\u753b\u65b9\u5f0f\u3060\u3068\u5d29\u308c\u308b<br \/>\r\n\r\nWeb\u4e0a\u306eHSP\u306e\u30b5\u30f3\u30d7\u30eb\u3067\u306f\u3001SetWindowLong\u95a2\u6570\u3092\u547c\u3093\u3067\u306a\u3044\u3082\u306e\u3082\u7d50\u69cb\u3042\u3063\u305f\u306e\u3067\u6ce8\u610f\u3002<\/p>\r\n","protected":false},"excerpt":{"rendered":"<p>\u3053\u3093\u306a\u611f\u3058\u306e\u30d4\u30c3\u30bf\u30ea\u30b5\u30a4\u30ba\u306e\u8266\u3053\u308c\u5c02\u7528\u30d6\u30e9\u30a6\u30b6\u3002 HSP\u3067COM\uff08IE\u30b3\u30f3\u30dd\u30fc\u30cd\u30f3\u30c8\uff09\u3092\u6271\u3063\u3066\u307f\u305f\u304b\u3063\u305f\u3002 \u3068\u3044\u3063\u3066\u3082\u898b\u3064\u3051\u305f\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\u306b\u3001\u8266\u3053\u308c\u306e\u4f4d\u7f6e\u8abf\u6574\u6a5f\u80fd\u3084\u3089\u3001\u62e1\u5927\u7e2e\u5c0f\u6a5f\u80fd\u3084\u3089\u3092\u8ffd\u52a0\u3057\u305f\u3060\u3051\u3067\u3059\u3002<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[4],"tags":[9,22,25],"class_list":["post-35","post","type-post","status-publish","format-standard","hentry","category-4","tag-hsp","tag-22","tag-25"],"_links":{"self":[{"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts\/35","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=35"}],"version-history":[{"count":7,"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts\/35\/revisions"}],"predecessor-version":[{"id":821,"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts\/35\/revisions\/821"}],"wp:attachment":[{"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=35"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=35"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/chabon.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=35"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}